BOOL StrInStrlist(LPCTSTR lpszList, LPCTSTR lpszSub)
{
if (lpszList == NULL)
return FALSE;
LPCTSTR p1;
LPCTSTR p2;
p1 = lpszList;
for (;;)
{
while (*p1 == ' ')
{
p1++;
}
p2 = p1;
while (__iscsym(*p2))
p2++;
p2++;
TCHAR szT[128];
lstrcpyn(szT, p1, p2 - p1);
if (lstrcmpi(szT, lpszSub) == 0)
return TRUE;
if (*p2 == '\0')
return FALSE;
p1 = p2;
}
return FALSE;
}
bool CEditUndoStack::GroupUndoInsertChar (CRichEditCtrl* pCtrl, CEditUndo* pUndo) {
DEFINE_FUNCTION("CEditUndoStack::GroupUndoInsertChar()");
int SelStart;
int SelEnd;
do {
SelStart = pUndo->GetSelStart();
SelEnd = pUndo->GetSelEnd();
pCtrl->SetSel(pUndo->GetSelStart(), pUndo->GetSelStart()+1);
pCtrl->ReplaceSel(_T(""));
pCtrl->SetSel(pUndo->GetSelStart(), pUndo->GetSelEnd());
DestroyPointer(pUndo);
pUndo = m_UndoStack.GetAt(m_UndoStack.GetNumElements() - 1);
if (pUndo == NULL) break;
if (pUndo->GetAction() != EDITUNDO_INSERTCHAR) break;
if (!__iscsym(pUndo->GetChar())) break;
if (abs(pUndo->GetSelStart() - SelStart) >= 2) break;
m_UndoStack.DeleteElement(m_UndoStack.GetNumElements() - 1, false);
} while (pUndo != NULL);
return (true);
}
int LER_LerParmNome( char * Parm , int * tamNome , int dimNome )
{
int inxParm = 0 ;
#ifdef _DEBUG
TST_ASSERT( Inicializado ) ;
#endif
PularBrancos( ) ;
*tamNome = 0 ;
if ( ! isalpha( LER_Buffer[ LER_InxBuffer ] ))
{
ExibirErro( "Nome deve iniciar com letra." ) ;
Parm[ inxParm ] = 0 ;
return 0 ;
} /* if */
Parm[ inxParm ] = LER_Buffer[ LER_InxBuffer ] ;
LER_InxBuffer ++ ;
inxParm ++ ;
while ( LER_InxBuffer < LER_TamBuffer )
{
if ( __iscsym( LER_Buffer[ LER_InxBuffer ] ))
{
Parm[ inxParm ] = LER_Buffer[ LER_InxBuffer ] ;
} else
{
Parm[ inxParm ] = 0 ;
*tamNome = inxParm ;
return TRUE ;
} /* if */
LER_InxBuffer ++ ;
inxParm ++ ;
if ( inxParm > dimNome )
{
ExibirErro( "Nome longo demais." ) ;
Parm[ dimNome - 1 ] = 0 ;
*tamNome = dimNome - 1 ;
return FALSE ;
} /* if */
} /* while */
Parm[ inxParm ] = 0 ;
*tamNome = inxParm ;
return TRUE ;
} /* Fim função: LER &Ler parâmetro nome */
void main()
{
int i;
for( i = 0; i < SIZE; i++ ) {
printf( "Char %c is %sa C symbol character\n",
chars[i],
( __iscsym( chars[i] ) ) ? "" : "not " );
}
}
static INT
ident_len ( LPCTSTR p )
{
LPCTSTR p2 = p;
if ( __iscsymf(*p) )
{
++p2;
while ( __iscsym(*p2) )
++p2;
}
return p2-p;
}
OPAL_SOUND_MGR void SoundManager::trimTrailingSpace( char *s )
{
char *p;
p = s;
if (p == NULL) return;
for (unsigned i=0;i < (strlen(s)+1);i++)
{
if (__iscsym(*p) == 0 && *p != '.' && *p != '-')
{
*p='\0';
break;
}
p++;
}
}
BOOL IsValidSymbol(const TCHAR* psz)
{
#ifdef UNICODE
if (!__iswcsymf(*psz))
#else
if (!__iscsymf(*psz))
#endif
return FALSE;
ASSERT(*psz != 0);
++psz;
while (*psz)
{
#ifdef UNICODE
if (!__iswcsym(*psz))
#else
if (!__iscsym(*psz))
#endif
return FALSE;
++psz;
}
return TRUE;
}
int __cdecl main(int argc, char *argv[])
{
int err;
int index;
char non_letter_set[]=
{'~','`','!','@','#','$','%','^','&','*','(',')',')',
'-','+','=','|','\\',';',':','"','\'','<','>',
',','.','?','/','\0'};
char errBuffer[200];
/*Initialize the PAL environment*/
err = PAL_Initialize(argc, argv);
if(0 != err)
{
return FAIL;
}
/*To check if the parameter passed in is a character*/
for(index = 'a'; index <= 'z'; index++)
{
err = __iscsym(index);
if(0 == err)
{
Fail("\n__iscsym failed to recognize a "
"lower-case letter:%c!\n", index);
}
}
/*To check if the parameter passed in is a character*/
for(index = 'A'; index <= 'Z'; index++)
{
err = __iscsym(index);
if(0 == err)
{
Fail("\n__iscsym failed to recognize an "
"upper-case letter: %c!\n", index);
}
}
/*To check if the parameter passed in is a digit*/
for(index = '0'; index <= '9'; index++)
{
err = __iscsym(index);
if(0 == err)
{
Fail("\n__iscsym failed to recognize a digit %c!\n",
index);
}
}
/*To check if the parameter passed in is a underscore*/
err = __iscsym('_');
if(0 == err)
{
Fail("\n__iscsym failed to recognize an underscore!\n");
}
memset(errBuffer, 0, 200);
for(index = 0; non_letter_set[index]; index++)
{
err = __iscsym(non_letter_set[index]);
if(0 != err)
{
strncat(errBuffer, &non_letter_set[index], 1);
strcat(errBuffer, ", ");
}
}
if(strlen(errBuffer) > 0)
{
Fail("\n__iscsym failed to identify the characters '%s' "
"as not letters, digits "
"or underscores\n", errBuffer);
}
PAL_Terminate();
return PASS;
}
