2 * Copyright (c) 1989 The Regents of the University of California.
5 * This code is derived from software contributed to Berkeley by
8 * Redistribution and use in source and binary forms, with or without
9 * modification, are permitted provided that the following conditions
11 * 1. Redistributions of source code must retain the above copyright
12 * notice, this list of conditions and the following disclaimer.
13 * 2. Redistributions in binary form must reproduce the above copyright
14 * notice, this list of conditions and the following disclaimer in the
15 * documentation and/or other materials provided with the distribution.
16 * 3. All advertising materials mentioning features or use of this software
17 * must display the following acknowledgement:
18 * This product includes software developed by the University of
19 * California, Berkeley and its contributors.
20 * 4. Neither the name of the University nor the names of its contributors
21 * may be used to endorse or promote products derived from this software
22 * without specific prior written permission.
24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 * @(#)skeleton.c 5.8 (Berkeley) 4/29/95
38 * $FreeBSD: src/usr.bin/yacc/skeleton.c,v 1.28.2.1 2001/07/19 05:46:39 peter Exp $
39 * $DragonFly: src/usr.bin/yacc/skeleton.c,v 1.6 2006/01/22 13:38:50 swildner Exp $
44 /* The definition of yysccsid in the banner should be replaced with */
45 /* a #pragma ident directive if the target C compiler supports */
46 /* #pragma ident directives. */
48 /* If the skeleton is changed, the banner should be changed so that */
49 /* the altered version can be easily distinguished from the original. */
51 /* The #defines included with the banner are there because they are */
52 /* useful in subsequent code. The macros #defined in the header or */
53 /* the body either are not useful outside of semantic actions or */
54 /* are conditional. */
56 const char *banner
[] = {
57 "#include <stdlib.h>",
61 "#define YYLEX yylex()",
63 "#define yyclearin (yychar=(YYEMPTY))",
64 "#define yyerrok (yyerrflag=0)",
65 "#define YYRECOVERING() (yyerrflag!=0)",
66 "#if defined(__cplusplus) || __STDC__",
67 "static int yygrowstack(void);",
69 "static int yygrowstack();",
74 const char *tables
[] = {
75 "extern const short yylhs[];",
76 "extern const short yylen[];",
77 "extern const short yydefred[];",
78 "extern const short yydgoto[];",
79 "extern const short yysindex[];",
80 "extern const short yyrindex[];",
81 "extern const short yygindex[];",
82 "extern const short yytable[];",
83 "extern const short yycheck[];",
85 "extern char *yyname[];",
86 "extern char *yyrule[];",
91 const char *header
[] = {
97 "#define YYMAXDEPTH YYSTACKSIZE",
100 "#define YYSTACKSIZE YYMAXDEPTH",
102 "#define YYSTACKSIZE 10000",
103 "#define YYMAXDEPTH 10000",
106 "#define YYINITSTACKSIZE 200",
122 const char *body
[] = {
123 "/* allocate initial stack or double stack size, up to YYMAXDEPTH */",
124 "static int yygrowstack(void)",
130 " if ((newsize = yystacksize) == 0)",
131 " newsize = YYINITSTACKSIZE;",
132 " else if (newsize >= YYMAXDEPTH)",
134 " else if ((newsize *= 2) > YYMAXDEPTH)",
135 " newsize = YYMAXDEPTH;",
136 " i = yyssp - yyss;",
137 " newss = yyss ? (short *)realloc(yyss, newsize * sizeof *newss) :",
138 " (short *)malloc(newsize * sizeof *newss);",
139 " if (newss == NULL)",
142 " yyssp = newss + i;",
143 " newvs = yyvs ? (YYSTYPE *)realloc(yyvs, newsize * sizeof *newvs) :",
144 " (YYSTYPE *)malloc(newsize * sizeof *newvs);",
145 " if (newvs == NULL)",
148 " yyvsp = newvs + i;",
149 " yystacksize = newsize;",
150 " yysslim = yyss + newsize - 1;",
154 "#define YYABORT goto yyabort",
155 "#define YYREJECT goto yyabort",
156 "#define YYACCEPT goto yyaccept",
157 "#define YYERROR goto yyerrlab",
159 "#ifndef YYPARSE_PARAM",
160 "#if defined(__cplusplus) || __STDC__",
161 "#define YYPARSE_PARAM_ARG void",
162 "#define YYPARSE_PARAM_DECL",
163 "#else /* ! ANSI-C/C++ */",
164 "#define YYPARSE_PARAM_ARG",
165 "#define YYPARSE_PARAM_DECL",
166 "#endif /* ANSI-C/C++ */",
167 "#else /* YYPARSE_PARAM */",
168 "#ifndef YYPARSE_PARAM_TYPE",
169 "#define YYPARSE_PARAM_TYPE void *",
171 "#if defined(__cplusplus) || __STDC__",
172 "#define YYPARSE_PARAM_ARG YYPARSE_PARAM_TYPE YYPARSE_PARAM",
173 "#define YYPARSE_PARAM_DECL",
174 "#else /* ! ANSI-C/C++ */",
175 "#define YYPARSE_PARAM_ARG YYPARSE_PARAM",
176 "#define YYPARSE_PARAM_DECL YYPARSE_PARAM_TYPE YYPARSE_PARAM;",
177 "#endif /* ANSI-C/C++ */",
178 "#endif /* ! YYPARSE_PARAM */",
181 "yyparse (YYPARSE_PARAM_ARG)",
182 " YYPARSE_PARAM_DECL",
184 " int yym, yyn, yystate;",
188 " if ((yys = getenv(\"YYDEBUG\")))",
191 " if (yyn >= '0' && yyn <= '9')",
192 " yydebug = yyn - '0';",
200 " if (yyss == NULL && yygrowstack()) goto yyoverflow;",
203 " *yyssp = yystate = 0;",
206 " if ((yyn = yydefred[yystate])) goto yyreduce;",
209 " if ((yychar = yylex()) < 0) yychar = 0;",
214 " if (yychar <= YYMAXTOKEN) yys = yyname[yychar];",
215 " if (!yys) yys = \"illegal-symbol\";",
216 " printf(\"%sdebug: state %d, reading %d (%s)\\n\",",
217 " YYPREFIX, yystate, yychar, yys);",
221 " if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&",
222 " yyn <= YYTABLESIZE && yycheck[yyn] == yychar)",
226 " printf(\"%sdebug: state %d, shifting to state %d\\n\",",
227 " YYPREFIX, yystate, yytable[yyn]);",
229 " if (yyssp >= yysslim && yygrowstack())",
233 " *++yyssp = yystate = yytable[yyn];",
234 " *++yyvsp = yylval;",
236 " if (yyerrflag > 0) --yyerrflag;",
239 " if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&",
240 " yyn <= YYTABLESIZE && yycheck[yyn] == yychar)",
242 " yyn = yytable[yyn];",
245 " if (yyerrflag) goto yyinrecovery;",
246 "#if defined(lint) || defined(__GNUC__)",
250 " yyerror(\"syntax error\");",
251 "#if defined(lint) || defined(__GNUC__)",
257 " if (yyerrflag < 3)",
262 " if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE) >= 0 &&",
263 " yyn <= YYTABLESIZE && yycheck[yyn] == YYERRCODE)",
267 " printf(\"%sdebug: state %d, error recovery shifting\\",
268 " to state %d\\n\", YYPREFIX, *yyssp, yytable[yyn]);",
270 " if (yyssp >= yysslim && yygrowstack())",
274 " *++yyssp = yystate = yytable[yyn];",
275 " *++yyvsp = yylval;",
282 " printf(\"%sdebug: error recovery discarding state %d\
284 " YYPREFIX, *yyssp);",
286 " if (yyssp <= yyss) goto yyabort;",
294 " if (yychar == 0) goto yyabort;",
299 " if (yychar <= YYMAXTOKEN) yys = yyname[yychar];",
300 " if (!yys) yys = \"illegal-symbol\";",
301 " printf(\"%sdebug: state %d, error recovery discards token %d\
303 " YYPREFIX, yystate, yychar, yys);",
312 " printf(\"%sdebug: state %d, reducing by rule %d (%s)\\n\",",
313 " YYPREFIX, yystate, yyn, yyrule[yyn]);",
315 " yym = yylen[yyn];",
316 " yyval = yyvsp[1-yym];",
322 const char *trailer
[] = {
325 " yystate = *yyssp;",
327 " yym = yylhs[yyn];",
328 " if (yystate == 0 && yym == 0)",
332 " printf(\"%sdebug: after reduction, shifting from state 0 to\\",
333 " state %d\\n\", YYPREFIX, YYFINAL);",
335 " yystate = YYFINAL;",
336 " *++yyssp = YYFINAL;",
337 " *++yyvsp = yyval;",
340 " if ((yychar = yylex()) < 0) yychar = 0;",
345 " if (yychar <= YYMAXTOKEN) yys = yyname[yychar];",
346 " if (!yys) yys = \"illegal-symbol\";",
347 " printf(\"%sdebug: state %d, reading %d (%s)\\n\",",
348 " YYPREFIX, YYFINAL, yychar, yys);",
352 " if (yychar == 0) goto yyaccept;",
355 " if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&",
356 " yyn <= YYTABLESIZE && yycheck[yyn] == yystate)",
357 " yystate = yytable[yyn];",
359 " yystate = yydgoto[yym];",
362 " printf(\"%sdebug: after reduction, shifting from state %d \\",
363 "to state %d\\n\", YYPREFIX, *yyssp, yystate);",
365 " if (yyssp >= yysslim && yygrowstack())",
369 " *++yyssp = yystate;",
370 " *++yyvsp = yyval;",
373 " yyerror(\"yacc stack overflow\");",
384 write_section(const char **section
)
392 for (i
= 0; (s
= section
[i
]); ++i
)