lexer.c

这是关于RFC3261实现sip的源代码

#line 117 "lexer.l"
{return TK_SIPSLOTDIS;}
	YY_BREAK
case 61:
YY_RULE_SETUP
#line 118 "lexer.l"
{return TK_QOBJECT;}
	YY_BREAK
case 62:
YY_RULE_SETUP
#line 119 "lexer.l"
{return TK_ELLIPSIS;}
	YY_BREAK
case 63:
YY_RULE_SETUP
#line 122 "lexer.l"
{				/* Ignore whitespace. */
	;
}
	YY_BREAK
case 64:
/* rule 64 can match eol */
YY_RULE_SETUP
#line 126 "lexer.l"
{				/* Maintain the line number. */
	++inputFileStack[currentFile].lineno;

	if (codeIdx == 0)
	{
		BEGIN code;
	}
}
	YY_BREAK
case 65:
YY_RULE_SETUP
#line 135 "lexer.l"
{			/* Ignore C++ style comments. */
	;
}
	YY_BREAK
case 66:
YY_RULE_SETUP
#line 140 "lexer.l"
{			/* A signed decimal number. */
	yylval.number = strtol(yytext,NULL,0);
	return TK_NUMBER;
}
	YY_BREAK
case 67:
YY_RULE_SETUP
#line 146 "lexer.l"
{/* A floating point number. */
	yylval.real = strtod(yytext,NULL);
	return TK_REAL;
}
	YY_BREAK
case 68:
YY_RULE_SETUP
#line 152 "lexer.l"
{		/* An unsigned hexadecimal number. */
	yylval.number = strtol(yytext,NULL,16);
	return TK_NUMBER;
}
	YY_BREAK
case 69:
YY_RULE_SETUP
#line 158 "lexer.l"
{	/* An identifier name. */
	yylval.text = sipStrdup(yytext);
	return TK_NAME;
}
	YY_BREAK
case 70:
YY_RULE_SETUP
#line 164 "lexer.l"
{	/* A relative pathname. */
	yylval.text = sipStrdup(yytext);
	return TK_PATHNAME;
}
	YY_BREAK
case 71:
/* rule 71 can match eol */
YY_RULE_SETUP
#line 170 "lexer.l"
{		/* A double-quoted string. */
	char *dp, *sp;

	/* Copy the string without the quotes. */

	yylval.text = sipMalloc(strlen(yytext) + 1);

	dp = yylval.text;
	sp = yytext;

	while (*sp != '\0')
	{
		if (*sp != '"')
			*dp++ = *sp;

		++sp;
	}

	*dp = '\0';

	return TK_STRING;
}
	YY_BREAK
case 72:
/* rule 72 can match eol */
YY_RULE_SETUP
#line 194 "lexer.l"
{		/* A single-quoted character. */
	if (strlen(yytext) != 3)
		fatallex("Exactly one character expected between single quotes");

	yylval.qchar = yytext[1];

	return TK_QCHAR;
}
	YY_BREAK
case 73:
YY_RULE_SETUP
#line 204 "lexer.l"
{				/* Ignore C-style comments. */
	BEGIN ccomment;
}
	YY_BREAK
case 74:
/* rule 74 can match eol */
YY_RULE_SETUP
#line 207 "lexer.l"
{
	++inputFileStack[currentFile].lineno;
}
	YY_BREAK
case 75:
YY_RULE_SETUP
#line 210 "lexer.l"
{
	BEGIN INITIAL;
}
	YY_BREAK
case 76:
YY_RULE_SETUP
#line 213 "lexer.l"
{
	;
}
	YY_BREAK
case 77:
YY_RULE_SETUP
#line 218 "lexer.l"
{			/* The software license. */
	codeIdx = 0;
	return TK_COPYING;
}
	YY_BREAK
case 78:
YY_RULE_SETUP
#line 223 "lexer.l"
{		/* The start of a from-type code block. */
	codeIdx = 0;
	return TK_FROMTYPE;
}
	YY_BREAK
case 79:
YY_RULE_SETUP
#line 228 "lexer.l"
{		/* The start of a to-type code block. */
	codeIdx = 0;
	return TK_TOTYPE;
}
	YY_BREAK
case 80:
YY_RULE_SETUP
#line 233 "lexer.l"
{	/* The start of a to-sub-class code block. */
	codeIdx = 0;
	return TK_TOSUBCLASS;
}
	YY_BREAK
case 81:
YY_RULE_SETUP
#line 238 "lexer.l"
{		/* The start of a module header code block. */
	codeIdx = 0;
	return TK_MODHEADERCODE;
}
	YY_BREAK
case 82:
YY_RULE_SETUP
#line 243 "lexer.l"
{		/* The start of a type header code block. */
	codeIdx = 0;
	return TK_TYPEHEADERCODE;
}
	YY_BREAK
case 83:
YY_RULE_SETUP
#line 248 "lexer.l"
{	/* The start of a pre-initialisation code block. */
	codeIdx = 0;
	return TK_PREINITCODE;
}
	YY_BREAK
case 84:
YY_RULE_SETUP
#line 253 "lexer.l"
{	/* The start of a post-initialisation code block. */
	codeIdx = 0;
	return TK_POSTINITCODE;
}
	YY_BREAK
