Mercurial > ~dholland > hg > ag > index.cgi
diff tests/agcl/parsifal/good/xml2.c @ 0:13d2b8934445
Import AnaGram (near-)release tree into Mercurial.
author | David A. Holland |
---|---|
date | Sat, 22 Dec 2007 17:52:45 -0500 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/tests/agcl/parsifal/good/xml2.c Sat Dec 22 17:52:45 2007 -0500 @@ -0,0 +1,1152 @@ + +/* + * AnaGram, A System for Syntax Directed Programming + * File generated by: ... + * + * AnaGram Parsing Engine + * Copyright 1993-2002 Parsifal Software. All Rights Reserved. + * + * This software is provided 'as-is', without any express or implied + * warranty. In no event will the authors be held liable for any damages + * arising from the use of this software. + * + * Permission is granted to anyone to use this software for any purpose, + * including commercial applications, and to alter it and redistribute it + * freely, subject to the following restrictions: + * + * 1. The origin of this software must not be misrepresented; you must not + * claim that you wrote the original software. If you use this software + * in a product, an acknowledgment in the product documentation would be + * appreciated but is not required. + * 2. Altered source versions must be plainly marked as such, and must not be + * misrepresented as being the original software. + * 3. This notice may not be removed or altered from any source distribution. + */ + +#ifndef XML2_H +#include "xml2.h" +#endif + +#ifndef XML2_H +#error Mismatched header file +#endif + +#include <ctype.h> +#include <stdio.h> + +#define RULE_CONTEXT (&((PCB).cs[(PCB).ssx])) +#define ERROR_CONTEXT ((PCB).cs[(PCB).error_frame_ssx]) +#define CONTEXT ((PCB).cs[(PCB).ssx]) + + + +xml2_pcb_type xml2_pcb; +#define PCB xml2_pcb + +#ifndef CONVERT_CASE +#define CONVERT_CASE(c) (c) +#endif +#ifndef TAB_SPACING +#define TAB_SPACING 8 +#endif + + +#define READ_COUNTS +#define WRITE_COUNTS +#undef V +#define V(i,t) (*t (&(PCB).vs[(PCB).ssx + i])) +#undef VS +#define VS(i) (PCB).vs[(PCB).ssx + i] + +#ifndef GET_CONTEXT +#define GET_CONTEXT CONTEXT = (PCB).input_context +#endif + +typedef enum { + ag_action_1, + ag_action_2, + ag_action_3, + ag_action_4, + ag_action_5, + ag_action_6, + ag_action_7, + ag_action_8, + ag_action_9, + ag_action_10, + ag_action_11, + ag_action_12 +} ag_parser_action; + + +#ifndef NULL_VALUE_INITIALIZER +#define NULL_VALUE_INITIALIZER = 0 +#endif + +static int const ag_null_value NULL_VALUE_INITIALIZER; + +static const unsigned char ag_rpx[] = { + 0 +}; + +static const unsigned char ag_key_itt[] = { + 0 +}; + +static const unsigned short ag_key_pt[] = { +0 +}; + +static const unsigned char ag_key_ch[] = { + 0, 45, 68,255,120,255, 33, 63,255, 60,255, 45, 68,255, 33, 63,255, 60, + 255, 39, 63,115,118,255,118,255,110,121,255, 34, 39, 63,255, 45,255, 60, + 255, 45, 91,255, 33, 47, 63,255, 60,255, 33, 63,255, 60,255, 63,255, 93, + 255, 60,255, 63,115,255, 39,255 +}; + +static const unsigned char ag_key_act[] = { + 0,3,3,4,3,4,2,1,4,2,4,3,3,4,2,0,4,2,4,3,3,3,3,4,3,4,3,3,4,2,3,3,4,3,4, + 3,4,3,3,4,2,0,0,4,2,4,3,0,4,2,4,3,4,3,4,3,4,3,3,4,3,4 +}; + +static const unsigned char ag_key_parm[] = { + 0, 61, 99, 0, 85, 0, 0, 68, 0, 0, 0, 61, 99, 0, 0, 68, 0, 0, + 0,123, 74,122, 92, 0, 92, 0,126,124, 0, 0,125, 74, 0, 65, 0, 99, + 0, 61, 79, 0, 0,151, 68, 0, 0, 0, 61, 68, 0, 0, 0, 74, 0, 80, + 0,151, 0, 74,122, 0,123, 0 +}; + +static const unsigned char ag_key_jmp[] = { + 0, 0, 2, 0, 9, 0, 1, 4, 0, 6, 0, 12, 14, 0, 11, 0, 0, 14, + 0, 21, 26, 28, 38, 0, 45, 0, 52, 55, 0, 26, 59, 63, 0, 65, 0, 67, + 0, 76, 78, 0, 37, 0, 0, 0, 40, 0, 85, 0, 0, 46, 0, 88, 0, 90, + 0, 93, 0, 95, 97, 0,107, 0 +}; + +static const unsigned char ag_key_index[] = { + 9, 0, 17, 0, 19, 24, 29, 0, 33, 17, 35, 0, 44, 49, 0, 29, 51, 51, + 33, 33, 0, 49, 0, 44, 53, 44, 55, 0, 0, 57, 51, 51, 51, 51, 51, 0, + 0, 0, 0, 0, 0, 0, 60, 0, 0, 0, 51, 0, 0, 0, 0, 0, 0, 0, + 60, 0, 0, 0, 0, 0, 49, 0, 0, 0, 49, 0, 0, 0, 0, 0, 0 +}; + +static const unsigned char ag_key_ends[] = { +45,0, 79,67,84,89,80,69,0, 109,108,0, 45,0, 79,67,84,89,80,69,0, +121,101,115,39,0, 62,0, 116,97,110,100,97,108,111,110,101,0, +101,114,115,105,111,110,0, 101,114,115,105,111,110,0, 111,34,0, +101,115,34,0, 110,111,39,0, 62,0, 45,0, +33,68,79,67,84,89,80,69,0, 45,0, 67,68,65,84,65,91,0, 45,45,0, +62,0, 93,62,0, 47,0, 62,0, 116,97,110,100,97,108,111,110,101,0, +121,101,115,39,0, +}; +#define AG_TCV(x) (((int)(x) >= 0 && (int)(x) <= 255) ? ag_tcv[(x)] : 0) + +static const unsigned char ag_tcv[] = { + 161,161,161,161,161,161,161,161,161,155,156,161,161,157,161,161,161,161, + 161,161,161,161,161,161,161,161,161,161,161,161,161,161,156,162, 26,162, + 162,165,166, 33,162,162,162,162,162,129,160,162,163,163,163,163,163,163, + 163,163,163,163,158,162,146, 96, 66,162,162,137,137,137,137,137,137,137, + 137,139,137,137,137,137,137,137,137,137,137,137,137,137,137,137,141,137, + 137,103,164,108,164,159,164,137,137,137,137,137,137,137,137,139,137,137, + 137,137,137,137,137,137,137,137,137,137,137,137,141,137,137,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164,164, + 164,164,164,164 +}; + +#ifndef SYNTAX_ERROR +#define SYNTAX_ERROR fprintf(stderr,"%s, line %d, column %d\n", \ + (PCB).error_message, (PCB).line, (PCB).column) +#endif + +#ifndef FIRST_LINE +#define FIRST_LINE 1 +#endif + +#ifndef FIRST_COLUMN +#define FIRST_COLUMN 1 +#endif + +#ifndef PARSER_STACK_OVERFLOW +#define PARSER_STACK_OVERFLOW {fprintf(stderr, \ + "\nParser stack overflow, line %d, column %d\n",\ + (PCB).line, (PCB).column);} +#endif + +#ifndef REDUCTION_TOKEN_ERROR +#define REDUCTION_TOKEN_ERROR {fprintf(stderr, \ + "\nReduction token error, line %d, column %d\n", \ + (PCB).line, (PCB).column);} +#endif + + +typedef enum + {ag_accept_key, ag_set_key, ag_jmp_key, ag_end_key, ag_no_match_key, + ag_cf_accept_key, ag_cf_set_key, ag_cf_end_key} key_words; + +#ifndef GET_INPUT +#define GET_INPUT ((PCB).input_code = getchar()) +#endif + + +static int ag_look_ahead(void) { + if ((PCB).rx < (PCB).fx) { + return CONVERT_CASE((PCB).lab[(PCB).rx++]); + } + GET_INPUT; + (PCB).fx++; + return CONVERT_CASE((PCB).lab[(PCB).rx++] = (PCB).input_code); +} + +static void ag_get_key_word(int ag_k) { + int save_index = (PCB).rx; + const unsigned char *sp; + int ag_ch; + while (1) { + switch (ag_key_act[ag_k]) { + case ag_cf_end_key: + sp = ag_key_ends + ag_key_jmp[ag_k]; + do { + if ((ag_ch = *sp++) == 0) { + int ag_k1 = ag_key_parm[ag_k]; + int ag_k2 = ag_key_pt[ag_k1]; + if (ag_key_itt[ag_k2 + ag_look_ahead()]) goto ag_fail; + (PCB).rx--; + (PCB).token_number = (xml2_token_type) ag_key_pt[ag_k1 + 1]; + return; + } + } while (ag_look_ahead() == ag_ch); + goto ag_fail; + case ag_end_key: + sp = ag_key_ends + ag_key_jmp[ag_k]; + do { + if ((ag_ch = *sp++) == 0) { + (PCB).token_number = (xml2_token_type) ag_key_parm[ag_k]; + return; + } + } while (ag_look_ahead() == ag_ch); + case ag_no_match_key: +ag_fail: + (PCB).rx = save_index; + return; + case ag_cf_set_key: { + int ag_k1 = ag_key_parm[ag_k]; + int ag_k2 = ag_key_pt[ag_k1]; + ag_k = ag_key_jmp[ag_k]; + if (ag_key_itt[ag_k2 + (ag_ch = ag_look_ahead())]) break; + save_index = --(PCB).rx; + (PCB).token_number = (xml2_token_type) ag_key_pt[ag_k1+1]; + break; + } + case ag_set_key: + save_index = (PCB).rx; + (PCB).token_number = (xml2_token_type) ag_key_parm[ag_k]; + case ag_jmp_key: + ag_k = ag_key_jmp[ag_k]; + ag_ch = ag_look_ahead(); + break; + case ag_accept_key: + (PCB).token_number = (xml2_token_type) ag_key_parm[ag_k]; + return; + case ag_cf_accept_key: { + int ag_k1 = ag_key_parm[ag_k]; + int ag_k2 = ag_key_pt[ag_k1]; + if (ag_key_itt[ag_k2 + ag_look_ahead()]) (PCB).rx = save_index; + else { + (PCB).rx--; + (PCB).token_number = (xml2_token_type) ag_key_pt[ag_k1+1]; + } + return; + } + default: + /* not reachable; here to suppress compiler warnings */ + goto ag_fail; + } + if (ag_ch <= 255) while (ag_key_ch[ag_k] < ag_ch) ag_k++; + if (ag_ch > 255 || ag_key_ch[ag_k] != ag_ch) { + (PCB).rx = save_index; + return; + } + } +} + + +#ifndef AG_NEWLINE +#define AG_NEWLINE 10 +#endif + +#ifndef AG_RETURN +#define AG_RETURN 13 +#endif + +#ifndef AG_FORMFEED +#define AG_FORMFEED 12 +#endif + +#ifndef AG_TABCHAR +#define AG_TABCHAR 9 +#endif + +static void ag_track(void) { + int ag_k = 0; + while (ag_k < (PCB).rx) { + int ag_ch = (PCB).lab[ag_k++]; + switch (ag_ch) { + case AG_NEWLINE: + (PCB).column = 1, (PCB).line++; + case AG_RETURN: + case AG_FORMFEED: + break; + case AG_TABCHAR: + (PCB).column += (TAB_SPACING) - ((PCB).column - 1) % (TAB_SPACING); + break; + default: + (PCB).column++; + } + } + ag_k = 0; + while ((PCB).rx < (PCB).fx) (PCB).lab[ag_k++] = (PCB).lab[(PCB).rx++]; + (PCB).fx = ag_k; + (PCB).rx = 0; +} + + +static void ag_prot(void) { + int ag_k; + ag_k = 128 - ++(PCB).btsx; + if (ag_k <= (PCB).ssx) { + (PCB).exit_flag = AG_STACK_ERROR_CODE; + PARSER_STACK_OVERFLOW; + return; + } + (PCB).bts[(PCB).btsx] = (PCB).sn; + (PCB).bts[ag_k] = (PCB).ssx; + (PCB).vs[ag_k] = (PCB).vs[(PCB).ssx]; + (PCB).ss[ag_k] = (PCB).ss[(PCB).ssx]; +} + +static void ag_undo(void) { + if ((PCB).drt == -1) return; + while ((PCB).btsx) { + int ag_k = 128 - (PCB).btsx; + (PCB).sn = (PCB).bts[(PCB).btsx--]; + (PCB).ssx = (PCB).bts[ag_k]; + (PCB).vs[(PCB).ssx] = (PCB).vs[ag_k]; + (PCB).ss[(PCB).ssx] = (PCB).ss[ag_k]; + } + (PCB).token_number = (xml2_token_type) (PCB).drt; + (PCB).ssx = (PCB).dssx; + (PCB).sn = (PCB).dsn; + (PCB).drt = -1; +} + + +static const unsigned char ag_tstt[] = { +157,156,155,146,142,99,85,68,61,0,1,2,81,82, +157,156,155,0,7,9,10,86, +157,156,155,146,142,99,68,61,0,4,5,6,7,60,67, +146,142,0,3,143, +157,156,155,0,7, +92,0, +157,156,155,126,125,124,87,74,0,88, +159,158,0,11,69, +166,165,164,163,162,160,159,158,156,155,146,141,139,137,129,108,103,96,66, + 65,33,26,0,63,64, +157,156,155,68,61,0,4,7,60,67, +146,142,99,0,83,84, +159,158,0,11, +165,164,163,162,161,160,159,158,157,156,155,151,146,142,141,139,137,129,108, + 103,96,79,68,66,61,33,29,26,0,3,56,58,59,60,67,75,76,143,144,152,153, + 154, +157,156,155,68,61,0,4,5,6,7,60,67, +157,156,155,96,0,7,9,10,90,93, +157,156,155,126,125,124,74,0,7,9,10,89,91, +160,158,157,156,155,129,103,96,74,66,0,14,15, +157,156,155,74,0,7,9,10,73, +166,165,164,163,162,160,159,158,156,155,146,141,139,137,129,108,103,96,66, + 33,26,0, +65,0, +157,156,155,0,7,9,10, +157,156,155,146,142,68,61,0,4,5,6,7,60,67, +157,156,155,66,0,7,9,10,148,149,150, +165,164,163,162,161,160,159,158,157,156,155,141,139,137,129,108,103,96,66, + 33,26,0, +166,165,164,163,162,160,159,158,156,155,146,141,139,137,129,108,103,96,80, + 78,66,33,26,0,63,64,77, +165,164,163,162,161,160,159,158,157,156,155,151,146,142,141,139,137,129,108, + 103,96,79,68,66,61,33,29,26,0,3,56,58,59,60,67,75,76,143,152, +151,0,145, +96,0, +33,26,0,95, +122,0, +157,156,155,74,0,7,9,10,90, +74,0, +160,158,129,0, +74,70,0,71,72, +74,0, +66,0, +159,158,0,11, +159,158,0,11,147, +157,156,155,0,7,9,10,148, +66,0, +78,0, +159,158,0,11, +157,156,155,123,33,26,0,7,9,10,90, +163,160,159,158,141,139,137,129,0,94,98, +163,160,159,158,141,139,137,129,0,94,98, +157,156,155,96,0,7,9,10,90,93, +70,0, +157,156,155,103,66,0,7,9,10,102, +157,156,155,96,0,7,9,10,90,93, +159,158,0,11,147, +157,156,155,66,0,7,9,10,90, +163,160,159,158,141,139,137,129,0, +26,0, +33,0, +123,0, +103,100,66,0,101, +103,66,0,109, +33,26,0,38, +66,0, +157,156,155,103,66,0,7,9,10,90, +157,156,155,113,112,111,110,108,68,61,28,0,7,60,67,104,105,106,107, +66,0, +164,163,162,161,160,159,158,157,156,155,146,141,139,137,129,108,103,96,66, + 33,29,26,0,42,43,44, +164,163,162,161,160,159,158,157,156,155,146,141,139,137,129,108,103,96,66, + 33,29,26,0,39,40,41, +157,156,155,113,112,111,110,68,61,28,0,7,60,67,104,105, +108,0, +164,163,162,161,160,159,158,157,156,155,146,141,139,137,129,108,103,96,66, + 29,26,0,42, +33,0, +164,163,162,161,160,159,158,157,156,155,146,141,139,137,129,108,103,96,66, + 33,29,0,39, +26,0, +157,156,155,66,0,7,9,10,90, + +}; + + +static unsigned const char ag_astt[681] = { + 8,8,8,5,5,5,1,8,8,7,0,1,1,1,1,1,1,7,1,1,1,1,1,1,1,5,5,8,1,1,7,1,1,1,1,1,1, + 1,1,7,1,1,9,9,9,5,3,1,7,8,8,8,8,8,8,1,5,7,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1, + 1,1,1,1,1,1,1,1,1,8,1,1,7,1,1,9,9,9,1,1,5,3,3,3,3,5,5,1,7,1,3,1,1,7,1,1,1, + 1,1,1,1,1,1,1,1,1,5,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1, + 1,1,1,1,1,1,1,1,5,1,1,3,1,1,1,1,1,1,8,7,1,1,1,1,1,1,1,1,1,1,1,8,7,1,1,1,1, + 1,1,1,5,5,5,1,5,5,5,5,7,1,3,1,1,1,8,7,1,1,1,1,9,9,9,9,9,9,9,9,9,9,9,9,9,9, + 9,9,9,9,9,9,9,5,1,7,1,1,1,7,1,1,1,1,1,1,5,5,1,1,7,1,1,3,1,1,1,1,1,1,8,7,1, + 1,1,1,1,1,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,5,1,1,1,1,1,1,1,1,1,1, + 1,1,1,1,1,1,1,1,1,5,1,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,5,1,9,1,1,1,1,1,1, + 1,1,1,1,1,1,9,1,7,3,3,1,3,3,3,3,1,1,3,1,7,3,1,7,1,1,7,3,1,5,1,1,1,5,7,1,3, + 1,3,3,7,9,9,9,5,5,1,7,1,3,3,7,3,7,1,1,7,1,1,1,5,1,3,1,1,1,5,1,1,1,3,3,7,3, + 7,1,1,7,1,1,1,1,5,5,5,7,1,3,1,3,1,1,1,1,1,1,1,1,7,1,1,1,1,1,1,1,1,1,1,7,1, + 1,1,1,1,8,7,1,1,1,1,1,9,5,1,1,1,8,5,7,1,1,1,1,1,1,1,8,7,1,1,1,1,1,1,1,7,1, + 3,1,1,1,8,7,1,1,1,1,9,9,9,9,9,9,9,9,5,3,7,3,7,3,7,5,1,5,7,3,1,8,7,1,1,1,7, + 3,3,7,1,1,1,5,5,7,1,3,1,3,1,1,1,1,1,1,1,8,1,1,1,7,1,1,1,1,1,1,1,3,7,1,1,1, + 1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,8,1,1,7,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1, + 1,1,1,1,1,1,1,8,7,1,1,1,9,9,9,9,9,9,9,1,1,9,5,3,3,3,3,3,1,7,9,9,9,9,9,9,9, + 9,9,9,9,9,9,9,9,9,9,9,9,9,9,5,3,3,7,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9,9, + 9,9,5,3,3,7,1,1,1,5,7,1,3,1,3 +}; + + +static const unsigned char ag_pstt[] = { +2,2,2,96,96,96,1,2,2,0,0,3,2,2, +4,4,4,1,4,5,4,6, +9,9,9,3,3,10,7,8,2,9,9,10,9,9,9, +11,13,3,13,12, +8,8,8,9,8, +14,5, +15,15,15,15,15,15,15,101,6,15, +16,16,7,17,17, +18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,19,18,18,8,18,19, +2,2,2,7,8,4,2,2,2,2, +98,98,20,10,21,100, +16,16,11,22, +23,23,23,23,23,23,23,23,23,23,23,76,11,25,23,23,23,23,23,23,23,24,7,23,8,23, + 25,23,12,25,25,23,25,25,25,25,24,12,26,25,25,26, +9,9,9,7,8,3,9,9,5,9,9,9, +4,4,4,27,14,4,27,4,27,28, +4,4,4,30,30,30,31,15,4,29,4,30,31, +32,32,12,12,12,32,12,12,12,12,16,32,14, +4,4,4,34,17,4,33,4,34, +80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,80,82, +35,19, +4,4,4,20,4,36,4, +9,9,9,3,3,7,8,21,9,9,99,9,9,9, +4,4,4,39,22,4,37,4,38,38,39, +75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,75,77, +18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,18,40,81,18,18,18,24,18, + 40,40, +23,23,23,23,23,23,23,23,23,23,23,76,11,188,23,23,23,23,23,23,23,24,7,23,8, + 23,188,23,25,188,188,23,188,188,188,188,24,12,188, +41,26,171, +42,27, +44,43,28,111, +45,107, +4,4,4,103,30,4,106,4,106, +108,31, +11,11,11,13, +86,46,33,46,89, +90,34, +83,35, +16,16,36,47, +16,16,177,48,172, +4,4,4,176,4,49,4,174, +178,39, +92,40, +16,16,41,50, +4,4,4,103,103,103,42,4,112,4,112, +51,51,51,51,51,51,51,51,43,52,51, +51,51,51,51,51,51,51,51,44,53,51, +4,4,4,27,45,4,27,4,27,54, +85,87, +4,4,4,56,121,47,4,55,4,56, +4,4,4,27,48,4,27,4,27,57, +16,16,49,48,172, +4,4,4,58,50,4,58,4,58, +114,114,114,114,114,114,114,114,115, +110,52, +109,53, +151,54, +119,59,119,55,122, +60,61,56,61, +62,63,57,179, +180,58, +4,4,4,103,103,59,4,120,4,120, +64,64,64,64,64,64,64,65,7,8,64,60,64,64,64,64,64,64,65, +132,61, +66,66,66,66,66,66,66,66,66,66,66,66,66,66,66,66,66,66,66,67,66,66,62,66,66, + 67, +68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,68,69,63,68,68, + 69, +127,127,127,127,127,127,127,7,8,127,129,127,127,127,127,127, +70,65, +54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,54,56,54, +57,67, +47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,47,49,47, +50,69, +4,4,4,103,70,4,131,4,131, + +}; + + +static const unsigned short ag_sbt[] = { + 0, 14, 22, 37, 42, 47, 49, 59, 64, 89, 99, 105, 109, 151, + 163, 173, 186, 199, 208, 230, 232, 239, 253, 264, 286, 313, 352, 355, + 357, 361, 363, 372, 374, 378, 383, 385, 387, 391, 396, 404, 406, 408, + 412, 423, 434, 445, 455, 457, 467, 477, 482, 491, 500, 502, 504, 506, + 511, 515, 519, 521, 531, 550, 552, 578, 604, 620, 622, 645, 647, 670, + 672, 681 +}; + + +static const unsigned short ag_sbe[] = { + 9, 17, 30, 39, 45, 48, 57, 61, 86, 94, 102, 107, 137, 156, + 167, 180, 196, 203, 229, 231, 235, 246, 257, 285, 309, 341, 353, 356, + 359, 362, 367, 373, 377, 380, 384, 386, 389, 393, 399, 405, 407, 410, + 418, 431, 442, 449, 456, 462, 471, 479, 486, 499, 501, 503, 505, 509, + 513, 517, 520, 526, 542, 551, 574, 600, 614, 621, 643, 646, 668, 671, + 676, 681 +}; + + +static const unsigned char ag_fl[] = { + 1,1,2,0,1,3,1,1,2,1,1,2,0,1,2,2,1,2,0,1,2,1,2,1,2,0,1,2,1,1,1,1,2,0,1, + 3,1,1,1,1,2,0,1,3,1,1,1,2,0,1,3,1,1,1,2,0,1,3,1,2,0,1,3,1,2,0,1,3,1,2, + 0,1,3,3,1,2,0,1,1,1,2,0,1,4,1,2,0,1,0,2,4,1,3,1,1,1,0,1,0,2,3,0,1,0,1, + 0,2,1,5,3,3,4,3,1,2,1,1,1,1,0,2,0,2,1,1,1,1,2,0,1,0,4,6,1,1,1,1,1,1,0, + 1,2,1,1,1,1,1,2,0,1,1,4,1,1,1,2,1,2,0,1,2,1,1,1,2,1,2,3,3,1,1,3,2,1,2, + 0,1,1,4,3,4,1,1,1,1,1,1,1,2,0,1,1 +}; + +static const unsigned char ag_ptt[] = { + 0, 5, 5, 6, 6, 1, 7, 10, 10, 9, 14, 14, 15, 15, 11, 17, 18, 18, + 19, 19, 16, 20, 22, 23, 23, 24, 24, 21, 30, 30, 30, 31, 31, 32, 32, 25, + 35, 35, 35, 36, 36, 37, 37, 25, 39, 39, 40, 40, 41, 41, 38, 42, 42, 43, + 43, 44, 44, 38, 47, 47, 48, 48, 45, 50, 50, 51, 51, 45, 54, 54, 55, 55, + 52, 52, 58, 58, 59, 59, 56, 63, 63, 64, 64, 60, 71, 71, 72, 72, 73, 73, + 67, 69, 75, 76, 77, 77, 82, 82, 84, 84, 2, 88, 88, 90, 90, 91, 91, 91, + 81, 95, 95, 86, 93, 98, 98, 94, 4, 4, 4,101,101,102,102,105,105,105, + 106,106,107,107,109,109, 83,104,104,104,104,104,104,116,116,114,119,119, + 119,119,120,120,121,121,117, 89, 89, 89, 89,131,132,132,133,133,127,128, + 128,128,134,140,140,135,136,130, 3, 3,148,149,149,150,150,150,143,147, + 145,152,152,152,152,152,152,153,153,154,154,144 +}; + + +static void ag_ra(void) +{ +} + +#define TOKEN_NAMES xml2_token_names +const char *const xml2_token_names[167] = { + "document", + "document", + "prolog", + "element", + "Misc", + "", + "", + "SpaceChar", + "", + "S", + "", + "Name", + "", + "NameChar", + "", + "", + "Names", + "", + "", + "", + "Nmtoken", + "Nmtokens", + "", + "", + "", + "EntityValue", + "'\\\"'", + "", + "PEReference", + "Reference", + "", + "", + "", + "'\\''", + "", + "", + "", + "", + "AttValue", + "", + "", + "", + "", + "", + "", + "SystemLiteral", + "", + "", + "", + "", + "", + "", + "PubidLiteral", + "PubidChar", + "", + "", + "CharData", + "", + "", + "", + "Comment", + "\"<!--\"", + "Char", + "", + "", + "\"--\"", + "'>'", + "PI", + "\"<?\"", + "PITarget", + "char", + "", + "", + "", + "\"?>\"", + "CDSect", + "CDStart", + "CData", + "CDEnd", + "\"<![CDATA[\"", + "\"]]>\"", + "XMLDecl", + "", + "doctypedecl", + "", + "\"<?xml\"", + "VersionInfo", + "EncodingDecl", + "", + "SDDecl", + "", + "", + "\"version\"", + "Eq", + "VersionNum", + "", + "'='", + "", + "", + "\"<!DOCTYPE\"", + "ExternalID", + "", + "", + "'['", + "markupdecl", + "", + "", + "", + "']'", + "", + "elementdecl", + "AttlistDecl", + "EntityDecl", + "NotationDecl", + "extSubset", + "TextDecl", + "", + "extSubsetDecl", + "conditionalSect", + "", + "", + "", + "\"standalone\"", + "\"\\'yes\\'\"", + "\"\\\"yes\\\"\"", + "\"\\'no\\'\"", + "\"\\\"no\\\"\"", + "Language Id", + "Langcode", + "'-'", + "Subcode", + "", + "", + "", + "ISO639Code", + "IanaCode", + "UserCode", + "", + "", + "", + "", + "", + "EmptyElemTag", + "STag", + "content", + "ETag", + "'<'", + "Attribute", + "", + "", + "", + "\"</\"", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + +}; + +#ifndef MISSING_FORMAT +#define MISSING_FORMAT "Missing %s" +#endif +#ifndef UNEXPECTED_FORMAT +#define UNEXPECTED_FORMAT "Unexpected %s" +#endif +#ifndef UNNAMED_TOKEN +#define UNNAMED_TOKEN "input" +#endif + + +static void ag_diagnose(void) { + int ag_snd = (PCB).sn; + int ag_k = ag_sbt[ag_snd]; + + if (*TOKEN_NAMES[ag_tstt[ag_k]] && ag_astt[ag_k + 1] == ag_action_8) { + sprintf((PCB).ag_msg, MISSING_FORMAT, TOKEN_NAMES[ag_tstt[ag_k]]); + } + else if (ag_astt[ag_sbe[(PCB).sn]] == ag_action_8 + && (ag_k = (int) ag_sbe[(PCB).sn] + 1) == (int) ag_sbt[(PCB).sn+1] - 1 + && *TOKEN_NAMES[ag_tstt[ag_k]]) { + sprintf((PCB).ag_msg, MISSING_FORMAT, TOKEN_NAMES[ag_tstt[ag_k]]); + } + else if ((PCB).token_number && *TOKEN_NAMES[(PCB).token_number]) { + sprintf((PCB).ag_msg, UNEXPECTED_FORMAT, TOKEN_NAMES[(PCB).token_number]); + } + else if (isprint((*(PCB).lab)) && (*(PCB).lab) != '\\') { + char buf[20]; + sprintf(buf, "\'%c\'", (char) (*(PCB).lab)); + sprintf((PCB).ag_msg, UNEXPECTED_FORMAT, buf); + } + else sprintf((PCB).ag_msg, UNEXPECTED_FORMAT, UNNAMED_TOKEN); + (PCB).error_message = (PCB).ag_msg; + + +} +static int ag_action_1_r_proc(void); +static int ag_action_2_r_proc(void); +static int ag_action_3_r_proc(void); +static int ag_action_4_r_proc(void); +static int ag_action_1_s_proc(void); +static int ag_action_3_s_proc(void); +static int ag_action_1_proc(void); +static int ag_action_2_proc(void); +static int ag_action_3_proc(void); +static int ag_action_4_proc(void); +static int ag_action_5_proc(void); +static int ag_action_6_proc(void); +static int ag_action_7_proc(void); +static int ag_action_8_proc(void); +static int ag_action_9_proc(void); +static int ag_action_10_proc(void); +static int ag_action_11_proc(void); +static int ag_action_8_proc(void); + + +static int (*const ag_r_procs_scan[])(void) = { + ag_action_1_r_proc, + ag_action_2_r_proc, + ag_action_3_r_proc, + ag_action_4_r_proc +}; + +static int (*const ag_s_procs_scan[])(void) = { + ag_action_1_s_proc, + ag_action_2_r_proc, + ag_action_3_s_proc, + ag_action_4_r_proc +}; + +static int (*const ag_gt_procs_scan[])(void) = { + ag_action_1_proc, + ag_action_2_proc, + ag_action_3_proc, + ag_action_4_proc, + ag_action_5_proc, + ag_action_6_proc, + ag_action_7_proc, + ag_action_8_proc, + ag_action_9_proc, + ag_action_10_proc, + ag_action_11_proc, + ag_action_8_proc +}; + + +static int ag_action_10_proc(void) { + int ag_t = (PCB).token_number; + (PCB).btsx = 0, (PCB).drt = -1; + do { + ag_track(); + if ((PCB).rx < (PCB).fx) { + (PCB).input_code = (PCB).lab[(PCB).rx++]; + (PCB).token_number = (xml2_token_type) AG_TCV((PCB).input_code);} + else { + GET_INPUT; + (PCB).lab[(PCB).fx++] = (PCB).input_code; + (PCB).token_number = (xml2_token_type) AG_TCV((PCB).input_code); + (PCB).rx++; + } + if (ag_key_index[(PCB).sn]) { + unsigned ag_k = ag_key_index[(PCB).sn]; + int ag_ch = CONVERT_CASE((PCB).input_code); + if (ag_ch < 255) { + while (ag_key_ch[ag_k] < ag_ch) ag_k++; + if (ag_key_ch[ag_k] == ag_ch) ag_get_key_word(ag_k); + } + } + } while ((PCB).token_number == (xml2_token_type) ag_t); + (PCB).rx = 0; + return 1; +} + +static int ag_action_11_proc(void) { + int ag_t = (PCB).token_number; + + (PCB).btsx = 0, (PCB).drt = -1; + do { + (PCB).vs[(PCB).ssx] = *(PCB).lab; + (PCB).ssx--; + ag_track(); + ag_ra(); + if ((PCB).exit_flag != AG_RUNNING_CODE) return 0; + (PCB).ssx++; + if ((PCB).rx < (PCB).fx) { + (PCB).input_code = (PCB).lab[(PCB).rx++]; + (PCB).token_number = (xml2_token_type) AG_TCV((PCB).input_code);} + else { + GET_INPUT; + (PCB).lab[(PCB).fx++] = (PCB).input_code; + (PCB).token_number = (xml2_token_type) AG_TCV((PCB).input_code); + (PCB).rx++; + } + if (ag_key_index[(PCB).sn]) { + unsigned ag_k = ag_key_index[(PCB).sn]; + int ag_ch = CONVERT_CASE((PCB).input_code); + if (ag_ch < 255) { + while (ag_key_ch[ag_k] < ag_ch) ag_k++; + if (ag_key_ch[ag_k] == ag_ch) ag_get_key_word(ag_k); + } + } + } + while ((PCB).token_number == (xml2_token_type) ag_t); + (PCB).rx = 0; + return 1; +} + +static int ag_action_3_r_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap] - 1; + if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + (PCB).btsx = 0, (PCB).drt = -1; + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + ag_ra(); + return (PCB).exit_flag == AG_RUNNING_CODE; +} + +static int ag_action_3_s_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap] - 1; + if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + (PCB).btsx = 0, (PCB).drt = -1; + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + ag_ra(); + return (PCB).exit_flag == AG_RUNNING_CODE; +} + +static int ag_action_4_r_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap] - 1; + if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + return 1; +} + +static int ag_action_2_proc(void) { + (PCB).btsx = 0, (PCB).drt = -1; + if ((PCB).ssx >= 128) { + (PCB).exit_flag = AG_STACK_ERROR_CODE; + PARSER_STACK_OVERFLOW; + } + (PCB).vs[(PCB).ssx] = *(PCB).lab; + (PCB).ss[(PCB).ssx] = (PCB).sn; + (PCB).ssx++; + (PCB).sn = (PCB).ag_ap; + ag_track(); + return 0; +} + +static int ag_action_9_proc(void) { + if ((PCB).drt == -1) { + (PCB).drt=(PCB).token_number; + (PCB).dssx=(PCB).ssx; + (PCB).dsn=(PCB).sn; + } + ag_prot(); + (PCB).vs[(PCB).ssx] = ag_null_value; + (PCB).ss[(PCB).ssx] = (PCB).sn; + (PCB).ssx++; + (PCB).sn = (PCB).ag_ap; + (PCB).rx = 0; + return (PCB).exit_flag == AG_RUNNING_CODE; +} + +static int ag_action_2_r_proc(void) { + (PCB).ssx++; + (PCB).sn = (PCB).ag_ap; + return 0; +} + +static int ag_action_7_proc(void) { + --(PCB).ssx; + (PCB).rx = 0; + (PCB).exit_flag = AG_SUCCESS_CODE; + return 0; +} + +static int ag_action_1_proc(void) { + ag_track(); + (PCB).exit_flag = AG_SUCCESS_CODE; + return 0; +} + +static int ag_action_1_r_proc(void) { + (PCB).exit_flag = AG_SUCCESS_CODE; + return 0; +} + +static int ag_action_1_s_proc(void) { + (PCB).exit_flag = AG_SUCCESS_CODE; + return 0; +} + +static int ag_action_4_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap] - 1; + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + (PCB).btsx = 0, (PCB).drt = -1; + (PCB).vs[(PCB).ssx] = *(PCB).lab; + if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + else (PCB).ss[(PCB).ssx] = (PCB).sn; + ag_track(); + while ((PCB).exit_flag == AG_RUNNING_CODE) { + unsigned ag_t1 = ag_sbe[(PCB).sn] + 1; + unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1; + do { + unsigned ag_tx = (ag_t1 + ag_t2)/2; + if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1; + else ag_t2 = ag_tx; + } while (ag_t1 < ag_t2); + (PCB).ag_ap = ag_pstt[ag_t1]; + if ((ag_s_procs_scan[ag_astt[ag_t1]])() == 0) break; + } + return 0; +} + +static int ag_action_3_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap] - 1; + (PCB).btsx = 0, (PCB).drt = -1; + (PCB).vs[(PCB).ssx] = *(PCB).lab; + if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + else (PCB).ss[(PCB).ssx] = (PCB).sn; + ag_track(); + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + ag_ra(); + while ((PCB).exit_flag == AG_RUNNING_CODE) { + unsigned ag_t1 = ag_sbe[(PCB).sn] + 1; + unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1; + do { + unsigned ag_tx = (ag_t1 + ag_t2)/2; + if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1; + else ag_t2 = ag_tx; + } while (ag_t1 < ag_t2); + (PCB).ag_ap = ag_pstt[ag_t1]; + if ((ag_s_procs_scan[ag_astt[ag_t1]])() == 0) break; + } + return 0; +} + +static int ag_action_8_proc(void) { + ag_undo(); + (PCB).rx = 0; + (PCB).exit_flag = AG_SYNTAX_ERROR_CODE; + ag_diagnose(); + SYNTAX_ERROR; + {(PCB).rx = 1; ag_track();} + return (PCB).exit_flag == AG_RUNNING_CODE; +} + +static int ag_action_5_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap]; + (PCB).btsx = 0, (PCB).drt = -1; + if (ag_sd) (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + else { + (PCB).ss[(PCB).ssx] = (PCB).sn; + } + (PCB).rx = 0; + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + ag_ra(); + while ((PCB).exit_flag == AG_RUNNING_CODE) { + unsigned ag_t1 = ag_sbe[(PCB).sn] + 1; + unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1; + do { + unsigned ag_tx = (ag_t1 + ag_t2)/2; + if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1; + else ag_t2 = ag_tx; + } while (ag_t1 < ag_t2); + (PCB).ag_ap = ag_pstt[ag_t1]; + if ((ag_r_procs_scan[ag_astt[ag_t1]])() == 0) break; + } + return (PCB).exit_flag == AG_RUNNING_CODE; +} + +static int ag_action_6_proc(void) { + int ag_sd = ag_fl[(PCB).ag_ap]; + (PCB).reduction_token = (xml2_token_type) ag_ptt[(PCB).ag_ap]; + if ((PCB).drt == -1) { + (PCB).drt=(PCB).token_number; + (PCB).dssx=(PCB).ssx; + (PCB).dsn=(PCB).sn; + } + if (ag_sd) { + (PCB).sn = (PCB).ss[(PCB).ssx -= ag_sd]; + } + else { + ag_prot(); + (PCB).vs[(PCB).ssx] = ag_null_value; + (PCB).ss[(PCB).ssx] = (PCB).sn; + } + (PCB).rx = 0; + while ((PCB).exit_flag == AG_RUNNING_CODE) { + unsigned ag_t1 = ag_sbe[(PCB).sn] + 1; + unsigned ag_t2 = ag_sbt[(PCB).sn+1] - 1; + do { + unsigned ag_tx = (ag_t1 + ag_t2)/2; + if (ag_tstt[ag_tx] < (unsigned char)(PCB).reduction_token) ag_t1 = ag_tx + 1; + else ag_t2 = ag_tx; + } while (ag_t1 < ag_t2); + (PCB).ag_ap = ag_pstt[ag_t1]; + if ((ag_r_procs_scan[ag_astt[ag_t1]])() == 0) break; + } + return (PCB).exit_flag == AG_RUNNING_CODE; +} + + +void init_xml2(void) { + (PCB).rx = (PCB).fx = 0; + (PCB).ss[0] = (PCB).sn = (PCB).ssx = 0; + (PCB).exit_flag = AG_RUNNING_CODE; + (PCB).line = FIRST_LINE; + (PCB).column = FIRST_COLUMN; + (PCB).btsx = 0, (PCB).drt = -1; +} + +void xml2(void) { + init_xml2(); + (PCB).exit_flag = AG_RUNNING_CODE; + while ((PCB).exit_flag == AG_RUNNING_CODE) { + unsigned ag_t1 = ag_sbt[(PCB).sn]; + if (ag_tstt[ag_t1]) { + unsigned ag_t2 = ag_sbe[(PCB).sn] - 1; + if ((PCB).rx < (PCB).fx) { + (PCB).input_code = (PCB).lab[(PCB).rx++]; + (PCB).token_number = (xml2_token_type) AG_TCV((PCB).input_code);} + else { + GET_INPUT; + (PCB).lab[(PCB).fx++] = (PCB).input_code; + (PCB).token_number = (xml2_token_type) AG_TCV((PCB).input_code); + (PCB).rx++; + } + if (ag_key_index[(PCB).sn]) { + unsigned ag_k = ag_key_index[(PCB).sn]; + int ag_ch = CONVERT_CASE((PCB).input_code); + if (ag_ch < 255) { + while (ag_key_ch[ag_k] < ag_ch) ag_k++; + if (ag_key_ch[ag_k] == ag_ch) ag_get_key_word(ag_k); + } + } + do { + unsigned ag_tx = (ag_t1 + ag_t2)/2; + if (ag_tstt[ag_tx] > (unsigned char)(PCB).token_number) + ag_t1 = ag_tx + 1; + else ag_t2 = ag_tx; + } while (ag_t1 < ag_t2); + if (ag_tstt[ag_t1] != (unsigned char)(PCB).token_number) + ag_t1 = ag_sbe[(PCB).sn]; + } + (PCB).ag_ap = ag_pstt[ag_t1]; + (ag_gt_procs_scan[ag_astt[ag_t1]])(); + } +} + + + +int main(void) { + xml2(); + return 0; +}