// Compact all strings into a single block of memory
void FStringTable::Compact ()
{
if (NumStrings == 0)
return;
int len = SumStringSizes ();
char *newspace = new char[len];
char *pos = newspace;
int i;
for (i = 0; i < NumStrings; ++i)
{
strcpy (pos, Strings[i]);
pos += strlen (pos) + 1;
}
FreeStrings ();
pos = newspace;
for (i = 0; i < NumStrings; ++i)
{
Strings[i] = pos;
pos += strlen (pos) + 1;
}
CompactBase = newspace;
CompactSize = len;
}
void TRI_FreeContextAql (TRI_aql_context_t* const context) {
TRI_ASSERT(context != NULL);
LOG_TRACE("freeing context");
// release all scopes
TRI_FreeScopesAql(context);
FreeStrings(context);
FreeNodes(context);
// free parameter names hash
TRI_DestroyAssociativePointer(&context->_parameters._names);
// free collection names
TRI_DestroyAssociativePointer(&context->_collectionNames);
FreeCollections(context);
// free parameter values
TRI_FreeBindParametersAql(context);
TRI_DestroyAssociativePointer(&context->_parameters._values);
// free parser/lexer
TRI_FreeParserAql(context->_parser);
// free statement list
TRI_FreeStatementListAql(context->_statements);
// free error struct
TRI_DestroyErrorAql(&context->_error);
TRI_Free(TRI_UNKNOWN_MEM_ZONE, context);
}
int ScanModPublics(WORD wModule){
BYTE abBuffer[300];
WORD wLen,wPublics;
BYTE *pbBuffer,bType;
wPublics=0;
_tlseek(wLib,alOffsets[wModule],0);
if (ReadByte()== THEADR)
if (ReadHdrRecord(abBuffer)){
while(TRUE){
bType = ReadByte();
switch(bType){
case PUBDEF:
if ((wLen = ReadWord())!=0xffff){
WORD GrpIndex,SegIndex;
if ((GrpIndex=ReadByte()) >= 128){
wLen -=2;
ReadByte();
} else wLen--;
if ((SegIndex=ReadByte()) >= 128){
wLen -=2;
ReadByte();
} else wLen--;
if (GrpIndex==0 && SegIndex == 0){
ReadWord();
wLen -= 2;
}
while(wLen > 1){
ReadName(abBuffer);
pcStrings[wPublics]=_xgrab(strlen(abBuffer)+1);
strcpy(pcStrings[wPublics],abBuffer);
wPublics++;
ReadWord();
if (ReadByte() >= 128){
wLen -=2;
ReadByte();
} else wLen--;
wLen -= strlen(abBuffer)+1;
wLen -= 2;
}
ReadByte();
}
break;
case 0x0:
case LIBTRL:
case THEADR:
return wPublics;
default:
if (!SkipRecord()){
return 0xffff;
}
}
}
}
FreeStrings(wPublics);
return 0xffff;
}
CLIPPER AMODPUBLIC( void ){
WORD wModule,i,wPublics;
if ((PCOUNT() >= 1) && ISNUM(1) && (wLib != 0xffff) && ((wModule=_parni(1)-1) < wModules)){
wPublics=ScanModPublics(wModule);
if (wPublics > 0){
_reta(wPublics);
for(i=0;i <= wPublics; i++){
_storc(pcStrings[i],-1,i+1);
}
FreeStrings(wPublics);
return;
}
_ret();
return;
}
}
CLIPPER AMODEXTERN( void ){
WORD wModule,i,wExternals;
if ((PCOUNT() >= 1) && ISNUM(1) && (wLib != 0xffff) && ((wModule=_parni(1)-1) < wModules)){
wExternals=ScanModExternals(wModule);
if (wExternals > 0){
_reta(wExternals);
for(i=0;i <= wExternals; i++){
_storc(pcStrings[i],-1,i+1);
}
FreeStrings(wExternals);
return;
}
_ret();
return;
}
}
void FStringTable::FreeData ()
{
if (Strings != NULL)
{
FreeStrings ();
}
if (StringStatus) delete[] StringStatus;
if (Strings) delete[] Strings;
if (Names) delete[] Names;
StringStatus = NULL;
Strings = NULL;
Names = NULL;
NumStrings = 0;
}
/* Test u_vformatMessage() with various test patterns. */
static void TestMessageFormatWithValist( void )
{
UChar *str;
UChar* result;
int32_t resultLengthOut,resultlength,i, patternlength;
UErrorCode status = U_ZERO_ERROR;
UDate d1=1000000000.0;
ctest_setTimeZone(NULL, &status);
str=(UChar*)malloc(sizeof(UChar) * 7);
u_uastrcpy(str, "MyDisk");
resultlength=1;
result=(UChar*)malloc(sizeof(UChar) * 1);
log_verbose("Testing u_formatMessage90\n");
InitStrings();
for (i = 0; i < cnt_testCases; i++) {
status=U_ZERO_ERROR;
patternlength=u_strlen(testCasePatterns[i]);
resultLengthOut=CallFormatMessage( "en_US",testCasePatterns[i], patternlength, result, resultlength,
&status, 1, 3456.00, d1);
if(status== U_BUFFER_OVERFLOW_ERROR)
{
status=U_ZERO_ERROR;
resultlength=resultLengthOut+1;
result=(UChar*)realloc(result,sizeof(UChar) * resultlength);
CallFormatMessage( "en_US",testCasePatterns[i], patternlength, result, resultlength,
&status, 1, 3456.00, d1);
}
if(U_FAILURE(status)){
log_data_err("ERROR: failure in message format on testcase %d: %s (Are you missing data?)\n", i, myErrorName(status) );
}
else if(u_strcmp(result, testResultStrings[i])==0){
log_verbose("PASS: MessagFormat successful on testcase : %d\n", i);
}
else{
log_err("FAIL: Error in MessageFormat on testcase : %d\n GOT %s EXPECTED %s\n", i,
austrdup(result), austrdup(testResultStrings[i]) );
}
}
free(result);
free(str);
FreeStrings();
ctest_resetTimeZone();
}
int ScanModExternals(WORD wModule){
BYTE abBuffer[300];
WORD wLen,wExternals;
BYTE *pbBuffer,bType;
wExternals=0;
_tlseek(wLib,alOffsets[wModule],0);
if (ReadByte()== THEADR)
if (ReadHdrRecord(abBuffer)){
while(TRUE){
bType = ReadByte();
switch(bType){
case EXTDEF:
if ((wLen = ReadWord())!=0xffff){
while(wLen > 1){
ReadName(abBuffer);
pcStrings[wExternals]=_xgrab(strlen(abBuffer)+1);
strcpy(pcStrings[wExternals],abBuffer);
wExternals++;
wLen -= strlen(abBuffer)+1;
if (ReadByte() >= 128){
wLen -=2;
ReadByte();
} else wLen--;
}
ReadByte();
}
break;
case 0x0:
case LIBTRL:
case THEADR:
return wExternals;
default:
if (!SkipRecord()){
return 0xffff;
}
}
}
}
FreeStrings(wExternals);
return 0xffff;
}
// add a binding to the list. Calls should be in the form:
// AddBinding( "left", "button_press", "start", "+dota_camera_follow", "" );
//
// args:
// hand_str = "left" or "right"
// action_str = 'button_press' 'trigger_press' 'tilt_gesture' 'point_gesture' 'velocity_gesture' or 'joystick_move'
// argument_str depends on action_str, see below for details
// press_command_str is the concommand executed on start of the action (ie button press) and release_command_str on stop (ie button release)
// release_command_str can be the empty string if no stop action is desired
// if the press_command_str begins with "+", an equivalent "-" is set to the release_command automatically
void SixenseGestureBindings::AddBinding( CUtlString hand_str, CUtlString action_str, CUtlString argument_str, CUtlString press_command_str, CUtlString release_command_str )
{
GestureBinding binding;
// Convert from strings to enums
sixenseUtils::IButtonStates::ActionType action;
if( !ActionFromString( action_str, &action ) )
{
return;
}
binding.m_Action = action;
int hand;
if( !HandFromString( hand_str, &hand ) ) {
return;
}
binding.m_iHand = hand;
// handle argument_str per-action type
if( action == sixenseUtils::IButtonStates::ACTION_BUTTON_PRESS )
{
// button_press takes a button argument
unsigned short button_token;
if( !ButtonMaskFromString( argument_str, &button_token ) )
{
return;
}
binding.m_iArgument = button_token;
}
else if( action == sixenseUtils::IButtonStates::ACTION_TRIGGER_PRESS )
{
// trigger press has no argument
binding.m_iArgument = 0;
}
else
{
// all other actions take a direction
sixenseUtils::IButtonStates::Direction dir;
if( !DirectionFromString( argument_str, &dir ) )
{
return;
}
binding.m_iArgument = dir;
}
// copy the activate command
binding.m_pActivateCommand = strdup( press_command_str.String() );
binding.m_bAutoMirrored = false;
// if there is an explicit release_command, use it
if ( !release_command_str.IsEmpty() )
{
binding.m_pDeactivateCommand = strdup( release_command_str.String() );
}
else
{
// otherwise try to generate a release command
// see if it starts with a +, if so, add an off command
if( press_command_str[0] == '+' )
{
binding.m_pDeactivateCommand = strdup( press_command_str.String() );
binding.m_pDeactivateCommand[0] = '-';
binding.m_bAutoMirrored = true;
}
else
{
// Just leave release command null
binding.m_pDeactivateCommand = NULL;
}
}
// Try to keep a single binding per 'action' 'hand' 'arg' pair, ie one per button.
// We may want to allow multiple if people think it would be useful...
FOR_EACH_LL( m_GestureBindingList, it )
{
GestureBinding existing_binding = m_GestureBindingList[it];
if( binding.m_Action == existing_binding.m_Action &&
binding.m_iArgument == existing_binding.m_iArgument &&
binding.m_iHand == existing_binding.m_iHand )
{
// Already the same binding active, delete it
FreeStrings( existing_binding );
m_GestureBindingList.Remove( it );
break;
}
}
/* Test u_formatMessage() with various test patterns() */
static void MessageFormatTest( void )
{
UChar *str;
UChar* result;
int32_t resultLengthOut,resultlength,i, patternlength;
UErrorCode status = U_ZERO_ERROR;
UDate d1=1000000000.0;
ctest_setTimeZone(NULL, &status);
str=(UChar*)malloc(sizeof(UChar) * 7);
u_uastrncpy(str, "MyDisk", 7);
resultlength=1;
result=(UChar*)malloc(sizeof(UChar) * 1);
log_verbose("Testing u_formatMessage()\n");
InitStrings();
for (i = 0; i < cnt_testCases; i++) {
status=U_ZERO_ERROR;
patternlength=u_strlen(testCasePatterns[i]);
resultLengthOut=u_formatMessage( "en_US",testCasePatterns[i], patternlength, result, resultlength,
&status, 1, 3456.00, d1);
if(status== U_BUFFER_OVERFLOW_ERROR)
{
status=U_ZERO_ERROR;
resultlength=resultLengthOut+1;
result=(UChar*)realloc(result,sizeof(UChar) * resultlength);
u_formatMessage( "en_US",testCasePatterns[i], patternlength, result, resultlength,
&status, 1, 3456.00, d1);
}
if(U_FAILURE(status)){
log_data_err("ERROR: failure in message format on testcase %d: %s (Are you missing data?)\n", i, myErrorName(status) );
continue;
}
if(u_strcmp(result, testResultStrings[i])==0){
log_verbose("PASS: MessagFormat successful on testcase : %d\n", i);
}
else{
log_err("FAIL: Error in MessageFormat on testcase : %d\n GOT %s EXPECTED %s\n", i,
austrdup(result), austrdup(testResultStrings[i]) );
}
}
free(result);
result = NULL;
free(str);
{
for (i = 0; i < cnt_testCases; i++) {
UParseError parseError;
status=U_ZERO_ERROR;
patternlength=u_strlen(testCasePatterns[i]);
resultlength=0;
resultLengthOut=u_formatMessageWithError( "en_US",testCasePatterns[i], patternlength, result, resultlength,
&parseError,&status, 1, 3456.00, d1);
if(status== U_BUFFER_OVERFLOW_ERROR)
{
status=U_ZERO_ERROR;
resultlength=resultLengthOut+1;
result=(UChar*)malloc(sizeof(UChar) * resultlength);
u_formatMessage( "en_US",testCasePatterns[i], patternlength, result, resultlength,
&status, 1, 3456.00, d1);
}
if(U_FAILURE(status)){
log_data_err("ERROR: failure in message format on testcase %d: %s (Are you missing data?)\n", i, myErrorName(status) );
continue;
}
if(u_strcmp(result, testResultStrings[i])==0){
log_verbose("PASS: MessagFormat successful on testcase : %d\n", i);
}
else{
log_err("FAIL: Error in MessageFormat on testcase : %d\n GOT %s EXPECTED %s\n", i,
austrdup(result), austrdup(testResultStrings[i]) );
}
free(result);
result=NULL;
}
}
{
UErrorCode ec = U_ZERO_ERROR;
int32_t patternLength = u_strlen(testCasePatterns[0]);
UMessageFormat formatter = umsg_open(testCasePatterns[0],patternLength,"en_US",NULL,&ec);
if(U_FAILURE(ec)){
log_data_err("umsg_open() failed for testCasePattens[%d]. -> %s (Are you missing data?)\n",i, u_errorName(ec));
return;
}
for(i = 0;i<cnt_testCases; i++){
UParseError parseError;
int32_t resultLength =0,count=0;
int32_t one=0;
int32_t two=0;
UDate d2=0;
result=NULL;
patternLength = u_strlen(testCasePatterns[i]);
umsg_applyPattern(formatter,testCasePatterns[i],patternLength,&parseError,&ec);
if(U_FAILURE(ec)){
log_err("umsg_applyPattern() failed for testCasePattens[%d].\n",i);
return;
}
/* pre-flight */
resultLength = umsg_format(formatter,result,resultLength,&ec,1,3456.00,d1);
if(ec==U_BUFFER_OVERFLOW_ERROR){
ec=U_ZERO_ERROR;
result = (UChar*) malloc(U_SIZEOF_UCHAR*resultLength+2);
resultLength = umsg_format(formatter,result,resultLength+2,&ec,1,3456.00,d1);
if(U_FAILURE(ec)){
log_err("ERROR: failure in message format on testcase %d: %s\n", i, u_errorName(status) );
free(result);
return;
}
if(u_strcmp(result, testResultStrings[i])==0){
log_verbose("PASS: MessagFormat successful on testcase : %d\n", i);
}
else{
log_err("FAIL: Error in MessageFormat on testcase : %d\n GOT %s EXPECTED %s\n", i,
austrdup(result), austrdup(testResultStrings[i]) );
}
if (returnsNullForType(1, (double)2.0)) {
/* HP/UX and possibly other platforms don't properly check for this case.
We pass in a UDate, but the function expects a UDate *. When va_arg is used,
most compilers will return NULL, but HP-UX won't do that and will return 2
in this case. This is a platform dependent test.
This relies upon "undefined" behavior, as indicated by C99 7.15.1.1 paragraph 2
*/
umsg_parse(formatter,result,resultLength,&count,&ec,one,two,d2);
if(ec!=U_ILLEGAL_ARGUMENT_ERROR){
log_err("FAIL: Did not get expected error for umsg_parse(). Expected: U_ILLEGAL_ARGUMENT_ERROR Got: %s \n",u_errorName(ec));
}else{
ec = U_ZERO_ERROR;
}
}
else {
log_verbose("Warning: Returning NULL for a mismatched va_arg type isn't supported on this platform.\n", i);
}
umsg_parse(formatter,result,resultLength,&count,&ec,&one,&two,&d2);
if(U_FAILURE(ec)){
log_err("umsg_parse could not parse the pattern. Error: %s.\n",u_errorName(ec));
}
free(result);
}else{
log_err("FAIL: Expected U_BUFFER_OVERFLOW error while preflighting got: %s for testCasePatterns[%d]",u_errorName(ec),i);
}
}
umsg_close(formatter);
}
FreeStrings();
ctest_resetTimeZone();
}
CControlState::~CControlState()
{
FreeStrings();
}
HRESULT CControlState::Load( LPSTREAM pStm )
{
HRESULT hr = S_OK;
CComVariant var;
DWORD dwVer;
READDATA( dwVer );
// version 1 and 2 are pre-2.0 and are not backward compatible. Ignore this data.
if ( dwVer < 3 )
{
return S_FALSE;
}
READDATA( m_bColorSyntax );
READDATA( m_bAllowHSplit );
READDATA( m_bAllowVSplit );
READDATA( m_bHScroll );
READDATA( m_bVScroll );
READDATA( m_bSmoothScroll );
READDATA( m_bLineToolTips );
READDATA( m_bShowLeftMargin );
READDATA( m_bAllowColumnSel );
READDATA( m_bAllowDragDrop );
READDATA( m_bExpandTabs );
READDATA( m_xPosHSplitter );
READDATA( m_yPosVSplitter );
READDATA( m_eIndentStyle );
READDATA( m_nTabSize );
READDATA( m_Colors );
READDATA( m_lf );
// dealloc old strings
FreeStrings();
if ( SUCCEEDED( hr = var.ReadFromStream( pStm ) ) )
{
m_bstrText = var.bstrVal;
var.bstrVal = NULL;
var.vt = VT_EMPTY;
}
else
goto bail;
if ( SUCCEEDED( hr = var.ReadFromStream( pStm ) ) )
{
m_bstrLang = var.bstrVal;
var.bstrVal = NULL;
var.vt = VT_EMPTY;
}
else
goto bail;
READDATA( m_bDisplayWhitespace );
READDATA( m_bWantCarriageReturn );
READDATA( m_bEnabled );
READDATA( m_bGlobalProps );
READDATA( m_bModified );
READDATA( m_bOverType );
READDATA( m_bReadOnly );
READDATA( m_bPreserveCase );
READDATA( m_bCaseSensitiveSearch );
READDATA( m_bWholeWordOnly );
READDATA( m_nMaxUndo );
READDATA( m_bSelBounds );
READDATA( m_bRegExp );
READDATA( m_FontStyles );
READDATA( m_LineNum );
READDATA( m_bHideSel );
READDATA( m_bNormalizeCase );
READDATA( m_bOvertypeCaret );
READDATA( m_nHighlightedLine );
if ( dwVer < 4 )
goto bail;
READDATA( m_dwBorderStyle );
if ( dwVer < 5 )
goto bail;
READDATA( m_bStealKeys );
bail:
return hr;
}
