blob: ecc71c370361e80b0d6640ca8c3a4ccce2d0ae06 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
|
%{
/*
*
* IRBOX, an Ivy driver for infra-red remote controls
*
* Copyright 1998-1999
* Centre d'Etudes de la Navigation Aerienne
*
* This is the lexical analyser for reading tables
*
* Authors: Stephane Chatty <chatty@cenatoulouse.dgac.fr>
*
* $Id$
*
* Please refer to file version.h for the
* copyright notice regarding this software
*/
#include <stdio.h>
#include <string.h>
#include <stdio.h>
/* header produced from the parser file with '-d' option of yacc */
#include "y.tab.h"
extern int tee (int);
#define RETURN(x) return (tee(x))
const char* ResWords [] = {
"type",
"name",
"brand",
0
};
const int ResWordsTokens [] = {
Y_TYPE,
Y_NAME,
Y_BRAND
};
int LineNo = 1;
void
LexInit ()
{
#ifdef FLEX_SCANNER
static void yyrestart (FILE*);
// yyrestart (0);
#endif
LineNo = 1;
}
int
CheckResWord (const char* s)
{
const char** pp = ResWords;
while (*pp) {
if (strcmp (*pp, s) == 0)
return pp - ResWords;
++pp;
}
return -1;
}
%}
Int [-]?[0-9]+
Ident [a-zA-Z+/\[\]][a-zA-Z.0-9/\[\]]*
nl [\n]
sp0 [ \t]*
sp1 [ \t]+
%%
[:] RETURN (yytext[0]);
\#.*\n { /* comments */
++LineNo;
}
\".*\" {
char* n = strdup (yytext+1);
n[strlen(yytext) - 1] = '\0';
yylval.name = n;
RETURN (Y_STRING);
}
{sp1} {}
{nl} {
++LineNo;
RETURN (Y_EOL);
}
{Int} {
yylval.integer = atoi (yytext);
RETURN (Y_INT);
}
{Ident} {
int index = CheckResWord (yytext);
if (index >= 0) {
RETURN (ResWordsTokens[index]);
} else {
yylval.name = strdup (yytext);
RETURN (Y_ID);
}
}
. {
RETURN (-1);
}
|
