configure: Use AC_GNU_SOURCE
[petitboot] / discover / yaboot-parser.c
1 #if defined(HAVE_CONFIG_H)
2 #include "config.h"
3 #endif
4
5 #include <assert.h>
6 #include <stdlib.h>
7 #include <string.h>
8 #include <ctype.h>
9
10 #include "log/log.h"
11 #include "talloc/talloc.h"
12 #include "types/types.h"
13 #include "parser-conf.h"
14 #include "parser-utils.h"
15 #include "resource.h"
16
17 struct yaboot_state {
18         int globals_done;
19         const char *const *known_names;
20
21         /* current option data */
22         struct discover_boot_option *opt;
23         const char *device;
24         const char *partition;
25         const char *boot_image;
26         const char *initrd;
27         const char *initrd_size;
28         const char *literal;
29         const char *ramdisk;
30         const char *root;
31         bool read_only;
32         bool read_write;
33 };
34
35 static struct discover_boot_option *state_start_new_option(
36                 struct conf_context *conf,
37                 struct yaboot_state *state)
38 {
39         state->opt = discover_boot_option_create(conf->dc, conf->dc->device);
40         state->opt->option->boot_args = talloc_strdup(state->opt->option, "");
41
42         /* old allocated values will get freed with the state */
43         state->device = conf_get_global_option(conf, "device");
44         state->partition = conf_get_global_option(conf, "partition");
45         state->initrd_size = conf_get_global_option(conf, "initrd_size");
46         state->literal = conf_get_global_option(conf, "literal");
47         state->ramdisk = conf_get_global_option(conf, "ramdisk");
48         state->root = conf_get_global_option(conf, "root");
49
50         return state->opt;
51 }
52
53 static struct resource *create_yaboot_devpath_resource(
54                 struct yaboot_state *state,
55                 struct conf_context *conf,
56                 const char *path)
57 {
58         struct discover_boot_option *opt = state->opt;
59         const char *dev, *part, *devpos;
60         struct resource *res;
61         char *devpath, *devstr;
62
63         dev = state->device;
64         part = state->partition;
65
66         if (!dev)
67                 dev = conf_get_global_option(conf, "device");
68         if (!part)
69                 part = conf_get_global_option(conf, "partition");
70
71         if (strchr(path, ':')) {
72                 devpath = talloc_strdup(conf, path);
73
74         } else if (dev && part) {
75                 devpos = &dev[strlen(dev) - 1];
76                 if (isdigit(*devpos)) {
77                         while (isdigit(*devpos))
78                                 devpos--;
79
80                         devstr = talloc_strndup(conf, dev, devpos - dev + 1);
81                         devpath = talloc_asprintf(conf, "%s%s:%s", devstr,
82                                         part, path);
83                         talloc_free(devstr);
84                 } else {
85                         devpath = talloc_asprintf(conf,
86                                         "%s%s:%s", dev, part, path);
87                 }
88         } else if (dev) {
89                 devpath = talloc_asprintf(conf, "%s:%s", dev, path);
90         } else {
91                 devpath = talloc_strdup(conf, path);
92         }
93
94         res = create_devpath_resource(opt, conf->dc->device, devpath);
95
96         talloc_free(devpath);
97
98         return res;
99 }
100
101 static void yaboot_finish(struct conf_context *conf)
102 {
103         struct yaboot_state *state = conf->parser_info;
104         const char *default_label;
105         struct boot_option *opt;
106
107         if (!state->opt)
108                 return;
109
110         opt = state->opt->option;
111         assert(opt);
112         assert(opt->name);
113         assert(opt->boot_args);
114
115         /* populate the boot option from state data */
116         state->opt->boot_image = create_yaboot_devpath_resource(state,
117                                 conf, state->boot_image);
118         if (state->initrd) {
119                 state->opt->initrd = create_yaboot_devpath_resource(state,
120                                 conf, state->initrd);
121         }
122
123         if (state->initrd_size) {
124                 opt->boot_args = talloc_asprintf(opt, "ramdisk_size=%s %s",
125                                         state->initrd_size, opt->boot_args);
126         }
127
128         if (state->ramdisk) {
129                 opt->boot_args = talloc_asprintf(opt, "ramdisk=%s %s",
130                                         state->initrd_size, opt->boot_args);
131         }
132
133         if (state->root) {
134                 opt->boot_args = talloc_asprintf(opt, "root=%s %s",
135                                         state->root, opt->boot_args);
136         }
137
138         if (state->read_only && state->read_write) {
139                 pb_log("boot option %s specified both 'ro' and 'rw', "
140                                 "using 'rw'\n", opt->name);
141                 state->read_only = false;
142         }
143
144         if (state->read_only || state->read_write) {
145                 opt->boot_args = talloc_asprintf(opt, "%s %s",
146                                         state->read_only ? "ro" : "rw",
147                                         opt->boot_args);
148         }
149
150         if (state->literal) {
151                 opt->boot_args = talloc_strdup(opt, state->literal);
152         }
153
154         opt->description = talloc_asprintf(opt, "%s %s %s",
155                 state->boot_image,
156                 (state->initrd ? state->initrd : ""),
157                 opt->boot_args ? opt->boot_args : "");
158
159         conf_strip_str(opt->boot_args);
160         conf_strip_str(opt->description);
161
162         default_label = conf_get_global_option(conf, "default");
163         if (default_label &&
164                         !strcasecmp(state->opt->option->name, default_label))
165                 state->opt->option->is_default = true;
166
167         discover_context_add_boot_option(conf->dc, state->opt);
168 }
169
170 static void yaboot_process_pair(struct conf_context *conf, const char *name,
171                 char *value)
172 {
173         struct yaboot_state *state = conf->parser_info;
174         struct discover_boot_option *opt = state->opt;
175         struct fixed_pair {
176                 const char *image;
177                 const char *initrd;
178         };
179         static const struct fixed_pair suse_fp32 = {
180                 .image = "/suseboot/vmlinux32",
181                 .initrd = "/suseboot/initrd32",
182         };
183         static const struct fixed_pair suse_fp64 = {
184                 .image = "/suseboot/vmlinux64",
185                 .initrd = "/suseboot/initrd64",
186         };
187         const struct fixed_pair *suse_fp;
188
189         /* fixup for bare values */
190
191         if (!name)
192                 name = value;
193
194         if (!state->globals_done && conf_set_global_option(conf, name, value))
195                 return;
196
197         if (!conf_param_in_list(state->known_names, name))
198                 return;
199
200         state->globals_done = 1;
201
202         /* image */
203
204         if (streq(name, "image")) {
205
206                 /* First finish any previous image. */
207                 if (opt)
208                         yaboot_finish(conf);
209
210                 /* Then start the new image. */
211                 opt = state_start_new_option(conf, state);
212
213                 state->boot_image = talloc_strdup(state, value);
214
215                 return;
216         }
217
218         /* Special processing for SUSE install CD. */
219
220         if (streq(name, "image[32bit]"))
221                 suse_fp = &suse_fp32;
222         else if (streq(name, "image[64bit]"))
223                 suse_fp = &suse_fp64;
224         else
225                 suse_fp = NULL;
226
227         if (suse_fp) {
228                 /* First finish any previous image. */
229                 if (opt)
230                         yaboot_finish(conf);
231
232                 /* Then start the new image. */
233                 opt = state_start_new_option(conf, state);
234
235                 if (*value == '/') {
236                         state->boot_image = talloc_strdup(state, value);
237                 } else {
238                         state->boot_image = talloc_strdup(state,
239                                                         suse_fp->image);
240                         state->initrd = talloc_strdup(state, suse_fp->initrd);
241                 }
242
243                 return;
244         }
245
246         /* all other processing requires an image */
247         if (!opt) {
248                 pb_log("%s: unknown name: %s\n", __func__, name);
249                 return;
250         }
251
252         /* initrd */
253         if (streq(name, "initrd")) {
254                 state->initrd = talloc_strdup(state, value);
255                 return;
256         }
257
258         /* label */
259         if (streq(name, "label")) {
260                 opt->option->id = talloc_asprintf(opt->option, "%s#%s",
261                         conf->dc->device->device->id, value);
262                 opt->option->name = talloc_strdup(opt->option, value);
263                 return;
264         }
265
266         /* args */
267         if (streq(name, "device")) {
268                 printf("option device : %s", value);
269                 state->device = talloc_strdup(state, value);
270                 return;
271         }
272
273         if (streq(name, "parititon")) {
274                 state->partition = talloc_strdup(state, value);
275                 return;
276         }
277
278         if (streq(name, "append")) {
279                 opt->option->boot_args = talloc_asprintf_append(
280                         opt->option->boot_args, "%s ", value);
281                 return;
282         }
283
284         if (streq(name, "initrd-size")) {
285                 state->initrd_size = talloc_strdup(state, value);
286                 return;
287         }
288
289         if (streq(name, "literal")) {
290                 state->literal = talloc_strdup(state, value);
291                 return;
292         }
293
294         if (streq(name, "ramdisk")) {
295                 state->ramdisk = talloc_strdup(state, value);
296                 return;
297         }
298
299         if (streq(name, "read-only")) {
300                 state->read_only = true;
301                 return;
302         }
303
304         if (streq(name, "read-write")) {
305                 state->read_write = true;
306                 return;
307         }
308
309         if (streq(name, "root")) {
310                 state->root = talloc_strdup(state, value);
311                 return;
312         }
313
314         pb_log("%s: unknown name: %s\n", __func__, name);
315 }
316
317 static struct conf_global_option yaboot_global_options[] = {
318         { .name = "root" },
319         { .name = "device" },
320         { .name = "partition" },
321         { .name = "initrd" },
322         { .name = "initrd_size" },
323         { .name = "video" },
324         { .name = "literal" },
325         { .name = "ramdisk" },
326         { .name = "default" },
327         { .name = NULL },
328 };
329
330 static const char *const yaboot_conf_files[] = {
331         "/yaboot.conf",
332         "/yaboot.cnf",
333         "/etc/yaboot.conf",
334         "/etc/yaboot.cnf",
335         "/suseboot/yaboot.cnf",
336         "/YABOOT.CONF",
337         "/YABOOT.CNF",
338         "/ETC/YABOOT.CONF",
339         "/ETC/YABOOT.CNF",
340         "/SUSEBOOT/YABOOT.CNF",
341         NULL
342 };
343
344 static const char *yaboot_known_names[] = {
345         "append",
346         "image",
347         "image[64bit]", /* SUSE extension */
348         "image[32bit]", /* SUSE extension */
349         "initrd",
350         "initrd-size",
351         "label",
352         "literal",
353         "ramdisk",
354         "read-only",
355         "read-write",
356         "root",
357         "device",
358         "partition",
359         NULL
360 };
361
362 static int yaboot_parse(struct discover_context *dc)
363 {
364         const char * const *filename;
365         struct yaboot_state *state;
366         struct conf_context *conf;
367         int len, rc;
368         char *buf;
369
370         /* Support block device boot only at present */
371         if (dc->event)
372                 return -1;
373
374         conf = talloc_zero(dc, struct conf_context);
375
376         if (!conf)
377                 return -1;
378
379         conf->dc = dc;
380         conf->global_options = yaboot_global_options,
381         conf_init_global_options(conf);
382         conf->get_pair = conf_get_pair_equal;
383         conf->process_pair = yaboot_process_pair;
384         conf->finish = yaboot_finish;
385         conf->parser_info = state = talloc_zero(conf, struct yaboot_state);
386
387         state->known_names = yaboot_known_names;
388
389         state->opt = NULL;
390
391         for (filename = yaboot_conf_files; *filename; filename++) {
392                 rc = parser_request_file(dc, dc->device, *filename, &buf, &len);
393                 if (rc)
394                         continue;
395
396                 conf_parse_buf(conf, buf, len);
397                 talloc_free(buf);
398         }
399
400         talloc_free(conf);
401         return 0;
402 }
403
404 static struct parser yaboot_parser = {
405         .name                   = "yaboot",
406         .parse                  = yaboot_parse,
407         .resolve_resource       = resolve_devpath_resource,
408 };
409
410 register_parser(yaboot_parser);