• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /* GLIB - Library of useful routines for C programming
2  * Copyright (C) 1995-1997  Peter Mattis, Spencer Kimball and Josh MacDonald
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.	 See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the
16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
17  * Boston, MA 02111-1307, USA.
18  */
19 
20 /*
21  * Modified by the GLib Team and others 1997-2000.  See the AUTHORS
22  * file for a list of people on the GLib Team.  See the ChangeLog
23  * files for a list of changes.  These files are distributed with
24  * GLib at ftp://ftp.gtk.org/pub/gtk/.
25  */
26 
27 #if defined(G_DISABLE_SINGLE_INCLUDES) && !defined (__GLIB_H_INSIDE__) && !defined (GLIB_COMPILATION)
28 #error "Only <glib.h> can be included directly."
29 #endif
30 
31 #ifndef __G_SCANNER_H__
32 #define __G_SCANNER_H__
33 
34 #include <glib/gdataset.h>
35 #include <glib/ghash.h>
36 
37 G_BEGIN_DECLS
38 
39 typedef struct _GScanner	GScanner;
40 typedef struct _GScannerConfig	GScannerConfig;
41 typedef union  _GTokenValue     GTokenValue;
42 
43 typedef void		(*GScannerMsgFunc)	(GScanner      *scanner,
44 						 gchar	       *message,
45 						 gboolean	error);
46 
47 /* GScanner: Flexible lexical scanner for general purpose.
48  */
49 
50 /* Character sets */
51 #define G_CSET_A_2_Z	"ABCDEFGHIJKLMNOPQRSTUVWXYZ"
52 #define G_CSET_a_2_z	"abcdefghijklmnopqrstuvwxyz"
53 #define G_CSET_DIGITS	"0123456789"
54 #define G_CSET_LATINC	"\300\301\302\303\304\305\306"\
55 			"\307\310\311\312\313\314\315\316\317\320"\
56 			"\321\322\323\324\325\326"\
57 			"\330\331\332\333\334\335\336"
58 #define G_CSET_LATINS	"\337\340\341\342\343\344\345\346"\
59 			"\347\350\351\352\353\354\355\356\357\360"\
60 			"\361\362\363\364\365\366"\
61 			"\370\371\372\373\374\375\376\377"
62 
63 /* Error types */
64 typedef enum
65 {
66   G_ERR_UNKNOWN,
67   G_ERR_UNEXP_EOF,
68   G_ERR_UNEXP_EOF_IN_STRING,
69   G_ERR_UNEXP_EOF_IN_COMMENT,
70   G_ERR_NON_DIGIT_IN_CONST,
71   G_ERR_DIGIT_RADIX,
72   G_ERR_FLOAT_RADIX,
73   G_ERR_FLOAT_MALFORMED
74 } GErrorType;
75 
76 /* Token types */
77 typedef enum
78 {
79   G_TOKEN_EOF			=   0,
80 
81   G_TOKEN_LEFT_PAREN		= '(',
82   G_TOKEN_RIGHT_PAREN		= ')',
83   G_TOKEN_LEFT_CURLY		= '{',
84   G_TOKEN_RIGHT_CURLY		= '}',
85   G_TOKEN_LEFT_BRACE		= '[',
86   G_TOKEN_RIGHT_BRACE		= ']',
87   G_TOKEN_EQUAL_SIGN		= '=',
88   G_TOKEN_COMMA			= ',',
89 
90   G_TOKEN_NONE			= 256,
91 
92   G_TOKEN_ERROR,
93 
94   G_TOKEN_CHAR,
95   G_TOKEN_BINARY,
96   G_TOKEN_OCTAL,
97   G_TOKEN_INT,
98   G_TOKEN_HEX,
99   G_TOKEN_FLOAT,
100   G_TOKEN_STRING,
101 
102   G_TOKEN_SYMBOL,
103   G_TOKEN_IDENTIFIER,
104   G_TOKEN_IDENTIFIER_NULL,
105 
106   G_TOKEN_COMMENT_SINGLE,
107   G_TOKEN_COMMENT_MULTI,
108   G_TOKEN_LAST
109 } GTokenType;
110 
111 union	_GTokenValue
112 {
113   gpointer	v_symbol;
114   gchar		*v_identifier;
115   gulong	v_binary;
116   gulong	v_octal;
117   gulong	v_int;
118   guint64       v_int64;
119   gdouble	v_float;
120   gulong	v_hex;
121   gchar		*v_string;
122   gchar		*v_comment;
123   guchar	v_char;
124   guint		v_error;
125 };
126 
127 struct	_GScannerConfig
128 {
129   /* Character sets
130    */
131   gchar		*cset_skip_characters;		/* default: " \t\n" */
132   gchar		*cset_identifier_first;
133   gchar		*cset_identifier_nth;
134   gchar		*cpair_comment_single;		/* default: "#\n" */
135 
136   /* Should symbol lookup work case sensitive?
137    */
138   guint		case_sensitive : 1;
139 
140   /* Boolean values to be adjusted "on the fly"
141    * to configure scanning behaviour.
142    */
143   guint		skip_comment_multi : 1;		/* C like comment */
144   guint		skip_comment_single : 1;	/* single line comment */
145   guint		scan_comment_multi : 1;		/* scan multi line comments? */
146   guint		scan_identifier : 1;
147   guint		scan_identifier_1char : 1;
148   guint		scan_identifier_NULL : 1;
149   guint		scan_symbols : 1;
150   guint		scan_binary : 1;
151   guint		scan_octal : 1;
152   guint		scan_float : 1;
153   guint		scan_hex : 1;			/* `0x0ff0' */
154   guint		scan_hex_dollar : 1;		/* `$0ff0' */
155   guint		scan_string_sq : 1;		/* string: 'anything' */
156   guint		scan_string_dq : 1;		/* string: "\\-escapes!\n" */
157   guint		numbers_2_int : 1;		/* bin, octal, hex => int */
158   guint		int_2_float : 1;		/* int => G_TOKEN_FLOAT? */
159   guint		identifier_2_string : 1;
160   guint		char_2_token : 1;		/* return G_TOKEN_CHAR? */
161   guint		symbol_2_token : 1;
162   guint		scope_0_fallback : 1;		/* try scope 0 on lookups? */
163   guint		store_int64 : 1; 		/* use value.v_int64 rather than v_int */
164   guint		padding_dummy;
165 };
166 
167 struct	_GScanner
168 {
169   /* unused fields */
170   gpointer		user_data;
171   guint			max_parse_errors;
172 
173   /* g_scanner_error() increments this field */
174   guint			parse_errors;
175 
176   /* name of input stream, featured by the default message handler */
177   const gchar		*input_name;
178 
179   /* quarked data */
180   GData			*qdata;
181 
182   /* link into the scanner configuration */
183   GScannerConfig	*config;
184 
185   /* fields filled in after g_scanner_get_next_token() */
186   GTokenType		token;
187   GTokenValue		value;
188   guint			line;
189   guint			position;
190 
191   /* fields filled in after g_scanner_peek_next_token() */
192   GTokenType		next_token;
193   GTokenValue		next_value;
194   guint			next_line;
195   guint			next_position;
196 
197   /* to be considered private */
198   GHashTable		*symbol_table;
199   gint			input_fd;
200   const gchar		*text;
201   const gchar		*text_end;
202   gchar			*buffer;
203   guint			scope_id;
204 
205   /* handler function for _warn and _error */
206   GScannerMsgFunc	msg_handler;
207 };
208 
209 GScanner*	g_scanner_new			(const GScannerConfig *config_templ);
210 void		g_scanner_destroy		(GScanner	*scanner);
211 void		g_scanner_input_file		(GScanner	*scanner,
212 						 gint		input_fd);
213 void		g_scanner_sync_file_offset	(GScanner	*scanner);
214 void		g_scanner_input_text		(GScanner	*scanner,
215 						 const	gchar	*text,
216 						 guint		text_len);
217 GTokenType	g_scanner_get_next_token	(GScanner	*scanner);
218 GTokenType	g_scanner_peek_next_token	(GScanner	*scanner);
219 GTokenType	g_scanner_cur_token		(GScanner	*scanner);
220 GTokenValue	g_scanner_cur_value		(GScanner	*scanner);
221 guint		g_scanner_cur_line		(GScanner	*scanner);
222 guint		g_scanner_cur_position		(GScanner	*scanner);
223 gboolean	g_scanner_eof			(GScanner	*scanner);
224 guint		g_scanner_set_scope		(GScanner	*scanner,
225 						 guint		 scope_id);
226 void		g_scanner_scope_add_symbol	(GScanner	*scanner,
227 						 guint		 scope_id,
228 						 const gchar	*symbol,
229 						 gpointer	value);
230 void		g_scanner_scope_remove_symbol	(GScanner	*scanner,
231 						 guint		 scope_id,
232 						 const gchar	*symbol);
233 gpointer	g_scanner_scope_lookup_symbol	(GScanner	*scanner,
234 						 guint		 scope_id,
235 						 const gchar	*symbol);
236 void		g_scanner_scope_foreach_symbol	(GScanner	*scanner,
237 						 guint		 scope_id,
238 						 GHFunc		 func,
239 						 gpointer	 user_data);
240 gpointer	g_scanner_lookup_symbol		(GScanner	*scanner,
241 						 const gchar	*symbol);
242 void		g_scanner_unexp_token		(GScanner	*scanner,
243 						 GTokenType	expected_token,
244 						 const gchar	*identifier_spec,
245 						 const gchar	*symbol_spec,
246 						 const gchar	*symbol_name,
247 						 const gchar	*message,
248 						 gint		 is_error);
249 void		g_scanner_error			(GScanner	*scanner,
250 						 const gchar	*format,
251 						 ...) G_GNUC_PRINTF (2,3);
252 void		g_scanner_warn			(GScanner	*scanner,
253 						 const gchar	*format,
254 						 ...) G_GNUC_PRINTF (2,3);
255 
256 #ifndef G_DISABLE_DEPRECATED
257 
258 /* keep downward source compatibility */
259 #define		g_scanner_add_symbol( scanner, symbol, value )	G_STMT_START { \
260   g_scanner_scope_add_symbol ((scanner), 0, (symbol), (value)); \
261 } G_STMT_END
262 #define		g_scanner_remove_symbol( scanner, symbol )	G_STMT_START { \
263   g_scanner_scope_remove_symbol ((scanner), 0, (symbol)); \
264 } G_STMT_END
265 #define		g_scanner_foreach_symbol( scanner, func, data )	G_STMT_START { \
266   g_scanner_scope_foreach_symbol ((scanner), 0, (func), (data)); \
267 } G_STMT_END
268 
269 /* The following two functions are deprecated and will be removed in
270  * the next major release. They do no good. */
271 #define g_scanner_freeze_symbol_table(scanner) ((void)0)
272 #define g_scanner_thaw_symbol_table(scanner) ((void)0)
273 
274 #endif /* G_DISABLE_DEPRECATED */
275 
276 G_END_DECLS
277 
278 #endif /* __G_SCANNER_H__ */
279