Bug Summary

File:src/usr.bin/lex/obj/parse.c
Warning:line 687, column 12
Use of zero-allocated memory

Annotated Source Code

Press '?' to see keyboard shortcuts

clang -cc1 -cc1 -triple amd64-unknown-openbsd7.0 -analyze -disable-free -disable-llvm-verifier -discard-value-names -main-file-name parse.c -analyzer-store=region -analyzer-opt-analyze-nested-blocks -analyzer-checker=core -analyzer-checker=apiModeling -analyzer-checker=unix -analyzer-checker=deadcode -analyzer-checker=security.insecureAPI.UncheckedReturn -analyzer-checker=security.insecureAPI.getpw -analyzer-checker=security.insecureAPI.gets -analyzer-checker=security.insecureAPI.mktemp -analyzer-checker=security.insecureAPI.mkstemp -analyzer-checker=security.insecureAPI.vfork -analyzer-checker=nullability.NullPassedToNonnull -analyzer-checker=nullability.NullReturnedFromNonnull -analyzer-output plist -w -setup-static-analyzer -mrelocation-model pic -pic-level 1 -pic-is-pie -mframe-pointer=all -relaxed-aliasing -fno-rounding-math -mconstructor-aliases -munwind-tables -target-cpu x86-64 -target-feature +retpoline-indirect-calls -target-feature +retpoline-indirect-branches -tune-cpu generic -debugger-tuning=gdb -fcoverage-compilation-dir=/usr/src/usr.bin/lex/obj -resource-dir /usr/local/lib/clang/13.0.0 -I . -I /usr/src/usr.bin/lex -D HAVE_CONFIG_H -internal-isystem /usr/local/lib/clang/13.0.0/include -internal-externc-isystem /usr/include -O2 -fdebug-compilation-dir=/usr/src/usr.bin/lex/obj -ferror-limit 19 -fwrapv -D_RET_PROTECTOR -ret-protector -fgnuc-version=4.2.1 -vectorize-loops -vectorize-slp -fno-builtin-malloc -fno-builtin-calloc -fno-builtin-realloc -fno-builtin-valloc -fno-builtin-free -fno-builtin-strdup -fno-builtin-strndup -analyzer-output=html -faddrsig -D__GCC_HAVE_DWARF2_CFI_ASM=1 -o /home/ben/Projects/vmm/scan-build/2022-01-12-194120-40624-1 -x c parse.c
1#include <stdlib.h>
2#include <string.h>
3#define YYBYACC1 1
4#define YYMAJOR1 1
5#define YYMINOR9 9
6#define YYLEXyylex() yylex()
7#define YYEMPTY-1 -1
8#define yyclearin(yychar=(-1)) (yychar=(YYEMPTY-1))
9#define yyerrok(yyerrflag=0) (yyerrflag=0)
10#define YYRECOVERING()(yyerrflag!=0) (yyerrflag!=0)
11#define YYPREFIX"yy" "yy"
12#line 37 "/usr/src/usr.bin/lex/parse.y"
13/* Copyright (c) 1990 The Regents of the University of California. */
14/* All rights reserved. */
15
16/* This code is derived from software contributed to Berkeley by */
17/* Vern Paxson. */
18
19/* The United States Government has rights in this work pursuant */
20/* to contract no. DE-AC03-76SF00098 between the United States */
21/* Department of Energy and the University of California. */
22
23/* This file is part of flex. */
24
25/* Redistribution and use in source and binary forms, with or without */
26/* modification, are permitted provided that the following conditions */
27/* are met: */
28
29/* 1. Redistributions of source code must retain the above copyright */
30/* notice, this list of conditions and the following disclaimer. */
31/* 2. Redistributions in binary form must reproduce the above copyright */
32/* notice, this list of conditions and the following disclaimer in the */
33/* documentation and/or other materials provided with the distribution. */
34
35/* Neither the name of the University nor the names of its contributors */
36/* may be used to endorse or promote products derived from this software */
37/* without specific prior written permission. */
38
39/* THIS SOFTWARE IS PROVIDED ``AS IS'' AND WITHOUT ANY EXPRESS OR */
40/* IMPLIED WARRANTIES, INCLUDING, WITHOUT LIMITATION, THE IMPLIED */
41/* WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR */
42/* PURPOSE. */
43
44#include "flexdef.h"
45#include "tables.h"
46
47int pat, scnum, eps, headcnt, trailcnt, lastchar, i, rulelen;
48int trlcontxt, xcluflg, currccl, cclsorted, varlength, variable_trail_rule;
49
50int *scon_stk;
51int scon_stk_ptr;
52
53static int madeany = false0; /* whether we've made the '.' character class */
54static int ccldot, cclany;
55int previous_continued_action; /* whether the previous rule's action was '|' */
56
57#define format_warn3(fmt, a1, a2)do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,(fmt), (a1), (
a2) ); warn( fw3_msg ); }while(0) \
58 do{ \
59 char fw3_msg[MAXLINE2048];\
60 snprintf( fw3_msg, MAXLINE2048,(fmt), (a1), (a2) );\
61 warn( fw3_msg );\
62 }while(0)
63
64/* Expand a POSIX character class expression. */
65#define CCL_EXPR(func)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && func(c) ) ccladd( currccl, c ); }while(0) \
66 do{ \
67 int c; \
68 for ( c = 0; c < csize; ++c ) \
69 if ( isascii(c)((c) <= 0177) && func(c) ) \
70 ccladd( currccl, c ); \
71 }while(0)
72
73/* negated class */
74#define CCL_NEG_EXPR(func)do{ int c; for ( c = 0; c < csize; ++c ) if ( !func(c) ) ccladd
( currccl, c ); }while(0) \
75 do{ \
76 int c; \
77 for ( c = 0; c < csize; ++c ) \
78 if ( !func(c) ) \
79 ccladd( currccl, c ); \
80 }while(0)
81
82/* On some over-ambitious machines, such as DEC Alpha's, the default
83 * token type is "long" instead of "int"; this leads to problems with
84 * declaring yylval in flexdef.h. But so far, all the yacc's I've seen
85 * wrap their definitions of YYSTYPE with "#ifndef YYSTYPE"'s, so the
86 * following should ensure that the default token type is "int".
87 */
88#define YYSTYPEint int
89
90#line 91 "parse.c"
91#define CHAR257 257
92#define NUMBER258 258
93#define SECTEND259 259
94#define SCDECL260 260
95#define XSCDECL261 261
96#define NAME262 262
97#define PREVCCL263 263
98#define EOF_OP264 264
99#define OPTION_OP265 265
100#define OPT_OUTFILE266 266
101#define OPT_PREFIX267 267
102#define OPT_YYCLASS268 268
103#define OPT_HEADER269 269
104#define OPT_EXTRA_TYPE270 270
105#define OPT_TABLES271 271
106#define CCE_ALNUM272 272
107#define CCE_ALPHA273 273
108#define CCE_BLANK274 274
109#define CCE_CNTRL275 275
110#define CCE_DIGIT276 276
111#define CCE_GRAPH277 277
112#define CCE_LOWER278 278
113#define CCE_PRINT279 279
114#define CCE_PUNCT280 280
115#define CCE_SPACE281 281
116#define CCE_UPPER282 282
117#define CCE_XDIGIT283 283
118#define CCE_NEG_ALNUM284 284
119#define CCE_NEG_ALPHA285 285
120#define CCE_NEG_BLANK286 286
121#define CCE_NEG_CNTRL287 287
122#define CCE_NEG_DIGIT288 288
123#define CCE_NEG_GRAPH289 289
124#define CCE_NEG_LOWER290 290
125#define CCE_NEG_PRINT291 291
126#define CCE_NEG_PUNCT292 292
127#define CCE_NEG_SPACE293 293
128#define CCE_NEG_UPPER294 294
129#define CCE_NEG_XDIGIT295 295
130#define CCL_OP_DIFF296 296
131#define CCL_OP_UNION297 297
132#define BEGIN_REPEAT_POSIX298 298
133#define END_REPEAT_POSIX299 299
134#define BEGIN_REPEAT_FLEX300 300
135#define END_REPEAT_FLEX301 301
136#define YYERRCODE256 256
137const short yylhs[] =
138 { -1,
139 0, 1, 2, 2, 2, 2, 3, 6, 6, 7,
140 7, 7, 8, 9, 9, 10, 10, 10, 10, 10,
141 10, 4, 4, 4, 5, 12, 12, 12, 12, 14,
142 11, 11, 11, 15, 15, 15, 16, 13, 13, 13,
143 13, 18, 18, 17, 19, 19, 19, 19, 19, 20,
144 20, 20, 20, 20, 20, 20, 20, 20, 20, 20,
145 20, 21, 21, 21, 23, 23, 24, 24, 24, 24,
146 25, 25, 25, 25, 25, 25, 25, 25, 25, 25,
147 25, 25, 25, 25, 25, 25, 25, 25, 25, 25,
148 25, 25, 25, 25, 22, 22,
149};
150const short yylen[] =
151 { 2,
152 5, 0, 3, 2, 0, 1, 1, 1, 1, 2,
153 1, 1, 2, 2, 0, 3, 3, 3, 3, 3,
154 3, 5, 5, 0, 0, 2, 1, 1, 1, 0,
155 4, 3, 0, 3, 1, 1, 1, 2, 3, 2,
156 1, 3, 1, 2, 2, 1, 6, 5, 4, 2,
157 2, 2, 6, 5, 4, 1, 1, 1, 3, 3,
158 1, 3, 3, 1, 3, 4, 4, 2, 2, 0,
159 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
160 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
161 1, 1, 1, 1, 2, 0,
162};
163const short yydefred[] =
164 { 2,
165 0, 0, 6, 0, 7, 8, 9, 15, 24, 0,
166 4, 0, 0, 12, 11, 0, 0, 0, 0, 0,
167 0, 0, 14, 0, 1, 0, 10, 0, 0, 0,
168 0, 0, 0, 0, 0, 24, 0, 16, 18, 19,
169 20, 17, 21, 32, 36, 37, 0, 35, 0, 29,
170 61, 58, 28, 0, 56, 96, 0, 0, 0, 27,
171 0, 0, 0, 0, 0, 64, 31, 0, 23, 26,
172 0, 0, 70, 0, 22, 0, 40, 0, 44, 0,
173 0, 0, 50, 51, 52, 0, 0, 34, 95, 59,
174 60, 0, 0, 71, 72, 73, 74, 75, 76, 77,
175 78, 79, 80, 82, 81, 83, 84, 85, 86, 87,
176 88, 93, 89, 90, 91, 94, 92, 65, 69, 39,
177 0, 0, 0, 62, 63, 66, 0, 49, 0, 55,
178 0, 67, 0, 48, 0, 54, 47, 53,
179};
180const short yydgoto[] =
181 { 1,
182 2, 4, 9, 13, 25, 10, 16, 11, 12, 23,
183 26, 59, 60, 35, 47, 48, 61, 62, 63, 64,
184 65, 71, 66, 74, 119,
185};
186const short yysindex[] =
187 { 0,
188 0, -222, 0, -155, 0, 0, 0, 0, 0, -215,
189 0, -123, 6, 0, 0, -193, 10, 21, 26, 31,
190 35, 37, 0, 59, 0, -44, 0, -147, -145, -140,
191 -133, -132, -129, 75, -214, 0, -19, 0, 0, 0,
192 0, 0, 0, 0, 0, 0, 23, 0, -48, 0,
193 0, 0, 0, -17, 0, 0, -17, 27, 128, 0,
194 -17, -1, -30, -41, -189, 0, 0, -121, 0, 0,
195 -31, -34, 0, -87, 0, -25, 0, -17, 0, -109,
196 -41, -108, 0, 0, 0, 60, 60, 0, 0, 0,
197 0, 46, 107, 0, 0, 0, 0, 0, 0, 0,
198 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
199 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
200 -30, -36, -39, 0, 0, 0, -104, 0, -219, 0,
201 -238, 0, -144, 0, -143, 0, 0, 0,};
202const short yyrindex[] =
203 { 0,
204 0, -141, 0, 0, 0, 0, 0, 0, 0, 0,
205 0, -134, 9, 0, 0, -125, 0, 0, 0, 0,
206 0, 0, 0, -178, 0, 22, 0, 0, 0, 0,
207 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
208 0, 0, 0, 0, 0, 0, 0, 0, -21, 0,
209 0, 0, 0, 0, 0, 0, 0, 85, 0, 0,
210 0, 144, 47, 4, -10, 0, 0, 0, 0, 0,
211 0, 0, 0, 0, 0, 146, 0, 0, 0, 0,
212 18, 0, 0, 0, 0, 0, 0, 0, 0, 0,
213 0, 0, 124, 0, 0, 0, 0, 0, 0, 0,
214 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
215 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
216 50, 0, 0, 0, 0, 0, 0, 0, 0, 0,
217 0, 0, 0, 0, 0, 0, 0, 0,};
218const short yygindex[] =
219 { 0,
220 0, 0, 0, 121, 133, 0, 0, 0, 0, 0,
221 0, 0, 106, 0, 0, 93, 0, 32, 84, -45,
222 0, 0, 25, 90, 0,
223};
224#define YYTABLESIZE419 419
225const short yytable[] =
226 { 57,
227 83, 84, 90, 56, 131, 118, 91, 129, 25, 57,
228 120, 24, 33, 46, 56, 55, 56, 81, 33, 135,
229 57, 85, 57, 57, 33, 57, 55, 45, 55, 57,
230 57, 57, 57, 3, 77, 57, 57, 46, 133, 46,
231 14, 45, 33, 46, 46, 79, 15, 46, 33, 46,
232 46, 45, 57, 45, 33, 25, 43, 45, 45, 42,
233 58, 25, 136, 45, 45, 24, 68, 25, 27, 33,
234 28, 58, 33, 58, 54, 81, 69, 30, 36, 134,
235 57, 29, 43, 30, 67, 42, 30, 43, 72, 78,
236 42, 31, 76, 43, 46, 32, 42, 33, 78, 33,
237 34, 33, 33, 5, 6, 7, 86, 87, 45, 8,
238 124, 125, 25, 57, 38, 25, 39, 5, 5, 5,
239 73, 40, 78, 5, 13, 13, 13, 46, 41, 42,
240 13, 33, 43, 3, 3, 3, 44, 75, 126, 3,
241 46, 45, 17, 18, 19, 20, 21, 22, 122, 123,
242 58, 127, 132, 41, 137, 38, 49, 138, 37, 70,
243 88, 121, 92, 0, 0, 0, 0, 0, 0, 93,
244 43, 0, 0, 42, 0, 0, 0, 70, 0, 0,
245 0, 0, 0, 0, 94, 95, 96, 97, 98, 99,
246 100, 101, 102, 103, 104, 105, 106, 107, 108, 109,
247 110, 111, 112, 113, 114, 115, 116, 117, 0, 0,
248 0, 0, 0, 0, 0, 0, 68, 0, 0, 0,
249 0, 0, 0, 0, 0, 89, 51, 0, 0, 0,
250 0, 0, 52, 0, 33, 33, 50, 51, 0, 51,
251 0, 33, 33, 52, 53, 52, 57, 0, 0, 0,
252 0, 0, 57, 0, 0, 0, 0, 0, 82, 0,
253 46, 130, 128, 0, 33, 33, 46, 80, 0, 0,
254 0, 33, 33, 0, 45, 0, 0, 25, 25, 0,
255 45, 0, 0, 0, 25, 25, 0, 57, 0, 57,
256 0, 0, 0, 0, 0, 0, 0, 0, 0, 0,
257 0, 46, 93, 0, 0, 0, 0, 0, 0, 0,
258 0, 0, 0, 0, 0, 45, 0, 94, 95, 96,
259 97, 98, 99, 100, 101, 102, 103, 104, 105, 106,
260 107, 108, 109, 110, 111, 112, 113, 114, 115, 116,
261 117, 70, 0, 0, 0, 0, 0, 0, 0, 0,
262 0, 0, 0, 0, 0, 0, 70, 70, 70, 70,
263 70, 70, 70, 70, 70, 70, 70, 70, 70, 70,
264 70, 70, 70, 70, 70, 70, 70, 70, 70, 70,
265 68, 0, 0, 0, 0, 0, 0, 0, 0, 0,
266 0, 0, 0, 0, 0, 68, 68, 68, 68, 68,
267 68, 68, 68, 68, 68, 68, 68, 68, 68, 68,
268 68, 68, 68, 68, 68, 68, 68, 68, 68,
269};
270const short yycheck[] =
271 { 10,
272 42, 43, 34, 34, 44, 93, 41, 44, 0, 40,
273 36, 60, 34, 10, 34, 46, 34, 63, 40, 258,
274 40, 63, 40, 34, 46, 36, 46, 10, 46, 40,
275 41, 42, 43, 256, 36, 46, 47, 34, 258, 36,
276 256, 256, 34, 40, 41, 47, 262, 262, 40, 46,
277 47, 34, 63, 36, 46, 34, 10, 40, 41, 10,
278 91, 40, 301, 46, 47, 60, 44, 46, 262, 91,
279 61, 91, 94, 91, 94, 121, 125, 256, 123, 299,
280 91, 61, 36, 262, 62, 36, 61, 41, 57, 124,
281 41, 61, 61, 47, 91, 61, 47, 61, 124, 91,
282 42, 123, 94, 259, 260, 261, 296, 297, 91, 265,
283 86, 87, 91, 124, 262, 94, 262, 259, 260, 261,
284 94, 262, 124, 265, 259, 260, 261, 124, 262, 262,
285 265, 123, 262, 259, 260, 261, 62, 10, 93, 265,
286 262, 124, 266, 267, 268, 269, 270, 271, 258, 258,
287 91, 45, 257, 10, 299, 10, 36, 301, 26, 54,
288 68, 78, 73, -1, -1, -1, -1, -1, -1, 257,
289 124, -1, -1, 124, -1, -1, -1, 93, -1, -1,
290 -1, -1, -1, -1, 272, 273, 274, 275, 276, 277,
291 278, 279, 280, 281, 282, 283, 284, 285, 286, 287,
292 288, 289, 290, 291, 292, 293, 294, 295, -1, -1,
293 -1, -1, -1, -1, -1, -1, 93, -1, -1, -1,
294 -1, -1, -1, -1, -1, 257, 257, -1, -1, -1,
295 -1, -1, 263, -1, 256, 257, 256, 257, -1, 257,
296 -1, 263, 264, 263, 264, 263, 257, -1, -1, -1,
297 -1, -1, 263, -1, -1, -1, -1, -1, 300, -1,
298 257, 301, 299, -1, 256, 257, 263, 298, -1, -1,
299 -1, 263, 264, -1, 257, -1, -1, 256, 257, -1,
300 263, -1, -1, -1, 263, 264, -1, 298, -1, 300,
301 -1, -1, -1, -1, -1, -1, -1, -1, -1, -1,
302 -1, 298, 257, -1, -1, -1, -1, -1, -1, -1,
303 -1, -1, -1, -1, -1, 298, -1, 272, 273, 274,
304 275, 276, 277, 278, 279, 280, 281, 282, 283, 284,
305 285, 286, 287, 288, 289, 290, 291, 292, 293, 294,
306 295, 257, -1, -1, -1, -1, -1, -1, -1, -1,
307 -1, -1, -1, -1, -1, -1, 272, 273, 274, 275,
308 276, 277, 278, 279, 280, 281, 282, 283, 284, 285,
309 286, 287, 288, 289, 290, 291, 292, 293, 294, 295,
310 257, -1, -1, -1, -1, -1, -1, -1, -1, -1,
311 -1, -1, -1, -1, -1, 272, 273, 274, 275, 276,
312 277, 278, 279, 280, 281, 282, 283, 284, 285, 286,
313 287, 288, 289, 290, 291, 292, 293, 294, 295,
314};
315#define YYFINAL1 1
316#ifndef YYDEBUG0
317#define YYDEBUG0 0
318#endif
319#define YYMAXTOKEN301 301
320#if YYDEBUG0
321const char * const yyname[] =
322 {
323"end-of-file",0,0,0,0,0,0,0,0,0,"'\\n'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3240,0,0,"'\"'",0,"'$'",0,0,0,"'('","')'","'*'","'+'","','","'-'","'.'","'/'",0,0,
3250,0,0,0,0,0,0,0,0,0,"'<'","'='","'>'","'?'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3260,0,0,0,0,0,0,0,0,"'['",0,"']'","'^'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3270,0,0,0,0,0,0,"'{'","'|'","'}'",0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3280,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3290,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,
3300,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,"CHAR","NUMBER","SECTEND",
331"SCDECL","XSCDECL","NAME","PREVCCL","EOF_OP","OPTION_OP","OPT_OUTFILE",
332"OPT_PREFIX","OPT_YYCLASS","OPT_HEADER","OPT_EXTRA_TYPE","OPT_TABLES",
333"CCE_ALNUM","CCE_ALPHA","CCE_BLANK","CCE_CNTRL","CCE_DIGIT","CCE_GRAPH",
334"CCE_LOWER","CCE_PRINT","CCE_PUNCT","CCE_SPACE","CCE_UPPER","CCE_XDIGIT",
335"CCE_NEG_ALNUM","CCE_NEG_ALPHA","CCE_NEG_BLANK","CCE_NEG_CNTRL","CCE_NEG_DIGIT",
336"CCE_NEG_GRAPH","CCE_NEG_LOWER","CCE_NEG_PRINT","CCE_NEG_PUNCT","CCE_NEG_SPACE",
337"CCE_NEG_UPPER","CCE_NEG_XDIGIT","CCL_OP_DIFF","CCL_OP_UNION",
338"BEGIN_REPEAT_POSIX","END_REPEAT_POSIX","BEGIN_REPEAT_FLEX","END_REPEAT_FLEX",
339};
340const char * const yyrule[] =
341 {"$accept : goal",
342"goal : initlex sect1 sect1end sect2 initforrule",
343"initlex :",
344"sect1 : sect1 startconddecl namelist1",
345"sect1 : sect1 options",
346"sect1 :",
347"sect1 : error",
348"sect1end : SECTEND",
349"startconddecl : SCDECL",
350"startconddecl : XSCDECL",
351"namelist1 : namelist1 NAME",
352"namelist1 : NAME",
353"namelist1 : error",
354"options : OPTION_OP optionlist",
355"optionlist : optionlist option",
356"optionlist :",
357"option : OPT_OUTFILE '=' NAME",
358"option : OPT_EXTRA_TYPE '=' NAME",
359"option : OPT_PREFIX '=' NAME",
360"option : OPT_YYCLASS '=' NAME",
361"option : OPT_HEADER '=' NAME",
362"option : OPT_TABLES '=' NAME",
363"sect2 : sect2 scon initforrule flexrule '\\n'",
364"sect2 : sect2 scon '{' sect2 '}'",
365"sect2 :",
366"initforrule :",
367"flexrule : '^' rule",
368"flexrule : rule",
369"flexrule : EOF_OP",
370"flexrule : error",
371"scon_stk_ptr :",
372"scon : '<' scon_stk_ptr namelist2 '>'",
373"scon : '<' '*' '>'",
374"scon :",
375"namelist2 : namelist2 ',' sconname",
376"namelist2 : sconname",
377"namelist2 : error",
378"sconname : NAME",
379"rule : re2 re",
380"rule : re2 re '$'",
381"rule : re '$'",
382"rule : re",
383"re : re '|' series",
384"re : series",
385"re2 : re '/'",
386"series : series singleton",
387"series : singleton",
388"series : series BEGIN_REPEAT_POSIX NUMBER ',' NUMBER END_REPEAT_POSIX",
389"series : series BEGIN_REPEAT_POSIX NUMBER ',' END_REPEAT_POSIX",
390"series : series BEGIN_REPEAT_POSIX NUMBER END_REPEAT_POSIX",
391"singleton : singleton '*'",
392"singleton : singleton '+'",
393"singleton : singleton '?'",
394"singleton : singleton BEGIN_REPEAT_FLEX NUMBER ',' NUMBER END_REPEAT_FLEX",
395"singleton : singleton BEGIN_REPEAT_FLEX NUMBER ',' END_REPEAT_FLEX",
396"singleton : singleton BEGIN_REPEAT_FLEX NUMBER END_REPEAT_FLEX",
397"singleton : '.'",
398"singleton : fullccl",
399"singleton : PREVCCL",
400"singleton : '\"' string '\"'",
401"singleton : '(' re ')'",
402"singleton : CHAR",
403"fullccl : fullccl CCL_OP_DIFF braceccl",
404"fullccl : fullccl CCL_OP_UNION braceccl",
405"fullccl : braceccl",
406"braceccl : '[' ccl ']'",
407"braceccl : '[' '^' ccl ']'",
408"ccl : ccl CHAR '-' CHAR",
409"ccl : ccl CHAR",
410"ccl : ccl ccl_expr",
411"ccl :",
412"ccl_expr : CCE_ALNUM",
413"ccl_expr : CCE_ALPHA",
414"ccl_expr : CCE_BLANK",
415"ccl_expr : CCE_CNTRL",
416"ccl_expr : CCE_DIGIT",
417"ccl_expr : CCE_GRAPH",
418"ccl_expr : CCE_LOWER",
419"ccl_expr : CCE_PRINT",
420"ccl_expr : CCE_PUNCT",
421"ccl_expr : CCE_SPACE",
422"ccl_expr : CCE_XDIGIT",
423"ccl_expr : CCE_UPPER",
424"ccl_expr : CCE_NEG_ALNUM",
425"ccl_expr : CCE_NEG_ALPHA",
426"ccl_expr : CCE_NEG_BLANK",
427"ccl_expr : CCE_NEG_CNTRL",
428"ccl_expr : CCE_NEG_DIGIT",
429"ccl_expr : CCE_NEG_GRAPH",
430"ccl_expr : CCE_NEG_PRINT",
431"ccl_expr : CCE_NEG_PUNCT",
432"ccl_expr : CCE_NEG_SPACE",
433"ccl_expr : CCE_NEG_XDIGIT",
434"ccl_expr : CCE_NEG_LOWER",
435"ccl_expr : CCE_NEG_UPPER",
436"string : string CHAR",
437"string :",
438};
439#endif
440#ifndef YYSTYPEint
441typedef int YYSTYPEint;
442#endif
443#ifdef YYSTACKSIZE10000
444#undef YYMAXDEPTH10000
445#define YYMAXDEPTH10000 YYSTACKSIZE10000
446#else
447#ifdef YYMAXDEPTH10000
448#define YYSTACKSIZE10000 YYMAXDEPTH10000
449#else
450#define YYSTACKSIZE10000 10000
451#define YYMAXDEPTH10000 10000
452#endif
453#endif
454#define YYINITSTACKSIZE200 200
455/* LINTUSED */
456int yydebug;
457int yynerrs;
458int yyerrflag;
459int yychar;
460short *yyssp;
461YYSTYPEint *yyvsp;
462YYSTYPEint yyval;
463YYSTYPEint yylval;
464short *yyss;
465short *yysslim;
466YYSTYPEint *yyvs;
467unsigned int yystacksize;
468int yyparse(void);
469#line 947 "/usr/src/usr.bin/lex/parse.y"
470
471
472/* build_eof_action - build the "<<EOF>>" action for the active start
473 * conditions
474 */
475
476void build_eof_action()
477 {
478 int i;
479 char action_text[MAXLINE2048];
480
481 for ( i = 1; i <= scon_stk_ptr; ++i )
482 {
483 if ( sceof[scon_stk[i]] )
484 format_pinpoint_message(
485 "multiple <<EOF>> rules for start condition %s",
486 scname[scon_stk[i]] );
487
488 else
489 {
490 sceof[scon_stk[i]] = true1;
491
492 if (previous_continued_action /* && previous action was regular */)
493 add_action("YY_RULE_SETUP\n");
494
495 snprintf( action_text, sizeof(action_text), "case YY_STATE_EOF(%s):\n",
496 scname[scon_stk[i]] );
497 add_action( action_text );
498 }
499 }
500
501 line_directive_out( (FILE *) 0, 1 );
502
503 /* This isn't a normal rule after all - don't count it as
504 * such, so we don't have any holes in the rule numbering
505 * (which make generating "rule can never match" warnings
506 * more difficult.
507 */
508 --num_rules;
509 ++num_eof_rules;
510 }
511
512
513/* format_synerr - write out formatted syntax error */
514
515void format_synerr( msg, arg )
516const char *msg, arg[];
517 {
518 char errmsg[MAXLINE2048];
519
520 (void) snprintf( errmsg, sizeof(errmsg), msg, arg );
521 synerr( errmsg );
522 }
523
524
525/* synerr - report a syntax error */
526
527void synerr( str )
528const char *str;
529 {
530 syntaxerror = true1;
531 pinpoint_message( str );
532 }
533
534
535/* format_warn - write out formatted warning */
536
537void format_warn( msg, arg )
538const char *msg, arg[];
539 {
540 char warn_msg[MAXLINE2048];
541
542 snprintf( warn_msg, sizeof(warn_msg), msg, arg );
543 warn( warn_msg );
544 }
545
546
547/* warn - report a warning, unless -w was given */
548
549void warn( str )
550const char *str;
551 {
552 line_warning( str, linenum );
553 }
554
555/* format_pinpoint_message - write out a message formatted with one string,
556 * pinpointing its location
557 */
558
559void format_pinpoint_message( msg, arg )
560const char *msg, arg[];
561 {
562 char errmsg[MAXLINE2048];
563
564 snprintf( errmsg, sizeof(errmsg), msg, arg );
565 pinpoint_message( errmsg );
566 }
567
568
569/* pinpoint_message - write out a message, pinpointing its location */
570
571void pinpoint_message( str )
572const char *str;
573 {
574 line_pinpoint( str, linenum );
575 }
576
577
578/* line_warning - report a warning at a given line, unless -w was given */
579
580void line_warning( str, line )
581const char *str;
582int line;
583 {
584 char warning[MAXLINE2048];
585
586 if ( ! nowarn )
587 {
588 snprintf( warning, sizeof(warning), "warning, %s", str );
589 line_pinpoint( warning, line );
590 }
591 }
592
593
594/* line_pinpoint - write out a message, pinpointing it at the given line */
595
596void line_pinpoint( str, line )
597const char *str;
598int line;
599 {
600 fprintf( stderr(&__sF[2]), "%s:%d: %s\n", infilename, line, str );
601 }
602
603
604/* yyerror - eat up an error message from the parser;
605 * currently, messages are ignore
606 */
607
608void yyerror( msg )
609const char *msg;
610 {
611 }
612#line 605 "parse.c"
613/* allocate initial stack or double stack size, up to YYMAXDEPTH */
614static int yygrowstack(void)
615{
616 unsigned int newsize;
617 long sslen;
618 short *newss;
619 YYSTYPEint *newvs;
620
621 if ((newsize = yystacksize) == 0)
3
←
Assuming the condition is false
→
4
←
Taking false branch
→
622 newsize = YYINITSTACKSIZE200;
623 else if (newsize >= YYMAXDEPTH10000)
5
←
Assuming 'newsize' is < YYMAXDEPTH
→
6
←
Taking false branch
→
624 return -1;
625 else if ((newsize *= 2) > YYMAXDEPTH10000)
7
←
Assuming the condition is false
→
8
←
Taking false branch
→
626 newsize = YYMAXDEPTH10000;
627 sslen = yyssp - yyss;
628#ifdef SIZE_MAX0xffffffffffffffffUL
629#define YY_SIZE_MAX0xffffffffffffffffUL SIZE_MAX0xffffffffffffffffUL
630#else
631#define YY_SIZE_MAX0xffffffffffffffffUL 0xffffffffU
632#endif
633 if (newsize && YY_SIZE_MAX0xffffffffffffffffUL / newsize < sizeof *newss)
9
←
Assuming 'newsize' is 0
→
634 goto bail;
635 newss = (short *)realloc(yyss, newsize * sizeof *newss);
636 if (newss == NULL((void *)0))
10
←
Assuming 'newss' is not equal to NULL
→
11
←
Taking false branch
→
637 goto bail;
638 yyss = newss;
639 yyssp = newss + sslen;
640 if (newsize
11.1
'newsize' is 0
 && YY_SIZE_MAX0xffffffffffffffffUL / newsize < sizeof *newvs)
641 goto bail;
642 newvs = (YYSTYPEint *)realloc(yyvs, newsize * sizeof *newvs);
643 if (newvs == NULL((void *)0))
12
←
Assuming 'newvs' is not equal to NULL
→
13
←
Taking false branch
→
644 goto bail;
645 yyvs = newvs;
646 yyvsp = newvs + sslen;
647 yystacksize = newsize;
648 yysslim = yyss + newsize - 1;
649 return 0;
650bail:
651 if (yyss)
652 free(yyss);
653 if (yyvs)
654 free(yyvs);
655 yyss = yyssp = NULL((void *)0);
656 yyvs = yyvsp = NULL((void *)0);
657 yystacksize = 0;
658 return -1;
659}
660
661#define YYABORTgoto yyabort goto yyabort
662#define YYREJECTgoto yyabort goto yyabort
663#define YYACCEPTgoto yyaccept goto yyaccept
664#define YYERRORgoto yyerrlab goto yyerrlab
665int
666yyparse(void)
667{
668 int yym, yyn, yystate;
669#if YYDEBUG0
670 const char *yys;
671
672 if ((yys = getenv("YYDEBUG")))
673 {
674 yyn = *yys;
675 if (yyn >= '0' && yyn <= '9')
676 yydebug = yyn - '0';
677 }
678#endif /* YYDEBUG */
679
680 yynerrs = 0;
681 yyerrflag = 0;
682 yychar = (-1);
683
684 if (yyss == NULL((void *)0) && yygrowstack()) goto yyoverflow;
1
Assuming 'yyss' is equal to NULL
→
2
←
Calling 'yygrowstack'
→
14
←
Returning from 'yygrowstack'
→
15
←
Taking false branch
→
685 yyssp = yyss;
686 yyvsp = yyvs;
687 *yyssp = yystate = 0;
16
←
Use of zero-allocated memory
688
689yyloop:
690 if ((yyn = yydefred[yystate]) != 0) goto yyreduce;
691 if (yychar < 0)
692 {
693 if ((yychar = yylex()) < 0) yychar = 0;
694#if YYDEBUG0
695 if (yydebug)
696 {
697 yys = 0;
698 if (yychar <= YYMAXTOKEN301) yys = yyname[yychar];
699 if (!yys) yys = "illegal-symbol";
700 printf("%sdebug: state %d, reading %d (%s)\n",
701 YYPREFIX"yy", yystate, yychar, yys);
702 }
703#endif
704 }
705 if ((yyn = yysindex[yystate]) && (yyn += yychar) >= 0 &&
706 yyn <= YYTABLESIZE419 && yycheck[yyn] == yychar)
707 {
708#if YYDEBUG0
709 if (yydebug)
710 printf("%sdebug: state %d, shifting to state %d\n",
711 YYPREFIX"yy", yystate, yytable[yyn]);
712#endif
713 if (yyssp >= yysslim && yygrowstack())
714 {
715 goto yyoverflow;
716 }
717 *++yyssp = yystate = yytable[yyn];
718 *++yyvsp = yylval;
719 yychar = (-1);
720 if (yyerrflag > 0) --yyerrflag;
721 goto yyloop;
722 }
723 if ((yyn = yyrindex[yystate]) && (yyn += yychar) >= 0 &&
724 yyn <= YYTABLESIZE419 && yycheck[yyn] == yychar)
725 {
726 yyn = yytable[yyn];
727 goto yyreduce;
728 }
729 if (yyerrflag) goto yyinrecovery;
730#if defined(__GNUC__4)
731 goto yynewerror;
732#endif
733yynewerror:
734 yyerror("syntax error");
735#if defined(__GNUC__4)
736 goto yyerrlab;
737#endif
738yyerrlab:
739 ++yynerrs;
740yyinrecovery:
741 if (yyerrflag < 3)
742 {
743 yyerrflag = 3;
744 for (;;)
745 {
746 if ((yyn = yysindex[*yyssp]) && (yyn += YYERRCODE256) >= 0 &&
747 yyn <= YYTABLESIZE419 && yycheck[yyn] == YYERRCODE256)
748 {
749#if YYDEBUG0
750 if (yydebug)
751 printf("%sdebug: state %d, error recovery shifting\
752 to state %d\n", YYPREFIX"yy", *yyssp, yytable[yyn]);
753#endif
754 if (yyssp >= yysslim && yygrowstack())
755 {
756 goto yyoverflow;
757 }
758 *++yyssp = yystate = yytable[yyn];
759 *++yyvsp = yylval;
760 goto yyloop;
761 }
762 else
763 {
764#if YYDEBUG0
765 if (yydebug)
766 printf("%sdebug: error recovery discarding state %d\n",
767 YYPREFIX"yy", *yyssp);
768#endif
769 if (yyssp <= yyss) goto yyabort;
770 --yyssp;
771 --yyvsp;
772 }
773 }
774 }
775 else
776 {
777 if (yychar == 0) goto yyabort;
778#if YYDEBUG0
779 if (yydebug)
780 {
781 yys = 0;
782 if (yychar <= YYMAXTOKEN301) yys = yyname[yychar];
783 if (!yys) yys = "illegal-symbol";
784 printf("%sdebug: state %d, error recovery discards token %d (%s)\n",
785 YYPREFIX"yy", yystate, yychar, yys);
786 }
787#endif
788 yychar = (-1);
789 goto yyloop;
790 }
791yyreduce:
792#if YYDEBUG0
793 if (yydebug)
794 printf("%sdebug: state %d, reducing by rule %d (%s)\n",
795 YYPREFIX"yy", yystate, yyn, yyrule[yyn]);
796#endif
797 yym = yylen[yyn];
798 if (yym)
799 yyval = yyvsp[1-yym];
800 else
801 memset(&yyval, 0, sizeof yyval);
802 switch (yyn)
803 {
804case 1:
805#line 118 "/usr/src/usr.bin/lex/parse.y"
806{ /* add default rule */
807 int def_rule;
808
809 pat = cclinit();
810 cclnegate( pat );
811
812 def_rule = mkstate( -pat );
813
814 /* Remember the number of the default rule so we
815 * don't generate "can't match" warnings for it.
816 */
817 default_rule = num_rules;
818
819 finish_rule( def_rule, false0, 0, 0, 0);
820
821 for ( i = 1; i <= lastsc; ++i )
822 scset[i] = mkbranch( scset[i], def_rule );
823
824 if ( spprdflt )
825 add_action(
826 "YY_FATAL_ERROR( \"flex scanner jammed\" )" );
827 else
828 add_action( "ECHO" );
829
830 add_action( ";\n\tYY_BREAK\n" );
831 }
832break;
833case 2:
834#line 147 "/usr/src/usr.bin/lex/parse.y"
835{ /* initialize for processing rules */
836
837 /* Create default DFA start condition. */
838 scinstal( "INITIAL", false0 );
839 }
840break;
841case 6:
842#line 158 "/usr/src/usr.bin/lex/parse.y"
843{ synerr( _("unknown error processing section 1")"unknown error processing section 1" ); }
844break;
845case 7:
846#line 162 "/usr/src/usr.bin/lex/parse.y"
847{
848 check_options();
849 scon_stk = allocate_integer_array( lastsc + 1 )(int *) allocate_array( lastsc + 1, sizeof( int ) );
850 scon_stk_ptr = 0;
851 }
852break;
853case 8:
854#line 170 "/usr/src/usr.bin/lex/parse.y"
855{ xcluflg = false0; }
856break;
857case 9:
858#line 173 "/usr/src/usr.bin/lex/parse.y"
859{ xcluflg = true1; }
860break;
861case 10:
862#line 177 "/usr/src/usr.bin/lex/parse.y"
863{ scinstal( nmstr, xcluflg ); }
864break;
865case 11:
866#line 180 "/usr/src/usr.bin/lex/parse.y"
867{ scinstal( nmstr, xcluflg ); }
868break;
869case 12:
870#line 183 "/usr/src/usr.bin/lex/parse.y"
871{ synerr( _("bad start condition list")"bad start condition list" ); }
872break;
873case 16:
874#line 194 "/usr/src/usr.bin/lex/parse.y"
875{
876 outfilename = copy_string( nmstr );
877 did_outfilename = 1;
878 }
879break;
880case 17:
881#line 199 "/usr/src/usr.bin/lex/parse.y"
882{ extra_type = copy_string( nmstr ); }
883break;
884case 18:
885#line 201 "/usr/src/usr.bin/lex/parse.y"
886{ prefix = copy_string( nmstr ); }
887break;
888case 19:
889#line 203 "/usr/src/usr.bin/lex/parse.y"
890{ yyclass = copy_string( nmstr ); }
891break;
892case 20:
893#line 205 "/usr/src/usr.bin/lex/parse.y"
894{ headerfilename = copy_string( nmstr ); }
895break;
896case 21:
897#line 207 "/usr/src/usr.bin/lex/parse.y"
898{ tablesext = true1; tablesfilename = copy_string( nmstr ); }
899break;
900case 22:
901#line 211 "/usr/src/usr.bin/lex/parse.y"
902{ scon_stk_ptr = yyvsp[-3]; }
903break;
904case 23:
905#line 213 "/usr/src/usr.bin/lex/parse.y"
906{ scon_stk_ptr = yyvsp[-3]; }
907break;
908case 25:
909#line 218 "/usr/src/usr.bin/lex/parse.y"
910{
911 /* Initialize for a parse of one rule. */
912 trlcontxt = variable_trail_rule = varlength = false0;
913 trailcnt = headcnt = rulelen = 0;
914 current_state_type = STATE_NORMAL0x1;
915 previous_continued_action = continued_action;
916 in_rule = true1;
917
918 new_rule();
919 }
920break;
921case 26:
922#line 231 "/usr/src/usr.bin/lex/parse.y"
923{
924 pat = yyvsp[0];
925 finish_rule( pat, variable_trail_rule,
926 headcnt, trailcnt , previous_continued_action);
927
928 if ( scon_stk_ptr > 0 )
929 {
930 for ( i = 1; i <= scon_stk_ptr; ++i )
931 scbol[scon_stk[i]] =
932 mkbranch( scbol[scon_stk[i]],
933 pat );
934 }
935
936 else
937 {
938 /* Add to all non-exclusive start conditions,
939 * including the default (0) start condition.
940 */
941
942 for ( i = 1; i <= lastsc; ++i )
943 if ( ! scxclu[i] )
944 scbol[i] = mkbranch( scbol[i],
945 pat );
946 }
947
948 if ( ! bol_needed )
949 {
950 bol_needed = true1;
951
952 if ( performance_report > 1 )
953 pinpoint_message(
954 "'^' operator results in sub-optimal performance" );
955 }
956 }
957break;
958case 27:
959#line 267 "/usr/src/usr.bin/lex/parse.y"
960{
961 pat = yyvsp[0];
962 finish_rule( pat, variable_trail_rule,
963 headcnt, trailcnt , previous_continued_action);
964
965 if ( scon_stk_ptr > 0 )
966 {
967 for ( i = 1; i <= scon_stk_ptr; ++i )
968 scset[scon_stk[i]] =
969 mkbranch( scset[scon_stk[i]],
970 pat );
971 }
972
973 else
974 {
975 for ( i = 1; i <= lastsc; ++i )
976 if ( ! scxclu[i] )
977 scset[i] =
978 mkbranch( scset[i],
979 pat );
980 }
981 }
982break;
983case 28:
984#line 291 "/usr/src/usr.bin/lex/parse.y"
985{
986 if ( scon_stk_ptr > 0 )
987 build_eof_action();
988
989 else
990 {
991 /* This EOF applies to all start conditions
992 * which don't already have EOF actions.
993 */
994 for ( i = 1; i <= lastsc; ++i )
995 if ( ! sceof[i] )
996 scon_stk[++scon_stk_ptr] = i;
997
998 if ( scon_stk_ptr == 0 )
999 warn(
1000 "all start conditions already have <<EOF>> rules" );
1001
1002 else
1003 build_eof_action();
1004 }
1005 }
1006break;
1007case 29:
1008#line 314 "/usr/src/usr.bin/lex/parse.y"
1009{ synerr( _("unrecognized rule")"unrecognized rule" ); }
1010break;
1011case 30:
1012#line 318 "/usr/src/usr.bin/lex/parse.y"
1013{ yyval = scon_stk_ptr; }
1014break;
1015case 31:
1016#line 322 "/usr/src/usr.bin/lex/parse.y"
1017{ yyval = yyvsp[-2]; }
1018break;
1019case 32:
1020#line 325 "/usr/src/usr.bin/lex/parse.y"
1021{
1022 yyval = scon_stk_ptr;
1023
1024 for ( i = 1; i <= lastsc; ++i )
1025 {
1026 int j;
1027
1028 for ( j = 1; j <= scon_stk_ptr; ++j )
1029 if ( scon_stk[j] == i )
1030 break;
1031
1032 if ( j > scon_stk_ptr )
1033 scon_stk[++scon_stk_ptr] = i;
1034 }
1035 }
1036break;
1037case 33:
1038#line 342 "/usr/src/usr.bin/lex/parse.y"
1039{ yyval = scon_stk_ptr; }
1040break;
1041case 36:
1042#line 350 "/usr/src/usr.bin/lex/parse.y"
1043{ synerr( _("bad start condition list")"bad start condition list" ); }
1044break;
1045case 37:
1046#line 354 "/usr/src/usr.bin/lex/parse.y"
1047{
1048 if ( (scnum = sclookup( nmstr )) == 0 )
1049 format_pinpoint_message(
1050 "undeclared start condition %s",
1051 nmstr );
1052 else
1053 {
1054 for ( i = 1; i <= scon_stk_ptr; ++i )
1055 if ( scon_stk[i] == scnum )
1056 {
1057 format_warn(
1058 "<%s> specified twice",
1059 scname[scnum] );
1060 break;
1061 }
1062
1063 if ( i > scon_stk_ptr )
1064 scon_stk[++scon_stk_ptr] = scnum;
1065 }
1066 }
1067break;
1068case 38:
1069#line 377 "/usr/src/usr.bin/lex/parse.y"
1070{
1071 if ( transchar[lastst[yyvsp[0]]] != SYM_EPSILON(256 + 1) )
1072 /* Provide final transition \now/ so it
1073 * will be marked as a trailing context
1074 * state.
1075 */
1076 yyvsp[0] = link_machines( yyvsp[0],
1077 mkstate( SYM_EPSILON(256 + 1) ) );
1078
1079 mark_beginning_as_normal( yyvsp[0] );
1080 current_state_type = STATE_NORMAL0x1;
1081
1082 if ( previous_continued_action )
1083 {
1084 /* We need to treat this as variable trailing
1085 * context so that the backup does not happen
1086 * in the action but before the action switch
1087 * statement. If the backup happens in the
1088 * action, then the rules "falling into" this
1089 * one's action will *also* do the backup,
1090 * erroneously.
1091 */
1092 if ( ! varlength || headcnt != 0 )
1093 warn(
1094 "trailing context made variable due to preceding '|' action" );
1095
1096 /* Mark as variable. */
1097 varlength = true1;
1098 headcnt = 0;
1099
1100 }
1101
1102 if ( lex_compat || (varlength && headcnt == 0) )
1103 { /* variable trailing context rule */
1104 /* Mark the first part of the rule as the
1105 * accepting "head" part of a trailing
1106 * context rule.
1107 *
1108 * By the way, we didn't do this at the
1109 * beginning of this production because back
1110 * then current_state_type was set up for a
1111 * trail rule, and add_accept() can create
1112 * a new state ...
1113 */
1114 add_accept( yyvsp[-1],
1115 num_rules | YY_TRAILING_HEAD_MASK0x4000 );
1116 variable_trail_rule = true1;
1117 }
1118
1119 else
1120 trailcnt = rulelen;
1121
1122 yyval = link_machines( yyvsp[-1], yyvsp[0] );
1123 }
1124break;
1125case 39:
1126#line 433 "/usr/src/usr.bin/lex/parse.y"
1127{ synerr( _("trailing context used twice")"trailing context used twice" ); }
1128break;
1129case 40:
1130#line 436 "/usr/src/usr.bin/lex/parse.y"
1131{
1132 headcnt = 0;
1133 trailcnt = 1;
1134 rulelen = 1;
1135 varlength = false0;
1136
1137 current_state_type = STATE_TRAILING_CONTEXT0x2;
1138
1139 if ( trlcontxt )
1140 {
1141 synerr( _("trailing context used twice")"trailing context used twice" );
1142 yyval = mkstate( SYM_EPSILON(256 + 1) );
1143 }
1144
1145 else if ( previous_continued_action )
1146 {
1147 /* See the comment in the rule for "re2 re"
1148 * above.
1149 */
1150 warn(
1151 "trailing context made variable due to preceding '|' action" );
1152
1153 varlength = true1;
1154 }
1155
1156 if ( lex_compat || varlength )
1157 {
1158 /* Again, see the comment in the rule for
1159 * "re2 re" above.
1160 */
1161 add_accept( yyvsp[-1],
1162 num_rules | YY_TRAILING_HEAD_MASK0x4000 );
1163 variable_trail_rule = true1;
1164 }
1165
1166 trlcontxt = true1;
1167
1168 eps = mkstate( SYM_EPSILON(256 + 1) );
1169 yyval = link_machines( yyvsp[-1],
1170 link_machines( eps, mkstate( '\n' ) ) );
1171 }
1172break;
1173case 41:
1174#line 479 "/usr/src/usr.bin/lex/parse.y"
1175{
1176 yyval = yyvsp[0];
1177
1178 if ( trlcontxt )
1179 {
1180 if ( lex_compat || (varlength && headcnt == 0) )
1181 /* Both head and trail are
1182 * variable-length.
1183 */
1184 variable_trail_rule = true1;
1185 else
1186 trailcnt = rulelen;
1187 }
1188 }
1189break;
1190case 42:
1191#line 497 "/usr/src/usr.bin/lex/parse.y"
1192{
1193 varlength = true1;
1194 yyval = mkor( yyvsp[-2], yyvsp[0] );
1195 }
1196break;
1197case 43:
1198#line 503 "/usr/src/usr.bin/lex/parse.y"
1199{ yyval = yyvsp[0]; }
1200break;
1201case 44:
1202#line 508 "/usr/src/usr.bin/lex/parse.y"
1203{
1204 /* This rule is written separately so the
1205 * reduction will occur before the trailing
1206 * series is parsed.
1207 */
1208
1209 if ( trlcontxt )
1210 synerr( _("trailing context used twice")"trailing context used twice" );
1211 else
1212 trlcontxt = true1;
1213
1214 if ( varlength )
1215 /* We hope the trailing context is
1216 * fixed-length.
1217 */
1218 varlength = false0;
1219 else
1220 headcnt = rulelen;
1221
1222 rulelen = 0;
1223
1224 current_state_type = STATE_TRAILING_CONTEXT0x2;
1225 yyval = yyvsp[-1];
1226 }
1227break;
1228case 45:
1229#line 535 "/usr/src/usr.bin/lex/parse.y"
1230{
1231 /* This is where concatenation of adjacent patterns
1232 * gets done.
1233 */
1234 yyval = link_machines( yyvsp[-1], yyvsp[0] );
1235 }
1236break;
1237case 46:
1238#line 543 "/usr/src/usr.bin/lex/parse.y"
1239{ yyval = yyvsp[0]; }
1240break;
1241case 47:
1242#line 546 "/usr/src/usr.bin/lex/parse.y"
1243{
1244 varlength = true1;
1245
1246 if ( yyvsp[-3] > yyvsp[-1] || yyvsp[-3] < 0 )
1247 {
1248 synerr( _("bad iteration values")"bad iteration values" );
1249 yyval = yyvsp[-5];
1250 }
1251 else
1252 {
1253 if ( yyvsp[-3] == 0 )
1254 {
1255 if ( yyvsp[-1] <= 0 )
1256 {
1257 synerr(
1258 _("bad iteration values")"bad iteration values" );
1259 yyval = yyvsp[-5];
1260 }
1261 else
1262 yyval = mkopt(
1263 mkrep( yyvsp[-5], 1, yyvsp[-1] ) );
1264 }
1265 else
1266 yyval = mkrep( yyvsp[-5], yyvsp[-3], yyvsp[-1] );
1267 }
1268 }
1269break;
1270case 48:
1271#line 574 "/usr/src/usr.bin/lex/parse.y"
1272{
1273 varlength = true1;
1274
1275 if ( yyvsp[-2] <= 0 )
1276 {
1277 synerr( _("iteration value must be positive")"iteration value must be positive" );
1278 yyval = yyvsp[-4];
1279 }
1280
1281 else
1282 yyval = mkrep( yyvsp[-4], yyvsp[-2], INFINITE_REPEAT-1 );
1283 }
1284break;
1285case 49:
1286#line 588 "/usr/src/usr.bin/lex/parse.y"
1287{
1288 /* The series could be something like "(foo)",
1289 * in which case we have no idea what its length
1290 * is, so we punt here.
1291 */
1292 varlength = true1;
1293
1294 if ( yyvsp[-1] <= 0 )
1295 {
1296 synerr( _("iteration value must be positive")"iteration value must be positive"
1297 );
1298 yyval = yyvsp[-3];
1299 }
1300
1301 else
1302 yyval = link_machines( yyvsp[-3],
1303 copysingl( yyvsp[-3], yyvsp[-1] - 1 ) );
1304 }
1305break;
1306case 50:
1307#line 610 "/usr/src/usr.bin/lex/parse.y"
1308{
1309 varlength = true1;
1310
1311 yyval = mkclos( yyvsp[-1] );
1312 }
1313break;
1314case 51:
1315#line 617 "/usr/src/usr.bin/lex/parse.y"
1316{
1317 varlength = true1;
1318 yyval = mkposcl( yyvsp[-1] );
1319 }
1320break;
1321case 52:
1322#line 623 "/usr/src/usr.bin/lex/parse.y"
1323{
1324 varlength = true1;
1325 yyval = mkopt( yyvsp[-1] );
1326 }
1327break;
1328case 53:
1329#line 629 "/usr/src/usr.bin/lex/parse.y"
1330{
1331 varlength = true1;
1332
1333 if ( yyvsp[-3] > yyvsp[-1] || yyvsp[-3] < 0 )
1334 {
1335 synerr( _("bad iteration values")"bad iteration values" );
1336 yyval = yyvsp[-5];
1337 }
1338 else
1339 {
1340 if ( yyvsp[-3] == 0 )
1341 {
1342 if ( yyvsp[-1] <= 0 )
1343 {
1344 synerr(
1345 _("bad iteration values")"bad iteration values" );
1346 yyval = yyvsp[-5];
1347 }
1348 else
1349 yyval = mkopt(
1350 mkrep( yyvsp[-5], 1, yyvsp[-1] ) );
1351 }
1352 else
1353 yyval = mkrep( yyvsp[-5], yyvsp[-3], yyvsp[-1] );
1354 }
1355 }
1356break;
1357case 54:
1358#line 657 "/usr/src/usr.bin/lex/parse.y"
1359{
1360 varlength = true1;
1361
1362 if ( yyvsp[-2] <= 0 )
1363 {
1364 synerr( _("iteration value must be positive")"iteration value must be positive" );
1365 yyval = yyvsp[-4];
1366 }
1367
1368 else
1369 yyval = mkrep( yyvsp[-4], yyvsp[-2], INFINITE_REPEAT-1 );
1370 }
1371break;
1372case 55:
1373#line 671 "/usr/src/usr.bin/lex/parse.y"
1374{
1375 /* The singleton could be something like "(foo)",
1376 * in which case we have no idea what its length
1377 * is, so we punt here.
1378 */
1379 varlength = true1;
1380
1381 if ( yyvsp[-1] <= 0 )
1382 {
1383 synerr( _("iteration value must be positive")"iteration value must be positive" );
1384 yyval = yyvsp[-3];
1385 }
1386
1387 else
1388 yyval = link_machines( yyvsp[-3],
1389 copysingl( yyvsp[-3], yyvsp[-1] - 1 ) );
1390 }
1391break;
1392case 56:
1393#line 690 "/usr/src/usr.bin/lex/parse.y"
1394{
1395 if ( ! madeany )
1396 {
1397 /* Create the '.' character class. */
1398 ccldot = cclinit();
1399 ccladd( ccldot, '\n' );
1400 cclnegate( ccldot );
1401
1402 if ( useecs )
1403 mkeccl( ccltbl + cclmap[ccldot],
1404 ccllen[ccldot], nextecm,
1405 ecgroup, csize, csize );
1406
1407 /* Create the (?s:'.') character class. */
1408 cclany = cclinit();
1409 cclnegate( cclany );
1410
1411 if ( useecs )
1412 mkeccl( ccltbl + cclmap[cclany],
1413 ccllen[cclany], nextecm,
1414 ecgroup, csize, csize );
1415
1416 madeany = true1;
1417 }
1418
1419 ++rulelen;
1420
1421 if (sf_dot_all()((_sf_stk[_sf_top_ix]) & 0x0002))
1422 yyval = mkstate( -cclany );
1423 else
1424 yyval = mkstate( -ccldot );
1425 }
1426break;
1427case 57:
1428#line 724 "/usr/src/usr.bin/lex/parse.y"
1429{
1430 /* Sort characters for fast searching.
1431 */
1432 qsort( ccltbl + cclmap[yyvsp[0]], ccllen[yyvsp[0]], sizeof (*ccltbl), cclcmp );
1433
1434 if ( useecs )
1435 mkeccl( ccltbl + cclmap[yyvsp[0]], ccllen[yyvsp[0]],
1436 nextecm, ecgroup, csize, csize );
1437
1438 ++rulelen;
1439
1440 if (ccl_has_nl[yyvsp[0]])
1441 rule_has_nl[num_rules] = true1;
1442
1443 yyval = mkstate( -yyvsp[0] );
1444 }
1445break;
1446case 58:
1447#line 742 "/usr/src/usr.bin/lex/parse.y"
1448{
1449 ++rulelen;
1450
1451 if (ccl_has_nl[yyvsp[0]])
1452 rule_has_nl[num_rules] = true1;
1453
1454 yyval = mkstate( -yyvsp[0] );
1455 }
1456break;
1457case 59:
1458#line 752 "/usr/src/usr.bin/lex/parse.y"
1459{ yyval = yyvsp[-1]; }
1460break;
1461case 60:
1462#line 755 "/usr/src/usr.bin/lex/parse.y"
1463{ yyval = yyvsp[-1]; }
1464break;
1465case 61:
1466#line 758 "/usr/src/usr.bin/lex/parse.y"
1467{
1468 ++rulelen;
1469
1470 if (yyvsp[0] == nlch)
1471 rule_has_nl[num_rules] = true1;
1472
1473 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001) && has_case(yyvsp[0]))
1474 /* create an alternation, as in (a|A) */
1475 yyval = mkor (mkstate(yyvsp[0]), mkstate(reverse_case(yyvsp[0])));
1476 else
1477 yyval = mkstate( yyvsp[0] );
1478 }
1479break;
1480case 62:
1481#line 772 "/usr/src/usr.bin/lex/parse.y"
1482{ yyval = ccl_set_diff (yyvsp[-2], yyvsp[0]); }
1483break;
1484case 63:
1485#line 773 "/usr/src/usr.bin/lex/parse.y"
1486{ yyval = ccl_set_union (yyvsp[-2], yyvsp[0]); }
1487break;
1488case 65:
1489#line 779 "/usr/src/usr.bin/lex/parse.y"
1490{ yyval = yyvsp[-1]; }
1491break;
1492case 66:
1493#line 782 "/usr/src/usr.bin/lex/parse.y"
1494{
1495 cclnegate( yyvsp[-1] );
1496 yyval = yyvsp[-1];
1497 }
1498break;
1499case 67:
1500#line 789 "/usr/src/usr.bin/lex/parse.y"
1501{
1502
1503 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001))
1504 {
1505
1506 /* If one end of the range has case and the other
1507 * does not, or the cases are different, then we're not
1508 * sure what range the user is trying to express.
1509 * Examples: [@-z] or [S-t]
1510 */
1511 if (has_case (yyvsp[-2]) != has_case (yyvsp[0])
1512 || (has_case (yyvsp[-2]) && (b_islower (yyvsp[-2])(islower(yyvsp[-2])?1:0) != b_islower (yyvsp[0])(islower(yyvsp[0])?1:0)))
1513 || (has_case (yyvsp[-2]) && (b_isupper (yyvsp[-2])(isupper(yyvsp[-2])?1:0) != b_isupper (yyvsp[0])(isupper(yyvsp[0])?1:0))))
1514 format_warn3 (do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,("the character range [%c-%c] is ambiguous in a case-insensitive scanner"
), (yyvsp[-2]), (yyvsp[0]) ); warn( fw3_msg ); }while(0)
1515 _("the character range [%c-%c] is ambiguous in a case-insensitive scanner"),do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,("the character range [%c-%c] is ambiguous in a case-insensitive scanner"
), (yyvsp[-2]), (yyvsp[0]) ); warn( fw3_msg ); }while(0)
1516 yyvsp[-2], yyvsp[0])do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,("the character range [%c-%c] is ambiguous in a case-insensitive scanner"
), (yyvsp[-2]), (yyvsp[0]) ); warn( fw3_msg ); }while(0);
1517
1518 /* If the range spans uppercase characters but not
1519 * lowercase (or vice-versa), then should we automatically
1520 * include lowercase characters in the range?
1521 * Example: [@-_] spans [a-z] but not [A-Z]
1522 */
1523 else if (!has_case (yyvsp[-2]) && !has_case (yyvsp[0]) && !range_covers_case (yyvsp[-2], yyvsp[0]))
1524 format_warn3 (do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,("the character range [%c-%c] is ambiguous in a case-insensitive scanner"
), (yyvsp[-2]), (yyvsp[0]) ); warn( fw3_msg ); }while(0)
1525 _("the character range [%c-%c] is ambiguous in a case-insensitive scanner"),do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,("the character range [%c-%c] is ambiguous in a case-insensitive scanner"
), (yyvsp[-2]), (yyvsp[0]) ); warn( fw3_msg ); }while(0)
1526 yyvsp[-2], yyvsp[0])do{ char fw3_msg[2048]; snprintf( fw3_msg, 2048,("the character range [%c-%c] is ambiguous in a case-insensitive scanner"
), (yyvsp[-2]), (yyvsp[0]) ); warn( fw3_msg ); }while(0);
1527 }
1528
1529 if ( yyvsp[-2] > yyvsp[0] )
1530 synerr( _("negative range in character class")"negative range in character class" );
1531
1532 else
1533 {
1534 for ( i = yyvsp[-2]; i <= yyvsp[0]; ++i )
1535 ccladd( yyvsp[-3], i );
1536
1537 /* Keep track if this ccl is staying in
1538 * alphabetical order.
1539 */
1540 cclsorted = cclsorted && (yyvsp[-2] > lastchar);
1541 lastchar = yyvsp[0];
1542
1543 /* Do it again for upper/lowercase */
1544 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001) && has_case(yyvsp[-2]) && has_case(yyvsp[0])){
1545 yyvsp[-2] = reverse_case (yyvsp[-2]);
1546 yyvsp[0] = reverse_case (yyvsp[0]);
1547
1548 for ( i = yyvsp[-2]; i <= yyvsp[0]; ++i )
1549 ccladd( yyvsp[-3], i );
1550
1551 cclsorted = cclsorted && (yyvsp[-2] > lastchar);
1552 lastchar = yyvsp[0];
1553 }
1554
1555 }
1556
1557 yyval = yyvsp[-3];
1558 }
1559break;
1560case 68:
1561#line 849 "/usr/src/usr.bin/lex/parse.y"
1562{
1563 ccladd( yyvsp[-1], yyvsp[0] );
1564 cclsorted = cclsorted && (yyvsp[0] > lastchar);
1565 lastchar = yyvsp[0];
1566
1567 /* Do it again for upper/lowercase */
1568 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001) && has_case(yyvsp[0])){
1569 yyvsp[0] = reverse_case (yyvsp[0]);
1570 ccladd (yyvsp[-1], yyvsp[0]);
1571
1572 cclsorted = cclsorted && (yyvsp[0] > lastchar);
1573 lastchar = yyvsp[0];
1574 }
1575
1576 yyval = yyvsp[-1];
1577 }
1578break;
1579case 69:
1580#line 867 "/usr/src/usr.bin/lex/parse.y"
1581{
1582 /* Too hard to properly maintain cclsorted. */
1583 cclsorted = false0;
1584 yyval = yyvsp[-1];
1585 }
1586break;
1587case 70:
1588#line 874 "/usr/src/usr.bin/lex/parse.y"
1589{
1590 cclsorted = true1;
1591 lastchar = 0;
1592 currccl = yyval = cclinit();
1593 }
1594break;
1595case 71:
1596#line 882 "/usr/src/usr.bin/lex/parse.y"
1597{ CCL_EXPR(isalnum)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isalnum(c) ) ccladd( currccl, c ); }while(0); }
1598break;
1599case 72:
1600#line 883 "/usr/src/usr.bin/lex/parse.y"
1601{ CCL_EXPR(isalpha)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isalpha(c) ) ccladd( currccl, c ); }while(0); }
1602break;
1603case 73:
1604#line 884 "/usr/src/usr.bin/lex/parse.y"
1605{ CCL_EXPR(isblank)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isblank(c) ) ccladd( currccl, c ); }while(0); }
1606break;
1607case 74:
1608#line 885 "/usr/src/usr.bin/lex/parse.y"
1609{ CCL_EXPR(iscntrl)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && iscntrl(c) ) ccladd( currccl, c ); }while(0); }
1610break;
1611case 75:
1612#line 886 "/usr/src/usr.bin/lex/parse.y"
1613{ CCL_EXPR(isdigit)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isdigit(c) ) ccladd( currccl, c ); }while(0); }
1614break;
1615case 76:
1616#line 887 "/usr/src/usr.bin/lex/parse.y"
1617{ CCL_EXPR(isgraph)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isgraph(c) ) ccladd( currccl, c ); }while(0); }
1618break;
1619case 77:
1620#line 888 "/usr/src/usr.bin/lex/parse.y"
1621{
1622 CCL_EXPR(islower)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && islower(c) ) ccladd( currccl, c ); }while(0);
1623 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001))
1624 CCL_EXPR(isupper)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isupper(c) ) ccladd( currccl, c ); }while(0);
1625 }
1626break;
1627case 78:
1628#line 893 "/usr/src/usr.bin/lex/parse.y"
1629{ CCL_EXPR(isprint)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isprint(c) ) ccladd( currccl, c ); }while(0); }
1630break;
1631case 79:
1632#line 894 "/usr/src/usr.bin/lex/parse.y"
1633{ CCL_EXPR(ispunct)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && ispunct(c) ) ccladd( currccl, c ); }while(0); }
1634break;
1635case 80:
1636#line 895 "/usr/src/usr.bin/lex/parse.y"
1637{ CCL_EXPR(isspace)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isspace(c) ) ccladd( currccl, c ); }while(0); }
1638break;
1639case 81:
1640#line 896 "/usr/src/usr.bin/lex/parse.y"
1641{ CCL_EXPR(isxdigit)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isxdigit(c) ) ccladd( currccl, c ); }while(0); }
1642break;
1643case 82:
1644#line 897 "/usr/src/usr.bin/lex/parse.y"
1645{
1646 CCL_EXPR(isupper)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && isupper(c) ) ccladd( currccl, c ); }while(0);
1647 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001))
1648 CCL_EXPR(islower)do{ int c; for ( c = 0; c < csize; ++c ) if ( ((c) <= 0177
) && islower(c) ) ccladd( currccl, c ); }while(0);
1649 }
1650break;
1651case 83:
1652#line 903 "/usr/src/usr.bin/lex/parse.y"
1653{ CCL_NEG_EXPR(isalnum)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isalnum(c) )
ccladd( currccl, c ); }while(0); }
1654break;
1655case 84:
1656#line 904 "/usr/src/usr.bin/lex/parse.y"
1657{ CCL_NEG_EXPR(isalpha)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isalpha(c) )
ccladd( currccl, c ); }while(0); }
1658break;
1659case 85:
1660#line 905 "/usr/src/usr.bin/lex/parse.y"
1661{ CCL_NEG_EXPR(isblank)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isblank(c) )
ccladd( currccl, c ); }while(0); }
1662break;
1663case 86:
1664#line 906 "/usr/src/usr.bin/lex/parse.y"
1665{ CCL_NEG_EXPR(iscntrl)do{ int c; for ( c = 0; c < csize; ++c ) if ( !iscntrl(c) )
ccladd( currccl, c ); }while(0); }
1666break;
1667case 87:
1668#line 907 "/usr/src/usr.bin/lex/parse.y"
1669{ CCL_NEG_EXPR(isdigit)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isdigit(c) )
ccladd( currccl, c ); }while(0); }
1670break;
1671case 88:
1672#line 908 "/usr/src/usr.bin/lex/parse.y"
1673{ CCL_NEG_EXPR(isgraph)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isgraph(c) )
ccladd( currccl, c ); }while(0); }
1674break;
1675case 89:
1676#line 909 "/usr/src/usr.bin/lex/parse.y"
1677{ CCL_NEG_EXPR(isprint)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isprint(c) )
ccladd( currccl, c ); }while(0); }
1678break;
1679case 90:
1680#line 910 "/usr/src/usr.bin/lex/parse.y"
1681{ CCL_NEG_EXPR(ispunct)do{ int c; for ( c = 0; c < csize; ++c ) if ( !ispunct(c) )
ccladd( currccl, c ); }while(0); }
1682break;
1683case 91:
1684#line 911 "/usr/src/usr.bin/lex/parse.y"
1685{ CCL_NEG_EXPR(isspace)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isspace(c) )
ccladd( currccl, c ); }while(0); }
1686break;
1687case 92:
1688#line 912 "/usr/src/usr.bin/lex/parse.y"
1689{ CCL_NEG_EXPR(isxdigit)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isxdigit(c)
) ccladd( currccl, c ); }while(0); }
1690break;
1691case 93:
1692#line 913 "/usr/src/usr.bin/lex/parse.y"
1693{
1694 if ( sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001) )
1695 warn(_("[:^lower:] is ambiguous in case insensitive scanner")"[:^lower:] is ambiguous in case insensitive scanner");
1696 else
1697 CCL_NEG_EXPR(islower)do{ int c; for ( c = 0; c < csize; ++c ) if ( !islower(c) )
ccladd( currccl, c ); }while(0);
1698 }
1699break;
1700case 94:
1701#line 919 "/usr/src/usr.bin/lex/parse.y"
1702{
1703 if ( sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001) )
1704 warn(_("[:^upper:] ambiguous in case insensitive scanner")"[:^upper:] ambiguous in case insensitive scanner");
1705 else
1706 CCL_NEG_EXPR(isupper)do{ int c; for ( c = 0; c < csize; ++c ) if ( !isupper(c) )
ccladd( currccl, c ); }while(0);
1707 }
1708break;
1709case 95:
1710#line 928 "/usr/src/usr.bin/lex/parse.y"
1711{
1712 if ( yyvsp[0] == nlch )
1713 rule_has_nl[num_rules] = true1;
1714
1715 ++rulelen;
1716
1717 if (sf_case_ins()((_sf_stk[_sf_top_ix]) & 0x0001) && has_case(yyvsp[0]))
1718 yyval = mkor (mkstate(yyvsp[0]), mkstate(reverse_case(yyvsp[0])));
1719 else
1720 yyval = mkstate (yyvsp[0]);
1721
1722 yyval = link_machines( yyvsp[-1], yyval);
1723 }
1724break;
1725case 96:
1726#line 943 "/usr/src/usr.bin/lex/parse.y"
1727{ yyval = mkstate( SYM_EPSILON(256 + 1) ); }
1728break;
1729#line 1722 "parse.c"
1730 }
1731 yyssp -= yym;
1732 yystate = *yyssp;
1733 yyvsp -= yym;
1734 yym = yylhs[yyn];
1735 if (yystate == 0 && yym == 0)
1736 {
1737#if YYDEBUG0
1738 if (yydebug)
1739 printf("%sdebug: after reduction, shifting from state 0 to\
1740 state %d\n", YYPREFIX"yy", YYFINAL1);
1741#endif
1742 yystate = YYFINAL1;
1743 *++yyssp = YYFINAL1;
1744 *++yyvsp = yyval;
1745 if (yychar < 0)
1746 {
1747 if ((yychar = yylex()) < 0) yychar = 0;
1748#if YYDEBUG0
1749 if (yydebug)
1750 {
1751 yys = 0;
1752 if (yychar <= YYMAXTOKEN301) yys = yyname[yychar];
1753 if (!yys) yys = "illegal-symbol";
1754 printf("%sdebug: state %d, reading %d (%s)\n",
1755 YYPREFIX"yy", YYFINAL1, yychar, yys);
1756 }
1757#endif
1758 }
1759 if (yychar == 0) goto yyaccept;
1760 goto yyloop;
1761 }
1762 if ((yyn = yygindex[yym]) && (yyn += yystate) >= 0 &&
1763 yyn <= YYTABLESIZE419 && yycheck[yyn] == yystate)
1764 yystate = yytable[yyn];
1765 else
1766 yystate = yydgoto[yym];
1767#if YYDEBUG0
1768 if (yydebug)
1769 printf("%sdebug: after reduction, shifting from state %d \
1770to state %d\n", YYPREFIX"yy", *yyssp, yystate);
1771#endif
1772 if (yyssp >= yysslim && yygrowstack())
1773 {
1774 goto yyoverflow;
1775 }
1776 *++yyssp = yystate;
1777 *++yyvsp = yyval;
1778 goto yyloop;
1779yyoverflow:
1780 yyerror("yacc stack overflow");
1781yyabort:
1782 if (yyss)
1783 free(yyss);
1784 if (yyvs)
1785 free(yyvs);
1786 yyss = yyssp = NULL((void *)0);
1787 yyvs = yyvsp = NULL((void *)0);
1788 yystacksize = 0;
1789 return (1);
1790yyaccept:
1791 if (yyss)
1792 free(yyss);
1793 if (yyvs)
1794 free(yyvs);
1795 yyss = yyssp = NULL((void *)0);
1796 yyvs = yyvsp = NULL((void *)0);
1797 yystacksize = 0;
1798 return (0);
1799}