开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > 数据库系统 > 查看源码
preproc.c
资源名称：postgresql-6.5.2.tar.gz　[点击查看]
上传用户：blenddy
上传日期：2007-01-07
资源大小：6495k
文件大小：764k
源码类别：

数据库系统

开发平台：

Unix_Linux

preproc.c：源码内容
  1. case 383:
  2. #line 2259 "preproc.y"
  3. {
  4. yyval.str = cat3_str(make1_str("drop aggregate"), yyvsp[-1].str, yyvsp[0].str);
  5. ;
  6.     break;}
  7. case 384:
  8. #line 2264 "preproc.y"
  9. { yyval.str = yyvsp[0].str; ;
  10.     break;}
  11. case 385:
  12. #line 2265 "preproc.y"
  13. { yyval.str = make1_str("*"); ;
  14.     break;}
  15. case 386:
  16. #line 2270 "preproc.y"
  17. {
  18. yyval.str = cat3_str(make1_str("drop function"), yyvsp[-1].str, yyvsp[0].str);
  19. ;
  20.     break;}
  21. case 387:
  22. #line 2277 "preproc.y"
  23. {
  24. yyval.str = cat3_str(make1_str("drop operator"), yyvsp[-3].str, make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")));
  25. ;
  26.     break;}
  27. case 390:
  28. #line 2284 "preproc.y"
  29. { yyval.str = make1_str("+"); ;
  30.     break;}
  31. case 391:
  32. #line 2285 "preproc.y"
  33. { yyval.str = make1_str("-"); ;
  34.     break;}
  35. case 392:
  36. #line 2286 "preproc.y"
  37. { yyval.str = make1_str("*"); ;
  38.     break;}
  39. case 393:
  40. #line 2287 "preproc.y"
  41. { yyval.str = make1_str("%"); ;
  42.     break;}
  43. case 394:
  44. #line 2288 "preproc.y"
  45. { yyval.str = make1_str("/"); ;
  46.     break;}
  47. case 395:
  48. #line 2289 "preproc.y"
  49. { yyval.str = make1_str("<"); ;
  50.     break;}
  51. case 396:
  52. #line 2290 "preproc.y"
  53. { yyval.str = make1_str(">"); ;
  54.     break;}
  55. case 397:
  56. #line 2291 "preproc.y"
  57. { yyval.str = make1_str("="); ;
  58.     break;}
  59. case 398:
  60. #line 2295 "preproc.y"
  61. {
  62.    yyerror("parser: argument type missing (use NONE for unary operators)");
  63. ;
  64.     break;}
  65. case 399:
  66. #line 2299 "preproc.y"
  67. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  68.     break;}
  69. case 400:
  70. #line 2301 "preproc.y"
  71. { yyval.str = cat2_str(make1_str("none,"), yyvsp[0].str); ;
  72.     break;}
  73. case 401:
  74. #line 2303 "preproc.y"
  75. { yyval.str = cat2_str(yyvsp[-2].str, make1_str(", none")); ;
  76.     break;}
  77. case 402:
  78. #line 2317 "preproc.y"
  79. {
  80. yyval.str = cat4_str(cat5_str(make1_str("alter table"), yyvsp[-6].str, yyvsp[-5].str, make1_str("rename"), yyvsp[-3].str), yyvsp[-2].str, make1_str("to"), yyvsp[0].str);
  81. ;
  82.     break;}
  83. case 403:
  84. #line 2322 "preproc.y"
  85. { yyval.str = yyvsp[0].str; ;
  86.     break;}
  87. case 404:
  88. #line 2323 "preproc.y"
  89. { yyval.str = make1_str(""); ;
  90.     break;}
  91. case 405:
  92. #line 2326 "preproc.y"
  93. { yyval.str = make1_str("colmunn"); ;
  94.     break;}
  95. case 406:
  96. #line 2327 "preproc.y"
  97. { yyval.str = make1_str(""); ;
  98.     break;}
  99. case 407:
  100. #line 2341 "preproc.y"
  101. { QueryIsRule=1; ;
  102.     break;}
  103. case 408:
  104. #line 2344 "preproc.y"
  105. {
  106. yyval.str = cat2_str(cat5_str(cat5_str(make1_str("create rule"), yyvsp[-10].str, make1_str("as on"), yyvsp[-6].str, make1_str("to")), yyvsp[-4].str, yyvsp[-3].str, make1_str("do"), yyvsp[-1].str), yyvsp[0].str);
  107. ;
  108.     break;}
  109. case 409:
  110. #line 2349 "preproc.y"
  111. { yyval.str = make1_str("nothing"); ;
  112.     break;}
  113. case 410:
  114. #line 2350 "preproc.y"
  115. { yyval.str = yyvsp[0].str; ;
  116.     break;}
  117. case 411:
  118. #line 2351 "preproc.y"
  119. { yyval.str = yyvsp[0].str; ;
  120.     break;}
  121. case 412:
  122. #line 2352 "preproc.y"
  123. { yyval.str = cat3_str(make1_str("["), yyvsp[-1].str, make1_str("]")); ;
  124.     break;}
  125. case 413:
  126. #line 2353 "preproc.y"
  127. { yyval.str = cat3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  128.     break;}
  129. case 414:
  130. #line 2356 "preproc.y"
  131. {  yyval.str = yyvsp[0].str; ;
  132.     break;}
  133. case 415:
  134. #line 2357 "preproc.y"
  135. {  yyval.str = yyvsp[0].str; ;
  136.     break;}
  137. case 416:
  138. #line 2361 "preproc.y"
  139. {  yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  140.     break;}
  141. case 417:
  142. #line 2363 "preproc.y"
  143. {  yyval.str = cat3_str(yyvsp[-2].str, yyvsp[-1].str, make1_str(";")); ;
  144.     break;}
  145. case 418:
  146. #line 2365 "preproc.y"
  147. { yyval.str = cat2_str(yyvsp[-1].str, make1_str(";")); ;
  148.     break;}
  149. case 423:
  150. #line 2375 "preproc.y"
  151. {
  152. yyval.str = make3_str(yyvsp[-2].str, make1_str("."), yyvsp[0].str);
  153. ;
  154.     break;}
  155. case 424:
  156. #line 2379 "preproc.y"
  157. {
  158. yyval.str = yyvsp[0].str;
  159. ;
  160.     break;}
  161. case 425:
  162. #line 2385 "preproc.y"
  163. { yyval.str = make1_str("select"); ;
  164.     break;}
  165. case 426:
  166. #line 2386 "preproc.y"
  167. { yyval.str = make1_str("update"); ;
  168.     break;}
  169. case 427:
  170. #line 2387 "preproc.y"
  171. { yyval.str = make1_str("delete"); ;
  172.     break;}
  173. case 428:
  174. #line 2388 "preproc.y"
  175. { yyval.str = make1_str("insert"); ;
  176.     break;}
  177. case 429:
  178. #line 2391 "preproc.y"
  179. { yyval.str = make1_str("instead"); ;
  180.     break;}
  181. case 430:
  182. #line 2392 "preproc.y"
  183. { yyval.str = make1_str(""); ;
  184.     break;}
  185. case 431:
  186. #line 2405 "preproc.y"
  187. {
  188. yyval.str = cat2_str(make1_str("notify"), yyvsp[0].str);
  189. ;
  190.     break;}
  191. case 432:
  192. #line 2411 "preproc.y"
  193. {
  194. yyval.str = cat2_str(make1_str("listen"), yyvsp[0].str);
  195.                                 ;
  196.     break;}
  197. case 433:
  198. #line 2417 "preproc.y"
  199. {
  200. yyval.str = cat2_str(make1_str("unlisten"), yyvsp[0].str);
  201.                                 ;
  202.     break;}
  203. case 434:
  204. #line 2421 "preproc.y"
  205. {
  206. yyval.str = make1_str("unlisten *");
  207.                                 ;
  208.     break;}
  209. case 435:
  210. #line 2438 "preproc.y"
  211. { yyval.str = make1_str("rollback"); ;
  212.     break;}
  213. case 436:
  214. #line 2439 "preproc.y"
  215. { yyval.str = make1_str("begin transaction"); ;
  216.     break;}
  217. case 437:
  218. #line 2440 "preproc.y"
  219. { yyval.str = make1_str("commit"); ;
  220.     break;}
  221. case 438:
  222. #line 2441 "preproc.y"
  223. { yyval.str = make1_str("commit"); ;
  224.     break;}
  225. case 439:
  226. #line 2442 "preproc.y"
  227. { yyval.str = make1_str("rollback"); ;
  228.     break;}
  229. case 440:
  230. #line 2444 "preproc.y"
  231. { yyval.str = ""; ;
  232.     break;}
  233. case 441:
  234. #line 2445 "preproc.y"
  235. { yyval.str = ""; ;
  236.     break;}
  237. case 442:
  238. #line 2446 "preproc.y"
  239. { yyval.str = ""; ;
  240.     break;}
  241. case 443:
  242. #line 2457 "preproc.y"
  243. {
  244. yyval.str = cat4_str(make1_str("create view"), yyvsp[-2].str, make1_str("as"), yyvsp[0].str);
  245. ;
  246.     break;}
  247. case 444:
  248. #line 2471 "preproc.y"
  249. {
  250. yyval.str = cat2_str(make1_str("load"), yyvsp[0].str);
  251. ;
  252.     break;}
  253. case 445:
  254. #line 2485 "preproc.y"
  255. {
  256. if (strlen(yyvsp[-1].str) == 0 || strlen(yyvsp[0].str) == 0) 
  257. yyerror("CREATE DATABASE WITH requires at least an option");
  258. #ifndef MULTIBYTE
  259. if (strlen(yyvsp[0].str) != 0)
  260. yyerror("WITH ENCODING is not supported");
  261. #endif
  262. yyval.str = cat5_str(make1_str("create database"), yyvsp[-3].str, make1_str("with"), yyvsp[-1].str, yyvsp[0].str);
  263. ;
  264.     break;}
  265. case 446:
  266. #line 2495 "preproc.y"
  267. {
  268. yyval.str = cat2_str(make1_str("create database"), yyvsp[0].str);
  269. ;
  270.     break;}
  271. case 447:
  272. #line 2500 "preproc.y"
  273. { yyval.str = cat2_str(make1_str("location ="), yyvsp[0].str); ;
  274.     break;}
  275. case 448:
  276. #line 2501 "preproc.y"
  277. { yyval.str = make1_str(""); ;
  278.     break;}
  279. case 449:
  280. #line 2504 "preproc.y"
  281. { yyval.str = cat2_str(make1_str("encoding ="), yyvsp[0].str); ;
  282.     break;}
  283. case 450:
  284. #line 2505 "preproc.y"
  285. { yyval.str = NULL; ;
  286.     break;}
  287. case 451:
  288. #line 2508 "preproc.y"
  289. { yyval.str = yyvsp[0].str; ;
  290.     break;}
  291. case 452:
  292. #line 2509 "preproc.y"
  293. { yyval.str = make1_str("default"); ;
  294.     break;}
  295. case 453:
  296. #line 2510 "preproc.y"
  297. { yyval.str = make1_str(""); ;
  298.     break;}
  299. case 454:
  300. #line 2513 "preproc.y"
  301. { yyval.str = yyvsp[0].str; ;
  302.     break;}
  303. case 455:
  304. #line 2514 "preproc.y"
  305. { yyval.str = make1_str("default"); ;
  306.     break;}
  307. case 456:
  308. #line 2515 "preproc.y"
  309. { yyval.str = make1_str(""); ;
  310.     break;}
  311. case 457:
  312. #line 2526 "preproc.y"
  313. {
  314. yyval.str = cat2_str(make1_str("drop database"), yyvsp[0].str);
  315. ;
  316.     break;}
  317. case 458:
  318. #line 2540 "preproc.y"
  319. {
  320.    yyval.str = cat4_str(make1_str("cluster"), yyvsp[-2].str, make1_str("on"), yyvsp[0].str);
  321. ;
  322.     break;}
  323. case 459:
  324. #line 2554 "preproc.y"
  325. {
  326. yyval.str = cat3_str(make1_str("vacuum"), yyvsp[-1].str, yyvsp[0].str);
  327. ;
  328.     break;}
  329. case 460:
  330. #line 2558 "preproc.y"
  331. {
  332. if ( strlen(yyvsp[0].str) > 0 && strlen(yyvsp[-1].str) == 0 )
  333. yyerror("parser: syntax error at or near "("");
  334. yyval.str = cat5_str(make1_str("vacuum"), yyvsp[-3].str, yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str);
  335. ;
  336.     break;}
  337. case 461:
  338. #line 2565 "preproc.y"
  339. { yyval.str = make1_str("verbose"); ;
  340.     break;}
  341. case 462:
  342. #line 2566 "preproc.y"
  343. { yyval.str = make1_str(""); ;
  344.     break;}
  345. case 463:
  346. #line 2569 "preproc.y"
  347. { yyval.str = make1_str("analyse"); ;
  348.     break;}
  349. case 464:
  350. #line 2570 "preproc.y"
  351. { yyval.str = make1_str(""); ;
  352.     break;}
  353. case 465:
  354. #line 2573 "preproc.y"
  355. { yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  356.     break;}
  357. case 466:
  358. #line 2574 "preproc.y"
  359. { yyval.str = make1_str(""); ;
  360.     break;}
  361. case 467:
  362. #line 2578 "preproc.y"
  363. { yyval.str=yyvsp[0].str; ;
  364.     break;}
  365. case 468:
  366. #line 2580 "preproc.y"
  367. { yyval.str=cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  368.     break;}
  369. case 469:
  370. #line 2592 "preproc.y"
  371. {
  372. yyval.str = cat3_str(make1_str("explain"), yyvsp[-1].str, yyvsp[0].str);
  373. ;
  374.     break;}
  375. case 476:
  376. #line 2632 "preproc.y"
  377. {
  378. yyval.str = cat3_str(make1_str("insert into"), yyvsp[-1].str, yyvsp[0].str);
  379. ;
  380.     break;}
  381. case 477:
  382. #line 2638 "preproc.y"
  383. {
  384. yyval.str = make3_str(make1_str("values("), yyvsp[-1].str, make1_str(")"));
  385. ;
  386.     break;}
  387. case 478:
  388. #line 2642 "preproc.y"
  389. {
  390. yyval.str = make1_str("default values");
  391. ;
  392.     break;}
  393. case 479:
  394. #line 2646 "preproc.y"
  395. {
  396. yyval.str = yyvsp[0].str;
  397. ;
  398.     break;}
  399. case 480:
  400. #line 2650 "preproc.y"
  401. {
  402. yyval.str = make5_str(make1_str("("), yyvsp[-5].str, make1_str(") values ("), yyvsp[-1].str, make1_str(")"));
  403. ;
  404.     break;}
  405. case 481:
  406. #line 2654 "preproc.y"
  407. {
  408. yyval.str = make4_str(make1_str("("), yyvsp[-2].str, make1_str(")"), yyvsp[0].str);
  409. ;
  410.     break;}
  411. case 482:
  412. #line 2659 "preproc.y"
  413. { yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  414.     break;}
  415. case 483:
  416. #line 2660 "preproc.y"
  417. { yyval.str = make1_str(""); ;
  418.     break;}
  419. case 484:
  420. #line 2665 "preproc.y"
  421. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  422.     break;}
  423. case 485:
  424. #line 2667 "preproc.y"
  425. { yyval.str = yyvsp[0].str; ;
  426.     break;}
  427. case 486:
  428. #line 2671 "preproc.y"
  429. {
  430. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  431. ;
  432.     break;}
  433. case 487:
  434. #line 2686 "preproc.y"
  435. {
  436. yyval.str = cat3_str(make1_str("delete from"), yyvsp[-1].str, yyvsp[0].str);
  437. ;
  438.     break;}
  439. case 488:
  440. #line 2692 "preproc.y"
  441. {
  442. yyval.str = cat4_str(make1_str("lock"), yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str);
  443. ;
  444.     break;}
  445. case 489:
  446. #line 2697 "preproc.y"
  447. { yyval.str = cat3_str(make1_str("in"), yyvsp[-1].str, make1_str("mode")); ;
  448.     break;}
  449. case 490:
  450. #line 2698 "preproc.y"
  451. { yyval.str = make1_str("");;
  452.     break;}
  453. case 491:
  454. #line 2701 "preproc.y"
  455. { yyval.str = make1_str("share row exclusive"); ;
  456.     break;}
  457. case 492:
  458. #line 2702 "preproc.y"
  459. { yyval.str = cat2_str(make1_str("row"), yyvsp[0].str);;
  460.     break;}
  461. case 493:
  462. #line 2703 "preproc.y"
  463. { yyval.str = cat2_str(make1_str("access"), yyvsp[0].str);;
  464.     break;}
  465. case 494:
  466. #line 2704 "preproc.y"
  467. { yyval.str = yyvsp[0].str; ;
  468.     break;}
  469. case 495:
  470. #line 2707 "preproc.y"
  471. { yyval.str = make1_str("share"); ;
  472.     break;}
  473. case 496:
  474. #line 2708 "preproc.y"
  475. { yyval.str = make1_str("exclusive"); ;
  476.     break;}
  477. case 497:
  478. #line 2722 "preproc.y"
  479. {
  480. yyval.str = cat2_str(cat5_str(make1_str("update"), yyvsp[-4].str, make1_str("set"), yyvsp[-2].str, yyvsp[-1].str), yyvsp[0].str);
  481. ;
  482.     break;}
  483. case 498:
  484. #line 2735 "preproc.y"
  485. { ForUpdateNotAllowed = 1; ;
  486.     break;}
  487. case 499:
  488. #line 2737 "preproc.y"
  489. {
  490. struct cursor *ptr, *this;
  492. for (ptr = cur; ptr != NULL; ptr = ptr->next)
  493. {
  494. if (strcmp(yyvsp[-5].str, ptr->name) == 0)
  495. {
  496.         /* re-definition is a bug */
  497. sprintf(errortext, "cursor %s already defined", yyvsp[-5].str);
  498. yyerror(errortext);
  499.                 }
  500.          }
  501.                         
  502.          this = (struct cursor *) mm_alloc(sizeof(struct cursor));
  504.          /* initial definition */
  505.         this->next = cur;
  506.         this->name = yyvsp[-5].str;
  507. this->connection = connection;
  508.         this->command =  cat5_str(make1_str("declare"), mm_strdup(yyvsp[-5].str), yyvsp[-4].str, make1_str("cursor for"), yyvsp[0].str);
  509. this->argsinsert = argsinsert;
  510. this->argsresult = argsresult;
  511. argsinsert = argsresult = NULL;
  513.          cur = this;
  515. yyval.str = cat3_str(make1_str("/*"), mm_strdup(this->command), make1_str("*/"));
  516. ;
  517.     break;}
  518. case 500:
  519. #line 2767 "preproc.y"
  520. { yyval.str = make1_str("binary"); ;
  521.     break;}
  522. case 501:
  523. #line 2768 "preproc.y"
  524. { yyval.str = make1_str("insensitive"); ;
  525.     break;}
  526. case 502:
  527. #line 2769 "preproc.y"
  528. { yyval.str = make1_str("scroll"); ;
  529.     break;}
  530. case 503:
  531. #line 2770 "preproc.y"
  532. { yyval.str = make1_str("insensitive scroll"); ;
  533.     break;}
  534. case 504:
  535. #line 2771 "preproc.y"
  536. { yyval.str = make1_str(""); ;
  537.     break;}
  538. case 505:
  539. #line 2789 "preproc.y"
  540. {
  541. if (strlen(yyvsp[-1].str) > 0 && ForUpdateNotAllowed != 0)
  542. yyerror("FOR UPDATE is not allowed in this context");
  544. ForUpdateNotAllowed = 0;
  545. yyval.str = cat4_str(yyvsp[-3].str, yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str);
  546. ;
  547.     break;}
  548. case 506:
  549. #line 2806 "preproc.y"
  550. {
  551.                                yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); 
  552.                         ;
  553.     break;}
  554. case 507:
  555. #line 2810 "preproc.y"
  556. {
  557.                                yyval.str = yyvsp[0].str; 
  558.                         ;
  559.     break;}
  560. case 508:
  561. #line 2814 "preproc.y"
  562. {
  563. yyval.str = cat3_str(yyvsp[-2].str, make1_str("except"), yyvsp[0].str);
  564. ForUpdateNotAllowed = 1;
  565. ;
  566.     break;}
  567. case 509:
  568. #line 2819 "preproc.y"
  569. {
  570. yyval.str = cat4_str(yyvsp[-3].str, make1_str("union"), yyvsp[-1].str, yyvsp[0].str);
  571. ForUpdateNotAllowed = 1;
  572. ;
  573.     break;}
  574. case 510:
  575. #line 2824 "preproc.y"
  576. {
  577. yyval.str = cat3_str(yyvsp[-3].str, make1_str("intersect"), yyvsp[-1].str);
  578. ForUpdateNotAllowed = 1;
  579. ;
  580.     break;}
  581. case 511:
  582. #line 2834 "preproc.y"
  583. {
  584. yyval.str = cat4_str(cat5_str(make1_str("select"), yyvsp[-6].str, yyvsp[-5].str, yyvsp[-4].str, yyvsp[-3].str), yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str);
  585. if (strlen(yyvsp[-1].str) > 0 || strlen(yyvsp[0].str) > 0)
  586. ForUpdateNotAllowed = 1;
  587. ;
  588.     break;}
  589. case 512:
  590. #line 2841 "preproc.y"
  591. { yyval.str= cat4_str(make1_str("into"), yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str); ;
  592.     break;}
  593. case 513:
  594. #line 2842 "preproc.y"
  595. { yyval.str = make1_str(""); ;
  596.     break;}
  597. case 514:
  598. #line 2843 "preproc.y"
  599. { yyval.str = make1_str(""); ;
  600.     break;}
  601. case 515:
  602. #line 2846 "preproc.y"
  603. { yyval.str = make1_str("table"); ;
  604.     break;}
  605. case 516:
  606. #line 2847 "preproc.y"
  607. { yyval.str = make1_str(""); ;
  608.     break;}
  609. case 517:
  610. #line 2850 "preproc.y"
  611. { yyval.str = make1_str("all"); ;
  612.     break;}
  613. case 518:
  614. #line 2851 "preproc.y"
  615. { yyval.str = make1_str(""); ;
  616.     break;}
  617. case 519:
  618. #line 2854 "preproc.y"
  619. { yyval.str = make1_str("distinct"); ;
  620.     break;}
  621. case 520:
  622. #line 2855 "preproc.y"
  623. { yyval.str = cat2_str(make1_str("distinct on"), yyvsp[0].str); ;
  624.     break;}
  625. case 521:
  626. #line 2856 "preproc.y"
  627. { yyval.str = make1_str("all"); ;
  628.     break;}
  629. case 522:
  630. #line 2857 "preproc.y"
  631. { yyval.str = make1_str(""); ;
  632.     break;}
  633. case 523:
  634. #line 2860 "preproc.y"
  635. { yyval.str = cat2_str(make1_str("order by"), yyvsp[0].str); ;
  636.     break;}
  637. case 524:
  638. #line 2861 "preproc.y"
  639. { yyval.str = make1_str(""); ;
  640.     break;}
  641. case 525:
  642. #line 2864 "preproc.y"
  643. { yyval.str = yyvsp[0].str; ;
  644.     break;}
  645. case 526:
  646. #line 2865 "preproc.y"
  647. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  648.     break;}
  649. case 527:
  650. #line 2869 "preproc.y"
  651. {
  652.  yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  653.                                 ;
  654.     break;}
  655. case 528:
  656. #line 2874 "preproc.y"
  657. { yyval.str = cat2_str(make1_str("using"), yyvsp[0].str); ;
  658.     break;}
  659. case 529:
  660. #line 2875 "preproc.y"
  661. { yyval.str = make1_str("using <"); ;
  662.     break;}
  663. case 530:
  664. #line 2876 "preproc.y"
  665. { yyval.str = make1_str("using >"); ;
  666.     break;}
  667. case 531:
  668. #line 2877 "preproc.y"
  669. { yyval.str = make1_str("asc"); ;
  670.     break;}
  671. case 532:
  672. #line 2878 "preproc.y"
  673. { yyval.str = make1_str("desc"); ;
  674.     break;}
  675. case 533:
  676. #line 2879 "preproc.y"
  677. { yyval.str = make1_str(""); ;
  678.     break;}
  679. case 534:
  680. #line 2883 "preproc.y"
  681. { yyval.str = cat4_str(make1_str("limit"), yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  682.     break;}
  683. case 535:
  684. #line 2885 "preproc.y"
  685. { yyval.str = cat4_str(make1_str("limit"), yyvsp[-2].str, make1_str("offset"), yyvsp[0].str); ;
  686.     break;}
  687. case 536:
  688. #line 2887 "preproc.y"
  689. { yyval.str = cat2_str(make1_str("limit"), yyvsp[0].str); ;
  690.     break;}
  691. case 537:
  692. #line 2889 "preproc.y"
  693. { yyval.str = cat4_str(make1_str("offset"), yyvsp[-2].str, make1_str("limit"), yyvsp[0].str); ;
  694.     break;}
  695. case 538:
  696. #line 2891 "preproc.y"
  697. { yyval.str = cat2_str(make1_str("offset"), yyvsp[0].str); ;
  698.     break;}
  699. case 539:
  700. #line 2893 "preproc.y"
  701. { yyval.str = make1_str(""); ;
  702.     break;}
  703. case 540:
  704. #line 2896 "preproc.y"
  705. { yyval.str = yyvsp[0].str; ;
  706.     break;}
  707. case 541:
  708. #line 2897 "preproc.y"
  709. { yyval.str = make1_str("all"); ;
  710.     break;}
  711. case 542:
  712. #line 2898 "preproc.y"
  713. { yyval.str = make_name(); ;
  714.     break;}
  715. case 543:
  716. #line 2901 "preproc.y"
  717. { yyval.str = yyvsp[0].str; ;
  718.     break;}
  719. case 544:
  720. #line 2902 "preproc.y"
  721. { yyval.str = make_name(); ;
  722.     break;}
  723. case 545:
  724. #line 2912 "preproc.y"
  725. { yyval.str = make1_str("*"); ;
  726.     break;}
  727. case 546:
  728. #line 2913 "preproc.y"
  729. { yyval.str = make1_str(""); ;
  730.     break;}
  731. case 547:
  732. #line 2916 "preproc.y"
  733. { yyval.str = yyvsp[0].str; ;
  734.     break;}
  735. case 548:
  736. #line 2919 "preproc.y"
  737. { yyval.str = yyvsp[0].str; ;
  738.     break;}
  739. case 549:
  740. #line 2921 "preproc.y"
  741. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  742.     break;}
  743. case 550:
  744. #line 2924 "preproc.y"
  745. { yyval.str = cat2_str(make1_str("group by"), yyvsp[0].str); ;
  746.     break;}
  747. case 551:
  748. #line 2925 "preproc.y"
  749. { yyval.str = make1_str(""); ;
  750.     break;}
  751. case 552:
  752. #line 2929 "preproc.y"
  753. {
  754. yyval.str = cat2_str(make1_str("having"), yyvsp[0].str);
  755. ;
  756.     break;}
  757. case 553:
  758. #line 2932 "preproc.y"
  759. { yyval.str = make1_str(""); ;
  760.     break;}
  761. case 554:
  762. #line 2936 "preproc.y"
  763. {
  764.                  yyval.str = make1_str("for update"); 
  765. ;
  766.     break;}
  767. case 555:
  768. #line 2940 "preproc.y"
  769. {
  770. yyval.str = make1_str("for read only");
  771. ;
  772.     break;}
  773. case 556:
  774. #line 2944 "preproc.y"
  775. {
  776.                         yyval.str = make1_str("");
  777.                 ;
  778.     break;}
  779. case 557:
  780. #line 2949 "preproc.y"
  781. {
  782. yyval.str = cat2_str(make1_str("of"), yyvsp[0].str);
  783.       ;
  784.     break;}
  785. case 558:
  786. #line 2953 "preproc.y"
  787. {
  788.                         yyval.str = make1_str("");
  789.               ;
  790.     break;}
  791. case 559:
  792. #line 2967 "preproc.y"
  793. {
  794. yyval.str = cat2_str(make1_str("from"), yyvsp[0].str);
  795. ;
  796.     break;}
  797. case 560:
  798. #line 2971 "preproc.y"
  799. {
  800. yyval.str = make1_str("");
  801. ;
  802.     break;}
  803. case 561:
  804. #line 2977 "preproc.y"
  805. { yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  806.     break;}
  807. case 562:
  808. #line 2979 "preproc.y"
  809. { yyval.str = yyvsp[0].str; ;
  810.     break;}
  811. case 563:
  812. #line 2981 "preproc.y"
  813. { yyval.str = yyvsp[0].str; ;
  814.     break;}
  815. case 564:
  816. #line 2985 "preproc.y"
  817. { yyval.str = make3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  818.     break;}
  819. case 565:
  820. #line 2987 "preproc.y"
  821. { yyval.str = yyvsp[0].str; ;
  822.     break;}
  823. case 566:
  824. #line 2991 "preproc.y"
  825. {
  826.                                         yyval.str = cat3_str(yyvsp[-2].str, make1_str("as"), yyvsp[0].str);
  827.                                 ;
  828.     break;}
  829. case 567:
  830. #line 2995 "preproc.y"
  831. {
  832.                                         yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  833.                                 ;
  834.     break;}
  835. case 568:
  836. #line 2999 "preproc.y"
  837. {
  838.                                         yyval.str = yyvsp[0].str;
  839.                                 ;
  840.     break;}
  841. case 569:
  842. #line 3009 "preproc.y"
  843. {       yyval.str = yyvsp[0].str; ;
  844.     break;}
  845. case 570:
  846. #line 3011 "preproc.y"
  847. {       yyerror("UNION JOIN not yet implemented"); ;
  848.     break;}
  849. case 571:
  850. #line 3015 "preproc.y"
  851. {
  852. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  853.                                 ;
  854.     break;}
  855. case 572:
  856. #line 3021 "preproc.y"
  857. {
  858.                                         yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  859.                                 ;
  860.     break;}
  861. case 573:
  862. #line 3025 "preproc.y"
  863. {
  864.                                         yyval.str = yyvsp[0].str;
  865.                                 ;
  866.     break;}
  867. case 574:
  868. #line 3038 "preproc.y"
  869. {
  870. yyval.str = cat4_str(yyvsp[-3].str, make1_str("join"), yyvsp[-1].str, yyvsp[0].str);
  871.                                 ;
  872.     break;}
  873. case 575:
  874. #line 3042 "preproc.y"
  875. {
  876. yyval.str = cat4_str(make1_str("natural"), yyvsp[-2].str, make1_str("join"), yyvsp[0].str);
  877.                                 ;
  878.     break;}
  879. case 576:
  880. #line 3046 "preproc.y"
  881. {  yyval.str = cat2_str(make1_str("cross join"), yyvsp[0].str); ;
  882.     break;}
  883. case 577:
  884. #line 3051 "preproc.y"
  885. {
  886.                                         yyval.str = cat2_str(make1_str("full"), yyvsp[0].str);
  887.                                         fprintf(stderr,"FULL OUTER JOIN not yet implementedn");
  888.                                 ;
  889.     break;}
  890. case 578:
  891. #line 3056 "preproc.y"
  892. {
  893.                                         yyval.str = cat2_str(make1_str("left"), yyvsp[0].str);
  894.                                         fprintf(stderr,"LEFT OUTER JOIN not yet implementedn");
  895.                                 ;
  896.     break;}
  897. case 579:
  898. #line 3061 "preproc.y"
  899. {
  900.                                         yyval.str = cat2_str(make1_str("right"), yyvsp[0].str);
  901.                                         fprintf(stderr,"RIGHT OUTER JOIN not yet implementedn");
  902.                                 ;
  903.     break;}
  904. case 580:
  905. #line 3066 "preproc.y"
  906. {
  907.                                         yyval.str = make1_str("outer");
  908.                                         fprintf(stderr,"OUTER JOIN not yet implementedn");
  909.                                 ;
  910.     break;}
  911. case 581:
  912. #line 3071 "preproc.y"
  913. {
  914.                                         yyval.str = make1_str("inner");
  915. ;
  916.     break;}
  917. case 582:
  918. #line 3075 "preproc.y"
  919. {
  920.                                         yyval.str = make1_str("");
  921. ;
  922.     break;}
  923. case 583:
  924. #line 3080 "preproc.y"
  925. { yyval.str = make1_str("outer"); ;
  926.     break;}
  927. case 584:
  928. #line 3081 "preproc.y"
  929. { yyval.str = make1_str("");  /* no qualifiers */ ;
  930.     break;}
  931. case 585:
  932. #line 3092 "preproc.y"
  933. { yyval.str = make3_str(make1_str("using ("), yyvsp[-1].str, make1_str(")")); ;
  934.     break;}
  935. case 586:
  936. #line 3093 "preproc.y"
  937. { yyval.str = cat2_str(make1_str("on"), yyvsp[0].str); ;
  938.     break;}
  939. case 587:
  940. #line 3096 "preproc.y"
  941. { yyval.str = make3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  942.     break;}
  943. case 588:
  944. #line 3097 "preproc.y"
  945. { yyval.str = yyvsp[0].str; ;
  946.     break;}
  947. case 589:
  948. #line 3101 "preproc.y"
  949. {
  950. yyval.str = yyvsp[0].str;
  951. ;
  952.     break;}
  953. case 590:
  954. #line 3106 "preproc.y"
  955. { yyval.str = cat2_str(make1_str("where"), yyvsp[0].str); ;
  956.     break;}
  957. case 591:
  958. #line 3107 "preproc.y"
  959. { yyval.str = make1_str("");  /* no qualifiers */ ;
  960.     break;}
  961. case 592:
  962. #line 3111 "preproc.y"
  963. {
  964. /* normal relations */
  965. yyval.str = yyvsp[0].str;
  966. ;
  967.     break;}
  968. case 593:
  969. #line 3116 "preproc.y"
  970. {
  971. /* inheritance query */
  972. yyval.str = cat2_str(yyvsp[-1].str, make1_str("*"));
  973. ;
  974.     break;}
  975. case 594:
  976. #line 3122 "preproc.y"
  977. {
  978.                             yyval.index.index1 = 0;
  979.                             yyval.index.index2 = yyvsp[0].index.index1;
  980.                             yyval.index.str = cat2_str(make1_str("[]"), yyvsp[0].index.str);
  981.                         ;
  982.     break;}
  983. case 595:
  984. #line 3128 "preproc.y"
  985. {
  986.     char *txt = mm_alloc(20L);
  988.     sprintf (txt, "%d", yyvsp[-2].ival);
  989.                             yyval.index.index1 = yyvsp[-2].ival;
  990.                             yyval.index.index2 = yyvsp[0].index.index1;
  991.                             yyval.index.str = cat4_str(make1_str("["), txt, make1_str("]"), yyvsp[0].index.str);
  992.                         ;
  993.     break;}
  994. case 596:
  995. #line 3137 "preproc.y"
  996. {
  997.                             yyval.index.index1 = -1;
  998.                             yyval.index.index2 = -1;
  999.                             yyval.index.str= make1_str("");
  1000.                         ;
  1001.     break;}
  1002. case 597:
  1003. #line 3145 "preproc.y"
  1004. {
  1005.                             yyval.index.index1 = 0;
  1006.                             yyval.index.index2 = yyvsp[0].index.index1;
  1007.                             yyval.index.str = cat2_str(make1_str("[]"), yyvsp[0].index.str);
  1008.                         ;
  1009.     break;}
  1010. case 598:
  1011. #line 3151 "preproc.y"
  1012. {
  1013.     char *txt = mm_alloc(20L);
  1015.     sprintf (txt, "%d", yyvsp[-2].ival);
  1016.                             yyval.index.index1 = yyvsp[-2].ival;
  1017.                             yyval.index.index2 = yyvsp[0].index.index1;
  1018.                             yyval.index.str = cat4_str(make1_str("["), txt, make1_str("]"), yyvsp[0].index.str);
  1019.                         ;
  1020.     break;}
  1021. case 599:
  1022. #line 3160 "preproc.y"
  1023. {
  1024.                             yyval.index.index1 = -1;
  1025.                             yyval.index.index2 = -1;
  1026.                             yyval.index.str= make1_str("");
  1027.                         ;
  1028.     break;}
  1029. case 600:
  1030. #line 3167 "preproc.y"
  1031. { yyval.ival = atol(yyvsp[0].str); ;
  1032.     break;}
  1033. case 601:
  1034. #line 3168 "preproc.y"
  1035. { yyval.ival = yyvsp[-1].ival; ;
  1036.     break;}
  1037. case 602:
  1038. #line 3169 "preproc.y"
  1039. { yyval.ival = yyvsp[-2].ival + yyvsp[0].ival; ;
  1040.     break;}
  1041. case 603:
  1042. #line 3170 "preproc.y"
  1043. { yyval.ival = yyvsp[-2].ival - yyvsp[0].ival; ;
  1044.     break;}
  1045. case 604:
  1046. #line 3171 "preproc.y"
  1047. { yyval.ival = yyvsp[-2].ival * yyvsp[0].ival; ;
  1048.     break;}
  1049. case 605:
  1050. #line 3172 "preproc.y"
  1051. { yyval.ival = yyvsp[-2].ival / yyvsp[0].ival; ;
  1052.     break;}
  1053. case 606:
  1054. #line 3173 "preproc.y"
  1055. { yyval.ival = yyvsp[-2].ival % yyvsp[0].ival; ;
  1056.     break;}
  1057. case 607:
  1058. #line 3188 "preproc.y"
  1059. {
  1060. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].index.str);
  1061. ;
  1062.     break;}
  1063. case 608:
  1064. #line 3192 "preproc.y"
  1065. {
  1066. yyval.str = cat2_str(make1_str("setof"), yyvsp[0].str);
  1067. ;
  1068.     break;}
  1069. case 609:
  1070. #line 3197 "preproc.y"
  1071. { yyval.str = yyvsp[0].str; ;
  1072.     break;}
  1073. case 610:
  1074. #line 3198 "preproc.y"
  1075. { yyval.str = yyvsp[0].str; ;
  1076.     break;}
  1077. case 611:
  1078. #line 3199 "preproc.y"
  1079. { yyval.str = yyvsp[0].str; ;
  1080.     break;}
  1081. case 612:
  1082. #line 3200 "preproc.y"
  1083. { yyval.str = yyvsp[0].str; ;
  1084.     break;}
  1085. case 613:
  1086. #line 3204 "preproc.y"
  1087. {
  1088. yyval.str = yyvsp[0].str;
  1089. ;
  1090.     break;}
  1091. case 614:
  1092. #line 3209 "preproc.y"
  1093. { yyval.str = yyvsp[0].str; ;
  1094.     break;}
  1095. case 615:
  1096. #line 3210 "preproc.y"
  1097. { yyval.str = make1_str("type"); ;
  1098.     break;}
  1099. case 616:
  1100. #line 3211 "preproc.y"
  1101. { yyval.str = make1_str("at"); ;
  1102.     break;}
  1103. case 617:
  1104. #line 3212 "preproc.y"
  1105. { yyval.str = make1_str("autocommit"); ;
  1106.     break;}
  1107. case 618:
  1108. #line 3213 "preproc.y"
  1109. { yyval.str = make1_str("bool"); ;
  1110.     break;}
  1111. case 619:
  1112. #line 3214 "preproc.y"
  1113. { yyval.str = make1_str("break"); ;
  1114.     break;}
  1115. case 620:
  1116. #line 3215 "preproc.y"
  1117. { yyval.str = make1_str("call"); ;
  1118.     break;}
  1119. case 621:
  1120. #line 3216 "preproc.y"
  1121. { yyval.str = make1_str("connect"); ;
  1122.     break;}
  1123. case 622:
  1124. #line 3217 "preproc.y"
  1125. { yyval.str = make1_str("connection"); ;
  1126.     break;}
  1127. case 623:
  1128. #line 3218 "preproc.y"
  1129. { yyval.str = make1_str("continue"); ;
  1130.     break;}
  1131. case 624:
  1132. #line 3219 "preproc.y"
  1133. { yyval.str = make1_str("deallocate"); ;
  1134.     break;}
  1135. case 625:
  1136. #line 3220 "preproc.y"
  1137. { yyval.str = make1_str("disconnect"); ;
  1138.     break;}
  1139. case 626:
  1140. #line 3221 "preproc.y"
  1141. { yyval.str = make1_str("found"); ;
  1142.     break;}
  1143. case 627:
  1144. #line 3222 "preproc.y"
  1145. { yyval.str = make1_str("go"); ;
  1146.     break;}
  1147. case 628:
  1148. #line 3223 "preproc.y"
  1149. { yyval.str = make1_str("goto"); ;
  1150.     break;}
  1151. case 629:
  1152. #line 3224 "preproc.y"
  1153. { yyval.str = make1_str("identified"); ;
  1154.     break;}
  1155. case 630:
  1156. #line 3225 "preproc.y"
  1157. { yyval.str = make1_str("immediate"); ;
  1158.     break;}
  1159. case 631:
  1160. #line 3226 "preproc.y"
  1161. { yyval.str = make1_str("indicator"); ;
  1162.     break;}
  1163. case 632:
  1164. #line 3227 "preproc.y"
  1165. { yyval.str = make1_str("int"); ;
  1166.     break;}
  1167. case 633:
  1168. #line 3228 "preproc.y"
  1169. { yyval.str = make1_str("long"); ;
  1170.     break;}
  1171. case 634:
  1172. #line 3229 "preproc.y"
  1173. { yyval.str = make1_str("off"); ;
  1174.     break;}
  1175. case 635:
  1176. #line 3230 "preproc.y"
  1177. { yyval.str = make1_str("open"); ;
  1178.     break;}
  1179. case 636:
  1180. #line 3231 "preproc.y"
  1181. { yyval.str = make1_str("prepare"); ;
  1182.     break;}
  1183. case 637:
  1184. #line 3232 "preproc.y"
  1185. { yyval.str = make1_str("release"); ;
  1186.     break;}
  1187. case 638:
  1188. #line 3233 "preproc.y"
  1189. { yyval.str = make1_str("section"); ;
  1190.     break;}
  1191. case 639:
  1192. #line 3234 "preproc.y"
  1193. { yyval.str = make1_str("short"); ;
  1194.     break;}
  1195. case 640:
  1196. #line 3235 "preproc.y"
  1197. { yyval.str = make1_str("signed"); ;
  1198.     break;}
  1199. case 641:
  1200. #line 3236 "preproc.y"
  1201. { yyval.str = make1_str("sqlerror"); ;
  1202.     break;}
  1203. case 642:
  1204. #line 3237 "preproc.y"
  1205. { yyval.str = make1_str("sqlprint"); ;
  1206.     break;}
  1207. case 643:
  1208. #line 3238 "preproc.y"
  1209. { yyval.str = make1_str("sqlwarning"); ;
  1210.     break;}
  1211. case 644:
  1212. #line 3239 "preproc.y"
  1213. { yyval.str = make1_str("stop"); ;
  1214.     break;}
  1215. case 645:
  1216. #line 3240 "preproc.y"
  1217. { yyval.str = make1_str("struct"); ;
  1218.     break;}
  1219. case 646:
  1220. #line 3241 "preproc.y"
  1221. { yyval.str = make1_str("unsigned"); ;
  1222.     break;}
  1223. case 647:
  1224. #line 3242 "preproc.y"
  1225. { yyval.str = make1_str("var"); ;
  1226.     break;}
  1227. case 648:
  1228. #line 3243 "preproc.y"
  1229. { yyval.str = make1_str("whenever"); ;
  1230.     break;}
  1231. case 649:
  1232. #line 3252 "preproc.y"
  1233. {
  1234. yyval.str = cat2_str(make1_str("float"), yyvsp[0].str);
  1235. ;
  1236.     break;}
  1237. case 650:
  1238. #line 3256 "preproc.y"
  1239. {
  1240. yyval.str = make1_str("double precision");
  1241. ;
  1242.     break;}
  1243. case 651:
  1244. #line 3260 "preproc.y"
  1245. {
  1246. yyval.str = cat2_str(make1_str("decimal"), yyvsp[0].str);
  1247. ;
  1248.     break;}
  1249. case 652:
  1250. #line 3264 "preproc.y"
  1251. {
  1252. yyval.str = cat2_str(make1_str("numeric"), yyvsp[0].str);
  1253. ;
  1254.     break;}
  1255. case 653:
  1256. #line 3270 "preproc.y"
  1257. { yyval.str = make1_str("float"); ;
  1258.     break;}
  1259. case 654:
  1260. #line 3272 "preproc.y"
  1261. { yyval.str = make1_str("double precision"); ;
  1262.     break;}
  1263. case 655:
  1264. #line 3274 "preproc.y"
  1265. { yyval.str = make1_str("decimal"); ;
  1266.     break;}
  1267. case 656:
  1268. #line 3276 "preproc.y"
  1269. { yyval.str = make1_str("numeric"); ;
  1270.     break;}
  1271. case 657:
  1272. #line 3280 "preproc.y"
  1273. {
  1274. if (atol(yyvsp[-1].str) < 1)
  1275. yyerror("precision for FLOAT must be at least 1");
  1276. else if (atol(yyvsp[-1].str) >= 16)
  1277. yyerror("precision for FLOAT must be less than 16");
  1278. yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")"));
  1279. ;
  1280.     break;}
  1281. case 658:
  1282. #line 3288 "preproc.y"
  1283. {
  1284. yyval.str = make1_str("");
  1285. ;
  1286.     break;}
  1287. case 659:
  1288. #line 3294 "preproc.y"
  1289. {
  1290. if (atol(yyvsp[-3].str) < 1 || atol(yyvsp[-3].str) > NUMERIC_MAX_PRECISION) {
  1291. sprintf(errortext, "NUMERIC precision %s must be between 1 and %d", yyvsp[-3].str, NUMERIC_MAX_PRECISION);
  1292. yyerror(errortext);
  1293. }
  1294. if (atol(yyvsp[-1].str) < 0 || atol(yyvsp[-1].str) > atol(yyvsp[-3].str)) {
  1295. sprintf(errortext, "NUMERIC scale %s must be between 0 and precision %s", yyvsp[-1].str, yyvsp[-3].str);
  1296. yyerror(errortext);
  1297. }
  1298. yyval.str = cat3_str(make2_str(make1_str("("), yyvsp[-3].str), make1_str(","), make2_str(yyvsp[-1].str, make1_str(")")));
  1299. ;
  1300.     break;}
  1301. case 660:
  1302. #line 3306 "preproc.y"
  1303. {
  1304. if (atol(yyvsp[-1].str) < 1 || atol(yyvsp[-1].str) > NUMERIC_MAX_PRECISION) {
  1305. sprintf(errortext, "NUMERIC precision %s must be between 1 and %d", yyvsp[-1].str, NUMERIC_MAX_PRECISION);
  1306. yyerror(errortext);
  1307. }
  1308. yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")"));
  1309. ;
  1310.     break;}
  1311. case 661:
  1312. #line 3314 "preproc.y"
  1313. {
  1314. yyval.str = make1_str("");
  1315. ;
  1316.     break;}
  1317. case 662:
  1318. #line 3320 "preproc.y"
  1319. {
  1320. if (atol(yyvsp[-3].str) < 1 || atol(yyvsp[-3].str) > NUMERIC_MAX_PRECISION) {
  1321. sprintf(errortext, "NUMERIC precision %s must be between 1 and %d", yyvsp[-3].str, NUMERIC_MAX_PRECISION);
  1322. yyerror(errortext);
  1323. }
  1324. if (atol(yyvsp[-1].str) < 0 || atol(yyvsp[-1].str) > atol(yyvsp[-3].str)) {
  1325. sprintf(errortext, "NUMERIC scale %s must be between 0 and precision %s", yyvsp[-1].str, yyvsp[-3].str);
  1326. yyerror(errortext);
  1327. }
  1328. yyval.str = cat3_str(make2_str(make1_str("("), yyvsp[-3].str), make1_str(","), make2_str(yyvsp[-1].str, make1_str(")")));
  1329. ;
  1330.     break;}
  1331. case 663:
  1332. #line 3332 "preproc.y"
  1333. {
  1334. if (atol(yyvsp[-1].str) < 1 || atol(yyvsp[-1].str) > NUMERIC_MAX_PRECISION) {
  1335. sprintf(errortext, "NUMERIC precision %s must be between 1 and %d", yyvsp[-1].str, NUMERIC_MAX_PRECISION);
  1336. yyerror(errortext);
  1337. }
  1338. yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")"));
  1339. ;
  1340.     break;}
  1341. case 664:
  1342. #line 3340 "preproc.y"
  1343. {
  1344. yyval.str = make1_str("");
  1345. ;
  1346.     break;}
  1347. case 665:
  1348. #line 3350 "preproc.y"
  1349. {
  1350. if (strncasecmp(yyvsp[-3].str, "char", strlen("char")) && strncasecmp(yyvsp[-3].str, "varchar", strlen("varchar")))
  1351. yyerror("internal parsing error; unrecognized character type");
  1352. if (atol(yyvsp[-1].str) < 1) {
  1353. sprintf(errortext, "length for '%s' type must be at least 1",yyvsp[-3].str);
  1354. yyerror(errortext);
  1355. }
  1356. else if (atol(yyvsp[-1].str) > MaxAttrSize) {
  1357. sprintf(errortext, "length for type '%s' cannot exceed %ld",yyvsp[-3].str,(long) MaxAttrSize);
  1358. yyerror(errortext);
  1359. }
  1361. yyval.str = cat2_str(yyvsp[-3].str, make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")));
  1362. ;
  1363.     break;}
  1364. case 666:
  1365. #line 3365 "preproc.y"
  1366. {
  1367. yyval.str = yyvsp[0].str;
  1368. ;
  1369.     break;}
  1370. case 667:
  1371. #line 3371 "preproc.y"
  1372. {
  1373. if (strlen(yyvsp[0].str) > 0) 
  1374. fprintf(stderr, "COLLATE %s not yet implemented",yyvsp[0].str);
  1376. yyval.str = cat4_str(make1_str("character"), yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str);
  1377. ;
  1378.     break;}
  1379. case 668:
  1380. #line 3377 "preproc.y"
  1381. { yyval.str = cat2_str(make1_str("char"), yyvsp[0].str); ;
  1382.     break;}
  1383. case 669:
  1384. #line 3378 "preproc.y"
  1385. { yyval.str = make1_str("varchar"); ;
  1386.     break;}
  1387. case 670:
  1388. #line 3379 "preproc.y"
  1389. { yyval.str = cat2_str(make1_str("national character"), yyvsp[0].str); ;
  1390.     break;}
  1391. case 671:
  1392. #line 3380 "preproc.y"
  1393. { yyval.str = cat2_str(make1_str("nchar"), yyvsp[0].str); ;
  1394.     break;}
  1395. case 672:
  1396. #line 3383 "preproc.y"
  1397. { yyval.str = make1_str("varying"); ;
  1398.     break;}
  1399. case 673:
  1400. #line 3384 "preproc.y"
  1401. { yyval.str = make1_str(""); ;
  1402.     break;}
  1403. case 674:
  1404. #line 3387 "preproc.y"
  1405. { yyval.str = cat2_str(make1_str("character set"), yyvsp[0].str); ;
  1406.     break;}
  1407. case 675:
  1408. #line 3388 "preproc.y"
  1409. { yyval.str = make1_str(""); ;
  1410.     break;}
  1411. case 676:
  1412. #line 3391 "preproc.y"
  1413. { yyval.str = cat2_str(make1_str("collate"), yyvsp[0].str); ;
  1414.     break;}
  1415. case 677:
  1416. #line 3392 "preproc.y"
  1417. { yyval.str = make1_str(""); ;
  1418.     break;}
  1419. case 678:
  1420. #line 3396 "preproc.y"
  1421. {
  1422. yyval.str = yyvsp[0].str;
  1423. ;
  1424.     break;}
  1425. case 679:
  1426. #line 3400 "preproc.y"
  1427. {
  1428. yyval.str = cat2_str(make1_str("timestamp"), yyvsp[0].str);
  1429. ;
  1430.     break;}
  1431. case 680:
  1432. #line 3404 "preproc.y"
  1433. {
  1434. yyval.str = make1_str("time");
  1435. ;
  1436.     break;}
  1437. case 681:
  1438. #line 3408 "preproc.y"
  1439. {
  1440. yyval.str = cat2_str(make1_str("interval"), yyvsp[0].str);
  1441. ;
  1442.     break;}
  1443. case 682:
  1444. #line 3413 "preproc.y"
  1445. { yyval.str = make1_str("year"); ;
  1446.     break;}
  1447. case 683:
  1448. #line 3414 "preproc.y"
  1449. { yyval.str = make1_str("month"); ;
  1450.     break;}
  1451. case 684:
  1452. #line 3415 "preproc.y"
  1453. { yyval.str = make1_str("day"); ;
  1454.     break;}
  1455. case 685:
  1456. #line 3416 "preproc.y"
  1457. { yyval.str = make1_str("hour"); ;
  1458.     break;}
  1459. case 686:
  1460. #line 3417 "preproc.y"
  1461. { yyval.str = make1_str("minute"); ;
  1462.     break;}
  1463. case 687:
  1464. #line 3418 "preproc.y"
  1465. { yyval.str = make1_str("second"); ;
  1466.     break;}
  1467. case 688:
  1468. #line 3421 "preproc.y"
  1469. { yyval.str = make1_str("with time zone"); ;
  1470.     break;}
  1471. case 689:
  1472. #line 3422 "preproc.y"
  1473. { yyval.str = make1_str(""); ;
  1474.     break;}
  1475. case 690:
  1476. #line 3425 "preproc.y"
  1477. { yyval.str = yyvsp[0].str; ;
  1478.     break;}
  1479. case 691:
  1480. #line 3426 "preproc.y"
  1481. { yyval.str = make1_str("year to #month"); ;
  1482.     break;}
  1483. case 692:
  1484. #line 3427 "preproc.y"
  1485. { yyval.str = make1_str("day to hour"); ;
  1486.     break;}
  1487. case 693:
  1488. #line 3428 "preproc.y"
  1489. { yyval.str = make1_str("day to minute"); ;
  1490.     break;}
  1491. case 694:
  1492. #line 3429 "preproc.y"
  1493. { yyval.str = make1_str("day to second"); ;
  1494.     break;}
  1495. case 695:
  1496. #line 3430 "preproc.y"
  1497. { yyval.str = make1_str("hour to minute"); ;
  1498.     break;}
  1499. case 696:
  1500. #line 3431 "preproc.y"
  1501. { yyval.str = make1_str("minute to second"); ;
  1502.     break;}
  1503. case 697:
  1504. #line 3432 "preproc.y"
  1505. { yyval.str = make1_str("hour to second"); ;
  1506.     break;}
  1507. case 698:
  1508. #line 3433 "preproc.y"
  1509. { yyval.str = make1_str(""); ;
  1510.     break;}
  1511. case 699:
  1512. #line 3444 "preproc.y"
  1513. { yyval.str = yyvsp[0].str; ;
  1514.     break;}
  1515. case 700:
  1516. #line 3446 "preproc.y"
  1517. {
  1518. yyval.str = make1_str("null");
  1519. ;
  1520.     break;}
  1521. case 701:
  1522. #line 3461 "preproc.y"
  1523. {
  1524. yyval.str = make5_str(make1_str("("), yyvsp[-5].str, make1_str(") in ("), yyvsp[-1].str, make1_str(")"));
  1525. ;
  1526.     break;}
  1527. case 702:
  1528. #line 3465 "preproc.y"
  1529. {
  1530. yyval.str = make5_str(make1_str("("), yyvsp[-6].str, make1_str(") not in ("), yyvsp[-1].str, make1_str(")"));
  1531. ;
  1532.     break;}
  1533. case 703:
  1534. #line 3469 "preproc.y"
  1535. {
  1536. yyval.str = make4_str(make5_str(make1_str("("), yyvsp[-6].str, make1_str(")"), yyvsp[-4].str, yyvsp[-3].str), make1_str("("), yyvsp[-1].str, make1_str(")"));
  1537. ;
  1538.     break;}
  1539. case 704:
  1540. #line 3473 "preproc.y"
  1541. {
  1542. yyval.str = make3_str(make5_str(make1_str("("), yyvsp[-5].str, make1_str(")"), yyvsp[-3].str, make1_str("(")), yyvsp[-1].str, make1_str(")"));
  1543. ;
  1544.     break;}
  1545. case 705:
  1546. #line 3477 "preproc.y"
  1547. {
  1548. yyval.str = cat3_str(make3_str(make1_str("("), yyvsp[-5].str, make1_str(")")), yyvsp[-3].str, make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")));
  1549. ;
  1550.     break;}
  1551. case 706:
  1552. #line 3483 "preproc.y"
  1553. {
  1554. yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str);
  1555. ;
  1556.     break;}
  1557. case 707:
  1558. #line 3488 "preproc.y"
  1559. { yyval.str = yyvsp[0].str; ;
  1560.     break;}
  1561. case 708:
  1562. #line 3489 "preproc.y"
  1563. { yyval.str = "<"; ;
  1564.     break;}
  1565. case 709:
  1566. #line 3490 "preproc.y"
  1567. { yyval.str = "="; ;
  1568.     break;}
  1569. case 710:
  1570. #line 3491 "preproc.y"
  1571. { yyval.str = ">"; ;
  1572.     break;}
  1573. case 711:
  1574. #line 3492 "preproc.y"
  1575. { yyval.str = "+"; ;
  1576.     break;}
  1577. case 712:
  1578. #line 3493 "preproc.y"
  1579. { yyval.str = "-"; ;
  1580.     break;}
  1581. case 713:
  1582. #line 3494 "preproc.y"
  1583. { yyval.str = "*"; ;
  1584.     break;}
  1585. case 714:
  1586. #line 3495 "preproc.y"
  1587. { yyval.str = "%"; ;
  1588.     break;}
  1589. case 715:
  1590. #line 3496 "preproc.y"
  1591. { yyval.str = "/"; ;
  1592.     break;}
  1593. case 716:
  1594. #line 3499 "preproc.y"
  1595. { yyval.str = make1_str("ANY"); ;
  1596.     break;}
  1597. case 717:
  1598. #line 3500 "preproc.y"
  1599. { yyval.str = make1_str("ALL"); ;
  1600.     break;}
  1601. case 718:
  1602. #line 3505 "preproc.y"
  1603. {
  1604. yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str);
  1605. ;
  1606.     break;}
  1607. case 719:
  1608. #line 3509 "preproc.y"
  1609. {
  1610. yyval.str = yyvsp[0].str;
  1611. ;
  1612.     break;}
  1613. case 720:
  1614. #line 3524 "preproc.y"
  1615. {
  1616. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  1617. ;
  1618.     break;}
  1619. case 721:
  1620. #line 3528 "preproc.y"
  1621. { yyval.str = yyvsp[0].str;  ;
  1622.     break;}
  1623. case 722:
  1624. #line 3530 "preproc.y"
  1625. { yyval.str = yyvsp[0].str;  ;
  1626.     break;}
  1627. case 723:
  1628. #line 3532 "preproc.y"
  1629. {
  1630. yyval.str = yyvsp[0].str;
  1631. ;
  1632.     break;}
  1633. case 724:
  1634. #line 3536 "preproc.y"
  1635. { yyval.str = cat2_str(make1_str("-"), yyvsp[0].str); ;
  1636.     break;}
  1637. case 725:
  1638. #line 3538 "preproc.y"
  1639. {       yyval.str = cat2_str(make1_str("%"), yyvsp[0].str); ;
  1640.     break;}
  1641. case 726:
  1642. #line 3540 "preproc.y"
  1643. {       yyval.str = cat2_str(yyvsp[-1].str, make1_str("%")); ;
  1644.     break;}
  1645. case 727:
  1646. #line 3542 "preproc.y"
  1647. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("+"), yyvsp[0].str); ;
  1648.     break;}
  1649. case 728:
  1650. #line 3544 "preproc.y"
  1651. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("-"), yyvsp[0].str); ;
  1652.     break;}
  1653. case 729:
  1654. #line 3546 "preproc.y"
  1655. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("/"), yyvsp[0].str); ;
  1656.     break;}
  1657. case 730:
  1658. #line 3548 "preproc.y"
  1659. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("%"), yyvsp[0].str); ;
  1660.     break;}
  1661. case 731:
  1662. #line 3550 "preproc.y"
  1663. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("*"), yyvsp[0].str); ;
  1664.     break;}
  1665. case 732:
  1666. #line 3552 "preproc.y"
  1667. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("<"), yyvsp[0].str); ;
  1668.     break;}
  1669. case 733:
  1670. #line 3554 "preproc.y"
  1671. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(">"), yyvsp[0].str); ;
  1672.     break;}
  1673. case 734:
  1674. #line 3556 "preproc.y"
  1675. {       yyval.str = cat2_str(yyvsp[-2].str, make1_str("= NULL")); ;
  1676.     break;}
  1677. case 735:
  1678. #line 3558 "preproc.y"
  1679. {       yyval.str = cat2_str(make1_str("= NULL"), yyvsp[0].str); ;
  1680.     break;}
  1681. case 736:
  1682. #line 3560 "preproc.y"
  1683. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("="), yyvsp[0].str); ;
  1684.     break;}
  1685. case 737:
  1686. #line 3565 "preproc.y"
  1687. { yyval.str = cat2_str(make1_str(";"), yyvsp[0].str); ;
  1688.     break;}
  1689. case 738:
  1690. #line 3567 "preproc.y"
  1691. { yyval.str = cat2_str(make1_str("|"), yyvsp[0].str); ;
  1692.     break;}
  1693. case 739:
  1694. #line 3569 "preproc.y"
  1695. {
  1696. yyval.str = cat3_str(yyvsp[-2].str, make1_str("::"), yyvsp[0].str);
  1697. ;
  1698.     break;}
  1699. case 740:
  1700. #line 3573 "preproc.y"
  1701. {
  1702. yyval.str = cat3_str(make2_str(make1_str("cast("), yyvsp[-3].str), make1_str("as"), make2_str(yyvsp[-1].str, make1_str(")")));
  1703. ;
  1704.     break;}
  1705. case 741:
  1706. #line 3577 "preproc.y"
  1707. { yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  1708.     break;}
  1709. case 742:
  1710. #line 3579 "preproc.y"
  1711. { yyval.str = cat3_str(yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str); ;
  1712.     break;}
  1713. case 743:
  1714. #line 3581 "preproc.y"
  1715. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("like"), yyvsp[0].str); ;
  1716.     break;}
  1717. case 744:
  1718. #line 3583 "preproc.y"
  1719. { yyval.str = cat3_str(yyvsp[-3].str, make1_str("not like"), yyvsp[0].str); ;
  1720.     break;}
  1721. case 745:
  1722. #line 3585 "preproc.y"
  1723. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  1724.     break;}
  1725. case 746:
  1726. #line 3587 "preproc.y"
  1727. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  1728.     break;}
  1729. case 747:
  1730. #line 3589 "preproc.y"
  1731. {
  1732. yyval.str = cat2_str(yyvsp[-3].str, make1_str("(*)")); 
  1733. ;
  1734.     break;}
  1735. case 748:
  1736. #line 3593 "preproc.y"
  1737. {
  1738. yyval.str = cat2_str(yyvsp[-2].str, make1_str("()")); 
  1739. ;
  1740.     break;}
  1741. case 749:
  1742. #line 3597 "preproc.y"
  1743. {
  1744. yyval.str = make4_str(yyvsp[-3].str, make1_str("("), yyvsp[-1].str, make1_str(")")); 
  1745. ;
  1746.     break;}
  1747. case 750:
  1748. #line 3601 "preproc.y"
  1749. {
  1750. yyval.str = make1_str("current_date");
  1751. ;
  1752.     break;}
  1753. case 751:
  1754. #line 3605 "preproc.y"
  1755. {
  1756. yyval.str = make1_str("current_time");
  1757. ;
  1758.     break;}
  1759. case 752:
  1760. #line 3609 "preproc.y"
  1761. {
  1762. if (atol(yyvsp[-1].str) != 0)
  1763. fprintf(stderr,"CURRENT_TIME(%s) precision not implemented; zero used instead", yyvsp[-1].str);
  1764. yyval.str = make1_str("current_time");
  1765. ;
  1766.     break;}
  1767. case 753:
  1768. #line 3615 "preproc.y"
  1769. {
  1770. yyval.str = make1_str("current_timestamp");
  1771. ;
  1772.     break;}
  1773. case 754:
  1774. #line 3619 "preproc.y"
  1775. {
  1776. if (atol(yyvsp[-1].str) != 0)
  1777. fprintf(stderr,"CURRENT_TIMESTAMP(%s) precision not implemented; zero used instead",yyvsp[-1].str);
  1778. yyval.str = make1_str("current_timestamp");
  1779. ;
  1780.     break;}
  1781. case 755:
  1782. #line 3625 "preproc.y"
  1783. {
  1784. yyval.str = make1_str("current_user");
  1785. ;
  1786.     break;}
  1787. case 756:
  1788. #line 3629 "preproc.y"
  1789. {
  1790.                  yyval.str = make1_str("user");
  1791.       ;
  1792.     break;}
  1793. case 757:
  1794. #line 3633 "preproc.y"
  1795. {
  1796. yyval.str = make3_str(make1_str("exists("), yyvsp[-1].str, make1_str(")"));
  1797. ;
  1798.     break;}
  1799. case 758:
  1800. #line 3637 "preproc.y"
  1801. {
  1802. yyval.str = make3_str(make1_str("extract("), yyvsp[-1].str, make1_str(")"));
  1803. ;
  1804.     break;}
  1805. case 759:
  1806. #line 3641 "preproc.y"
  1807. {
  1808. yyval.str = make3_str(make1_str("position("), yyvsp[-1].str, make1_str(")"));
  1809. ;
  1810.     break;}
  1811. case 760:
  1812. #line 3645 "preproc.y"
  1813. {
  1814. yyval.str = make3_str(make1_str("substring("), yyvsp[-1].str, make1_str(")"));
  1815. ;
  1816.     break;}
  1817. case 761:
  1818. #line 3650 "preproc.y"
  1819. {
  1820. yyval.str = make3_str(make1_str("trim(both"), yyvsp[-1].str, make1_str(")"));
  1821. ;
  1822.     break;}
  1823. case 762:
  1824. #line 3654 "preproc.y"
  1825. {
  1826. yyval.str = make3_str(make1_str("trim(leading"), yyvsp[-1].str, make1_str(")"));
  1827. ;
  1828.     break;}
  1829. case 763:
  1830. #line 3658 "preproc.y"
  1831. {
  1832. yyval.str = make3_str(make1_str("trim(trailing"), yyvsp[-1].str, make1_str(")"));
  1833. ;
  1834.     break;}
  1835. case 764:
  1836. #line 3662 "preproc.y"
  1837. {
  1838. yyval.str = make3_str(make1_str("trim("), yyvsp[-1].str, make1_str(")"));
  1839. ;
  1840.     break;}
  1841. case 765:
  1842. #line 3666 "preproc.y"
  1843. { yyval.str = cat2_str(yyvsp[-1].str, make1_str("isnull")); ;
  1844.     break;}
  1845. case 766:
  1846. #line 3668 "preproc.y"
  1847. { yyval.str = cat2_str(yyvsp[-2].str, make1_str("is null")); ;
  1848.     break;}
  1849. case 767:
  1850. #line 3670 "preproc.y"
  1851. { yyval.str = cat2_str(yyvsp[-1].str, make1_str("notnull")); ;
  1852.     break;}
  1853. case 768:
  1854. #line 3672 "preproc.y"
  1855. { yyval.str = cat2_str(yyvsp[-3].str, make1_str("is not null")); ;
  1856.     break;}
  1857. case 769:
  1858. #line 3679 "preproc.y"
  1859. {
  1860. { yyval.str = cat2_str(yyvsp[-2].str, make1_str("is true")); }
  1861. ;
  1862.     break;}
  1863. case 770:
  1864. #line 3683 "preproc.y"
  1865. {
  1866. { yyval.str = cat2_str(yyvsp[-3].str, make1_str("is not false")); }
  1867. ;
  1868.     break;}
  1869. case 771:
  1870. #line 3687 "preproc.y"
  1871. {
  1872. { yyval.str = cat2_str(yyvsp[-2].str, make1_str("is false")); }
  1873. ;
  1874.     break;}
  1875. case 772:
  1876. #line 3691 "preproc.y"
  1877. {
  1878. { yyval.str = cat2_str(yyvsp[-3].str, make1_str("is not true")); }
  1879. ;
  1880.     break;}
  1881. case 773:
  1882. #line 3695 "preproc.y"
  1883. {
  1884. yyval.str = cat5_str(yyvsp[-4].str, make1_str("between"), yyvsp[-2].str, make1_str("and"), yyvsp[0].str); 
  1885. ;
  1886.     break;}
  1887. case 774:
  1888. #line 3699 "preproc.y"
  1889. {
  1890. yyval.str = cat5_str(yyvsp[-5].str, make1_str("not between"), yyvsp[-2].str, make1_str("and"), yyvsp[0].str); 
  1891. ;
  1892.     break;}
  1893. case 775:
  1894. #line 3703 "preproc.y"
  1895. {
  1896. yyval.str = make4_str(yyvsp[-4].str, make1_str(" in ("), yyvsp[-1].str, make1_str(")")); 
  1897. ;
  1898.     break;}
  1899. case 776:
  1900. #line 3707 "preproc.y"
  1901. {
  1902. yyval.str = make4_str(yyvsp[-5].str, make1_str(" not in ("), yyvsp[-1].str, make1_str(")")); 
  1903. ;
  1904.     break;}
  1905. case 777:
  1906. #line 3711 "preproc.y"
  1907. {
  1908. yyval.str = cat3_str(yyvsp[-4].str, yyvsp[-3].str, make3_str(make1_str("("), yyvsp[-1].str, make1_str(")"))); 
  1909. ;
  1910.     break;}
  1911. case 778:
  1912. #line 3715 "preproc.y"
  1913. {
  1914. yyval.str = make4_str(yyvsp[-4].str, make1_str("+("), yyvsp[-1].str, make1_str(")")); 
  1915. ;
  1916.     break;}
  1917. case 779:
  1918. #line 3719 "preproc.y"
  1919. {
  1920. yyval.str = make4_str(yyvsp[-4].str, make1_str("-("), yyvsp[-1].str, make1_str(")")); 
  1921. ;
  1922.     break;}
  1923. case 780:
  1924. #line 3723 "preproc.y"
  1925. {
  1926. yyval.str = make4_str(yyvsp[-4].str, make1_str("/("), yyvsp[-1].str, make1_str(")")); 
  1927. ;
  1928.     break;}
  1929. case 781:
  1930. #line 3727 "preproc.y"
  1931. {
  1932. yyval.str = make4_str(yyvsp[-4].str, make1_str("%("), yyvsp[-1].str, make1_str(")")); 
  1933. ;
  1934.     break;}
  1935. case 782:
  1936. #line 3731 "preproc.y"
  1937. {
  1938. yyval.str = make4_str(yyvsp[-4].str, make1_str("*("), yyvsp[-1].str, make1_str(")")); 
  1939. ;
  1940.     break;}
  1941. case 783:
  1942. #line 3735 "preproc.y"
  1943. {
  1944. yyval.str = make4_str(yyvsp[-4].str, make1_str("<("), yyvsp[-1].str, make1_str(")")); 
  1945. ;
  1946.     break;}
  1947. case 784:
  1948. #line 3739 "preproc.y"
  1949. {
  1950. yyval.str = make4_str(yyvsp[-4].str, make1_str(">("), yyvsp[-1].str, make1_str(")")); 
  1951. ;
  1952.     break;}
  1953. case 785:
  1954. #line 3743 "preproc.y"
  1955. {
  1956. yyval.str = make4_str(yyvsp[-4].str, make1_str("=("), yyvsp[-1].str, make1_str(")")); 
  1957. ;
  1958.     break;}
  1959. case 786:
  1960. #line 3747 "preproc.y"
  1961. {
  1962. yyval.str = cat3_str(yyvsp[-5].str, yyvsp[-4].str, make3_str(make1_str("any("), yyvsp[-1].str, make1_str(")"))); 
  1963. ;
  1964.     break;}
  1965. case 787:
  1966. #line 3751 "preproc.y"
  1967. {
  1968. yyval.str = make4_str(yyvsp[-5].str, make1_str("+ any("), yyvsp[-1].str, make1_str(")")); 
  1969. ;
  1970.     break;}
  1971. case 788:
  1972. #line 3755 "preproc.y"
  1973. {
  1974. yyval.str = make4_str(yyvsp[-5].str, make1_str("- any("), yyvsp[-1].str, make1_str(")")); 
  1975. ;
  1976.     break;}
  1977. case 789:
  1978. #line 3759 "preproc.y"
  1979. {
  1980. yyval.str = make4_str(yyvsp[-5].str, make1_str("/ any("), yyvsp[-1].str, make1_str(")")); 
  1981. ;
  1982.     break;}
  1983. case 790:
  1984. #line 3763 "preproc.y"
  1985. {
  1986. yyval.str = make4_str(yyvsp[-5].str, make1_str("% any("), yyvsp[-1].str, make1_str(")")); 
  1987. ;
  1988.     break;}
  1989. case 791:
  1990. #line 3767 "preproc.y"
  1991. {
  1992. yyval.str = make4_str(yyvsp[-5].str, make1_str("* any("), yyvsp[-1].str, make1_str(")")); 
  1993. ;
  1994.     break;}
  1995. case 792:
  1996. #line 3771 "preproc.y"
  1997. {
  1998. yyval.str = make4_str(yyvsp[-5].str, make1_str("< any("), yyvsp[-1].str, make1_str(")")); 
  1999. ;
  2000.     break;}
  2001. case 793:
  2002. #line 3775 "preproc.y"
  2003. {
  2004. yyval.str = make4_str(yyvsp[-5].str, make1_str("> any("), yyvsp[-1].str, make1_str(")")); 
  2005. ;
  2006.     break;}
  2007. case 794:
  2008. #line 3779 "preproc.y"
  2009. {
  2010. yyval.str = make4_str(yyvsp[-5].str, make1_str("= any("), yyvsp[-1].str, make1_str(")")); 
  2011. ;
  2012.     break;}
  2013. case 795:
  2014. #line 3783 "preproc.y"
  2015. {
  2016. yyval.str = cat3_str(yyvsp[-5].str, yyvsp[-4].str, make3_str(make1_str("all ("), yyvsp[-1].str, make1_str(")"))); 
  2017. ;
  2018.     break;}
  2019. case 796:
  2020. #line 3787 "preproc.y"
  2021. {
  2022. yyval.str = make4_str(yyvsp[-5].str, make1_str("+ all("), yyvsp[-1].str, make1_str(")")); 
  2023. ;
  2024.     break;}
  2025. case 797:
  2026. #line 3791 "preproc.y"
  2027. {
  2028. yyval.str = make4_str(yyvsp[-5].str, make1_str("- all("), yyvsp[-1].str, make1_str(")")); 
  2029. ;
  2030.     break;}
  2031. case 798:
  2032. #line 3795 "preproc.y"
  2033. {
  2034. yyval.str = make4_str(yyvsp[-5].str, make1_str("/ all("), yyvsp[-1].str, make1_str(")")); 
  2035. ;
  2036.     break;}
  2037. case 799:
  2038. #line 3799 "preproc.y"
  2039. {
  2040. yyval.str = make4_str(yyvsp[-5].str, make1_str("% all("), yyvsp[-1].str, make1_str(")")); 
  2041. ;
  2042.     break;}
  2043. case 800:
  2044. #line 3803 "preproc.y"
  2045. {
  2046. yyval.str = make4_str(yyvsp[-5].str, make1_str("* all("), yyvsp[-1].str, make1_str(")")); 
  2047. ;
  2048.     break;}
  2049. case 801:
  2050. #line 3807 "preproc.y"
  2051. {
  2052. yyval.str = make4_str(yyvsp[-5].str, make1_str("< all("), yyvsp[-1].str, make1_str(")")); 
  2053. ;
  2054.     break;}
  2055. case 802:
  2056. #line 3811 "preproc.y"
  2057. {
  2058. yyval.str = make4_str(yyvsp[-5].str, make1_str("> all("), yyvsp[-1].str, make1_str(")")); 
  2059. ;
  2060.     break;}
  2061. case 803:
  2062. #line 3815 "preproc.y"
  2063. {
  2064. yyval.str = make4_str(yyvsp[-5].str, make1_str("= all("), yyvsp[-1].str, make1_str(")")); 
  2065. ;
  2066.     break;}
  2067. case 804:
  2068. #line 3819 "preproc.y"
  2069. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("and"), yyvsp[0].str); ;
  2070.     break;}
  2071. case 805:
  2072. #line 3821 "preproc.y"
  2073. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("or"), yyvsp[0].str); ;
  2074.     break;}
  2075. case 806:
  2076. #line 3823 "preproc.y"
  2077. { yyval.str = cat2_str(make1_str("not"), yyvsp[0].str); ;
  2078.     break;}
  2079. case 807:
  2080. #line 3825 "preproc.y"
  2081. {       yyval.str = yyvsp[0].str; ;
  2082.     break;}
  2083. case 808:
  2084. #line 3827 "preproc.y"
  2085. { yyval.str = make1_str("?"); ;
  2086.     break;}
  2087. case 809:
  2088. #line 3836 "preproc.y"
  2089. {
  2090. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  2091. ;
  2092.     break;}
  2093. case 810:
  2094. #line 3840 "preproc.y"
  2095. { yyval.str = yyvsp[0].str;  ;
  2096.     break;}
  2097. case 811:
  2098. #line 3842 "preproc.y"
  2099. {
  2100. yyval.str = yyvsp[0].str;
  2101. ;
  2102.     break;}
  2103. case 812:
  2104. #line 3846 "preproc.y"
  2105. { yyval.str = cat2_str(make1_str("-"), yyvsp[0].str); ;
  2106.     break;}
  2107. case 813:
  2108. #line 3848 "preproc.y"
  2109. {       yyval.str = cat2_str(make1_str("%"), yyvsp[0].str); ;
  2110.     break;}
  2111. case 814:
  2112. #line 3850 "preproc.y"
  2113. {       yyval.str = cat2_str(yyvsp[-1].str, make1_str("%")); ;
  2114.     break;}
  2115. case 815:
  2116. #line 3852 "preproc.y"
  2117. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("+"), yyvsp[0].str); ;
  2118.     break;}
  2119. case 816:
  2120. #line 3854 "preproc.y"
  2121. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("-"), yyvsp[0].str); ;
  2122.     break;}
  2123. case 817:
  2124. #line 3856 "preproc.y"
  2125. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("/"), yyvsp[0].str); ;
  2126.     break;}
  2127. case 818:
  2128. #line 3858 "preproc.y"
  2129. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("%"), yyvsp[0].str); ;
  2130.     break;}
  2131. case 819:
  2132. #line 3860 "preproc.y"
  2133. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("*"), yyvsp[0].str); ;
  2134.     break;}
  2135. case 820:
  2136. #line 3865 "preproc.y"
  2137. { yyval.str = cat2_str(make1_str(";"), yyvsp[0].str); ;
  2138.     break;}
  2139. case 821:
  2140. #line 3867 "preproc.y"
  2141. { yyval.str = cat2_str(make1_str("|"), yyvsp[0].str); ;
  2142.     break;}
  2143. case 822:
  2144. #line 3869 "preproc.y"
  2145. {
  2146. yyval.str = cat3_str(yyvsp[-2].str, make1_str("::"), yyvsp[0].str);
  2147. ;
  2148.     break;}
  2149. case 823:
  2150. #line 3873 "preproc.y"
  2151. {
  2152. yyval.str = cat3_str(make2_str(make1_str("cast("), yyvsp[-3].str), make1_str("as"), make2_str(yyvsp[-1].str, make1_str(")")));
  2153. ;
  2154.     break;}
  2155. case 824:
  2156. #line 3877 "preproc.y"
  2157. { yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  2158.     break;}
  2159. case 825:
  2160. #line 3879 "preproc.y"
  2161. { yyval.str = cat3_str(yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str); ;
  2162.     break;}
  2163. case 826:
  2164. #line 3881 "preproc.y"
  2165. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  2166.     break;}
  2167. case 827:
  2168. #line 3883 "preproc.y"
  2169. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  2170.     break;}
  2171. case 828:
  2172. #line 3885 "preproc.y"
  2173. {
  2174. yyval.str = cat2_str(yyvsp[-2].str, make1_str("()")); 
  2175. ;
  2176.     break;}
  2177. case 829:
  2178. #line 3889 "preproc.y"
  2179. {
  2180. yyval.str = make4_str(yyvsp[-3].str, make1_str("("), yyvsp[-1].str, make1_str(")")); 
  2181. ;
  2182.     break;}
  2183. case 830:
  2184. #line 3893 "preproc.y"
  2185. {
  2186. yyval.str = make1_str("current_date");
  2187. ;
  2188.     break;}
  2189. case 831:
  2190. #line 3897 "preproc.y"
  2191. {
  2192. yyval.str = make1_str("current_time");
  2193. ;
  2194.     break;}
  2195. case 832:
  2196. #line 3901 "preproc.y"
  2197. {
  2198. if (yyvsp[-1].str != 0)
  2199. fprintf(stderr,"CURRENT_TIME(%s) precision not implemented; zero used instead", yyvsp[-1].str);
  2200. yyval.str = make1_str("current_time");
  2201. ;
  2202.     break;}
  2203. case 833:
  2204. #line 3907 "preproc.y"
  2205. {
  2206. yyval.str = make1_str("current_timestamp");
  2207. ;
  2208.     break;}
  2209. case 834:
  2210. #line 3911 "preproc.y"
  2211. {
  2212. if (atol(yyvsp[-1].str) != 0)
  2213. fprintf(stderr,"CURRENT_TIMESTAMP(%s) precision not implemented; zero used instead",yyvsp[-1].str);
  2214. yyval.str = make1_str("current_timestamp");
  2215. ;
  2216.     break;}
  2217. case 835:
  2218. #line 3917 "preproc.y"
  2219. {
  2220. yyval.str = make1_str("current_user");
  2221. ;
  2222.     break;}
  2223. case 836:
  2224. #line 3921 "preproc.y"
  2225. {
  2226. yyval.str = make1_str("user");
  2227. ;
  2228.     break;}
  2229. case 837:
  2230. #line 3925 "preproc.y"
  2231. {
  2232. yyval.str = make3_str(make1_str("position ("), yyvsp[-1].str, make1_str(")"));
  2233. ;
  2234.     break;}
  2235. case 838:
  2236. #line 3929 "preproc.y"
  2237. {
  2238. yyval.str = make3_str(make1_str("substring ("), yyvsp[-1].str, make1_str(")"));
  2239. ;
  2240.     break;}
  2241. case 839:
  2242. #line 3934 "preproc.y"
  2243. {
  2244. yyval.str = make3_str(make1_str("trim(both"), yyvsp[-1].str, make1_str(")"));
  2245. ;
  2246.     break;}
  2247. case 840:
  2248. #line 3938 "preproc.y"
  2249. {
  2250. yyval.str = make3_str(make1_str("trim(leading"), yyvsp[-1].str, make1_str(")"));
  2251. ;
  2252.     break;}
  2253. case 841:
  2254. #line 3942 "preproc.y"
  2255. {
  2256. yyval.str = make3_str(make1_str("trim(trailing"), yyvsp[-1].str, make1_str(")"));
  2257. ;
  2258.     break;}
  2259. case 842:
  2260. #line 3946 "preproc.y"
  2261. {
  2262. yyval.str = make3_str(make1_str("trim("), yyvsp[-1].str, make1_str(")"));
  2263. ;
  2264.     break;}
  2265. case 843:
  2266. #line 3950 "preproc.y"
  2267. {  yyval.str = yyvsp[0].str; ;
  2268.     break;}
  2269. case 844:
  2270. #line 3954 "preproc.y"
  2271. {
  2272. yyval.str = cat4_str(make1_str("["), yyvsp[-2].str, make1_str("]"), yyvsp[0].str);
  2273. ;
  2274.     break;}
  2275. case 845:
  2276. #line 3958 "preproc.y"
  2277. {
  2278. yyval.str = cat2_str(cat5_str(make1_str("["), yyvsp[-4].str, make1_str(":"), yyvsp[-2].str, make1_str("]")), yyvsp[0].str);
  2279. ;
  2280.     break;}
  2281. case 846:
  2282. #line 3962 "preproc.y"
  2283. { yyval.str = make1_str(""); ;
  2284.     break;}
  2285. case 847:
  2286. #line 3966 "preproc.y"
  2287. { yyval.str = yyvsp[0].str; ;
  2288.     break;}
  2289. case 848:
  2290. #line 3968 "preproc.y"
  2291. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str); ;
  2292.     break;}
  2293. case 849:
  2294. #line 3970 "preproc.y"
  2295. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("using"), yyvsp[0].str); ;
  2296.     break;}
  2297. case 850:
  2298. #line 3974 "preproc.y"
  2299. {
  2300. yyval.str = cat3_str(yyvsp[-2].str, make1_str("from"), yyvsp[0].str);
  2301. ;
  2302.     break;}
  2303. case 851:
  2304. #line 3978 "preproc.y"
  2305. { yyval.str = make1_str(""); ;
  2306.     break;}
  2307. case 852:
  2308. #line 3980 "preproc.y"
  2309. { yyval.str = make1_str("?"); ;
  2310.     break;}
  2311. case 853:
  2312. #line 3983 "preproc.y"
  2313. { yyval.str = yyvsp[0].str; ;
  2314.     break;}
  2315. case 854:
  2316. #line 3984 "preproc.y"
  2317. { yyval.str = make1_str("timezone_hour"); ;
  2318.     break;}
  2319. case 855:
  2320. #line 3985 "preproc.y"
  2321. { yyval.str = make1_str("timezone_minute"); ;
  2322.     break;}
  2323. case 856:
  2324. #line 3989 "preproc.y"
  2325. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("in"), yyvsp[0].str); ;
  2326.     break;}
  2327. case 857:
  2328. #line 3991 "preproc.y"
  2329. { yyval.str = make1_str(""); ;
  2330.     break;}
  2331. case 858:
  2332. #line 3995 "preproc.y"
  2333. {
  2334. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  2335. ;
  2336.     break;}
  2337. case 859:
  2338. #line 3999 "preproc.y"
  2339. { yyval.str = yyvsp[0].str;  ;
  2340.     break;}
  2341. case 860:
  2342. #line 4001 "preproc.y"
  2343. { yyval.str = cat2_str(make1_str("-"), yyvsp[0].str); ;
  2344.     break;}
  2345. case 861:
  2346. #line 4003 "preproc.y"
  2347. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("+"), yyvsp[0].str); ;
  2348.     break;}
  2349. case 862:
  2350. #line 4005 "preproc.y"
  2351. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("-"), yyvsp[0].str); ;
  2352.     break;}
  2353. case 863:
  2354. #line 4007 "preproc.y"
  2355. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("/"), yyvsp[0].str); ;
  2356.     break;}
  2357. case 864:
  2358. #line 4009 "preproc.y"
  2359. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("%"), yyvsp[0].str); ;
  2360.     break;}
  2361. case 865:
  2362. #line 4011 "preproc.y"
  2363. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("*"), yyvsp[0].str); ;
  2364.     break;}
  2365. case 866:
  2366. #line 4013 "preproc.y"
  2367. { yyval.str = cat2_str(make1_str("|"), yyvsp[0].str); ;
  2368.     break;}
  2369. case 867:
  2370. #line 4015 "preproc.y"
  2371. {
  2372. yyval.str = cat3_str(yyvsp[-2].str, make1_str("::"), yyvsp[0].str);
  2373. ;
  2374.     break;}
  2375. case 868:
  2376. #line 4019 "preproc.y"
  2377. {
  2378. yyval.str = cat3_str(make2_str(make1_str("cast("), yyvsp[-3].str), make1_str("as"), make2_str(yyvsp[-1].str, make1_str(")")));
  2379. ;
  2380.     break;}
  2381. case 869:
  2382. #line 4023 "preproc.y"
  2383. { yyval.str = make3_str(make1_str("("), yyvsp[-1].str, make1_str(")")); ;
  2384.     break;}
  2385. case 870:
  2386. #line 4025 "preproc.y"
  2387. { yyval.str = cat3_str(yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str); ;
  2388.     break;}
  2389. case 871:
  2390. #line 4027 "preproc.y"
  2391. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  2392.     break;}
  2393. case 872:
  2394. #line 4029 "preproc.y"
  2395. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  2396.     break;}
  2397. case 873:
  2398. #line 4031 "preproc.y"
  2399. {
  2400. yyval.str = yyvsp[0].str;
  2401. ;
  2402.     break;}
  2403. case 874:
  2404. #line 4035 "preproc.y"
  2405. {
  2406. yyval.str = cat2_str(yyvsp[-2].str, make1_str("()"));
  2407. ;
  2408.     break;}
  2409. case 875:
  2410. #line 4039 "preproc.y"
  2411. {
  2412. yyval.str = make4_str(yyvsp[-3].str, make1_str("("), yyvsp[-1].str, make1_str(")"));
  2413. ;
  2414.     break;}
  2415. case 876:
  2416. #line 4043 "preproc.y"
  2417. {
  2418. yyval.str = make3_str(make1_str("position("), yyvsp[-1].str, make1_str(")"));
  2419. ;
  2420.     break;}
  2421. case 877:
  2422. #line 4047 "preproc.y"
  2423. {
  2424. yyval.str = make3_str(make1_str("substring("), yyvsp[-1].str, make1_str(")"));
  2425. ;
  2426.     break;}
  2427. case 878:
  2428. #line 4052 "preproc.y"
  2429. {
  2430. yyval.str = make3_str(make1_str("trim(both"), yyvsp[-1].str, make1_str(")"));
  2431. ;
  2432.     break;}
  2433. case 879:
  2434. #line 4056 "preproc.y"
  2435. {
  2436. yyval.str = make3_str(make1_str("trim(leading"), yyvsp[-1].str, make1_str(")"));
  2437. ;
  2438.     break;}
  2439. case 880:
  2440. #line 4060 "preproc.y"
  2441. {
  2442. yyval.str = make3_str(make1_str("trim(trailing"), yyvsp[-1].str, make1_str(")"));
  2443. ;
  2444.     break;}
  2445. case 881:
  2446. #line 4064 "preproc.y"
  2447. {
  2448. yyval.str = make3_str(make1_str("trim("), yyvsp[-1].str, make1_str(")"));
  2449. ;
  2450.     break;}
  2451. case 882:
  2452. #line 4070 "preproc.y"
  2453. {
  2454. yyval.str = cat3_str(yyvsp[-2].str, yyvsp[-1].str, yyvsp[0].str);
  2455. ;
  2456.     break;}
  2457. case 883:
  2458. #line 4074 "preproc.y"
  2459. { yyval.str = make1_str(""); ;
  2460.     break;}
  2461. case 884:
  2462. #line 4078 "preproc.y"
  2463. { yyval.str = cat2_str(make1_str("from"), yyvsp[0].str); ;
  2464.     break;}
  2465. case 885:
  2466. #line 4080 "preproc.y"
  2467. {
  2468. yyval.str = make1_str("");
  2469. ;
  2470.     break;}
  2471. case 886:
  2472. #line 4086 "preproc.y"
  2473. { yyval.str = cat2_str(make1_str("for"), yyvsp[0].str); ;
  2474.     break;}
  2475. case 887:
  2476. #line 4088 "preproc.y"
  2477. { yyval.str = make1_str(""); ;
  2478.     break;}
  2479. case 888:
  2480. #line 4092 "preproc.y"
  2481. { yyval.str = cat3_str(yyvsp[-2].str, make1_str("from"), yyvsp[0].str); ;
  2482.     break;}
  2483. case 889:
  2484. #line 4094 "preproc.y"
  2485. { yyval.str = cat2_str(make1_str("from"), yyvsp[0].str); ;
  2486.     break;}
  2487. case 890:
  2488. #line 4096 "preproc.y"
  2489. { yyval.str = yyvsp[0].str; ;
  2490.     break;}
  2491. case 891:
  2492. #line 4100 "preproc.y"
  2493. {
  2494. yyval.str = yyvsp[0].str;
  2495. ;
  2496.     break;}
  2497. case 892:
  2498. #line 4104 "preproc.y"
  2499. { yyval.str = yyvsp[0].str; ;
  2500.     break;}
  2501. case 893:
  2502. #line 4108 "preproc.y"
  2503. { yyval.str = yyvsp[0].str; ;
  2504.     break;}
  2505. case 894:
  2506. #line 4110 "preproc.y"
  2507. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str);;
  2508.     break;}
  2509. case 895:
  2510. #line 4114 "preproc.y"
  2511. {
  2512. yyval.str = yyvsp[0].str; 
  2513. ;
  2514.     break;}
  2515. case 896:
  2516. #line 4118 "preproc.y"
  2517. { yyval.str = yyvsp[0].str; ;
  2518.     break;}
  2519. case 897:
  2520. #line 4122 "preproc.y"
  2521. { yyval.str = yyvsp[0].str; ;
  2522.     break;}
  2523. case 898:
  2524. #line 4124 "preproc.y"
  2525. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str);;
  2526.     break;}
  2527. case 899:
  2528. #line 4143 "preproc.y"
  2529. { yyval.str = cat5_str(make1_str("case"), yyvsp[-3].str, yyvsp[-2].str, yyvsp[-1].str, make1_str("end")); ;
  2530.     break;}
  2531. case 900:
  2532. #line 4145 "preproc.y"
  2533. {
  2534. yyval.str = cat5_str(make1_str("nullif("), yyvsp[-3].str, make1_str(","), yyvsp[-1].str, make1_str(")"));
  2536. fprintf(stderr, "NULLIF() not yet fully implemented");
  2537.                                 ;
  2538.     break;}
  2539. case 901:
  2540. #line 4151 "preproc.y"
  2541. {
  2542. yyval.str = cat3_str(make1_str("coalesce("), yyvsp[-1].str, make1_str(")"));
  2543. ;
  2544.     break;}
  2545. case 902:
  2546. #line 4157 "preproc.y"
  2547. { yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str); ;
  2548.     break;}
  2549. case 903:
  2550. #line 4159 "preproc.y"
  2551. { yyval.str = yyvsp[0].str; ;
  2552.     break;}
  2553. case 904:
  2554. #line 4163 "preproc.y"
  2555. {
  2556. yyval.str = cat4_str(make1_str("when"), yyvsp[-2].str, make1_str("then"), yyvsp[0].str);
  2557.                                ;
  2558.     break;}
  2559. case 905:
  2560. #line 4168 "preproc.y"
  2561. { yyval.str = cat2_str(make1_str("else"), yyvsp[0].str); ;
  2562.     break;}
  2563. case 906:
  2564. #line 4169 "preproc.y"
  2565. { yyval.str = make1_str(""); ;
  2566.     break;}
  2567. case 907:
  2568. #line 4173 "preproc.y"
  2569. {
  2570.                                        yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  2571.                                ;
  2572.     break;}
  2573. case 908:
  2574. #line 4177 "preproc.y"
  2575. {
  2576.                                        yyval.str = yyvsp[0].str;
  2577.                                ;
  2578.     break;}
  2579. case 909:
  2580. #line 4181 "preproc.y"
  2581. {       yyval.str = make1_str(""); ;
  2582.     break;}
  2583. case 910:
  2584. #line 4185 "preproc.y"
  2585. {
  2586. yyval.str = make3_str(yyvsp[-2].str, make1_str("."), yyvsp[0].str);
  2587. ;
  2588.     break;}
  2589. case 911:
  2590. #line 4189 "preproc.y"
  2591. {
  2592. yyval.str = make3_str(yyvsp[-2].str, make1_str("."), yyvsp[0].str);
  2593. ;
  2594.     break;}
  2595. case 912:
  2596. #line 4195 "preproc.y"
  2597. { yyval.str = yyvsp[0].str; ;
  2598.     break;}
  2599. case 913:
  2600. #line 4197 "preproc.y"
  2601. { yyval.str = make3_str(yyvsp[-2].str, make1_str("."), yyvsp[0].str); ;
  2602.     break;}
  2603. case 914:
  2604. #line 4199 "preproc.y"
  2605. { yyval.str = make2_str(yyvsp[-2].str, make1_str(".*")); ;
  2606.     break;}
  2607. case 915:
  2608. #line 4210 "preproc.y"
  2609. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","),yyvsp[0].str);  ;
  2610.     break;}
  2611. case 916:
  2612. #line 4212 "preproc.y"
  2613. { yyval.str = yyvsp[0].str;  ;
  2614.     break;}
  2615. case 917:
  2616. #line 4213 "preproc.y"
  2617. { yyval.str = make1_str("*"); ;
  2618.     break;}
  2619. case 918:
  2620. #line 4217 "preproc.y"
  2621. {
  2622. yyval.str = cat4_str(yyvsp[-3].str, yyvsp[-2].str, make1_str("="), yyvsp[0].str);
  2623. ;
  2624.     break;}
  2625. case 919:
  2626. #line 4221 "preproc.y"
  2627. {
  2628. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  2629. ;
  2630.     break;}
  2631. case 920:
  2632. #line 4225 "preproc.y"
  2633. {
  2634. yyval.str = make2_str(yyvsp[-2].str, make1_str(".*"));
  2635. ;
  2636.     break;}
  2637. case 921:
  2638. #line 4236 "preproc.y"
  2639. { yyval.str = cat3_str(yyvsp[-2].str, make1_str(","), yyvsp[0].str);  ;
  2640.     break;}
  2641. case 922:
  2642. #line 4238 "preproc.y"
  2643. { yyval.str = yyvsp[0].str;  ;
  2644.     break;}
  2645. case 923:
  2646. #line 4243 "preproc.y"
  2647. {
  2648. yyval.str = cat3_str(yyvsp[-2].str, make1_str("as"), yyvsp[0].str);
  2649. ;
  2650.     break;}
  2651. case 924:
  2652. #line 4247 "preproc.y"
  2653. {
  2654. yyval.str = yyvsp[0].str;
  2655. ;
  2656.     break;}
  2657. case 925:
  2658. #line 4251 "preproc.y"
  2659. {
  2660. yyval.str = make2_str(yyvsp[-2].str, make1_str(".*"));
  2661. ;
  2662.     break;}
  2663. case 926:
  2664. #line 4255 "preproc.y"
  2665. {
  2666. yyval.str = make1_str("*");
  2667. ;
  2668.     break;}
  2669. case 927:
  2670. #line 4260 "preproc.y"
  2671. { yyval.str = yyvsp[0].str; ;
  2672.     break;}
  2673. case 928:
  2674. #line 4261 "preproc.y"
  2675. { yyval.str = make1_str(""); ;
  2676.     break;}
  2677. case 929:
  2678. #line 4265 "preproc.y"
  2679. {
  2680. yyval.str = yyvsp[0].str;
  2681. ;
  2682.     break;}
  2683. case 930:
  2684. #line 4269 "preproc.y"
  2685. {
  2686. /* disallow refs to variable system tables */
  2687. if (strcmp(LogRelationName, yyvsp[0].str) == 0
  2688.    || strcmp(VariableRelationName, yyvsp[0].str) == 0) {
  2689. sprintf(errortext, make1_str("%s cannot be accessed by users"),yyvsp[0].str);
  2690. yyerror(errortext);
  2691. }
  2692. else
  2693. yyval.str = yyvsp[0].str;
  2694. ;
  2695.     break;}
  2696. case 931:
  2697. #line 4281 "preproc.y"
  2698. { yyval.str = yyvsp[0].str; ;
  2699.     break;}
  2700. case 932:
  2701. #line 4282 "preproc.y"
  2702. { yyval.str = yyvsp[0].str; ;
  2703.     break;}
  2704. case 933:
  2705. #line 4283 "preproc.y"
  2706. { yyval.str = yyvsp[0].str; ;
  2707.     break;}
  2708. case 934:
  2709. #line 4284 "preproc.y"
  2710. { yyval.str = yyvsp[0].str; ;
  2711.     break;}
  2712. case 935:
  2713. #line 4285 "preproc.y"
  2714. { yyval.str = yyvsp[0].str; ;
  2715.     break;}
  2716. case 936:
  2717. #line 4291 "preproc.y"
  2718. { yyval.str = yyvsp[0].str; ;
  2719.     break;}
  2720. case 937:
  2721. #line 4292 "preproc.y"
  2722. { yyval.str = yyvsp[0].str; ;
  2723.     break;}
  2724. case 938:
  2725. #line 4294 "preproc.y"
  2726. { yyval.str = yyvsp[0].str; ;
  2727.     break;}
  2728. case 939:
  2729. #line 4301 "preproc.y"
  2730. {
  2731. yyval.str = yyvsp[0].str;
  2732. ;
  2733.     break;}
  2734. case 940:
  2735. #line 4305 "preproc.y"
  2736. {
  2737. yyval.str = yyvsp[0].str;
  2738. ;
  2739.     break;}
  2740. case 941:
  2741. #line 4309 "preproc.y"
  2742. {
  2743. yyval.str = yyvsp[0].str;
  2744. ;
  2745.     break;}
  2746. case 942:
  2747. #line 4313 "preproc.y"
  2748. {
  2749. yyval.str = cat2_str(yyvsp[-1].str, yyvsp[0].str);
  2750. ;
  2751.     break;}
  2752. case 943:
  2753. #line 4317 "preproc.y"
  2754. { yyval.str = yyvsp[0].str;  ;
  2755.     break;}
  2756. case 944:
  2757. #line 4319 "preproc.y"
  2758. {
  2759. yyval.str = make1_str("true");
  2760. ;
  2761.     break;}
  2762. case 945:
  2763. #line 4323 "preproc.y"
  2764. {
  2765. yyval.str = make1_str("false");
  2766. ;
  2767.     break;}
  2768. case 946:
  2769. #line 4329 "preproc.y"
  2770. {
  2771. yyval.str = cat2_str(make_name(), yyvsp[0].str);
  2772. ;
  2773.     break;}
  2774. case 947:
  2775. #line 4334 "preproc.y"
  2776. { yyval.str = make_name();;
  2777.     break;}
  2778. case 948:
  2779. #line 4335 "preproc.y"
  2780. { yyval.str = make_name();;
  2781.     break;}
  2782. case 949:
  2783. #line 4336 "preproc.y"
  2784. {
  2785. yyval.str = (char *)mm_alloc(strlen(yyvsp[0].str) + 3);
  2786. yyval.str[0]=''';
  2787.               strcpy(yyval.str+1, yyvsp[0].str);
  2788. yyval.str[strlen(yyvsp[0].str)+2]='';
  2789. yyval.str[strlen(yyvsp[0].str)+1]=''';
  2790. free(yyvsp[0].str);
  2791. ;
  2792.     break;}
  2793. case 950:
  2794. #line 4344 "preproc.y"
  2795. { yyval.str = yyvsp[0].str;;
  2796.     break;}
  2797. case 951:
  2798. #line 4352 "preproc.y"
  2799. { yyval.str = yyvsp[0].str; ;
  2800.     break;}
  2801. case 952:
  2802. #line 4354 "preproc.y"
  2803. { yyval.str = yyvsp[0].str; ;
  2804.     break;}
  2805. case 953:
  2806. #line 4356 "preproc.y"
  2807. { yyval.str = yyvsp[0].str; ;
  2808.     break;}
  2809. case 954:
  2810. #line 4366 "preproc.y"
  2811. { yyval.str = yyvsp[0].str; ;
  2812.     break;}
  2813. case 955:
  2814. #line 4367 "preproc.y"
  2815. { yyval.str = yyvsp[0].str; ;
  2816.     break;}
  2817. case 956:
  2818. #line 4368 "preproc.y"
  2819. { yyval.str = make1_str("absolute"); ;
  2820.     break;}
  2821. case 957:
  2822. #line 4369 "preproc.y"
  2823. { yyval.str = make1_str("access"); ;
  2824.     break;}
  2825. case 958:
  2826. #line 4370 "preproc.y"
  2827. { yyval.str = make1_str("action"); ;
  2828.     break;}
  2829. case 959:
  2830. #line 4371 "preproc.y"
  2831. { yyval.str = make1_str("after"); ;
  2832.     break;}
  2833. case 960:
  2834. #line 4372 "preproc.y"
  2835. { yyval.str = make1_str("aggregate"); ;
  2836.     break;}
  2837. case 961:
  2838. #line 4373 "preproc.y"
  2839. { yyval.str = make1_str("backward"); ;
  2840.     break;}
  2841. case 962:
  2842. #line 4374 "preproc.y"
  2843. { yyval.str = make1_str("before"); ;
  2844.     break;}