case 85:
YY_RULE_SETUP
#line 258 "lexer.l"
{			/* The start of a module code block. */
	codeIdx = 0;
	return TK_MODCODE;
}
	YY_BREAK
case 86:
YY_RULE_SETUP
#line 263 "lexer.l"
{			/* The start of a type code block. */
	codeIdx = 0;
	return TK_TYPECODE;
}
	YY_BREAK
case 87:
YY_RULE_SETUP
#line 268 "lexer.l"
{			/* The start of a C++ method code block. */
	codeIdx = 0;
	return TK_METHODCODE;
}
	YY_BREAK
case 88:
YY_RULE_SETUP
#line 273 "lexer.l"
{		/* The start of a C++ virtual code block. */
	codeIdx = 0;
	return TK_VIRTUALCATCHERCODE;
}
	YY_BREAK
case 89:
YY_RULE_SETUP
#line 278 "lexer.l"
{		/* The start of a traverse code block. */
	codeIdx = 0;
	return TK_TRAVERSECODE;
}
	YY_BREAK
case 90:
YY_RULE_SETUP
#line 283 "lexer.l"
{			/* The start of a clear code block. */
	codeIdx = 0;
	return TK_CLEARCODE;
}
	YY_BREAK
case 91:
YY_RULE_SETUP
#line 288 "lexer.l"
{		/* The start of a read buffer code block. */
	codeIdx = 0;
	return TK_READBUFFERCODE;
}
	YY_BREAK
case 92:
YY_RULE_SETUP
#line 293 "lexer.l"
{	/* The start of a write buffer code block. */
	codeIdx = 0;
	return TK_WRITEBUFFERCODE;
}
	YY_BREAK
case 93:
YY_RULE_SETUP
#line 298 "lexer.l"
{		/* The start of a segment count code block. */
	codeIdx = 0;
	return TK_SEGCOUNTCODE;
}
	YY_BREAK
case 94:
YY_RULE_SETUP
#line 303 "lexer.l"
{		/* The start of a char buffer code block. */
	codeIdx = 0;
	return TK_CHARBUFFERCODE;
}
	YY_BREAK
case 95:
YY_RULE_SETUP
#line 308 "lexer.l"
{		/* The start of a pre-Python code block. */
	codeIdx = 0;
	return TK_PREPYCODE;
}
	YY_BREAK
case 96:
YY_RULE_SETUP
#line 313 "lexer.l"
{			/* The start of a raise exception code block. */
	codeIdx = 0;
	return TK_RAISECODE;
}
	YY_BREAK
case 97:
YY_RULE_SETUP
#line 318 "lexer.l"
{				/* The start of a documentation block. */
	codeIdx = 0;
	return TK_DOC;
}
	YY_BREAK
case 98:
YY_RULE_SETUP
#line 323 "lexer.l"
{			/* The start of an exported documentation block. */
	codeIdx = 0;
	return TK_EXPORTEDDOC;
}
	YY_BREAK
case 99:
YY_RULE_SETUP
#line 328 "lexer.l"
{			/* The start of a Makefile code block. */
	codeIdx = 0;
	return TK_MAKEFILE;
}
	YY_BREAK
case 100:
YY_RULE_SETUP
#line 333 "lexer.l"
{			/* The start of an access code block. */
	codeIdx = 0;
	return TK_ACCESSCODE;
}
	YY_BREAK
case 101:
YY_RULE_SETUP
#line 338 "lexer.l"
{			/* The start of a get code block. */
	codeIdx = 0;
	return TK_GETCODE;
}
	YY_BREAK
case 102:
YY_RULE_SETUP
#line 343 "lexer.l"
{			/* The start of a set code block. */
	codeIdx = 0;
	return TK_SETCODE;
}
	YY_BREAK
case 103:
YY_RULE_SETUP
#line 348 "lexer.l"
{			/* The end of a code block. */
	BEGIN INITIAL;
	codeIdx = -1;
	return TK_END;
}
	YY_BREAK
case 104:
/* rule 104 can match eol */
YY_RULE_SETUP
#line 354 "lexer.l"
{			/* The end of a code line . */
	struct inputFile *ifp;

	codeLine[codeIdx] = '\n';
	codeLine[codeIdx + 1] = '\0';
	codeIdx = 0;

	ifp = &inputFileStack[currentFile];

	yylval.codeb = sipMalloc(sizeof (codeBlock));

	yylval.codeb -> frag = sipStrdup(codeLine);
	yylval.codeb -> linenr = ifp -> lineno++;
	yylval.codeb -> filename = sipStrdup(ifp -> name);
	yylval.codeb -> next = NULL;

	return TK_CODELINE;
}
	YY_BREAK
case 105:
YY_RULE_SETUP
#line 373 "lexer.l"
{			/* The contents of a code line. */
	if (codeIdx == MAX_CODE_LINE_LENGTH)
		fatallex("Line is too long");

	codeLine[codeIdx++] = yytext[0];
}
	YY_BREAK
case 106:
YY_RULE_SETUP
#line 380 "lexer.l"
{				/* Anything else is returned as is. */
	return yytext