using releases from qtopia-free-1.6.0-snapshot-20030324 which fixes the

following bugs #776 and #490:
Now, we could successfully parse vcards from palm 4 + 5 and
quoted-printable encoded lines .. !

1 files changed, 79 insertions, 60 deletions

diff --git a/library/backend/vcc_yacc.cpp b/library/backend/vcc_yacc.cpp
index b2b0c14..5649522 100644
--- a/library/backend/vcc_yacc.cpp
+++ b/library/backend/vcc_yacc.cpp
@@ -97,129 +97,129 @@ DFARS 252.227-7013 or 48 CFR 52.227-19, as applicable.
 /* assign local name to parser variables and functions so that

    we can use more than one yacc based parser.

 */

 

 #if 0

 #define yyparse mime_parse

 #define yylex mime_lex

 #define yyerror mime_error

 #define yychar mime_char

 /* #define p_yyval p_mime_val */

 #undef yyval

 #define yyval mime_yyval

 /* #define p_yylval p_mime_lval */

 #undef yylval

 #define yylval mime_yylval

 #define yydebug mime_debug

 #define yynerrs mime_nerrs

 #define yyerrflag mime_errflag

 #define yyss mime_ss

 #define yyssp mime_ssp

 #define yyvs mime_vs

 #define yyvsp mime_vsp

 #define yylhs mime_lhs

 #define yylen mime_len

 #define yydefred mime_defred

 #define yydgoto mime_dgoto

 #define yysindex mime_sindex

 #define yyrindex mime_rindex

 #define yygindex mime_gindex

 #define yytable mime_table

 #define yycheck mime_check

 #define yyname mime_name

 #define yyrule mime_rule

 #ifdef YYPREFIX

 #undef YYPREFIX

 #endif

 #define YYPREFIX "mime_"

 #endif

 

 

 #ifndef _NO_LINE_FOLDING

 #define _SUPPORT_LINE_FOLDING 1

 #endif

 

 /* undef below if compile with MFC */

 /* #define INCLUDEMFC 1 */

 

 #if defined(WIN32) || defined(_WIN32)

 #ifdef INCLUDEMFC

 #include <afx.h>

 #endif

 #endif

 

 #include <string.h>

 #ifndef __MWERKS__

 #include <stdlib.h>

 #endif

 #include <stdio.h>

 #include <stdlib.h>

 #include <ctype.h>

 

 /*#ifdef PALMTOPCENTER
*/
 /*#include <qpe/vobject_p.h>
*/
 /*#else
*/
-#include <qtopia/private/vobject_p.h>
+#include "vobject_p.h"

 /*#endif
*/
 

 /****  Types, Constants  ****/

 

 #define YYDEBUG		0	/* 1 to compile in some debugging code */

 #define MAXTOKEN	256	/* maximum token (line) length */

 #define YYSTACKSIZE 	100	/* ~unref ?
*/
 #define MAXLEVEL	10	/* max # of nested objects parseable */

 				/* (includes outermost) */

 

 

 /****  Global Variables  ****/

 int mime_lineNum, mime_numErrors; /* yyerror() can use these */

 static VObject* vObjList;

 static VObject *curProp;

 static VObject *curObj;

 static VObject* ObjStack[MAXLEVEL];

 static int ObjStackTop;

 

 

 /* A helpful utility for the rest of the app. */

 #if __CPLUSPLUS__

 extern "C" {

 #endif

 

     extern void yyerror(char *s);

 

 #if __CPLUSPLUS__

     };

 #endif

 

 int yyparse();

 

 enum LexMode {

 	L_NORMAL,

 	L_VCARD,

 	L_VCAL,

 	L_VEVENT,

 	L_VTODO,

 	L_VALUES,

 	L_BASE64,

 	L_QUOTED_PRINTABLE

 	};

 

 /****  Private Forward Declarations  ****/

 static int pushVObject(const char *prop);

 static VObject* popVObject();

 static void lexPopMode(int top);

 static int lexWithinMode(enum LexMode mode);

 static void lexPushMode(enum LexMode mode);

 static void enterProps(const char *s);

 static void enterAttr(const char *s1, const char *s2);

 static void enterValues(const char *value);

 #define mime_error yyerror

 void mime_error(char *s);

 void mime_error_(char *s);

 

 #line 189 "backend/vcc.y"
 typedef union {

     char *str;

     VObject *vobj;

     } YYSTYPE;
 #line 225 "y.tab.c"
 #define EQ 257
