2 * We don't use input, so don't generate code for it.
7 * We don't use unput, so don't generate code for it.
12 * We don't read from the terminal.
14 %option never-interactive
17 * The language we're scanning is case-insensitive.
22 * Prefix scanner routines with "Dtd_PreParse_" rather than "yy", so this
23 * scanner can coexist with other scanners.
25 %option prefix="Dtd_PreParse_"
27 %option outfile="dtd_preparse.c"
33 * an XML dissector for wireshark
35 * DTD Preparser - import a dtd file into a GString
36 * including files, removing comments
37 * and resolving %entities;
39 * Copyright 2004, Luis E. Garcia Ontanon <luis@ontanon.org>
41 * Wireshark - Network traffic analyzer
42 * By Gerald Combs <gerald@wireshark.org>
43 * Copyright 1998 Gerald Combs
45 * This program is free software; you can redistribute it and/or
46 * modify it under the terms of the GNU General Public License
47 * as published by the Free Software Foundation; either version 2
48 * of the License, or (at your option) any later version.
50 * This program is distributed in the hope that it will be useful,
51 * but WITHOUT ANY WARRANTY; without even the implied warranty of
52 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
53 * GNU General Public License for more details.
55 * You should have received a copy of the GNU General Public License
56 * along with this program; if not, write to the Free Software
57 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
67 #include "dtd_preparse_lex.h"
68 #include <wsutil/file_util.h>
70 #define ECHO g_string_append(current,yytext);
72 static GString* current;
73 static GString* output;
74 static GHashTable* entities;
75 static gchar* entity_name;
76 static GString* error;
78 static const gchar* dtd_dirname;
79 static const gchar* filename;
82 static const gchar* replace_entity(gchar* s);
83 static const gchar* location(void);
86 * Flex (v 2.5.35) uses this symbol to "exclude" unistd.h
89 #define YY_NO_UNISTD_H
93 /* disable Windows VC compiler warning "signed/unsigned mismatch" associated */
94 /* with YY_INPUT code generated by flex versions such as 2.5.35. */
95 #pragma warning (disable:4018)
108 entity_start "<!"[[:blank:]\n]*entity[[:blank:]\n]*"%"
113 name [A-Za-z][-:A-Za-z0-9_\.]*
122 entity [%&][A-Za-z][-A-Za-z0-9_]*;
124 whitespace [[blank:]]+
126 %START OUTSIDE IN_COMMENT IN_ENTITY NAMED_ENTITY IN_QUOTE ENTITY_DONE XMLPI
130 {entity} if (current) g_string_append_printf(current,"%s\n%s\n",replace_entity(yytext),location());
132 {whitespace} if (current) g_string_append(current," ");
134 <OUTSIDE>{xmlpi_start} { g_string_append(current,yytext); BEGIN XMLPI; }
135 <XMLPI>{xmlpi_chars} { g_string_append(current,yytext); }
136 <XMLPI>{newline} { g_string_append(current,yytext); }
137 <XMLPI>{xmlpi_stop} { g_string_append(current,yytext); BEGIN OUTSIDE; }
139 <OUTSIDE>{comment_start} { current = NULL; BEGIN IN_COMMENT; }
142 <IN_COMMENT>{comment_stop} { current = output; BEGIN OUTSIDE; }
146 if (current) g_string_append_printf(current,"%s\n",location());
150 <OUTSIDE>{entity_start} { BEGIN IN_ENTITY; }
151 <IN_ENTITY>{name} { entity_name = g_strdup_printf("%%%s;",yytext); BEGIN NAMED_ENTITY; }
152 <NAMED_ENTITY>{quote} { current = g_string_new(location()); BEGIN IN_QUOTE; }
153 <IN_QUOTE>{quote} { g_hash_table_insert(entities,entity_name,current); BEGIN ENTITY_DONE; }
154 <IN_QUOTE>{percent} |
155 <IN_QUOTE>{non_quote} |
156 <IN_QUOTE>{escaped_quote} g_string_append(current,yytext);
157 <NAMED_ENTITY>{system} {
158 g_string_append_printf(error,"at %s:%u: file inclusion is not supported!", filename, linenum);
161 <ENTITY_DONE>{special_stop} { current = output; g_string_append(current,"\n"); BEGIN OUTSIDE; }
165 static const gchar* replace_entity(gchar* entity) {
166 GString* replacement;
170 replacement = (GString*)g_hash_table_lookup(entities,entity);
173 return replacement->str;
175 g_string_append_printf(error,"dtd_preparse: in file '%s': entity %s does not exists\n", filename, entity);
181 static const gchar* location(void) {
182 static gchar* loc = NULL;
184 if (loc) g_free(loc);
186 loc = g_strdup_printf("<? wireshark:location %s:%u ?>", filename, linenum);
191 static gboolean free_gstring_hash_items(gpointer k,gpointer v,gpointer p _U_) {
193 g_string_free((GString*)v,TRUE);
197 extern GString* dtd_preparse(const gchar* dname,const gchar* fname, GString* err) {
198 gchar* fullname = g_strdup_printf("%s%c%s",dname,G_DIR_SEPARATOR,fname);
204 yyin = ws_fopen(fullname,"r");
208 g_string_append_printf(err, "Could not open file: '%s', error: %s",fullname,g_strerror(errno));
215 entities = g_hash_table_new(g_str_hash,g_str_equal);
216 current = output = g_string_new(location());
226 g_hash_table_foreach_remove(entities,free_gstring_hash_items,NULL);
227 g_hash_table_destroy(entities);
235 * We want to stop processing when we get to the end of the input.
236 * (%option noyywrap is not used because if used then
237 * some flex versions (eg: 2.5.35) generate code which causes
238 * warnings by the Windows VC compiler).