daily update
[binutils.git] / binutils / defparse.y
blob1f44fe1cfcdceefb660e835a09a2f1046622eac8
1 %{ /* defparse.y - parser for .def files */
3 /* Copyright 1995, 1997, 1998, 1999, 2001, 2004, 2007
4 Free Software Foundation, Inc.
6 This file is part of GNU Binutils.
8 This program is free software; you can redistribute it and/or modify
9 it under the terms of the GNU General Public License as published by
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
13 This program is distributed in the hope that it will be useful,
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 GNU General Public License for more details.
18 You should have received a copy of the GNU General Public License
19 along with this program; if not, write to the Free Software
20 Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
21 MA 02110-1301, USA. */
23 #include "sysdep.h"
24 #include "bfd.h"
25 #include "libiberty.h"
26 #include "dlltool.h"
29 %union {
30 char *id;
31 int number;
34 %token NAME LIBRARY DESCRIPTION STACKSIZE HEAPSIZE CODE DATA
35 %token SECTIONS EXPORTS IMPORTS VERSIONK BASE CONSTANT
36 %token READ WRITE EXECUTE SHARED NONSHARED NONAME PRIVATE
37 %token SINGLE MULTIPLE INITINSTANCE INITGLOBAL TERMINSTANCE TERMGLOBAL
38 %token <id> ID
39 %token <number> NUMBER
40 %type <number> opt_base opt_ordinal opt_NONAME opt_CONSTANT opt_DATA opt_PRIVATE
41 %type <number> attr attr_list opt_number
42 %type <id> opt_name opt_equal_name
46 start: start command
47 | command
50 command:
51 NAME opt_name opt_base { def_name ($2, $3); }
52 | LIBRARY opt_name opt_base option_list { def_library ($2, $3); }
53 | EXPORTS explist
54 | DESCRIPTION ID { def_description ($2);}
55 | STACKSIZE NUMBER opt_number { def_stacksize ($2, $3);}
56 | HEAPSIZE NUMBER opt_number { def_heapsize ($2, $3);}
57 | CODE attr_list { def_code ($2);}
58 | DATA attr_list { def_data ($2);}
59 | SECTIONS seclist
60 | IMPORTS implist
61 | VERSIONK NUMBER { def_version ($2,0);}
62 | VERSIONK NUMBER '.' NUMBER { def_version ($2,$4);}
66 explist:
67 /* EMPTY */
68 | explist expline
71 expline:
72 ID opt_equal_name opt_ordinal opt_NONAME opt_CONSTANT opt_DATA opt_PRIVATE
73 { def_exports ($1, $2, $3, $4, $5, $6, $7);}
75 implist:
76 implist impline
77 | impline
80 impline:
81 ID '=' ID '.' ID '.' ID { def_import ($1,$3,$5,$7, 0); }
82 | ID '=' ID '.' ID '.' NUMBER { def_import ($1,$3,$5, 0,$7); }
83 | ID '=' ID '.' ID { def_import ($1,$3, 0,$5, 0); }
84 | ID '=' ID '.' NUMBER { def_import ($1,$3, 0, 0,$5); }
85 | ID '.' ID '.' ID { def_import ( 0,$1,$3,$5, 0); }
86 | ID '.' ID '.' NUMBER { def_import ( 0,$1,$3, 0,$5); }
87 | ID '.' ID { def_import ( 0,$1, 0,$3, 0); }
88 | ID '.' NUMBER { def_import ( 0,$1, 0, 0,$3); }
91 seclist:
92 seclist secline
93 | secline
96 secline:
97 ID attr_list { def_section ($1,$2);}
100 attr_list:
101 attr_list opt_comma attr
102 | attr
105 opt_comma:
109 opt_number: ',' NUMBER { $$=$2;}
110 | { $$=-1;}
113 attr:
114 READ { $$ = 1; }
115 | WRITE { $$ = 2; }
116 | EXECUTE { $$ = 4; }
117 | SHARED { $$ = 8; }
118 | NONSHARED { $$ = 0; }
119 | SINGLE { $$ = 0; }
120 | MULTIPLE { $$ = 0; }
123 opt_CONSTANT:
124 CONSTANT {$$=1;}
125 | {$$=0;}
128 opt_NONAME:
129 NONAME {$$=1;}
130 | {$$=0;}
133 opt_DATA:
134 DATA { $$ = 1; }
135 | { $$ = 0; }
138 opt_PRIVATE:
139 PRIVATE { $$ = 1; }
140 | { $$ = 0; }
143 opt_name: ID { $$ =$1; }
144 | ID '.' ID
146 char *name = xmalloc (strlen ($1) + 1 + strlen ($3) + 1);
147 sprintf (name, "%s.%s", $1, $3);
148 $$ = name;
150 | { $$=""; }
153 opt_ordinal:
154 '@' NUMBER { $$=$2;}
155 | { $$=-1;}
158 opt_equal_name:
159 '=' ID { $$ = $2; }
160 | '=' ID '.' ID
162 char *name = xmalloc (strlen ($2) + 1 + strlen ($4) + 1);
163 sprintf (name, "%s.%s", $2, $4);
164 $$ = name;
166 | { $$ = 0; }
169 opt_base: BASE '=' NUMBER { $$= $3;}
170 | { $$=-1;}
173 option_list:
174 /* empty */
175 | option_list opt_comma option
178 option:
179 INITINSTANCE
180 | INITGLOBAL
181 | TERMINSTANCE
182 | TERMGLOBAL