Line data Source code
1 : /* A Bison parser, made by GNU Bison 3.8.2. */
2 :
3 : /* Bison implementation for Yacc-like parsers in C
4 :
5 : Copyright (C) 1984, 1989-1990, 2000-2015, 2018-2021 Free Software Foundation,
6 : Inc.
7 :
8 : This program is free software: you can redistribute it and/or modify
9 : it under the terms of the GNU General Public License as published by
10 : the Free Software Foundation, either version 3 of the License, or
11 : (at your option) any later version.
12 :
13 : This program is distributed in the hope that it will be useful,
14 : but WITHOUT ANY WARRANTY; without even the implied warranty of
15 : MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 : GNU General Public License for more details.
17 :
18 : You should have received a copy of the GNU General Public License
19 : along with this program. If not, see <https://www.gnu.org/licenses/>. */
20 :
21 : /* As a special exception, you may create a larger work that contains
22 : part or all of the Bison parser skeleton and distribute that work
23 : under terms of your choice, so long as that work isn't itself a
24 : parser generator using the skeleton or a modified version thereof
25 : as a parser skeleton. Alternatively, if you modify or redistribute
26 : the parser skeleton itself, you may (at your option) remove this
27 : special exception, which will cause the skeleton and the resulting
28 : Bison output files to be licensed under the GNU General Public
29 : License without this special exception.
30 :
31 : This special exception was added by the Free Software Foundation in
32 : version 2.2 of Bison. */
33 :
34 : /* C LALR(1) parser skeleton written by Richard Stallman, by
35 : simplifying the original so-called "semantic" parser. */
36 :
37 : /* DO NOT RELY ON FEATURES THAT ARE NOT DOCUMENTED in the manual,
38 : especially those whose name start with YY_ or yy_. They are
39 : private implementation details that can be changed or removed. */
40 :
41 : /* All symbols defined below should begin with yy or YY, to avoid
42 : infringing on user name space. This should be done even for local
43 : variables, as they might otherwise be expanded by user macros.
44 : There are some unavoidable exceptions within include files to
45 : define necessary library symbols; they are noted "INFRINGES ON
46 : USER NAME SPACE" below. */
47 :
48 : /* Identify Bison output, and Bison version. */
49 : #define YYBISON 30802
50 :
51 : /* Bison version string. */
52 : #define YYBISON_VERSION "3.8.2"
53 :
54 : /* Skeleton name. */
55 : #define YYSKELETON_NAME "yacc.c"
56 :
57 : /* Pure parsers. */
58 : #define YYPURE 1
59 :
60 : /* Push parsers. */
61 : #define YYPUSH 0
62 :
63 : /* Pull parsers. */
64 : #define YYPULL 1
65 :
66 :
67 : /* Substitute the variable and function names. */
68 : #define yyparse expr_yyparse
69 : #define yylex expr_yylex
70 : #define yyerror expr_yyerror
71 : #define yydebug expr_yydebug
72 : #define yynerrs expr_yynerrs
73 :
74 : /* First part of user prologue. */
75 : #line 1 "exprparse.y"
76 :
77 : /*-------------------------------------------------------------------------
78 : *
79 : * exprparse.y
80 : * bison grammar for a simple expression syntax
81 : *
82 : * Portions Copyright (c) 1996-2026, PostgreSQL Global Development Group
83 : * Portions Copyright (c) 1994, Regents of the University of California
84 : *
85 : * src/bin/pgbench/exprparse.y
86 : *
87 : *-------------------------------------------------------------------------
88 : */
89 :
90 : #include "postgres_fe.h"
91 :
92 : #include "pgbench.h"
93 :
94 : #define PGBENCH_NARGS_VARIABLE (-1)
95 : #define PGBENCH_NARGS_CASE (-2)
96 : #define PGBENCH_NARGS_HASH (-3)
97 : #define PGBENCH_NARGS_PERMUTE (-4)
98 :
99 : static PgBenchExprList *make_elist(PgBenchExpr *expr, PgBenchExprList *list);
100 : static PgBenchExpr *make_null_constant(void);
101 : static PgBenchExpr *make_boolean_constant(bool bval);
102 : static PgBenchExpr *make_integer_constant(int64 ival);
103 : static PgBenchExpr *make_double_constant(double dval);
104 : static PgBenchExpr *make_variable(char *varname);
105 : static PgBenchExpr *make_op(yyscan_t yyscanner, const char *operator,
106 : PgBenchExpr *lexpr, PgBenchExpr *rexpr);
107 : static PgBenchExpr *make_uop(yyscan_t yyscanner, const char *operator, PgBenchExpr *expr);
108 : static int find_func(yyscan_t yyscanner, const char *fname);
109 : static PgBenchExpr *make_func(yyscan_t yyscanner, int fnumber, PgBenchExprList *args);
110 : static PgBenchExpr *make_case(yyscan_t yyscanner, PgBenchExprList *when_then_list, PgBenchExpr *else_part);
111 :
112 :
113 : #line 114 "exprparse.c"
114 :
115 : # ifndef YY_CAST
116 : # ifdef __cplusplus
117 : # define YY_CAST(Type, Val) static_cast<Type> (Val)
118 : # define YY_REINTERPRET_CAST(Type, Val) reinterpret_cast<Type> (Val)
119 : # else
120 : # define YY_CAST(Type, Val) ((Type) (Val))
121 : # define YY_REINTERPRET_CAST(Type, Val) ((Type) (Val))
122 : # endif
123 : # endif
124 : # ifndef YY_NULLPTR
125 : # if defined __cplusplus
126 : # if 201103L <= __cplusplus
127 : # define YY_NULLPTR nullptr
128 : # else
129 : # define YY_NULLPTR 0
130 : # endif
131 : # else
132 : # define YY_NULLPTR ((void*)0)
133 : # endif
134 : # endif
135 :
136 : #include "exprparse.h"
137 : /* Symbol kind. */
138 : enum yysymbol_kind_t
139 : {
140 : YYSYMBOL_YYEMPTY = -2,
141 : YYSYMBOL_YYEOF = 0, /* "end of file" */
142 : YYSYMBOL_YYerror = 1, /* error */
143 : YYSYMBOL_YYUNDEF = 2, /* "invalid token" */
144 : YYSYMBOL_NULL_CONST = 3, /* NULL_CONST */
145 : YYSYMBOL_INTEGER_CONST = 4, /* INTEGER_CONST */
146 : YYSYMBOL_MAXINT_PLUS_ONE_CONST = 5, /* MAXINT_PLUS_ONE_CONST */
147 : YYSYMBOL_DOUBLE_CONST = 6, /* DOUBLE_CONST */
148 : YYSYMBOL_BOOLEAN_CONST = 7, /* BOOLEAN_CONST */
149 : YYSYMBOL_VARIABLE = 8, /* VARIABLE */
150 : YYSYMBOL_FUNCTION = 9, /* FUNCTION */
151 : YYSYMBOL_AND_OP = 10, /* AND_OP */
152 : YYSYMBOL_OR_OP = 11, /* OR_OP */
153 : YYSYMBOL_NOT_OP = 12, /* NOT_OP */
154 : YYSYMBOL_NE_OP = 13, /* NE_OP */
155 : YYSYMBOL_LE_OP = 14, /* LE_OP */
156 : YYSYMBOL_GE_OP = 15, /* GE_OP */
157 : YYSYMBOL_LS_OP = 16, /* LS_OP */
158 : YYSYMBOL_RS_OP = 17, /* RS_OP */
159 : YYSYMBOL_IS_OP = 18, /* IS_OP */
160 : YYSYMBOL_CASE_KW = 19, /* CASE_KW */
161 : YYSYMBOL_WHEN_KW = 20, /* WHEN_KW */
162 : YYSYMBOL_THEN_KW = 21, /* THEN_KW */
163 : YYSYMBOL_ELSE_KW = 22, /* ELSE_KW */
164 : YYSYMBOL_END_KW = 23, /* END_KW */
165 : YYSYMBOL_ISNULL_OP = 24, /* ISNULL_OP */
166 : YYSYMBOL_NOTNULL_OP = 25, /* NOTNULL_OP */
167 : YYSYMBOL_26_ = 26, /* '<' */
168 : YYSYMBOL_27_ = 27, /* '>' */
169 : YYSYMBOL_28_ = 28, /* '=' */
170 : YYSYMBOL_29_ = 29, /* '|' */
171 : YYSYMBOL_30_ = 30, /* '#' */
172 : YYSYMBOL_31_ = 31, /* '&' */
173 : YYSYMBOL_32_ = 32, /* '~' */
174 : YYSYMBOL_33_ = 33, /* '+' */
175 : YYSYMBOL_34_ = 34, /* '-' */
176 : YYSYMBOL_35_ = 35, /* '*' */
177 : YYSYMBOL_36_ = 36, /* '/' */
178 : YYSYMBOL_37_ = 37, /* '%' */
179 : YYSYMBOL_UNARY = 38, /* UNARY */
180 : YYSYMBOL_39_ = 39, /* ',' */
181 : YYSYMBOL_40_ = 40, /* '(' */
182 : YYSYMBOL_41_ = 41, /* ')' */
183 : YYSYMBOL_YYACCEPT = 42, /* $accept */
184 : YYSYMBOL_result = 43, /* result */
185 : YYSYMBOL_elist = 44, /* elist */
186 : YYSYMBOL_expr = 45, /* expr */
187 : YYSYMBOL_when_then_list = 46, /* when_then_list */
188 : YYSYMBOL_case_control = 47, /* case_control */
189 : YYSYMBOL_function = 48 /* function */
190 : };
191 : typedef enum yysymbol_kind_t yysymbol_kind_t;
192 :
193 :
194 :
195 :
196 : #ifdef short
197 : # undef short
198 : #endif
199 :
200 : /* On compilers that do not define __PTRDIFF_MAX__ etc., make sure
201 : <limits.h> and (if available) <stdint.h> are included
202 : so that the code can choose integer types of a good width. */
203 :
204 : #ifndef __PTRDIFF_MAX__
205 : # include <limits.h> /* INFRINGES ON USER NAME SPACE */
206 : # if defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
207 : # include <stdint.h> /* INFRINGES ON USER NAME SPACE */
208 : # define YY_STDINT_H
209 : # endif
210 : #endif
211 :
212 : /* Narrow types that promote to a signed type and that can represent a
213 : signed or unsigned integer of at least N bits. In tables they can
214 : save space and decrease cache pressure. Promoting to a signed type
215 : helps avoid bugs in integer arithmetic. */
216 :
217 : #ifdef __INT_LEAST8_MAX__
218 : typedef __INT_LEAST8_TYPE__ yytype_int8;
219 : #elif defined YY_STDINT_H
220 : typedef int_least8_t yytype_int8;
221 : #else
222 : typedef signed char yytype_int8;
223 : #endif
224 :
225 : #ifdef __INT_LEAST16_MAX__
226 : typedef __INT_LEAST16_TYPE__ yytype_int16;
227 : #elif defined YY_STDINT_H
228 : typedef int_least16_t yytype_int16;
229 : #else
230 : typedef short yytype_int16;
231 : #endif
232 :
233 : /* Work around bug in HP-UX 11.23, which defines these macros
234 : incorrectly for preprocessor constants. This workaround can likely
235 : be removed in 2023, as HPE has promised support for HP-UX 11.23
236 : (aka HP-UX 11i v2) only through the end of 2022; see Table 2 of
237 : <https://h20195.www2.hpe.com/V2/getpdf.aspx/4AA4-7673ENW.pdf>. */
238 : #ifdef __hpux
239 : # undef UINT_LEAST8_MAX
240 : # undef UINT_LEAST16_MAX
241 : # define UINT_LEAST8_MAX 255
242 : # define UINT_LEAST16_MAX 65535
243 : #endif
244 :
245 : #if defined __UINT_LEAST8_MAX__ && __UINT_LEAST8_MAX__ <= __INT_MAX__
246 : typedef __UINT_LEAST8_TYPE__ yytype_uint8;
247 : #elif (!defined __UINT_LEAST8_MAX__ && defined YY_STDINT_H \
248 : && UINT_LEAST8_MAX <= INT_MAX)
249 : typedef uint_least8_t yytype_uint8;
250 : #elif !defined __UINT_LEAST8_MAX__ && UCHAR_MAX <= INT_MAX
251 : typedef unsigned char yytype_uint8;
252 : #else
253 : typedef short yytype_uint8;
254 : #endif
255 :
256 : #if defined __UINT_LEAST16_MAX__ && __UINT_LEAST16_MAX__ <= __INT_MAX__
257 : typedef __UINT_LEAST16_TYPE__ yytype_uint16;
258 : #elif (!defined __UINT_LEAST16_MAX__ && defined YY_STDINT_H \
259 : && UINT_LEAST16_MAX <= INT_MAX)
260 : typedef uint_least16_t yytype_uint16;
261 : #elif !defined __UINT_LEAST16_MAX__ && USHRT_MAX <= INT_MAX
262 : typedef unsigned short yytype_uint16;
263 : #else
264 : typedef int yytype_uint16;
265 : #endif
266 :
267 : #ifndef YYPTRDIFF_T
268 : # if defined __PTRDIFF_TYPE__ && defined __PTRDIFF_MAX__
269 : # define YYPTRDIFF_T __PTRDIFF_TYPE__
270 : # define YYPTRDIFF_MAXIMUM __PTRDIFF_MAX__
271 : # elif defined PTRDIFF_MAX
272 : # ifndef ptrdiff_t
273 : # include <stddef.h> /* INFRINGES ON USER NAME SPACE */
274 : # endif
275 : # define YYPTRDIFF_T ptrdiff_t
276 : # define YYPTRDIFF_MAXIMUM PTRDIFF_MAX
277 : # else
278 : # define YYPTRDIFF_T long
279 : # define YYPTRDIFF_MAXIMUM LONG_MAX
280 : # endif
281 : #endif
282 :
283 : #ifndef YYSIZE_T
284 : # ifdef __SIZE_TYPE__
285 : # define YYSIZE_T __SIZE_TYPE__
286 : # elif defined size_t
287 : # define YYSIZE_T size_t
288 : # elif defined __STDC_VERSION__ && 199901 <= __STDC_VERSION__
289 : # include <stddef.h> /* INFRINGES ON USER NAME SPACE */
290 : # define YYSIZE_T size_t
291 : # else
292 : # define YYSIZE_T unsigned
293 : # endif
294 : #endif
295 :
296 : #define YYSIZE_MAXIMUM \
297 : YY_CAST (YYPTRDIFF_T, \
298 : (YYPTRDIFF_MAXIMUM < YY_CAST (YYSIZE_T, -1) \
299 : ? YYPTRDIFF_MAXIMUM \
300 : : YY_CAST (YYSIZE_T, -1)))
301 :
302 : #define YYSIZEOF(X) YY_CAST (YYPTRDIFF_T, sizeof (X))
303 :
304 :
305 : /* Stored state numbers (used for stacks). */
306 : typedef yytype_int8 yy_state_t;
307 :
308 : /* State numbers in computations. */
309 : typedef int yy_state_fast_t;
310 :
311 : #ifndef YY_
312 : # if defined YYENABLE_NLS && YYENABLE_NLS
313 : # if ENABLE_NLS
314 : # include <libintl.h> /* INFRINGES ON USER NAME SPACE */
315 : # define YY_(Msgid) dgettext ("bison-runtime", Msgid)
316 : # endif
317 : # endif
318 : # ifndef YY_
319 : # define YY_(Msgid) Msgid
320 : # endif
321 : #endif
322 :
323 :
324 : #ifndef YY_ATTRIBUTE_PURE
325 : # if defined __GNUC__ && 2 < __GNUC__ + (96 <= __GNUC_MINOR__)
326 : # define YY_ATTRIBUTE_PURE __attribute__ ((__pure__))
327 : # else
328 : # define YY_ATTRIBUTE_PURE
329 : # endif
330 : #endif
331 :
332 : #ifndef YY_ATTRIBUTE_UNUSED
333 : # if defined __GNUC__ && 2 < __GNUC__ + (7 <= __GNUC_MINOR__)
334 : # define YY_ATTRIBUTE_UNUSED __attribute__ ((__unused__))
335 : # else
336 : # define YY_ATTRIBUTE_UNUSED
337 : # endif
338 : #endif
339 :
340 : /* Suppress unused-variable warnings by "using" E. */
341 : #if ! defined lint || defined __GNUC__
342 : # define YY_USE(E) ((void) (E))
343 : #else
344 : # define YY_USE(E) /* empty */
345 : #endif
346 :
347 : /* Suppress an incorrect diagnostic about yylval being uninitialized. */
348 : #if defined __GNUC__ && ! defined __ICC && 406 <= __GNUC__ * 100 + __GNUC_MINOR__
349 : # if __GNUC__ * 100 + __GNUC_MINOR__ < 407
350 : # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
351 : _Pragma ("GCC diagnostic push") \
352 : _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"")
353 : # else
354 : # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN \
355 : _Pragma ("GCC diagnostic push") \
356 : _Pragma ("GCC diagnostic ignored \"-Wuninitialized\"") \
357 : _Pragma ("GCC diagnostic ignored \"-Wmaybe-uninitialized\"")
358 : # endif
359 : # define YY_IGNORE_MAYBE_UNINITIALIZED_END \
360 : _Pragma ("GCC diagnostic pop")
361 : #else
362 : # define YY_INITIAL_VALUE(Value) Value
363 : #endif
364 : #ifndef YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
365 : # define YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
366 : # define YY_IGNORE_MAYBE_UNINITIALIZED_END
367 : #endif
368 : #ifndef YY_INITIAL_VALUE
369 : # define YY_INITIAL_VALUE(Value) /* Nothing. */
370 : #endif
371 :
372 : #if defined __cplusplus && defined __GNUC__ && ! defined __ICC && 6 <= __GNUC__
373 : # define YY_IGNORE_USELESS_CAST_BEGIN \
374 : _Pragma ("GCC diagnostic push") \
375 : _Pragma ("GCC diagnostic ignored \"-Wuseless-cast\"")
376 : # define YY_IGNORE_USELESS_CAST_END \
377 : _Pragma ("GCC diagnostic pop")
378 : #endif
379 : #ifndef YY_IGNORE_USELESS_CAST_BEGIN
380 : # define YY_IGNORE_USELESS_CAST_BEGIN
381 : # define YY_IGNORE_USELESS_CAST_END
382 : #endif
383 :
384 :
385 : #define YY_ASSERT(E) ((void) (0 && (E)))
386 :
387 : #if !defined yyoverflow
388 :
389 : /* The parser invokes alloca or malloc; define the necessary symbols. */
390 :
391 : # ifdef YYSTACK_USE_ALLOCA
392 : # if YYSTACK_USE_ALLOCA
393 : # ifdef __GNUC__
394 : # define YYSTACK_ALLOC __builtin_alloca
395 : # elif defined __BUILTIN_VA_ARG_INCR
396 : # include <alloca.h> /* INFRINGES ON USER NAME SPACE */
397 : # elif defined _AIX
398 : # define YYSTACK_ALLOC __alloca
399 : # elif defined _MSC_VER
400 : # include <malloc.h> /* INFRINGES ON USER NAME SPACE */
401 : # define alloca _alloca
402 : # else
403 : # define YYSTACK_ALLOC alloca
404 : # if ! defined _ALLOCA_H && ! defined EXIT_SUCCESS
405 : # include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
406 : /* Use EXIT_SUCCESS as a witness for stdlib.h. */
407 : # ifndef EXIT_SUCCESS
408 : # define EXIT_SUCCESS 0
409 : # endif
410 : # endif
411 : # endif
412 : # endif
413 : # endif
414 :
415 : # ifdef YYSTACK_ALLOC
416 : /* Pacify GCC's 'empty if-body' warning. */
417 : # define YYSTACK_FREE(Ptr) do { /* empty */; } while (0)
418 : # ifndef YYSTACK_ALLOC_MAXIMUM
419 : /* The OS might guarantee only one guard page at the bottom of the stack,
420 : and a page size can be as small as 4096 bytes. So we cannot safely
421 : invoke alloca (N) if N exceeds 4096. Use a slightly smaller number
422 : to allow for a few compiler-allocated temporary stack slots. */
423 : # define YYSTACK_ALLOC_MAXIMUM 4032 /* reasonable circa 2006 */
424 : # endif
425 : # else
426 : # define YYSTACK_ALLOC YYMALLOC
427 : # define YYSTACK_FREE YYFREE
428 : # ifndef YYSTACK_ALLOC_MAXIMUM
429 : # define YYSTACK_ALLOC_MAXIMUM YYSIZE_MAXIMUM
430 : # endif
431 : # if (defined __cplusplus && ! defined EXIT_SUCCESS \
432 : && ! ((defined YYMALLOC || defined malloc) \
433 : && (defined YYFREE || defined free)))
434 : # include <stdlib.h> /* INFRINGES ON USER NAME SPACE */
435 : # ifndef EXIT_SUCCESS
436 : # define EXIT_SUCCESS 0
437 : # endif
438 : # endif
439 : # ifndef YYMALLOC
440 : # define YYMALLOC malloc
441 : # if ! defined malloc && ! defined EXIT_SUCCESS
442 : void *malloc (YYSIZE_T); /* INFRINGES ON USER NAME SPACE */
443 : # endif
444 : # endif
445 : # ifndef YYFREE
446 : # define YYFREE free
447 : # if ! defined free && ! defined EXIT_SUCCESS
448 : void free (void *); /* INFRINGES ON USER NAME SPACE */
449 : # endif
450 : # endif
451 : # endif
452 : #endif /* !defined yyoverflow */
453 :
454 : #if (! defined yyoverflow \
455 : && (! defined __cplusplus \
456 : || (defined YYSTYPE_IS_TRIVIAL && YYSTYPE_IS_TRIVIAL)))
457 :
458 : /* A type that is properly aligned for any stack member. */
459 : union yyalloc
460 : {
461 : yy_state_t yyss_alloc;
462 : YYSTYPE yyvs_alloc;
463 : };
464 :
465 : /* The size of the maximum gap between one aligned stack and the next. */
466 : # define YYSTACK_GAP_MAXIMUM (YYSIZEOF (union yyalloc) - 1)
467 :
468 : /* The size of an array large to enough to hold all stacks, each with
469 : N elements. */
470 : # define YYSTACK_BYTES(N) \
471 : ((N) * (YYSIZEOF (yy_state_t) + YYSIZEOF (YYSTYPE)) \
472 : + YYSTACK_GAP_MAXIMUM)
473 :
474 : # define YYCOPY_NEEDED 1
475 :
476 : /* Relocate STACK from its old location to the new one. The
477 : local variables YYSIZE and YYSTACKSIZE give the old and new number of
478 : elements in the stack, and YYPTR gives the new location of the
479 : stack. Advance YYPTR to a properly aligned location for the next
480 : stack. */
481 : # define YYSTACK_RELOCATE(Stack_alloc, Stack) \
482 : do \
483 : { \
484 : YYPTRDIFF_T yynewbytes; \
485 : YYCOPY (&yyptr->Stack_alloc, Stack, yysize); \
486 : Stack = &yyptr->Stack_alloc; \
487 : yynewbytes = yystacksize * YYSIZEOF (*Stack) + YYSTACK_GAP_MAXIMUM; \
488 : yyptr += yynewbytes / YYSIZEOF (*yyptr); \
489 : } \
490 : while (0)
491 :
492 : #endif
493 :
494 : #if defined YYCOPY_NEEDED && YYCOPY_NEEDED
495 : /* Copy COUNT objects from SRC to DST. The source and destination do
496 : not overlap. */
497 : # ifndef YYCOPY
498 : # if defined __GNUC__ && 1 < __GNUC__
499 : # define YYCOPY(Dst, Src, Count) \
500 : __builtin_memcpy (Dst, Src, YY_CAST (YYSIZE_T, (Count)) * sizeof (*(Src)))
501 : # else
502 : # define YYCOPY(Dst, Src, Count) \
503 : do \
504 : { \
505 : YYPTRDIFF_T yyi; \
506 : for (yyi = 0; yyi < (Count); yyi++) \
507 : (Dst)[yyi] = (Src)[yyi]; \
508 : } \
509 : while (0)
510 : # endif
511 : # endif
512 : #endif /* !YYCOPY_NEEDED */
513 :
514 : /* YYFINAL -- State number of the termination state. */
515 : #define YYFINAL 25
516 : /* YYLAST -- Last index in YYTABLE. */
517 : #define YYLAST 320
518 :
519 : /* YYNTOKENS -- Number of terminals. */
520 : #define YYNTOKENS 42
521 : /* YYNNTS -- Number of nonterminals. */
522 : #define YYNNTS 7
523 : /* YYNRULES -- Number of rules. */
524 : #define YYNRULES 47
525 : /* YYNSTATES -- Number of states. */
526 : #define YYNSTATES 88
527 :
528 : /* YYMAXUTOK -- Last valid token kind. */
529 : #define YYMAXUTOK 281
530 :
531 :
532 : /* YYTRANSLATE(TOKEN-NUM) -- Symbol number corresponding to TOKEN-NUM
533 : as returned by yylex, with out-of-bounds checking. */
534 : #define YYTRANSLATE(YYX) \
535 : (0 <= (YYX) && (YYX) <= YYMAXUTOK \
536 : ? YY_CAST (yysymbol_kind_t, yytranslate[YYX]) \
537 : : YYSYMBOL_YYUNDEF)
538 :
539 : /* YYTRANSLATE[TOKEN-NUM] -- Symbol number corresponding to TOKEN-NUM
540 : as returned by yylex. */
541 : static const yytype_int8 yytranslate[] =
542 : {
543 : 0, 2, 2, 2, 2, 2, 2, 2, 2, 2,
544 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
545 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
546 : 2, 2, 2, 2, 2, 30, 2, 37, 31, 2,
547 : 40, 41, 35, 33, 39, 34, 2, 36, 2, 2,
548 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
549 : 26, 28, 27, 2, 2, 2, 2, 2, 2, 2,
550 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
551 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
552 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
553 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
554 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
555 : 2, 2, 2, 2, 29, 2, 32, 2, 2, 2,
556 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
557 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
558 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
559 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
560 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
561 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
562 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
563 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
564 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
565 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
566 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
567 : 2, 2, 2, 2, 2, 2, 2, 2, 2, 2,
568 : 2, 2, 2, 2, 2, 2, 1, 2, 3, 4,
569 : 5, 6, 7, 8, 9, 10, 11, 12, 13, 14,
570 : 15, 16, 17, 18, 19, 20, 21, 22, 23, 24,
571 : 25, 38
572 : };
573 :
574 : #if YYDEBUG
575 : /* YYRLINE[YYN] -- Source line where rule number YYN was defined. */
576 : static const yytype_uint8 yyrline[] =
577 : {
578 : 0, 82, 82, 87, 88, 89, 92, 93, 95, 98,
579 : 101, 103, 104, 105, 106, 107, 108, 109, 110, 111,
580 : 112, 113, 114, 115, 116, 117, 118, 119, 120, 121,
581 : 123, 124, 128, 129, 134, 138, 144, 145, 146, 147,
582 : 149, 150, 151, 155, 156, 159, 160, 162
583 : };
584 : #endif
585 :
586 : /** Accessing symbol of state STATE. */
587 : #define YY_ACCESSING_SYMBOL(State) YY_CAST (yysymbol_kind_t, yystos[State])
588 :
589 : #if YYDEBUG || 0
590 : /* The user-facing name of the symbol whose (internal) number is
591 : YYSYMBOL. No bounds checking. */
592 : static const char *yysymbol_name (yysymbol_kind_t yysymbol) YY_ATTRIBUTE_UNUSED;
593 :
594 : /* YYTNAME[SYMBOL-NUM] -- String name of the symbol SYMBOL-NUM.
595 : First, the terminals, then, starting at YYNTOKENS, nonterminals. */
596 : static const char *const yytname[] =
597 : {
598 : "\"end of file\"", "error", "\"invalid token\"", "NULL_CONST",
599 : "INTEGER_CONST", "MAXINT_PLUS_ONE_CONST", "DOUBLE_CONST",
600 : "BOOLEAN_CONST", "VARIABLE", "FUNCTION", "AND_OP", "OR_OP", "NOT_OP",
601 : "NE_OP", "LE_OP", "GE_OP", "LS_OP", "RS_OP", "IS_OP", "CASE_KW",
602 : "WHEN_KW", "THEN_KW", "ELSE_KW", "END_KW", "ISNULL_OP", "NOTNULL_OP",
603 : "'<'", "'>'", "'='", "'|'", "'#'", "'&'", "'~'", "'+'", "'-'", "'*'",
604 : "'/'", "'%'", "UNARY", "','", "'('", "')'", "$accept", "result", "elist",
605 : "expr", "when_then_list", "case_control", "function", YY_NULLPTR
606 : };
607 :
608 : static const char *
609 : yysymbol_name (yysymbol_kind_t yysymbol)
610 : {
611 : return yytname[yysymbol];
612 : }
613 : #endif
614 :
615 : #define YYPACT_NINF (-33)
616 :
617 : #define yypact_value_is_default(Yyn) \
618 : ((Yyn) == YYPACT_NINF)
619 :
620 : #define YYTABLE_NINF (-1)
621 :
622 : #define yytable_value_is_error(Yyn) \
623 : ((Yyn) == YYTABLE_NINF)
624 :
625 : /* YYPACT[STATE-NUM] -- Index in YYTABLE of the portion describing
626 : STATE-NUM. */
627 : static const yytype_int16 yypact[] =
628 : {
629 : 64, -33, -33, -33, -33, -33, -33, 64, -19, 64,
630 : 64, 46, 64, 13, 205, -33, -22, 258, 64, -6,
631 : 11, -33, -33, -33, 92, -33, 64, 64, 64, 64,
632 : 64, 64, 64, 3, -33, -33, 64, 64, 64, 64,
633 : 64, 64, 64, 64, 64, 64, 64, 64, 121, 64,
634 : 64, -33, -33, 258, 233, 283, 283, 283, 11, 11,
635 : -33, -33, 5, 283, 283, 283, 11, 11, 11, -9,
636 : -9, -33, -33, -33, -32, 205, 64, 149, 177, -33,
637 : -33, 64, -33, 205, 64, -33, 205, 205
638 : };
639 :
640 : /* YYDEFACT[STATE-NUM] -- Default reduction number in state STATE-NUM.
641 : Performed when YYTABLE does not specify something else to do. Zero
642 : means the default is an error. */
643 : static const yytype_int8 yydefact[] =
644 : {
645 : 0, 36, 38, 39, 37, 40, 47, 0, 0, 0,
646 : 0, 0, 0, 0, 2, 42, 0, 11, 0, 0,
647 : 10, 7, 9, 8, 0, 1, 0, 0, 0, 0,
648 : 0, 0, 0, 0, 30, 31, 0, 0, 0, 0,
649 : 0, 0, 0, 0, 0, 0, 0, 3, 0, 0,
650 : 0, 45, 6, 28, 29, 22, 18, 20, 26, 27,
651 : 32, 34, 0, 17, 19, 21, 24, 25, 23, 12,
652 : 13, 14, 15, 16, 0, 4, 0, 0, 0, 33,
653 : 35, 0, 41, 44, 0, 46, 5, 43
654 : };
655 :
656 : /* YYPGOTO[NTERM-NUM]. */
657 : static const yytype_int8 yypgoto[] =
658 : {
659 : -33, -33, -33, -7, -33, -33, -33
660 : };
661 :
662 : /* YYDEFGOTO[NTERM-NUM]. */
663 : static const yytype_int8 yydefgoto[] =
664 : {
665 : 0, 13, 74, 14, 19, 15, 16
666 : };
667 :
668 : /* YYTABLE[YYPACT[STATE-NUM]] -- What to do in state STATE-NUM. If
669 : positive, shift that token. If negative, reduce the rule whose
670 : number is the opposite. If YYTABLE_NINF, syntax error. */
671 : static const yytype_int8 yytable[] =
672 : {
673 : 17, 18, 20, 21, 23, 24, 60, 81, 79, 82,
674 : 61, 48, 80, 25, 49, 62, 50, 51, 47, 53,
675 : 54, 55, 56, 57, 58, 59, 44, 45, 46, 63,
676 : 64, 65, 66, 67, 68, 69, 70, 71, 72, 73,
677 : 75, 0, 77, 78, 42, 43, 44, 45, 46, 1,
678 : 2, 22, 3, 4, 5, 6, 0, 0, 7, 0,
679 : 0, 0, 0, 0, 0, 8, 0, 1, 2, 83,
680 : 3, 4, 5, 6, 86, 0, 7, 87, 9, 10,
681 : 11, 0, 0, 8, 0, 0, 12, 0, 0, 0,
682 : 0, 0, 0, 0, 0, 0, 9, 10, 11, 0,
683 : 0, 0, 26, 27, 12, 28, 29, 30, 31, 32,
684 : 33, 0, 0, 0, 0, 0, 34, 35, 36, 37,
685 : 38, 39, 40, 41, 0, 42, 43, 44, 45, 46,
686 : 0, 26, 27, 52, 28, 29, 30, 31, 32, 33,
687 : 0, 0, 76, 0, 0, 34, 35, 36, 37, 38,
688 : 39, 40, 41, 0, 42, 43, 44, 45, 46, 26,
689 : 27, 0, 28, 29, 30, 31, 32, 33, 0, 0,
690 : 84, 0, 0, 34, 35, 36, 37, 38, 39, 40,
691 : 41, 0, 42, 43, 44, 45, 46, 26, 27, 0,
692 : 28, 29, 30, 31, 32, 33, 0, 0, 0, 0,
693 : 85, 34, 35, 36, 37, 38, 39, 40, 41, 0,
694 : 42, 43, 44, 45, 46, 26, 27, 0, 28, 29,
695 : 30, 31, 32, 33, 0, 0, 0, 0, 0, 34,
696 : 35, 36, 37, 38, 39, 40, 41, 0, 42, 43,
697 : 44, 45, 46, 26, 0, 0, 28, 29, 30, 31,
698 : 32, 33, 0, 0, 0, 0, 0, 34, 35, 36,
699 : 37, 38, 39, 40, 41, 0, 42, 43, 44, 45,
700 : 46, 28, 29, 30, 31, 32, 33, 0, 0, 0,
701 : 0, 0, 34, 35, 36, 37, 38, 39, 40, 41,
702 : 0, 42, 43, 44, 45, 46, -1, -1, -1, 31,
703 : 32, 0, 0, 0, 0, 0, 0, 0, 0, -1,
704 : -1, -1, 39, 40, 41, 0, 42, 43, 44, 45,
705 : 46
706 : };
707 :
708 : static const yytype_int8 yycheck[] =
709 : {
710 : 7, 20, 9, 10, 11, 12, 3, 39, 3, 41,
711 : 7, 18, 7, 0, 20, 12, 22, 23, 40, 26,
712 : 27, 28, 29, 30, 31, 32, 35, 36, 37, 36,
713 : 37, 38, 39, 40, 41, 42, 43, 44, 45, 46,
714 : 47, -1, 49, 50, 33, 34, 35, 36, 37, 3,
715 : 4, 5, 6, 7, 8, 9, -1, -1, 12, -1,
716 : -1, -1, -1, -1, -1, 19, -1, 3, 4, 76,
717 : 6, 7, 8, 9, 81, -1, 12, 84, 32, 33,
718 : 34, -1, -1, 19, -1, -1, 40, -1, -1, -1,
719 : -1, -1, -1, -1, -1, -1, 32, 33, 34, -1,
720 : -1, -1, 10, 11, 40, 13, 14, 15, 16, 17,
721 : 18, -1, -1, -1, -1, -1, 24, 25, 26, 27,
722 : 28, 29, 30, 31, -1, 33, 34, 35, 36, 37,
723 : -1, 10, 11, 41, 13, 14, 15, 16, 17, 18,
724 : -1, -1, 21, -1, -1, 24, 25, 26, 27, 28,
725 : 29, 30, 31, -1, 33, 34, 35, 36, 37, 10,
726 : 11, -1, 13, 14, 15, 16, 17, 18, -1, -1,
727 : 21, -1, -1, 24, 25, 26, 27, 28, 29, 30,
728 : 31, -1, 33, 34, 35, 36, 37, 10, 11, -1,
729 : 13, 14, 15, 16, 17, 18, -1, -1, -1, -1,
730 : 23, 24, 25, 26, 27, 28, 29, 30, 31, -1,
731 : 33, 34, 35, 36, 37, 10, 11, -1, 13, 14,
732 : 15, 16, 17, 18, -1, -1, -1, -1, -1, 24,
733 : 25, 26, 27, 28, 29, 30, 31, -1, 33, 34,
734 : 35, 36, 37, 10, -1, -1, 13, 14, 15, 16,
735 : 17, 18, -1, -1, -1, -1, -1, 24, 25, 26,
736 : 27, 28, 29, 30, 31, -1, 33, 34, 35, 36,
737 : 37, 13, 14, 15, 16, 17, 18, -1, -1, -1,
738 : -1, -1, 24, 25, 26, 27, 28, 29, 30, 31,
739 : -1, 33, 34, 35, 36, 37, 13, 14, 15, 16,
740 : 17, -1, -1, -1, -1, -1, -1, -1, -1, 26,
741 : 27, 28, 29, 30, 31, -1, 33, 34, 35, 36,
742 : 37
743 : };
744 :
745 : /* YYSTOS[STATE-NUM] -- The symbol kind of the accessing symbol of
746 : state STATE-NUM. */
747 : static const yytype_int8 yystos[] =
748 : {
749 : 0, 3, 4, 6, 7, 8, 9, 12, 19, 32,
750 : 33, 34, 40, 43, 45, 47, 48, 45, 20, 46,
751 : 45, 45, 5, 45, 45, 0, 10, 11, 13, 14,
752 : 15, 16, 17, 18, 24, 25, 26, 27, 28, 29,
753 : 30, 31, 33, 34, 35, 36, 37, 40, 45, 20,
754 : 22, 23, 41, 45, 45, 45, 45, 45, 45, 45,
755 : 3, 7, 12, 45, 45, 45, 45, 45, 45, 45,
756 : 45, 45, 45, 45, 44, 45, 21, 45, 45, 3,
757 : 7, 39, 41, 45, 21, 23, 45, 45
758 : };
759 :
760 : /* YYR1[RULE-NUM] -- Symbol kind of the left-hand side of rule RULE-NUM. */
761 : static const yytype_int8 yyr1[] =
762 : {
763 : 0, 42, 43, 44, 44, 44, 45, 45, 45, 45,
764 : 45, 45, 45, 45, 45, 45, 45, 45, 45, 45,
765 : 45, 45, 45, 45, 45, 45, 45, 45, 45, 45,
766 : 45, 45, 45, 45, 45, 45, 45, 45, 45, 45,
767 : 45, 45, 45, 46, 46, 47, 47, 48
768 : };
769 :
770 : /* YYR2[RULE-NUM] -- Number of symbols on the right-hand side of rule RULE-NUM. */
771 : static const yytype_int8 yyr2[] =
772 : {
773 : 0, 2, 1, 0, 1, 3, 3, 2, 2, 2,
774 : 2, 2, 3, 3, 3, 3, 3, 3, 3, 3,
775 : 3, 3, 3, 3, 3, 3, 3, 3, 3, 3,
776 : 2, 2, 3, 4, 3, 4, 1, 1, 1, 1,
777 : 1, 4, 1, 5, 4, 3, 5, 1
778 : };
779 :
780 :
781 : enum { YYENOMEM = -2 };
782 :
783 : #define yyerrok (yyerrstatus = 0)
784 : #define yyclearin (yychar = YYEMPTY)
785 :
786 : #define YYACCEPT goto yyacceptlab
787 : #define YYABORT goto yyabortlab
788 : #define YYERROR goto yyerrorlab
789 : #define YYNOMEM goto yyexhaustedlab
790 :
791 :
792 : #define YYRECOVERING() (!!yyerrstatus)
793 :
794 : #define YYBACKUP(Token, Value) \
795 : do \
796 : if (yychar == YYEMPTY) \
797 : { \
798 : yychar = (Token); \
799 : yylval = (Value); \
800 : YYPOPSTACK (yylen); \
801 : yystate = *yyssp; \
802 : goto yybackup; \
803 : } \
804 : else \
805 : { \
806 : yyerror (expr_parse_result_p, yyscanner, YY_("syntax error: cannot back up")); \
807 : YYERROR; \
808 : } \
809 : while (0)
810 :
811 : /* Backward compatibility with an undocumented macro.
812 : Use YYerror or YYUNDEF. */
813 : #define YYERRCODE YYUNDEF
814 :
815 :
816 : /* Enable debugging if requested. */
817 : #if YYDEBUG
818 :
819 : # ifndef YYFPRINTF
820 : # include <stdio.h> /* INFRINGES ON USER NAME SPACE */
821 : # define YYFPRINTF fprintf
822 : # endif
823 :
824 : # define YYDPRINTF(Args) \
825 : do { \
826 : if (yydebug) \
827 : YYFPRINTF Args; \
828 : } while (0)
829 :
830 :
831 :
832 :
833 : # define YY_SYMBOL_PRINT(Title, Kind, Value, Location) \
834 : do { \
835 : if (yydebug) \
836 : { \
837 : YYFPRINTF (stderr, "%s ", Title); \
838 : yy_symbol_print (stderr, \
839 : Kind, Value, expr_parse_result_p, yyscanner); \
840 : YYFPRINTF (stderr, "\n"); \
841 : } \
842 : } while (0)
843 :
844 :
845 : /*-----------------------------------.
846 : | Print this symbol's value on YYO. |
847 : `-----------------------------------*/
848 :
849 : static void
850 : yy_symbol_value_print (FILE *yyo,
851 : yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep, PgBenchExpr **expr_parse_result_p, yyscan_t yyscanner)
852 : {
853 : FILE *yyoutput = yyo;
854 : YY_USE (yyoutput);
855 : YY_USE (expr_parse_result_p);
856 : YY_USE (yyscanner);
857 : if (!yyvaluep)
858 : return;
859 : YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
860 : YY_USE (yykind);
861 : YY_IGNORE_MAYBE_UNINITIALIZED_END
862 : }
863 :
864 :
865 : /*---------------------------.
866 : | Print this symbol on YYO. |
867 : `---------------------------*/
868 :
869 : static void
870 : yy_symbol_print (FILE *yyo,
871 : yysymbol_kind_t yykind, YYSTYPE const * const yyvaluep, PgBenchExpr **expr_parse_result_p, yyscan_t yyscanner)
872 : {
873 : YYFPRINTF (yyo, "%s %s (",
874 : yykind < YYNTOKENS ? "token" : "nterm", yysymbol_name (yykind));
875 :
876 : yy_symbol_value_print (yyo, yykind, yyvaluep, expr_parse_result_p, yyscanner);
877 : YYFPRINTF (yyo, ")");
878 : }
879 :
880 : /*------------------------------------------------------------------.
881 : | yy_stack_print -- Print the state stack from its BOTTOM up to its |
882 : | TOP (included). |
883 : `------------------------------------------------------------------*/
884 :
885 : static void
886 : yy_stack_print (yy_state_t *yybottom, yy_state_t *yytop)
887 : {
888 : YYFPRINTF (stderr, "Stack now");
889 : for (; yybottom <= yytop; yybottom++)
890 : {
891 : int yybot = *yybottom;
892 : YYFPRINTF (stderr, " %d", yybot);
893 : }
894 : YYFPRINTF (stderr, "\n");
895 : }
896 :
897 : # define YY_STACK_PRINT(Bottom, Top) \
898 : do { \
899 : if (yydebug) \
900 : yy_stack_print ((Bottom), (Top)); \
901 : } while (0)
902 :
903 :
904 : /*------------------------------------------------.
905 : | Report that the YYRULE is going to be reduced. |
906 : `------------------------------------------------*/
907 :
908 : static void
909 : yy_reduce_print (yy_state_t *yyssp, YYSTYPE *yyvsp,
910 : int yyrule, PgBenchExpr **expr_parse_result_p, yyscan_t yyscanner)
911 : {
912 : int yylno = yyrline[yyrule];
913 : int yynrhs = yyr2[yyrule];
914 : int yyi;
915 : YYFPRINTF (stderr, "Reducing stack by rule %d (line %d):\n",
916 : yyrule - 1, yylno);
917 : /* The symbols being reduced. */
918 : for (yyi = 0; yyi < yynrhs; yyi++)
919 : {
920 : YYFPRINTF (stderr, " $%d = ", yyi + 1);
921 : yy_symbol_print (stderr,
922 : YY_ACCESSING_SYMBOL (+yyssp[yyi + 1 - yynrhs]),
923 : &yyvsp[(yyi + 1) - (yynrhs)], expr_parse_result_p, yyscanner);
924 : YYFPRINTF (stderr, "\n");
925 : }
926 : }
927 :
928 : # define YY_REDUCE_PRINT(Rule) \
929 : do { \
930 : if (yydebug) \
931 : yy_reduce_print (yyssp, yyvsp, Rule, expr_parse_result_p, yyscanner); \
932 : } while (0)
933 :
934 : /* Nonzero means print parse trace. It is left uninitialized so that
935 : multiple parsers can coexist. */
936 : int yydebug;
937 : #else /* !YYDEBUG */
938 : # define YYDPRINTF(Args) ((void) 0)
939 : # define YY_SYMBOL_PRINT(Title, Kind, Value, Location)
940 : # define YY_STACK_PRINT(Bottom, Top)
941 : # define YY_REDUCE_PRINT(Rule)
942 : #endif /* !YYDEBUG */
943 :
944 :
945 : /* YYINITDEPTH -- initial size of the parser's stacks. */
946 : #ifndef YYINITDEPTH
947 : # define YYINITDEPTH 200
948 : #endif
949 :
950 : /* YYMAXDEPTH -- maximum size the stacks can grow to (effective only
951 : if the built-in stack extension method is used).
952 :
953 : Do not make this value too large; the results are undefined if
954 : YYSTACK_ALLOC_MAXIMUM < YYSTACK_BYTES (YYMAXDEPTH)
955 : evaluated with infinite-precision integer arithmetic. */
956 :
957 : #ifndef YYMAXDEPTH
958 : # define YYMAXDEPTH 10000
959 : #endif
960 :
961 :
962 :
963 :
964 :
965 :
966 : /*-----------------------------------------------.
967 : | Release the memory associated to this symbol. |
968 : `-----------------------------------------------*/
969 :
970 : static void
971 760 : yydestruct (const char *yymsg,
972 : yysymbol_kind_t yykind, YYSTYPE *yyvaluep, PgBenchExpr **expr_parse_result_p, yyscan_t yyscanner)
973 : {
974 : YY_USE (yyvaluep);
975 : YY_USE (expr_parse_result_p);
976 : YY_USE (yyscanner);
977 760 : if (!yymsg)
978 0 : yymsg = "Deleting";
979 : YY_SYMBOL_PRINT (yymsg, yykind, yyvaluep, yylocationp);
980 :
981 : YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
982 : YY_USE (yykind);
983 : YY_IGNORE_MAYBE_UNINITIALIZED_END
984 760 : }
985 :
986 :
987 :
988 :
989 :
990 :
991 : /*----------.
992 : | yyparse. |
993 : `----------*/
994 :
995 : int
996 399 : yyparse (PgBenchExpr **expr_parse_result_p, yyscan_t yyscanner)
997 : {
998 : /* Lookahead token kind. */
999 : int yychar;
1000 :
1001 :
1002 : /* The semantic value of the lookahead symbol. */
1003 : /* Default value used for initialization, for pacifying older GCCs
1004 : or non-GCC compilers. */
1005 : YY_INITIAL_VALUE (static YYSTYPE yyval_default;)
1006 : YYSTYPE yylval YY_INITIAL_VALUE (= yyval_default);
1007 :
1008 : /* Number of syntax errors so far. */
1009 399 : int yynerrs = 0;
1010 :
1011 399 : yy_state_fast_t yystate = 0;
1012 : /* Number of tokens to shift before error messages enabled. */
1013 399 : int yyerrstatus = 0;
1014 :
1015 : /* Refer to the stacks through separate pointers, to allow yyoverflow
1016 : to reallocate them elsewhere. */
1017 :
1018 : /* Their size. */
1019 399 : YYPTRDIFF_T yystacksize = YYINITDEPTH;
1020 :
1021 : /* The state stack: array, bottom, top. */
1022 : yy_state_t yyssa[YYINITDEPTH];
1023 399 : yy_state_t *yyss = yyssa;
1024 399 : yy_state_t *yyssp = yyss;
1025 :
1026 : /* The semantic value stack: array, bottom, top. */
1027 : YYSTYPE yyvsa[YYINITDEPTH];
1028 399 : YYSTYPE *yyvs = yyvsa;
1029 399 : YYSTYPE *yyvsp = yyvs;
1030 :
1031 : int yyn;
1032 : /* The return value of yyparse. */
1033 : int yyresult;
1034 : /* Lookahead symbol kind. */
1035 399 : yysymbol_kind_t yytoken = YYSYMBOL_YYEMPTY;
1036 : /* The variables used to return semantic value and location from the
1037 : action routines. */
1038 : YYSTYPE yyval;
1039 :
1040 :
1041 :
1042 : #define YYPOPSTACK(N) (yyvsp -= (N), yyssp -= (N))
1043 :
1044 : /* The number of symbols on the RHS of the reduced rule.
1045 : Keep to zero when no symbol should be popped. */
1046 399 : int yylen = 0;
1047 :
1048 : YYDPRINTF ((stderr, "Starting parse\n"));
1049 :
1050 399 : yychar = YYEMPTY; /* Cause a token to be read. */
1051 :
1052 399 : goto yysetstate;
1053 :
1054 :
1055 : /*------------------------------------------------------------.
1056 : | yynewstate -- push a new state, which is found in yystate. |
1057 : `------------------------------------------------------------*/
1058 7405 : yynewstate:
1059 : /* In all cases, when you get here, the value and location stacks
1060 : have just been pushed. So pushing a state here evens the stacks. */
1061 7405 : yyssp++;
1062 :
1063 :
1064 : /*--------------------------------------------------------------------.
1065 : | yysetstate -- set current state (the top of the stack) to yystate. |
1066 : `--------------------------------------------------------------------*/
1067 7804 : yysetstate:
1068 : YYDPRINTF ((stderr, "Entering state %d\n", yystate));
1069 : YY_ASSERT (0 <= yystate && yystate < YYNSTATES);
1070 : YY_IGNORE_USELESS_CAST_BEGIN
1071 7804 : *yyssp = YY_CAST (yy_state_t, yystate);
1072 : YY_IGNORE_USELESS_CAST_END
1073 : YY_STACK_PRINT (yyss, yyssp);
1074 :
1075 7804 : if (yyss + yystacksize - 1 <= yyssp)
1076 : #if !defined yyoverflow && !defined YYSTACK_RELOCATE
1077 : YYNOMEM;
1078 : #else
1079 : {
1080 : /* Get the current used size of the three stacks, in elements. */
1081 0 : YYPTRDIFF_T yysize = yyssp - yyss + 1;
1082 :
1083 : # if defined yyoverflow
1084 : {
1085 : /* Give user a chance to reallocate the stack. Use copies of
1086 : these so that the &'s don't force the real ones into
1087 : memory. */
1088 : yy_state_t *yyss1 = yyss;
1089 : YYSTYPE *yyvs1 = yyvs;
1090 :
1091 : /* Each stack pointer address is followed by the size of the
1092 : data in use in that stack, in bytes. This used to be a
1093 : conditional around just the two extra args, but that might
1094 : be undefined if yyoverflow is a macro. */
1095 : yyoverflow (YY_("memory exhausted"),
1096 : &yyss1, yysize * YYSIZEOF (*yyssp),
1097 : &yyvs1, yysize * YYSIZEOF (*yyvsp),
1098 : &yystacksize);
1099 : yyss = yyss1;
1100 : yyvs = yyvs1;
1101 : }
1102 : # else /* defined YYSTACK_RELOCATE */
1103 : /* Extend the stack our own way. */
1104 0 : if (YYMAXDEPTH <= yystacksize)
1105 0 : YYNOMEM;
1106 0 : yystacksize *= 2;
1107 0 : if (YYMAXDEPTH < yystacksize)
1108 0 : yystacksize = YYMAXDEPTH;
1109 :
1110 : {
1111 0 : yy_state_t *yyss1 = yyss;
1112 : union yyalloc *yyptr =
1113 0 : YY_CAST (union yyalloc *,
1114 : YYSTACK_ALLOC (YY_CAST (YYSIZE_T, YYSTACK_BYTES (yystacksize))));
1115 0 : if (! yyptr)
1116 0 : YYNOMEM;
1117 0 : YYSTACK_RELOCATE (yyss_alloc, yyss);
1118 0 : YYSTACK_RELOCATE (yyvs_alloc, yyvs);
1119 : # undef YYSTACK_RELOCATE
1120 0 : if (yyss1 != yyssa)
1121 0 : YYSTACK_FREE (yyss1);
1122 : }
1123 : # endif
1124 :
1125 0 : yyssp = yyss + yysize - 1;
1126 0 : yyvsp = yyvs + yysize - 1;
1127 :
1128 : YY_IGNORE_USELESS_CAST_BEGIN
1129 : YYDPRINTF ((stderr, "Stack size increased to %ld\n",
1130 : YY_CAST (long, yystacksize)));
1131 : YY_IGNORE_USELESS_CAST_END
1132 :
1133 0 : if (yyss + yystacksize - 1 <= yyssp)
1134 0 : YYABORT;
1135 : }
1136 : #endif /* !defined yyoverflow && !defined YYSTACK_RELOCATE */
1137 :
1138 :
1139 7804 : if (yystate == YYFINAL)
1140 380 : YYACCEPT;
1141 :
1142 7424 : goto yybackup;
1143 :
1144 :
1145 : /*-----------.
1146 : | yybackup. |
1147 : `-----------*/
1148 7424 : yybackup:
1149 : /* Do appropriate processing given the current state. Read a
1150 : lookahead token if we need one and don't already have one. */
1151 :
1152 : /* First try to decide what to do without reference to lookahead token. */
1153 7424 : yyn = yypact[yystate];
1154 7424 : if (yypact_value_is_default (yyn))
1155 2319 : goto yydefault;
1156 :
1157 : /* Not known => get a lookahead token if don't already have one. */
1158 :
1159 : /* YYCHAR is either empty, or end-of-input, or a valid lookahead. */
1160 5105 : if (yychar == YYEMPTY)
1161 : {
1162 : YYDPRINTF ((stderr, "Reading a token\n"));
1163 3764 : yychar = yylex (&yylval, yyscanner);
1164 : }
1165 :
1166 5101 : if (yychar <= YYEOF)
1167 : {
1168 780 : yychar = YYEOF;
1169 780 : yytoken = YYSYMBOL_YYEOF;
1170 : YYDPRINTF ((stderr, "Now at end of input.\n"));
1171 : }
1172 4321 : else if (yychar == YYerror)
1173 : {
1174 : /* The scanner already issued an error message, process directly
1175 : to error recovery. But do not keep the error token as
1176 : lookahead, it is too special and may lead us to an endless
1177 : loop in error recovery. */
1178 0 : yychar = YYUNDEF;
1179 0 : yytoken = YYSYMBOL_YYerror;
1180 0 : goto yyerrlab1;
1181 : }
1182 : else
1183 : {
1184 4321 : yytoken = YYTRANSLATE (yychar);
1185 : YY_SYMBOL_PRINT ("Next token is", yytoken, &yylval, &yylloc);
1186 : }
1187 :
1188 : /* If the proper action on seeing token YYTOKEN is to reduce or to
1189 : detect an error, take that action. */
1190 5101 : yyn += yytoken;
1191 5101 : if (yyn < 0 || YYLAST < yyn || yycheck[yyn] != yytoken)
1192 1347 : goto yydefault;
1193 3754 : yyn = yytable[yyn];
1194 3754 : if (yyn <= 0)
1195 : {
1196 0 : if (yytable_value_is_error (yyn))
1197 0 : goto yyerrlab;
1198 0 : yyn = -yyn;
1199 0 : goto yyreduce;
1200 : }
1201 :
1202 : /* Count tokens shifted since error; after three, turn off error
1203 : status. */
1204 3754 : if (yyerrstatus)
1205 0 : yyerrstatus--;
1206 :
1207 : /* Shift the lookahead token. */
1208 : YY_SYMBOL_PRINT ("Shifting", yytoken, &yylval, &yylloc);
1209 3754 : yystate = yyn;
1210 : YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
1211 3754 : *++yyvsp = yylval;
1212 : YY_IGNORE_MAYBE_UNINITIALIZED_END
1213 :
1214 : /* Discard the shifted token. */
1215 3754 : yychar = YYEMPTY;
1216 3754 : goto yynewstate;
1217 :
1218 :
1219 : /*-----------------------------------------------------------.
1220 : | yydefault -- do the default action for the current state. |
1221 : `-----------------------------------------------------------*/
1222 3666 : yydefault:
1223 3666 : yyn = yydefact[yystate];
1224 3666 : if (yyn == 0)
1225 6 : goto yyerrlab;
1226 3660 : goto yyreduce;
1227 :
1228 :
1229 : /*-----------------------------.
1230 : | yyreduce -- do a reduction. |
1231 : `-----------------------------*/
1232 3660 : yyreduce:
1233 : /* yyn is the number of a rule to reduce with. */
1234 3660 : yylen = yyr2[yyn];
1235 :
1236 : /* If YYLEN is nonzero, implement the default value of the action:
1237 : '$$ = $1'.
1238 :
1239 : Otherwise, the following line sets YYVAL to garbage.
1240 : This behavior is undocumented and Bison
1241 : users should not rely upon it. Assigning to YYVAL
1242 : unconditionally makes the parser a bit smaller, and it avoids a
1243 : GCC warning that YYVAL may be used uninitialized. */
1244 3660 : yyval = yyvsp[1-yylen];
1245 :
1246 :
1247 : YY_REDUCE_PRINT (yyn);
1248 3660 : switch (yyn)
1249 : {
1250 380 : case 2: /* result: expr */
1251 : #line 82 "exprparse.y"
1252 : {
1253 : *expr_parse_result_p = (yyvsp[0].expr);
1254 : (void) yynerrs; /* suppress compiler warning */
1255 : }
1256 : #line 1257 "exprparse.c"
1257 380 : break;
1258 :
1259 5 : case 3: /* elist: %empty */
1260 : #line 87 "exprparse.y"
1261 : { (yyval.elist) = NULL; }
1262 : #line 1263 "exprparse.c"
1263 5 : break;
1264 :
1265 393 : case 4: /* elist: expr */
1266 : #line 88 "exprparse.y"
1267 : { (yyval.elist) = make_elist((yyvsp[0].expr), NULL); }
1268 : #line 1269 "exprparse.c"
1269 393 : break;
1270 :
1271 343 : case 5: /* elist: elist ',' expr */
1272 : #line 89 "exprparse.y"
1273 : { (yyval.elist) = make_elist((yyvsp[0].expr), (yyvsp[-2].elist)); }
1274 : #line 1275 "exprparse.c"
1275 343 : break;
1276 :
1277 52 : case 6: /* expr: '(' expr ')' */
1278 : #line 92 "exprparse.y"
1279 : { (yyval.expr) = (yyvsp[-1].expr); }
1280 : #line 1281 "exprparse.c"
1281 52 : break;
1282 :
1283 2 : case 7: /* expr: '+' expr */
1284 : #line 93 "exprparse.y"
1285 : { (yyval.expr) = (yyvsp[0].expr); }
1286 : #line 1287 "exprparse.c"
1287 2 : break;
1288 :
1289 46 : case 8: /* expr: '-' expr */
1290 : #line 95 "exprparse.y"
1291 : { (yyval.expr) = make_op(yyscanner, "-",
1292 : make_integer_constant(0), (yyvsp[0].expr)); }
1293 : #line 1294 "exprparse.c"
1294 46 : break;
1295 :
1296 1 : case 9: /* expr: '-' MAXINT_PLUS_ONE_CONST */
1297 : #line 99 "exprparse.y"
1298 : { (yyval.expr) = make_integer_constant(PG_INT64_MIN); }
1299 : #line 1300 "exprparse.c"
1300 1 : break;
1301 :
1302 2 : case 10: /* expr: '~' expr */
1303 : #line 101 "exprparse.y"
1304 : { (yyval.expr) = make_op(yyscanner, "#",
1305 : make_integer_constant(~INT64CONST(0)), (yyvsp[0].expr)); }
1306 : #line 1307 "exprparse.c"
1307 2 : break;
1308 :
1309 12 : case 11: /* expr: NOT_OP expr */
1310 : #line 103 "exprparse.y"
1311 : { (yyval.expr) = make_uop(yyscanner, "!not", (yyvsp[0].expr)); }
1312 : #line 1313 "exprparse.c"
1313 12 : break;
1314 :
1315 48 : case 12: /* expr: expr '+' expr */
1316 : #line 104 "exprparse.y"
1317 : { (yyval.expr) = make_op(yyscanner, "+", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1318 : #line 1319 "exprparse.c"
1319 48 : break;
1320 :
1321 18 : case 13: /* expr: expr '-' expr */
1322 : #line 105 "exprparse.y"
1323 : { (yyval.expr) = make_op(yyscanner, "-", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1324 : #line 1325 "exprparse.c"
1325 18 : break;
1326 :
1327 204 : case 14: /* expr: expr '*' expr */
1328 : #line 106 "exprparse.y"
1329 : { (yyval.expr) = make_op(yyscanner, "*", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1330 : #line 1331 "exprparse.c"
1331 204 : break;
1332 :
1333 13 : case 15: /* expr: expr '/' expr */
1334 : #line 107 "exprparse.y"
1335 : { (yyval.expr) = make_op(yyscanner, "/", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1336 : #line 1337 "exprparse.c"
1337 13 : break;
1338 :
1339 2 : case 16: /* expr: expr '%' expr */
1340 : #line 108 "exprparse.y"
1341 : { (yyval.expr) = make_op(yyscanner, "mod", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1342 : #line 1343 "exprparse.c"
1343 2 : break;
1344 :
1345 10 : case 17: /* expr: expr '<' expr */
1346 : #line 109 "exprparse.y"
1347 : { (yyval.expr) = make_op(yyscanner, "<", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1348 : #line 1349 "exprparse.c"
1349 10 : break;
1350 :
1351 4 : case 18: /* expr: expr LE_OP expr */
1352 : #line 110 "exprparse.y"
1353 : { (yyval.expr) = make_op(yyscanner, "<=", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1354 : #line 1355 "exprparse.c"
1355 4 : break;
1356 :
1357 6 : case 19: /* expr: expr '>' expr */
1358 : #line 111 "exprparse.y"
1359 : { (yyval.expr) = make_op(yyscanner, "<", (yyvsp[0].expr), (yyvsp[-2].expr)); }
1360 : #line 1361 "exprparse.c"
1361 6 : break;
1362 :
1363 3 : case 20: /* expr: expr GE_OP expr */
1364 : #line 112 "exprparse.y"
1365 : { (yyval.expr) = make_op(yyscanner, "<=", (yyvsp[0].expr), (yyvsp[-2].expr)); }
1366 : #line 1367 "exprparse.c"
1367 3 : break;
1368 :
1369 32 : case 21: /* expr: expr '=' expr */
1370 : #line 113 "exprparse.y"
1371 : { (yyval.expr) = make_op(yyscanner, "=", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1372 : #line 1373 "exprparse.c"
1373 32 : break;
1374 :
1375 8 : case 22: /* expr: expr NE_OP expr */
1376 : #line 114 "exprparse.y"
1377 : { (yyval.expr) = make_op(yyscanner, "<>", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1378 : #line 1379 "exprparse.c"
1379 8 : break;
1380 :
1381 1 : case 23: /* expr: expr '&' expr */
1382 : #line 115 "exprparse.y"
1383 : { (yyval.expr) = make_op(yyscanner, "&", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1384 : #line 1385 "exprparse.c"
1385 1 : break;
1386 :
1387 2 : case 24: /* expr: expr '|' expr */
1388 : #line 116 "exprparse.y"
1389 : { (yyval.expr) = make_op(yyscanner, "|", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1390 : #line 1391 "exprparse.c"
1391 2 : break;
1392 :
1393 1 : case 25: /* expr: expr '#' expr */
1394 : #line 117 "exprparse.y"
1395 : { (yyval.expr) = make_op(yyscanner, "#", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1396 : #line 1397 "exprparse.c"
1397 1 : break;
1398 :
1399 7 : case 26: /* expr: expr LS_OP expr */
1400 : #line 118 "exprparse.y"
1401 : { (yyval.expr) = make_op(yyscanner, "<<", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1402 : #line 1403 "exprparse.c"
1403 7 : break;
1404 :
1405 1 : case 27: /* expr: expr RS_OP expr */
1406 : #line 119 "exprparse.y"
1407 : { (yyval.expr) = make_op(yyscanner, ">>", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1408 : #line 1409 "exprparse.c"
1409 1 : break;
1410 :
1411 44 : case 28: /* expr: expr AND_OP expr */
1412 : #line 120 "exprparse.y"
1413 : { (yyval.expr) = make_op(yyscanner, "!and", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1414 : #line 1415 "exprparse.c"
1415 44 : break;
1416 :
1417 5 : case 29: /* expr: expr OR_OP expr */
1418 : #line 121 "exprparse.y"
1419 : { (yyval.expr) = make_op(yyscanner, "!or", (yyvsp[-2].expr), (yyvsp[0].expr)); }
1420 : #line 1421 "exprparse.c"
1421 5 : break;
1422 :
1423 1 : case 30: /* expr: expr ISNULL_OP */
1424 : #line 123 "exprparse.y"
1425 : { (yyval.expr) = make_op(yyscanner, "!is", (yyvsp[-1].expr), make_null_constant()); }
1426 : #line 1427 "exprparse.c"
1427 1 : break;
1428 :
1429 1 : case 31: /* expr: expr NOTNULL_OP */
1430 : #line 124 "exprparse.y"
1431 : {
1432 : (yyval.expr) = make_uop(yyscanner, "!not",
1433 : make_op(yyscanner, "!is", (yyvsp[-1].expr), make_null_constant()));
1434 : }
1435 : #line 1436 "exprparse.c"
1436 1 : break;
1437 :
1438 4 : case 32: /* expr: expr IS_OP NULL_CONST */
1439 : #line 128 "exprparse.y"
1440 : { (yyval.expr) = make_op(yyscanner, "!is", (yyvsp[-2].expr), make_null_constant()); }
1441 : #line 1442 "exprparse.c"
1442 4 : break;
1443 :
1444 2 : case 33: /* expr: expr IS_OP NOT_OP NULL_CONST */
1445 : #line 130 "exprparse.y"
1446 : {
1447 : (yyval.expr) = make_uop(yyscanner, "!not",
1448 : make_op(yyscanner, "!is", (yyvsp[-3].expr), make_null_constant()));
1449 : }
1450 : #line 1451 "exprparse.c"
1451 2 : break;
1452 :
1453 1 : case 34: /* expr: expr IS_OP BOOLEAN_CONST */
1454 : #line 135 "exprparse.y"
1455 : {
1456 : (yyval.expr) = make_op(yyscanner, "!is", (yyvsp[-2].expr), make_boolean_constant((yyvsp[0].bval)));
1457 : }
1458 : #line 1459 "exprparse.c"
1459 1 : break;
1460 :
1461 1 : case 35: /* expr: expr IS_OP NOT_OP BOOLEAN_CONST */
1462 : #line 139 "exprparse.y"
1463 : {
1464 : (yyval.expr) = make_uop(yyscanner, "!not",
1465 : make_op(yyscanner, "!is", (yyvsp[-3].expr), make_boolean_constant((yyvsp[0].bval))));
1466 : }
1467 : #line 1468 "exprparse.c"
1468 1 : break;
1469 :
1470 6 : case 36: /* expr: NULL_CONST */
1471 : #line 144 "exprparse.y"
1472 : { (yyval.expr) = make_null_constant(); }
1473 : #line 1474 "exprparse.c"
1474 6 : break;
1475 :
1476 31 : case 37: /* expr: BOOLEAN_CONST */
1477 : #line 145 "exprparse.y"
1478 : { (yyval.expr) = make_boolean_constant((yyvsp[0].bval)); }
1479 : #line 1480 "exprparse.c"
1480 31 : break;
1481 :
1482 794 : case 38: /* expr: INTEGER_CONST */
1483 : #line 146 "exprparse.y"
1484 : { (yyval.expr) = make_integer_constant((yyvsp[0].ival)); }
1485 : #line 1486 "exprparse.c"
1486 794 : break;
1487 :
1488 61 : case 39: /* expr: DOUBLE_CONST */
1489 : #line 147 "exprparse.y"
1490 : { (yyval.expr) = make_double_constant((yyvsp[0].dval)); }
1491 : #line 1492 "exprparse.c"
1492 61 : break;
1493 :
1494 272 : case 40: /* expr: VARIABLE */
1495 : #line 149 "exprparse.y"
1496 : { (yyval.expr) = make_variable((yyvsp[0].str)); }
1497 : #line 1498 "exprparse.c"
1498 272 : break;
1499 :
1500 398 : case 41: /* expr: function '(' elist ')' */
1501 : #line 150 "exprparse.y"
1502 : { (yyval.expr) = make_func(yyscanner, (yyvsp[-3].ival), (yyvsp[-1].elist)); }
1503 : #line 1504 "exprparse.c"
1504 390 : break;
1505 :
1506 14 : case 42: /* expr: case_control */
1507 : #line 151 "exprparse.y"
1508 : { (yyval.expr) = (yyvsp[0].expr); }
1509 : #line 1510 "exprparse.c"
1510 14 : break;
1511 :
1512 2 : case 43: /* when_then_list: when_then_list WHEN_KW expr THEN_KW expr */
1513 : #line 155 "exprparse.y"
1514 : { (yyval.elist) = make_elist((yyvsp[0].expr), make_elist((yyvsp[-2].expr), (yyvsp[-4].elist))); }
1515 : #line 1516 "exprparse.c"
1516 2 : break;
1517 :
1518 14 : case 44: /* when_then_list: WHEN_KW expr THEN_KW expr */
1519 : #line 156 "exprparse.y"
1520 : { (yyval.elist) = make_elist((yyvsp[0].expr), make_elist((yyvsp[-2].expr), NULL)); }
1521 : #line 1522 "exprparse.c"
1522 14 : break;
1523 :
1524 4 : case 45: /* case_control: CASE_KW when_then_list END_KW */
1525 : #line 159 "exprparse.y"
1526 : { (yyval.expr) = make_case(yyscanner, (yyvsp[-1].elist), make_null_constant()); }
1527 : #line 1528 "exprparse.c"
1528 4 : break;
1529 :
1530 10 : case 46: /* case_control: CASE_KW when_then_list ELSE_KW expr END_KW */
1531 : #line 160 "exprparse.y"
1532 : { (yyval.expr) = make_case(yyscanner, (yyvsp[-3].elist), (yyvsp[-1].expr)); }
1533 : #line 1534 "exprparse.c"
1534 10 : break;
1535 :
1536 399 : case 47: /* function: FUNCTION */
1537 : #line 162 "exprparse.y"
1538 : { (yyval.ival) = find_func(yyscanner, (yyvsp[0].str)); pg_free((yyvsp[0].str)); }
1539 : #line 1540 "exprparse.c"
1540 398 : break;
1541 :
1542 :
1543 : #line 1544 "exprparse.c"
1544 :
1545 0 : default: break;
1546 : }
1547 : /* User semantic actions sometimes alter yychar, and that requires
1548 : that yytoken be updated with the new translation. We take the
1549 : approach of translating immediately before every use of yytoken.
1550 : One alternative is translating here after every semantic action,
1551 : but that translation would be missed if the semantic action invokes
1552 : YYABORT, YYACCEPT, or YYERROR immediately after altering yychar or
1553 : if it invokes YYBACKUP. In the case of YYABORT or YYACCEPT, an
1554 : incorrect destructor might then be invoked immediately. In the
1555 : case of YYERROR or YYBACKUP, subsequent parser actions might lead
1556 : to an incorrect destructor call or verbose syntax error message
1557 : before the lookahead is translated. */
1558 : YY_SYMBOL_PRINT ("-> $$ =", YY_CAST (yysymbol_kind_t, yyr1[yyn]), &yyval, &yyloc);
1559 :
1560 3651 : YYPOPSTACK (yylen);
1561 3651 : yylen = 0;
1562 :
1563 3651 : *++yyvsp = yyval;
1564 :
1565 : /* Now 'shift' the result of the reduction. Determine what state
1566 : that goes to, based on the state we popped back to and the rule
1567 : number reduced by. */
1568 : {
1569 3651 : const int yylhs = yyr1[yyn] - YYNTOKENS;
1570 3651 : const int yyi = yypgoto[yylhs] + *yyssp;
1571 2521 : yystate = (0 <= yyi && yyi <= YYLAST && yycheck[yyi] == *yyssp
1572 1700 : ? yytable[yyi]
1573 6172 : : yydefgoto[yylhs]);
1574 : }
1575 :
1576 3651 : goto yynewstate;
1577 :
1578 :
1579 : /*--------------------------------------.
1580 : | yyerrlab -- here on detecting error. |
1581 : `--------------------------------------*/
1582 6 : yyerrlab:
1583 : /* Make sure we have latest lookahead translation. See comments at
1584 : user semantic actions for why this is necessary. */
1585 6 : yytoken = yychar == YYEMPTY ? YYSYMBOL_YYEMPTY : YYTRANSLATE (yychar);
1586 : /* If not already recovering from an error, report this error. */
1587 6 : if (!yyerrstatus)
1588 : {
1589 6 : ++yynerrs;
1590 6 : yyerror (expr_parse_result_p, yyscanner, YY_("syntax error"));
1591 : }
1592 :
1593 0 : if (yyerrstatus == 3)
1594 : {
1595 : /* If just tried and failed to reuse lookahead token after an
1596 : error, discard it. */
1597 :
1598 0 : if (yychar <= YYEOF)
1599 : {
1600 : /* Return failure if at end of input. */
1601 0 : if (yychar == YYEOF)
1602 0 : YYABORT;
1603 : }
1604 : else
1605 : {
1606 0 : yydestruct ("Error: discarding",
1607 : yytoken, &yylval, expr_parse_result_p, yyscanner);
1608 0 : yychar = YYEMPTY;
1609 : }
1610 : }
1611 :
1612 : /* Else will try to reuse lookahead token after shifting the error
1613 : token. */
1614 0 : goto yyerrlab1;
1615 :
1616 :
1617 : /*---------------------------------------------------.
1618 : | yyerrorlab -- error raised explicitly by YYERROR. |
1619 : `---------------------------------------------------*/
1620 : yyerrorlab:
1621 : /* Pacify compilers when the user code never invokes YYERROR and the
1622 : label yyerrorlab therefore never appears in user code. */
1623 : if (0)
1624 : YYERROR;
1625 : ++yynerrs;
1626 :
1627 : /* Do not reclaim the symbols of the rule whose action triggered
1628 : this YYERROR. */
1629 : YYPOPSTACK (yylen);
1630 : yylen = 0;
1631 : YY_STACK_PRINT (yyss, yyssp);
1632 : yystate = *yyssp;
1633 : goto yyerrlab1;
1634 :
1635 :
1636 : /*-------------------------------------------------------------.
1637 : | yyerrlab1 -- common code for both syntax error and YYERROR. |
1638 : `-------------------------------------------------------------*/
1639 0 : yyerrlab1:
1640 0 : yyerrstatus = 3; /* Each real token shifted decrements this. */
1641 :
1642 : /* Pop stack until we find a state that shifts the error token. */
1643 : for (;;)
1644 : {
1645 0 : yyn = yypact[yystate];
1646 0 : if (!yypact_value_is_default (yyn))
1647 : {
1648 0 : yyn += YYSYMBOL_YYerror;
1649 0 : if (0 <= yyn && yyn <= YYLAST && yycheck[yyn] == YYSYMBOL_YYerror)
1650 : {
1651 0 : yyn = yytable[yyn];
1652 0 : if (0 < yyn)
1653 0 : break;
1654 : }
1655 : }
1656 :
1657 : /* Pop the current state because it cannot handle the error token. */
1658 0 : if (yyssp == yyss)
1659 0 : YYABORT;
1660 :
1661 :
1662 0 : yydestruct ("Error: popping",
1663 0 : YY_ACCESSING_SYMBOL (yystate), yyvsp, expr_parse_result_p, yyscanner);
1664 0 : YYPOPSTACK (1);
1665 0 : yystate = *yyssp;
1666 : YY_STACK_PRINT (yyss, yyssp);
1667 : }
1668 :
1669 : YY_IGNORE_MAYBE_UNINITIALIZED_BEGIN
1670 0 : *++yyvsp = yylval;
1671 : YY_IGNORE_MAYBE_UNINITIALIZED_END
1672 :
1673 :
1674 : /* Shift the error token. */
1675 : YY_SYMBOL_PRINT ("Shifting", YY_ACCESSING_SYMBOL (yyn), yyvsp, yylsp);
1676 :
1677 0 : yystate = yyn;
1678 0 : goto yynewstate;
1679 :
1680 :
1681 : /*-------------------------------------.
1682 : | yyacceptlab -- YYACCEPT comes here. |
1683 : `-------------------------------------*/
1684 380 : yyacceptlab:
1685 380 : yyresult = 0;
1686 380 : goto yyreturnlab;
1687 :
1688 :
1689 : /*-----------------------------------.
1690 : | yyabortlab -- YYABORT comes here. |
1691 : `-----------------------------------*/
1692 0 : yyabortlab:
1693 0 : yyresult = 1;
1694 0 : goto yyreturnlab;
1695 :
1696 :
1697 : /*-----------------------------------------------------------.
1698 : | yyexhaustedlab -- YYNOMEM (memory exhaustion) comes here. |
1699 : `-----------------------------------------------------------*/
1700 0 : yyexhaustedlab:
1701 0 : yyerror (expr_parse_result_p, yyscanner, YY_("memory exhausted"));
1702 : yyresult = 2;
1703 : goto yyreturnlab;
1704 :
1705 :
1706 : /*----------------------------------------------------------.
1707 : | yyreturnlab -- parsing is finished, clean up and return. |
1708 : `----------------------------------------------------------*/
1709 380 : yyreturnlab:
1710 380 : if (yychar != YYEMPTY)
1711 : {
1712 : /* Make sure we have latest lookahead translation. See comments at
1713 : user semantic actions for why this is necessary. */
1714 0 : yytoken = YYTRANSLATE (yychar);
1715 0 : yydestruct ("Cleanup: discarding lookahead",
1716 : yytoken, &yylval, expr_parse_result_p, yyscanner);
1717 : }
1718 : /* Do not reclaim the symbols of the rule whose action triggered
1719 : this YYABORT or YYACCEPT. */
1720 380 : YYPOPSTACK (yylen);
1721 : YY_STACK_PRINT (yyss, yyssp);
1722 1140 : while (yyssp != yyss)
1723 : {
1724 760 : yydestruct ("Cleanup: popping",
1725 760 : YY_ACCESSING_SYMBOL (+*yyssp), yyvsp, expr_parse_result_p, yyscanner);
1726 760 : YYPOPSTACK (1);
1727 : }
1728 : #ifndef yyoverflow
1729 380 : if (yyss != yyssa)
1730 0 : YYSTACK_FREE (yyss);
1731 : #endif
1732 :
1733 380 : return yyresult;
1734 : }
1735 :
1736 : #line 165 "exprparse.y"
1737 :
1738 :
1739 : static PgBenchExpr *
1740 : make_null_constant(void)
1741 : {
1742 : PgBenchExpr *expr = pg_malloc_object(PgBenchExpr);
1743 :
1744 : expr->etype = ENODE_CONSTANT;
1745 : expr->u.constant.type = PGBT_NULL;
1746 : expr->u.constant.u.ival = 0;
1747 : return expr;
1748 : }
1749 :
1750 : static PgBenchExpr *
1751 : make_integer_constant(int64 ival)
1752 : {
1753 : PgBenchExpr *expr = pg_malloc_object(PgBenchExpr);
1754 :
1755 : expr->etype = ENODE_CONSTANT;
1756 : expr->u.constant.type = PGBT_INT;
1757 : expr->u.constant.u.ival = ival;
1758 : return expr;
1759 : }
1760 :
1761 : static PgBenchExpr *
1762 : make_double_constant(double dval)
1763 : {
1764 : PgBenchExpr *expr = pg_malloc_object(PgBenchExpr);
1765 :
1766 : expr->etype = ENODE_CONSTANT;
1767 : expr->u.constant.type = PGBT_DOUBLE;
1768 : expr->u.constant.u.dval = dval;
1769 : return expr;
1770 : }
1771 :
1772 : static PgBenchExpr *
1773 : make_boolean_constant(bool bval)
1774 : {
1775 : PgBenchExpr *expr = pg_malloc_object(PgBenchExpr);
1776 :
1777 : expr->etype = ENODE_CONSTANT;
1778 : expr->u.constant.type = PGBT_BOOLEAN;
1779 : expr->u.constant.u.bval = bval;
1780 : return expr;
1781 : }
1782 :
1783 : static PgBenchExpr *
1784 : make_variable(char *varname)
1785 : {
1786 : PgBenchExpr *expr = pg_malloc_object(PgBenchExpr);
1787 :
1788 : expr->etype = ENODE_VARIABLE;
1789 : expr->u.variable.varname = varname;
1790 : return expr;
1791 : }
1792 :
1793 : /* binary operators */
1794 : static PgBenchExpr *
1795 : make_op(yyscan_t yyscanner, const char *operator,
1796 : PgBenchExpr *lexpr, PgBenchExpr *rexpr)
1797 : {
1798 : return make_func(yyscanner, find_func(yyscanner, operator),
1799 : make_elist(rexpr, make_elist(lexpr, NULL)));
1800 : }
1801 :
1802 : /* unary operator */
1803 : static PgBenchExpr *
1804 : make_uop(yyscan_t yyscanner, const char *operator, PgBenchExpr *expr)
1805 : {
1806 : return make_func(yyscanner, find_func(yyscanner, operator), make_elist(expr, NULL));
1807 : }
1808 :
1809 : /*
1810 : * List of available functions:
1811 : * - fname: function name, "!..." for special internal functions
1812 : * - nargs: number of arguments. Special cases:
1813 : * - PGBENCH_NARGS_VARIABLE is a special value for least & greatest
1814 : * meaning #args >= 1;
1815 : * - PGBENCH_NARGS_CASE is for the "CASE WHEN ..." function, which
1816 : * has #args >= 3 and odd;
1817 : * - PGBENCH_NARGS_HASH is for hash functions, which have one required
1818 : * and one optional argument;
1819 : * - tag: function identifier from PgBenchFunction enum
1820 : */
1821 : static const struct
1822 : {
1823 : const char *fname;
1824 : int nargs;
1825 : PgBenchFunction tag;
1826 : } PGBENCH_FUNCTIONS[] =
1827 :
1828 : {
1829 : /* parsed as operators, executed as functions */
1830 : {
1831 : "+", 2, PGBENCH_ADD
1832 : },
1833 : {
1834 : "-", 2, PGBENCH_SUB
1835 : },
1836 : {
1837 : "*", 2, PGBENCH_MUL
1838 : },
1839 : {
1840 : "/", 2, PGBENCH_DIV
1841 : },
1842 : {
1843 : "mod", 2, PGBENCH_MOD
1844 : },
1845 : /* actual functions */
1846 : {
1847 : "abs", 1, PGBENCH_ABS
1848 : },
1849 : {
1850 : "least", PGBENCH_NARGS_VARIABLE, PGBENCH_LEAST
1851 : },
1852 : {
1853 : "greatest", PGBENCH_NARGS_VARIABLE, PGBENCH_GREATEST
1854 : },
1855 : {
1856 : "debug", 1, PGBENCH_DEBUG
1857 : },
1858 : {
1859 : "pi", 0, PGBENCH_PI
1860 : },
1861 : {
1862 : "sqrt", 1, PGBENCH_SQRT
1863 : },
1864 : {
1865 : "ln", 1, PGBENCH_LN
1866 : },
1867 : {
1868 : "exp", 1, PGBENCH_EXP
1869 : },
1870 : {
1871 : "int", 1, PGBENCH_INT
1872 : },
1873 : {
1874 : "double", 1, PGBENCH_DOUBLE
1875 : },
1876 : {
1877 : "random", 2, PGBENCH_RANDOM
1878 : },
1879 : {
1880 : "random_gaussian", 3, PGBENCH_RANDOM_GAUSSIAN
1881 : },
1882 : {
1883 : "random_exponential", 3, PGBENCH_RANDOM_EXPONENTIAL
1884 : },
1885 : {
1886 : "random_zipfian", 3, PGBENCH_RANDOM_ZIPFIAN
1887 : },
1888 : {
1889 : "pow", 2, PGBENCH_POW
1890 : },
1891 : {
1892 : "power", 2, PGBENCH_POW
1893 : },
1894 : /* logical operators */
1895 : {
1896 : "!and", 2, PGBENCH_AND
1897 : },
1898 : {
1899 : "!or", 2, PGBENCH_OR
1900 : },
1901 : {
1902 : "!not", 1, PGBENCH_NOT
1903 : },
1904 : /* bitwise integer operators */
1905 : {
1906 : "&", 2, PGBENCH_BITAND
1907 : },
1908 : {
1909 : "|", 2, PGBENCH_BITOR
1910 : },
1911 : {
1912 : "#", 2, PGBENCH_BITXOR
1913 : },
1914 : {
1915 : "<<", 2, PGBENCH_LSHIFT
1916 : },
1917 : {
1918 : ">>", 2, PGBENCH_RSHIFT
1919 : },
1920 : /* comparison operators */
1921 : {
1922 : "=", 2, PGBENCH_EQ
1923 : },
1924 : {
1925 : "<>", 2, PGBENCH_NE
1926 : },
1927 : {
1928 : "<=", 2, PGBENCH_LE
1929 : },
1930 : {
1931 : "<", 2, PGBENCH_LT
1932 : },
1933 : {
1934 : "!is", 2, PGBENCH_IS
1935 : },
1936 : /* "case when ... then ... else ... end" construction */
1937 : {
1938 : "!case_end", PGBENCH_NARGS_CASE, PGBENCH_CASE
1939 : },
1940 : {
1941 : "hash", PGBENCH_NARGS_HASH, PGBENCH_HASH_MURMUR2
1942 : },
1943 : {
1944 : "hash_murmur2", PGBENCH_NARGS_HASH, PGBENCH_HASH_MURMUR2
1945 : },
1946 : {
1947 : "hash_fnv1a", PGBENCH_NARGS_HASH, PGBENCH_HASH_FNV1A
1948 : },
1949 : {
1950 : "permute", PGBENCH_NARGS_PERMUTE, PGBENCH_PERMUTE
1951 : },
1952 : /* keep as last array element */
1953 : {
1954 : NULL, 0, 0
1955 : }
1956 : };
1957 :
1958 : /*
1959 : * Find a function from its name
1960 : *
1961 : * return the index of the function from the PGBENCH_FUNCTIONS array
1962 : * or fail if the function is unknown.
1963 : */
1964 : static int
1965 : find_func(yyscan_t yyscanner, const char *fname)
1966 : {
1967 : int i = 0;
1968 :
1969 : while (PGBENCH_FUNCTIONS[i].fname)
1970 : {
1971 : if (pg_strcasecmp(fname, PGBENCH_FUNCTIONS[i].fname) == 0)
1972 : return i;
1973 : i++;
1974 : }
1975 :
1976 : expr_yyerror_more(yyscanner, "unexpected function name", fname);
1977 :
1978 : /* not reached */
1979 : return -1;
1980 : }
1981 :
1982 : /* Expression linked list builder */
1983 : static PgBenchExprList *
1984 : make_elist(PgBenchExpr *expr, PgBenchExprList *list)
1985 : {
1986 : PgBenchExprLink *cons;
1987 :
1988 : if (list == NULL)
1989 : {
1990 : list = pg_malloc_object(PgBenchExprList);
1991 : list->head = NULL;
1992 : list->tail = NULL;
1993 : }
1994 :
1995 : cons = pg_malloc_object(PgBenchExprLink);
1996 : cons->expr = expr;
1997 : cons->next = NULL;
1998 :
1999 : if (list->head == NULL)
2000 : list->head = cons;
2001 : else
2002 : list->tail->next = cons;
2003 :
2004 : list->tail = cons;
2005 :
2006 : return list;
2007 : }
2008 :
2009 : /* Return the length of an expression list */
2010 : static int
2011 : elist_length(PgBenchExprList *list)
2012 : {
2013 : PgBenchExprLink *link = list != NULL ? list->head : NULL;
2014 : int len = 0;
2015 :
2016 : for (; link != NULL; link = link->next)
2017 : len++;
2018 :
2019 : return len;
2020 : }
2021 :
2022 : /* Build function call expression */
2023 : static PgBenchExpr *
2024 : make_func(yyscan_t yyscanner, int fnumber, PgBenchExprList *args)
2025 : {
2026 : int len = elist_length(args);
2027 :
2028 : PgBenchExpr *expr = pg_malloc_object(PgBenchExpr);
2029 :
2030 : Assert(fnumber >= 0);
2031 :
2032 : /* validate arguments number including few special cases */
2033 : switch (PGBENCH_FUNCTIONS[fnumber].nargs)
2034 : {
2035 : /* check at least one arg for least & greatest */
2036 : case PGBENCH_NARGS_VARIABLE:
2037 : if (len == 0)
2038 : expr_yyerror_more(yyscanner, "at least one argument expected",
2039 : PGBENCH_FUNCTIONS[fnumber].fname);
2040 : break;
2041 :
2042 : /* case (when ... then ...)+ (else ...)? end */
2043 : case PGBENCH_NARGS_CASE:
2044 : /* 'else' branch is always present, but could be a NULL-constant */
2045 : if (len < 3 || len % 2 != 1)
2046 : expr_yyerror_more(yyscanner,
2047 : "odd and >= 3 number of arguments expected",
2048 : "case control structure");
2049 : break;
2050 :
2051 : /* hash functions with optional seed argument */
2052 : case PGBENCH_NARGS_HASH:
2053 : if (len < 1 || len > 2)
2054 : expr_yyerror_more(yyscanner, "unexpected number of arguments",
2055 : PGBENCH_FUNCTIONS[fnumber].fname);
2056 :
2057 : if (len == 1)
2058 : {
2059 : PgBenchExpr *var = make_variable("default_seed");
2060 :
2061 : args = make_elist(var, args);
2062 : }
2063 : break;
2064 :
2065 : /* pseudorandom permutation function with optional seed argument */
2066 : case PGBENCH_NARGS_PERMUTE:
2067 : if (len < 2 || len > 3)
2068 : expr_yyerror_more(yyscanner, "unexpected number of arguments",
2069 : PGBENCH_FUNCTIONS[fnumber].fname);
2070 :
2071 : if (len == 2)
2072 : {
2073 : PgBenchExpr *var = make_variable("default_seed");
2074 :
2075 : args = make_elist(var, args);
2076 : }
2077 : break;
2078 :
2079 : /* common case: positive arguments number */
2080 : default:
2081 : Assert(PGBENCH_FUNCTIONS[fnumber].nargs >= 0);
2082 :
2083 : if (PGBENCH_FUNCTIONS[fnumber].nargs != len)
2084 : expr_yyerror_more(yyscanner, "unexpected number of arguments",
2085 : PGBENCH_FUNCTIONS[fnumber].fname);
2086 : }
2087 :
2088 : expr->etype = ENODE_FUNCTION;
2089 : expr->u.function.function = PGBENCH_FUNCTIONS[fnumber].tag;
2090 :
2091 : /* only the link is used, the head/tail is not useful anymore */
2092 : expr->u.function.args = args != NULL ? args->head : NULL;
2093 : if (args)
2094 : pg_free(args);
2095 :
2096 : return expr;
2097 : }
2098 :
2099 : static PgBenchExpr *
2100 : make_case(yyscan_t yyscanner, PgBenchExprList *when_then_list, PgBenchExpr *else_part)
2101 : {
2102 : return make_func(yyscanner,
2103 : find_func(yyscanner, "!case_end"),
2104 : make_elist(else_part, when_then_list));
2105 : }
|