@@ -682,138 +682,144 @@ static char* lexLookaheadWord() {
     int curgetptr = 0;

     lexSkipWhite();

     lexClearToken();

     curgetptr = (int)lexBuf.getPtr;	// remember!

     while (len < (MAX_LEX_LOOKAHEAD_0)) {

 	c = lexGetc();

 	len++;

 	if (c == EOF || strchr("\t\n ;:=", c)) {

 	    lexAppendc(0);

 	    /* restore lookahead buf. */

 	    lexBuf.len += len;

 	    lexBuf.getPtr = curgetptr;

 	    return lexStr();

 	    }

         else

 	    lexAppendc(c);

 	}

     lexBuf.len += len;	/* char that has been moved to lookahead buffer */

     lexBuf.getPtr = curgetptr;

     return 0;

     }

 

 #ifdef _SUPPORT_LINE_FOLDING

 static void handleMoreRFC822LineBreak(int c) {

     /* suport RFC 822 line break in cases like

      *	ADR: foo;

      *    morefoo;

      *    more foo;

      */

     if (c == ';') {

 	int a;

 	lexSkipLookahead();

 	/* skip white spaces */

 	a = lexLookahead();

 	while (a == ' ' || a == '\t') {

 	    lexSkipLookahead();

 	    a = lexLookahead();

 	    }

 	if (a == '\n') {

 	    lexSkipLookahead();

 	    a = lexLookahead();

 	    if (a == ' ' || a == '\t') {

 		/* continuation, throw away all the \n and spaces read so

 		 * far

 		 */

 		lexSkipWhite();

 		lexPushLookaheadc(';');

 		}

 	    else {

 		lexPushLookaheadc('\n');

 		lexPushLookaheadc(';');

 		}

 	    }

 	else {

 	    lexPushLookaheadc(';');

 	    }

 	}

     }

 

 static char* lexGet1Value() {

     int c;

     lexSkipWhite();

     c = lexLookahead();

     lexClearToken();

-    while (c != EOF && c != ';') {

+    while (c != EOF && (c != ';' || !fieldedProp)) {

 	if (c == '\\' ) {

 	    int a;

 	    lexSkipLookahead();

 	    a = lexLookahead();

-	    if ( a != ';' ) {

-		lexAppendc('\\');

-	    } else {

+	    if ( a == ';' ) {

 		lexAppendc( ';' );

 		lexSkipLookahead();

+	    } else if ( a == '\n' ) {

+		lexAppendc( '\n' );

+		lexSkipLookahead();

+	    } else if ( a == '\\' ) {

+		lexAppendc( '\\' );

+		lexSkipLookahead();

+	    } else {

+		lexAppendc('\\');

 	    }

 	} else if (c == '\n') {

 	    int a;

 	    lexSkipLookahead();

 	    a  = lexLookahead();

 	    if (a == ' ' || a == '\t') {

 		lexAppendc(' ');

 		lexSkipLookahead();

 		}

 	    else {

 		lexPushLookaheadc('\n');

 		break;

 		}

 	    }

 	else {

 	    lexAppendc(c);

 	    lexSkipLookahead();

 	    }

 	c = lexLookahead();

 	}

     lexAppendc(0);

     handleMoreRFC822LineBreak(c);

     return c==EOF?0:lexStr();

     }

 #endif

 

 static int match_begin_name(int end) {

     char *n = lexLookaheadWord();

     int token = ID;

     if (n) {

 	if (!qstricmp(n,"vcard")) token = end?END_VCARD:BEGIN_VCARD;

 	else if (!qstricmp(n,"vcalendar")) token = end?END_VCAL:BEGIN_VCAL;

 	else if (!qstricmp(n,"vevent")) token = end?END_VEVENT:BEGIN_VEVENT;

 	else if (!qstricmp(n,"vtodo")) token = end?END_VTODO:BEGIN_VTODO;

 	deleteStr(n);

 	return token;

 	}

     return 0;

     }

 

 

 #ifdef INCLUDEMFC

 void initLex(const char *inputstring, unsigned long inputlen, CFile *inputfile)

 #else

 void initLex(const char *inputstring, unsigned long inputlen, FILE *inputfile)

 #endif

     {

     // initialize lex mode stack

     lexBuf.lexModeStack[lexBuf.lexModeStackTop=0] = L_NORMAL;

 

     // iniatialize lex buffer.

     lexBuf.inputString = (char*) inputstring;

     lexBuf.inputLen = inputlen;

     lexBuf.curPos = 0;

     lexBuf.inputFile = inputfile;

 

     lexBuf.len = 0;

     lexBuf.getPtr = 0;

 

     lexBuf.maxToken = MAXTOKEN;

     lexBuf.strs = (char*)malloc(MAXTOKEN);

     lexBuf.strsLen = 0;

 

     }

@@ -889,249 +895,262 @@ static char * lexGetDataFromBase64()
 		for (i = 0; i < 3; i++) {

 		    outBytes[2-i] = (unsigned char)(trip & 0xFF);

 		    trip >>= 8;

 		    }

 		numOut = 3 - pad;

 		if (bytesLen + numOut > bytesMax) {

 		    if (!bytes) {

 			bytesMax = 1024;

 			bytes = (unsigned char*)malloc((size_t)bytesMax);

 			}

 		    else {

 			bytesMax <<= 2;

 			oldBytes = bytes;

 			bytes = (unsigned char*)realloc(bytes,(size_t)bytesMax);

 			}

 		    if (bytes == 0) {

 			mime_error("out of memory while processing BASE64 data\n");

 			}

 		    }

 		if (bytes) {

 		    memcpy(bytes + bytesLen, outBytes, numOut);

 		    bytesLen += numOut;

 		    }

 		trip = 0;

 		quadIx = 0;

 		}

 	    }

 	} /* while */

     DBG_(("db: bytesLen = %d\n",  bytesLen));

     /* kludge: all this won't be necessary if we have tree form

 	representation */

     if (bytes) {

 	setValueWithSize(curProp,bytes,(unsigned int)bytesLen);

 	free(bytes);

 	}

     else if (oldBytes) {

 	setValueWithSize(curProp,oldBytes,(unsigned int)bytesLen);

 	free(oldBytes);

 	}

     return 0;

     }

 

 static int match_begin_end_name(int end) {

     int token;

     lexSkipWhite();

     if (lexLookahead() != ':') return ID;

     lexSkipLookahead();

     lexSkipWhite();

     token = match_begin_name(end);

     if (token == ID) {

 	lexPushLookaheadc(':');

 	DBG_(("db: ID '%s'\n", yylval.str));

 	return ID;

 	}

     else if (token != 0) {

 	lexSkipLookaheadWord();

 	deleteStr(yylval.str);

 	DBG_(("db: begin/end %d\n", token));

 	return token;

 	}

     return 0;

     }

 

 static char* lexGetQuotedPrintable()

