Branch data Line data Source code
1 : : #line 2 "scan_csv.cpp"
2 : :
3 : : #line 4 "scan_csv.cpp"
4 : :
5 : : #define YY_INT_ALIGNED short int
6 : :
7 : : /* A lexical scanner generated by flex */
8 : :
9 : : #define yy_create_buffer csv__create_buffer
10 : : #define yy_delete_buffer csv__delete_buffer
11 : : #define yy_flex_debug csv__flex_debug
12 : : #define yy_init_buffer csv__init_buffer
13 : : #define yy_flush_buffer csv__flush_buffer
14 : : #define yy_load_buffer_state csv__load_buffer_state
15 : : #define yy_switch_to_buffer csv__switch_to_buffer
16 : : #define yyin csv_in
17 : : #define yyleng csv_leng
18 : : #define yylex csv_lex
19 : : #define yylineno csv_lineno
20 : : #define yyout csv_out
21 : : #define yyrestart csv_restart
22 : : #define yytext csv_text
23 : : #define yywrap csv_wrap
24 : : #define yyalloc csv_alloc
25 : : #define yyrealloc csv_realloc
26 : : #define yyfree csv_free
27 : :
28 : : #define FLEX_SCANNER
29 : : #define YY_FLEX_MAJOR_VERSION 2
30 : : #define YY_FLEX_MINOR_VERSION 5
31 : : #define YY_FLEX_SUBMINOR_VERSION 37
32 : : #if YY_FLEX_SUBMINOR_VERSION > 0
33 : : #define FLEX_BETA
34 : : #endif
35 : :
36 : : /* First, we deal with platform-specific or compiler-specific issues. */
37 : :
38 : : /* begin standard C headers. */
39 : : #include <stdio.h>
40 : : #include <string.h>
41 : : #include <errno.h>
42 : : #include <stdlib.h>
43 : :
44 : : /* end standard C headers. */
45 : :
46 : : /* flex integer type definitions */
47 : :
48 : : #ifndef FLEXINT_H
49 : : #define FLEXINT_H
50 : :
51 : : /* C99 systems have <inttypes.h>. Non-C99 systems may or may not. */
52 : :
53 : : #if defined (__STDC_VERSION__) && __STDC_VERSION__ >= 199901L
54 : :
55 : : /* C99 says to define __STDC_LIMIT_MACROS before including stdint.h,
56 : : * if you want the limit (max/min) macros for int types.
57 : : */
58 : : #ifndef __STDC_LIMIT_MACROS
59 : : #define __STDC_LIMIT_MACROS 1
60 : : #endif
61 : :
62 : : #include <inttypes.h>
63 : : typedef int8_t flex_int8_t;
64 : : typedef uint8_t flex_uint8_t;
65 : : typedef int16_t flex_int16_t;
66 : : typedef uint16_t flex_uint16_t;
67 : : typedef int32_t flex_int32_t;
68 : : typedef uint32_t flex_uint32_t;
69 : : #else
70 : : typedef signed char flex_int8_t;
71 : : typedef short int flex_int16_t;
72 : : typedef int flex_int32_t;
73 : : typedef unsigned char flex_uint8_t;
74 : : typedef unsigned short int flex_uint16_t;
75 : : typedef unsigned int flex_uint32_t;
76 : :
77 : : /* Limits of integral types. */
78 : : #ifndef INT8_MIN
79 : : #define INT8_MIN (-128)
80 : : #endif
81 : : #ifndef INT16_MIN
82 : : #define INT16_MIN (-32767-1)
83 : : #endif
84 : : #ifndef INT32_MIN
85 : : #define INT32_MIN (-2147483647-1)
86 : : #endif
87 : : #ifndef INT8_MAX
88 : : #define INT8_MAX (127)
89 : : #endif
90 : : #ifndef INT16_MAX
91 : : #define INT16_MAX (32767)
92 : : #endif
93 : : #ifndef INT32_MAX
94 : : #define INT32_MAX (2147483647)
95 : : #endif
96 : : #ifndef UINT8_MAX
97 : : #define UINT8_MAX (255U)
98 : : #endif
99 : : #ifndef UINT16_MAX
100 : : #define UINT16_MAX (65535U)
101 : : #endif
102 : : #ifndef UINT32_MAX
103 : : #define UINT32_MAX (4294967295U)
104 : : #endif
105 : :
106 : : #endif /* ! C99 */
107 : :
108 : : #endif /* ! FLEXINT_H */
109 : :
110 : : #ifdef __cplusplus
111 : :
112 : : /* The "const" storage-class-modifier is valid. */
113 : : #define YY_USE_CONST
114 : :
115 : : #else /* ! __cplusplus */
116 : :
117 : : /* C99 requires __STDC__ to be defined as 1. */
118 : : #if defined (__STDC__)
119 : :
120 : : #define YY_USE_CONST
121 : :
122 : : #endif /* defined (__STDC__) */
123 : : #endif /* ! __cplusplus */
124 : :
125 : : #ifdef YY_USE_CONST
126 : : #define yyconst const
127 : : #else
128 : : #define yyconst
129 : : #endif
130 : :
131 : : /* Returned upon end-of-file. */
132 : : #define YY_NULL 0
133 : :
134 : : /* Promotes a possibly negative, possibly signed char to an unsigned
135 : : * integer for use as an array index. If the signed char is negative,
136 : : * we want to instead treat it as an 8-bit unsigned char, hence the
137 : : * double cast.
138 : : */
139 : : #define YY_SC_TO_UI(c) ((unsigned int) (unsigned char) c)
140 : :
141 : : /* Enter a start condition. This macro really ought to take a parameter,
142 : : * but we do it the disgusting crufty way forced on us by the ()-less
143 : : * definition of BEGIN.
144 : : */
145 : : #define BEGIN (yy_start) = 1 + 2 *
146 : :
147 : : /* Translate the current start state into a value that can be later handed
148 : : * to BEGIN to return to the state. The YYSTATE alias is for lex
149 : : * compatibility.
150 : : */
151 : : #define YY_START (((yy_start) - 1) / 2)
152 : : #define YYSTATE YY_START
153 : :
154 : : /* Action number for EOF rule of a given start state. */
155 : : #define YY_STATE_EOF(state) (YY_END_OF_BUFFER + state + 1)
156 : :
157 : : /* Special action meaning "start processing a new file". */
158 : : #define YY_NEW_FILE csv_restart(csv_in )
159 : :
160 : : #define YY_END_OF_BUFFER_CHAR 0
161 : :
162 : : /* Size of default input buffer. */
163 : : #ifndef YY_BUF_SIZE
164 : : #define YY_BUF_SIZE 16384
165 : : #endif
166 : :
167 : : /* The state buf must be large enough to hold one state per character in the main buffer.
168 : : */
169 : : #define YY_STATE_BUF_SIZE ((YY_BUF_SIZE + 2) * sizeof(yy_state_type))
170 : :
171 : : #ifndef YY_TYPEDEF_YY_BUFFER_STATE
172 : : #define YY_TYPEDEF_YY_BUFFER_STATE
173 : : typedef struct yy_buffer_state *YY_BUFFER_STATE;
174 : : #endif
175 : :
176 : : #ifndef YY_TYPEDEF_YY_SIZE_T
177 : : #define YY_TYPEDEF_YY_SIZE_T
178 : : typedef size_t yy_size_t;
179 : : #endif
180 : :
181 : : extern yy_size_t csv_leng;
182 : :
183 : : extern FILE *csv_in, *csv_out;
184 : :
185 : : #define EOB_ACT_CONTINUE_SCAN 0
186 : : #define EOB_ACT_END_OF_FILE 1
187 : : #define EOB_ACT_LAST_MATCH 2
188 : :
189 : : /* Note: We specifically omit the test for yy_rule_can_match_eol because it requires
190 : : * access to the local variable yy_act. Since yyless() is a macro, it would break
191 : : * existing scanners that call yyless() from OUTSIDE csv_lex.
192 : : * One obvious solution it to make yy_act a global. I tried that, and saw
193 : : * a 5% performance hit in a non-csv_lineno scanner, because yy_act is
194 : : * normally declared as a register variable-- so it is not worth it.
195 : : */
196 : : #define YY_LESS_LINENO(n) \
197 : : do { \
198 : : int yyl;\
199 : : for ( yyl = n; yyl < csv_leng; ++yyl )\
200 : : if ( csv_text[yyl] == '\n' )\
201 : : --csv_lineno;\
202 : : }while(0)
203 : :
204 : : /* Return all but the first "n" matched characters back to the input stream. */
205 : : #define yyless(n) \
206 : : do \
207 : : { \
208 : : /* Undo effects of setting up csv_text. */ \
209 : : int yyless_macro_arg = (n); \
210 : : YY_LESS_LINENO(yyless_macro_arg);\
211 : : *yy_cp = (yy_hold_char); \
212 : : YY_RESTORE_YY_MORE_OFFSET \
213 : : (yy_c_buf_p) = yy_cp = yy_bp + yyless_macro_arg - YY_MORE_ADJ; \
214 : : YY_DO_BEFORE_ACTION; /* set up csv_text again */ \
215 : : } \
216 : : while ( 0 )
217 : :
218 : : #define unput(c) yyunput( c, (yytext_ptr) )
219 : :
220 : : #ifndef YY_STRUCT_YY_BUFFER_STATE
221 : : #define YY_STRUCT_YY_BUFFER_STATE
222 : : struct yy_buffer_state
223 : : {
224 : : FILE *yy_input_file;
225 : :
226 : : char *yy_ch_buf; /* input buffer */
227 : : char *yy_buf_pos; /* current position in input buffer */
228 : :
229 : : /* Size of input buffer in bytes, not including room for EOB
230 : : * characters.
231 : : */
232 : : yy_size_t yy_buf_size;
233 : :
234 : : /* Number of characters read into yy_ch_buf, not including EOB
235 : : * characters.
236 : : */
237 : : yy_size_t yy_n_chars;
238 : :
239 : : /* Whether we "own" the buffer - i.e., we know we created it,
240 : : * and can realloc() it to grow it, and should free() it to
241 : : * delete it.
242 : : */
243 : : int yy_is_our_buffer;
244 : :
245 : : /* Whether this is an "interactive" input source; if so, and
246 : : * if we're using stdio for input, then we want to use getc()
247 : : * instead of fread(), to make sure we stop fetching input after
248 : : * each newline.
249 : : */
250 : : int yy_is_interactive;
251 : :
252 : : /* Whether we're considered to be at the beginning of a line.
253 : : * If so, '^' rules will be active on the next match, otherwise
254 : : * not.
255 : : */
256 : : int yy_at_bol;
257 : :
258 : : int yy_bs_lineno; /**< The line count. */
259 : : int yy_bs_column; /**< The column count. */
260 : :
261 : : /* Whether to try to fill the input buffer when we reach the
262 : : * end of it.
263 : : */
264 : : int yy_fill_buffer;
265 : :
266 : : int yy_buffer_status;
267 : :
268 : : #define YY_BUFFER_NEW 0
269 : : #define YY_BUFFER_NORMAL 1
270 : : /* When an EOF's been seen but there's still some text to process
271 : : * then we mark the buffer as YY_EOF_PENDING, to indicate that we
272 : : * shouldn't try reading from the input source any more. We might
273 : : * still have a bunch of tokens to match, though, because of
274 : : * possible backing-up.
275 : : *
276 : : * When we actually see the EOF, we change the status to "new"
277 : : * (via csv_restart()), so that the user can continue scanning by
278 : : * just pointing csv_in at a new input file.
279 : : */
280 : : #define YY_BUFFER_EOF_PENDING 2
281 : :
282 : : };
283 : : #endif /* !YY_STRUCT_YY_BUFFER_STATE */
284 : :
285 : : /* Stack of input buffers. */
286 : : static size_t yy_buffer_stack_top = 0; /**< index of top of stack. */
287 : : static size_t yy_buffer_stack_max = 0; /**< capacity of stack. */
288 : : static YY_BUFFER_STATE * yy_buffer_stack = 0; /**< Stack as an array. */
289 : :
290 : : /* We provide macros for accessing buffer states in case in the
291 : : * future we want to put the buffer states in a more general
292 : : * "scanner state".
293 : : *
294 : : * Returns the top of the stack, or NULL.
295 : : */
296 : : #define YY_CURRENT_BUFFER ( (yy_buffer_stack) \
297 : : ? (yy_buffer_stack)[(yy_buffer_stack_top)] \
298 : : : NULL)
299 : :
300 : : /* Same as previous macro, but useful when we know that the buffer stack is not
301 : : * NULL or when we need an lvalue. For internal use only.
302 : : */
303 : : #define YY_CURRENT_BUFFER_LVALUE (yy_buffer_stack)[(yy_buffer_stack_top)]
304 : :
305 : : /* yy_hold_char holds the character lost when csv_text is formed. */
306 : : static char yy_hold_char;
307 : : static yy_size_t yy_n_chars; /* number of characters read into yy_ch_buf */
308 : : yy_size_t csv_leng;
309 : :
310 : : /* Points to current character in buffer. */
311 : : static char *yy_c_buf_p = (char *) 0;
312 : : static int yy_init = 0; /* whether we need to initialize */
313 : : static int yy_start = 0; /* start state number */
314 : :
315 : : /* Flag which is used to allow csv_wrap()'s to do buffer switches
316 : : * instead of setting up a fresh csv_in. A bit of a hack ...
317 : : */
318 : : static int yy_did_buffer_switch_on_eof;
319 : :
320 : : void csv_restart (FILE *input_file );
321 : : void csv__switch_to_buffer (YY_BUFFER_STATE new_buffer );
322 : : YY_BUFFER_STATE csv__create_buffer (FILE *file,int size );
323 : : void csv__delete_buffer (YY_BUFFER_STATE b );
324 : : void csv__flush_buffer (YY_BUFFER_STATE b );
325 : : void csv_push_buffer_state (YY_BUFFER_STATE new_buffer );
326 : : void csv_pop_buffer_state (void );
327 : :
328 : : static void csv_ensure_buffer_stack (void );
329 : : static void csv__load_buffer_state (void );
330 : : static void csv__init_buffer (YY_BUFFER_STATE b,FILE *file );
331 : :
332 : : #define YY_FLUSH_BUFFER csv__flush_buffer(YY_CURRENT_BUFFER )
333 : :
334 : : YY_BUFFER_STATE csv__scan_buffer (char *base,yy_size_t size );
335 : : YY_BUFFER_STATE csv__scan_string (yyconst char *yy_str );
336 : : YY_BUFFER_STATE csv__scan_bytes (yyconst char *bytes,yy_size_t len );
337 : :
338 : : void *csv_alloc (yy_size_t );
339 : : void *csv_realloc (void *,yy_size_t );
340 : : void csv_free (void * );
341 : :
342 : : #define yy_new_buffer csv__create_buffer
343 : :
344 : : #define yy_set_interactive(is_interactive) \
345 : : { \
346 : : if ( ! YY_CURRENT_BUFFER ){ \
347 : : csv_ensure_buffer_stack (); \
348 : : YY_CURRENT_BUFFER_LVALUE = \
349 : : csv__create_buffer(csv_in,YY_BUF_SIZE ); \
350 : : } \
351 : : YY_CURRENT_BUFFER_LVALUE->yy_is_interactive = is_interactive; \
352 : : }
353 : :
354 : : #define yy_set_bol(at_bol) \
355 : : { \
356 : : if ( ! YY_CURRENT_BUFFER ){\
357 : : csv_ensure_buffer_stack (); \
358 : : YY_CURRENT_BUFFER_LVALUE = \
359 : : csv__create_buffer(csv_in,YY_BUF_SIZE ); \
360 : : } \
361 : : YY_CURRENT_BUFFER_LVALUE->yy_at_bol = at_bol; \
362 : : }
363 : :
364 : : #define YY_AT_BOL() (YY_CURRENT_BUFFER_LVALUE->yy_at_bol)
365 : :
366 : : /* Begin user sect3 */
367 : :
368 : : #define csv_wrap() 1
369 : : #define YY_SKIP_YYWRAP
370 : :
371 : : typedef unsigned char YY_CHAR;
372 : :
373 : : FILE *csv_in = (FILE *) 0, *csv_out = (FILE *) 0;
374 : :
375 : : typedef int yy_state_type;
376 : :
377 : : extern int csv_lineno;
378 : :
379 : : int csv_lineno = 1;
380 : :
381 : : extern char *csv_text;
382 : : #define yytext_ptr csv_text
383 : :
384 : : static yy_state_type yy_get_previous_state (void );
385 : : static yy_state_type yy_try_NUL_trans (yy_state_type current_state );
386 : : static int yy_get_next_buffer (void );
387 : : static void yy_fatal_error (yyconst char msg[] );
388 : :
389 : : /* Done after the current pattern has been matched and before the
390 : : * corresponding action - sets up csv_text.
391 : : */
392 : : #define YY_DO_BEFORE_ACTION \
393 : : (yytext_ptr) = yy_bp; \
394 : : csv_leng = (size_t) (yy_cp - yy_bp); \
395 : : (yy_hold_char) = *yy_cp; \
396 : : *yy_cp = '\0'; \
397 : : (yy_c_buf_p) = yy_cp;
398 : :
399 : : #define YY_NUM_RULES 12
400 : : #define YY_END_OF_BUFFER 13
401 : : /* This struct is not used in this scanner,
402 : : but its presence is necessary. */
403 : : struct yy_trans_info
404 : : {
405 : : flex_int32_t yy_verify;
406 : : flex_int32_t yy_nxt;
407 : : };
408 : : static yyconst flex_int16_t yy_accept[46] =
409 : : { 0,
410 : : 0, 0, 0, 0, 4, 4, 13, 9, 7, 2,
411 : : 9, 1, 9, 9, 8, 3, 10, 7, 11, 10,
412 : : 4, 4, 6, 12, 5, 2, 0, 8, 8, 0,
413 : : 3, 0, 11, 4, 6, 0, 0, 8, 0, 0,
414 : : 8, 0, 0, 3, 0
415 : : } ;
416 : :
417 : : static yyconst flex_int32_t yy_ec[256] =
418 : : { 0,
419 : : 1, 1, 1, 1, 1, 1, 1, 1, 2, 3,
420 : : 1, 1, 4, 1, 1, 1, 1, 1, 1, 1,
421 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
422 : : 1, 2, 1, 5, 1, 1, 1, 1, 1, 1,
423 : : 1, 1, 6, 7, 6, 8, 1, 9, 9, 9,
424 : : 9, 9, 9, 9, 9, 9, 9, 1, 10, 1,
425 : : 1, 1, 1, 1, 11, 11, 11, 11, 12, 11,
426 : : 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
427 : : 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
428 : : 13, 1, 14, 1, 11, 1, 11, 11, 11, 11,
429 : :
430 : : 12, 11, 11, 11, 11, 11, 11, 11, 11, 11,
431 : : 11, 11, 11, 11, 11, 11, 11, 11, 11, 11,
432 : : 11, 11, 1, 1, 1, 1, 1, 1, 1, 1,
433 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
434 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
435 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
436 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
437 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
438 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
439 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
440 : :
441 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
442 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
443 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
444 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
445 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
446 : : 1, 1, 1, 1, 1
447 : : } ;
448 : :
449 : : static yyconst flex_int32_t yy_meta[15] =
450 : : { 0,
451 : : 1, 1, 2, 2, 2, 1, 1, 3, 3, 1,
452 : : 3, 3, 3, 1
453 : : } ;
454 : :
455 : : static yyconst flex_int16_t yy_base[49] =
456 : : { 0,
457 : : 0, 0, 13, 22, 32, 0, 73, 74, 74, 74,
458 : : 69, 74, 10, 62, 39, 57, 74, 74, 74, 66,
459 : : 0, 0, 74, 65, 74, 74, 58, 0, 18, 22,
460 : : 53, 55, 74, 0, 74, 43, 49, 48, 46, 47,
461 : : 41, 13, 45, 74, 74, 59, 18, 62
462 : : } ;
463 : :
464 : : static yyconst flex_int16_t yy_def[49] =
465 : : { 0,
466 : : 45, 1, 46, 46, 45, 5, 45, 45, 45, 45,
467 : : 45, 45, 45, 45, 45, 47, 45, 45, 45, 45,
468 : : 48, 48, 45, 45, 45, 45, 45, 15, 45, 45,
469 : : 47, 45, 45, 48, 45, 45, 45, 45, 45, 45,
470 : : 45, 45, 45, 45, 0, 45, 45, 45
471 : : } ;
472 : :
473 : : static yyconst flex_int16_t yy_nxt[89] =
474 : : { 0,
475 : : 8, 9, 10, 11, 12, 13, 9, 14, 15, 9,
476 : : 16, 16, 8, 8, 18, 19, 20, 27, 28, 18,
477 : : 31, 43, 18, 18, 19, 20, 29, 37, 18, 36,
478 : : 38, 18, 21, 22, 23, 24, 25, 21, 22, 21,
479 : : 21, 22, 21, 21, 21, 21, 27, 28, 40, 41,
480 : : 30, 41, 42, 43, 39, 41, 38, 38, 44, 17,
481 : : 17, 17, 34, 39, 34, 32, 29, 35, 33, 32,
482 : : 29, 26, 45, 7, 45, 45, 45, 45, 45, 45,
483 : : 45, 45, 45, 45, 45, 45, 45, 45
484 : : } ;
485 : :
486 : : static yyconst flex_int16_t yy_chk[89] =
487 : : { 0,
488 : : 1, 1, 1, 1, 1, 1, 1, 1, 1, 1,
489 : : 1, 1, 1, 1, 3, 3, 3, 13, 13, 3,
490 : : 47, 42, 3, 4, 4, 4, 29, 30, 4, 29,
491 : : 30, 4, 5, 5, 5, 5, 5, 5, 5, 5,
492 : : 5, 5, 5, 5, 5, 5, 15, 15, 36, 41,
493 : : 15, 36, 39, 43, 39, 40, 38, 37, 43, 46,
494 : : 46, 46, 48, 32, 48, 31, 27, 24, 20, 16,
495 : : 14, 11, 7, 45, 45, 45, 45, 45, 45, 45,
496 : : 45, 45, 45, 45, 45, 45, 45, 45
497 : : } ;
498 : :
499 : : /* Table of booleans, true if rule could match eol. */
500 : : static yyconst flex_int32_t yy_rule_can_match_eol[13] =
501 : : { 0,
502 : : 0, 1, 0, 0, 0, 1, 0, 0, 0, 0, 1, 0, };
503 : :
504 : : static yy_state_type yy_last_accepting_state;
505 : : static char *yy_last_accepting_cpos;
506 : :
507 : : extern int csv__flex_debug;
508 : : int csv__flex_debug = 0;
509 : :
510 : : /* The intent behind this definition is that it'll catch
511 : : * any uses of REJECT which flex missed.
512 : : */
513 : : #define REJECT reject_used_but_not_detected
514 : : #define yymore() yymore_used_but_not_detected
515 : : #define YY_MORE_ADJ 0
516 : : #define YY_RESTORE_YY_MORE_OFFSET
517 : : char *csv_text;
518 : : #line 1 "scan_csv.l"
519 : : /* -*-c-*- */
520 : : #line 4 "scan_csv.l"
521 : : /*
522 : : * scan_csv.l - scanner for CSV files
523 : : *
524 : : * Copyright (C) 2007 Stefan Jahn <stefan@lkcc.org>
525 : : *
526 : : * This is free software; you can redistribute it and/or modify
527 : : * it under the terms of the GNU General Public License as published by
528 : : * the Free Software Foundation; either version 2, or (at your option)
529 : : * any later version.
530 : : *
531 : : * This software is distributed in the hope that it will be useful,
532 : : * but WITHOUT ANY WARRANTY; without even the implied warranty of
533 : : * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
534 : : * GNU General Public License for more details.
535 : : *
536 : : * You should have received a copy of the GNU General Public License
537 : : * along with this package; see the file COPYING. If not, write to
538 : : * the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor,
539 : : * Boston, MA 02110-1301, USA.
540 : : *
541 : : * $Id$
542 : : *
543 : : */
544 : :
545 : : #if HAVE_CONFIG_H
546 : : # include <config.h>
547 : : #endif
548 : :
549 : : #include <stdio.h>
550 : : #include <stdlib.h>
551 : : #include <string.h>
552 : : #include <ctype.h>
553 : :
554 : : #ifdef __MINGW32__
555 : : #include <io.h>
556 : : #endif
557 : :
558 : : #ifdef HAVE_UNISTD_H
559 : : #include <unistd.h>
560 : : #endif
561 : :
562 : : #include "logging.h"
563 : : #include "complex.h"
564 : : #include "object.h"
565 : : #include "vector.h"
566 : : #include "dataset.h"
567 : : #include "check_csv.h"
568 : : #include "tokens_csv.h"
569 : :
570 : : using namespace qucs;
571 : :
572 : :
573 : : #line 574 "scan_csv.cpp"
574 : :
575 : : #define INITIAL 0
576 : : #define COMMENT 1
577 : : #define IDENT 2
578 : :
579 : : #ifndef YY_EXTRA_TYPE
580 : : #define YY_EXTRA_TYPE void *
581 : : #endif
582 : :
583 : : static int yy_init_globals (void );
584 : :
585 : : /* Accessor methods to globals.
586 : : These are made visible to non-reentrant scanners for convenience. */
587 : :
588 : : int csv_lex_destroy (void );
589 : :
590 : : int csv_get_debug (void );
591 : :
592 : : void csv_set_debug (int debug_flag );
593 : :
594 : : YY_EXTRA_TYPE csv_get_extra (void );
595 : :
596 : : void csv_set_extra (YY_EXTRA_TYPE user_defined );
597 : :
598 : : FILE *csv_get_in (void );
599 : :
600 : : void csv_set_in (FILE * in_str );
601 : :
602 : : FILE *csv_get_out (void );
603 : :
604 : : void csv_set_out (FILE * out_str );
605 : :
606 : : yy_size_t csv_get_leng (void );
607 : :
608 : : char *csv_get_text (void );
609 : :
610 : : int csv_get_lineno (void );
611 : :
612 : : void csv_set_lineno (int line_number );
613 : :
614 : : /* Macros after this point can all be overridden by user definitions in
615 : : * section 1.
616 : : */
617 : :
618 : : #ifndef YY_SKIP_YYWRAP
619 : : #ifdef __cplusplus
620 : : extern "C" int csv_wrap (void );
621 : : #else
622 : : extern int csv_wrap (void );
623 : : #endif
624 : : #endif
625 : :
626 : : #ifndef yytext_ptr
627 : : static void yy_flex_strncpy (char *,yyconst char *,int );
628 : : #endif
629 : :
630 : : #ifdef YY_NEED_STRLEN
631 : : static int yy_flex_strlen (yyconst char * );
632 : : #endif
633 : :
634 : : #ifndef YY_NO_INPUT
635 : :
636 : : #ifdef __cplusplus
637 : : static int yyinput (void );
638 : : #else
639 : : static int input (void );
640 : : #endif
641 : :
642 : : #endif
643 : :
644 : : /* Amount of stuff to slurp up with each read. */
645 : : #ifndef YY_READ_BUF_SIZE
646 : : #define YY_READ_BUF_SIZE 8192
647 : : #endif
648 : :
649 : : /* Copy whatever the last rule matched to the standard output. */
650 : : #ifndef ECHO
651 : : /* This used to be an fputs(), but since the string might contain NUL's,
652 : : * we now use fwrite().
653 : : */
654 : : #define ECHO do { if (fwrite( csv_text, csv_leng, 1, csv_out )) {} } while (0)
655 : : #endif
656 : :
657 : : /* Gets input and stuffs it into "buf". number of characters read, or YY_NULL,
658 : : * is returned in "result".
659 : : */
660 : : #ifndef YY_INPUT
661 : : #define YY_INPUT(buf,result,max_size) \
662 : : if ( YY_CURRENT_BUFFER_LVALUE->yy_is_interactive ) \
663 : : { \
664 : : int c = '*'; \
665 : : size_t n; \
666 : : for ( n = 0; n < max_size && \
667 : : (c = getc( csv_in )) != EOF && c != '\n'; ++n ) \
668 : : buf[n] = (char) c; \
669 : : if ( c == '\n' ) \
670 : : buf[n++] = (char) c; \
671 : : if ( c == EOF && ferror( csv_in ) ) \
672 : : YY_FATAL_ERROR( "input in flex scanner failed" ); \
673 : : result = n; \
674 : : } \
675 : : else \
676 : : { \
677 : : errno=0; \
678 : : while ( (result = fread(buf, 1, max_size, csv_in))==0 && ferror(csv_in)) \
679 : : { \
680 : : if( errno != EINTR) \
681 : : { \
682 : : YY_FATAL_ERROR( "input in flex scanner failed" ); \
683 : : break; \
684 : : } \
685 : : errno=0; \
686 : : clearerr(csv_in); \
687 : : } \
688 : : }\
689 : : \
690 : :
691 : : #endif
692 : :
693 : : /* No semi-colon after return; correct usage is to write "yyterminate();" -
694 : : * we don't want an extra ';' after the "return" because that will cause
695 : : * some compilers to complain about unreachable statements.
696 : : */
697 : : #ifndef yyterminate
698 : : #define yyterminate() return YY_NULL
699 : : #endif
700 : :
701 : : /* Number of entries by which start-condition stack grows. */
702 : : #ifndef YY_START_STACK_INCR
703 : : #define YY_START_STACK_INCR 25
704 : : #endif
705 : :
706 : : /* Report a fatal error. */
707 : : #ifndef YY_FATAL_ERROR
708 : : #define YY_FATAL_ERROR(msg) yy_fatal_error( msg )
709 : : #endif
710 : :
711 : : /* end tables serialization structures and prototypes */
712 : :
713 : : /* Default declaration of generated scanner - a define so the user can
714 : : * easily add parameters.
715 : : */
716 : : #ifndef YY_DECL
717 : : #define YY_DECL_IS_OURS 1
718 : :
719 : : extern int csv_lex (void);
720 : :
721 : : #define YY_DECL int csv_lex (void)
722 : : #endif /* !YY_DECL */
723 : :
724 : : /* Code executed at the beginning of each rule, after csv_text and csv_leng
725 : : * have been set up.
726 : : */
727 : : #ifndef YY_USER_ACTION
728 : : #define YY_USER_ACTION
729 : : #endif
730 : :
731 : : /* Code executed at the end of each rule. */
732 : : #ifndef YY_BREAK
733 : : #define YY_BREAK break;
734 : : #endif
735 : :
736 : : #define YY_RULE_SETUP \
737 : : YY_USER_ACTION
738 : :
739 : : /** The main scanner function which does all the work.
740 : : */
741 : 0 : YY_DECL
742 : : {
743 : : register yy_state_type yy_current_state;
744 : : register char *yy_cp, *yy_bp;
745 : : register int yy_act;
746 : :
747 : : #line 72 "scan_csv.l"
748 : :
749 : :
750 : : #line 751 "scan_csv.cpp"
751 : :
752 [ # # ]: 0 : if ( !(yy_init) )
753 : : {
754 : 0 : (yy_init) = 1;
755 : :
756 : : #ifdef YY_USER_INIT
757 : : YY_USER_INIT;
758 : : #endif
759 : :
760 [ # # ]: 0 : if ( ! (yy_start) )
761 : 0 : (yy_start) = 1; /* first start state */
762 : :
763 [ # # ]: 0 : if ( ! csv_in )
764 : 0 : csv_in = stdin;
765 : :
766 [ # # ]: 0 : if ( ! csv_out )
767 : 0 : csv_out = stdout;
768 : :
769 [ # # ][ # # ]: 0 : if ( ! YY_CURRENT_BUFFER ) {
770 : 0 : csv_ensure_buffer_stack ();
771 : 0 : YY_CURRENT_BUFFER_LVALUE =
772 : 0 : csv__create_buffer(csv_in,YY_BUF_SIZE );
773 : : }
774 : :
775 : 0 : csv__load_buffer_state( );
776 : : }
777 : :
778 : 0 : while ( 1 ) /* loops until end-of-file is reached */
779 : : {
780 : 0 : yy_cp = (yy_c_buf_p);
781 : :
782 : : /* Support of csv_text. */
783 : 0 : *yy_cp = (yy_hold_char);
784 : :
785 : : /* yy_bp points to the position in yy_ch_buf of the start of
786 : : * the current run.
787 : : */
788 : 0 : yy_bp = yy_cp;
789 : :
790 : 0 : yy_current_state = (yy_start);
791 : : yy_match:
792 [ # # ]: 0 : do
793 : : {
794 : 0 : register YY_CHAR yy_c = yy_ec[YY_SC_TO_UI(*yy_cp)];
795 [ # # ]: 0 : if ( yy_accept[yy_current_state] )
796 : : {
797 : 0 : (yy_last_accepting_state) = yy_current_state;
798 : 0 : (yy_last_accepting_cpos) = yy_cp;
799 : : }
800 [ # # ]: 0 : while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
801 : : {
802 : 0 : yy_current_state = (int) yy_def[yy_current_state];
803 [ # # ]: 0 : if ( yy_current_state >= 46 )
804 : 0 : yy_c = yy_meta[(unsigned int) yy_c];
805 : : }
806 : 0 : yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
807 : 0 : ++yy_cp;
808 : : }
809 : 0 : while ( yy_base[yy_current_state] != 74 );
810 : :
811 : : yy_find_action:
812 : 0 : yy_act = yy_accept[yy_current_state];
813 [ # # ]: 0 : if ( yy_act == 0 )
814 : : { /* have to back up */
815 : 0 : yy_cp = (yy_last_accepting_cpos);
816 : 0 : yy_current_state = (yy_last_accepting_state);
817 : 0 : yy_act = yy_accept[yy_current_state];
818 : : }
819 : :
820 : 0 : YY_DO_BEFORE_ACTION;
821 : :
822 [ # # ][ # # ]: 0 : if ( yy_act != YY_END_OF_BUFFER && yy_rule_can_match_eol[yy_act] )
823 : : {
824 : : int yyl;
825 [ # # ]: 0 : for ( yyl = 0; yyl < csv_leng; ++yyl )
826 [ # # ]: 0 : if ( csv_text[yyl] == '\n' )
827 : :
828 : 0 : csv_lineno++;
829 : : ;
830 : : }
831 : :
832 : : do_action: /* This label is used only to access EOF actions. */
833 : :
834 [ # # # # : 0 : switch ( yy_act )
# # # # #
# # # # #
# # ]
835 : : { /* beginning of action switch */
836 : : case 0: /* must back up */
837 : : /* undo the effects of YY_DO_BEFORE_ACTION */
838 : 0 : *yy_cp = (yy_hold_char);
839 : 0 : yy_cp = (yy_last_accepting_cpos);
840 : 0 : yy_current_state = (yy_last_accepting_state);
841 : 0 : goto yy_find_action;
842 : :
843 : : case 1:
844 : : YY_RULE_SETUP
845 : : #line 74 "scan_csv.l"
846 : : { BEGIN(IDENT); /* pass the '"' to the parser */ return '"'; }
847 : : YY_BREAK
848 : : case 2:
849 : : /* rule 2 can match eol */
850 : : YY_RULE_SETUP
851 : : #line 75 "scan_csv.l"
852 : : { /* detect end of line */ return Eol; }
853 : : YY_BREAK
854 : : case 3:
855 : : YY_RULE_SETUP
856 : : #line 77 "scan_csv.l"
857 : : { /* identify identifier */
858 : : csv_lval.ident = strdup (csv_text);
859 : : return Identifier;
860 : : }
861 : : YY_BREAK
862 : : case 4:
863 : : YY_RULE_SETUP
864 : : #line 82 "scan_csv.l"
865 : : { /* identify identifier */
866 : : csv_lval.ident = strdup (csv_text);
867 : : return Identifier;
868 : : }
869 : : YY_BREAK
870 : : case 5:
871 : : YY_RULE_SETUP
872 : : #line 87 "scan_csv.l"
873 : : { BEGIN(INITIAL); return '"'; }
874 : : YY_BREAK
875 : : case 6:
876 : : /* rule 6 can match eol */
877 : : YY_RULE_SETUP
878 : : #line 88 "scan_csv.l"
879 : : { BEGIN(INITIAL); return Eol; }
880 : : YY_BREAK
881 : : case 7:
882 : : YY_RULE_SETUP
883 : : #line 90 "scan_csv.l"
884 : : /* skip spaces and separators */
885 : : YY_BREAK
886 : : case 8:
887 : : YY_RULE_SETUP
888 : : #line 92 "scan_csv.l"
889 : : { /* identify float */
890 : : csv_lval.f = strtod (csv_text, NULL);
891 : : return Float;
892 : : }
893 : : YY_BREAK
894 : : case 9:
895 : : YY_RULE_SETUP
896 : : #line 97 "scan_csv.l"
897 : : { /* any other character in invalid */
898 : : logprint (LOG_ERROR,
899 : : "line %d: syntax error, unrecognized character: `%s'\n",
900 : : csv_lineno, csv_text);
901 : : return InvalidCharacter;
902 : : }
903 : : YY_BREAK
904 : : case 10:
905 : : YY_RULE_SETUP
906 : : #line 104 "scan_csv.l"
907 : : { /* skip any character in here */ }
908 : : YY_BREAK
909 : : case 11:
910 : : /* rule 11 can match eol */
911 : : YY_RULE_SETUP
912 : : #line 105 "scan_csv.l"
913 : : { BEGIN(INITIAL); /* skipping ends here */ return Eol; }
914 : : YY_BREAK
915 : : case 12:
916 : : YY_RULE_SETUP
917 : : #line 107 "scan_csv.l"
918 : : ECHO;
919 : : YY_BREAK
920 : : #line 921 "scan_csv.cpp"
921 : : case YY_STATE_EOF(INITIAL):
922 : : case YY_STATE_EOF(COMMENT):
923 : : case YY_STATE_EOF(IDENT):
924 : 0 : yyterminate();
925 : :
926 : : case YY_END_OF_BUFFER:
927 : : {
928 : : /* Amount of text matched not including the EOB char. */
929 : 0 : int yy_amount_of_matched_text = (int) (yy_cp - (yytext_ptr)) - 1;
930 : :
931 : : /* Undo the effects of YY_DO_BEFORE_ACTION. */
932 : 0 : *yy_cp = (yy_hold_char);
933 : : YY_RESTORE_YY_MORE_OFFSET
934 : :
935 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_NEW )
936 : : {
937 : : /* We're scanning a new file or input source. It's
938 : : * possible that this happened because the user
939 : : * just pointed csv_in at a new source and called
940 : : * csv_lex(). If so, then we have to assure
941 : : * consistency between YY_CURRENT_BUFFER and our
942 : : * globals. Here is the right place to do so, because
943 : : * this is the first action (other than possibly a
944 : : * back-up) that will match for the new input source.
945 : : */
946 : 0 : (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
947 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_input_file = csv_in;
948 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buffer_status = YY_BUFFER_NORMAL;
949 : : }
950 : :
951 : : /* Note that here we test for yy_c_buf_p "<=" to the position
952 : : * of the first EOB in the buffer, since yy_c_buf_p will
953 : : * already have been incremented past the NUL character
954 : : * (since all states make transitions on EOB to the
955 : : * end-of-buffer state). Contrast this with the test
956 : : * in input().
957 : : */
958 [ # # ]: 0 : if ( (yy_c_buf_p) <= &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
959 : : { /* This was really a NUL. */
960 : : yy_state_type yy_next_state;
961 : :
962 : 0 : (yy_c_buf_p) = (yytext_ptr) + yy_amount_of_matched_text;
963 : :
964 : 0 : yy_current_state = yy_get_previous_state( );
965 : :
966 : : /* Okay, we're now positioned to make the NUL
967 : : * transition. We couldn't have
968 : : * yy_get_previous_state() go ahead and do it
969 : : * for us because it doesn't know how to deal
970 : : * with the possibility of jamming (and we don't
971 : : * want to build jamming into it because then it
972 : : * will run more slowly).
973 : : */
974 : :
975 : 0 : yy_next_state = yy_try_NUL_trans( yy_current_state );
976 : :
977 : 0 : yy_bp = (yytext_ptr) + YY_MORE_ADJ;
978 : :
979 [ # # ]: 0 : if ( yy_next_state )
980 : : {
981 : : /* Consume the NUL. */
982 : 0 : yy_cp = ++(yy_c_buf_p);
983 : 0 : yy_current_state = yy_next_state;
984 : 0 : goto yy_match;
985 : : }
986 : :
987 : : else
988 : : {
989 : 0 : yy_cp = (yy_c_buf_p);
990 : 0 : goto yy_find_action;
991 : : }
992 : : }
993 : :
994 [ # # # # ]: 0 : else switch ( yy_get_next_buffer( ) )
995 : : {
996 : : case EOB_ACT_END_OF_FILE:
997 : : {
998 : 0 : (yy_did_buffer_switch_on_eof) = 0;
999 : :
1000 : : if ( csv_wrap( ) )
1001 : : {
1002 : : /* Note: because we've taken care in
1003 : : * yy_get_next_buffer() to have set up
1004 : : * csv_text, we can now set up
1005 : : * yy_c_buf_p so that if some total
1006 : : * hoser (like flex itself) wants to
1007 : : * call the scanner after we return the
1008 : : * YY_NULL, it'll still work - another
1009 : : * YY_NULL will get returned.
1010 : : */
1011 : 0 : (yy_c_buf_p) = (yytext_ptr) + YY_MORE_ADJ;
1012 : :
1013 : 0 : yy_act = YY_STATE_EOF(YY_START);
1014 : 0 : goto do_action;
1015 : : }
1016 : :
1017 : : else
1018 : : {
1019 : : if ( ! (yy_did_buffer_switch_on_eof) )
1020 : : YY_NEW_FILE;
1021 : : }
1022 : : break;
1023 : : }
1024 : :
1025 : : case EOB_ACT_CONTINUE_SCAN:
1026 : : (yy_c_buf_p) =
1027 : 0 : (yytext_ptr) + yy_amount_of_matched_text;
1028 : :
1029 : 0 : yy_current_state = yy_get_previous_state( );
1030 : :
1031 : 0 : yy_cp = (yy_c_buf_p);
1032 : 0 : yy_bp = (yytext_ptr) + YY_MORE_ADJ;
1033 : 0 : goto yy_match;
1034 : :
1035 : : case EOB_ACT_LAST_MATCH:
1036 : : (yy_c_buf_p) =
1037 : 0 : &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)];
1038 : :
1039 : 0 : yy_current_state = yy_get_previous_state( );
1040 : :
1041 : 0 : yy_cp = (yy_c_buf_p);
1042 : 0 : yy_bp = (yytext_ptr) + YY_MORE_ADJ;
1043 : 0 : goto yy_find_action;
1044 : : }
1045 : 0 : break;
1046 : : }
1047 : :
1048 : : default:
1049 : : YY_FATAL_ERROR(
1050 : 0 : "fatal flex scanner internal error--no action found" );
1051 : : } /* end of action switch */
1052 : : } /* end of scanning one token */
1053 : : } /* end of csv_lex */
1054 : :
1055 : : /* yy_get_next_buffer - try to read in a new buffer
1056 : : *
1057 : : * Returns a code representing an action:
1058 : : * EOB_ACT_LAST_MATCH -
1059 : : * EOB_ACT_CONTINUE_SCAN - continue scanning from current position
1060 : : * EOB_ACT_END_OF_FILE - end of file
1061 : : */
1062 : 0 : static int yy_get_next_buffer (void)
1063 : : {
1064 : 0 : register char *dest = YY_CURRENT_BUFFER_LVALUE->yy_ch_buf;
1065 : 0 : register char *source = (yytext_ptr);
1066 : : register int number_to_move, i;
1067 : : int ret_val;
1068 : :
1069 [ # # ]: 0 : if ( (yy_c_buf_p) > &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] )
1070 : : YY_FATAL_ERROR(
1071 : 0 : "fatal flex scanner internal error--end of buffer missed" );
1072 : :
1073 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_fill_buffer == 0 )
1074 : : { /* Don't try to fill the buffer, so this is an EOF. */
1075 [ # # ]: 0 : if ( (yy_c_buf_p) - (yytext_ptr) - YY_MORE_ADJ == 1 )
1076 : : {
1077 : : /* We matched a single character, the EOB, so
1078 : : * treat this as a final EOF.
1079 : : */
1080 : 0 : return EOB_ACT_END_OF_FILE;
1081 : : }
1082 : :
1083 : : else
1084 : : {
1085 : : /* We matched some text prior to the EOB, first
1086 : : * process it.
1087 : : */
1088 : 0 : return EOB_ACT_LAST_MATCH;
1089 : : }
1090 : : }
1091 : :
1092 : : /* Try to read more data. */
1093 : :
1094 : : /* First move last chars to start of buffer. */
1095 : 0 : number_to_move = (int) ((yy_c_buf_p) - (yytext_ptr)) - 1;
1096 : :
1097 [ # # ]: 0 : for ( i = 0; i < number_to_move; ++i )
1098 : 0 : *(dest++) = *(source++);
1099 : :
1100 [ # # ]: 0 : if ( YY_CURRENT_BUFFER_LVALUE->yy_buffer_status == YY_BUFFER_EOF_PENDING )
1101 : : /* don't do the read, it's not guaranteed to return an EOF,
1102 : : * just force an EOF
1103 : : */
1104 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars) = 0;
1105 : :
1106 : : else
1107 : : {
1108 : : yy_size_t num_to_read =
1109 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buf_size - number_to_move - 1;
1110 : :
1111 [ # # ]: 0 : while ( num_to_read <= 0 )
1112 : : { /* Not enough room in the buffer - grow it. */
1113 : :
1114 : : /* just a shorter name for the current buffer */
1115 : 0 : YY_BUFFER_STATE b = YY_CURRENT_BUFFER_LVALUE;
1116 : :
1117 : : int yy_c_buf_p_offset =
1118 : 0 : (int) ((yy_c_buf_p) - b->yy_ch_buf);
1119 : :
1120 [ # # ]: 0 : if ( b->yy_is_our_buffer )
1121 : : {
1122 : 0 : yy_size_t new_size = b->yy_buf_size * 2;
1123 : :
1124 [ # # ]: 0 : if ( new_size <= 0 )
1125 : 0 : b->yy_buf_size += b->yy_buf_size / 8;
1126 : : else
1127 : 0 : b->yy_buf_size *= 2;
1128 : :
1129 : : b->yy_ch_buf = (char *)
1130 : : /* Include room in for 2 EOB chars. */
1131 : 0 : csv_realloc((void *) b->yy_ch_buf,b->yy_buf_size + 2 );
1132 : : }
1133 : : else
1134 : : /* Can't grow it, we don't own it. */
1135 : 0 : b->yy_ch_buf = 0;
1136 : :
1137 [ # # ]: 0 : if ( ! b->yy_ch_buf )
1138 : : YY_FATAL_ERROR(
1139 : 0 : "fatal error - scanner input buffer overflow" );
1140 : :
1141 : 0 : (yy_c_buf_p) = &b->yy_ch_buf[yy_c_buf_p_offset];
1142 : :
1143 : 0 : num_to_read = YY_CURRENT_BUFFER_LVALUE->yy_buf_size -
1144 : 0 : number_to_move - 1;
1145 : :
1146 : : }
1147 : :
1148 [ # # ]: 0 : if ( num_to_read > YY_READ_BUF_SIZE )
1149 : 0 : num_to_read = YY_READ_BUF_SIZE;
1150 : :
1151 : : /* Read in more data. */
1152 [ # # ][ # # ]: 0 : YY_INPUT( (&YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[number_to_move]),
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ][ # # ]
[ # # ]
1153 : : (yy_n_chars), num_to_read );
1154 : :
1155 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1156 : : }
1157 : :
1158 [ # # ]: 0 : if ( (yy_n_chars) == 0 )
1159 : : {
1160 [ # # ]: 0 : if ( number_to_move == YY_MORE_ADJ )
1161 : : {
1162 : 0 : ret_val = EOB_ACT_END_OF_FILE;
1163 : 0 : csv_restart(csv_in );
1164 : : }
1165 : :
1166 : : else
1167 : : {
1168 : 0 : ret_val = EOB_ACT_LAST_MATCH;
1169 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buffer_status =
1170 : 0 : YY_BUFFER_EOF_PENDING;
1171 : : }
1172 : : }
1173 : :
1174 : : else
1175 : 0 : ret_val = EOB_ACT_CONTINUE_SCAN;
1176 : :
1177 [ # # ]: 0 : if ((yy_size_t) ((yy_n_chars) + number_to_move) > YY_CURRENT_BUFFER_LVALUE->yy_buf_size) {
1178 : : /* Extend the array by 50%, plus the number we really need. */
1179 : 0 : yy_size_t new_size = (yy_n_chars) + number_to_move + ((yy_n_chars) >> 1);
1180 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_ch_buf = (char *) csv_realloc((void *) YY_CURRENT_BUFFER_LVALUE->yy_ch_buf,new_size );
1181 [ # # ]: 0 : if ( ! YY_CURRENT_BUFFER_LVALUE->yy_ch_buf )
1182 : 0 : YY_FATAL_ERROR( "out of dynamic memory in yy_get_next_buffer()" );
1183 : : }
1184 : :
1185 : 0 : (yy_n_chars) += number_to_move;
1186 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] = YY_END_OF_BUFFER_CHAR;
1187 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars) + 1] = YY_END_OF_BUFFER_CHAR;
1188 : :
1189 : 0 : (yytext_ptr) = &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[0];
1190 : :
1191 : 0 : return ret_val;
1192 : : }
1193 : :
1194 : : /* yy_get_previous_state - get the state just before the EOB char was reached */
1195 : :
1196 : 0 : static yy_state_type yy_get_previous_state (void)
1197 : : {
1198 : : register yy_state_type yy_current_state;
1199 : : register char *yy_cp;
1200 : :
1201 : 0 : yy_current_state = (yy_start);
1202 : :
1203 [ # # ]: 0 : for ( yy_cp = (yytext_ptr) + YY_MORE_ADJ; yy_cp < (yy_c_buf_p); ++yy_cp )
1204 : : {
1205 [ # # ]: 0 : register YY_CHAR yy_c = (*yy_cp ? yy_ec[YY_SC_TO_UI(*yy_cp)] : 1);
1206 [ # # ]: 0 : if ( yy_accept[yy_current_state] )
1207 : : {
1208 : 0 : (yy_last_accepting_state) = yy_current_state;
1209 : 0 : (yy_last_accepting_cpos) = yy_cp;
1210 : : }
1211 [ # # ]: 0 : while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1212 : : {
1213 : 0 : yy_current_state = (int) yy_def[yy_current_state];
1214 [ # # ]: 0 : if ( yy_current_state >= 46 )
1215 : 0 : yy_c = yy_meta[(unsigned int) yy_c];
1216 : : }
1217 : 0 : yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1218 : : }
1219 : :
1220 : 0 : return yy_current_state;
1221 : : }
1222 : :
1223 : : /* yy_try_NUL_trans - try to make a transition on the NUL character
1224 : : *
1225 : : * synopsis
1226 : : * next_state = yy_try_NUL_trans( current_state );
1227 : : */
1228 : 0 : static yy_state_type yy_try_NUL_trans (yy_state_type yy_current_state )
1229 : : {
1230 : : register int yy_is_jam;
1231 : 0 : register char *yy_cp = (yy_c_buf_p);
1232 : :
1233 : 0 : register YY_CHAR yy_c = 1;
1234 [ # # ]: 0 : if ( yy_accept[yy_current_state] )
1235 : : {
1236 : 0 : (yy_last_accepting_state) = yy_current_state;
1237 : 0 : (yy_last_accepting_cpos) = yy_cp;
1238 : : }
1239 [ # # ]: 0 : while ( yy_chk[yy_base[yy_current_state] + yy_c] != yy_current_state )
1240 : : {
1241 : 0 : yy_current_state = (int) yy_def[yy_current_state];
1242 [ # # ]: 0 : if ( yy_current_state >= 46 )
1243 : 0 : yy_c = yy_meta[(unsigned int) yy_c];
1244 : : }
1245 : 0 : yy_current_state = yy_nxt[yy_base[yy_current_state] + (unsigned int) yy_c];
1246 : 0 : yy_is_jam = (yy_current_state == 45);
1247 : :
1248 [ # # ]: 0 : return yy_is_jam ? 0 : yy_current_state;
1249 : : }
1250 : :
1251 : : #ifndef YY_NO_INPUT
1252 : : #ifdef __cplusplus
1253 : 0 : static int yyinput (void)
1254 : : #else
1255 : : static int input (void)
1256 : : #endif
1257 : :
1258 : : {
1259 : : int c;
1260 : :
1261 : 0 : *(yy_c_buf_p) = (yy_hold_char);
1262 : :
1263 [ # # ]: 0 : if ( *(yy_c_buf_p) == YY_END_OF_BUFFER_CHAR )
1264 : : {
1265 : : /* yy_c_buf_p now points to the character we want to return.
1266 : : * If this occurs *before* the EOB characters, then it's a
1267 : : * valid NUL; if not, then we've hit the end of the buffer.
1268 : : */
1269 [ # # ]: 0 : if ( (yy_c_buf_p) < &YY_CURRENT_BUFFER_LVALUE->yy_ch_buf[(yy_n_chars)] )
1270 : : /* This was really a NUL. */
1271 : 0 : *(yy_c_buf_p) = '\0';
1272 : :
1273 : : else
1274 : : { /* need more input */
1275 : 0 : yy_size_t offset = (yy_c_buf_p) - (yytext_ptr);
1276 : 0 : ++(yy_c_buf_p);
1277 : :
1278 [ # # # # ]: 0 : switch ( yy_get_next_buffer( ) )
1279 : : {
1280 : : case EOB_ACT_LAST_MATCH:
1281 : : /* This happens because yy_g_n_b()
1282 : : * sees that we've accumulated a
1283 : : * token and flags that we need to
1284 : : * try matching the token before
1285 : : * proceeding. But for input(),
1286 : : * there's no matching to consider.
1287 : : * So convert the EOB_ACT_LAST_MATCH
1288 : : * to EOB_ACT_END_OF_FILE.
1289 : : */
1290 : :
1291 : : /* Reset buffer status. */
1292 : 0 : csv_restart(csv_in );
1293 : :
1294 : : /*FALLTHROUGH*/
1295 : :
1296 : : case EOB_ACT_END_OF_FILE:
1297 : : {
1298 : : if ( csv_wrap( ) )
1299 : 0 : return EOF;
1300 : :
1301 : : if ( ! (yy_did_buffer_switch_on_eof) )
1302 : : YY_NEW_FILE;
1303 : : #ifdef __cplusplus
1304 : : return yyinput();
1305 : : #else
1306 : : return input();
1307 : : #endif
1308 : : }
1309 : :
1310 : : case EOB_ACT_CONTINUE_SCAN:
1311 : 0 : (yy_c_buf_p) = (yytext_ptr) + offset;
1312 : 0 : break;
1313 : : }
1314 : : }
1315 : : }
1316 : :
1317 : 0 : c = *(unsigned char *) (yy_c_buf_p); /* cast for 8-bit char's */
1318 : 0 : *(yy_c_buf_p) = '\0'; /* preserve csv_text */
1319 : 0 : (yy_hold_char) = *++(yy_c_buf_p);
1320 : :
1321 [ # # ]: 0 : if ( c == '\n' )
1322 : :
1323 : 0 : csv_lineno++;
1324 : : ;
1325 : :
1326 : 0 : return c;
1327 : : }
1328 : : #endif /* ifndef YY_NO_INPUT */
1329 : :
1330 : : /** Immediately switch to a different input stream.
1331 : : * @param input_file A readable stream.
1332 : : *
1333 : : * @note This function does not reset the start condition to @c INITIAL .
1334 : : */
1335 : 0 : void csv_restart (FILE * input_file )
1336 : : {
1337 : :
1338 [ # # ][ # # ]: 0 : if ( ! YY_CURRENT_BUFFER ){
1339 : 0 : csv_ensure_buffer_stack ();
1340 : 0 : YY_CURRENT_BUFFER_LVALUE =
1341 : 0 : csv__create_buffer(csv_in,YY_BUF_SIZE );
1342 : : }
1343 : :
1344 [ # # ]: 0 : csv__init_buffer(YY_CURRENT_BUFFER,input_file );
1345 : 0 : csv__load_buffer_state( );
1346 : 0 : }
1347 : :
1348 : : /** Switch to a different input buffer.
1349 : : * @param new_buffer The new input buffer.
1350 : : *
1351 : : */
1352 : 0 : void csv__switch_to_buffer (YY_BUFFER_STATE new_buffer )
1353 : : {
1354 : :
1355 : : /* TODO. We should be able to replace this entire function body
1356 : : * with
1357 : : * csv_pop_buffer_state();
1358 : : * csv_push_buffer_state(new_buffer);
1359 : : */
1360 : 0 : csv_ensure_buffer_stack ();
1361 [ # # ][ # # ]: 0 : if ( YY_CURRENT_BUFFER == new_buffer )
1362 : 0 : return;
1363 : :
1364 [ # # ][ # # ]: 0 : if ( YY_CURRENT_BUFFER )
1365 : : {
1366 : : /* Flush out information for old buffer. */
1367 : 0 : *(yy_c_buf_p) = (yy_hold_char);
1368 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1369 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1370 : : }
1371 : :
1372 : 0 : YY_CURRENT_BUFFER_LVALUE = new_buffer;
1373 : 0 : csv__load_buffer_state( );
1374 : :
1375 : : /* We don't actually know whether we did this switch during
1376 : : * EOF (csv_wrap()) processing, but the only time this flag
1377 : : * is looked at is after csv_wrap() is called, so it's safe
1378 : : * to go ahead and always set it.
1379 : : */
1380 : 0 : (yy_did_buffer_switch_on_eof) = 1;
1381 : : }
1382 : :
1383 : 0 : static void csv__load_buffer_state (void)
1384 : : {
1385 : 0 : (yy_n_chars) = YY_CURRENT_BUFFER_LVALUE->yy_n_chars;
1386 : 0 : (yytext_ptr) = (yy_c_buf_p) = YY_CURRENT_BUFFER_LVALUE->yy_buf_pos;
1387 : 0 : csv_in = YY_CURRENT_BUFFER_LVALUE->yy_input_file;
1388 : 0 : (yy_hold_char) = *(yy_c_buf_p);
1389 : 0 : }
1390 : :
1391 : : /** Allocate and initialize an input buffer state.
1392 : : * @param file A readable stream.
1393 : : * @param size The character buffer size in bytes. When in doubt, use @c YY_BUF_SIZE.
1394 : : *
1395 : : * @return the allocated buffer state.
1396 : : */
1397 : 0 : YY_BUFFER_STATE csv__create_buffer (FILE * file, int size )
1398 : : {
1399 : : YY_BUFFER_STATE b;
1400 : :
1401 : 0 : b = (YY_BUFFER_STATE) csv_alloc(sizeof( struct yy_buffer_state ) );
1402 [ # # ]: 0 : if ( ! b )
1403 : 0 : YY_FATAL_ERROR( "out of dynamic memory in csv__create_buffer()" );
1404 : :
1405 : 0 : b->yy_buf_size = size;
1406 : :
1407 : : /* yy_ch_buf has to be 2 characters longer than the size given because
1408 : : * we need to put in 2 end-of-buffer characters.
1409 : : */
1410 : 0 : b->yy_ch_buf = (char *) csv_alloc(b->yy_buf_size + 2 );
1411 [ # # ]: 0 : if ( ! b->yy_ch_buf )
1412 : 0 : YY_FATAL_ERROR( "out of dynamic memory in csv__create_buffer()" );
1413 : :
1414 : 0 : b->yy_is_our_buffer = 1;
1415 : :
1416 : 0 : csv__init_buffer(b,file );
1417 : :
1418 : 0 : return b;
1419 : : }
1420 : :
1421 : : /** Destroy the buffer.
1422 : : * @param b a buffer created with csv__create_buffer()
1423 : : *
1424 : : */
1425 : 0 : void csv__delete_buffer (YY_BUFFER_STATE b )
1426 : : {
1427 : :
1428 [ # # ]: 0 : if ( ! b )
1429 : 0 : return;
1430 : :
1431 [ # # ][ # # ]: 0 : if ( b == YY_CURRENT_BUFFER ) /* Not sure if we should pop here. */
1432 : 0 : YY_CURRENT_BUFFER_LVALUE = (YY_BUFFER_STATE) 0;
1433 : :
1434 [ # # ]: 0 : if ( b->yy_is_our_buffer )
1435 : 0 : csv_free((void *) b->yy_ch_buf );
1436 : :
1437 : 0 : csv_free((void *) b );
1438 : : }
1439 : :
1440 : : /* Initializes or reinitializes a buffer.
1441 : : * This function is sometimes called more than once on the same buffer,
1442 : : * such as during a csv_restart() or at EOF.
1443 : : */
1444 : 0 : static void csv__init_buffer (YY_BUFFER_STATE b, FILE * file )
1445 : :
1446 : : {
1447 : 0 : int oerrno = errno;
1448 : :
1449 : 0 : csv__flush_buffer(b );
1450 : :
1451 : 0 : b->yy_input_file = file;
1452 : 0 : b->yy_fill_buffer = 1;
1453 : :
1454 : : /* If b is the current buffer, then csv__init_buffer was _probably_
1455 : : * called from csv_restart() or through yy_get_next_buffer.
1456 : : * In that case, we don't want to reset the lineno or column.
1457 : : */
1458 [ # # ][ # # ]: 0 : if (b != YY_CURRENT_BUFFER){
1459 : 0 : b->yy_bs_lineno = 1;
1460 : 0 : b->yy_bs_column = 0;
1461 : : }
1462 : :
1463 [ # # ][ # # ]: 0 : b->yy_is_interactive = file ? (isatty( fileno(file) ) > 0) : 0;
1464 : :
1465 : 0 : errno = oerrno;
1466 : 0 : }
1467 : :
1468 : : /** Discard all buffered characters. On the next scan, YY_INPUT will be called.
1469 : : * @param b the buffer state to be flushed, usually @c YY_CURRENT_BUFFER.
1470 : : *
1471 : : */
1472 : 0 : void csv__flush_buffer (YY_BUFFER_STATE b )
1473 : : {
1474 [ # # ]: 0 : if ( ! b )
1475 : 0 : return;
1476 : :
1477 : 0 : b->yy_n_chars = 0;
1478 : :
1479 : : /* We always need two end-of-buffer characters. The first causes
1480 : : * a transition to the end-of-buffer state. The second causes
1481 : : * a jam in that state.
1482 : : */
1483 : 0 : b->yy_ch_buf[0] = YY_END_OF_BUFFER_CHAR;
1484 : 0 : b->yy_ch_buf[1] = YY_END_OF_BUFFER_CHAR;
1485 : :
1486 : 0 : b->yy_buf_pos = &b->yy_ch_buf[0];
1487 : :
1488 : 0 : b->yy_at_bol = 1;
1489 : 0 : b->yy_buffer_status = YY_BUFFER_NEW;
1490 : :
1491 [ # # ][ # # ]: 0 : if ( b == YY_CURRENT_BUFFER )
1492 : 0 : csv__load_buffer_state( );
1493 : : }
1494 : :
1495 : : /** Pushes the new state onto the stack. The new state becomes
1496 : : * the current state. This function will allocate the stack
1497 : : * if necessary.
1498 : : * @param new_buffer The new state.
1499 : : *
1500 : : */
1501 : 0 : void csv_push_buffer_state (YY_BUFFER_STATE new_buffer )
1502 : : {
1503 [ # # ]: 0 : if (new_buffer == NULL)
1504 : 0 : return;
1505 : :
1506 : 0 : csv_ensure_buffer_stack();
1507 : :
1508 : : /* This block is copied from csv__switch_to_buffer. */
1509 [ # # ][ # # ]: 0 : if ( YY_CURRENT_BUFFER )
1510 : : {
1511 : : /* Flush out information for old buffer. */
1512 : 0 : *(yy_c_buf_p) = (yy_hold_char);
1513 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_buf_pos = (yy_c_buf_p);
1514 : 0 : YY_CURRENT_BUFFER_LVALUE->yy_n_chars = (yy_n_chars);
1515 : : }
1516 : :
1517 : : /* Only push if top exists. Otherwise, replace top. */
1518 [ # # ][ # # ]: 0 : if (YY_CURRENT_BUFFER)
1519 : 0 : (yy_buffer_stack_top)++;
1520 : 0 : YY_CURRENT_BUFFER_LVALUE = new_buffer;
1521 : :
1522 : : /* copied from csv__switch_to_buffer. */
1523 : 0 : csv__load_buffer_state( );
1524 : 0 : (yy_did_buffer_switch_on_eof) = 1;
1525 : : }
1526 : :
1527 : : /** Removes and deletes the top of the stack, if present.
1528 : : * The next element becomes the new top.
1529 : : *
1530 : : */
1531 : 0 : void csv_pop_buffer_state (void)
1532 : : {
1533 [ # # ][ # # ]: 0 : if (!YY_CURRENT_BUFFER)
1534 : 0 : return;
1535 : :
1536 [ # # ]: 0 : csv__delete_buffer(YY_CURRENT_BUFFER );
1537 : 0 : YY_CURRENT_BUFFER_LVALUE = NULL;
1538 [ # # ]: 0 : if ((yy_buffer_stack_top) > 0)
1539 : 0 : --(yy_buffer_stack_top);
1540 : :
1541 [ # # ][ # # ]: 0 : if (YY_CURRENT_BUFFER) {
1542 : 0 : csv__load_buffer_state( );
1543 : 0 : (yy_did_buffer_switch_on_eof) = 1;
1544 : : }
1545 : : }
1546 : :
1547 : : /* Allocates the stack if it does not exist.
1548 : : * Guarantees space for at least one push.
1549 : : */
1550 : 0 : static void csv_ensure_buffer_stack (void)
1551 : : {
1552 : : yy_size_t num_to_alloc;
1553 : :
1554 [ # # ]: 0 : if (!(yy_buffer_stack)) {
1555 : :
1556 : : /* First allocation is just for 2 elements, since we don't know if this
1557 : : * scanner will even need a stack. We use 2 instead of 1 to avoid an
1558 : : * immediate realloc on the next call.
1559 : : */
1560 : 0 : num_to_alloc = 1;
1561 : : (yy_buffer_stack) = (struct yy_buffer_state**)csv_alloc
1562 : : (num_to_alloc * sizeof(struct yy_buffer_state*)
1563 : 0 : );
1564 [ # # ]: 0 : if ( ! (yy_buffer_stack) )
1565 : 0 : YY_FATAL_ERROR( "out of dynamic memory in csv_ensure_buffer_stack()" );
1566 : :
1567 : 0 : memset((yy_buffer_stack), 0, num_to_alloc * sizeof(struct yy_buffer_state*));
1568 : :
1569 : 0 : (yy_buffer_stack_max) = num_to_alloc;
1570 : 0 : (yy_buffer_stack_top) = 0;
1571 : 0 : return;
1572 : : }
1573 : :
1574 [ # # ]: 0 : if ((yy_buffer_stack_top) >= ((yy_buffer_stack_max)) - 1){
1575 : :
1576 : : /* Increase the buffer to prepare for a possible push. */
1577 : 0 : int grow_size = 8 /* arbitrary grow size */;
1578 : :
1579 : 0 : num_to_alloc = (yy_buffer_stack_max) + grow_size;
1580 : : (yy_buffer_stack) = (struct yy_buffer_state**)csv_realloc
1581 : : ((yy_buffer_stack),
1582 : : num_to_alloc * sizeof(struct yy_buffer_state*)
1583 : 0 : );
1584 [ # # ]: 0 : if ( ! (yy_buffer_stack) )
1585 : 0 : YY_FATAL_ERROR( "out of dynamic memory in csv_ensure_buffer_stack()" );
1586 : :
1587 : : /* zero only the new slots.*/
1588 : 0 : memset((yy_buffer_stack) + (yy_buffer_stack_max), 0, grow_size * sizeof(struct yy_buffer_state*));
1589 : 0 : (yy_buffer_stack_max) = num_to_alloc;
1590 : : }
1591 : : }
1592 : :
1593 : : /** Setup the input buffer state to scan directly from a user-specified character buffer.
1594 : : * @param base the character buffer
1595 : : * @param size the size in bytes of the character buffer
1596 : : *
1597 : : * @return the newly allocated buffer state object.
1598 : : */
1599 : 0 : YY_BUFFER_STATE csv__scan_buffer (char * base, yy_size_t size )
1600 : : {
1601 : : YY_BUFFER_STATE b;
1602 : :
1603 [ # # ][ # # ]: 0 : if ( size < 2 ||
[ # # ]
1604 : 0 : base[size-2] != YY_END_OF_BUFFER_CHAR ||
1605 : 0 : base[size-1] != YY_END_OF_BUFFER_CHAR )
1606 : : /* They forgot to leave room for the EOB's. */
1607 : 0 : return 0;
1608 : :
1609 : 0 : b = (YY_BUFFER_STATE) csv_alloc(sizeof( struct yy_buffer_state ) );
1610 [ # # ]: 0 : if ( ! b )
1611 : 0 : YY_FATAL_ERROR( "out of dynamic memory in csv__scan_buffer()" );
1612 : :
1613 : 0 : b->yy_buf_size = size - 2; /* "- 2" to take care of EOB's */
1614 : 0 : b->yy_buf_pos = b->yy_ch_buf = base;
1615 : 0 : b->yy_is_our_buffer = 0;
1616 : 0 : b->yy_input_file = 0;
1617 : 0 : b->yy_n_chars = b->yy_buf_size;
1618 : 0 : b->yy_is_interactive = 0;
1619 : 0 : b->yy_at_bol = 1;
1620 : 0 : b->yy_fill_buffer = 0;
1621 : 0 : b->yy_buffer_status = YY_BUFFER_NEW;
1622 : :
1623 : 0 : csv__switch_to_buffer(b );
1624 : :
1625 : 0 : return b;
1626 : : }
1627 : :
1628 : : /** Setup the input buffer state to scan a string. The next call to csv_lex() will
1629 : : * scan from a @e copy of @a str.
1630 : : * @param yystr a NUL-terminated string to scan
1631 : : *
1632 : : * @return the newly allocated buffer state object.
1633 : : * @note If you want to scan bytes that may contain NUL values, then use
1634 : : * csv__scan_bytes() instead.
1635 : : */
1636 : 0 : YY_BUFFER_STATE csv__scan_string (yyconst char * yystr )
1637 : : {
1638 : :
1639 : 0 : return csv__scan_bytes(yystr,strlen(yystr) );
1640 : : }
1641 : :
1642 : : /** Setup the input buffer state to scan the given bytes. The next call to csv_lex() will
1643 : : * scan from a @e copy of @a bytes.
1644 : : * @param yybytes the byte buffer to scan
1645 : : * @param _yybytes_len the number of bytes in the buffer pointed to by @a bytes.
1646 : : *
1647 : : * @return the newly allocated buffer state object.
1648 : : */
1649 : 0 : YY_BUFFER_STATE csv__scan_bytes (yyconst char * yybytes, yy_size_t _yybytes_len )
1650 : : {
1651 : : YY_BUFFER_STATE b;
1652 : : char *buf;
1653 : : yy_size_t n;
1654 : : int i;
1655 : :
1656 : : /* Get memory for full buffer, including space for trailing EOB's. */
1657 : 0 : n = _yybytes_len + 2;
1658 : 0 : buf = (char *) csv_alloc(n );
1659 [ # # ]: 0 : if ( ! buf )
1660 : 0 : YY_FATAL_ERROR( "out of dynamic memory in csv__scan_bytes()" );
1661 : :
1662 [ # # ]: 0 : for ( i = 0; i < _yybytes_len; ++i )
1663 : 0 : buf[i] = yybytes[i];
1664 : :
1665 : 0 : buf[_yybytes_len] = buf[_yybytes_len+1] = YY_END_OF_BUFFER_CHAR;
1666 : :
1667 : 0 : b = csv__scan_buffer(buf,n );
1668 [ # # ]: 0 : if ( ! b )
1669 : 0 : YY_FATAL_ERROR( "bad buffer in csv__scan_bytes()" );
1670 : :
1671 : : /* It's okay to grow etc. this buffer, and we should throw it
1672 : : * away when we're done.
1673 : : */
1674 : 0 : b->yy_is_our_buffer = 1;
1675 : :
1676 : 0 : return b;
1677 : : }
1678 : :
1679 : : #ifndef YY_EXIT_FAILURE
1680 : : #define YY_EXIT_FAILURE 2
1681 : : #endif
1682 : :
1683 : 0 : static void yy_fatal_error (yyconst char* msg )
1684 : : {
1685 : 0 : (void) fprintf( stderr, "%s\n", msg );
1686 : 0 : exit( YY_EXIT_FAILURE );
1687 : : }
1688 : :
1689 : : /* Redefine yyless() so it works in section 3 code. */
1690 : :
1691 : : #undef yyless
1692 : : #define yyless(n) \
1693 : : do \
1694 : : { \
1695 : : /* Undo effects of setting up csv_text. */ \
1696 : : int yyless_macro_arg = (n); \
1697 : : YY_LESS_LINENO(yyless_macro_arg);\
1698 : : csv_text[csv_leng] = (yy_hold_char); \
1699 : : (yy_c_buf_p) = csv_text + yyless_macro_arg; \
1700 : : (yy_hold_char) = *(yy_c_buf_p); \
1701 : : *(yy_c_buf_p) = '\0'; \
1702 : : csv_leng = yyless_macro_arg; \
1703 : : } \
1704 : : while ( 0 )
1705 : :
1706 : : /* Accessor methods (get/set functions) to struct members. */
1707 : :
1708 : : /** Get the current line number.
1709 : : *
1710 : : */
1711 : 0 : int csv_get_lineno (void)
1712 : : {
1713 : :
1714 : 0 : return csv_lineno;
1715 : : }
1716 : :
1717 : : /** Get the input stream.
1718 : : *
1719 : : */
1720 : 0 : FILE *csv_get_in (void)
1721 : : {
1722 : 0 : return csv_in;
1723 : : }
1724 : :
1725 : : /** Get the output stream.
1726 : : *
1727 : : */
1728 : 0 : FILE *csv_get_out (void)
1729 : : {
1730 : 0 : return csv_out;
1731 : : }
1732 : :
1733 : : /** Get the length of the current token.
1734 : : *
1735 : : */
1736 : 0 : yy_size_t csv_get_leng (void)
1737 : : {
1738 : 0 : return csv_leng;
1739 : : }
1740 : :
1741 : : /** Get the current token.
1742 : : *
1743 : : */
1744 : :
1745 : 0 : char *csv_get_text (void)
1746 : : {
1747 : 0 : return csv_text;
1748 : : }
1749 : :
1750 : : /** Set the current line number.
1751 : : * @param line_number
1752 : : *
1753 : : */
1754 : 0 : void csv_set_lineno (int line_number )
1755 : : {
1756 : :
1757 : 0 : csv_lineno = line_number;
1758 : 0 : }
1759 : :
1760 : : /** Set the input stream. This does not discard the current
1761 : : * input buffer.
1762 : : * @param in_str A readable stream.
1763 : : *
1764 : : * @see csv__switch_to_buffer
1765 : : */
1766 : 0 : void csv_set_in (FILE * in_str )
1767 : : {
1768 : 0 : csv_in = in_str ;
1769 : 0 : }
1770 : :
1771 : 0 : void csv_set_out (FILE * out_str )
1772 : : {
1773 : 0 : csv_out = out_str ;
1774 : 0 : }
1775 : :
1776 : 0 : int csv_get_debug (void)
1777 : : {
1778 : 0 : return csv__flex_debug;
1779 : : }
1780 : :
1781 : 0 : void csv_set_debug (int bdebug )
1782 : : {
1783 : 0 : csv__flex_debug = bdebug ;
1784 : 0 : }
1785 : :
1786 : 0 : static int yy_init_globals (void)
1787 : : {
1788 : : /* Initialization is the same as for the non-reentrant scanner.
1789 : : * This function is called from csv_lex_destroy(), so don't allocate here.
1790 : : */
1791 : :
1792 : : /* We do not touch csv_lineno unless the option is enabled. */
1793 : 0 : csv_lineno = 1;
1794 : :
1795 : 0 : (yy_buffer_stack) = 0;
1796 : 0 : (yy_buffer_stack_top) = 0;
1797 : 0 : (yy_buffer_stack_max) = 0;
1798 : 0 : (yy_c_buf_p) = (char *) 0;
1799 : 0 : (yy_init) = 0;
1800 : 0 : (yy_start) = 0;
1801 : :
1802 : : /* Defined in main.c */
1803 : : #ifdef YY_STDINIT
1804 : : csv_in = stdin;
1805 : : csv_out = stdout;
1806 : : #else
1807 : 0 : csv_in = (FILE *) 0;
1808 : 0 : csv_out = (FILE *) 0;
1809 : : #endif
1810 : :
1811 : : /* For future reference: Set errno on error, since we are called by
1812 : : * csv_lex_init()
1813 : : */
1814 : 0 : return 0;
1815 : : }
1816 : :
1817 : : /* csv_lex_destroy is for both reentrant and non-reentrant scanners. */
1818 : 0 : int csv_lex_destroy (void)
1819 : : {
1820 : :
1821 : : /* Pop the buffer stack, destroying each element. */
1822 [ # # ][ # # ]: 0 : while(YY_CURRENT_BUFFER){
[ # # ]
1823 [ # # ]: 0 : csv__delete_buffer(YY_CURRENT_BUFFER );
1824 : 0 : YY_CURRENT_BUFFER_LVALUE = NULL;
1825 : 0 : csv_pop_buffer_state();
1826 : : }
1827 : :
1828 : : /* Destroy the stack itself. */
1829 : 0 : csv_free((yy_buffer_stack) );
1830 : 0 : (yy_buffer_stack) = NULL;
1831 : :
1832 : : /* Reset the globals. This is important in a non-reentrant scanner so the next time
1833 : : * csv_lex() is called, initialization will occur. */
1834 : 0 : yy_init_globals( );
1835 : :
1836 : 0 : return 0;
1837 : : }
1838 : :
1839 : : /*
1840 : : * Internal utility routines.
1841 : : */
1842 : :
1843 : : #ifndef yytext_ptr
1844 : : static void yy_flex_strncpy (char* s1, yyconst char * s2, int n )
1845 : : {
1846 : : register int i;
1847 : : for ( i = 0; i < n; ++i )
1848 : : s1[i] = s2[i];
1849 : : }
1850 : : #endif
1851 : :
1852 : : #ifdef YY_NEED_STRLEN
1853 : : static int yy_flex_strlen (yyconst char * s )
1854 : : {
1855 : : register int n;
1856 : : for ( n = 0; s[n]; ++n )
1857 : : ;
1858 : :
1859 : : return n;
1860 : : }
1861 : : #endif
1862 : :
1863 : 0 : void *csv_alloc (yy_size_t size )
1864 : : {
1865 : 0 : return (void *) malloc( size );
1866 : : }
1867 : :
1868 : 0 : void *csv_realloc (void * ptr, yy_size_t size )
1869 : : {
1870 : : /* The cast to (char *) in the following accommodates both
1871 : : * implementations that use char* generic pointers, and those
1872 : : * that use void* generic pointers. It works with the latter
1873 : : * because both ANSI C and C++ allow castless assignment from
1874 : : * any pointer type to void*, and deal with argument conversions
1875 : : * as though doing an assignment.
1876 : : */
1877 : 0 : return (void *) realloc( (char *) ptr, size );
1878 : : }
1879 : :
1880 : 0 : void csv_free (void * ptr )
1881 : : {
1882 : 0 : free( (char *) ptr ); /* see csv_realloc() for (char *) cast */
1883 : 0 : }
1884 : :
1885 : : #define YYTABLES_NAME "yytables"
1886 : :
1887 : : #line 107 "scan_csv.l"
1888 : :
1889 : :
1890 : :
|