3 %lex-param { yyscan_t scanner }
4 %parse-param { struct grub2_parser *parser }
8 #include <talloc/talloc.h>
14 #define YYLEX_PARAM parser->scanner
16 static void yyerror(struct grub2_parser *, char const *s);
20 struct grub2_word *word;
21 struct grub2_argv *argv;
22 struct grub2_statement *statement;
23 struct grub2_statements *statements;
27 %token TOKEN_LDSQBRACKET "[["
28 %token TOKEN_RDSQBRACKET "]]"
29 %token TOKEN_CASE "case"
31 %token TOKEN_DONE "done"
32 %token TOKEN_ELIF "elif"
33 %token TOKEN_ELSE "else"
34 %token TOKEN_ESAC "esac"
36 %token TOKEN_FOR "for"
37 %token TOKEN_FUNCTION "function"
40 %token TOKEN_MENUENTRY "menuentry"
41 %token TOKEN_SELECT "select"
42 %token TOKEN_SUBMENU "submenu"
43 %token TOKEN_THEN "then"
44 %token TOKEN_TIME "time"
45 %token TOKEN_UTIL "until"
46 %token TOKEN_WHILE "while"
48 %type <statement> statement
49 %type <statements> statements
56 %token <word> TOKEN_WORD
64 parser->script->statements = $1;
67 statements: /* empty */ {
68 $$ = create_statements(parser);
70 | statements statement TOKEN_EOL {
71 statement_append($1, $2);
74 | statements TOKEN_EOL {
80 $$ = create_statement_simple(parser, $1);
82 | '{' statements '}' {
83 $$ = create_statement_block(parser, $2);
85 | "if" TOKEN_DELIM statement
89 $$ = create_statement_if(parser, $3, $6, NULL);
91 | "if" TOKEN_DELIM statement
97 $$ = create_statement_if(parser, $3, $6, $9);
99 | "function" TOKEN_DELIM word TOKEN_DELIM '{' statements '}' {
100 $$ = create_statement_function(parser, $3, $6);
102 | "menuentry" TOKEN_DELIM words TOKEN_DELIM
104 $$ = create_statement_menuentry(parser, $3, $6);
106 | "submenu" TOKEN_DELIM words TOKEN_DELIM
108 /* we just flatten everything */
109 $$ = create_statement_block(parser, $6);
113 $$ = create_argv(parser);
116 | words TOKEN_DELIM word {
128 void yyerror(struct grub2_parser *parser, char const *s)
130 fprintf(stderr, "%d: error: %s '%s'\n",
131 yyget_lineno(parser->scanner),
132 s, yyget_text(parser->scanner));
135 struct grub2_statements *create_statements(struct grub2_parser *parser)
137 struct grub2_statements *stmts = talloc(parser,
138 struct grub2_statements);
139 list_init(&stmts->list);
143 struct grub2_statement *create_statement_simple(struct grub2_parser *parser,
144 struct grub2_argv *argv)
146 struct grub2_statement_simple *stmt =
147 talloc(parser, struct grub2_statement_simple);
148 stmt->st.type = STMT_TYPE_SIMPLE;
149 stmt->st.exec = statement_simple_execute;
154 struct grub2_statement *create_statement_menuentry(struct grub2_parser *parser,
155 struct grub2_argv *argv, struct grub2_statements *stmts)
157 struct grub2_statement_menuentry *stmt =
158 talloc(parser, struct grub2_statement_menuentry);
159 stmt->st.type = STMT_TYPE_MENUENTRY;
160 stmt->st.exec = statement_menuentry_execute;
162 stmt->statements = stmts;
166 struct grub2_statement *create_statement_if(struct grub2_parser *parser,
167 struct grub2_statement *condition,
168 struct grub2_statements *true_case,
169 struct grub2_statements *false_case)
171 struct grub2_statement_if *stmt =
172 talloc(parser, struct grub2_statement_if);
173 stmt->st.type = STMT_TYPE_IF;
174 stmt->st.exec = statement_if_execute;
175 stmt->condition = condition;
176 stmt->true_case = true_case;
177 stmt->false_case = false_case;
181 struct grub2_statement *create_statement_block(struct grub2_parser *parser,
182 struct grub2_statements *stmts)
184 struct grub2_statement_block *stmt =
185 talloc(parser, struct grub2_statement_block);
186 stmt->st.type = STMT_TYPE_BLOCK;
187 stmt->st.exec = NULL;
188 stmt->statements = stmts;
192 struct grub2_statement *create_statement_function(struct grub2_parser *parser,
193 struct grub2_word *name, struct grub2_statements *body)
195 struct grub2_statement_function *stmt =
196 talloc(parser, struct grub2_statement_function);
197 stmt->st.exec = statement_function_execute;
203 void statement_append(struct grub2_statements *stmts,
204 struct grub2_statement *stmt)
208 list_add_tail(&stmts->list, &stmt->list);
211 struct grub2_word *create_word_text(struct grub2_parser *parser,
214 struct grub2_word *word = talloc(parser, struct grub2_word);
215 word->type = GRUB2_WORD_TEXT;
217 word->text = talloc_strdup(word, text);
223 struct grub2_word *create_word_var(struct grub2_parser *parser,
224 const char *name, bool split)
226 struct grub2_word *word = talloc(parser, struct grub2_word);
227 word->type = GRUB2_WORD_VAR;
228 word->name = talloc_strdup(word, name);
235 struct grub2_argv *create_argv(struct grub2_parser *parser)
237 struct grub2_argv *argv = talloc(parser, struct grub2_argv);
238 list_init(&argv->words);
242 void argv_append(struct grub2_argv *argv, struct grub2_word *word)
244 list_add_tail(&argv->words, &word->argv_list);
247 void word_append(struct grub2_word *w1, struct grub2_word *w2)
253 struct grub2_parser *grub2_parser_create(struct discover_context *ctx)
255 struct grub2_parser *parser;
257 parser = talloc(ctx, struct grub2_parser);
258 yylex_init_extra(parser, &parser->scanner);
259 parser->script = create_script(parser, ctx);
264 void grub2_parser_parse(struct grub2_parser *parser, char *buf, int len)
266 YY_BUFFER_STATE bufstate;
269 bufstate = yy_scan_bytes(buf, len - 1, parser->scanner);
271 rc = yyparse(parser);
273 yy_delete_buffer(bufstate, parser->scanner);
276 script_execute(parser->script);