1 /* Validating XML processor for surfxml.dtd.
2 * Generated 2005/08/16 14:42:02.
4 * This program was generated with the FleXML XML processor generator.
5 * FleXML is Copyright © 1999-2005 Kristoffer Rose. All rights reserved.
6 * (Id: flexml.pl,v 1.44 2005/02/23 23:08:16 mquinson Exp).
8 * There are two, intertwined parts to this program, part A and part B.
13 * Some parts, here collectively called "Part A", are found in the
14 * FleXML package. They are Copyright © 1999-2005 Kristoffer Rose.
15 * All rights reserved.
17 * You can redistribute, use, perform, display and/or modify "Part A"
18 * provided the following two conditions hold:
20 * 1. The program is distributed WITHOUT ANY WARRANTY from the author of
21 * FleXML; without even the implied warranty of MERCHANTABILITY or
22 * FITNESS FOR A PARTICULAR PURPOSE.
24 * 2. The program distribution conditions do not in any way affect the
25 * distribution conditions of the FleXML system used to generate this
26 * file or any version of FleXML derived from that system.
28 * Notice that these are explicit rights granted to you for files
29 * generated by the FleXML system. For your rights in connection with
30 * the FleXML system itself please consult the GNU General Public License.
35 * The other parts, here collectively called "Part B", and which came
36 * from the DTD used by FleXML to generate this program, can be
37 * distributed (or not, as the case may be) under the terms of whoever
38 * wrote them, provided these terms respect and obey the two conditions
39 * above under the heading "Part A".
41 * The author of and contributors to FleXML specifically disclaim
42 * any copyright interest in "Part B", unless "Part B" was written
43 * by the author of or contributors to FleXML.
49 /* Version strings. */
50 const char rcs_flexml_skeleton[] =
51 "$" "Id: skel,v 1.26 2005/02/23 22:22:20 wdowling Exp $";
52 const char rcs_flexml[] =
53 "$" "Id: flexml.pl,v 1.44 2005/02/23 23:08:16 mquinson Exp $";
63 /* Generated definitions. */
64 #define FLEXML_yylineno
65 #define FLEXML_BUFFERSTACKSIZE 1000000
67 /* XML processor api. */
68 /* FleXML-provided data. */
70 AT_network_link_bandwidth A_network_link_bandwidth;
71 AT_cpu_name A_cpu_name;
72 AT_process_kill_time A_process_kill_time;
73 AT_network_link_state A_network_link_state;
74 AT_argument_value A_argument_value;
75 AT_cpu_availability_file A_cpu_availability_file;
76 AT_process_host A_process_host;
77 AT_route_impact_on_src A_route_impact_on_src;
78 AT_route_src A_route_src;
79 AT_network_link_latency_file A_network_link_latency_file;
80 AT_cpu_max_outgoing_rate A_cpu_max_outgoing_rate;
81 AT_route_impact_on_dst_with_other_send A_route_impact_on_dst_with_other_send;
82 AT_cpu_interference_send_recv A_cpu_interference_send_recv;
83 AT_cpu_availability A_cpu_availability;
84 AT_route_impact_on_dst A_route_impact_on_dst;
85 AT_cpu_interference_recv A_cpu_interference_recv;
86 AT_route_impact_on_src_with_other_recv A_route_impact_on_src_with_other_recv;
87 AT_network_link_name A_network_link_name;
88 AT_route_element_name A_route_element_name;
89 AT_cpu_power A_cpu_power;
90 AT_process_start_time A_process_start_time;
91 AT_include_file A_include_file;
92 AT_process_function A_process_function;
93 AT_network_link_sharing_policy A_network_link_sharing_policy;
94 AT_route_dst A_route_dst;
95 AT_cpu_state A_cpu_state;
96 AT_network_link_latency A_network_link_latency;
97 AT_network_link_state_file A_network_link_state_file;
98 AT_cpu_interference_send A_cpu_interference_send;
99 AT_cpu_state_file A_cpu_state_file;
100 AT_network_link_bandwidth_file A_network_link_bandwidth_file;
104 # define ENTER(state) debug_enter(state,#state)
105 # define LEAVE debug_leave()
106 # define SET(state) debug_set(state,#state)
107 static void debug_enter(int, const char*);
108 static void debug_leave(void);
109 static void debug_set(int, const char*);
111 # define ENTER(state) (yy_push_state(state))
112 # define LEAVE (yy_pop_state())
113 # define SET(state) BEGIN(state)
116 /* Generic actions. */
117 #define SKIP /*skip*/
118 #define SUCCEED CLEANUP; return 0
120 #define FAIL return fail
121 static int fail(const char*, ...);
122 const char * parse_err_msg(void);
125 static void cleanup(void);
126 #define CLEANUP cleanup()
128 /* Text buffer stack handling. */
129 char bufferstack[FLEXML_BUFFERSTACKSIZE];
130 char* limit = bufferstack + FLEXML_BUFFERSTACKSIZE;
131 typedef struct BufferLast_s {
132 struct BufferLast_s *old; char* saved; char new1[1];
134 BufferLast* last = (BufferLast*)0;
135 char* next = bufferstack;
137 #define BUFFERSET(P) (P = next)
138 #define BUFFERPUTC(C) (assert(next<limit), *(next++) = (C))
139 #define BUFFERDONE (BUFFERPUTC('\0'))
141 #define BUFFERLITERAL(C,P) bufferliteral(C,&(P),yytext)
142 static void bufferliteral(char c, const char** pp, char* text)
144 char *s = strchr(text,c), *e = strrchr(text,c);
145 assert(s <= e); BUFFERSET(*pp);
147 if (isspace(*s)) { BUFFERPUTC(' '); while (isspace(*s)) ++s; }
153 #ifdef FLEXML_HasMixed
154 static void pushbuffer(char* p)
156 BufferLast* l = (BufferLast*)next;
157 assert(next < limit);
164 static char* popbuffer(void)
166 BufferLast* l = last;
167 assert(last != (BufferLast*)0);
174 /* General internal entities are `unput' back onto the input stream... */
175 #define ENTITYTEXT(T) \
176 { char *s = (T), *e = s+strlen(s);\
177 while (--e >= s) { unput(*e); }}
180 /* Flex standard options. */
182 %option noyy_top_state
188 /* Flex user-requested options. */
192 /* XML character classes (currently restricted to ASCII). */
194 /* "Common syntactic structures." */
198 /* "Names and Tokens." */
199 NameChar [A-Za-z0-9.:_-]
200 Name [A-Za-z_:]{NameChar}*
201 Names {Name}({S}{Name})*
202 Nmtoken ({NameChar})+
203 Nmtokens {Nmtoken}({S}{Nmtoken})*
206 VersionNum [a-zA-Z0-9_.:-]+
208 Literal \'[^'']*\'|\"[^""]*\"
210 /* Parser states (flex `exclusive start conditions'):
212 * PROLOG the XML prolog of the document before <?xml...>
213 * DOCTYPE the XML prolog of the document after <?xml...>
214 * EPILOG after the root element
215 * INCOMMENT inside an XML comment <!--....-->
216 * INPI inside an XML PI <?...?>
217 * VALUE1 inside a '...'-delimited literal
218 * VALUE2 inside a "..."-delimited literal
219 * CDATA inside a <![CDATA[...]]> section.
220 * ROOT_<tag> expect root element <tag>
221 * AL_<tag> inside the attribute list for <tag>
222 * IN_<tag> inside a <tag> with element contents (ready for end tag)
223 * IMPOSSIBLE dummy to permit disabling rules; must be last
225 %x PROLOG DOCTYPE EPILOG INCOMMENT INPI VALUE1 VALUE2 CDATA
226 %x ROOT_platform_description AL_platform_description S_platform_description S_platform_description_1 S_platform_description_2 E_platform_description
227 %x ROOT_include AL_include S_include S_include_1 S_include_2 E_include
228 %x ROOT_cpu AL_cpu E_cpu
229 %x ROOT_network_link AL_network_link E_network_link
230 %x ROOT_route AL_route S_route S_route_1 S_route_2 E_route
231 %x ROOT_route_element AL_route_element E_route_element
232 %x ROOT_process AL_process S_process S_process_1 S_process_2 E_process
233 %x ROOT_argument AL_argument E_argument
238 const char* *statenames=NULL;
243 /* Bypass Flex's default INITIAL state and begin by parsing the XML prolog. */
247 if(!statenames) {statenames= (const char **)calloc(IMPOSSIBLE,sizeof(char*));
248 statenames[PROLOG] = NULL;
249 statenames[DOCTYPE] = NULL;
250 statenames[EPILOG] = NULL;
251 statenames[INCOMMENT] = NULL;
252 statenames[INPI] = NULL;
253 statenames[VALUE1] = NULL;
254 statenames[VALUE2] = NULL;
255 statenames[CDATA] = NULL;
256 statenames[ROOT_platform_description] = NULL;
257 statenames[AL_platform_description] = NULL;
258 statenames[S_platform_description] = "platform_description";
259 statenames[S_platform_description_1] = "platform_description";
260 statenames[S_platform_description_2] = "platform_description";
261 statenames[E_platform_description] = "platform_description";
262 statenames[ROOT_include] = NULL;
263 statenames[AL_include] = NULL;
264 statenames[S_include] = "include";
265 statenames[S_include_1] = "include";
266 statenames[S_include_2] = "include";
267 statenames[E_include] = "include";
268 statenames[ROOT_cpu] = NULL;
269 statenames[AL_cpu] = NULL;
270 statenames[E_cpu] = "cpu";
271 statenames[ROOT_network_link] = NULL;
272 statenames[AL_network_link] = NULL;
273 statenames[E_network_link] = "network_link";
274 statenames[ROOT_route] = NULL;
275 statenames[AL_route] = NULL;
276 statenames[S_route] = "route";
277 statenames[S_route_1] = "route";
278 statenames[S_route_2] = "route";
279 statenames[E_route] = "route";
280 statenames[ROOT_route_element] = NULL;
281 statenames[AL_route_element] = NULL;
282 statenames[E_route_element] = "route_element";
283 statenames[ROOT_process] = NULL;
284 statenames[AL_process] = NULL;
285 statenames[S_process] = "process";
286 statenames[S_process_1] = "process";
287 statenames[S_process_2] = "process";
288 statenames[E_process] = "process";
289 statenames[ROOT_argument] = NULL;
290 statenames[AL_argument] = NULL;
291 statenames[E_argument] = "argument";
294 /* COMMENTS and PIs: handled uniformly for efficiency. */
296 <ROOT_platform_description,AL_platform_description,S_platform_description,S_platform_description_1,S_platform_description_2,E_platform_description,ROOT_include,AL_include,S_include,S_include_1,S_include_2,E_include,ROOT_cpu,AL_cpu,E_cpu,ROOT_network_link,AL_network_link,E_network_link,ROOT_route,AL_route,S_route,S_route_1,S_route_2,E_route,ROOT_route_element,AL_route_element,E_route_element,ROOT_process,AL_process,S_process,S_process_1,S_process_2,E_process,ROOT_argument,AL_argument,E_argument,PROLOG,DOCTYPE,EPILOG>{
297 "<!--" ENTER(INCOMMENT);
305 <<EOF>> FAIL("EOF in comment.");
311 <<EOF>> FAIL("EOF in PI (processing instruction).");
314 /* SPACES: skipped uniformly */
316 <ROOT_platform_description,AL_platform_description,S_platform_description,S_platform_description_1,S_platform_description_2,E_platform_description,ROOT_include,AL_include,S_include,S_include_1,S_include_2,E_include,ROOT_cpu,AL_cpu,E_cpu,ROOT_network_link,AL_network_link,E_network_link,ROOT_route,AL_route,S_route,S_route_1,S_route_2,E_route,ROOT_route_element,AL_route_element,E_route_element,ROOT_process,AL_process,S_process,S_process_1,S_process_2,E_process,ROOT_argument,AL_argument,E_argument,PROLOG,DOCTYPE,EPILOG>{S} SKIP;
318 /* PROLOG: determine root element and process it. */
321 "<?xml"({S}version{Eq}(\'{VersionNum}\'|\"{VersionNum}\"))?({S}encoding{Eq}(\'[^']*\'|\"[^"]*\"))?"?>" SET(DOCTYPE);
322 "<?xml"[^>]*">" FAIL("Bad declaration %s.",yytext);
326 "<!DOCTYPE"{S}"argument"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_argument);
327 "<!DOCTYPE"{S}"route_element"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_route_element);
328 "<!DOCTYPE"{S}"cpu"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_cpu);
329 "<!DOCTYPE"{S}"include"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_include);
330 "<!DOCTYPE"{S}"route"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_route);
331 "<!DOCTYPE"{S}"platform_description"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_platform_description);
332 "<!DOCTYPE"{S}"network_link"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_network_link);
333 "<!DOCTYPE"{S}"process"{S}SYSTEM{S}("'surfxml.dtd'"|"\"surfxml.dtd\""){s}">" SET(ROOT_process);
334 "<!"[^>-][^>]*">" FAIL("Bad declaration %s.",yytext);
335 . FAIL("Unexpected character `%c' in prolog.", yytext[0]);
336 <<EOF>> FAIL("EOF in prolog.");
339 /* RULES DERIVED FROM DTD. */
341 /* <!-- Small DTD for SURF based tools. --> */
343 <ROOT_platform_description>"<platform_description"{s} {
344 ENTER(AL_platform_description);
347 <AL_platform_description>{
349 LEAVE; STag_platform_description();pcdata = NULL; ENTER(S_platform_description);
352 LEAVE; STag_platform_description(); pcdata = NULL; ETag_platform_description();
354 case ROOT_platform_description: SET(EPILOG); break;
357 . FAIL("Unexpected character `%c' in attribute list of platform_description element.", yytext[0]);
358 {Name} FAIL("Bad attribute `%s' in `platform_description' element start tag.",yytext);
359 <<EOF>> FAIL("EOF in attribute list of `platform_description' element.");
362 <E_platform_description,S_platform_description_2,S_platform_description>{
363 "</platform_description"{s}">" {
365 ETag_platform_description();
367 case ROOT_platform_description: SET(EPILOG); break;
370 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</platform_description>' expected.",yytext);
371 . FAIL("Unexpected character `%c': `</platform_description>' expected.",yytext[0]);
372 <<EOF>> FAIL("Premature EOF: `</platform_description>' expected.");
375 <ROOT_include,S_platform_description_2,S_include,S_include_2,S_platform_description_1,S_include_1,S_platform_description>"<include"{s} {
376 A_include_file = NULL;
381 "file"{Eq}\' ENTER(VALUE1); BUFFERSET(A_include_file);
382 "file"{Eq}\" ENTER(VALUE2); BUFFERSET(A_include_file);
385 if (!A_include_file) FAIL("Required attribute `file' not set for `include' element.");
386 LEAVE; STag_include();pcdata = NULL; ENTER(S_include);
389 if (!A_include_file) FAIL("Required attribute `file' not set for `include' element.");
390 LEAVE; STag_include(); pcdata = NULL; ETag_include();
392 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
393 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
394 case ROOT_include: SET(EPILOG); break;
397 . FAIL("Unexpected character `%c' in attribute list of include element.", yytext[0]);
398 {Name} FAIL("Bad attribute `%s' in `include' element start tag.",yytext);
399 <<EOF>> FAIL("EOF in attribute list of `include' element.");
402 <E_include,S_include,S_include_2>{
407 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
408 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
409 case ROOT_include: SET(EPILOG); break;
412 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</include>' expected.",yytext);
413 . FAIL("Unexpected character `%c': `</include>' expected.",yytext[0]);
414 <<EOF>> FAIL("Premature EOF: `</include>' expected.");
417 <ROOT_cpu,S_platform_description_2,S_include,S_include_2,S_platform_description_1,S_include_1,S_platform_description>"<cpu"{s} {
420 A_cpu_availability = "1.0";
421 A_cpu_availability_file = NULL;
422 A_cpu_state = A_cpu_state_ON;
423 A_cpu_state_file = NULL;
424 A_cpu_interference_send = "1.0";
425 A_cpu_interference_recv = "1.0";
426 A_cpu_interference_send_recv = "1.0";
427 A_cpu_max_outgoing_rate = "-1.0";
432 "name"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_name);
433 "name"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_name);
435 "power"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_power);
436 "power"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_power);
438 "availability"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_availability);
439 "availability"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_availability);
441 "availability_file"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_availability_file);
442 "availability_file"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_availability_file);
445 "state"{Eq}"\"ON\"" A_cpu_state = A_cpu_state_ON;
447 "state"{Eq}"\"OFF\"" A_cpu_state = A_cpu_state_OFF;
449 "state_file"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_state_file);
450 "state_file"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_state_file);
452 "interference_send"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_interference_send);
453 "interference_send"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_interference_send);
455 "interference_recv"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_interference_recv);
456 "interference_recv"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_interference_recv);
458 "interference_send_recv"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_interference_send_recv);
459 "interference_send_recv"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_interference_send_recv);
461 "max_outgoing_rate"{Eq}\' ENTER(VALUE1); BUFFERSET(A_cpu_max_outgoing_rate);
462 "max_outgoing_rate"{Eq}\" ENTER(VALUE2); BUFFERSET(A_cpu_max_outgoing_rate);
465 if (!A_cpu_name) FAIL("Required attribute `name' not set for `cpu' element.");
466 if (!A_cpu_power) FAIL("Required attribute `power' not set for `cpu' element.");
467 LEAVE; STag_cpu();pcdata = NULL; ENTER(E_cpu);
470 if (!A_cpu_name) FAIL("Required attribute `name' not set for `cpu' element.");
471 if (!A_cpu_power) FAIL("Required attribute `power' not set for `cpu' element.");
472 LEAVE; STag_cpu(); pcdata = NULL; ETag_cpu();
474 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
475 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
476 case ROOT_cpu: SET(EPILOG); break;
479 . FAIL("Unexpected character `%c' in attribute list of cpu element.", yytext[0]);
480 {Name} FAIL("Bad attribute `%s' in `cpu' element start tag.",yytext);
481 <<EOF>> FAIL("EOF in attribute list of `cpu' element.");
489 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
490 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
491 case ROOT_cpu: SET(EPILOG); break;
494 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</cpu>' expected.",yytext);
495 . FAIL("Unexpected character `%c': `</cpu>' expected.",yytext[0]);
496 <<EOF>> FAIL("Premature EOF: `</cpu>' expected.");
499 <ROOT_network_link,S_platform_description_2,S_include,S_include_2,S_platform_description_1,S_include_1,S_platform_description>"<network_link"{s} {
500 A_network_link_name = NULL;
501 A_network_link_bandwidth = NULL;
502 A_network_link_bandwidth_file = NULL;
503 A_network_link_latency = "0.0";
504 A_network_link_latency_file = NULL;
505 A_network_link_state = A_network_link_state_ON;
506 A_network_link_state_file = NULL;
507 A_network_link_sharing_policy = A_network_link_sharing_policy_SHARED;
508 ENTER(AL_network_link);
512 "name"{Eq}\' ENTER(VALUE1); BUFFERSET(A_network_link_name);
513 "name"{Eq}\" ENTER(VALUE2); BUFFERSET(A_network_link_name);
515 "bandwidth"{Eq}\' ENTER(VALUE1); BUFFERSET(A_network_link_bandwidth);
516 "bandwidth"{Eq}\" ENTER(VALUE2); BUFFERSET(A_network_link_bandwidth);
518 "bandwidth_file"{Eq}\' ENTER(VALUE1); BUFFERSET(A_network_link_bandwidth_file);
519 "bandwidth_file"{Eq}\" ENTER(VALUE2); BUFFERSET(A_network_link_bandwidth_file);
521 "latency"{Eq}\' ENTER(VALUE1); BUFFERSET(A_network_link_latency);
522 "latency"{Eq}\" ENTER(VALUE2); BUFFERSET(A_network_link_latency);
524 "latency_file"{Eq}\' ENTER(VALUE1); BUFFERSET(A_network_link_latency_file);
525 "latency_file"{Eq}\" ENTER(VALUE2); BUFFERSET(A_network_link_latency_file);
528 "state"{Eq}"\"ON\"" A_network_link_state = A_network_link_state_ON;
530 "state"{Eq}"\"OFF\"" A_network_link_state = A_network_link_state_OFF;
532 "state_file"{Eq}\' ENTER(VALUE1); BUFFERSET(A_network_link_state_file);
533 "state_file"{Eq}\" ENTER(VALUE2); BUFFERSET(A_network_link_state_file);
535 "sharing_policy"{Eq}"'SHARED'" |
536 "sharing_policy"{Eq}"\"SHARED\"" A_network_link_sharing_policy = A_network_link_sharing_policy_SHARED;
537 "sharing_policy"{Eq}"'FATPIPE'" |
538 "sharing_policy"{Eq}"\"FATPIPE\"" A_network_link_sharing_policy = A_network_link_sharing_policy_FATPIPE;
541 if (!A_network_link_name) FAIL("Required attribute `name' not set for `network_link' element.");
542 if (!A_network_link_bandwidth) FAIL("Required attribute `bandwidth' not set for `network_link' element.");
543 LEAVE; STag_network_link();pcdata = NULL; ENTER(E_network_link);
546 if (!A_network_link_name) FAIL("Required attribute `name' not set for `network_link' element.");
547 if (!A_network_link_bandwidth) FAIL("Required attribute `bandwidth' not set for `network_link' element.");
548 LEAVE; STag_network_link(); pcdata = NULL; ETag_network_link();
550 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
551 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
552 case ROOT_network_link: SET(EPILOG); break;
555 . FAIL("Unexpected character `%c' in attribute list of network_link element.", yytext[0]);
556 {Name} FAIL("Bad attribute `%s' in `network_link' element start tag.",yytext);
557 <<EOF>> FAIL("EOF in attribute list of `network_link' element.");
561 "</network_link"{s}">" {
565 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
566 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
567 case ROOT_network_link: SET(EPILOG); break;
570 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</network_link>' expected.",yytext);
571 . FAIL("Unexpected character `%c': `</network_link>' expected.",yytext[0]);
572 <<EOF>> FAIL("Premature EOF: `</network_link>' expected.");
575 <ROOT_route,S_platform_description_2,S_include,S_include_2,S_platform_description_1,S_include_1,S_platform_description>"<route"{s} {
578 A_route_impact_on_src = "0.0";
579 A_route_impact_on_dst = "0.0";
580 A_route_impact_on_src_with_other_recv = "0.0";
581 A_route_impact_on_dst_with_other_send = "0.0";
586 "src"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_src);
587 "src"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_src);
589 "dst"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_dst);
590 "dst"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_dst);
592 "impact_on_src"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_impact_on_src);
593 "impact_on_src"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_impact_on_src);
595 "impact_on_dst"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_impact_on_dst);
596 "impact_on_dst"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_impact_on_dst);
598 "impact_on_src_with_other_recv"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_impact_on_src_with_other_recv);
599 "impact_on_src_with_other_recv"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_impact_on_src_with_other_recv);
601 "impact_on_dst_with_other_send"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_impact_on_dst_with_other_send);
602 "impact_on_dst_with_other_send"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_impact_on_dst_with_other_send);
605 if (!A_route_src) FAIL("Required attribute `src' not set for `route' element.");
606 if (!A_route_dst) FAIL("Required attribute `dst' not set for `route' element.");
607 LEAVE; STag_route();pcdata = NULL; ENTER(S_route);
610 if (!A_route_src) FAIL("Required attribute `src' not set for `route' element.");
611 if (!A_route_dst) FAIL("Required attribute `dst' not set for `route' element.");
612 LEAVE; STag_route(); pcdata = NULL; ETag_route();
614 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
615 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
616 case ROOT_route: SET(EPILOG); break;
619 . FAIL("Unexpected character `%c' in attribute list of route element.", yytext[0]);
620 {Name} FAIL("Bad attribute `%s' in `route' element start tag.",yytext);
621 <<EOF>> FAIL("EOF in attribute list of `route' element.");
624 <S_route,S_route_2,E_route>{
629 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
630 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
631 case ROOT_route: SET(EPILOG); break;
634 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</route>' expected.",yytext);
635 . FAIL("Unexpected character `%c': `</route>' expected.",yytext[0]);
636 <<EOF>> FAIL("Premature EOF: `</route>' expected.");
639 <ROOT_route_element,S_route_1,S_route,S_route_2>"<route_element"{s} {
640 A_route_element_name = NULL;
641 ENTER(AL_route_element);
645 "name"{Eq}\' ENTER(VALUE1); BUFFERSET(A_route_element_name);
646 "name"{Eq}\" ENTER(VALUE2); BUFFERSET(A_route_element_name);
649 if (!A_route_element_name) FAIL("Required attribute `name' not set for `route_element' element.");
650 LEAVE; STag_route_element();pcdata = NULL; ENTER(E_route_element);
653 if (!A_route_element_name) FAIL("Required attribute `name' not set for `route_element' element.");
654 LEAVE; STag_route_element(); pcdata = NULL; ETag_route_element();
656 case S_route_1: case S_route: case S_route_2: SET(S_route_2); break;
657 case ROOT_route_element: SET(EPILOG); break;
660 . FAIL("Unexpected character `%c' in attribute list of route_element element.", yytext[0]);
661 {Name} FAIL("Bad attribute `%s' in `route_element' element start tag.",yytext);
662 <<EOF>> FAIL("EOF in attribute list of `route_element' element.");
666 "</route_element"{s}">" {
668 ETag_route_element();
670 case S_route_1: case S_route: case S_route_2: SET(S_route_2); break;
671 case ROOT_route_element: SET(EPILOG); break;
674 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</route_element>' expected.",yytext);
675 . FAIL("Unexpected character `%c': `</route_element>' expected.",yytext[0]);
676 <<EOF>> FAIL("Premature EOF: `</route_element>' expected.");
679 <ROOT_process,S_platform_description_2,S_include,S_include_2,S_platform_description_1,S_include_1,S_platform_description>"<process"{s} {
680 A_process_host = NULL;
681 A_process_function = NULL;
682 A_process_start_time = "-1.0";
683 A_process_kill_time = "-1.0";
688 "host"{Eq}\' ENTER(VALUE1); BUFFERSET(A_process_host);
689 "host"{Eq}\" ENTER(VALUE2); BUFFERSET(A_process_host);
691 "function"{Eq}\' ENTER(VALUE1); BUFFERSET(A_process_function);
692 "function"{Eq}\" ENTER(VALUE2); BUFFERSET(A_process_function);
694 "start_time"{Eq}\' ENTER(VALUE1); BUFFERSET(A_process_start_time);
695 "start_time"{Eq}\" ENTER(VALUE2); BUFFERSET(A_process_start_time);
697 "kill_time"{Eq}\' ENTER(VALUE1); BUFFERSET(A_process_kill_time);
698 "kill_time"{Eq}\" ENTER(VALUE2); BUFFERSET(A_process_kill_time);
701 if (!A_process_host) FAIL("Required attribute `host' not set for `process' element.");
702 if (!A_process_function) FAIL("Required attribute `function' not set for `process' element.");
703 LEAVE; STag_process();pcdata = NULL; ENTER(S_process);
706 if (!A_process_host) FAIL("Required attribute `host' not set for `process' element.");
707 if (!A_process_function) FAIL("Required attribute `function' not set for `process' element.");
708 LEAVE; STag_process(); pcdata = NULL; ETag_process();
710 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
711 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
712 case ROOT_process: SET(EPILOG); break;
715 . FAIL("Unexpected character `%c' in attribute list of process element.", yytext[0]);
716 {Name} FAIL("Bad attribute `%s' in `process' element start tag.",yytext);
717 <<EOF>> FAIL("EOF in attribute list of `process' element.");
720 <S_process,E_process,S_process_2>{
725 case S_platform_description_2: case S_platform_description_1: case S_platform_description: SET(S_platform_description_2); break;
726 case S_include: case S_include_2: case S_include_1: SET(S_include_2); break;
727 case ROOT_process: SET(EPILOG); break;
730 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</process>' expected.",yytext);
731 . FAIL("Unexpected character `%c': `</process>' expected.",yytext[0]);
732 <<EOF>> FAIL("Premature EOF: `</process>' expected.");
735 <ROOT_argument,S_process_1,S_process,S_process_2>"<argument"{s} {
736 A_argument_value = NULL;
741 "value"{Eq}\' ENTER(VALUE1); BUFFERSET(A_argument_value);
742 "value"{Eq}\" ENTER(VALUE2); BUFFERSET(A_argument_value);
745 if (!A_argument_value) FAIL("Required attribute `value' not set for `argument' element.");
746 LEAVE; STag_argument();pcdata = NULL; ENTER(E_argument);
749 if (!A_argument_value) FAIL("Required attribute `value' not set for `argument' element.");
750 LEAVE; STag_argument(); pcdata = NULL; ETag_argument();
752 case ROOT_argument: SET(EPILOG); break;
753 case S_process_1: case S_process: case S_process_2: SET(S_process_2); break;
756 . FAIL("Unexpected character `%c' in attribute list of argument element.", yytext[0]);
757 {Name} FAIL("Bad attribute `%s' in `argument' element start tag.",yytext);
758 <<EOF>> FAIL("EOF in attribute list of `argument' element.");
766 case ROOT_argument: SET(EPILOG); break;
767 case S_process_1: case S_process: case S_process_2: SET(S_process_2); break;
770 "</"{Name}{s}">" FAIL("Unexpected end-tag `%s': `</argument>' expected.",yytext);
771 . FAIL("Unexpected character `%c': `</argument>' expected.",yytext[0]);
772 <<EOF>> FAIL("Premature EOF: `</argument>' expected.");
775 /* EPILOG: after the root element. */
778 . {SET(PROLOG); yyless(0); CLEANUP; return -1;}
782 /* CHARACTER DATA. */
784 <IMPOSSIBLE,VALUE1,VALUE2>{
785 /* Non-defined standard entities... */
786 "&" BUFFERPUTC('&');
787 "<" BUFFERPUTC('<');
788 ">" BUFFERPUTC('>');
789 "'" BUFFERPUTC('\'');
790 """ BUFFERPUTC('"');
792 /* Character entities. */
793 "&#"[[:digit:]]+";" BUFFERPUTC((unsigned char)atoi(yytext+2));
794 "&#x"[[:xdigit:]]+";" BUFFERPUTC((unsigned char)strtol(yytext+3,NULL,16));
797 <IMPOSSIBLE,VALUE1,VALUE2,CDATA>{
801 "\n\r" BUFFERPUTC('\n');
805 "<![CDATA[" ENTER(CDATA);
806 "]""]>" FAIL("Unexpected `]""]>' in character data.");
810 \' BUFFERDONE; LEAVE;
811 <<EOF>> FAIL("EOF in literal (\"'\" expected).");
815 \" BUFFERDONE; LEAVE;
816 <<EOF>> FAIL("EOF in literal (`\"' expected).");
819 <IMPOSSIBLE,VALUE1,VALUE2>{
820 [^<&] BUFFERPUTC(yytext[0]);
821 [<&] FAIL("Spurious `%c' in character data.",yytext[0]);
826 /* "]""]" BUFFERPUTC(yytext[0]); BUFFERPUTC(yytext[1]); */
827 . BUFFERPUTC(yytext[0]);
828 <<EOF>> FAIL("EOF in CDATA section.");
831 /* Impossible rules to avoid warnings from flex(1). */
832 /* Ideally, this should be replaced by code in flexml.pl that
833 generates just the states not covered by other rules. */
835 .|[\n] FAIL("Syntax error on character `%c'.", yytext[0]);
840 /* Element context stack lookup. */
841 int element_context(int i)
843 return (0<i && i<yy_start_stack_depth
844 ? yy_start_stack[yy_start_stack_ptr - i]
849 void print_yy_stack(char* fmt, ...)
851 int i = 0; va_list ap; va_start(ap, fmt);
852 vfprintf(stderr, fmt, ap);
853 for (i=1; i<yy_start_stack_ptr; i++)
854 fprintf(stderr, "%s/", statenames[yy_start_stack[i] ]);
855 fprintf(stderr,"%s\n", statenames[YY_START]);
859 static void debug_enter(int state, const char* statename) {
860 yy_push_state(state);
861 if (yy_flex_debug) print_yy_stack("--ENTER(%s) : ",statename);
864 static void debug_leave(void) {
865 if (yy_flex_debug) print_yy_stack("--LEAVE : ");
869 static void debug_set(int state, const char* statename) {
871 if (yy_flex_debug) print_yy_stack("--SET(%s) : ",statename);
875 enum {flexml_max_err_msg_size = 512};
877 static char flexml_err_msg[flexml_max_err_msg_size];
878 const char * parse_err_msg()
880 return flexml_err_msg;
883 static void reset_parse_err_msg()
885 flexml_err_msg[0] = '\0';
889 static void cleanup(void)
898 static int fail(const char* fmt, ...)
900 int chars_left, used;
901 va_list ap; va_start(ap, fmt);
902 #ifdef FLEXML_yylineno
903 used = sprintf(flexml_err_msg,
904 "Invalid XML (XML input line %d, state %d): ",
907 used = sprintf(flexml_err_msg,
908 "Invalid XML (state %d): ",
911 chars_left = flexml_max_err_msg_size - used - 1;
912 vsnprintf(flexml_err_msg + used, chars_left, fmt, ap);
915 #ifndef FLEXML_quiet_parser
916 /* print directly to sdterr */
917 fprintf(stderr, "%s\n", flexml_err_msg);
918 flexml_err_msg[0] = '\0';