-    {

-    int cur;

-

+{

+    int c;

+    lexSkipWhite();

+    c = lexLookahead();

     lexClearToken();

-    do {

-	cur = lexGetc();

-	switch (cur) {

-	    case '=': {

-		int c = 0;

-		int next[2];

-		int i;

-		for (i = 0; i < 2; i++) {

-		    next[i] = lexGetc();

-		    if (next[i] >= '0' && next[i] <= '9')

-			c = c * 16 + next[i] - '0';

-		    else if (next[i] >= 'A' && next[i] <= 'F')

-			c = c * 16 + next[i] - 'A' + 10;

-		    else

-			break;

-		    }

-		if (i == 0) {

-		    /* single '=' follow by LINESEP is continuation sign? */

-		    if (next[0] == '\n') {

-			++mime_lineNum;

-			}

-		    else {

-			lexPushLookaheadc('=');

-			goto EndString;

-			}

-		    }

-		else if (i == 1) {

-		    lexPushLookaheadc(next[1]);

-		    lexPushLookaheadc(next[0]);

-		    lexAppendc('=');

-		} else {

-		    lexAppendc(c);

-		    }

-		break;

-		} /* '=' */

-	    case '\n': {

-		lexPushLookaheadc('\n');

-		goto EndString;

-		}

-	    case (int)EOF:

-		break;

-	    default:

-		lexAppendc(cur);

-		break;

-	    } /* switch */

-	} while (cur != (int)EOF);

 

-EndString:

+    while (c != EOF && c != ';') {

+	if (c == '\n') {

+	    // break, leave '\n' on remaining chars.

+	    break;

+	} else if (c == '=') {

+	    int cur = 0;

+	    int next;

+

+	    lexSkipLookahead(); // skip '='

+	    next = lexLookahead();

+

+	    if (next == '\n') {

+		// skip and only skip the \n

+		lexSkipLookahead(); 

+		c = lexLookahead();

+		++mime_lineNum; // aid in error reporting

+		continue;

+	    } else if (next >= '0' && next <= '9') {

+		cur = next - '0';

+	    } else if (next >= 'A' && next <= 'F') {

+		cur = next - 'A' + 10;

+	    } else {

+		// we have been sent buggy stuff. doesn't matter

+		// what we do so long as we keep going.

+		// should probably spit an error here

+		lexSkipLookahead(); 

+		c = lexLookahead();

+		continue;

+	    }

+

+	    lexSkipLookahead(); // skip A-Z0-9

+	    next = lexLookahead();

+

+	    cur = cur * 16;

+	    // this time really just expecting 0-9A-F

+	    if (next >= '0' && next <= '9') {

+		cur += next - '0';

+	    } else if (next >= 'A' && next <= 'F') {

+		cur += next - 'A' + 10;

+	    } else {

+		// we have been sent buggy stuff. doesn't matter

+		// what we do so long as we keep going.

+		// should probably spit an error here

+		lexSkipLookahead(); 

+		c = lexLookahead();

+		continue;

+	    }

+

+	    // got a valid escaped =.  append it.

+	    lexSkipLookahead(); // skip second 0-9A-F

+	    lexAppendc(cur);

+	} else {

+	    lexSkipLookahead(); // skip whatever we just read.

+	    lexAppendc(c); // and append it.

+	}

+	c = lexLookahead();

+    }

     lexAppendc(0);

-    return lexStr();

-    } /* LexQuotedPrintable */

+    return c==EOF?0:lexStr();

+}

 

 static int yylex() {

 

     int lexmode = LEXMODE();

     if (lexmode == L_VALUES) {

 	int c = lexGetc();

-	if (c == ';') {

+	if (c == ';' && fieldedProp) {

 	    DBG_(("db: SEMICOLON\n"));

 	    lexPushLookaheadc(c);

 	    handleMoreRFC822LineBreak(c);

 	    lexSkipLookahead();

 	    return SEMICOLON;

 	    }

 	else if (strchr("\n",c)) {

 	    ++mime_lineNum;

 	    /* consume all line separator(s) adjacent to each other */

 	    c = lexLookahead();

 	    while (strchr("\n",c)) {

 		lexSkipLookahead();

 		c = lexLookahead();

 		++mime_lineNum;

 		}

 	    DBG_(("db: LINESEP\n"));

 	    return LINESEP;

 	    }

 	else {

 	    char *p = 0;

 	    lexPushLookaheadc(c);

 	    if (lexWithinMode(L_BASE64)) {

 		/* get each char and convert to bin on the fly... */

 		p = lexGetDataFromBase64();

 		yylval.str = p;

 		return STRING;

 		}

 	    else if (lexWithinMode(L_QUOTED_PRINTABLE)) {

 		p = lexGetQuotedPrintable();

 		}

 	    else {

 #ifdef _SUPPORT_LINE_FOLDING

 		p = lexGet1Value();

 #else

 		p = lexGetStrUntil(";\n");

 #endif

 		}

 	    if (p) {

 		DBG_(("db: STRING: '%s'\n", p));

 		yylval.str = p;

 		return STRING;

 		}

 	    else return 0;

 	    }

 	}

     else {

 	/* normal mode */

 	while (1) {

 	    int c = lexGetc();

 	    switch(c) {

 		case ':': {

 		    /* consume all line separator(s) adjacent to each other */

 		    /* ignoring linesep immediately after colon. */

+		    /* I don't see this in the spec, and it breaks null values -- WA

 		    c = lexLookahead();

 		    while (strchr("\n",c)) {

 			lexSkipLookahead();

 			c = lexLookahead();

 			++mime_lineNum;

 			}

+		    */

 		    DBG_(("db: COLON\n"));

 		    return COLON;

 		    }

 		case ';':

 		    DBG_(("db: SEMICOLON\n"));

 		    return SEMICOLON;

 		case '=':

 		    DBG_(("db: EQ\n"));

 		    return EQ;

 		/* ignore whitespace in this mode */

 		case '\t':

 		case ' ': continue;

 		case '\n': {

 		    ++mime_lineNum;

 		    continue;

 		    }

 		case EOF: return 0;

 		    break;

 		default: {

 		    lexPushLookaheadc(c);

 		    if (isalnum(c)) {

 			char *t = lexGetWord();

 			yylval.str = t;

 			if (!qstricmp(t, "begin")) {

 			    return match_begin_end_name(0);

 			    }

 			else if (!qstricmp(t,"end")) {

 			    return match_begin_end_name(1);

 			    }

 		        else {

 			    DBG_(("db: ID '%s'\n", t));

 			    return ID;

 			    }

 			}

 		    else {

 			/* unknow token */

 			return 0;

 			}

 		    break;

 		    }

 		}

 	    }

 	}

     return 0;

     }

 

 

 /***************************************************************************/

 /***							Public Functions						****/

 /***************************************************************************/

 

 static VObject* Parse_MIMEHelper()

     {

     ObjStackTop = -1;

     mime_numErrors = 0;

     mime_lineNum = 1;

     vObjList = 0;

     curObj = 0;

 

     if (yyparse() != 0)

 	return 0;

 

     finiLex();

     return vObjList;

@@ -1156,129 +1175,129 @@ DLLEXPORT(VObject*) Parse_MIME_FromFile(CFile *file)
     startPos = file->GetPosition();

     if (!(result = Parse_MIMEHelper()))

 	file->Seek(startPos, CFile::begin);

     return result;

     }

 

 #else

 

 VObject* Parse_MIME_FromFile(FILE *file)

     {

     VObject *result;	

     long startPos;

 

     initLex(0,(unsigned long)-1,file);

     startPos = ftell(file);

     if (!(result = Parse_MIMEHelper())) {

 	fseek(file,startPos,SEEK_SET);

 	}

     return result;

     }

 

 DLLEXPORT(VObject*) Parse_MIME_FromFileName(char *fname)

     {

     FILE *fp = fopen(fname,"r");

     if (fp) {

 	VObject* o = Parse_MIME_FromFile(fp);

 	fclose(fp);

 	return o;

 	}

     else {

 	char msg[80];

 	sprintf(msg, "can't open file '%s' for reading\n", fname);

 	mime_error_(msg);

 	return 0;

 	}

     }

 

 #endif

 

 /*-------------------------------------*/

 

 static MimeErrorHandler mimeErrorHandler;

 

 DLLEXPORT(void) registerMimeErrorHandler(MimeErrorHandler me)

     {

     mimeErrorHandler = me;

     }

 

 void mime_error(char *s)

     {

     char msg[256];

     if (mimeErrorHandler) {

 	sprintf(msg,"%s at line %d", s, mime_lineNum);

 	mimeErrorHandler(msg);

 	}

     }

 

 void mime_error_(char *s)

     {

     if (mimeErrorHandler) {

 	mimeErrorHandler(s);

 	}

     }

 

-#line 1221 "y.tab.c"
+#line 1240 "y.tab.c"
 #define YYABORT goto yyabort
 #define YYREJECT goto yyabort
 #define YYACCEPT goto yyaccept
 #define YYERROR goto yyerrlab
 int
 #if defined(__STDC__)
 yyparse(void)
 #else
 yyparse()
 #endif
 {
     register int yym, yyn, yystate;
 #if YYDEBUG
     register char *yys;
     extern char *getenv();
 
     if (yys = getenv("YYDEBUG"))
     {
         yyn = *yys;
         if (yyn >= '0' && yyn <= '9')
             yydebug = yyn - '0';
     }
 #endif
 
     yynerrs = 0;
     yyerrflag = 0;
     yychar = (-1);
 
     yyssp = yyss;
     yyvsp = yyvs;
     *yyssp = yystate = 0;
 
 yyloop:
     if ((yyn = yydefred[yystate]) != 0) goto yyreduce;
     if (yychar < 0)
     {
         if ((yychar = yylex()) < 0) yychar = 0;
 #if YYDEBUG
         if (yydebug)
         {
             yys = 0;
             if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
             if (!yys) yys = "illegal-symbol";
             printf("%sdebug: state %d, reading %d (%s)\n",
                     YYPREFIX, yystate, yychar, yys);
         }
 #endif
     }
     if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
             yyn <= YYTABLESIZE && yycheck[yyn] == yychar)
     {
 #if YYDEBUG
         if (yydebug)
             printf("%sdebug: state %d, shifting to state %d\n",
                     YYPREFIX, yystate, yytable[yyn]);
 #endif
         if (yyssp >= yyss + yystacksize - 1)
         {
             goto yyoverflow;
         }
         *++yyssp = yystate = yytable[yyn];
         *++yyvsp = yylval;
         yychar = (-1);
         if (yyerrflag > 0)  --yyerrflag;
@@ -1456,121 +1475,121 @@ break;
 case 31:
 #line 319 "backend/vcc.y"
 { if (!pushVObject(VCCalProp)) YYERROR; }
 break;
 case 32:
 #line 321 "backend/vcc.y"
 { yyval.vobj = popVObject(); }
 break;
 case 38:
 #line 336 "backend/vcc.y"
 {

 	lexPushMode(L_VEVENT);

 	if (!pushVObject(VCEventProp)) YYERROR;

 	}
 break;
 case 39:
 #line 342 "backend/vcc.y"
 {

 	lexPopMode(0);

 	popVObject();

 	}
 break;
 case 40:
 #line 347 "backend/vcc.y"
 {

 	lexPushMode(L_VEVENT);

 	if (!pushVObject(VCEventProp)) YYERROR;

 	}
 break;
 case 41:
 #line 352 "backend/vcc.y"
 {

 	lexPopMode(0);

 	popVObject();

 	}
 break;
 case 42:
 #line 360 "backend/vcc.y"
 {

 	lexPushMode(L_VTODO);

 	if (!pushVObject(VCTodoProp)) YYERROR;

 	}
 break;
 case 43:
 #line 366 "backend/vcc.y"
 {

 	lexPopMode(0);

 	popVObject();

 	}
 break;
 case 44:
 #line 371 "backend/vcc.y"
 {

 	lexPushMode(L_VTODO);

 	if (!pushVObject(VCTodoProp)) YYERROR;

 	}
 break;
 case 45:
 #line 376 "backend/vcc.y"
 {

 	lexPopMode(0);

 	popVObject();

 	}
 break;
-#line 1521 "y.tab.c"
+#line 1540 "y.tab.c"
     }
     yyssp -= yym;
     yystate = *yyssp;
     yyvsp -= yym;
     yym = yylhs[yyn];
     if (yystate == 0 && yym == 0)
     {
 #if YYDEBUG
         if (yydebug)
             printf("%sdebug: after reduction, shifting from state 0 to\
  state %d\n", YYPREFIX, YYFINAL);
 #endif
         yystate = YYFINAL;
         *++yyssp = YYFINAL;
         *++yyvsp = yyval;
         if (yychar < 0)
         {
             if ((yychar = yylex()) < 0) yychar = 0;
 #if YYDEBUG
             if (yydebug)
             {
                 yys = 0;
                 if (yychar <= YYMAXTOKEN) yys = yyname[yychar];
                 if (!yys) yys = "illegal-symbol";
                 printf("%sdebug: state %d, reading %d (%s)\n",
                         YYPREFIX, YYFINAL, yychar, yys);
             }
 #endif
         }
         if (yychar == 0) goto yyaccept;
         goto yyloop;
     }
     if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
             yyn <= YYTABLESIZE && yycheck[yyn] == yystate)
         yystate = yytable[yyn];
     else
         yystate = yydgoto[yym];
 #if YYDEBUG
     if (yydebug)
         printf("%sdebug: after reduction, shifting from state %d \
 to state %d\n", YYPREFIX, *yyssp, yystate);
 #endif
     if (yyssp >= yyss + yystacksize - 1)
     {
         goto yyoverflow;
     }
     *++yyssp = yystate;
     *++yyvsp = yyval;
     goto yyloop;
 yyoverflow:
     yyerror("yacc stack overflow");
 yyabort:
     return (1);
 yyaccept:
     return (0);
 }