SBSPSS/Utils/Parser Generator/SOURCE/yymlcrea.c

91 lines
2.1 KiB
C
Raw Normal View History

2000-12-08 21:40:33 +01:00
/************************************************************
yymlcrea.c
This file can be freely modified for the generation of
custom code.
Copyright (c) 1999 Bumble-Bee Software Ltd.
************************************************************/
#include "mlex.h"
#include <stdlib.h>
#ifdef YYPROTOTYPE
int YYCDECL yymcreatelex(yymlex_t YYFAR *yy, YYCONST yymlex_t YYFAR *src)
#else
int YYCDECL yymcreatelex(yy, src)
yymlex_t YYFAR *yy;
YYCONST yymlex_t YYFAR *src;
#endif
{
size_t textcharsize;
size_t statebufcharsize;
size_t unputbufcharsize;
yyassert(yy != NULL);
yyassert(src != NULL);
*yy = *src;
/* get sizes first */
textcharsize = yy->yymstext_size + 1; /* include the '\0' */
if (textcharsize <= (size_t) yy->yymstext_size) {
return 0; /* integer overflow */
}
if (yy->yymstext_size != 0) {
statebufcharsize = yy->yymstext_size * sizeof(int);
if ((int) (statebufcharsize / sizeof(int)) != yy->yymstext_size) {
return 0; /* integer overflow */
}
}
else {
statebufcharsize = 0;
}
if (yy->yymsunput_size != 0) {
unputbufcharsize = yy->yymsunput_size * sizeof(int);
if ((int) (unputbufcharsize / sizeof(int)) != yy->yymsunput_size) {
return 0; /* integer overflow */
}
}
else {
unputbufcharsize = 0;
}
/* allocate the memory if necessary */
yy->yymstext = (char YYFAR *) malloc(textcharsize);
if (yy->yymstext == NULL) {
return 0;
}
if (statebufcharsize != 0) {
yy->yymsstatebuf = (int YYFAR *) malloc(statebufcharsize);
if (yy->yymsstatebuf == NULL) {
free(yy->yymstext);
return 0;
}
}
else {
yy->yymsstatebuf = NULL;
}
if (unputbufcharsize != 0) {
yy->yymsunputbufptr = (int YYFAR *) malloc(unputbufcharsize);
if (yy->yymsunputbufptr == NULL) {
free(yy->yymstext);
free(yy->yymsstatebuf);
return 0;
}
}
else {
yy->yymsunputbufptr = NULL;
}
/* assign any other variables */
yy->yymtext_size = yy->yymstext_size;
yy->yymtext = yy->yymstext;
yy->yymstatebuf = yy->yymsstatebuf;
yy->yymunput_size = yy->yymsunput_size;
yy->yymunputbufptr = yy->yymsunputbufptr;
/* make sure we are ready to go */
yymreset(yy);
return 1;
}