static pANTLR3_UINT8
appendUTF16_UTF16 (pANTLR3_STRING string, const char * newbit)
{
ANTLR3_UINT32 len;
pANTLR3_UINT16 in;
/** First, determine the length of the input string
*/
in = (pANTLR3_UINT16)newbit;
len = 0;
while (*in++ != '\0')
{
len++;
}
if (string->size < (string->len + len + 1))
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)( sizeof(ANTLR3_UINT16) *(string->len + len + 1) ));
string->size = string->len + len + 1;
}
/* Note we copy one more byte than the strlen in order to get the trailing delimiter
*/
ANTLR3_MEMMOVE((void *)(((pANTLR3_UINT16)string->chars) + string->len), newbit, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(len+1)));
string->len += len;
return string->chars;
}
static pANTLR3_UINT8
setUTF16_UTF16 (pANTLR3_STRING string, const char * chars)
{
ANTLR3_UINT32 len;
pANTLR3_UINT16 in;
/** First, determine the length of the input string
*/
in = (pANTLR3_UINT16)chars;
len = 0;
while (*in++ != '\0')
{
len++;
}
if (string->size < len + 1)
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(len + 1)));
string->size = len + 1;
}
/* Note we copy one more byte than the strlen in order to get the trailing '\0'
*/
ANTLR3_MEMMOVE((void *)(string->chars), chars, (ANTLR3_UINT32)((len+1) * sizeof(ANTLR3_UINT16)));
string->len = len;
return string->chars;
}
static pANTLR3_UINT8
insert8 (pANTLR3_STRING string, ANTLR3_UINT32 point, const char * newbit)
{
ANTLR3_UINT32 len;
if (point >= string->len)
{
return string->append(string, newbit);
}
len = (ANTLR3_UINT32)strlen(newbit);
if (len == 0)
{
return string->chars;
}
if (string->size < (string->len + len + 1))
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(string->len + len + 1));
string->size = string->len + len + 1;
}
/* Move the characters we are inserting before, including the delimiter
*/
ANTLR3_MEMMOVE((void *)(string->chars + point + len), (void *)(string->chars + point), (ANTLR3_UINT32)(string->len - point + 1));
/* Note we copy the exact number of bytes
*/
ANTLR3_MEMMOVE((void *)(string->chars + point), newbit, (ANTLR3_UINT32)(len));
string->len += len;
return string->chars;
}
static pANTLR3_UINT8
appendUTF16_8 (pANTLR3_STRING string, const char * newbit)
{
ANTLR3_UINT32 len;
pANTLR3_UINT16 apPoint;
ANTLR3_UINT32 count;
len = (ANTLR3_UINT32)strlen(newbit);
if (string->size < (string->len + len + 1))
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)((sizeof(ANTLR3_UINT16)*(string->len + len + 1))));
string->size = string->len + len + 1;
}
apPoint = ((pANTLR3_UINT16)string->chars) + string->len;
string->len += len;
for (count = 0; count < len; count++)
{
*apPoint++ = *(newbit + count);
}
*apPoint = '\0';
return string->chars;
}
static void
newPool(pANTLR3_ARBORETUM factory)
{
// Increment factory count
//
factory->thisPool++;
// Ensure we have enough pointers allocated
//
factory->pools = (pANTLR3_COMMON_TREE *)
ANTLR3_REALLOC( (void *)factory->pools, // Current pools pointer (starts at NULL)
(ANTLR3_UINT32)((factory->thisPool + 1) * sizeof(pANTLR3_COMMON_TREE *)) // Memory for new pool pointers
);
// Allocate a new pool for the factory
//
factory->pools[factory->thisPool] =
(pANTLR3_COMMON_TREE)
ANTLR3_MALLOC((size_t)(sizeof(ANTLR3_COMMON_TREE) * ANTLR3_FACTORY_POOL_SIZE));
// Reset the counters
//
factory->nextTree = 0;
// Done
//
return;
}
static void
newPool(pANTLR3_TOKEN_FACTORY factory)
{
/* Increment factory count
*/
factory->thisPool++;
/* Ensure we have enough pointers allocated
*/
factory->pools = (pANTLR3_COMMON_TOKEN *)
ANTLR3_REALLOC( (void *)factory->pools, /* Current pools pointer (starts at NULL) */
(ANTLR3_UINT64)((factory->thisPool + 1) * sizeof(pANTLR3_COMMON_TOKEN *)) /* Memory for new pool pointers */
);
/* Allocate a new pool for the factory
*/
factory->pools[factory->thisPool] =
(pANTLR3_COMMON_TOKEN)
ANTLR3_MALLOC((size_t)(sizeof(ANTLR3_COMMON_TOKEN) * ANTLR3_FACTORY_POOL_SIZE));
/* Reset the counters
*/
factory->nextToken = 0;
/* Done
*/
return;
}
static pANTLR3_UINT8
addc8 (pANTLR3_STRING string, ANTLR3_UINT32 c)
{
if (string->size < string->len + 2)
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(string->len + 2));
string->size = string->len + 2;
}
*(string->chars + string->len) = (ANTLR3_UINT8)c;
*(string->chars + string->len + 1) = '\0';
string->len++;
return string->chars;
}
static pANTLR3_UINT8
insertUTF16_UTF16 (pANTLR3_STRING string, ANTLR3_UINT32 point, const char * newbit)
{
ANTLR3_UINT32 len;
pANTLR3_UINT16 in;
if (point >= string->len)
{
return string->append(string, newbit);
}
/** First, determine the length of the input string
*/
in = (pANTLR3_UINT16)newbit;
len = 0;
while (*in++ != '\0')
{
len++;
}
if (len == 0)
{
return string->chars;
}
if (string->size < (string->len + len + 1))
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(string->len + len + 1)));
string->size = string->len + len + 1;
}
/* Move the characters we are inserting before, including the delimiter
*/
ANTLR3_MEMMOVE((void *)(((pANTLR3_UINT16)string->chars) + point + len), (void *)(((pANTLR3_UINT16)string->chars) + point), (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(string->len - point + 1)));
/* Note we copy the exact number of characters
*/
ANTLR3_MEMMOVE((void *)(((pANTLR3_UINT16)string->chars) + point), newbit, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(len)));
string->len += len;
return string->chars;
}
static pANTLR3_UINT8
addcUTF16 (pANTLR3_STRING string, ANTLR3_UINT32 c)
{
pANTLR3_UINT16 ptr;
if (string->size < string->len + 2)
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16) * (string->len + 2)));
string->size = string->len + 2;
}
ptr = (pANTLR3_UINT16)(string->chars);
*(ptr + string->len) = (ANTLR3_UINT16)c;
*(ptr + string->len + 1) = '\0';
string->len++;
return string->chars;
}
static ANTLR3_BOOLEAN
newPool(pANTLR3_ARBORETUM factory)
{
pANTLR3_COMMON_TREE *newPools;
// Increment factory count
//
++factory->thisPool;
// Ensure we have enough pointers allocated
//
newPools = (pANTLR3_COMMON_TREE *)
ANTLR3_REALLOC( (void *)factory->pools, // Current pools pointer (starts at NULL)
(ANTLR3_UINT32)((factory->thisPool + 1) * sizeof(pANTLR3_COMMON_TREE *)) // Memory for new pool pointers
);
if (newPools == NULL)
{
// realloc failed, but we still have the old allocation
--factory->thisPool;
return ANTLR3_FALSE;
}
factory->pools = newPools;
// Allocate a new pool for the factory
//
factory->pools[factory->thisPool] =
(pANTLR3_COMMON_TREE)
ANTLR3_MALLOC((size_t)(sizeof(ANTLR3_COMMON_TREE) * ANTLR3_FACTORY_POOL_SIZE));
if (factory->pools[factory->thisPool] == NULL)
{
// malloc failed
--factory->thisPool;
return ANTLR3_FALSE;
}
// Reset the counters
//
factory->nextTree = 0;
// Done
//
return ANTLR3_TRUE;
}
static pANTLR3_UINT8
set8 (pANTLR3_STRING string, const char * chars)
{
ANTLR3_UINT32 len;
len = (ANTLR3_UINT32)strlen(chars);
if (string->size < len + 1)
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(len + 1));
string->size = len + 1;
}
/* Note we copy one more byte than the strlen in order to get the trailing '\0'
*/
ANTLR3_MEMMOVE((void *)(string->chars), chars, (ANTLR3_UINT32)(len+1));
string->len = len;
return string->chars;
}
static pANTLR3_UINT8
append8 (pANTLR3_STRING string, const char * newbit)
{
ANTLR3_UINT32 len;
len = (ANTLR3_UINT32)strlen(newbit);
if (string->size < (string->len + len + 1))
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(string->len + len + 1));
string->size = string->len + len + 1;
}
/* Note we copy one more byte than the strlen in order to get the trailing
*/
ANTLR3_MEMMOVE((void *)(string->chars + string->len), newbit, (ANTLR3_UINT32)(len+1));
string->len += len;
return string->chars;
}
static pANTLR3_UINT8
insertUTF16_8 (pANTLR3_STRING string, ANTLR3_UINT32 point, const char * newbit)
{
ANTLR3_UINT32 len;
ANTLR3_UINT32 count;
pANTLR3_UINT16 inPoint;
if (point >= string->len)
{
return string->append8(string, newbit);
}
len = (ANTLR3_UINT32)strlen(newbit);
if (len == 0)
{
return string->chars;
}
if (string->size < (string->len + len + 1))
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(string->len + len + 1)));
string->size = string->len + len + 1;
}
/* Move the characters we are inserting before, including the delimiter
*/
ANTLR3_MEMMOVE((void *)(((pANTLR3_UINT16)string->chars) + point + len), (void *)(((pANTLR3_UINT16)string->chars) + point), (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(string->len - point + 1)));
string->len += len;
inPoint = ((pANTLR3_UINT16)(string->chars))+point;
for (count = 0; count<len; count++)
{
*(inPoint + count) = (ANTLR3_UINT16)(*(newbit+count));
}
return string->chars;
}
static void
newPool(pANTLR3_TOKEN_FACTORY factory)
{
/* Increment factory count
*/
factory->thisPool++;
// If we were reusing this token factory then we may already have a pool
// allocated. If we exceeded the max avaible then we must allocate a new
// one.
if (factory->thisPool > factory->maxPool)
{
/* Ensure we have enough pointers allocated
*/
factory->pools = (pANTLR3_COMMON_TOKEN *)
ANTLR3_REALLOC( (void *)factory->pools, /* Current pools pointer (starts at NULL) */
(ANTLR3_UINT32)((factory->thisPool + 1) * sizeof(pANTLR3_COMMON_TOKEN *)) /* Memory for new pool pointers */
);
/* Allocate a new pool for the factory
*/
factory->pools[factory->thisPool] =
(pANTLR3_COMMON_TOKEN)
ANTLR3_CALLOC(1, (size_t)(sizeof(ANTLR3_COMMON_TOKEN) * ANTLR3_FACTORY_POOL_SIZE));
// We now have a new pool and can track it as the maximum we have created so far
//
factory->maxPool = factory->thisPool;
}
/* Reset the counters
*/
factory->nextToken = 0;
/* Done
*/
return;
}
static pANTLR3_UINT8
setUTF16_8 (pANTLR3_STRING string, const char * chars)
{
ANTLR3_UINT32 len;
ANTLR3_UINT32 count;
pANTLR3_UINT16 apPoint;
len = (ANTLR3_UINT32)strlen(chars);
if (string->size < len + 1)
{
string->chars = (pANTLR3_UINT8) ANTLR3_REALLOC((void *)string->chars, (ANTLR3_UINT32)(sizeof(ANTLR3_UINT16)*(len + 1)));
string->size = len + 1;
}
apPoint = ((pANTLR3_UINT16)string->chars);
string->len = len;
for (count = 0; count < string->len; count++)
{
*apPoint++ = *(chars + count);
}
*apPoint = '\0';
return string->chars;
}
