Magellan Linux

Diff of /tags/grubby-8_40_20170627/grubby.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

trunk/mkinitrd-magellan/grubby/grubby.c revision 1177 by niro, Wed Dec 15 21:16:32 2010 UTC trunk/grubby/grubby.c revision 3026 by niro, Tue Jun 27 14:43:04 2017 UTC
# Line 36  Line 36 
36  #include <signal.h>  #include <signal.h>
37  #include <blkid/blkid.h>  #include <blkid/blkid.h>
38    
39    #include "log.h"
40    
41    #ifndef DEBUG
42  #define DEBUG 0  #define DEBUG 0
43    #endif
44    
45  #if DEBUG  #if DEBUG
46  #define dbgPrintf(format, args...) fprintf(stderr, format , ## args)  #define dbgPrintf(format, args...) fprintf(stderr, format , ## args)
# Line 44  Line 48 
48  #define dbgPrintf(format, args...)  #define dbgPrintf(format, args...)
49  #endif  #endif
50    
51    int debug = 0; /* Currently just for template debugging */
52    
53  #define _(A) (A)  #define _(A) (A)
54    
55  #define MAX_EXTRA_INITRDS  16 /* code segment checked by --bootloader-probe */  #define MAX_EXTRA_INITRDS  16 /* code segment checked by --bootloader-probe */
56  #define CODE_SEG_SIZE  128 /* code segment checked by --bootloader-probe */  #define CODE_SEG_SIZE  128 /* code segment checked by --bootloader-probe */
57    
58    #define NOOP_OPCODE 0x90
59    #define JMP_SHORT_OPCODE 0xeb
60    
61    int isEfi = 0;
62    
63    #if defined(__aarch64__)
64    #define isEfiOnly 1
65    #else
66    #define isEfiOnly 0
67    #endif
68    
69    char *saved_command_line = NULL;
70    
71  /* comments get lumped in with indention */  /* comments get lumped in with indention */
72  struct lineElement {  struct lineElement {
73      char * item;   char *item;
74      char * indent;   char *indent;
75  };  };
76    
77  enum lineType_e {  enum lineType_e {
78      LT_WHITESPACE = 1 << 0,   LT_UNIDENTIFIED = 0,
79      LT_TITLE      = 1 << 1,   LT_WHITESPACE = 1 << 0,
80      LT_KERNEL     = 1 << 2,   LT_TITLE = 1 << 1,
81      LT_INITRD     = 1 << 3,   LT_KERNEL = 1 << 2,
82      LT_HYPER      = 1 << 4,   LT_INITRD = 1 << 3,
83      LT_DEFAULT    = 1 << 5,   LT_HYPER = 1 << 4,
84      LT_MBMODULE   = 1 << 6,   LT_DEFAULT = 1 << 5,
85      LT_ROOT       = 1 << 7,   LT_MBMODULE = 1 << 6,
86      LT_FALLBACK   = 1 << 8,   LT_ROOT = 1 << 7,
87      LT_KERNELARGS = 1 << 9,   LT_FALLBACK = 1 << 8,
88      LT_BOOT       = 1 << 10,   LT_KERNELARGS = 1 << 9,
89      LT_BOOTROOT   = 1 << 11,   LT_BOOT = 1 << 10,
90      LT_LBA        = 1 << 12,   LT_BOOTROOT = 1 << 11,
91      LT_OTHER      = 1 << 13,   LT_LBA = 1 << 12,
92      LT_GENERIC    = 1 << 14,   LT_OTHER = 1 << 13,
93      LT_UNKNOWN    = 1 << 15,   LT_GENERIC = 1 << 14,
94     LT_ECHO = 1 << 16,
95     LT_MENUENTRY = 1 << 17,
96     LT_ENTRY_END = 1 << 18,
97     LT_SET_VARIABLE = 1 << 19,
98     LT_KERNEL_EFI = 1 << 20,
99     LT_INITRD_EFI = 1 << 21,
100     LT_KERNEL_16 = 1 << 22,
101     LT_INITRD_16 = 1 << 23,
102     LT_DEVTREE = 1 << 24,
103     LT_UNKNOWN = 1 << 25,
104  };  };
105    
106  struct singleLine {  struct singleLine {
107      char * indent;   char *indent;
108      int numElements;   int numElements;
109      struct lineElement * elements;   struct lineElement *elements;
110      struct singleLine * next;   struct singleLine *next;
111      enum lineType_e type;   enum lineType_e type;
112  };  };
113    
114  struct singleEntry {  struct singleEntry {
115      struct singleLine * lines;   struct singleLine *lines;
116      int skip;   int skip;
117      int multiboot;   int multiboot;
118      struct singleEntry * next;   struct singleEntry *next;
119  };  };
120    
121  #define GRUBBY_BADIMAGE_OKAY (1 << 0)  #define GRUBBY_BADIMAGE_OKAY (1 << 0)
# Line 99  struct singleEntry { Line 128  struct singleEntry {
128  #define NEED_TITLE   (1 << 2)  #define NEED_TITLE   (1 << 2)
129  #define NEED_ARGS    (1 << 3)  #define NEED_ARGS    (1 << 3)
130  #define NEED_MB      (1 << 4)  #define NEED_MB      (1 << 4)
131    #define NEED_END     (1 << 5)
132    #define NEED_DEVTREE (1 << 6)
133    
134  #define MAIN_DEFAULT    (1 << 0)  #define MAIN_DEFAULT    (1 << 0)
135    #define FIRST_ENTRY_INDEX    0 /* boot entry index value begin and increment
136       from this initial value */
137    #define NO_DEFAULT_ENTRY    -1 /* indicates that no specific default boot
138       entry was set or currently exists */
139  #define DEFAULT_SAVED       -2  #define DEFAULT_SAVED       -2
140    #define DEFAULT_SAVED_GRUB2 -3
141    
142  struct keywordTypes {  struct keywordTypes {
143      char * key;   char *key;
144      enum lineType_e type;   enum lineType_e type;
145      char nextChar;   char nextChar;
146      char separatorChar;   char separatorChar;
147  };  };
148    
149    struct configFileInfo;
150    
151    typedef const char *(*findConfigFunc) (struct configFileInfo *);
152    typedef const int (*writeLineFunc) (struct configFileInfo *,
153        struct singleLine * line);
154    typedef char *(*getEnvFunc) (struct configFileInfo *, char *name);
155    typedef int (*setEnvFunc) (struct configFileInfo *, char *name, char *value);
156    
157  struct configFileInfo {  struct configFileInfo {
158      char * defaultConfig;   char *defaultConfig;
159      struct keywordTypes * keywords;   findConfigFunc findConfig;
160      int defaultIsIndex;   writeLineFunc writeLine;
161      int defaultSupportSaved;   getEnvFunc getEnv;
162      enum lineType_e entrySeparator;   setEnvFunc setEnv;
163      int needsBootPrefix;   struct keywordTypes *keywords;
164      int argsInQuotes;   int caseInsensitive;
165      int maxTitleLength;   int defaultIsIndex;
166      int titleBracketed;   int defaultIsVariable;
167      int mbHyperFirst;   int defaultSupportSaved;
168      int mbInitRdIsModule;   int defaultIsSaved;
169      int mbConcatArgs;   int defaultIsUnquoted;
170      int mbAllowExtraInitRds;   enum lineType_e entryStart;
171     enum lineType_e entryEnd;
172     int needsBootPrefix;
173     int argsInQuotes;
174     int maxTitleLength;
175     int titleBracketed;
176     int titlePosition;
177     int mbHyperFirst;
178     int mbInitRdIsModule;
179     int mbConcatArgs;
180     int mbAllowExtraInitRds;
181     char *envFile;
182  };  };
183    
184  struct keywordTypes grubKeywords[] = {  struct keywordTypes grubKeywords[] = {
185      { "title",    LT_TITLE,    ' ' },   {"title", LT_TITLE, ' '},
186      { "root",    LT_BOOTROOT,    ' ' },   {"root", LT_BOOTROOT, ' '},
187      { "default",    LT_DEFAULT,    ' ' },   {"default", LT_DEFAULT, ' '},
188      { "fallback",   LT_FALLBACK,    ' ' },   {"fallback", LT_FALLBACK, ' '},
189      { "kernel",    LT_KERNEL,    ' ' },   {"kernel", LT_KERNEL, ' '},
190      { "initrd",    LT_INITRD,    ' ', ' ' },   {"initrd", LT_INITRD, ' ', ' '},
191      { "module",     LT_MBMODULE,    ' ' },   {"module", LT_MBMODULE, ' '},
192      { "kernel",     LT_HYPER,       ' ' },   {"kernel", LT_HYPER, ' '},
193      { NULL,    0, 0 },   {NULL, 0, 0},
194  };  };
195    
196    const char *grubFindConfig(struct configFileInfo *cfi)
197    {
198     static const char *configFiles[] = {
199     "/boot/grub/grub.conf",
200     "/boot/grub/menu.lst",
201     "/etc/grub.conf",
202     NULL
203     };
204     static int i = -1;
205    
206     if (i == -1) {
207     for (i = 0; configFiles[i] != NULL; i++) {
208     dbgPrintf("Checking \"%s\": ", configFiles[i]);
209     if (!access(configFiles[i], R_OK)) {
210     dbgPrintf("found\n");
211     return configFiles[i];
212     }
213     dbgPrintf("not found\n");
214     }
215     }
216     return configFiles[i];
217    }
218    
219  struct configFileInfo grubConfigType = {  struct configFileInfo grubConfigType = {
220      "/boot/grub/grub.conf",    /* defaultConfig */   .findConfig = grubFindConfig,
221      grubKeywords,    /* keywords */   .keywords = grubKeywords,
222      1,    /* defaultIsIndex */   .defaultIsIndex = 1,
223      1,    /* defaultSupportSaved */   .defaultSupportSaved = 1,
224      LT_TITLE,    /* entrySeparator */   .entryStart = LT_TITLE,
225      1,    /* needsBootPrefix */   .needsBootPrefix = 1,
226      0,    /* argsInQuotes */   .mbHyperFirst = 1,
227      0,    /* maxTitleLength */   .mbInitRdIsModule = 1,
228      0,                                      /* titleBracketed */   .mbAllowExtraInitRds = 1,
229      1,                                      /* mbHyperFirst */   .titlePosition = 1,
230      1,                                      /* mbInitRdIsModule */  };
231      0,                                      /* mbConcatArgs */  
232      1,                                      /* mbAllowExtraInitRds */  struct keywordTypes grub2Keywords[] = {
233     {"menuentry", LT_MENUENTRY, ' '},
234     {"}", LT_ENTRY_END, ' '},
235     {"echo", LT_ECHO, ' '},
236     {"set", LT_SET_VARIABLE, ' ', '='},
237     {"root", LT_BOOTROOT, ' '},
238     {"default", LT_DEFAULT, ' '},
239     {"fallback", LT_FALLBACK, ' '},
240     {"linux", LT_KERNEL, ' '},
241     {"linuxefi", LT_KERNEL_EFI, ' '},
242     {"linux16", LT_KERNEL_16, ' '},
243     {"initrd", LT_INITRD, ' ', ' '},
244     {"initrdefi", LT_INITRD_EFI, ' ', ' '},
245     {"initrd16", LT_INITRD_16, ' ', ' '},
246     {"module", LT_MBMODULE, ' '},
247     {"kernel", LT_HYPER, ' '},
248     {"devicetree", LT_DEVTREE, ' '},
249     {NULL, 0, 0},
250    };
251    
252    const char *grub2FindConfig(struct configFileInfo *cfi)
253    {
254     static const char *configFiles[] = {
255     "/boot/grub/grub-efi.cfg",
256     "/boot/grub/grub.cfg",
257     "/etc/grub2-efi.cfg",
258     "/etc/grub2.cfg",
259     "/boot/grub2/grub.cfg",
260     "/boot/grub2-efi/grub.cfg",
261     NULL
262     };
263     static int i = -1;
264     static const char *grub_cfg = "/boot/grub/grub.cfg";
265     int rc = -1;
266    
267     if (i == -1) {
268     for (i = 0; configFiles[i] != NULL; i++) {
269     dbgPrintf("Checking \"%s\": ", configFiles[i]);
270     if ((rc = access(configFiles[i], R_OK))) {
271     if (errno == EACCES) {
272     printf
273        ("Unable to access bootloader configuration file "
274         "\"%s\": %m\n", configFiles[i]);
275     exit(1);
276     }
277     continue;
278     } else {
279     dbgPrintf("found\n");
280     return configFiles[i];
281     }
282     }
283     }
284    
285     /* Ubuntu renames grub2 to grub, so check for the grub.d directory
286     * that isn't in grub1, and if it exists, return the config file path
287     * that they use. */
288     if (configFiles[i] == NULL && !access("/etc/grub.d/", R_OK)) {
289     dbgPrintf("found\n");
290     return grub_cfg;
291     }
292    
293     dbgPrintf("not found\n");
294     return configFiles[i];
295    }
296    
297    /* kind of hacky.  It'll give the first 1024 bytes, ish. */
298    static char *grub2GetEnv(struct configFileInfo *info, char *name)
299    {
300     static char buf[1025];
301     char *s = NULL;
302     char *ret = NULL;
303     char *envFile = info->envFile ? info->envFile : "/boot/grub/grubenv";
304     int rc =
305        asprintf(&s, "grub-editenv %s list | grep '^%s='", envFile, name);
306    
307     if (rc < 0)
308     return NULL;
309    
310     FILE *f = popen(s, "r");
311     if (!f)
312     goto out;
313    
314     memset(buf, '\0', sizeof(buf));
315     ret = fgets(buf, 1024, f);
316     pclose(f);
317    
318     if (ret) {
319     ret += strlen(name) + 1;
320     ret[strlen(ret) - 1] = '\0';
321     }
322     dbgPrintf("grub2GetEnv(%s): %s\n", name, ret);
323    out:
324     free(s);
325     return ret;
326    }
327    
328    static int sPopCount(const char *s, const char *c)
329    {
330     int ret = 0;
331     if (!s)
332     return -1;
333     for (int i = 0; s[i] != '\0'; i++)
334     for (int j = 0; c[j] != '\0'; j++)
335     if (s[i] == c[j])
336     ret++;
337     return ret;
338    }
339    
340    static char *shellEscape(const char *s)
341    {
342     int l = strlen(s) + sPopCount(s, "'") * 2;
343    
344     char *ret = calloc(l + 1, sizeof(*ret));
345     if (!ret)
346     return NULL;
347     for (int i = 0, j = 0; s[i] != '\0'; i++, j++) {
348     if (s[i] == '\'')
349     ret[j++] = '\\';
350     ret[j] = s[i];
351     }
352     return ret;
353    }
354    
355    static void unquote(char *s)
356    {
357     int l = strlen(s);
358    
359     if ((s[l - 1] == '\'' && s[0] == '\'')
360        || (s[l - 1] == '"' && s[0] == '"')) {
361     memmove(s, s + 1, l - 2);
362     s[l - 2] = '\0';
363     }
364    }
365    
366    static int grub2SetEnv(struct configFileInfo *info, char *name, char *value)
367    {
368     char *s = NULL;
369     int rc = 0;
370     char *envFile = info->envFile ? info->envFile : "/boot/grub/grubenv";
371    
372     unquote(value);
373     value = shellEscape(value);
374     if (!value)
375     return -1;
376    
377     rc = asprintf(&s, "grub-editenv %s set '%s=%s'", envFile, name, value);
378     free(value);
379     if (rc < 0)
380     return -1;
381    
382     dbgPrintf("grub2SetEnv(%s): %s\n", name, s);
383     rc = system(s);
384     free(s);
385     return rc;
386    }
387    
388    /* this is a gigantic hack to avoid clobbering grub2 variables... */
389    static int is_special_grub2_variable(const char *name)
390    {
391     if (!strcmp(name, "\"${next_entry}\""))
392     return 1;
393     if (!strcmp(name, "\"${prev_saved_entry}\""))
394     return 1;
395     return 0;
396    }
397    
398    int sizeOfSingleLine(struct singleLine *line)
399    {
400     int count = 0;
401    
402     for (int i = 0; i < line->numElements; i++) {
403     int indentSize = 0;
404    
405     count = count + strlen(line->elements[i].item);
406    
407     indentSize = strlen(line->elements[i].indent);
408     if (indentSize > 0)
409     count = count + indentSize;
410     else
411     /* be extra safe and add room for whitespaces */
412     count = count + 1;
413     }
414    
415     /* room for trailing terminator */
416     count = count + 1;
417    
418     return count;
419    }
420    
421    static int isquote(char q)
422    {
423     if (q == '\'' || q == '\"')
424     return 1;
425     return 0;
426    }
427    
428    static int iskernel(enum lineType_e type)
429    {
430     return (type == LT_KERNEL || type == LT_KERNEL_EFI
431     || type == LT_KERNEL_16);
432    }
433    
434    static int isinitrd(enum lineType_e type)
435    {
436     return (type == LT_INITRD || type == LT_INITRD_EFI
437     || type == LT_INITRD_16);
438    }
439    
440    char *grub2ExtractTitle(struct singleLine *line)
441    {
442     char *current;
443     char *current_indent;
444     int current_len;
445     int current_indent_len;
446     int i;
447    
448     /* bail out if line does not start with menuentry */
449     if (strcmp(line->elements[0].item, "menuentry"))
450     return NULL;
451    
452     i = 1;
453     current = line->elements[i].item;
454     current_len = strlen(current);
455    
456     /* if second word is quoted, strip the quotes and return single word */
457     if (isquote(*current) && isquote(current[current_len - 1])) {
458     char *tmp;
459    
460     tmp = strdup(current + 1);
461     if (!tmp)
462     return NULL;
463     tmp[strlen(tmp) - 1] = '\0';
464     return tmp;
465     }
466    
467     /* if no quotes, return second word verbatim */
468     if (!isquote(*current))
469     return current;
470    
471     /* second element start with a quote, so we have to find the element
472     * whose last character is also quote (assuming it's the closing one) */
473     int resultMaxSize;
474     char *result;
475     /* need to ensure that ' does not match " as we search */
476     char quote_char = *current;
477    
478     resultMaxSize = sizeOfSingleLine(line);
479     result = malloc(resultMaxSize);
480     snprintf(result, resultMaxSize, "%s", ++current);
481    
482     i++;
483     for (; i < line->numElements; ++i) {
484     current = line->elements[i].item;
485     current_len = strlen(current);
486     current_indent = line->elements[i].indent;
487     current_indent_len = strlen(current_indent);
488    
489     strncat(result, current_indent, current_indent_len);
490     if (current[current_len - 1] != quote_char) {
491     strncat(result, current, current_len);
492     } else {
493     strncat(result, current, current_len - 1);
494     break;
495     }
496     }
497     return result;
498    }
499    
500    struct configFileInfo grub2ConfigType = {
501     .findConfig = grub2FindConfig,
502     .getEnv = grub2GetEnv,
503     .setEnv = grub2SetEnv,
504     .keywords = grub2Keywords,
505     .defaultIsIndex = 1,
506     .defaultSupportSaved = 1,
507     .defaultIsVariable = 1,
508     .entryStart = LT_MENUENTRY,
509     .entryEnd = LT_ENTRY_END,
510     .titlePosition = 1,
511     .needsBootPrefix = 1,
512     .mbHyperFirst = 1,
513     .mbInitRdIsModule = 1,
514     .mbAllowExtraInitRds = 1,
515  };  };
516    
517  struct keywordTypes yabootKeywords[] = {  struct keywordTypes yabootKeywords[] = {
518      { "label",    LT_TITLE,    '=' },   {"label", LT_TITLE, '='},
519      { "root",    LT_ROOT,    '=' },   {"root", LT_ROOT, '='},
520      { "default",    LT_DEFAULT,    '=' },   {"default", LT_DEFAULT, '='},
521      { "image",    LT_KERNEL,    '=' },   {"image", LT_KERNEL, '='},
522      { "bsd",    LT_GENERIC,    '=' },   {"bsd", LT_GENERIC, '='},
523      { "macos",    LT_GENERIC,    '=' },   {"macos", LT_GENERIC, '='},
524      { "macosx",    LT_GENERIC,    '=' },   {"macosx", LT_GENERIC, '='},
525      { "magicboot",  LT_GENERIC,    '=' },   {"magicboot", LT_GENERIC, '='},
526      { "darwin",    LT_GENERIC,    '=' },   {"darwin", LT_GENERIC, '='},
527      { "timeout",    LT_GENERIC,    '=' },   {"timeout", LT_GENERIC, '='},
528      { "install",    LT_GENERIC,    '=' },   {"install", LT_GENERIC, '='},
529      { "fstype",    LT_GENERIC,    '=' },   {"fstype", LT_GENERIC, '='},
530      { "hfstype",    LT_GENERIC,    '=' },   {"hfstype", LT_GENERIC, '='},
531      { "delay",    LT_GENERIC,    '=' },   {"delay", LT_GENERIC, '='},
532      { "defaultos",  LT_GENERIC,     '=' },   {"defaultos", LT_GENERIC, '='},
533      { "init-message", LT_GENERIC,   '=' },   {"init-message", LT_GENERIC, '='},
534      { "enablecdboot", LT_GENERIC,   ' ' },   {"enablecdboot", LT_GENERIC, ' '},
535      { "enableofboot", LT_GENERIC,   ' ' },   {"enableofboot", LT_GENERIC, ' '},
536      { "enablenetboot", LT_GENERIC,  ' ' },   {"enablenetboot", LT_GENERIC, ' '},
537      { "nonvram",    LT_GENERIC,    ' ' },   {"nonvram", LT_GENERIC, ' '},
538      { "hide",    LT_GENERIC,    ' ' },   {"hide", LT_GENERIC, ' '},
539      { "protect",    LT_GENERIC,    ' ' },   {"protect", LT_GENERIC, ' '},
540      { "nobless",    LT_GENERIC,    ' ' },   {"nobless", LT_GENERIC, ' '},
541      { "nonvram",    LT_GENERIC,    ' ' },   {"nonvram", LT_GENERIC, ' '},
542      { "brokenosx",  LT_GENERIC,    ' ' },   {"brokenosx", LT_GENERIC, ' '},
543      { "usemount",   LT_GENERIC,    ' ' },   {"usemount", LT_GENERIC, ' '},
544      { "mntpoint",   LT_GENERIC,    '=' },   {"mntpoint", LT_GENERIC, '='},
545      { "partition",  LT_GENERIC,    '=' },   {"partition", LT_GENERIC, '='},
546      { "device",    LT_GENERIC,    '=' },   {"device", LT_GENERIC, '='},
547      { "fstype",    LT_GENERIC,    '=' },   {"fstype", LT_GENERIC, '='},
548      { "initrd",    LT_INITRD,    '=', ';' },   {"initrd", LT_INITRD, '=', ';'},
549      { "append",    LT_KERNELARGS,  '=' },   {"append", LT_KERNELARGS, '='},
550      { "boot",    LT_BOOT,    '=' },   {"boot", LT_BOOT, '='},
551      { "lba",    LT_LBA,    ' ' },   {"lba", LT_LBA, ' '},
552      { NULL,    0, 0 },   {NULL, 0, 0},
553  };  };
554    
555  struct keywordTypes liloKeywords[] = {  struct keywordTypes liloKeywords[] = {
556      { "label",    LT_TITLE,    '=' },   {"label", LT_TITLE, '='},
557      { "root",    LT_ROOT,    '=' },   {"root", LT_ROOT, '='},
558      { "default",    LT_DEFAULT,    '=' },   {"default", LT_DEFAULT, '='},
559      { "image",    LT_KERNEL,    '=' },   {"image", LT_KERNEL, '='},
560      { "other",    LT_OTHER,    '=' },   {"other", LT_OTHER, '='},
561      { "initrd",    LT_INITRD,    '=' },   {"initrd", LT_INITRD, '='},
562      { "append",    LT_KERNELARGS,  '=' },   {"append", LT_KERNELARGS, '='},
563      { "boot",    LT_BOOT,    '=' },   {"boot", LT_BOOT, '='},
564      { "lba",    LT_LBA,    ' ' },   {"lba", LT_LBA, ' '},
565      { NULL,    0, 0 },   {NULL, 0, 0},
566  };  };
567    
568  struct keywordTypes eliloKeywords[] = {  struct keywordTypes eliloKeywords[] = {
569      { "label",    LT_TITLE,    '=' },   {"label", LT_TITLE, '='},
570      { "root",    LT_ROOT,    '=' },   {"root", LT_ROOT, '='},
571      { "default",    LT_DEFAULT,    '=' },   {"default", LT_DEFAULT, '='},
572      { "image",    LT_KERNEL,    '=' },   {"image", LT_KERNEL, '='},
573      { "initrd",    LT_INITRD,    '=' },   {"initrd", LT_INITRD, '='},
574      { "append",    LT_KERNELARGS,  '=' },   {"append", LT_KERNELARGS, '='},
575      { "vmm",    LT_HYPER,       '=' },   {"vmm", LT_HYPER, '='},
576      { NULL,    0, 0 },   {NULL, 0, 0},
577  };  };
578    
579  struct keywordTypes siloKeywords[] = {  struct keywordTypes siloKeywords[] = {
580      { "label",    LT_TITLE,    '=' },   {"label", LT_TITLE, '='},
581      { "root",    LT_ROOT,    '=' },   {"root", LT_ROOT, '='},
582      { "default",    LT_DEFAULT,    '=' },   {"default", LT_DEFAULT, '='},
583      { "image",    LT_KERNEL,    '=' },   {"image", LT_KERNEL, '='},
584      { "other",    LT_OTHER,    '=' },   {"other", LT_OTHER, '='},
585      { "initrd",    LT_INITRD,    '=' },   {"initrd", LT_INITRD, '='},
586      { "append",    LT_KERNELARGS,  '=' },   {"append", LT_KERNELARGS, '='},
587      { "boot",    LT_BOOT,    '=' },   {"boot", LT_BOOT, '='},
588      { NULL,    0, 0 },   {NULL, 0, 0},
589  };  };
590    
591  struct keywordTypes ziplKeywords[] = {  struct keywordTypes ziplKeywords[] = {
592      { "target",     LT_BOOTROOT,    '=' },   {"target", LT_BOOTROOT, '='},
593      { "image",      LT_KERNEL,      '=' },   {"image", LT_KERNEL, '='},
594      { "ramdisk",    LT_INITRD,      '=' },   {"ramdisk", LT_INITRD, '='},
595      { "parameters", LT_KERNELARGS,  '=' },   {"parameters", LT_KERNELARGS, '='},
596      { "default",    LT_DEFAULT,     '=' },   {"default", LT_DEFAULT, '='},
597      { NULL,         0, 0 },   {NULL, 0, 0},
598  };  };
599    
600  struct keywordTypes extlinuxKeywords[] = {  struct keywordTypes extlinuxKeywords[] = {
601      { "label",    LT_TITLE,    ' ' },   {"label", LT_TITLE, ' '},
602      { "root",    LT_ROOT,    ' ' },   {"root", LT_ROOT, ' '},
603      { "default",    LT_DEFAULT,    ' ' },   {"default", LT_DEFAULT, ' '},
604      { "kernel",    LT_KERNEL,    ' ' },   {"kernel", LT_KERNEL, ' '},
605      { "initrd",    LT_INITRD,      ' ', ',' },   {"initrd", LT_INITRD, ' ', ','},
606      { "append",    LT_KERNELARGS,  ' ' },   {"append", LT_KERNELARGS, ' '},
607      { "prompt",     LT_UNKNOWN,     ' ' },   {"prompt", LT_UNKNOWN, ' '},
608      { NULL,    0, 0 },   {"fdt", LT_DEVTREE, ' '},
609     {"fdtdir", LT_DEVTREE, ' '},
610     {NULL, 0, 0},
611  };  };
612    
613  int useextlinuxmenu;  int useextlinuxmenu;
614  struct configFileInfo eliloConfigType = {  struct configFileInfo eliloConfigType = {
615      "/boot/efi/EFI/redhat/elilo.conf",    /* defaultConfig */   .defaultConfig = "/boot/efi/EFI/redhat/elilo.conf",
616      eliloKeywords,    /* keywords */   .keywords = eliloKeywords,
617      0,    /* defaultIsIndex */   .entryStart = LT_KERNEL,
618      0,    /* defaultSupportSaved */   .needsBootPrefix = 1,
619      LT_KERNEL,    /* entrySeparator */   .argsInQuotes = 1,
620      1,                    /* needsBootPrefix */   .mbConcatArgs = 1,
621      1,    /* argsInQuotes */   .titlePosition = 1,
     0,    /* maxTitleLength */  
     0,                                      /* titleBracketed */  
     0,                                      /* mbHyperFirst */  
     0,                                      /* mbInitRdIsModule */  
     1,                                      /* mbConcatArgs */  
     0,                                      /* mbAllowExtraInitRds */  
622  };  };
623    
624  struct configFileInfo liloConfigType = {  struct configFileInfo liloConfigType = {
625      "/etc/lilo.conf",    /* defaultConfig */   .defaultConfig = "/etc/lilo.conf",
626      liloKeywords,    /* keywords */   .keywords = liloKeywords,
627      0,    /* defaultIsIndex */   .entryStart = LT_KERNEL,
628      0,    /* defaultSupportSaved */   .argsInQuotes = 1,
629      LT_KERNEL,    /* entrySeparator */   .maxTitleLength = 15,
630      0,    /* needsBootPrefix */   .titlePosition = 1,
     1,    /* argsInQuotes */  
     15,    /* maxTitleLength */  
     0,                                      /* titleBracketed */  
     0,                                      /* mbHyperFirst */  
     0,                                      /* mbInitRdIsModule */  
     0,                                      /* mbConcatArgs */  
     0,                                      /* mbAllowExtraInitRds */  
631  };  };
632    
633  struct configFileInfo yabootConfigType = {  struct configFileInfo yabootConfigType = {
634      "/etc/yaboot.conf",    /* defaultConfig */   .defaultConfig = "/etc/yaboot.conf",
635      yabootKeywords,    /* keywords */   .keywords = yabootKeywords,
636      0,    /* defaultIsIndex */   .entryStart = LT_KERNEL,
637      0,    /* defaultSupportSaved */   .needsBootPrefix = 1,
638      LT_KERNEL,    /* entrySeparator */   .argsInQuotes = 1,
639      1,    /* needsBootPrefix */   .maxTitleLength = 15,
640      1,    /* argsInQuotes */   .mbAllowExtraInitRds = 1,
641      15,    /* maxTitleLength */   .titlePosition = 1,
     0,                                      /* titleBracketed */  
     0,                                      /* mbHyperFirst */  
     0,                                      /* mbInitRdIsModule */  
     0,                                      /* mbConcatArgs */  
     1,                                      /* mbAllowExtraInitRds */  
642  };  };
643    
644  struct configFileInfo siloConfigType = {  struct configFileInfo siloConfigType = {
645      "/etc/silo.conf",    /* defaultConfig */   .defaultConfig = "/etc/silo.conf",
646      siloKeywords,    /* keywords */   .keywords = siloKeywords,
647      0,    /* defaultIsIndex */   .entryStart = LT_KERNEL,
648      0,    /* defaultSupportSaved */   .needsBootPrefix = 1,
649      LT_KERNEL,    /* entrySeparator */   .argsInQuotes = 1,
650      1,    /* needsBootPrefix */   .maxTitleLength = 15,
651      1,    /* argsInQuotes */   .titlePosition = 1,
     15,    /* maxTitleLength */  
     0,                                      /* titleBracketed */  
     0,                                      /* mbHyperFirst */  
     0,                                      /* mbInitRdIsModule */  
     0,                                      /* mbConcatArgs */  
     0,                                      /* mbAllowExtraInitRds */  
652  };  };
653    
654  struct configFileInfo ziplConfigType = {  struct configFileInfo ziplConfigType = {
655      "/etc/zipl.conf",    /* defaultConfig */   .defaultConfig = "/etc/zipl.conf",
656      ziplKeywords,    /* keywords */   .keywords = ziplKeywords,
657      0,    /* defaultIsIndex */   .entryStart = LT_TITLE,
658      0,    /* defaultSupportSaved */   .argsInQuotes = 1,
659      LT_TITLE,    /* entrySeparator */   .titleBracketed = 1,
     0,    /* needsBootPrefix */  
     1,    /* argsInQuotes */  
     0,    /* maxTitleLength */  
     1,                                      /* titleBracketed */  
     0,                                      /* mbHyperFirst */  
     0,                                      /* mbInitRdIsModule */  
     0,                                      /* mbConcatArgs */  
     0,                                      /* mbAllowExtraInitRds */  
660  };  };
661    
662  struct configFileInfo extlinuxConfigType = {  struct configFileInfo extlinuxConfigType = {
663      "/boot/extlinux/extlinux.conf",         /* defaultConfig */   .defaultConfig = "/boot/extlinux/extlinux.conf",
664      extlinuxKeywords,                       /* keywords */   .keywords = extlinuxKeywords,
665      0,                                      /* defaultIsIndex */   .caseInsensitive = 1,
666      0,                                      /* defaultSupportSaved */   .entryStart = LT_TITLE,
667      LT_TITLE,                               /* entrySeparator */   .needsBootPrefix = 1,
668      1,                                      /* needsBootPrefix */   .maxTitleLength = 255,
669      0,                                      /* argsInQuotes */   .mbAllowExtraInitRds = 1,
670      255,                                    /* maxTitleLength */   .defaultIsUnquoted = 1,
671      0,                                      /* titleBracketed */   .titlePosition = 1,
     0,                                      /* mbHyperFirst */  
     0,                                      /* mbInitRdIsModule */  
     0,                                      /* mbConcatArgs */  
     1,                                      /* mbAllowExtraInitRds */  
672  };  };
673    
674  struct grubConfig {  struct grubConfig {
675      struct singleLine * theLines;   struct singleLine *theLines;
676      struct singleEntry * entries;   struct singleEntry *entries;
677      char * primaryIndent;   char *primaryIndent;
678      char * secondaryIndent;   char *secondaryIndent;
679      int defaultImage;    /* -1 if none specified -- this value is   int defaultImage; /* -1 if none specified -- this value is
680       * written out, overriding original */   * written out, overriding original */
681      int fallbackImage;    /* just like defaultImage */   int fallbackImage; /* just like defaultImage */
682      int flags;   int flags;
683      struct configFileInfo * cfi;   struct configFileInfo *cfi;
684     int isModified; /* assumes only one entry added
685       per invocation of grubby */
686  };  };
687    
688  blkid_cache blkid;  blkid_cache blkid;
689    
690  struct singleEntry * findEntryByIndex(struct grubConfig * cfg, int index);  struct singleEntry *findEntryByIndex(struct grubConfig *cfg, int index);
691  struct singleEntry * findEntryByPath(struct grubConfig * cfg,  struct singleEntry *findEntryByPath(struct grubConfig *cfg,
692       const char * path, const char * prefix,      const char *path, const char *prefix,
693       int * index);      int *index);
694  static int readFile(int fd, char ** bufPtr);  struct singleEntry *findEntryByTitle(struct grubConfig *cfg, char *title,
695  static void lineInit(struct singleLine * line);       int *index);
696  struct singleLine * lineDup(struct singleLine * line);  static int readFile(int fd, char **bufPtr);
697  static void lineFree(struct singleLine * line);  static void lineInit(struct singleLine *line);
698  static int lineWrite(FILE * out, struct singleLine * line,  struct singleLine *lineDup(struct singleLine *line);
699       struct configFileInfo * cfi);  static void lineFree(struct singleLine *line);
700  static int getNextLine(char ** bufPtr, struct singleLine * line,  static int lineWrite(FILE * out, struct singleLine *line,
701         struct configFileInfo * cfi);       struct configFileInfo *cfi);
702  static char * getRootSpecifier(char * str);  static int getNextLine(char **bufPtr, struct singleLine *line,
703  static void insertElement(struct singleLine * line,         struct configFileInfo *cfi);
704    const char * item, int insertHere,  static char *getRootSpecifier(char *str);
705    struct configFileInfo * cfi);  static void requote(struct singleLine *line, struct configFileInfo *cfi);
706  static void removeElement(struct singleLine * line, int removeHere);  static void insertElement(struct singleLine *line,
707  static struct keywordTypes * getKeywordByType(enum lineType_e type,    const char *item, int insertHere,
708        struct configFileInfo * cfi);    struct configFileInfo *cfi);
709  static enum lineType_e getTypeByKeyword(char * keyword,  static void removeElement(struct singleLine *line, int removeHere);
710   struct configFileInfo * cfi);  static struct keywordTypes *getKeywordByType(enum lineType_e type,
711  static struct singleLine * getLineByType(enum lineType_e type,       struct configFileInfo *cfi);
712   struct singleLine * line);  static enum lineType_e getTypeByKeyword(char *keyword,
713  static int checkForExtLinux(struct grubConfig * config);   struct configFileInfo *cfi);
714  struct singleLine * addLineTmpl(struct singleEntry * entry,  static struct singleLine *getLineByType(enum lineType_e type,
715                                  struct singleLine * tmplLine,   struct singleLine *line);
716                                  struct singleLine * prevLine,  static int checkForExtLinux(struct grubConfig *config);
717                                  const char * val,  struct singleLine *addLineTmpl(struct singleEntry *entry,
718   struct configFileInfo * cfi);         struct singleLine *tmplLine,
719  struct singleLine *  addLine(struct singleEntry * entry,         struct singleLine *prevLine,
720                               struct configFileInfo * cfi,         const char *val, struct configFileInfo *cfi);
721                               enum lineType_e type, char * defaultIndent,  struct singleLine *addLine(struct singleEntry *entry,
722                               const char * val);     struct configFileInfo *cfi,
723       enum lineType_e type, char *defaultIndent,
724       const char *val);
725    
726  static char * sdupprintf(const char *format, ...)  static char *sdupprintf(const char *format, ...)
727  #ifdef __GNUC__  #ifdef __GNUC__
728          __attribute__ ((format (printf, 1, 2)));      __attribute__ ((format(printf, 1, 2)));
729  #else  #else
730          ;  ;
731  #endif  #endif
732    
733  static char * sdupprintf(const char *format, ...) {  static char *sdupprintf(const char *format, ...)
734      char *buf = NULL;  {
735      char c;   char *buf = NULL;
736      va_list args;   char c;
737      size_t size = 0;   va_list args;
738      va_start(args, format);   size_t size = 0;
739         va_start(args, format);
740      /* XXX requires C99 vsnprintf behavior */  
741      size = vsnprintf(&c, 1, format, args) + 1;   /* XXX requires C99 vsnprintf behavior */
742      if (size == -1) {   size = vsnprintf(&c, 1, format, args) + 1;
743   printf("ERROR: vsnprintf behavior is not C99\n");   if (size == -1) {
744   abort();   printf("ERROR: vsnprintf behavior is not C99\n");
745      }   abort();
746     }
747    
748      va_end(args);   va_end(args);
749      va_start(args, format);   va_start(args, format);
750    
751      buf = malloc(size);   buf = malloc(size);
752      if (buf == NULL)   if (buf == NULL)
753   return NULL;   return NULL;
754      vsnprintf(buf, size, format, args);   vsnprintf(buf, size, format, args);
755      va_end (args);   va_end(args);
756    
757      return buf;   return buf;
758  }  }
759    
760  static struct keywordTypes * getKeywordByType(enum lineType_e type,  static inline int
761        struct configFileInfo * cfi) {  kwcmp(struct keywordTypes *kw, const char * label, int case_insensitive)
762      struct keywordTypes * kw;  {
763      for (kw = cfi->keywords; kw->key; kw++) {      int kwl = strlen(kw->key);
764   if (kw->type == type)      int ll = strlen(label);
765      return kw;      int rc;
766        int (*snc)(const char *s1, const char *s2, size_t n) =
767               case_insensitive ? strncasecmp : strncmp;
768        int (*sc)(const char *s1, const char *s2) =
769               case_insensitive ? strcasecmp : strcmp;
770    
771        rc = snc(kw->key, label, kwl);
772        if (rc)
773           return rc;
774    
775        for (int i = kwl; i < ll; i++) {
776           if (isspace(label[i]))
777               return 0;
778           if (kw->separatorChar && label[i] == kw->separatorChar)
779               return 0;
780           else if (kw->nextChar && label[i] == kw->nextChar)
781               return 0;
782           return sc(kw->key+kwl, label+kwl);
783      }      }
784      return NULL;      return 0;
785  }  }
786    
787  static char * getpathbyspec(char *device) {  static enum lineType_e preferredLineType(enum lineType_e type,
788      if (!blkid)   struct configFileInfo *cfi)
789          blkid_get_cache(&blkid, NULL);  {
790     if (isEfi && cfi == &grub2ConfigType) {
791      return blkid_get_devname(blkid, device, NULL);   switch (type) {
792     case LT_KERNEL:
793     return isEfiOnly ? LT_KERNEL : LT_KERNEL_EFI;
794     case LT_INITRD:
795     return isEfiOnly ? LT_INITRD : LT_INITRD_EFI;
796     default:
797     return type;
798     }
799    #if defined(__i386__) || defined(__x86_64__)
800     } else if (cfi == &grub2ConfigType) {
801     switch (type) {
802     case LT_KERNEL:
803     return LT_KERNEL_16;
804     case LT_INITRD:
805     return LT_INITRD_16;
806     default:
807     return type;
808     }
809    #endif
810     }
811     return type;
812  }  }
813    
814  static char * getuuidbydev(char *device) {  static struct keywordTypes *getKeywordByType(enum lineType_e type,
815      if (!blkid)       struct configFileInfo *cfi)
816   blkid_get_cache(&blkid, NULL);  {
817     for (struct keywordTypes * kw = cfi->keywords; kw->key; kw++) {
818      return blkid_get_tag_value(blkid, "UUID", device);   if (kw->type == type)
819     return kw;
820     }
821     return NULL;
822  }  }
823    
824  static enum lineType_e getTypeByKeyword(char * keyword,  static char *getKeyByType(enum lineType_e type, struct configFileInfo *cfi)
825   struct configFileInfo * cfi) {  {
826      struct keywordTypes * kw;   struct keywordTypes *kt = getKeywordByType(type, cfi);
827      for (kw = cfi->keywords; kw->key; kw++) {   if (kt)
828   if (!strcmp(keyword, kw->key))   return kt->key;
829      return kw->type;   return "unknown";
     }  
     return LT_UNKNOWN;  
830  }  }
831    
832  static struct singleLine * getLineByType(enum lineType_e type,  static char *getpathbyspec(char *device)
833   struct singleLine * line) {  {
834      dbgPrintf("getLineByType(%d): ", type);   if (!blkid)
835      for (; line; line = line->next) {   blkid_get_cache(&blkid, NULL);
836   dbgPrintf("%d:%s ", line->type,  
837    line->numElements ? line->elements[0].item : "(empty)");   return blkid_get_devname(blkid, device, NULL);
  if (line->type & type) break;  
     }  
     dbgPrintf(line ? "\n" : " (failed)\n");  
     return line;  
838  }  }
839    
840  static int isBracketedTitle(struct singleLine * line) {  static char *getuuidbydev(char *device)
841      if (line->numElements == 1 && *line->elements[0].item == '[') {  {
842          int len = strlen(line->elements[0].item);   if (!blkid)
843          if (*(line->elements[0].item + len - 1) == ']') {   blkid_get_cache(&blkid, NULL);
844              /* FIXME: this is a hack... */  
845              if (strcmp(line->elements[0].item, "[defaultboot]")) {   return blkid_get_tag_value(blkid, "UUID", device);
                 return 1;  
             }  
         }  
     }  
     return 0;  
846  }  }
847    
848  static int isEntrySeparator(struct singleLine * line,  static enum lineType_e getTypeByKeyword(char *keyword,
849                              struct configFileInfo * cfi) {   struct configFileInfo *cfi)
850      return line->type == cfi->entrySeparator || line->type == LT_OTHER ||  {
851   (cfi->titleBracketed && isBracketedTitle(line));   for (struct keywordTypes * kw = cfi->keywords; kw->key; kw++) {
852     if (!kwcmp(kw, keyword, cfi->caseInsensitive))
853     return kw->type;
854     }
855     return LT_UNKNOWN;
856  }  }
857    
858  /* extract the title from within brackets (for zipl) */  static struct singleLine *getLineByType(enum lineType_e type,
859  static char * extractTitle(struct singleLine * line) {   struct singleLine *line)
860      /* bracketed title... let's extract it (leaks a byte) */  {
861      char * title;   dbgPrintf("getLineByType(%d): ", type);
862      title = strdup(line->elements[0].item);   for (; line; line = line->next) {
863      title++;   dbgPrintf("%d:%s ", line->type,
864      *(title + strlen(title) - 1) = '\0';    line->numElements ? line->elements[0].
865      return title;    item : "(empty)");
866  }   if (line->type & type)
867     break;
868  static int readFile(int fd, char ** bufPtr) {   }
869      int alloced = 0, size = 0, i = 0;   dbgPrintf(line ? "\n" : " (failed)\n");
870      char * buf = NULL;   return line;
871    }
     do {  
  size += i;  
  if ((size + 1024) > alloced) {  
     alloced += 4096;  
     buf = realloc(buf, alloced + 1);  
  }  
     } while ((i = read(fd, buf + size, 1024)) > 0);  
   
     if (i < 0) {  
  fprintf(stderr, _("error reading input: %s\n"), strerror(errno));  
         free(buf);  
  return 1;  
     }  
872    
873      buf = realloc(buf, size + 2);  static int isBracketedTitle(struct singleLine *line)
874      if (size == 0)  {
875          buf[size++] = '\n';   if (line->numElements == 1 && *line->elements[0].item == '[') {
876      else   int len = strlen(line->elements[0].item);
877          if (buf[size - 1] != '\n')   if (*(line->elements[0].item + len - 1) == ']') {
878              buf[size++] = '\n';   /* FIXME: this is a hack... */
879      buf[size] = '\0';   if (strcmp(line->elements[0].item, "[defaultboot]")) {
880     return 1;
881     }
882     }
883     }
884     return 0;
885    }
886    
887      *bufPtr = buf;  static int isEntryStart(struct singleLine *line, struct configFileInfo *cfi)
888    {
889     return line->type == cfi->entryStart || line->type == LT_OTHER ||
890        (cfi->titleBracketed && isBracketedTitle(line));
891    }
892    
893      return 0;  /* extract the title from within brackets (for zipl) */
894    static char *extractTitle(struct grubConfig *cfg, struct singleLine *line)
895    {
896     /* bracketed title... let's extract it */
897     char *title = NULL;
898     if (line->type == LT_TITLE) {
899     char *tmp = line->elements[cfg->cfi->titlePosition].item;
900     if (cfg->cfi->titleBracketed) {
901     tmp++;
902     title = strdup(tmp);
903     *(title + strlen(title) - 1) = '\0';
904     } else {
905     title = strdup(tmp);
906     }
907     } else if (line->type == LT_MENUENTRY)
908     title = strdup(line->elements[1].item);
909     else
910     return NULL;
911     return title;
912  }  }
913    
914  static void lineInit(struct singleLine * line) {  static int readFile(int fd, char **bufPtr)
915      line->indent = NULL;  {
916      line->elements = NULL;   int alloced = 0, size = 0, i = 0;
917      line->numElements = 0;   char *buf = NULL;
     line->next = NULL;  
 }  
   
 struct singleLine * lineDup(struct singleLine * line) {  
     int i;  
     struct singleLine * newLine = malloc(sizeof(*newLine));  
   
     newLine->indent = strdup(line->indent);  
     newLine->next = NULL;  
     newLine->type = line->type;  
     newLine->numElements = line->numElements;  
     newLine->elements = malloc(sizeof(*newLine->elements) *  
        newLine->numElements);  
   
     for (i = 0; i < newLine->numElements; i++) {  
  newLine->elements[i].indent = strdup(line->elements[i].indent);  
  newLine->elements[i].item = strdup(line->elements[i].item);  
     }  
918    
919      return newLine;   do {
920  }   size += i;
921     if ((size + 1024) > alloced) {
922     alloced += 4096;
923     buf = realloc(buf, alloced + 1);
924     }
925     } while ((i = read(fd, buf + size, 1024)) > 0);
926    
927  static void lineFree(struct singleLine * line) {   if (i < 0) {
928      int i;   fprintf(stderr, _("error reading input: %s\n"),
929     strerror(errno));
930     free(buf);
931     return 1;
932     }
933    
934      if (line->indent) free(line->indent);   buf = realloc(buf, size + 2);
935     if (size == 0)
936     buf[size++] = '\n';
937     else if (buf[size - 1] != '\n')
938     buf[size++] = '\n';
939     buf[size] = '\0';
940    
941      for (i = 0; i < line->numElements; i++) {   *bufPtr = buf;
  free(line->elements[i].item);  
  free(line->elements[i].indent);  
     }  
942    
943      if (line->elements) free(line->elements);   return 0;
944      lineInit(line);  }
945    
946    static void lineInit(struct singleLine *line)
947    {
948     line->type = LT_UNIDENTIFIED;
949     line->indent = NULL;
950     line->elements = NULL;
951     line->numElements = 0;
952     line->next = NULL;
953  }  }
954    
955  static int lineWrite(FILE * out, struct singleLine * line,  struct singleLine *lineDup(struct singleLine *line)
956       struct configFileInfo * cfi) {  {
957      int i;   struct singleLine *newLine = malloc(sizeof(*newLine));
958    
959      if (fprintf(out, "%s", line->indent) == -1) return -1;   newLine->indent = strdup(line->indent);
960     newLine->next = NULL;
961     newLine->type = line->type;
962     newLine->numElements = line->numElements;
963     newLine->elements = malloc(sizeof(*newLine->elements) *
964       newLine->numElements);
965    
966      for (i = 0; i < line->numElements; i++) {   for (int i = 0; i < newLine->numElements; i++) {
967   if (i == 1 && line->type == LT_KERNELARGS && cfi->argsInQuotes)   newLine->elements[i].indent = strdup(line->elements[i].indent);
968      if (fputc('"', out) == EOF) return -1;   newLine->elements[i].item = strdup(line->elements[i].item);
969     }
970    
971   if (fprintf(out, "%s", line->elements[i].item) == -1) return -1;   return newLine;
972   if (i < line->numElements - 1)  }
     if (fprintf(out, "%s", line->elements[i].indent) == -1) return -1;  
     }  
973    
974      if (line->type == LT_KERNELARGS && cfi->argsInQuotes)  static void lineFree(struct singleLine *line)
975   if (fputc('"', out) == EOF) return -1;  {
976     if (line->indent)
977     free(line->indent);
978    
979      if (fprintf(out, "\n") == -1) return -1;   for (int i = 0; i < line->numElements; i++) {
980     free(line->elements[i].item);
981     free(line->elements[i].indent);
982     }
983    
984      return 0;   if (line->elements)
985     free(line->elements);
986     lineInit(line);
987  }  }
988    
989  /* we've guaranteed that the buffer ends w/ \n\0 */  static int lineWrite(FILE * out, struct singleLine *line,
990  static int getNextLine(char ** bufPtr, struct singleLine * line,       struct configFileInfo *cfi)
991                         struct configFileInfo * cfi) {  {
992      char * end;   if (fprintf(out, "%s", line->indent) == -1)
993      char * start = *bufPtr;   return -1;
     char * chptr;  
     int elementsAlloced = 0;  
     struct lineElement * element;  
     int first = 1;  
994    
995      lineFree(line);   for (int i = 0; i < line->numElements; i++) {
996     /* Need to handle this, because we strip the quotes from
997     * menuentry when read it. */
998     if (line->type == LT_MENUENTRY && i == 1) {
999     if (!isquote(*line->elements[i].item)) {
1000     int substring = 0;
1001     /* If the line contains nested quotes, we did
1002     * not strip the "interna" quotes and we must
1003     * use the right quotes again when writing
1004     * the updated file. */
1005     for (int j = i; j < line->numElements; j++) {
1006     if (strchr(line->elements[i].item, '\'')
1007        != NULL) {
1008     substring = 1;
1009     fprintf(out, "\"%s\"",
1010     line->elements[i].item);
1011     break;
1012     }
1013     }
1014     if (!substring)
1015     fprintf(out, "\'%s\'",
1016     line->elements[i].item);
1017     } else {
1018     fprintf(out, "%s", line->elements[i].item);
1019     }
1020     fprintf(out, "%s", line->elements[i].indent);
1021    
1022      end = strchr(start, '\n');   continue;
1023      *end = '\0';   }
     *bufPtr = end + 1;  
1024    
1025      for (chptr = start; *chptr && isspace(*chptr); chptr++) ;   if (i == 1 && line->type == LT_KERNELARGS && cfi->argsInQuotes)
1026     if (fputc('"', out) == EOF)
1027     return -1;
1028    
1029     if (fprintf(out, "%s", line->elements[i].item) == -1)
1030     return -1;
1031     if (i < line->numElements - 1 || line->type == LT_SET_VARIABLE)
1032     if (fprintf(out, "%s", line->elements[i].indent) == -1)
1033     return -1;
1034     }
1035    
1036     if (line->type == LT_KERNELARGS && cfi->argsInQuotes)
1037     if (fputc('"', out) == EOF)
1038     return -1;
1039    
1040      line->indent = strndup(start, chptr - start);   if (fprintf(out, "\n") == -1)
1041      start = chptr;   return -1;
1042    
1043      while (start < end) {   return 0;
1044   /* we know !isspace(*start) */  }
1045    
1046   if (elementsAlloced == line->numElements) {  /* we've guaranteed that the buffer ends w/ \n\0 */
1047      elementsAlloced += 5;  static int getNextLine(char **bufPtr, struct singleLine *line,
1048      line->elements = realloc(line->elements,         struct configFileInfo *cfi)
1049   sizeof(*line->elements) * elementsAlloced);  {
1050   }   char *end;
1051     char *start = *bufPtr;
1052     char *chptr;
1053     int elementsAlloced = 0;
1054     struct lineElement *element;
1055     int first = 1;
1056    
1057   element = line->elements + line->numElements;   lineFree(line);
1058    
1059   chptr = start;   end = strchr(start, '\n');
1060   while (*chptr && !isspace(*chptr)) {   *end = '\0';
1061      if (first && *chptr == '=') break;   *bufPtr = end + 1;
     chptr++;  
  }  
  element->item = strndup(start, chptr - start);  
  start = chptr;  
1062    
1063          /* lilo actually accepts the pathological case of append = " foo " */   for (chptr = start; *chptr && isspace(*chptr); chptr++) ;
         if (*start == '=')  
             chptr = start + 1;  
         else  
             chptr = start;  
   
         do {  
             for (; *chptr && isspace(*chptr); chptr++);  
             if (*chptr == '=')  
                 chptr = chptr + 1;  
         } while (isspace(*chptr));  
1064    
1065   element->indent = strndup(start, chptr - start);   line->indent = strndup(start, chptr - start);
1066   start = chptr;   start = chptr;
1067    
1068   line->numElements++;   while (start < end) {
1069   first = 0;   /* we know !isspace(*start) */
     }  
1070    
1071      if (!line->numElements)   if (elementsAlloced == line->numElements) {
1072   line->type = LT_WHITESPACE;   elementsAlloced += 5;
1073      else {   line->elements = realloc(line->elements,
1074   line->type = getTypeByKeyword(line->elements[0].item, cfi);   sizeof(*line->elements) *
1075   if (line->type == LT_UNKNOWN) {   elementsAlloced);
1076              /* zipl does [title] instead of something reasonable like all   }
              * the other boot loaders.  kind of ugly */  
             if (cfi->titleBracketed && isBracketedTitle(line)) {  
                 line->type = LT_TITLE;  
             }  
   
     /* this is awkward, but we need to be able to handle keywords  
        that begin with a # (specifically for #boot in grub.conf),  
        but still make comments lines with no elements (everything  
        stored in the indent */  
     if (*line->elements[0].item == '#') {  
  char * fullLine;  
  int len;  
  int i;  
   
  len = strlen(line->indent);  
  for (i = 0; i < line->numElements; i++)  
     len += strlen(line->elements[i].item) +  
    strlen(line->elements[i].indent);  
1077    
1078   fullLine = malloc(len + 1);   element = line->elements + line->numElements;
  strcpy(fullLine, line->indent);  
  free(line->indent);  
  line->indent = fullLine;  
1079    
1080   for (i = 0; i < line->numElements; i++) {   chptr = start;
1081      strcat(fullLine, line->elements[i].item);   while (*chptr && !isspace(*chptr)) {
1082      strcat(fullLine, line->elements[i].indent);   if (first && *chptr == '=')
1083      free(line->elements[i].item);   break;
1084      free(line->elements[i].indent);   chptr++;
1085   }   }
1086     if (line->type == LT_UNIDENTIFIED)
1087     line->type = getTypeByKeyword(start, cfi);
1088     element->item = strndup(start, chptr - start);
1089     start = chptr;
1090    
1091     /* lilo actually accepts the pathological case of
1092     * append = " foo " */
1093     if (*start == '=')
1094     chptr = start + 1;
1095     else
1096     chptr = start;
1097    
1098     do {
1099     for (; *chptr && isspace(*chptr); chptr++) ;
1100     if (*chptr == '=')
1101     chptr = chptr + 1;
1102     } while (isspace(*chptr));
1103    
1104   line->type = LT_WHITESPACE;   element->indent = strndup(start, chptr - start);
1105   line->numElements = 0;   start = chptr;
     }  
  } else {  
  struct keywordTypes *kw;  
1106    
1107   kw = getKeywordByType(line->type, cfi);   line->numElements++;
1108     first = 0;
1109     }
1110    
1111   /* space isn't the only separator, we need to split   if (!line->numElements)
1112   * elements up more   line->type = LT_WHITESPACE;
1113   */   else {
1114   if (!isspace(kw->separatorChar)) {   line->type = getTypeByKeyword(line->elements[0].item, cfi);
1115      int i;   if (line->type == LT_UNKNOWN) {
1116      char indent[2] = "";   /* zipl does [title] instead of something reasonable
1117      indent[0] = kw->separatorChar;   * like all the other boot loaders.  kind of ugly */
1118      for (i = 1; i < line->numElements; i++) {   if (cfi->titleBracketed && isBracketedTitle(line)) {
1119   char *p;   line->type = LT_TITLE;
  int j;  
  int numNewElements;  
   
  numNewElements = 0;  
  p = line->elements[i].item;  
  while (*p != '\0') {  
  if (*p == kw->separatorChar)  
  numNewElements++;  
  p++;  
  }  
  if (line->numElements + numNewElements >= elementsAlloced) {  
  elementsAlloced += numNewElements + 5;  
  line->elements = realloc(line->elements,  
     sizeof(*line->elements) * elementsAlloced);  
  }  
   
  for (j = line->numElements; j > i; j--) {  
  line->elements[j + numNewElements] = line->elements[j];  
1120   }   }
  line->numElements += numNewElements;  
1121    
1122   p = line->elements[i].item;   /* this is awkward, but we need to be able to handle
1123   while (*p != '\0') {   * keywords that begin with a # (specifically for
1124     * #boot in grub.conf), but still make comments lines
1125   while (*p != kw->separatorChar && *p != '\0') p++;   * with no elements (everything stored in the indent
1126   if (*p == '\0') {   */
1127   break;   if (*line->elements[0].item == '#') {
1128     char *fullLine;
1129     int len;
1130    
1131     len = strlen(line->indent);
1132     for (int i = 0; i < line->numElements; i++)
1133     len += strlen(line->elements[i].item) +
1134        strlen(line->elements[i].indent);
1135    
1136     fullLine = malloc(len + 1);
1137     strcpy(fullLine, line->indent);
1138     free(line->indent);
1139     line->indent = fullLine;
1140    
1141     for (int i = 0; i < line->numElements; i++) {
1142     strcat(fullLine,
1143           line->elements[i].item);
1144     strcat(fullLine,
1145           line->elements[i].indent);
1146     free(line->elements[i].item);
1147     free(line->elements[i].indent);
1148   }   }
1149    
1150   free(line->elements[i].indent);   line->type = LT_WHITESPACE;
1151   line->elements[i].indent = strdup(indent);   line->numElements = 0;
  *p++ = '\0';  
  i++;  
  line->elements[i].item = strdup(p);  
  line->elements[i].indent = strdup("");  
  p = line->elements[i].item;  
1152   }   }
1153      }   } else if (line->type == LT_INITRD) {
1154   }   struct keywordTypes *kw;
  }  
     }  
1155    
1156      return 0;   kw = getKeywordByType(line->type, cfi);
 }  
1157    
1158  static struct grubConfig * readConfig(const char * inName,   /* space isn't the only separator, we need to split
1159        struct configFileInfo * cfi) {   * elements up more
1160      int in;   */
1161      char * incoming = NULL, * head;   if (!isspace(kw->separatorChar)) {
1162      int rc;   char indent[2] = "";
1163      int sawEntry = 0;   indent[0] = kw->separatorChar;
1164      int movedLine = 0;   for (int i = 1; i < line->numElements; i++) {
1165      struct grubConfig * cfg;   char *p;
1166      struct singleLine * last = NULL, * line, * defaultLine = NULL;   int numNewElements;
1167      char * end;  
1168      struct singleEntry * entry = NULL;   numNewElements = 0;
1169      int i, len;   p = line->elements[i].item;
1170      char * buf;   while (*p != '\0') {
1171     if (*p == kw->separatorChar)
1172      if (!strcmp(inName, "-")) {   numNewElements++;
1173   in = 0;   p++;
1174      } else {   }
1175   if ((in = open(inName, O_RDONLY)) < 0) {   if (line->numElements +
1176      fprintf(stderr, _("error opening %s for read: %s\n"),      numNewElements >= elementsAlloced) {
1177      inName, strerror(errno));   elementsAlloced +=
1178      return NULL;      numNewElements + 5;
1179   }   line->elements =
1180      }      realloc(line->elements,
1181        sizeof(*line->
1182       elements) *
1183        elementsAlloced);
1184     }
1185    
1186      rc = readFile(in, &incoming);   for (int j = line->numElements; j > i;
1187      close(in);       j--) {
1188      if (rc) return NULL;   line->elements[j +
1189           numNewElements] =
1190      head = incoming;      line->elements[j];
1191      cfg = malloc(sizeof(*cfg));   }
1192      cfg->primaryIndent = strdup("");   line->numElements += numNewElements;
     cfg->secondaryIndent = strdup("\t");  
     cfg->flags = GRUB_CONFIG_NO_DEFAULT;  
     cfg->cfi = cfi;  
     cfg->theLines = NULL;  
     cfg->entries = NULL;  
     cfg->fallbackImage = 0;  
   
     /* copy everything we have */  
     while (*head) {  
  line = malloc(sizeof(*line));  
  lineInit(line);  
1193    
1194   if (getNextLine(&head, line, cfi)) {   p = line->elements[i].item;
1195      free(line);   while (*p != '\0') {
     /* XXX memory leak of everything in cfg */  
     return NULL;  
  }  
   
  if (!sawEntry && line->numElements) {  
     free(cfg->primaryIndent);  
     cfg->primaryIndent = strdup(line->indent);  
  } else if (line->numElements) {  
     free(cfg->secondaryIndent);  
     cfg->secondaryIndent = strdup(line->indent);  
  }  
   
  if (isEntrySeparator(line, cfi)) {  
     sawEntry = 1;  
     if (!entry) {  
  cfg->entries = malloc(sizeof(*entry));  
  entry = cfg->entries;  
     } else {  
  entry->next = malloc(sizeof(*entry));  
  entry = entry->next;  
     }  
1196    
1197      entry->skip = 0;   while (*p != kw->separatorChar
1198              entry->multiboot = 0;         && *p != '\0')
1199      entry->lines = NULL;   p++;
1200      entry->next = NULL;   if (*p == '\0') {
1201   }   break;
1202     }
1203   if (line->type == LT_DEFAULT && line->numElements == 2) {  
1204      cfg->flags &= ~GRUB_CONFIG_NO_DEFAULT;   line->elements[i + 1].indent =
1205      defaultLine = line;      line->elements[i].indent;
1206     line->elements[i].indent =
1207          } else if (line->type == LT_KERNEL) {      strdup(indent);
1208      /* if by some freak chance this is multiboot and the "module"   *p++ = '\0';
1209       * lines came earlier in the template, make sure to use LT_HYPER   i++;
1210       * instead of LT_KERNEL now   line->elements[i].item =
1211       */      strdup(p);
1212      if (entry->multiboot)   }
1213   line->type = LT_HYPER;   }
1214     }
1215          } else if (line->type == LT_MBMODULE) {   } else if (line->type == LT_SET_VARIABLE) {
1216      /* go back and fix the LT_KERNEL line to indicate LT_HYPER   /* and if it's a "set blah=" we need to split it
1217       * instead, now that we know this is a multiboot entry.   * yet a third way to avoid rhbz# XXX FIXME :/
1218       * This only applies to grub, but that's the only place we   */
1219       * should find LT_MBMODULE lines anyway.   char *eq;
1220       */   int l;
1221      struct singleLine * l;   int numElements = line->numElements;
1222      for (l = entry->lines; l; l = l->next) {   struct lineElement *newElements;
1223   if (l->type == LT_HYPER)   eq = strchr(line->elements[1].item, '=');
1224      break;   if (!eq)
1225   else if (l->type == LT_KERNEL) {   return 0;
1226      l->type = LT_HYPER;   l = eq - line->elements[1].item;
1227      break;   if (eq[1] != 0)
1228   }   numElements++;
1229      }   newElements = calloc(numElements,sizeof (*newElements));
1230              entry->multiboot = 1;   memcpy(&newElements[0], &line->elements[0],
1231           sizeof (newElements[0]));
1232   } else if (line->type == LT_HYPER) {   newElements[1].item =
1233      entry->multiboot = 1;   strndup(line->elements[1].item, l);
1234     newElements[1].indent = "=";
1235   } else if (line->type == LT_FALLBACK && line->numElements == 2) {   *(eq++) = '\0';
1236      cfg->fallbackImage = strtol(line->elements[1].item, &end, 10);   newElements[2].item = strdup(eq);
1237      if (*end) cfg->fallbackImage = -1;   free(line->elements[1].item);
1238     if (line->elements[1].indent)
1239   } else if (line->type == LT_TITLE && line->numElements > 1) {   newElements[2].indent = line->elements[1].indent;
1240      /* make the title a single argument (undoing our parsing) */   for (int i = 2; i < line->numElements; i++) {
1241      len = 0;   newElements[i+1].item = line->elements[i].item;
1242      for (i = 1; i < line->numElements; i++) {   newElements[i+1].indent =
1243   len += strlen(line->elements[i].item);   line->elements[i].indent;
1244   len += strlen(line->elements[i].indent);   }
1245      }   free(line->elements);
1246      buf = malloc(len + 1);   line->elements = newElements;
1247      *buf = '\0';   line->numElements = numElements;
1248     }
1249     }
1250    
1251      for (i = 1; i < line->numElements; i++) {   return 0;
1252   strcat(buf, line->elements[i].item);  }
  free(line->elements[i].item);  
1253    
1254   if ((i + 1) != line->numElements) {  static int isnumber(const char *s)
1255      strcat(buf, line->elements[i].indent);  {
1256      free(line->elements[i].indent);   int i;
1257   }   for (i = 0; s[i] != '\0'; i++)
1258      }   if (s[i] < '0' || s[i] > '9')
1259     return 0;
1260      line->elements[1].indent =   return i;
1261      line->elements[line->numElements - 1].indent;  }
     line->elements[1].item = buf;  
     line->numElements = 2;  
   
  } else if (line->type == LT_KERNELARGS && cfi->argsInQuotes) {  
     /* Strip off any " which may be present; they'll be put back  
        on write. This is one of the few (the only?) places that grubby  
        canonicalizes the output */  
   
     if (line->numElements >= 2) {  
  int last, len;  
   
  if (*line->elements[1].item == '"')  
     memmove(line->elements[1].item, line->elements[1].item + 1,  
     strlen(line->elements[1].item + 1) + 1);  
   
  last = line->numElements - 1;  
  len = strlen(line->elements[last].item) - 1;  
  if (line->elements[last].item[len] == '"')  
     line->elements[last].item[len] = '\0';  
     }  
  }  
   
  /* If we find a generic config option which should live at the  
    top of the file, move it there. Old versions of grubby were  
    probably responsible for putting new images in the wrong  
    place in front of it anyway. */  
  if (sawEntry && line->type == LT_GENERIC) {  
  struct singleLine **l = &cfg->theLines;  
  struct singleLine **last_nonws = &cfg->theLines;  
  while (*l) {  
  if ((*l)->type != LT_WHITESPACE)  
  last_nonws = &((*l)->next);  
  l = &((*l)->next);  
  }  
  line->next = *last_nonws;  
  *last_nonws = line;  
  movedLine = 1;  
  continue; /* without setting 'last' */  
  }  
   
  /* If a second line of whitespace happens after a generic option  
    which was moved, drop it. */  
  if (movedLine && line->type == LT_WHITESPACE && last->type == LT_WHITESPACE) {  
  lineFree(line);  
  free(line);  
  movedLine = 0;  
  continue;  
  }  
  movedLine = 0;  
1262    
1263   if (sawEntry) {  static struct grubConfig *readConfig(const char *inName,
1264      if (!entry->lines)       struct configFileInfo *cfi)
1265   entry->lines = line;  {
1266      else   int in;
1267   last->next = line;   char *incoming = NULL, *head;
1268      dbgPrintf("readConfig added %d to %p\n", line->type, entry);   int rc;
1269     int sawEntry = 0;
1270     int movedLine = 0;
1271     struct grubConfig *cfg;
1272     struct singleLine *last = NULL, *line, *defaultLine = NULL;
1273     char *end;
1274     struct singleEntry *entry = NULL;
1275     int len;
1276     char *buf;
1277    
1278     if (inName == NULL) {
1279     printf("Could not find bootloader configuration\n");
1280     exit(1);
1281     } else if (!strcmp(inName, "-")) {
1282     in = 0;
1283   } else {   } else {
1284      if (!cfg->theLines)   if ((in = open(inName, O_RDONLY)) < 0) {
1285   cfg->theLines = line;   fprintf(stderr, _("error opening %s for read: %s\n"),
1286      else   inName, strerror(errno));
1287   last->next = line;   return NULL;
1288      dbgPrintf("readConfig added %d to cfg\n", line->type);   }
1289   }   }
1290    
1291   last = line;   rc = readFile(in, &incoming);
1292      }   close(in);
1293     if (rc)
1294      free(incoming);   return NULL;
1295    
1296     head = incoming;
1297     cfg = malloc(sizeof(*cfg));
1298     cfg->primaryIndent = strdup("");
1299     cfg->secondaryIndent = strdup("\t");
1300     cfg->flags = GRUB_CONFIG_NO_DEFAULT;
1301     cfg->cfi = cfi;
1302     cfg->theLines = NULL;
1303     cfg->entries = NULL;
1304     cfg->fallbackImage = 0;
1305     cfg->isModified = 0;
1306    
1307     /* copy everything we have */
1308     while (*head) {
1309     line = malloc(sizeof(*line));
1310     lineInit(line);
1311    
1312     if (getNextLine(&head, line, cfi)) {
1313     free(line);
1314     /* XXX memory leak of everything in cfg */
1315     return NULL;
1316     }
1317    
1318      if (defaultLine) {   if (!sawEntry && line->numElements) {
1319   if (cfi->defaultSupportSaved &&   free(cfg->primaryIndent);
1320   !strncmp(defaultLine->elements[1].item, "saved", 5)) {   cfg->primaryIndent = strdup(line->indent);
1321      cfg->defaultImage = DEFAULT_SAVED;   } else if (line->numElements) {
1322   } else if (cfi->defaultIsIndex) {   free(cfg->secondaryIndent);
1323      cfg->defaultImage = strtol(defaultLine->elements[1].item, &end, 10);   cfg->secondaryIndent = strdup(line->indent);
1324      if (*end) cfg->defaultImage = -1;   }
  } else if (defaultLine->numElements >= 2) {  
     i = 0;  
     while ((entry = findEntryByIndex(cfg, i))) {  
  for (line = entry->lines; line; line = line->next)  
     if (line->type == LT_TITLE) break;  
   
                 if (!cfi->titleBracketed) {  
                     if (line && (line->numElements >= 2) &&  
                         !strcmp(defaultLine->elements[1].item,  
                                 line->elements[1].item)) break;  
                 } else if (line) {  
                     if (!strcmp(defaultLine->elements[1].item,  
                                 extractTitle(line))) break;  
                 }  
  i++;  
  entry = NULL;  
     }  
1325    
1326      if (entry){   if (isEntryStart(line, cfi) || (cfg->entries && !sawEntry)) {
1327          cfg->defaultImage = i;   sawEntry = 1;
1328      }else{   if (!entry) {
1329          cfg->defaultImage = -1;   cfg->entries = malloc(sizeof(*entry));
1330      }   entry = cfg->entries;
1331   }   } else {
1332      } else {   entry->next = malloc(sizeof(*entry));
1333          cfg->defaultImage = 0;   entry = entry->next;
1334      }   }
1335    
1336      return cfg;   entry->skip = 0;
1337  }   entry->multiboot = 0;
1338     entry->lines = NULL;
1339     entry->next = NULL;
1340     }
1341    
1342  static void writeDefault(FILE * out, char * indent,   if (line->type == LT_SET_VARIABLE) {
1343   char * separator, struct grubConfig * cfg) {   dbgPrintf("found 'set' command (%d elements): ",
1344      struct singleEntry * entry;    line->numElements);
1345      struct singleLine * line;   dbgPrintf("%s", line->indent);
1346      int i;   for (int i = 0; i < line->numElements; i++)
1347     dbgPrintf("\"%s\"%s", line->elements[i].item,
1348      line->elements[i].indent);
1349     dbgPrintf("\n");
1350     struct keywordTypes *kwType =
1351        getKeywordByType(LT_DEFAULT, cfi);
1352     if (kwType && line->numElements == 3
1353        && !strcmp(line->elements[1].item, kwType->key)
1354        && !is_special_grub2_variable(
1355     line->elements[2].item)) {
1356     dbgPrintf("Line sets default config\n");
1357     cfg->flags &= ~GRUB_CONFIG_NO_DEFAULT;
1358     defaultLine = line;
1359     }
1360     } else if (iskernel(line->type)) {
1361     /* if by some freak chance this is multiboot and the
1362     * "module" lines came earlier in the template, make
1363     * sure to use LT_HYPER instead of LT_KERNEL now
1364     */
1365     if (entry && entry->multiboot)
1366     line->type = LT_HYPER;
1367    
1368      if (!cfg->defaultImage && cfg->flags == GRUB_CONFIG_NO_DEFAULT) return;   } else if (line->type == LT_MBMODULE) {
1369     /* go back and fix the LT_KERNEL line to indicate
1370     * LT_HYPER instead, now that we know this is a
1371     * multiboot entry.  This only applies to grub, but
1372     * that's the only place we should find LT_MBMODULE
1373     * lines anyway.
1374     */
1375     for (struct singleLine * l = entry->lines; l;
1376         l = l->next) {
1377     if (l->type == LT_HYPER)
1378     break;
1379     else if (iskernel(l->type)) {
1380     l->type = LT_HYPER;
1381     break;
1382     }
1383     }
1384     entry->multiboot = 1;
1385    
1386      if (cfg->defaultImage == DEFAULT_SAVED)   } else if (line->type == LT_HYPER) {
1387   fprintf(out, "%sdefault%ssaved\n", indent, separator);   entry->multiboot = 1;
     else if (cfg->defaultImage > -1) {  
  if (cfg->cfi->defaultIsIndex) {  
     fprintf(out, "%sdefault%s%d\n", indent, separator,  
     cfg->defaultImage);  
  } else {  
     int image = cfg->defaultImage;  
1388    
1389      entry = cfg->entries;   } else if (line->type == LT_FALLBACK && line->numElements == 2) {
1390      while (entry && entry->skip) entry = entry->next;   cfg->fallbackImage =
1391        strtol(line->elements[1].item, &end, 10);
1392     if (*end)
1393     cfg->fallbackImage = -1;
1394    
1395     } else if ((line->type == LT_DEFAULT && cfi->defaultIsUnquoted)
1396       || (line->type == LT_TITLE
1397           && line->numElements > 1)) {
1398     /* make the title/default a single argument (undoing
1399     * our parsing) */
1400     len = 0;
1401     for (int i = 1; i < line->numElements; i++) {
1402     len += strlen(line->elements[i].item);
1403     len += strlen(line->elements[i].indent);
1404     }
1405     buf = malloc(len + 1);
1406     *buf = '\0';
1407    
1408      i = 0;   for (int i = 1; i < line->numElements; i++) {
1409      while (entry && i < image) {   strcat(buf, line->elements[i].item);
1410   entry = entry->next;   free(line->elements[i].item);
1411    
1412     if ((i + 1) != line->numElements) {
1413     strcat(buf, line->elements[i].indent);
1414     free(line->elements[i].indent);
1415     }
1416     }
1417    
1418   while (entry && entry->skip) entry = entry->next;   line->elements[1].indent =
1419   i++;      line->elements[line->numElements - 1].indent;
1420      }   line->elements[1].item = buf;
1421     line->numElements = 2;
1422     } else if (line->type == LT_MENUENTRY && line->numElements > 3) {
1423     /* let --remove-kernel="TITLE=what" work */
1424     len = 0;
1425     char *extras;
1426     char *title;
1427     /* initially unseen value */
1428     char quote_char = '\0';
1429    
1430     for (int i = 1; i < line->numElements; i++) {
1431     len += strlen(line->elements[i].item);
1432     len += strlen(line->elements[i].indent);
1433     }
1434     buf = malloc(len + 1);
1435     *buf = '\0';
1436    
1437      if (!entry) return;   /* allocate mem for extra flags. */
1438     extras = malloc(len + 1);
1439     *extras = '\0';
1440    
1441     /* get title. */
1442     for (int i = 0; i < line->numElements; i++) {
1443     if (!strcmp
1444        (line->elements[i].item, "menuentry"))
1445     continue;
1446     if (isquote(*line->elements[i].item)
1447        && quote_char == '\0') {
1448     /* ensure we properly pair off quotes */
1449     quote_char = *line->elements[i].item;
1450     title = line->elements[i].item + 1;
1451     } else {
1452     title = line->elements[i].item;
1453     }
1454    
1455      line = getLineByType(LT_TITLE, entry->lines);   len = strlen(title);
1456     if (title[len - 1] == quote_char) {
1457     strncat(buf, title, len - 1);
1458     break;
1459     } else {
1460     strcat(buf, title);
1461     strcat(buf, line->elements[i].indent);
1462     }
1463     }
1464    
1465      if (line && line->numElements >= 2)   /* get extras */
1466   fprintf(out, "%sdefault%s%s\n", indent, separator,   int count = 0;
1467   line->elements[1].item);   quote_char = '\0';
1468              else if (line && (line->numElements == 1) &&   for (int i = 0; i < line->numElements; i++) {
1469                       cfg->cfi->titleBracketed) {   if (count >= 2) {
1470   fprintf(out, "%sdefault%s%s\n", indent, separator,   strcat(extras, line->elements[i].item);
1471                          extractTitle(line));   strcat(extras,
1472              }         line->elements[i].indent);
1473   }   }
     }  
 }  
1474    
1475  static int writeConfig(struct grubConfig * cfg, char * outName,   if (!strcmp
1476         const char * prefix) {      (line->elements[i].item, "menuentry"))
1477      FILE * out;   continue;
1478      struct singleLine * line;  
1479      struct singleEntry * entry;   /* count ' or ", there should be two in menuentry line. */
1480      char * tmpOutName;   if (isquote(*line->elements[i].item)
1481      int needs = MAIN_DEFAULT;      && quote_char == '\0') {
1482      struct stat sb;   /* ensure we properly pair off quotes */
1483      int i;   quote_char = *line->elements[i].item;
1484     count++;
1485      if (!strcmp(outName, "-")) {   }
  out = stdout;  
  tmpOutName = NULL;  
     } else {  
  if (!lstat(outName, &sb) && S_ISLNK(sb.st_mode)) {  
     char * buf;  
     int len = 256;  
     int rc;  
   
     /* most likely the symlink is relative, so change our  
        directory to the dir of the symlink */  
             rc = chdir(dirname(strdupa(outName)));  
     do {  
  buf = alloca(len + 1);  
  rc = readlink(basename(outName), buf, len);  
  if (rc == len) len += 256;  
     } while (rc == len);  
       
     if (rc < 0) {  
  fprintf(stderr, _("grubby: error readlink link %s: %s\n"),  
  outName, strerror(errno));  
  return 1;  
     }  
   
     outName = buf;  
     outName[rc] = '\0';  
  }  
   
  tmpOutName = alloca(strlen(outName) + 2);  
  sprintf(tmpOutName, "%s-", outName);  
  out = fopen(tmpOutName, "w");  
  if (!out) {  
     fprintf(stderr, _("grubby: error creating %s: %s\n"), tmpOutName,  
     strerror(errno));  
     return 1;  
  }  
   
  if (!stat(outName, &sb)) {  
     if (chmod(tmpOutName, sb.st_mode & ~(S_IFMT))) {  
  fprintf(stderr, _("grubby: error setting perms on %s: %s\n"),  
         tmpOutName, strerror(errno));  
  fclose(out);  
  unlink(tmpOutName);  
                 return 1;  
     }  
  }  
     }  
1486    
1487      line = cfg->theLines;   len = strlen(line->elements[i].item);
     while (line) {  
  if (line->type == LT_DEFAULT) {  
     writeDefault(out, line->indent, line->elements[0].indent, cfg);  
     needs &= ~MAIN_DEFAULT;  
  } else if (line->type == LT_FALLBACK) {  
     if (cfg->fallbackImage > -1)  
  fprintf(out, "%s%s%s%d\n", line->indent,  
  line->elements[0].item, line->elements[0].indent,  
  cfg->fallbackImage);  
  } else {  
     if (lineWrite(out, line, cfg->cfi) == -1) {  
                 fprintf(stderr, _("grubby: error writing %s: %s\n"),  
                         tmpOutName, strerror(errno));  
                 fclose(out);  
                 unlink(tmpOutName);  
                 return 1;  
             }  
  }  
1488    
1489   line = line->next;   if (line->elements[i].item[len - 1] ==
1490      }      quote_char)
1491     count++;
1492    
1493      if (needs & MAIN_DEFAULT) {   /* ok, we get the final ' or ", others are extras. */
1494   writeDefault(out, cfg->primaryIndent, "=", cfg);   }
1495   needs &= ~MAIN_DEFAULT;   line->elements[1].indent =
1496      }      line->elements[line->numElements - 2].indent;
1497     line->elements[1].item = buf;
1498     line->elements[2].indent =
1499        line->elements[line->numElements - 2].indent;
1500     line->elements[2].item = extras;
1501     line->numElements = 3;
1502     } else if (line->type == LT_KERNELARGS && cfi->argsInQuotes) {
1503     /* Strip off any " which may be present; they'll be
1504     * put back on write. This is one of the few (the
1505     * only?) places that grubby canonicalizes the output
1506     */
1507     if (line->numElements >= 2) {
1508     int last, len;
1509    
1510      i = 0;   if (isquote(*line->elements[1].item))
1511      while ((entry = findEntryByIndex(cfg, i++))) {   memmove(line->elements[1].item,
1512   if (entry->skip) continue;   line->elements[1].item + 1,
1513     strlen(line->elements[1].item +
1514   line = entry->lines;         1) + 1);
1515   while (line) {  
1516      if (lineWrite(out, line, cfg->cfi) == -1) {   last = line->numElements - 1;
1517                  fprintf(stderr, _("grubby: error writing %s: %s\n"),   len = strlen(line->elements[last].item) - 1;
1518                          tmpOutName, strerror(errno));   if (isquote(line->elements[last].item[len]))
1519                  fclose(out);   line->elements[last].item[len] = '\0';
1520                  unlink(tmpOutName);   }
1521                  return 1;   }
             }  
     line = line->next;  
  }  
     }  
1522    
1523      if (tmpOutName) {   if (line->type == LT_DEFAULT && line->numElements == 2) {
1524   if (rename(tmpOutName, outName)) {   cfg->flags &= ~GRUB_CONFIG_NO_DEFAULT;
1525      fprintf(stderr, _("grubby: error moving %s to %s: %s\n"),   defaultLine = line;
1526      tmpOutName, outName, strerror(errno));   }
     unlink(outName);  
             return 1;  
  }  
     }  
1527    
1528      return 0;   /* If we find a generic config option which should live at the
1529  }     top of the file, move it there. Old versions of grubby were
1530       probably responsible for putting new images in the wrong
1531       place in front of it anyway. */
1532     if (sawEntry && line->type == LT_GENERIC) {
1533     struct singleLine **l = &cfg->theLines;
1534     struct singleLine **last_nonws = &cfg->theLines;
1535     while (*l) {
1536     if ((*l)->type != LT_WHITESPACE)
1537     last_nonws = &((*l)->next);
1538     l = &((*l)->next);
1539     }
1540     line->next = *last_nonws;
1541     *last_nonws = line;
1542     movedLine = 1;
1543     continue; /* without setting 'last' */
1544     }
1545    
1546  static int numEntries(struct grubConfig *cfg) {   /* If a second line of whitespace happens after a generic
1547      int i = 0;   * option which was moved, drop it. */
1548      struct singleEntry * entry;   if (movedLine && line->type == LT_WHITESPACE
1549        && last->type == LT_WHITESPACE) {
1550      entry = cfg->entries;   lineFree(line);
1551      while (entry) {   free(line);
1552          if (!entry->skip)   movedLine = 0;
1553              i++;   continue;
1554          entry = entry->next;   }
1555      }   movedLine = 0;
     return i;  
 }  
1556    
1557  static char *findDiskForRoot()   if (sawEntry) {
1558  {   if (!entry->lines)
1559      int fd;   entry->lines = line;
1560      char buf[65536];   else
1561      char *devname;   last->next = line;
1562      char *chptr;   dbgPrintf("readConfig added %s to %p\n",
1563      int rc;    getKeyByType(line->type, cfi), entry);
1564    
1565      if ((fd = open(_PATH_MOUNTED, O_RDONLY)) < 0) {   /* we could have seen this outside of an entry... if
1566          fprintf(stderr, "grubby: failed to open %s: %s\n",   * so, we ignore it like any other line we don't grok
1567                  _PATH_MOUNTED, strerror(errno));   */
1568          return NULL;   if (line->type == LT_ENTRY_END && sawEntry)
1569      }   sawEntry = 0;
1570     } else {
1571     if (!cfg->theLines)
1572     cfg->theLines = line;
1573     else
1574     last->next = line;
1575     dbgPrintf("readConfig added %s to cfg\n",
1576      getKeyByType(line->type, cfi));
1577     }
1578    
1579      rc = read(fd, buf, sizeof(buf) - 1);   last = line;
1580      if (rc <= 0) {   }
         fprintf(stderr, "grubby: failed to read %s: %s\n",  
                 _PATH_MOUNTED, strerror(errno));  
         close(fd);  
         return NULL;  
     }  
     close(fd);  
     buf[rc] = '\0';  
     chptr = buf;  
   
     while (chptr && chptr != buf+rc) {  
         devname = chptr;  
   
         /*  
          * The first column of a mtab entry is the device, but if the entry is a  
          * special device it won't start with /, so move on to the next line.  
          */  
         if (*devname != '/') {  
             chptr = strchr(chptr, '\n');  
             if (chptr)  
                 chptr++;  
             continue;  
         }  
   
         /* Seek to the next space */  
         chptr = strchr(chptr, ' ');  
         if (!chptr) {  
             fprintf(stderr, "grubby: error parsing %s: %s\n",  
                     _PATH_MOUNTED, strerror(errno));  
             return NULL;  
         }  
   
         /*  
          * The second column of a mtab entry is the mount point, we are looking  
          * for '/' obviously.  
          */  
         if (*(++chptr) == '/' && *(++chptr) == ' ') {  
             /*  
              * Move back 2, which is the first space after the device name, set  
              * it to \0 so strdup will just get the devicename.  
              */  
             chptr -= 2;  
             *chptr = '\0';  
             return strdup(devname);  
         }  
   
         /* Next line */  
         chptr = strchr(chptr, '\n');  
         if (chptr)  
             chptr++;  
     }  
1581    
1582      return NULL;   free(incoming);
 }  
1583    
1584  int suitableImage(struct singleEntry * entry, const char * bootPrefix,   dbgPrintf("defaultLine is %s\n", defaultLine ? "set" : "unset");
1585    int skipRemoved, int flags) {   if (defaultLine) {
1586      struct singleLine * line;   if (defaultLine->numElements > 2 &&
1587      char * fullName;      cfi->defaultSupportSaved &&
1588      int i;      !strncmp(defaultLine->elements[2].item,
1589      char * dev;       "\"${saved_entry}\"", 16)) {
1590      char * rootspec;   cfg->cfi->defaultIsSaved = 1;
1591      char * rootdev;   cfg->defaultImage = DEFAULT_SAVED_GRUB2;
1592     if (cfg->cfi->getEnv) {
1593      if (skipRemoved && entry->skip) return 0;   char *defTitle =
1594        cfi->getEnv(cfg->cfi, "saved_entry");
1595      line = getLineByType(LT_KERNEL|LT_HYPER, entry->lines);   if (defTitle) {
1596      if (!line || line->numElements < 2) return 0;   int index = 0;
1597     if (isnumber(defTitle)) {
1598      if (flags & GRUBBY_BADIMAGE_OKAY) return 1;   index = atoi(defTitle);
1599     entry =
1600      fullName = alloca(strlen(bootPrefix) +      findEntryByIndex(cfg,
1601        strlen(line->elements[1].item) + 1);       index);
1602      rootspec = getRootSpecifier(line->elements[1].item);   } else {
1603      sprintf(fullName, "%s%s", bootPrefix,   entry =
1604              line->elements[1].item + (rootspec ? strlen(rootspec) : 0));      findEntryByTitle(cfg,
1605      if (access(fullName, R_OK)) return 0;       defTitle,
1606         &index);
1607      for (i = 2; i < line->numElements; i++)   }
1608   if (!strncasecmp(line->elements[i].item, "root=", 5)) break;   if (entry)
1609      if (i < line->numElements) {   cfg->defaultImage = index;
1610   dev = line->elements[i].item + 5;   }
1611      } else {   }
1612   /* look for a lilo style LT_ROOT line */   } else if (cfi->defaultIsVariable) {
1613   line = getLineByType(LT_ROOT, entry->lines);   if (defaultLine->numElements == 2) {
1614     char *value = defaultLine->elements[1].item + 8;
1615     while (*value && (*value == '"' ||
1616      *value == '\'' ||
1617      *value == ' ' ||
1618      *value == '\t'))
1619     value++;
1620     cfg->defaultImage = strtol(value, &end, 10);
1621     while (*end && (*end == '"' || *end == '\'' ||
1622     *end == ' ' || *end == '\t'))
1623     end++;
1624     if (*end)
1625     cfg->defaultImage = NO_DEFAULT_ENTRY;
1626     } else if (defaultLine->numElements == 3) {
1627     char *value = defaultLine->elements[2].item;
1628     while (*value && (*value == '"' ||
1629      *value == '\'' ||
1630      *value == ' ' ||
1631      *value == '\t'))
1632     value++;
1633     cfg->defaultImage = strtol(value, &end, 10);
1634     while (*end && (*end == '"' || *end == '\'' ||
1635     *end == ' ' || *end == '\t'))
1636     end++;
1637     if (*end)
1638     cfg->defaultImage = NO_DEFAULT_ENTRY;
1639     }
1640     } else if (cfi->defaultSupportSaved &&
1641       !strncmp(defaultLine->elements[1].item, "saved",
1642        5)) {
1643     cfg->defaultImage = DEFAULT_SAVED;
1644     } else if (cfi->defaultIsIndex) {
1645     cfg->defaultImage =
1646        strtol(defaultLine->elements[1].item, &end, 10);
1647     if (*end)
1648     cfg->defaultImage = NO_DEFAULT_ENTRY;
1649     } else if (defaultLine->numElements >= 2) {
1650     int i = 0;
1651     while ((entry = findEntryByIndex(cfg, i))) {
1652     for (line = entry->lines; line;
1653         line = line->next)
1654     if (line->type == LT_TITLE)
1655     break;
1656    
1657     if (!cfi->titleBracketed) {
1658     if (line && (line->numElements >= 2) &&
1659        !strcmp(defaultLine->elements[1].
1660        item,
1661        line->elements[1].item))
1662     break;
1663     } else if (line) {
1664     if (!strcmp
1665        (defaultLine->elements[1].item,
1666         extractTitle(cfg, line)))
1667     break;
1668     }
1669     i++;
1670     entry = NULL;
1671     }
1672    
1673   if (line && line->numElements >= 2) {   if (entry) {
1674      dev = line->elements[1].item;   cfg->defaultImage = i;
1675     } else {
1676     cfg->defaultImage = NO_DEFAULT_ENTRY;
1677     }
1678     }
1679     } else if (cfg->cfi->defaultIsSaved && cfg->cfi->getEnv) {
1680     char *defTitle = cfi->getEnv(cfg->cfi, "saved_entry");
1681     if (defTitle) {
1682     int index = 0;
1683     if (isnumber(defTitle)) {
1684     index = atoi(defTitle);
1685     entry = findEntryByIndex(cfg, index);
1686     } else {
1687     entry = findEntryByTitle(cfg, defTitle, &index);
1688     }
1689     if (entry)
1690     cfg->defaultImage = index;
1691     }
1692   } else {   } else {
1693      /* didn't succeed in finding a LT_ROOT, let's try LT_KERNELARGS.   cfg->defaultImage = FIRST_ENTRY_INDEX;
      * grub+multiboot uses LT_MBMODULE for the args, so check that too.  
      */  
     line = getLineByType(LT_KERNELARGS|LT_MBMODULE, entry->lines);  
   
             /* failed to find one */  
             if (!line) return 0;  
   
     for (i = 1; i < line->numElements; i++)  
         if (!strncasecmp(line->elements[i].item, "root=", 5)) break;  
     if (i < line->numElements)  
         dev = line->elements[i].item + 5;  
     else {  
  /* it failed too...  can't find root= */  
         return 0;  
             }  
1694   }   }
     }  
1695    
1696      dev = getpathbyspec(dev);   return cfg;
1697      if (!dev)  }
         return 0;  
1698    
1699      rootdev = findDiskForRoot();  static void writeDefault(FILE * out, char *indent,
1700      if (!rootdev)   char *separator, struct grubConfig *cfg)
1701   return 0;  {
1702     struct singleEntry *entry;
1703     struct singleLine *line;
1704     int i;
1705    
1706     if (!cfg->defaultImage && cfg->flags == GRUB_CONFIG_NO_DEFAULT)
1707     return;
1708    
1709     if (cfg->defaultImage == DEFAULT_SAVED)
1710     fprintf(out, "%sdefault%ssaved\n", indent, separator);
1711     else if (cfg->cfi->defaultIsSaved) {
1712     fprintf(out, "%sset default=\"${saved_entry}\"\n", indent);
1713     if (cfg->defaultImage >= FIRST_ENTRY_INDEX && cfg->cfi->setEnv) {
1714     char *title;
1715     int trueIndex, currentIndex;
1716    
1717     trueIndex = 0;
1718     currentIndex = 0;
1719    
1720     while ((entry = findEntryByIndex(cfg, currentIndex))) {
1721     if (!entry->skip) {
1722     if (trueIndex == cfg->defaultImage) {
1723     break;
1724     }
1725     trueIndex++;
1726     }
1727     currentIndex++;
1728     }
1729     line = getLineByType(LT_MENUENTRY, entry->lines);
1730     if (!line)
1731     line = getLineByType(LT_TITLE, entry->lines);
1732     if (line) {
1733     title = extractTitle(cfg, line);
1734     if (title)
1735     cfg->cfi->setEnv(cfg->cfi,
1736     "saved_entry", title);
1737     }
1738     }
1739     } else if (cfg->defaultImage >= FIRST_ENTRY_INDEX) {
1740     if (cfg->cfi->defaultIsIndex) {
1741     if (cfg->cfi->defaultIsVariable) {
1742     fprintf(out, "%sset default=\"%d\"\n", indent,
1743     cfg->defaultImage);
1744     } else {
1745     fprintf(out, "%sdefault%s%d\n", indent,
1746     separator, cfg->defaultImage);
1747     }
1748     } else {
1749     int image = cfg->defaultImage;
1750    
1751      if (!getuuidbydev(rootdev) || !getuuidbydev(dev)) {   entry = cfg->entries;
1752          free(rootdev);   while (entry && entry->skip)
1753          return 0;   entry = entry->next;
1754      }  
1755     i = 0;
1756     while (entry && i < image) {
1757     entry = entry->next;
1758    
1759      if (strcmp(getuuidbydev(rootdev), getuuidbydev(dev))) {   while (entry && entry->skip)
1760   free(rootdev);   entry = entry->next;
1761          return 0;   i++;
1762      }   }
1763    
1764      free(rootdev);   if (!entry)
1765     return;
1766    
1767      return 1;   line = getLineByType(LT_TITLE, entry->lines);
1768    
1769     if (line && line->numElements >= 2)
1770     fprintf(out, "%sdefault%s%s\n", indent,
1771     separator, line->elements[1].item);
1772     else if (line && (line->numElements == 1)
1773     && cfg->cfi->titleBracketed) {
1774     char *title = extractTitle(cfg, line);
1775     if (title) {
1776     fprintf(out, "%sdefault%s%s\n", indent,
1777     separator, title);
1778     free(title);
1779     }
1780     }
1781     }
1782     }
1783  }  }
1784    
1785  /* returns the first match on or after the one pointed to by index (if index  static int writeConfig(struct grubConfig *cfg, char *outName,
1786     is not NULL) which is not marked as skip */         const char *prefix)
1787  struct singleEntry * findEntryByPath(struct grubConfig * config,  {
1788       const char * kernel, const char * prefix,   FILE *out;
1789       int * index) {   struct singleLine *line;
1790      struct singleEntry * entry = NULL;   struct singleEntry *entry;
1791      struct singleLine * line;   char *tmpOutName;
1792      int i;   int needs = MAIN_DEFAULT;
1793      char * chptr;   struct stat sb;
1794      char * rootspec = NULL;   int i;
1795      enum lineType_e checkType = LT_KERNEL;  
1796     if (!strcmp(outName, "-")) {
1797     out = stdout;
1798     tmpOutName = NULL;
1799     } else {
1800     if (!lstat(outName, &sb) && S_ISLNK(sb.st_mode)) {
1801     char *buf;
1802     int len = 256;
1803     int rc;
1804    
1805     /* most likely the symlink is relative, so change our
1806       directory to the dir of the symlink */
1807     char *dir = strdupa(outName);
1808     rc = chdir(dirname(dir));
1809     do {
1810     buf = alloca(len + 1);
1811     rc = readlink(basename(outName), buf, len);
1812     if (rc == len)
1813     len += 256;
1814     } while (rc == len);
1815    
1816     if (rc < 0) {
1817     fprintf(stderr,
1818     _
1819     ("grubby: error readlink link %s: %s\n"),
1820     outName, strerror(errno));
1821     return 1;
1822     }
1823    
1824      if (isdigit(*kernel)) {   outName = buf;
1825   int * indexVars = alloca(sizeof(*indexVars) * strlen(kernel));   outName[rc] = '\0';
1826     }
1827    
1828   i = 0;   tmpOutName = alloca(strlen(outName) + 2);
1829   indexVars[i] = strtol(kernel, &chptr, 10);   sprintf(tmpOutName, "%s-", outName);
1830   while (*chptr == ',') {   out = fopen(tmpOutName, "w");
1831      i++;   if (!out) {
1832      kernel = chptr + 1;   fprintf(stderr, _("grubby: error creating %s: %s\n"),
1833      indexVars[i] = strtol(kernel, &chptr, 10);   tmpOutName, strerror(errno));
1834     return 1;
1835     }
1836    
1837     if (!stat(outName, &sb)) {
1838     if (chmod(tmpOutName, sb.st_mode & ~(S_IFMT))) {
1839     fprintf(stderr,
1840     _
1841     ("grubby: error setting perms on %s: %s\n"),
1842     tmpOutName, strerror(errno));
1843     fclose(out);
1844     unlink(tmpOutName);
1845     return 1;
1846     }
1847     }
1848   }   }
1849    
1850   if (*chptr) {   line = cfg->theLines;
1851      /* can't parse it, bail */   struct keywordTypes *defaultKw = getKeywordByType(LT_DEFAULT, cfg->cfi);
1852      return NULL;   while (line) {
1853     if (line->type == LT_SET_VARIABLE && defaultKw &&
1854        line->numElements == 3 &&
1855        !strcmp(line->elements[1].item, defaultKw->key) &&
1856        !is_special_grub2_variable(line->elements[2].item)) {
1857     writeDefault(out, line->indent,
1858         line->elements[0].indent, cfg);
1859     needs &= ~MAIN_DEFAULT;
1860     } else if (line->type == LT_DEFAULT) {
1861     writeDefault(out, line->indent,
1862         line->elements[0].indent, cfg);
1863     needs &= ~MAIN_DEFAULT;
1864     } else if (line->type == LT_FALLBACK) {
1865     if (cfg->fallbackImage > -1)
1866     fprintf(out, "%s%s%s%d\n", line->indent,
1867     line->elements[0].item,
1868     line->elements[0].indent,
1869     cfg->fallbackImage);
1870     } else {
1871     if (lineWrite(out, line, cfg->cfi) == -1) {
1872     fprintf(stderr,
1873     _("grubby: error writing %s: %s\n"),
1874     tmpOutName, strerror(errno));
1875     fclose(out);
1876     unlink(tmpOutName);
1877     return 1;
1878     }
1879     }
1880    
1881     line = line->next;
1882     }
1883    
1884     if (needs & MAIN_DEFAULT) {
1885     writeDefault(out, cfg->primaryIndent, "=", cfg);
1886     needs &= ~MAIN_DEFAULT;
1887   }   }
1888    
  indexVars[i + 1] = -1;  
   
1889   i = 0;   i = 0;
1890   if (index) {   while ((entry = findEntryByIndex(cfg, i++))) {
1891      while (i < *index) i++;   if (entry->skip)
1892      if (indexVars[i] == -1) return NULL;   continue;
1893    
1894     line = entry->lines;
1895     while (line) {
1896     if (lineWrite(out, line, cfg->cfi) == -1) {
1897     fprintf(stderr,
1898     _("grubby: error writing %s: %s\n"),
1899     tmpOutName, strerror(errno));
1900     fclose(out);
1901     unlink(tmpOutName);
1902     return 1;
1903     }
1904     line = line->next;
1905     }
1906   }   }
1907    
1908   entry = findEntryByIndex(config, indexVars[i]);   if (tmpOutName) {
1909   if (!entry) return NULL;   if (rename(tmpOutName, outName)) {
1910     fprintf(stderr,
1911     _("grubby: error moving %s to %s: %s\n"),
1912     tmpOutName, outName, strerror(errno));
1913     unlink(outName);
1914     return 1;
1915     }
1916     }
1917    
1918   line = getLineByType(LT_KERNEL|LT_HYPER, entry->lines);   return 0;
1919   if (!line) return NULL;  }
1920    
1921   if (index) *index = indexVars[i];  static int numEntries(struct grubConfig *cfg)
1922   return entry;  {
1923      }   int i = 0;
1924         struct singleEntry *entry;
     if (!strcmp(kernel, "DEFAULT")) {  
  if (index && *index > config->defaultImage) {  
     entry = NULL;  
  } else {  
     entry = findEntryByIndex(config, config->defaultImage);  
     if (entry && entry->skip)  
  entry = NULL;  
     else if (index)  
  *index = config->defaultImage;  
  }  
     } else if (!strcmp(kernel, "ALL")) {  
  if (index)  
     i = *index;  
  else  
     i = 0;  
1925    
1926   while ((entry = findEntryByIndex(config, i))) {   entry = cfg->entries;
1927      if (!entry->skip) break;   while (entry) {
1928      i++;   if (!entry->skip)
1929     i++;
1930     entry = entry->next;
1931   }   }
1932     return i;
1933    }
1934    
1935   if (entry && index)  static char *findDiskForRoot()
1936      *index = i;  {
1937      } else {   int fd;
1938   if (index)   char buf[65536];
1939      i = *index;   char *devname;
1940   else   char *chptr;
1941      i = 0;   int rc;
1942    
1943   if (!strncmp(kernel, "TITLE=", 6)) {   if ((fd = open(_PATH_MOUNTED, O_RDONLY)) < 0) {
1944      prefix = "";   fprintf(stderr, "grubby: failed to open %s: %s\n",
1945      checkType = LT_TITLE;   _PATH_MOUNTED, strerror(errno));
1946      kernel += 6;   return NULL;
1947     }
1948    
1949     rc = read(fd, buf, sizeof(buf) - 1);
1950     if (rc <= 0) {
1951     fprintf(stderr, "grubby: failed to read %s: %s\n",
1952     _PATH_MOUNTED, strerror(errno));
1953     close(fd);
1954     return NULL;
1955   }   }
1956     close(fd);
1957     buf[rc] = '\0';
1958     chptr = buf;
1959    
1960   for (entry = findEntryByIndex(config, i); entry; entry = entry->next, i++) {   char *foundanswer = NULL;
     if (entry->skip) continue;  
1961    
1962      dbgPrintf("findEntryByPath looking for %d %s in %p\n", checkType, kernel, entry);   while (chptr && chptr != buf + rc) {
1963     devname = chptr;
1964    
1965      /* check all the lines matching checkType */   /*
1966      for (line = entry->lines; line; line = line->next) {   * The first column of a mtab entry is the device, but if the
1967   line = getLineByType(entry->multiboot && checkType == LT_KERNEL ?   * entry is a special device it won't start with /, so move
1968       LT_KERNEL|LT_MBMODULE|LT_HYPER :   * on to the next line.
1969       checkType, line);   */
1970   if (!line) break;  /* not found in this entry */   if (*devname != '/') {
1971     chptr = strchr(chptr, '\n');
1972     if (chptr)
1973     chptr++;
1974     continue;
1975     }
1976    
1977   if (line && line->numElements >= 2) {   /* Seek to the next space */
1978      rootspec = getRootSpecifier(line->elements[1].item);   chptr = strchr(chptr, ' ');
1979      if (!strcmp(line->elements[1].item +   if (!chptr) {
1980   ((rootspec != NULL) ? strlen(rootspec) : 0),   fprintf(stderr, "grubby: error parsing %s: %s\n",
1981   kernel + strlen(prefix)))   _PATH_MOUNTED, strerror(errno));
1982   break;   return NULL;
1983     }
1984    
1985     /*
1986     * The second column of a mtab entry is the mount point, we
1987     * are looking for '/' obviously.
1988     */
1989     if (*(++chptr) == '/' && *(++chptr) == ' ') {
1990     /* remember the last / entry in mtab */
1991     foundanswer = devname;
1992   }   }
     }  
1993    
1994      /* make sure this entry has a kernel identifier; this skips   /* Next line */
1995       * non-Linux boot entries (could find netbsd etc, though, which is   chptr = strchr(chptr, '\n');
1996       * unfortunate)   if (chptr)
1997       */   chptr++;
     if (line && getLineByType(LT_KERNEL|LT_HYPER, entry->lines))  
  break; /* found 'im! */  
1998   }   }
1999    
2000   if (index) *index = i;   /* Return the last / entry found */
2001      }   if (foundanswer) {
2002     chptr = strchr(foundanswer, ' ');
2003     *chptr = '\0';
2004     return strdup(foundanswer);
2005     }
2006    
2007      return entry;   return NULL;
2008  }  }
2009    
2010  struct singleEntry * findEntryByIndex(struct grubConfig * cfg, int index) {  void printEntry(struct singleEntry *entry, FILE * f)
2011      struct singleEntry * entry;  {
2012     int i;
2013     struct singleLine *line;
2014    
2015      entry = cfg->entries;   for (line = entry->lines; line; line = line->next) {
2016      while (index && entry) {   log_message(f, "DBG: %s", line->indent);
2017   entry = entry->next;   for (i = 0; i < line->numElements; i++) {
2018   index--;   /* Need to handle this, because we strip the quotes from
2019      }   * menuentry when read it. */
2020     if (line->type == LT_MENUENTRY && i == 1) {
2021     if (!isquote(*line->elements[i].item))
2022     log_message(f, "\'%s\'",
2023        line->elements[i].item);
2024     else
2025     log_message(f, "%s",
2026        line->elements[i].item);
2027     log_message(f, "%s", line->elements[i].indent);
2028    
2029      return entry;   continue;
2030  }   }
2031    
2032  /* Find a good template to use for the new kernel. An entry is   log_message(f, "%s%s",
2033   * good if the kernel and mkinitrd exist (even if the entry      line->elements[i].item,
2034   * is going to be removed). Try and use the default entry, but      line->elements[i].indent);
2035   * if that doesn't work just take the first. If we can't find one,   }
2036   * bail. */   log_message(f, "\n");
 struct singleEntry * findTemplate(struct grubConfig * cfg, const char * prefix,  
  int * indexPtr, int skipRemoved, int flags) {  
     struct singleEntry * entry, * entry2;  
     int index;  
   
     if (cfg->defaultImage > -1) {  
  entry = findEntryByIndex(cfg, cfg->defaultImage);  
  if (entry && suitableImage(entry, prefix, skipRemoved, flags)) {  
     if (indexPtr) *indexPtr = cfg->defaultImage;  
     return entry;  
2037   }   }
2038      }  }
2039    
2040    void notSuitablePrintf(struct singleEntry *entry, int okay, const char *fmt,
2041           ...)
2042    {
2043     static int once;
2044     va_list argp, argq;
2045    
2046      index = 0;   va_start(argp, fmt);
     while ((entry = findEntryByIndex(cfg, index))) {  
  if (suitableImage(entry, prefix, skipRemoved, flags)) {  
             int j;  
             for (j = 0; j < index; j++) {  
                 entry2 = findEntryByIndex(cfg, j);  
                 if (entry2->skip) index--;  
             }  
     if (indexPtr) *indexPtr = index;  
2047    
2048      return entry;   va_copy(argq, argp);
2049     if (!once) {
2050     log_time(NULL);
2051     log_message(NULL, "command line: %s\n", saved_command_line);
2052   }   }
2053     log_message(NULL, "DBG: Image entry %s: ",
2054        okay ? "succeeded" : "failed");
2055     log_vmessage(NULL, fmt, argq);
2056    
2057   index++;   printEntry(entry, NULL);
2058      }   va_end(argq);
2059    
2060     if (!debug) {
2061     once = 1;
2062     va_end(argp);
2063     return;
2064     }
2065    
2066      fprintf(stderr, _("grubby fatal error: unable to find a suitable template\n"));   if (okay) {
2067     va_end(argp);
2068     return;
2069     }
2070    
2071      return NULL;   if (!once)
2072     log_message(stderr, "DBG: command line: %s\n",
2073        saved_command_line);
2074     once = 1;
2075     fprintf(stderr, "DBG: Image entry failed: ");
2076     vfprintf(stderr, fmt, argp);
2077     printEntry(entry, stderr);
2078     va_end(argp);
2079  }  }
2080    
2081  char * findBootPrefix(void) {  #define beginswith(s, c) ((s) && (s)[0] == (c))
     struct stat sb, sb2;  
2082    
2083      stat("/", &sb);  static int endswith(const char *s, char c)
2084  #ifdef __ia64__  {
2085      stat("/boot/efi/EFI/redhat/", &sb2);   int slen;
 #else  
     stat("/boot", &sb2);  
 #endif  
2086    
2087      if (sb.st_dev == sb2.st_dev)   if (!s || !s[0])
2088   return strdup("");   return 0;
2089     slen = strlen(s) - 1;
2090    
2091  #ifdef __ia64__   return s[slen] == c;
     return strdup("/boot/efi/EFI/redhat/");  
 #else  
     return strdup("/boot");  
 #endif  
2092  }  }
2093    
2094  void markRemovedImage(struct grubConfig * cfg, const char * image,  int suitableImage(struct singleEntry *entry, const char *bootPrefix,
2095        const char * prefix) {    int skipRemoved, int flags)
2096      struct singleEntry * entry;  {
2097     struct singleLine *line;
2098      if (!image) return;   char *fullName;
2099     int i;
2100      while ((entry = findEntryByPath(cfg, image, prefix, NULL)))   char *dev;
2101   entry->skip = 1;   char *rootspec;
2102  }   char *rootdev;
2103    
2104  void setDefaultImage(struct grubConfig * config, int hasNew,   if (skipRemoved && entry->skip) {
2105       const char * defaultKernelPath, int newIsDefault,   notSuitablePrintf(entry, 0, "marked to skip\n");
2106       const char * prefix, int flags) {   return 0;
2107      struct singleEntry * entry, * entry2, * newDefault;   }
2108      int i, j;  
2109     line =
2110      if (newIsDefault) {      getLineByType(LT_KERNEL | LT_HYPER | LT_KERNEL_EFI | LT_KERNEL_16,
2111   config->defaultImage = 0;    entry->lines);
2112   return;   if (!line) {
2113      } else if (defaultKernelPath) {   notSuitablePrintf(entry, 0, "no line found\n");
2114   i = 0;   return 0;
2115   if (findEntryByPath(config, defaultKernelPath, prefix, &i)) {   }
2116      config->defaultImage = i;   if (line->numElements < 2) {
2117   } else {   notSuitablePrintf(entry, 0, "line has only %d elements\n",
2118      config->defaultImage = -1;    line->numElements);
2119      return;   return 0;
2120   }   }
     }  
2121    
2122      /* defaultImage now points to what we'd like to use, but before any order   if (flags & GRUBBY_BADIMAGE_OKAY) {
2123         changes */   notSuitablePrintf(entry, 1, "\n");
2124      if (config->defaultImage == DEFAULT_SAVED)   return 1;
2125        /* default is set to saved, we don't want to change it */   }
       return;  
   
     if (config->defaultImage > -1)  
  entry = findEntryByIndex(config, config->defaultImage);  
     else  
  entry = NULL;  
2126    
2127      if (entry && !entry->skip) {   fullName = alloca(strlen(bootPrefix) +
2128   /* we can preserve the default */    strlen(line->elements[1].item) + 1);
2129   if (hasNew)   rootspec = getRootSpecifier(line->elements[1].item);
2130      config->defaultImage++;   int rootspec_offset = rootspec ? strlen(rootspec) : 0;
2131     int hasslash = endswith(bootPrefix, '/') ||
2132   /* count the number of entries erased before this one */      beginswith(line->elements[1].item + rootspec_offset, '/');
2133   for (j = 0; j < config->defaultImage; j++) {   sprintf(fullName, "%s%s%s", bootPrefix, hasslash ? "" : "/",
2134      entry2 = findEntryByIndex(config, j);   line->elements[1].item + rootspec_offset);
2135      if (entry2->skip) config->defaultImage--;   if (access(fullName, R_OK)) {
2136   }   notSuitablePrintf(entry, 0, "access to %s failed\n", fullName);
2137      } else if (hasNew) {   return 0;
2138   config->defaultImage = 0;   }
2139      } else {   for (i = 2; i < line->numElements; i++)
2140   /* Either we just erased the default (or the default line was bad   if (!strncasecmp(line->elements[i].item, "root=", 5))
2141   * to begin with) and didn't put a new one in. We'll use the first   break;
2142   * valid image. */   if (i < line->numElements) {
2143   newDefault = findTemplate(config, prefix, &config->defaultImage, 1,   dev = line->elements[i].item + 5;
2144    flags);   } else {
2145   if (!newDefault)   /* look for a lilo style LT_ROOT line */
2146      config->defaultImage = -1;   line = getLineByType(LT_ROOT, entry->lines);
     }  
 }  
2147    
2148  void setFallbackImage(struct grubConfig * config, int hasNew) {   if (line && line->numElements >= 2) {
2149      struct singleEntry * entry, * entry2;   dev = line->elements[1].item;
2150      int j;   } else {
2151     /* didn't succeed in finding a LT_ROOT, let's try
2152      if (config->fallbackImage == -1) return;   * LT_KERNELARGS.  grub+multiboot uses LT_MBMODULE
2153     * for the args, so check that too.
2154      entry = findEntryByIndex(config, config->fallbackImage);   */
2155      if (!entry || entry->skip) {   line =
2156   config->fallbackImage = -1;      getLineByType(LT_KERNELARGS | LT_MBMODULE,
2157   return;    entry->lines);
2158      }  
2159     /* failed to find one */
2160     if (!line) {
2161     notSuitablePrintf(entry, 0, "no line found\n");
2162     return 0;
2163     }
2164    
2165      if (hasNew)   for (i = 1; i < line->numElements; i++)
2166   config->fallbackImage++;   if (!strncasecmp
2167            (line->elements[i].item, "root=", 5))
2168      /* count the number of entries erased before this one */   break;
2169      for (j = 0; j < config->fallbackImage; j++) {   if (i < line->numElements)
2170   entry2 = findEntryByIndex(config, j);   dev = line->elements[i].item + 5;
2171   if (entry2->skip) config->fallbackImage--;   else {
2172      }   notSuitablePrintf(entry, 0,
2173      "no root= entry found\n");
2174     /* it failed too...  can't find root= */
2175     return 0;
2176     }
2177     }
2178     }
2179    
2180     dev = getpathbyspec(dev);
2181     if (!getpathbyspec(dev)) {
2182     notSuitablePrintf(entry, 0, "can't find blkid entry for %s\n",
2183      dev);
2184     return 0;
2185     } else
2186     dev = getpathbyspec(dev);
2187    
2188     rootdev = findDiskForRoot();
2189     if (!rootdev) {
2190     notSuitablePrintf(entry, 0, "can't find root device\n");
2191     return 0;
2192     }
2193    
2194     if (!getuuidbydev(rootdev) || !getuuidbydev(dev)) {
2195     notSuitablePrintf(entry, 0,
2196      "uuid missing: rootdev %s, dev %s\n",
2197      getuuidbydev(rootdev), getuuidbydev(dev));
2198     free(rootdev);
2199     return 0;
2200     }
2201    
2202     if (strcmp(getuuidbydev(rootdev), getuuidbydev(dev))) {
2203     notSuitablePrintf(entry, 0,
2204      "uuid mismatch: rootdev %s, dev %s\n",
2205      getuuidbydev(rootdev), getuuidbydev(dev));
2206     free(rootdev);
2207     return 0;
2208     }
2209    
2210     free(rootdev);
2211     notSuitablePrintf(entry, 1, "\n");
2212    
2213     return 1;
2214  }  }
2215    
2216  void displayEntry(struct singleEntry * entry, const char * prefix, int index) {  /* returns the first match on or after the one pointed to by index (if index
2217      struct singleLine * line;     is not NULL) which is not marked as skip */
2218      char * root = NULL;  struct singleEntry *findEntryByPath(struct grubConfig *config,
2219      int i;      const char *kernel, const char *prefix,
2220        int *index)
2221      printf("index=%d\n", index);  {
2222     struct singleEntry *entry = NULL;
2223      line = getLineByType(LT_KERNEL|LT_HYPER, entry->lines);   struct singleLine *line;
2224      if (!line) {   int i;
2225          printf("non linux entry\n");   char *chptr;
2226          return;   char *rootspec = NULL;
2227      }   enum lineType_e checkType = LT_KERNEL;
2228    
2229     if (isdigit(*kernel)) {
2230     int *indexVars = alloca(sizeof(*indexVars) * strlen(kernel));
2231    
2232     i = 0;
2233     indexVars[i] = strtol(kernel, &chptr, 10);
2234     while (*chptr == ',') {
2235     i++;
2236     kernel = chptr + 1;
2237     indexVars[i] = strtol(kernel, &chptr, 10);
2238     }
2239    
2240      printf("kernel=%s\n", line->elements[1].item);   if (*chptr) {
2241     /* can't parse it, bail */
2242     return NULL;
2243     }
2244    
2245      if (line->numElements >= 3) {   indexVars[i + 1] = -1;
  printf("args=\"");  
  i = 2;  
  while (i < line->numElements) {  
     if (!strncmp(line->elements[i].item, "root=", 5)) {  
  root = line->elements[i].item + 5;  
     } else {  
  printf("%s%s", line->elements[i].item,  
        line->elements[i].indent);  
     }  
2246    
2247      i++;   i = 0;
2248   }   if (index) {
2249   printf("\"\n");   while (i < *index) {
2250      } else {   i++;
2251   line = getLineByType(LT_KERNELARGS, entry->lines);   if (indexVars[i] == -1)
2252   if (line) {   return NULL;
2253      char * s;   }
2254     }
2255    
2256      printf("args=\"");   entry = findEntryByIndex(config, indexVars[i]);
2257      i = 1;   if (!entry)
2258      while (i < line->numElements) {   return NULL;
2259   if (!strncmp(line->elements[i].item, "root=", 5)) {  
2260      root = line->elements[i].item + 5;   line =
2261        getLineByType(LT_KERNEL | LT_HYPER | LT_KERNEL_EFI |
2262      LT_KERNEL_16, entry->lines);
2263     if (!line)
2264     return NULL;
2265    
2266     if (index)
2267     *index = indexVars[i];
2268     return entry;
2269     }
2270    
2271     if (!strcmp(kernel, "DEFAULT")) {
2272     if (index && *index > config->defaultImage) {
2273     entry = NULL;
2274   } else {   } else {
2275      s = line->elements[i].item;   entry = findEntryByIndex(config, config->defaultImage);
2276     if (entry && entry->skip)
2277     entry = NULL;
2278     else if (index)
2279     *index = config->defaultImage;
2280     }
2281     } else if (!strcmp(kernel, "ALL")) {
2282     if (index)
2283     i = *index;
2284     else
2285     i = 0;
2286    
2287     while ((entry = findEntryByIndex(config, i))) {
2288     if (!entry->skip)
2289     break;
2290     i++;
2291     }
2292    
2293      printf("%s%s", s, line->elements[i].indent);   if (entry && index)
2294     *index = i;
2295     } else {
2296     if (index)
2297     i = *index;
2298     else
2299     i = 0;
2300    
2301     if (!strncmp(kernel, "TITLE=", 6)) {
2302     prefix = "";
2303     checkType = LT_TITLE | LT_MENUENTRY;
2304     kernel += 6;
2305   }   }
2306    
2307   i++;   for (entry = findEntryByIndex(config, i); entry;
2308      }       entry = entry->next, i++) {
2309     if (entry->skip)
2310     continue;
2311    
2312     dbgPrintf("findEntryByPath looking for %d %s in %p\n",
2313      checkType, kernel, entry);
2314    
2315     /* check all the lines matching checkType */
2316     for (line = entry->lines; line; line = line->next) {
2317     enum lineType_e ct = checkType;
2318     if (entry->multiboot && checkType == LT_KERNEL)
2319     ct = LT_KERNEL | LT_KERNEL_EFI |
2320        LT_MBMODULE | LT_HYPER |
2321        LT_KERNEL_16;
2322     else if (checkType & LT_KERNEL)
2323     ct = checkType | LT_KERNEL_EFI |
2324        LT_KERNEL_16;
2325     line = getLineByType(ct, line);
2326     if (!line)
2327     break; /* not found in this entry */
2328    
2329     if (line && line->type != LT_MENUENTRY &&
2330        line->numElements >= 2) {
2331     rootspec =
2332        getRootSpecifier(line->elements[1].
2333         item);
2334     if (!strcmp
2335        (line->elements[1].item +
2336         ((rootspec !=
2337           NULL) ? strlen(rootspec) : 0),
2338         kernel + strlen(prefix)))
2339     break;
2340     }
2341     if (line->type == LT_MENUENTRY &&
2342        !strcmp(line->elements[1].item, kernel))
2343     break;
2344     }
2345    
2346     /* make sure this entry has a kernel identifier; this skips
2347     * non-Linux boot entries (could find netbsd etc, though, which is
2348     * unfortunate)
2349     */
2350     if (line
2351        && getLineByType(LT_KERNEL | LT_HYPER |
2352         LT_KERNEL_EFI | LT_KERNEL_16,
2353         entry->lines))
2354     break; /* found 'im! */
2355     }
2356    
2357      s = line->elements[i - 1].indent;   if (index)
2358      printf("\"\n");   *index = i;
2359   }   }
     }  
2360    
2361      if (!root) {   return entry;
2362   line = getLineByType(LT_ROOT, entry->lines);  }
  if (line && line->numElements >= 2)  
     root=line->elements[1].item;  
     }  
2363    
2364      if (root) {  struct singleEntry *findEntryByTitle(struct grubConfig *cfg, char *title,
2365   char * s = alloca(strlen(root) + 1);       int *index)
2366    {
2367   strcpy(s, root);   struct singleEntry *entry;
2368   if (s[strlen(s) - 1] == '"')   struct singleLine *line;
2369      s[strlen(s) - 1] = '\0';   int i;
2370   /* make sure the root doesn't have a trailing " */   char *newtitle;
2371   printf("root=%s\n", s);  
2372      }   for (i = 0, entry = cfg->entries; entry; entry = entry->next, i++) {
2373     if (index && i < *index)
2374     continue;
2375     line = getLineByType(LT_TITLE, entry->lines);
2376     if (!line)
2377     line = getLineByType(LT_MENUENTRY, entry->lines);
2378     if (!line)
2379     continue;
2380     newtitle = grub2ExtractTitle(line);
2381     if (!newtitle)
2382     continue;
2383     if (!strcmp(title, newtitle))
2384     break;
2385     }
2386    
2387      line = getLineByType(LT_INITRD, entry->lines);   if (!entry)
2388     return NULL;
2389    
2390      if (line && line->numElements >= 2) {   if (index)
2391   printf("initrd=%s", prefix);   *index = i;
2392   for (i = 1; i < line->numElements; i++)   return entry;
     printf("%s%s", line->elements[i].item, line->elements[i].indent);  
  printf("\n");  
     }  
2393  }  }
2394    
2395  int parseSysconfigGrub(int * lbaPtr, char ** bootPtr) {  struct singleEntry *findEntryByIndex(struct grubConfig *cfg, int index)
2396      FILE * in;  {
2397      char buf[1024];   struct singleEntry *entry;
     char * chptr;  
     char * start;  
     char * param;  
   
     in = fopen("/etc/conf.d/grub", "r");  
     if (!in) return 1;  
   
     if (lbaPtr) *lbaPtr = 0;  
     if (bootPtr) *bootPtr = NULL;  
   
     while (fgets(buf, sizeof(buf), in)) {  
  start = buf;  
  while (isspace(*start)) start++;  
  if (*start == '#') continue;  
   
  chptr = strchr(start, '=');  
  if (!chptr) continue;  
  chptr--;  
  while (*chptr && isspace(*chptr)) chptr--;  
  chptr++;  
  *chptr = '\0';  
   
  param = chptr + 1;  
  while (*param && isspace(*param)) param++;  
  if (*param == '=') {  
     param++;  
     while (*param && isspace(*param)) param++;  
  }  
   
  chptr = param;  
  while (*chptr && !isspace(*chptr)) chptr++;  
  *chptr = '\0';  
   
  if (!strcmp(start, "forcelba") && !strcmp(param, "1") && lbaPtr)  
     *lbaPtr = 1;  
  else if (!strcmp(start, "boot") && bootPtr)  
     *bootPtr = strdup(param);  
     }  
   
     fclose(in);  
2398    
2399      return 0;   entry = cfg->entries;
2400  }   while (index && entry) {
2401     entry = entry->next;
2402     index--;
2403     }
2404    
2405  void dumpSysconfigGrub(void) {   return entry;
     char * boot;  
     int lba;  
   
     if (!parseSysconfigGrub(&lba, &boot)) {  
  if (lba) printf("lba\n");  
  if (boot) printf("boot=%s\n", boot);  
     }  
2406  }  }
2407    
2408  int displayInfo(struct grubConfig * config, char * kernel,  /* Find a good template to use for the new kernel. An entry is
2409   const char * prefix) {   * good if the kernel and mkinitrd exist (even if the entry
2410      int i = 0;   * is going to be removed). Try and use the default entry, but
2411      struct singleEntry * entry;   * if that doesn't work just take the first. If we can't find one,
2412      struct singleLine * line;   * bail. */
2413    struct singleEntry *findTemplate(struct grubConfig *cfg, const char *prefix,
2414      entry = findEntryByPath(config, kernel, prefix, &i);   int *indexPtr, int skipRemoved, int flags)
2415      if (!entry) {  {
2416   fprintf(stderr, _("grubby: kernel not found\n"));   struct singleEntry *entry, *entry2;
2417   return 1;   int index;
     }  
2418    
2419      /* this is a horrible hack to support /etc/conf.d/grub; there must   if (cfg->cfi->defaultIsSaved) {
2420         be a better way */   if (cfg->cfi->getEnv) {
2421      if (config->cfi == &grubConfigType) {   char *defTitle =
2422   dumpSysconfigGrub();      cfg->cfi->getEnv(cfg->cfi, "saved_entry");
2423      } else {   if (defTitle) {
2424   line = getLineByType(LT_BOOT, config->theLines);   int index = 0;
2425   if (line && line->numElements >= 1) {   if (isnumber(defTitle)) {
2426      printf("boot=%s\n", line->elements[1].item);   index = atoi(defTitle);
2427     entry = findEntryByIndex(cfg, index);
2428     } else {
2429     entry =
2430        findEntryByTitle(cfg, defTitle,
2431         &index);
2432     }
2433     if (entry
2434        && suitableImage(entry, prefix, skipRemoved,
2435         flags)) {
2436     cfg->defaultImage = index;
2437     if (indexPtr)
2438     *indexPtr = index;
2439     return entry;
2440     }
2441     }
2442     }
2443     } else if (cfg->defaultImage >= FIRST_ENTRY_INDEX) {
2444     entry = findEntryByIndex(cfg, cfg->defaultImage);
2445     if (entry && suitableImage(entry, prefix, skipRemoved, flags)) {
2446     if (indexPtr)
2447     *indexPtr = cfg->defaultImage;
2448     return entry;
2449     }
2450   }   }
2451    
2452   line = getLineByType(LT_LBA, config->theLines);   index = 0;
2453   if (line) printf("lba\n");   while ((entry = findEntryByIndex(cfg, index))) {
2454      }   if (suitableImage(entry, prefix, skipRemoved, flags)) {
2455     int j, unmodifiedIndex;
2456      displayEntry(entry, prefix, i);  
2457     unmodifiedIndex = index;
2458      i++;  
2459      while ((entry = findEntryByPath(config, kernel, prefix, &i))) {   for (j = 0; j < unmodifiedIndex; j++) {
2460   displayEntry(entry, prefix, i);   entry2 = findEntryByIndex(cfg, j);
2461   i++;   if (entry2->skip)
2462      }   index--;
2463     }
2464     if (indexPtr)
2465     *indexPtr = index;
2466    
2467      return 0;   return entry;
2468  }   }
2469    
2470  struct singleLine * addLineTmpl(struct singleEntry * entry,   index++;
  struct singleLine * tmplLine,  
  struct singleLine * prevLine,  
  const char * val,  
  struct configFileInfo * cfi)  
 {  
     struct singleLine * newLine = lineDup(tmplLine);  
   
     if (val) {  
  /* override the inherited value with our own.  
  * This is a little weak because it only applies to elements[1]  
  */  
  if (newLine->numElements > 1)  
     removeElement(newLine, 1);  
  insertElement(newLine, val, 1, cfi);  
   
  /* but try to keep the rootspec from the template... sigh */  
  if (tmplLine->type & (LT_HYPER|LT_KERNEL|LT_MBMODULE|LT_INITRD)) {  
     char * rootspec = getRootSpecifier(tmplLine->elements[1].item);  
     if (rootspec != NULL) {  
  free(newLine->elements[1].item);  
  newLine->elements[1].item =  
     sdupprintf("%s%s", rootspec, val);  
     }  
2471   }   }
     }  
2472    
2473      dbgPrintf("addLineTmpl(%s)\n", newLine->numElements ?   fprintf(stderr,
2474        newLine->elements[0].item : "");   _("grubby fatal error: unable to find a suitable template\n"));
   
     if (!entry->lines) {  
  /* first one on the list */  
  entry->lines = newLine;  
     } else if (prevLine) {  
  /* add after prevLine */  
  newLine->next = prevLine->next;  
  prevLine->next = newLine;  
     }  
2475    
2476      return newLine;   return NULL;
2477  }  }
2478    
2479  /* val may be NULL */  char *findBootPrefix(void)
2480  struct singleLine *  addLine(struct singleEntry * entry,  {
2481       struct configFileInfo * cfi,   struct stat sb, sb2;
      enum lineType_e type, char * defaultIndent,  
      const char * val) {  
     struct singleLine * line, * prev;  
     struct keywordTypes * kw;  
     struct singleLine tmpl;  
   
     /* NB: This function shouldn't allocate items on the heap, rather on the  
      * stack since it calls addLineTmpl which will make copies.  
      */  
   
     if (type == LT_TITLE && cfi->titleBracketed) {  
  /* we're doing a bracketed title (zipl) */  
  tmpl.type = type;  
  tmpl.numElements = 1;  
  tmpl.elements = alloca(sizeof(*tmpl.elements));  
  tmpl.elements[0].item = alloca(strlen(val)+3);  
  sprintf(tmpl.elements[0].item, "[%s]", val);  
  tmpl.elements[0].indent = "";  
  val = NULL;  
     } else {  
  kw = getKeywordByType(type, cfi);  
  if (!kw) abort();  
  tmpl.type = type;  
  tmpl.numElements = val ? 2 : 1;  
  tmpl.elements = alloca(sizeof(*tmpl.elements) * tmpl.numElements);  
  tmpl.elements[0].item = kw->key;  
  tmpl.elements[0].indent = alloca(2);  
  sprintf(tmpl.elements[0].indent, "%c", kw->nextChar);  
  if (val) {  
     tmpl.elements[1].item = (char *)val;  
     tmpl.elements[1].indent = "";  
  }  
     }  
2482    
2483      /* The last non-empty line gives us the indention to us and the line   stat("/", &sb);
2484         to insert after. Note that comments are considered empty lines, which  #ifdef __ia64__
2485         may not be ideal? If there are no lines or we are looking at the   stat("/boot/efi/EFI/redhat/", &sb2);
2486         first line, we use defaultIndent (the first line is normally indented  #else
2487         differently from the rest) */   stat("/boot", &sb2);
2488      for (line = entry->lines, prev = NULL; line; line = line->next) {  #endif
  if (line->numElements) prev = line;  
  /* fall back on the last line if prev isn't otherwise set */  
  if (!line->next && !prev) prev = line;  
     }  
2489    
2490      if (prev == entry->lines)   if (sb.st_dev == sb2.st_dev)
2491   tmpl.indent = defaultIndent ?: "";   return strdup("");
     else  
  tmpl.indent = prev->indent;  
2492    
2493      return addLineTmpl(entry, &tmpl, prev, val, cfi);  #ifdef __ia64__
2494     return strdup("/boot/efi/EFI/redhat/");
2495    #else
2496     return strdup("/boot");
2497    #endif
2498  }  }
2499    
2500  void removeLine(struct singleEntry * entry, struct singleLine * line) {  void markRemovedImage(struct grubConfig *cfg, const char *image,
2501      struct singleLine * prev;        const char *prefix)
2502      int i;  {
2503     struct singleEntry *entry;
2504    
2505      for (i = 0; i < line->numElements; i++) {   if (!image)
2506   free(line->elements[i].item);   return;
  free(line->elements[i].indent);  
     }  
     free(line->elements);  
     free(line->indent);  
2507    
2508      if (line == entry->lines) {   /* check and see if we're removing the default image */
2509   entry->lines = line->next;   if (isdigit(*image)) {
2510      } else {   entry = findEntryByPath(cfg, image, prefix, NULL);
2511   prev = entry->lines;   if (entry)
2512   while (prev->next != line) prev = prev->next;   entry->skip = 1;
2513   prev->next = line->next;   return;
2514      }   }
2515    
2516      free(line);   while ((entry = findEntryByPath(cfg, image, prefix, NULL)))
2517     entry->skip = 1;
2518  }  }
2519    
2520  static void insertElement(struct singleLine * line,  void setDefaultImage(struct grubConfig *config, int isAddingBootEntry,
2521    const char * item, int insertHere,       const char *defaultKernelPath, int newBootEntryIsDefault,
2522    struct configFileInfo * cfi)       const char *prefix, int flags,
2523         int newDefaultBootEntryIndex, int newBootEntryIndex)
2524  {  {
2525      struct keywordTypes * kw;   struct singleEntry *bootEntry, *newDefault;
2526      char indent[2] = "";   int indexToVerify, firstKernelEntryIndex, currentLookupIndex;
2527    
2528      /* sanity check */   /* handle the two cases where the user explictly picks the default
2529      if (insertHere > line->numElements) {   * boot entry index as it would exist post-modification */
  dbgPrintf("insertElement() adjusting insertHere from %d to %d\n",  
   insertHere, line->numElements);  
  insertHere = line->numElements;  
     }  
2530    
2531      line->elements = realloc(line->elements, (line->numElements + 1) *   /* Case 1: user chose to make the latest boot entry the default */
2532       sizeof(*line->elements));   if (newBootEntryIsDefault) {
2533      memmove(&line->elements[insertHere+1],   config->defaultImage = newBootEntryIndex;
2534      &line->elements[insertHere],   return;
2535      (line->numElements - insertHere) *   }
2536      sizeof(*line->elements));  
2537      line->elements[insertHere].item = strdup(item);   /* Case 2: user picked an arbitrary index as the default boot entry */
2538     if (newDefaultBootEntryIndex >= FIRST_ENTRY_INDEX
2539      kw = getKeywordByType(line->type, cfi);      && config->cfi->defaultIsIndex) {
2540     indexToVerify = newDefaultBootEntryIndex;
2541      if (line->numElements == 0) {  
2542   indent[0] = '\0';   /* user chose to make latest boot entry the default */
2543      } else if (insertHere == 0) {   if (newDefaultBootEntryIndex == newBootEntryIndex) {
2544   indent[0] = kw->nextChar;   config->defaultImage = newBootEntryIndex;
2545      } else if (kw->separatorChar != '\0') {   return;
2546   indent[0] = kw->separatorChar;   }
     } else {  
  indent[0] = ' ';  
     }  
2547    
2548      if (insertHere > 0 && line->elements[insertHere-1].indent[0] == '\0') {   /* the user picks the default index based on the
2549   /* move the end-of-line forward */   * order of the bootloader configuration after
2550   line->elements[insertHere].indent =   * modification; ensure we are checking for the
2551      line->elements[insertHere-1].indent;   * existence of the correct entry */
2552   line->elements[insertHere-1].indent = strdup(indent);   if (newBootEntryIndex < newDefaultBootEntryIndex) {
2553      } else {   if (!config->isModified)
2554   line->elements[insertHere].indent = strdup(indent);   indexToVerify--;
2555      }   }
2556    
2557      line->numElements++;   /* verify the user selected index will exist */
2558     if (findEntryByIndex(config, indexToVerify)) {
2559     config->defaultImage = newDefaultBootEntryIndex;
2560     } else {
2561     config->defaultImage = NO_DEFAULT_ENTRY;
2562     }
2563    
2564      dbgPrintf("insertElement(%s, '%s%s', %d)\n",   return;
2565        line->elements[0].item,   }
       line->elements[insertHere].item,  
       line->elements[insertHere].indent,  
       insertHere);  
 }  
2566    
2567  static void removeElement(struct singleLine * line, int removeHere) {   /* handle cases where the index value may shift */
     int i;  
2568    
2569      /* sanity check */   /* check validity of existing default or first-entry-found
2570      if (removeHere >= line->numElements) return;     selection */
2571     if (defaultKernelPath) {
2572                    /* we must initialize this */
2573                    firstKernelEntryIndex = 0;
2574     /* user requested first-entry-found */
2575     if (!findEntryByPath(config, defaultKernelPath,
2576         prefix, &firstKernelEntryIndex)) {
2577     /* don't change default if can't find match */
2578     config->defaultImage = NO_DEFAULT_ENTRY;
2579     return;
2580     }
2581    
2582      dbgPrintf("removeElement(%s, %d:%s)\n", line->elements[0].item,   config->defaultImage = firstKernelEntryIndex;
       removeHere, line->elements[removeHere].item);  
2583    
2584      free(line->elements[removeHere].item);   /* this is where we start looking for decrement later */
2585     currentLookupIndex = config->defaultImage;
2586    
2587      if (removeHere > 1) {   if (isAddingBootEntry && !config->isModified &&
2588   /* previous argument gets this argument's post-indentation */      (newBootEntryIndex < config->defaultImage)) {
2589   free(line->elements[removeHere-1].indent);   /* increment because new entry added before default */
2590   line->elements[removeHere-1].indent =   config->defaultImage++;
2591      line->elements[removeHere].indent;   }
2592      } else {   } else {
2593   free(line->elements[removeHere].indent);   /* use pre-existing default entry */
2594      }   currentLookupIndex = config->defaultImage;
2595    
2596      /* now collapse the array, but don't bother to realloc smaller */   if (isAddingBootEntry
2597      for (i = removeHere; i < line->numElements - 1; i++)      && (newBootEntryIndex <= config->defaultImage)) {
2598   line->elements[i] = line->elements[i + 1];   config->defaultImage++;
   
     line->numElements--;  
 }  
   
 int argMatch(const char * one, const char * two) {  
     char * first, * second;  
     char * chptr;  
   
     first = strcpy(alloca(strlen(one) + 1), one);  
     second = strcpy(alloca(strlen(two) + 1), two);  
   
     chptr = strchr(first, '=');  
     if (chptr) *chptr = '\0';  
   
     chptr = strchr(second, '=');  
     if (chptr) *chptr = '\0';  
   
     return strcmp(first, second);  
 }  
   
 int updateActualImage(struct grubConfig * cfg, const char * image,  
                       const char * prefix, const char * addArgs,  
                       const char * removeArgs, int multibootArgs) {  
     struct singleEntry * entry;  
     struct singleLine * line, * rootLine;  
     int index = 0;  
     int i, k;  
     const char ** newArgs, ** oldArgs;  
     const char ** arg;  
     int useKernelArgs, useRoot;  
     int firstElement;  
     int *usedElements, *usedArgs;  
     int doreplace;  
   
     if (!image) return 0;  
   
     if (!addArgs) {  
  newArgs = malloc(sizeof(*newArgs));  
  *newArgs = NULL;  
     } else {  
  if (poptParseArgvString(addArgs, NULL, &newArgs)) {  
     fprintf(stderr,  
     _("grubby: error separating arguments '%s'\n"), addArgs);  
     return 1;  
  }  
     }  
2599    
2600      if (!removeArgs) {   if (config->isModified) {
2601   oldArgs = malloc(sizeof(*oldArgs));   currentLookupIndex++;
2602   *oldArgs = NULL;   }
2603      } else {   }
  if (poptParseArgvString(removeArgs, NULL, &oldArgs)) {  
     fprintf(stderr,  
     _("grubby: error separating arguments '%s'\n"), removeArgs);  
             free(newArgs);  
     return 1;  
2604   }   }
     }  
   
2605    
2606      useKernelArgs = (getKeywordByType(LT_KERNELARGS, cfg->cfi)   /* sanity check - is this entry index valid? */
2607       && (!multibootArgs || cfg->cfi->mbConcatArgs));   bootEntry = findEntryByIndex(config, currentLookupIndex);
2608    
2609      useRoot = (getKeywordByType(LT_ROOT, cfg->cfi)   if ((bootEntry && bootEntry->skip) || !bootEntry) {
2610         && !multibootArgs);   /* entry is to be skipped or is invalid */
2611     if (isAddingBootEntry) {
2612      for (k = 0, arg = newArgs; *arg; arg++, k++) ;   config->defaultImage = newBootEntryIndex;
2613      usedArgs = calloc(k, sizeof(*usedArgs));   return;
2614     }
2615     newDefault =
2616        findTemplate(config, prefix, &config->defaultImage, 1,
2617     flags);
2618     if (!newDefault) {
2619     config->defaultImage = NO_DEFAULT_ENTRY;
2620     }
2621    
2622      for (; (entry = findEntryByPath(cfg, image, prefix, &index)); index++) {   return;
2623     }
2624    
2625   if (multibootArgs && !entry->multiboot)   currentLookupIndex--;
     continue;  
2626    
2627   /* Determine where to put the args.  If this config supports   /* decrement index by the total number of entries deleted */
  * LT_KERNELARGS, use that.  Otherwise use  
  * LT_HYPER/LT_KERNEL/LT_MBMODULE lines.  
  */  
  if (useKernelArgs) {  
     line = getLineByType(LT_KERNELARGS, entry->lines);  
     if (!line) {  
  /* no LT_KERNELARGS, need to add it */  
  line = addLine(entry, cfg->cfi, LT_KERNELARGS,  
        cfg->secondaryIndent, NULL);  
     }  
     firstElement = 1;  
   
  } else if (multibootArgs) {  
     line = getLineByType(LT_HYPER, entry->lines);  
     if (!line) {  
  /* a multiboot entry without LT_HYPER? */  
  continue;  
     }  
     firstElement = 2;  
   
  } else {  
     line = getLineByType(LT_KERNEL|LT_MBMODULE, entry->lines);  
     if (!line) {  
  /* no LT_KERNEL or LT_MBMODULE in this entry? */  
  continue;  
     }  
     firstElement = 2;  
  }  
2628    
2629   /* handle the elilo case which does:   for (indexToVerify = currentLookupIndex;
2630   *   append="hypervisor args -- kernel args"       indexToVerify >= FIRST_ENTRY_INDEX; indexToVerify--) {
  */  
  if (entry->multiboot && cfg->cfi->mbConcatArgs) {  
     /* this is a multiboot entry, make sure there's  
      * -- on the args line  
      */  
     for (i = firstElement; i < line->numElements; i++) {  
  if (!strcmp(line->elements[i].item, "--"))  
     break;  
     }  
     if (i == line->numElements) {  
  /* assume all existing args are kernel args,  
  * prepend -- to make it official  
  */  
  insertElement(line, "--", firstElement, cfg->cfi);  
  i = firstElement;  
     }  
     if (!multibootArgs) {  
  /* kernel args start after the -- */  
  firstElement = i + 1;  
     }  
  } else if (cfg->cfi->mbConcatArgs) {  
     /* this is a non-multiboot entry, remove hyper args */  
     for (i = firstElement; i < line->numElements; i++) {  
  if (!strcmp(line->elements[i].item, "--"))  
     break;  
     }  
     if (i < line->numElements) {  
  /* remove args up to -- */  
  while (strcmp(line->elements[firstElement].item, "--"))  
     removeElement(line, firstElement);  
  /* remove -- */  
  removeElement(line, firstElement);  
     }  
  }  
   
         usedElements = calloc(line->numElements, sizeof(*usedElements));  
   
  for (k = 0, arg = newArgs; *arg; arg++, k++) {  
             if (usedArgs[k]) continue;  
   
     doreplace = 1;  
     for (i = firstElement; i < line->numElements; i++) {  
  if (multibootArgs && cfg->cfi->mbConcatArgs &&  
     !strcmp(line->elements[i].item, "--"))  
  {  
     /* reached the end of hyper args, insert here */  
     doreplace = 0;  
     break;    
  }  
                 if (usedElements[i])  
                     continue;  
  if (!argMatch(line->elements[i].item, *arg)) {  
                     usedElements[i]=1;  
                     usedArgs[k]=1;  
     break;  
                 }  
             }  
2631    
2632      if (i < line->numElements && doreplace) {   bootEntry = findEntryByIndex(config, indexToVerify);
  /* direct replacement */  
  free(line->elements[i].item);  
  line->elements[i].item = strdup(*arg);  
2633    
2634      } else if (useRoot && !strncmp(*arg, "root=/dev/", 10)) {   if (bootEntry && bootEntry->skip) {
2635   /* root= replacement */   config->defaultImage--;
  rootLine = getLineByType(LT_ROOT, entry->lines);  
  if (rootLine) {  
     free(rootLine->elements[1].item);  
     rootLine->elements[1].item = strdup(*arg + 5);  
  } else {  
     rootLine = addLine(entry, cfg->cfi, LT_ROOT,  
        cfg->secondaryIndent, *arg + 5);  
2636   }   }
     }  
   
     else {  
  /* insert/append */  
  insertElement(line, *arg, i, cfg->cfi);  
  usedElements = realloc(usedElements, line->numElements *  
        sizeof(*usedElements));  
  memmove(&usedElements[i + 1], &usedElements[i],  
  line->numElements - i - 1);  
  usedElements[i] = 1;  
   
  /* if we updated a root= here even though there is a  
    LT_ROOT available we need to remove the LT_ROOT entry  
    (this will happen if we switch from a device to a label) */  
  if (useRoot && !strncmp(*arg, "root=", 5)) {  
     rootLine = getLineByType(LT_ROOT, entry->lines);  
     if (rootLine)  
  removeLine(entry, rootLine);  
  }  
     }  
  }  
   
         free(usedElements);  
   
  for (arg = oldArgs; *arg; arg++) {  
     for (i = firstElement; i < line->numElements; i++) {  
  if (multibootArgs && cfg->cfi->mbConcatArgs &&  
     !strcmp(line->elements[i].item, "--"))  
     /* reached the end of hyper args, stop here */  
     break;  
  if (!argMatch(line->elements[i].item, *arg)) {  
     removeElement(line, i);  
     break;  
  }  
     }  
     /* handle removing LT_ROOT line too */  
     if (useRoot && !strncmp(*arg, "root=", 5)) {  
  rootLine = getLineByType(LT_ROOT, entry->lines);  
  if (rootLine)  
     removeLine(entry, rootLine);  
     }  
  }  
   
  if (line->numElements == 1) {  
     /* don't need the line at all (note it has to be a  
        LT_KERNELARGS for this to happen */  
     removeLine(entry, line);  
2637   }   }
2638      }  }
2639    
2640      free(usedArgs);  void setFallbackImage(struct grubConfig *config, int hasNew)
2641      free(newArgs);  {
2642      free(oldArgs);   struct singleEntry *entry, *entry2;
2643     int j;
2644    
2645      return 0;   if (config->fallbackImage == -1)
2646  }   return;
2647    
2648  int updateImage(struct grubConfig * cfg, const char * image,   entry = findEntryByIndex(config, config->fallbackImage);
2649                  const char * prefix, const char * addArgs,   if (!entry || entry->skip) {
2650                  const char * removeArgs,   config->fallbackImage = -1;
2651                  const char * addMBArgs, const char * removeMBArgs) {   return;
2652      int rc = 0;   }
   
     if (!image) return rc;  
   
     /* update the main args first... */  
     if (addArgs || removeArgs)  
         rc = updateActualImage(cfg, image, prefix, addArgs, removeArgs, 0);  
     if (rc) return rc;  
   
     /* and now any multiboot args */  
     if (addMBArgs || removeMBArgs)  
         rc = updateActualImage(cfg, image, prefix, addMBArgs, removeMBArgs, 1);  
     return rc;  
 }  
   
 int updateInitrd(struct grubConfig * cfg, const char * image,  
                  const char * prefix, const char * initrd) {  
     struct singleEntry * entry;  
     struct singleLine * line, * kernelLine;  
     int index = 0;  
   
     if (!image) return 0;  
   
     for (; (entry = findEntryByPath(cfg, image, prefix, &index)); index++) {  
         kernelLine = getLineByType(LT_KERNEL, entry->lines);  
         if (!kernelLine) continue;  
   
         line = getLineByType(LT_INITRD, entry->lines);  
         if (line)  
             removeLine(entry, line);  
         if (prefix) {  
             int prefixLen = strlen(prefix);  
             if (!strncmp(initrd, prefix, prefixLen))  
                 initrd += prefixLen;  
         }  
         line = addLine(entry, cfg->cfi, LT_INITRD, kernelLine->indent, initrd);  
         if (!line) return 1;  
         break;  
     }  
2653    
2654      return 0;   if (hasNew)
2655     config->fallbackImage++;
2656    
2657     /* count the number of entries erased before this one */
2658     for (j = 0; j < config->fallbackImage; j++) {
2659     entry2 = findEntryByIndex(config, j);
2660     if (entry2->skip)
2661     config->fallbackImage--;
2662     }
2663  }  }
2664    
2665  int checkDeviceBootloader(const char * device, const unsigned char * boot) {  void displayEntry(struct singleEntry *entry, const char *prefix, int index)
2666      int fd;  {
2667      unsigned char bootSect[512];   struct singleLine *line;
2668      int offset;   char *root = NULL;
2669     int i;
2670      fd = open(device, O_RDONLY);   int j;
     if (fd < 0) {  
  fprintf(stderr, _("grubby: unable to open %s: %s\n"),  
  device, strerror(errno));  
  return 1;  
     }  
2671    
2672      if (read(fd, bootSect, 512) != 512) {   printf("index=%d\n", index);
  fprintf(stderr, _("grubby: unable to read %s: %s\n"),  
  device, strerror(errno));  
  return 1;  
     }  
     close(fd);  
2673    
2674      /* first three bytes should match, a jmp short should be in there */   line =
2675      if (memcmp(boot, bootSect, 3))      getLineByType(LT_KERNEL | LT_HYPER | LT_KERNEL_EFI | LT_KERNEL_16,
2676   return 0;    entry->lines);
2677     if (!line) {
2678     printf("non linux entry\n");
2679     return;
2680     }
2681    
2682      if (boot[1] == 0xeb) {   if (!strncmp(prefix, line->elements[1].item, strlen(prefix)))
2683   offset = boot[2] + 2;   printf("kernel=%s\n", line->elements[1].item);
2684      } else if (boot[1] == 0xe8 || boot[1] == 0xe9) {   else
2685   offset = (boot[3] << 8) + boot[2] + 2;   printf("kernel=%s%s\n", prefix, line->elements[1].item);
     } else if (boot[0] == 0xeb) {  
  offset = boot[1] + 2;  
     } else if (boot[0] == 0xe8 || boot[0] == 0xe9) {  
  offset = (boot[2] << 8) + boot[1] + 2;  
     } else {  
  return 0;  
     }  
2686    
2687      if (memcmp(boot + offset, bootSect + offset, CODE_SEG_SIZE))   if (line->numElements >= 3) {
2688   return 0;   printf("args=\"");
2689     i = 2;
2690     while (i < line->numElements) {
2691     if (!strncmp(line->elements[i].item, "root=", 5)) {
2692     root = line->elements[i].item + 5;
2693     } else {
2694     printf("%s%s", line->elements[i].item,
2695           line->elements[i].indent);
2696     }
2697    
2698      return 2;   i++;
2699  }   }
2700     printf("\"\n");
2701     } else {
2702     line = getLineByType(LT_KERNELARGS, entry->lines);
2703     if (line) {
2704     char *s;
2705    
2706     printf("args=\"");
2707     i = 1;
2708     while (i < line->numElements) {
2709     if (!strncmp
2710        (line->elements[i].item, "root=", 5)) {
2711     root = line->elements[i].item + 5;
2712     } else {
2713     s = line->elements[i].item;
2714    
2715  int checkLiloOnRaid(char * mdDev, const unsigned char * boot) {   printf("%s%s", s,
2716      int fd;         line->elements[i].indent);
2717      char buf[65536];   }
     char * end;  
     char * chptr;  
     char * chptr2;  
     int rc;  
2718    
2719      /* it's on raid; we need to parse /proc/mdstat and check all of the   i++;
2720         *raw* devices listed in there */   }
2721    
2722      if (!strncmp(mdDev, "/dev/", 5))   s = line->elements[i - 1].indent;
2723   mdDev += 5;   printf("\"\n");
2724     }
2725     }
2726    
2727      if ((fd = open("/proc/mdstat", O_RDONLY)) < 0) {   if (!root) {
2728   fprintf(stderr, _("grubby: failed to open /proc/mdstat: %s\n"),   line = getLineByType(LT_ROOT, entry->lines);
2729   strerror(errno));   if (line && line->numElements >= 2)
2730   return 2;   root = line->elements[1].item;
2731      }   }
2732    
2733      rc = read(fd, buf, sizeof(buf) - 1);   if (root) {
2734      if (rc < 0 || rc == (sizeof(buf) - 1)) {   char *s = alloca(strlen(root) + 1);
  fprintf(stderr, _("grubby: failed to read /proc/mdstat: %s\n"),  
  strerror(errno));  
  close(fd);  
  return 2;  
     }  
     close(fd);  
     buf[rc] = '\0';  
2735    
2736      chptr = buf;   strcpy(s, root);
2737      while (*chptr) {   if (s[strlen(s) - 1] == '"')
2738   end = strchr(chptr, '\n');   s[strlen(s) - 1] = '\0';
2739   if (!end) break;   /* make sure the root doesn't have a trailing " */
2740   *end = '\0';   printf("root=%s\n", s);
2741     }
2742    
2743   if (!strncmp(chptr, mdDev, strlen(mdDev)) &&   line =
2744      chptr[strlen(mdDev)] == ' ') {      getLineByType(LT_INITRD | LT_INITRD_EFI | LT_INITRD_16,
2745      entry->lines);
2746    
2747      /* found the device */   if (line && line->numElements >= 2) {
2748      while (*chptr && *chptr != ':') chptr++;   if (!strncmp(prefix, line->elements[1].item, strlen(prefix)))
2749      chptr++;   printf("initrd=");
2750      while (*chptr && isspace(*chptr)) chptr++;   else
2751     printf("initrd=%s", prefix);
     /* skip the "active" bit */  
     while (*chptr && !isspace(*chptr)) chptr++;  
     while (*chptr && isspace(*chptr)) chptr++;  
   
     /* skip the raid level */  
     while (*chptr && !isspace(*chptr)) chptr++;  
     while (*chptr && isspace(*chptr)) chptr++;  
   
     /* everything else is partition stuff */  
     while (*chptr) {  
  chptr2 = chptr;  
  while (*chptr2 && *chptr2 != '[') chptr2++;  
  if (!*chptr2) break;  
   
  /* yank off the numbers at the end */  
  chptr2--;  
  while (isdigit(*chptr2) && chptr2 > chptr) chptr2--;  
  chptr2++;  
  *chptr2 = '\0';  
   
  /* Better, now we need the /dev/ back. We're done with  
  * everything before this point, so we can just put  
  * the /dev/ part there. There will always be room. */  
  memcpy(chptr - 5, "/dev/", 5);  
  rc = checkDeviceBootloader(chptr - 5, boot);  
  if (rc != 2) {  
     return rc;  
  }  
   
  chptr = chptr2 + 1;  
  /* skip the [11] bit */  
  while (*chptr && !isspace(*chptr)) chptr++;  
  /* and move to the next one */  
  while (*chptr && isspace(*chptr)) chptr++;  
     }  
2752    
2753      /*  we're good to go */   for (i = 1; i < line->numElements; i++)
2754      return 2;   printf("%s%s", line->elements[i].item,
2755           line->elements[i].indent);
2756     printf("\n");
2757   }   }
2758    
2759   chptr = end + 1;   line = getLineByType(LT_TITLE, entry->lines);
2760      }   if (line) {
2761     printf("title=%s\n", line->elements[1].item);
2762     } else {
2763     char *title;
2764     line = getLineByType(LT_MENUENTRY, entry->lines);
2765     if (line) {
2766     title = grub2ExtractTitle(line);
2767     if (title)
2768     printf("title=%s\n", title);
2769     }
2770     }
2771    
2772      fprintf(stderr,   for (j = 0, line = entry->lines; line; line = line->next) {
2773      _("grubby: raid device /dev/%s not found in /proc/mdstat\n"),   if ((line->type & LT_MBMODULE) && line->numElements >= 2) {
2774      mdDev);   if (!strncmp
2775      return 0;      (prefix, line->elements[1].item, strlen(prefix)))
2776     printf("mbmodule%d=", j);
2777     else
2778     printf("mbmodule%d=%s", j, prefix);
2779    
2780     for (i = 1; i < line->numElements; i++)
2781     printf("%s%s", line->elements[i].item,
2782           line->elements[i].indent);
2783     printf("\n");
2784     j++;
2785     }
2786     }
2787  }  }
2788    
2789  int checkForLilo(struct grubConfig * config) {  int isSuseSystem(void)
2790      int fd;  {
2791      unsigned char boot[512];   const char *path;
2792      struct singleLine * line;   const static char default_path[] = "/etc/SuSE-release";
   
     for (line = config->theLines; line; line = line->next)  
  if (line->type == LT_BOOT) break;  
   
     if (!line) {  
  fprintf(stderr,  
  _("grubby: no boot line found in lilo configuration\n"));  
  return 1;  
     }  
2793    
2794      if (line->numElements != 2) return 1;   if ((path = getenv("GRUBBY_SUSE_RELEASE")) == NULL)
2795     path = default_path;
2796    
2797      fd = open("/boot/boot.b", O_RDONLY);   if (!access(path, R_OK))
2798      if (fd < 0) {   return 1;
2799   fprintf(stderr, _("grubby: unable to open %s: %s\n"),   return 0;
2800   "/boot/boot.b", strerror(errno));  }
  return 1;  
     }  
2801    
2802      if (read(fd, boot, 512) != 512) {  int isSuseGrubConf(const char *path)
2803   fprintf(stderr, _("grubby: unable to read %s: %s\n"),  {
2804   "/boot/boot.b", strerror(errno));   FILE *grubConf;
2805   return 1;   char *line = NULL;
2806      }   size_t len = 0, res = 0;
2807      close(fd);  
2808     grubConf = fopen(path, "r");
2809     if (!grubConf) {
2810     dbgPrintf("Could not open SuSE configuration file '%s'\n",
2811      path);
2812     return 0;
2813     }
2814    
2815     while ((res = getline(&line, &len, grubConf)) != -1) {
2816     if (!strncmp(line, "setup", 5)) {
2817     fclose(grubConf);
2818     free(line);
2819     return 1;
2820     }
2821     }
2822    
2823      if (!strncmp("/dev/md", line->elements[1].item, 7))   dbgPrintf("SuSE configuration file '%s' does not appear to be valid\n",
2824   return checkLiloOnRaid(line->elements[1].item, boot);    path);
2825    
2826      return checkDeviceBootloader(line->elements[1].item, boot);   fclose(grubConf);
2827     free(line);
2828     return 0;
2829  }  }
2830    
2831  int checkForGrub(struct grubConfig * config) {  int suseGrubConfGetLba(const char *path, int *lbaPtr)
2832      int fd;  {
2833      unsigned char bootSect[512];   FILE *grubConf;
2834      char * boot;   char *line = NULL;
2835     size_t res = 0, len = 0;
2836    
2837      if (parseSysconfigGrub(NULL, &boot))   if (!path)
2838   return 0;   return 1;
2839     if (!lbaPtr)
2840     return 1;
2841    
2842      /* assume grub is not installed -- not an error condition */   grubConf = fopen(path, "r");
2843      if (!boot)   if (!grubConf)
2844   return 0;   return 1;
2845    
2846      fd = open("/boot/grub/stage1", O_RDONLY);   while ((res = getline(&line, &len, grubConf)) != -1) {
2847      if (fd < 0)   if (line[res - 1] == '\n')
2848   /* this doesn't exist if grub hasn't been installed */   line[res - 1] = '\0';
2849   return 0;   else if (len > res)
2850     line[res] = '\0';
2851     else {
2852     line = realloc(line, res + 1);
2853     line[res] = '\0';
2854     }
2855    
2856      if (read(fd, bootSect, 512) != 512) {   if (!strncmp(line, "setup", 5)) {
2857   fprintf(stderr, _("grubby: unable to read %s: %s\n"),   if (strstr(line, "--force-lba")) {
2858   "/boot/grub/stage1", strerror(errno));   *lbaPtr = 1;
2859   close(fd);   } else {
2860   return 1;   *lbaPtr = 0;
2861      }   }
2862      close(fd);   dbgPrintf("lba: %i\n", *lbaPtr);
2863     break;
2864     }
2865     }
2866    
2867      return checkDeviceBootloader(boot, bootSect);   free(line);
2868     fclose(grubConf);
2869     return 0;
2870  }  }
2871    
2872  int checkForExtLinux(struct grubConfig * config) {  int suseGrubConfGetInstallDevice(const char *path, char **devicePtr)
2873      int fd;  {
2874      unsigned char bootSect[512];   FILE *grubConf;
2875      char * boot;   char *line = NULL;
2876      char executable[] = "/boot/extlinux/extlinux";   size_t res = 0, len = 0;
2877     char *lastParamPtr = NULL;
2878     char *secLastParamPtr = NULL;
2879     char installDeviceNumber = '\0';
2880     char *bounds = NULL;
2881    
2882      printf("entered: checkForExtLinux()\n");   if (!path)
2883     return 1;
2884     if (!devicePtr)
2885     return 1;
2886    
2887      if (parseSysconfigGrub(NULL, &boot))   grubConf = fopen(path, "r");
2888   return 0;   if (!grubConf)
2889     return 1;
2890    
2891      /* assume grub is not installed -- not an error condition */   while ((res = getline(&line, &len, grubConf)) != -1) {
2892      if (!boot)   if (strncmp(line, "setup", 5))
2893   return 0;   continue;
2894    
2895     if (line[res - 1] == '\n')
2896     line[res - 1] = '\0';
2897     else if (len > res)
2898     line[res] = '\0';
2899     else {
2900     line = realloc(line, res + 1);
2901     line[res] = '\0';
2902     }
2903    
2904      fd = open(executable, O_RDONLY);   lastParamPtr = bounds = line + res;
     if (fd < 0)  
  /* this doesn't exist if grub hasn't been installed */  
  return 0;  
2905    
2906      if (read(fd, bootSect, 512) != 512) {   /* Last parameter in grub may be an optional IMAGE_DEVICE */
2907   fprintf(stderr, _("grubby: unable to read %s: %s\n"),   while (!isspace(*lastParamPtr))
2908   executable, strerror(errno));   lastParamPtr--;
2909   return 1;   lastParamPtr++;
2910      }  
2911      close(fd);   secLastParamPtr = lastParamPtr - 2;
2912     dbgPrintf("lastParamPtr: %s\n", lastParamPtr);
2913    
2914     if (lastParamPtr + 3 > bounds) {
2915     dbgPrintf("lastParamPtr going over boundary");
2916     fclose(grubConf);
2917     free(line);
2918     return 1;
2919     }
2920     if (!strncmp(lastParamPtr, "(hd", 3))
2921     lastParamPtr += 3;
2922     dbgPrintf("lastParamPtr: %c\n", *lastParamPtr);
2923    
2924     /*
2925     * Second last parameter will decide wether last parameter is
2926     * an IMAGE_DEVICE or INSTALL_DEVICE
2927     */
2928     while (!isspace(*secLastParamPtr))
2929     secLastParamPtr--;
2930     secLastParamPtr++;
2931    
2932     if (secLastParamPtr + 3 > bounds) {
2933     dbgPrintf("secLastParamPtr going over boundary");
2934     fclose(grubConf);
2935     free(line);
2936     return 1;
2937     }
2938     dbgPrintf("secLastParamPtr: %s\n", secLastParamPtr);
2939     if (!strncmp(secLastParamPtr, "(hd", 3)) {
2940     secLastParamPtr += 3;
2941     dbgPrintf("secLastParamPtr: %c\n", *secLastParamPtr);
2942     installDeviceNumber = *secLastParamPtr;
2943     } else {
2944     installDeviceNumber = *lastParamPtr;
2945     }
2946    
2947      return checkDeviceBootloader(boot, bootSect);   *devicePtr = malloc(6);
2948     snprintf(*devicePtr, 6, "(hd%c)", installDeviceNumber);
2949     dbgPrintf("installDeviceNumber: %c\n", installDeviceNumber);
2950     fclose(grubConf);
2951     free(line);
2952     return 0;
2953     }
2954    
2955     free(line);
2956     fclose(grubConf);
2957     return 1;
2958  }  }
2959    
2960  static char * getRootSpecifier(char * str) {  int grubGetBootFromDeviceMap(const char *device, char **bootPtr)
2961      char * idx, * rootspec = NULL;  {
2962     FILE *deviceMap;
2963     char *line = NULL;
2964     size_t res = 0, len = 0;
2965     char *devicePtr;
2966     char *bounds = NULL;
2967     const char *path;
2968     const static char default_path[] = "/boot/grub/device.map";
2969    
2970      if (*str == '(') {   if (!device)
2971          idx = rootspec = strdup(str);   return 1;
2972          while(*idx && (*idx != ')') && (!isspace(*idx))) idx++;   if (!bootPtr)
2973          *(++idx) = '\0';   return 1;
     }  
     return rootspec;  
 }  
2974    
2975  static char * getInitrdVal(struct grubConfig * config,   if ((path = getenv("GRUBBY_GRUB_DEVICE_MAP")) == NULL)
2976     const char * prefix, struct singleLine *tmplLine,   path = default_path;
    const char * newKernelInitrd,  
    char ** extraInitrds, int extraInitrdCount)  
 {  
     char *initrdVal, *end;  
     int i;  
     size_t totalSize;  
     size_t prefixLen;  
     char separatorChar;  
   
     prefixLen = strlen(prefix);  
     totalSize = strlen(newKernelInitrd) - prefixLen + 1 /* \0 */;  
   
     for (i = 0; i < extraInitrdCount; i++) {  
  totalSize += sizeof(separatorChar);  
  totalSize += strlen(extraInitrds[i]) - prefixLen;  
     }  
2977    
2978      initrdVal = end = malloc(totalSize);   dbgPrintf("opening grub device.map file from: %s\n", path);
2979     deviceMap = fopen(path, "r");
2980     if (!deviceMap)
2981     return 1;
2982    
2983      end = stpcpy (end, newKernelInitrd + prefixLen);   while ((res = getline(&line, &len, deviceMap)) != -1) {
2984     if (!strncmp(line, "#", 1))
2985     continue;
2986    
2987     if (line[res - 1] == '\n')
2988     line[res - 1] = '\0';
2989     else if (len > res)
2990     line[res] = '\0';
2991     else {
2992     line = realloc(line, res + 1);
2993     line[res] = '\0';
2994     }
2995    
2996      separatorChar = getKeywordByType(LT_INITRD, config->cfi)->separatorChar;   devicePtr = line;
2997      for (i = 0; i < extraInitrdCount; i++) {   bounds = line + res;
  const char *extraInitrd;  
  int j;  
2998    
2999   extraInitrd = extraInitrds[i] + prefixLen;   while ((isspace(*line) && ((devicePtr + 1) <= bounds)))
3000   /* Don't add entries that are already there */   devicePtr++;
3001   if (tmplLine != NULL) {   dbgPrintf("device: %s\n", devicePtr);
3002      for (j = 2; j < tmplLine->numElements; j++)  
3003   if (strcmp(extraInitrd, tmplLine->elements[j].item) == 0)   if (!strncmp(devicePtr, device, strlen(device))) {
3004      break;   devicePtr += strlen(device);
3005     while (isspace(*devicePtr)
3006           && ((devicePtr + 1) <= bounds))
3007     devicePtr++;
3008    
3009      if (j != tmplLine->numElements)   *bootPtr = strdup(devicePtr);
3010   continue;   break;
3011     }
3012   }   }
3013    
3014   *end++ = separatorChar;   free(line);
3015   end = stpcpy(end, extraInitrd);   fclose(deviceMap);
3016      }   return 0;
   
     return initrdVal;  
3017  }  }
3018    
3019  int addNewKernel(struct grubConfig * config, struct singleEntry * template,  int suseGrubConfGetBoot(const char *path, char **bootPtr)
3020           const char * prefix,  {
3021   char * newKernelPath, char * newKernelTitle,   char *grubDevice;
  char * newKernelArgs, char * newKernelInitrd,  
  char ** extraInitrds, int extraInitrdCount,  
                  char * newMBKernel, char * newMBKernelArgs) {  
     struct singleEntry * new;  
     struct singleLine * newLine = NULL, * tmplLine = NULL, * masterLine = NULL;  
     int needs;  
     char * chptr;  
   
     if (!newKernelPath) return 0;  
   
     /* if the newKernelTitle is too long silently munge it into something  
      * we can live with. truncating is first check, then we'll just mess with  
      * it until it looks better */  
     if (config->cfi->maxTitleLength &&  
     (strlen(newKernelTitle) > config->cfi->maxTitleLength)) {  
  char * buf = alloca(config->cfi->maxTitleLength + 7);  
  char * numBuf = alloca(config->cfi->maxTitleLength + 1);  
  int i = 1;  
3022    
3023   sprintf(buf, "TITLE=%.*s", config->cfi->maxTitleLength, newKernelTitle);   if (suseGrubConfGetInstallDevice(path, &grubDevice))
3024   while (findEntryByPath(config, buf, NULL, NULL)) {   dbgPrintf("error looking for grub installation device\n");
3025      sprintf(numBuf, "%d", i++);   else
3026      strcpy(buf + strlen(buf) - strlen(numBuf), numBuf);   dbgPrintf("grubby installation device: %s\n", grubDevice);
  }  
3027    
3028   newKernelTitle = buf + 6;   if (grubGetBootFromDeviceMap(grubDevice, bootPtr))
3029      }   dbgPrintf("error looking for grub boot device\n");
3030     else
3031     dbgPrintf("grubby boot device: %s\n", *bootPtr);
3032    
3033      new = malloc(sizeof(*new));   free(grubDevice);
3034      new->skip = 0;   return 0;
3035      new->multiboot = 0;  }
     new->next = config->entries;  
     new->lines = NULL;  
     config->entries = new;  
   
     /* copy/update from the template */  
     needs = NEED_KERNEL | NEED_TITLE;  
     if (newKernelInitrd)  
  needs |= NEED_INITRD;  
     if (newMBKernel) {  
         needs |= NEED_MB;  
         new->multiboot = 1;  
     }  
3036    
3037      if (template) {  int parseSuseGrubConf(int *lbaPtr, char **bootPtr)
3038   for (masterLine = template->lines;  {
3039       masterLine && (tmplLine = lineDup(masterLine));   /*
3040       lineFree(tmplLine), masterLine = masterLine->next)   * This SuSE grub configuration file at this location is not your
3041   {   * average grub configuration file, but instead the grub commands
3042      dbgPrintf("addNewKernel processing %d\n", tmplLine->type);   * used to setup grub on that system.
   
     /* skip comments */  
     chptr = tmplLine->indent;  
     while (*chptr && isspace(*chptr)) chptr++;  
     if (*chptr == '#') continue;  
   
     if (tmplLine->type == LT_KERNEL &&  
  tmplLine->numElements >= 2) {  
  if (!template->multiboot && (needs & NEED_MB)) {  
     /* it's not a multiboot template and this is the kernel  
      * line.  Try to be intelligent about inserting the  
      * hypervisor at the same time.  
      */  
     if (config->cfi->mbHyperFirst) {  
  /* insert the hypervisor first */  
  newLine = addLine(new, config->cfi, LT_HYPER,  
   tmplLine->indent,  
   newMBKernel + strlen(prefix));  
  /* set up for adding the kernel line */  
  free(tmplLine->indent);  
  tmplLine->indent = strdup(config->secondaryIndent);  
  needs &= ~NEED_MB;  
     }  
     if (needs & NEED_KERNEL) {  
  /* use addLineTmpl to preserve line elements,  
  * otherwise we could just call addLine.  Unfortunately  
  * this means making some changes to the template  
  * such as the indent change above and the type  
  * change below.  
  */  
  struct keywordTypes * mbm_kw =  
     getKeywordByType(LT_MBMODULE, config->cfi);  
  if (mbm_kw) {  
     tmplLine->type = LT_MBMODULE;  
     free(tmplLine->elements[0].item);  
     tmplLine->elements[0].item = strdup(mbm_kw->key);  
  }  
  newLine = addLineTmpl(new, tmplLine, newLine,  
       newKernelPath + strlen(prefix), config->cfi);  
  needs &= ~NEED_KERNEL;  
     }  
     if (needs & NEED_MB) { /* !mbHyperFirst */  
  newLine = addLine(new, config->cfi, LT_HYPER,  
   config->secondaryIndent,  
   newMBKernel + strlen(prefix));  
  needs &= ~NEED_MB;  
     }  
  } else if (needs & NEED_KERNEL) {  
     newLine = addLineTmpl(new, tmplLine, newLine,  
   newKernelPath + strlen(prefix), config->cfi);  
     needs &= ~NEED_KERNEL;  
  }  
   
     } else if (tmplLine->type == LT_HYPER &&  
        tmplLine->numElements >= 2) {  
  if (needs & NEED_MB) {  
     newLine = addLineTmpl(new, tmplLine, newLine,  
   newMBKernel + strlen(prefix), config->cfi);  
     needs &= ~NEED_MB;  
  }  
   
     } else if (tmplLine->type == LT_MBMODULE &&  
        tmplLine->numElements >= 2) {  
  if (new->multiboot) {  
     if (needs & NEED_KERNEL) {  
  newLine = addLineTmpl(new, tmplLine, newLine,  
       newKernelPath +  
       strlen(prefix), config->cfi);  
  needs &= ~NEED_KERNEL;  
     } else if (config->cfi->mbInitRdIsModule &&  
        (needs & NEED_INITRD)) {  
  char *initrdVal;  
  initrdVal = getInitrdVal(config, prefix, tmplLine,  
  newKernelInitrd, extraInitrds,  
  extraInitrdCount);  
  newLine = addLineTmpl(new, tmplLine, newLine,  
       initrdVal, config->cfi);  
  free(initrdVal);  
  needs &= ~NEED_INITRD;  
     }  
  } else if (needs & NEED_KERNEL) {  
     /* template is multi but new is not,  
      * insert the kernel in the first module slot  
      */  
     tmplLine->type = LT_KERNEL;  
     free(tmplLine->elements[0].item);  
     tmplLine->elements[0].item =  
  strdup(getKeywordByType(LT_KERNEL, config->cfi)->key);  
     newLine = addLineTmpl(new, tmplLine, newLine,  
   newKernelPath + strlen(prefix), config->cfi);  
     needs &= ~NEED_KERNEL;  
  } else if (needs & NEED_INITRD) {  
     char *initrdVal;  
     /* template is multi but new is not,  
      * insert the initrd in the second module slot  
      */  
     tmplLine->type = LT_INITRD;  
     free(tmplLine->elements[0].item);  
     tmplLine->elements[0].item =  
  strdup(getKeywordByType(LT_INITRD, config->cfi)->key);  
     initrdVal = getInitrdVal(config, prefix, tmplLine, newKernelInitrd, extraInitrds, extraInitrdCount);  
     newLine = addLineTmpl(new, tmplLine, newLine, initrdVal, config->cfi);  
     free(initrdVal);  
     needs &= ~NEED_INITRD;  
  }  
   
     } else if (tmplLine->type == LT_INITRD &&  
        tmplLine->numElements >= 2) {  
  if (needs & NEED_INITRD &&  
     new->multiboot && !template->multiboot &&  
     config->cfi->mbInitRdIsModule) {  
     /* make sure we don't insert the module initrd  
      * before the module kernel... if we don't do it here,  
      * it will be inserted following the template.  
      */  
     if (!needs & NEED_KERNEL) {  
  char *initrdVal;  
   
  initrdVal = getInitrdVal(config, prefix, tmplLine, newKernelInitrd, extraInitrds, extraInitrdCount);  
  newLine = addLine(new, config->cfi, LT_MBMODULE,  
   config->secondaryIndent,  
   initrdVal);  
  free(initrdVal);  
  needs &= ~NEED_INITRD;  
     }  
  } else if (needs & NEED_INITRD) {  
     char *initrdVal;  
     initrdVal = getInitrdVal(config, prefix, tmplLine, newKernelInitrd, extraInitrds, extraInitrdCount);  
     newLine = addLineTmpl(new, tmplLine, newLine, initrdVal, config->cfi);  
     free(initrdVal);  
     needs &= ~NEED_INITRD;  
  }  
   
     } else if (tmplLine->type == LT_TITLE &&  
        (needs & NEED_TITLE)) {  
  if (tmplLine->numElements >= 2) {  
     newLine = addLineTmpl(new, tmplLine, newLine,  
   newKernelTitle, config->cfi);  
     needs &= ~NEED_TITLE;  
  } else if (tmplLine->numElements == 1 &&  
    config->cfi->titleBracketed) {  
     /* addLineTmpl doesn't handle titleBracketed */  
     newLine = addLine(new, config->cfi, LT_TITLE,  
       tmplLine->indent, newKernelTitle);  
     needs &= ~NEED_TITLE;  
  }  
   
     } else {  
  /* pass through other lines from the template */  
  newLine = addLineTmpl(new, tmplLine, newLine, NULL, config->cfi);  
     }  
  }  
   
     } else {  
  /* don't have a template, so start the entry with the  
  * appropriate starting line  
3043   */   */
3044   switch (config->cfi->entrySeparator) {   const char *path;
3045      case LT_KERNEL:   const static char default_path[] = "/etc/grub.conf";
  if (new->multiboot && config->cfi->mbHyperFirst) {  
     /* fall through to LT_HYPER */  
  } else {  
     newLine = addLine(new, config->cfi, LT_KERNEL,  
       config->primaryIndent,  
       newKernelPath + strlen(prefix));  
     needs &= ~NEED_KERNEL;  
     break;  
  }  
3046    
3047      case LT_HYPER:   if ((path = getenv("GRUBBY_SUSE_GRUB_CONF")) == NULL)
3048   newLine = addLine(new, config->cfi, LT_HYPER,   path = default_path;
   config->primaryIndent,  
   newMBKernel + strlen(prefix));  
  needs &= ~NEED_MB;  
  break;  
3049    
3050      case LT_TITLE:   if (!isSuseGrubConf(path))
3051   if( useextlinuxmenu != 0 ){ // We just need useextlinuxmenu to not be zero (set above)   return 1;
  char * templabel;  
  int x = 0, y = 0;  
   
  templabel = strdup(newKernelTitle);  
  while( templabel[x]){  
  if( templabel[x] == ' ' ){  
  y = x;  
  while( templabel[y] ){  
  templabel[y] = templabel[y+1];  
  y++;  
  }  
  }  
  x++;  
  }  
  newLine = addLine(new, config->cfi, LT_TITLE,  
   config->primaryIndent, templabel);  
  free(templabel);  
  }else{  
  newLine = addLine(new, config->cfi, LT_TITLE,  
   config->primaryIndent, newKernelTitle);  
  }  
  needs &= ~NEED_TITLE;  
  break;  
3052    
3053      default:   if (lbaPtr) {
3054   abort();   *lbaPtr = 0;
3055     if (suseGrubConfGetLba(path, lbaPtr))
3056     return 1;
3057   }   }
     }  
   
     /* add the remainder of the lines, i.e. those that either  
      * weren't present in the template, or in the case of no template,  
      * all the lines following the entrySeparator.  
      */  
     if (needs & NEED_TITLE) {  
  newLine = addLine(new, config->cfi, LT_TITLE,  
   config->secondaryIndent,  
   newKernelTitle);  
  needs &= ~NEED_TITLE;  
     }  
     if ((needs & NEED_MB) && config->cfi->mbHyperFirst) {  
  newLine = addLine(new, config->cfi, LT_HYPER,  
   config->secondaryIndent,  
   newMBKernel + strlen(prefix));  
  needs &= ~NEED_MB;  
     }  
     if (needs & NEED_KERNEL) {  
  newLine = addLine(new, config->cfi,  
   (new->multiboot && getKeywordByType(LT_MBMODULE,  
       config->cfi)) ?  
   LT_MBMODULE : LT_KERNEL,  
   config->secondaryIndent,  
   newKernelPath + strlen(prefix));  
  needs &= ~NEED_KERNEL;  
     }  
     if (needs & NEED_MB) {  
  newLine = addLine(new, config->cfi, LT_HYPER,  
   config->secondaryIndent,  
   newMBKernel + strlen(prefix));  
  needs &= ~NEED_MB;  
     }  
     if (needs & NEED_INITRD) {  
  char *initrdVal;  
  initrdVal = getInitrdVal(config, prefix, NULL, newKernelInitrd, extraInitrds, extraInitrdCount);  
  newLine = addLine(new, config->cfi,  
   (new->multiboot && getKeywordByType(LT_MBMODULE,  
       config->cfi)) ?  
   LT_MBMODULE : LT_INITRD,  
   config->secondaryIndent,  
   initrdVal);  
  free(initrdVal);  
  needs &= ~NEED_INITRD;  
     }  
   
     if (needs) {  
  printf(_("grubby: needs=%d, aborting\n"), needs);  
  abort();  
     }  
3058    
3059      if (updateImage(config, "0", prefix, newKernelArgs, NULL,   if (bootPtr) {
3060                      newMBKernelArgs, NULL)) return 1;   *bootPtr = NULL;
3061     suseGrubConfGetBoot(path, bootPtr);
3062     }
3063    
3064      return 0;   return 0;
3065  }  }
3066    
3067  static void traceback(int signum)  int parseSysconfigGrub(int *lbaPtr, char **bootPtr)
3068  {  {
3069      void *array[40];   FILE *in;
3070      size_t size;   char buf[1024];
3071     char *chptr;
3072     char *start;
3073     char *param;
3074    
3075      signal(SIGSEGV, SIG_DFL);   in = fopen("/etc/sysconfig/grub", "r");
3076      memset(array, '\0', sizeof (array));   if (!in)
     size = backtrace(array, 40);  
   
     fprintf(stderr, "grubby recieved SIGSEGV!  Backtrace (%ld):\n",  
             (unsigned long)size);  
     backtrace_symbols_fd(array, size, STDERR_FILENO);  
     exit(1);  
 }  
   
 int main(int argc, const char ** argv) {  
     poptContext optCon;  
     char * grubConfig = NULL;  
     char * outputFile = NULL;  
     int arg = 0;  
     int flags = 0;  
     int badImageOkay = 0;  
     int configureLilo = 0, configureELilo = 0, configureGrub = 0;  
     int configureYaboot = 0, configureSilo = 0, configureZipl = 0;  
     int configureExtLinux = 0;  
     int bootloaderProbe = 0;  
     int extraInitrdCount = 0;  
     char * updateKernelPath = NULL;  
     char * newKernelPath = NULL;  
     char * removeKernelPath = NULL;  
     char * newKernelArgs = NULL;  
     char * newKernelInitrd = NULL;  
     char * newKernelTitle = NULL;  
     char * newKernelVersion = NULL;  
     char * newMBKernel = NULL;  
     char * newMBKernelArgs = NULL;  
     char * removeMBKernelArgs = NULL;  
     char * removeMBKernel = NULL;  
     char * bootPrefix = NULL;  
     char * defaultKernel = NULL;  
     char * removeArgs = NULL;  
     char * kernelInfo = NULL;  
     char * extraInitrds[MAX_EXTRA_INITRDS] = { NULL };  
     const char * chptr = NULL;  
     struct configFileInfo * cfi = NULL;  
     struct grubConfig * config;  
     struct singleEntry * template = NULL;  
     int copyDefault = 0, makeDefault = 0;  
     int displayDefault = 0;  
     struct poptOption options[] = {  
  { "add-kernel", 0, POPT_ARG_STRING, &newKernelPath, 0,  
     _("add an entry for the specified kernel"), _("kernel-path") },  
  { "add-multiboot", 0, POPT_ARG_STRING, &newMBKernel, 0,  
     _("add an entry for the specified multiboot kernel"), NULL },  
  { "args", 0, POPT_ARG_STRING, &newKernelArgs, 0,  
     _("default arguments for the new kernel or new arguments for "  
       "kernel being updated"), _("args") },  
  { "mbargs", 0, POPT_ARG_STRING, &newMBKernelArgs, 0,  
     _("default arguments for the new multiboot kernel or "  
               "new arguments for multiboot kernel being updated"), NULL },  
  { "bad-image-okay", 0, 0, &badImageOkay, 0,  
     _("don't sanity check images in boot entries (for testing only)"),  
     NULL },  
  { "boot-filesystem", 0, POPT_ARG_STRING, &bootPrefix, 0,  
     _("filestystem which contains /boot directory (for testing only)"),  
     _("bootfs") },  
 #if defined(__i386__) || defined(__x86_64__)  
  { "bootloader-probe", 0, POPT_ARG_NONE, &bootloaderProbe, 0,  
     _("check if lilo is installed on lilo.conf boot sector") },  
 #endif  
  { "config-file", 'c', POPT_ARG_STRING, &grubConfig, 0,  
     _("path to grub config file to update (\"-\" for stdin)"),  
     _("path") },  
  { "copy-default", 0, 0, &copyDefault, 0,  
     _("use the default boot entry as a template for the new entry "  
       "being added; if the default is not a linux image, or if "  
       "the kernel referenced by the default image does not exist, "  
       "the first linux entry whose kernel does exist is used as the "  
       "template"), NULL },  
  { "default-kernel", 0, 0, &displayDefault, 0,  
     _("display the path of the default kernel") },  
  { "elilo", 0, POPT_ARG_NONE, &configureELilo, 0,  
     _("configure elilo bootloader") },  
  { "extlinux", 0, POPT_ARG_NONE, &configureExtLinux, 0,  
     _("configure extlinux bootloader (from syslinux)") },  
  { "grub", 0, POPT_ARG_NONE, &configureGrub, 0,  
     _("configure grub bootloader") },  
  { "info", 0, POPT_ARG_STRING, &kernelInfo, 0,  
     _("display boot information for specified kernel"),  
     _("kernel-path") },  
  { "initrd", 0, POPT_ARG_STRING, &newKernelInitrd, 0,  
     _("initrd image for the new kernel"), _("initrd-path") },  
  { "extra-initrd", 'i', POPT_ARG_STRING, NULL, 'i',  
     _("auxilliary initrd image for things other than the new kernel"), _("initrd-path") },  
  { "lilo", 0, POPT_ARG_NONE, &configureLilo, 0,  
     _("configure lilo bootloader") },  
  { "make-default", 0, 0, &makeDefault, 0,  
     _("make the newly added entry the default boot entry"), NULL },  
  { "output-file", 'o', POPT_ARG_STRING, &outputFile, 0,  
     _("path to output updated config file (\"-\" for stdout)"),  
     _("path") },  
  { "remove-args", 0, POPT_ARG_STRING, &removeArgs, 0,  
             _("remove kernel arguments"), NULL },  
         { "remove-mbargs", 0, POPT_ARG_STRING, &removeMBKernelArgs, 0,  
     _("remove multiboot kernel arguments"), NULL },  
  { "remove-kernel", 0, POPT_ARG_STRING, &removeKernelPath, 0,  
     _("remove all entries for the specified kernel"),  
     _("kernel-path") },  
  { "remove-multiboot", 0, POPT_ARG_STRING, &removeMBKernel, 0,  
             _("remove all entries for the specified multiboot kernel"), NULL },  
  { "set-default", 0, POPT_ARG_STRING, &defaultKernel, 0,  
     _("make the first entry referencing the specified kernel "  
       "the default"), _("kernel-path") },  
  { "silo", 0, POPT_ARG_NONE, &configureSilo, 0,  
     _("configure silo bootloader") },  
  { "title", 0, POPT_ARG_STRING, &newKernelTitle, 0,  
     _("title to use for the new kernel entry"), _("entry-title") },  
  { "update-kernel", 0, POPT_ARG_STRING, &updateKernelPath, 0,  
     _("updated information for the specified kernel"),  
     _("kernel-path") },  
  { "version", 'v', 0, NULL, 'v',  
     _("print the version of this program and exit"), NULL },  
  { "yaboot", 0, POPT_ARG_NONE, &configureYaboot, 0,  
     _("configure yaboot bootloader") },  
  { "zipl", 0, POPT_ARG_NONE, &configureZipl, 0,  
     _("configure zipl bootloader") },  
  POPT_AUTOHELP  
  { 0, 0, 0, 0, 0 }  
     };  
   
     useextlinuxmenu=0;  
   
     signal(SIGSEGV, traceback);  
   
     optCon = poptGetContext("grubby", argc, argv, options, 0);  
     poptReadDefaultConfig(optCon, 1);  
   
     while ((arg = poptGetNextOpt(optCon)) >= 0) {  
  switch (arg) {  
   case 'v':  
     printf("grubby version %s\n", VERSION);  
     exit(0);  
     break;  
   case 'i':  
     if (extraInitrdCount < MAX_EXTRA_INITRDS) {  
      extraInitrds[extraInitrdCount++] = strdup(poptGetOptArg(optCon));  
     } else {  
  fprintf(stderr, _("grubby: extra initrd maximum is %d\n"), extraInitrdCount);  
3077   return 1;   return 1;
3078      }  
3079      break;   if (lbaPtr)
3080     *lbaPtr = 0;
3081     if (bootPtr)
3082     *bootPtr = NULL;
3083    
3084     while (fgets(buf, sizeof(buf), in)) {
3085     start = buf;
3086     while (isspace(*start))
3087     start++;
3088     if (*start == '#')
3089     continue;
3090    
3091     chptr = strchr(start, '=');
3092     if (!chptr)
3093     continue;
3094     chptr--;
3095     while (*chptr && isspace(*chptr))
3096     chptr--;
3097     chptr++;
3098     *chptr = '\0';
3099    
3100     param = chptr + 1;
3101     while (*param && isspace(*param))
3102     param++;
3103     if (*param == '=') {
3104     param++;
3105     while (*param && isspace(*param))
3106     param++;
3107     }
3108    
3109     chptr = param;
3110     while (*chptr && !isspace(*chptr))
3111     chptr++;
3112     *chptr = '\0';
3113    
3114     if (!strcmp(start, "forcelba") && !strcmp(param, "1") && lbaPtr)
3115     *lbaPtr = 1;
3116     else if (!strcmp(start, "boot") && bootPtr)
3117     *bootPtr = strdup(param);
3118   }   }
     }  
3119    
3120      if (arg < -1) {   fclose(in);
  fprintf(stderr, _("grubby: bad argument %s: %s\n"),  
  poptBadOption(optCon, POPT_BADOPTION_NOALIAS),  
  poptStrerror(arg));  
  return 1;  
     }  
3121    
3122      if ((chptr = poptGetArg(optCon))) {   return 0;
3123   fprintf(stderr, _("grubby: unexpected argument %s\n"), chptr);  }
  return 1;  
     }  
3124    
3125      if ((configureLilo + configureGrub + configureELilo +  void dumpSysconfigGrub(void)
3126   configureYaboot + configureSilo + configureZipl +  {
3127   configureExtLinux ) > 1) {   char *boot = NULL;
3128   fprintf(stderr, _("grubby: cannot specify multiple bootloaders\n"));   int lba;
  return 1;  
     } else if (bootloaderProbe && grubConfig) {  
  fprintf(stderr,  
     _("grubby: cannot specify config file with --bootloader-probe\n"));  
  return 1;  
     } else if (configureLilo) {  
  cfi = &liloConfigType;  
     } else if (configureGrub) {  
  cfi = &grubConfigType;  
     } else if (configureELilo) {  
  cfi = &eliloConfigType;  
     } else if (configureYaboot) {  
  cfi = &yabootConfigType;  
     } else if (configureSilo) {  
         cfi = &siloConfigType;  
     } else if (configureZipl) {  
         cfi = &ziplConfigType;  
     } else if (configureExtLinux) {  
  cfi = &extlinuxConfigType;  
  useextlinuxmenu=1;  
     }  
3129    
3130      if (!cfi) {   if (isSuseSystem()) {
3131        #ifdef __ia64__   if (parseSuseGrubConf(&lba, &boot)) {
3132   cfi = &eliloConfigType;   free(boot);
3133        #elif __powerpc__   return;
3134   cfi = &yabootConfigType;   }
3135        #elif __sparc__   } else {
3136          cfi = &siloConfigType;   if (parseSysconfigGrub(&lba, &boot)) {
3137        #elif __s390__   free(boot);
3138          cfi = &ziplConfigType;   return;
3139        #elif __s390x__   }
3140          cfi = &ziplConfigtype;   }
       #else  
  cfi = &grubConfigType;  
       #endif  
     }  
3141    
3142      if (!grubConfig)   if (lba)
3143   grubConfig = cfi->defaultConfig;   printf("lba\n");
3144     if (boot) {
3145     printf("boot=%s\n", boot);
3146     free(boot);
3147     }
3148    }
3149    
3150      if (bootloaderProbe && (displayDefault || kernelInfo || newKernelVersion ||  int displayInfo(struct grubConfig *config, char *kernel, const char *prefix)
3151    newKernelPath || removeKernelPath || makeDefault ||  {
3152    defaultKernel)) {   int i = 0;
3153   fprintf(stderr, _("grubby: --bootloader-probe may not be used with "   struct singleEntry *entry;
3154    "specified option"));   struct singleLine *line;
3155   return 1;  
3156      }   entry = findEntryByPath(config, kernel, prefix, &i);
3157     if (!entry) {
3158     fprintf(stderr, _("grubby: kernel not found\n"));
3159     return 1;
3160     }
3161    
3162      if ((displayDefault || kernelInfo) && (newKernelVersion || newKernelPath ||   /* this is a horrible hack to support /etc/sysconfig/grub; there must
3163     removeKernelPath)) {     be a better way */
3164   fprintf(stderr, _("grubby: --default-kernel and --info may not "   if (config->cfi == &grubConfigType) {
3165    "be used when adding or removing kernels\n"));   dumpSysconfigGrub();
3166   return 1;   } else {
3167      }   line = getLineByType(LT_BOOT, config->theLines);
3168     if (line && line->numElements >= 1) {
3169     printf("boot=%s\n", line->elements[1].item);
3170     }
3171    
3172      if (newKernelPath && !newKernelTitle) {   line = getLineByType(LT_LBA, config->theLines);
3173   fprintf(stderr, _("grubby: kernel title must be specified\n"));   if (line)
3174   return 1;   printf("lba\n");
3175      } else if (!newKernelPath && (newKernelTitle  || copyDefault ||   }
   (newKernelInitrd && !updateKernelPath)||  
   makeDefault || extraInitrdCount > 0)) {  
  fprintf(stderr, _("grubby: kernel path expected\n"));  
  return 1;  
     }  
3176    
3177      if (newKernelPath && updateKernelPath) {   displayEntry(entry, prefix, i);
  fprintf(stderr, _("grubby: --add-kernel and --update-kernel may"  
           "not be used together"));  
  return 1;  
     }  
3178    
3179      if (makeDefault && defaultKernel) {   i++;
3180   fprintf(stderr, _("grubby: --make-default and --default-kernel "   while ((entry = findEntryByPath(config, kernel, prefix, &i))) {
3181    "may not be used together\n"));   displayEntry(entry, prefix, i);
3182   return 1;   i++;
3183      } else if (defaultKernel && removeKernelPath &&   }
  !strcmp(defaultKernel, removeKernelPath)) {  
  fprintf(stderr, _("grubby: cannot make removed kernel the default\n"));  
  return 1;  
     } else if (defaultKernel && newKernelPath &&  
  !strcmp(defaultKernel, newKernelPath)) {  
  makeDefault = 1;  
  defaultKernel = NULL;  
     }  
3184    
3185      if (!strcmp(grubConfig, "-") && !outputFile) {   return 0;
3186   fprintf(stderr, _("grubby: output file must be specified if stdin "  }
  "is used\n"));  
  return 1;  
     }  
3187    
3188      if (!removeKernelPath && !newKernelPath && !displayDefault && !defaultKernel  struct singleLine *addLineTmpl(struct singleEntry *entry,
3189   && !kernelInfo && !bootloaderProbe && !updateKernelPath         struct singleLine *tmplLine,
3190          && !removeMBKernel) {         struct singleLine *prevLine,
3191   fprintf(stderr, _("grubby: no action specified\n"));         const char *val, struct configFileInfo *cfi)
3192   return 1;  {
3193      }   struct singleLine *newLine = lineDup(tmplLine);
3194    
3195      flags |= badImageOkay ? GRUBBY_BADIMAGE_OKAY : 0;   if (isEfi && cfi == &grub2ConfigType) {
3196     enum lineType_e old = newLine->type;
3197     newLine->type = preferredLineType(newLine->type, cfi);
3198     if (old != newLine->type)
3199     newLine->elements[0].item =
3200        getKeyByType(newLine->type, cfi);
3201     }
3202    
3203      if (cfi->needsBootPrefix) {   if (val) {
3204   if (!bootPrefix) {   /* override the inherited value with our own.
3205      bootPrefix = findBootPrefix();   * This is a little weak because it only applies to elements[1]
3206      if (!bootPrefix) return 1;   */
3207   } else {   if (newLine->numElements > 1)
3208      /* this shouldn't end with a / */   removeElement(newLine, 1);
3209      if (bootPrefix[strlen(bootPrefix) - 1] == '/')   insertElement(newLine, val, 1, cfi);
3210   bootPrefix[strlen(bootPrefix) - 1] = '\0';  
3211     /* but try to keep the rootspec from the template... sigh */
3212     if (tmplLine->
3213        type & (LT_HYPER | LT_KERNEL | LT_MBMODULE | LT_INITRD |
3214        LT_KERNEL_EFI | LT_INITRD_EFI | LT_KERNEL_16 |
3215        LT_INITRD_16)) {
3216     char *rootspec =
3217        getRootSpecifier(tmplLine->elements[1].item);
3218     if (rootspec != NULL) {
3219     free(newLine->elements[1].item);
3220     newLine->elements[1].item =
3221        sdupprintf("%s%s", rootspec, val);
3222     }
3223     }
3224   }   }
     } else {  
  bootPrefix = "";  
     }  
3225    
3226      if (!cfi->mbAllowExtraInitRds &&   dbgPrintf("addLineTmpl(%s)\n", newLine->numElements ?
3227   extraInitrdCount > 0) {    newLine->elements[0].item : "");
  fprintf(stderr, _("grubby: %s doesn't allow multiple initrds\n"), cfi->defaultConfig);  
  return 1;  
     }  
3228    
3229      if (bootloaderProbe) {   if (!entry->lines) {
3230   int lrc = 0, grc = 0, erc = 0;   /* first one on the list */
3231   struct grubConfig * lconfig, * gconfig;   entry->lines = newLine;
3232     } else if (prevLine) {
3233   if (!access(grubConfigType.defaultConfig, F_OK)) {   /* add after prevLine */
3234      gconfig = readConfig(grubConfigType.defaultConfig, &grubConfigType);   newLine->next = prevLine->next;
3235      if (!gconfig)   prevLine->next = newLine;
3236   grc = 1;   }
     else  
  grc = checkForGrub(gconfig);  
  }  
   
  if (!access(liloConfigType.defaultConfig, F_OK)) {  
     lconfig = readConfig(liloConfigType.defaultConfig, &liloConfigType);  
     if (!lconfig)  
  lrc = 1;  
     else  
  lrc = checkForLilo(lconfig);  
  }  
   
  if (!access(extlinuxConfigType.defaultConfig, F_OK)) {  
     lconfig = readConfig(extlinuxConfigType.defaultConfig, &extlinuxConfigType);  
     if (!lconfig)  
  erc = 1;  
     else  
  erc = checkForExtLinux(lconfig);  
  }  
   
  if (lrc == 1 || grc == 1) return 1;  
   
  if (lrc == 2) printf("lilo\n");  
  if (grc == 2) printf("grub\n");  
  if (erc == 2) printf("extlinux\n");  
3237    
3238   return 0;   return newLine;
3239      }  }
3240    
3241      config = readConfig(grubConfig, cfi);  /* val may be NULL */
3242      if (!config) return 1;  struct singleLine *addLine(struct singleEntry *entry,
3243       struct configFileInfo *cfi,
3244       enum lineType_e type, char *defaultIndent,
3245       const char *val)
3246    {
3247     struct singleLine *line, *prev;
3248     struct keywordTypes *kw;
3249     struct singleLine tmpl;
3250    
3251      if (displayDefault) {   /* NB: This function shouldn't allocate items on the heap, rather on
3252   struct singleLine * line;   * the stack since it calls addLineTmpl which will make copies.
3253   struct singleEntry * entry;   */
3254          char * rootspec;   if (type == LT_TITLE && cfi->titleBracketed) {
3255     /* we're doing a bracketed title (zipl) */
3256   if (config->defaultImage == -1) return 0;   tmpl.type = type;
3257   entry = findEntryByIndex(config, config->defaultImage);   tmpl.numElements = 1;
3258   if (!entry) return 0;   tmpl.elements = alloca(sizeof(*tmpl.elements));
3259   if (!suitableImage(entry, bootPrefix, 0, flags)) return 0;   tmpl.elements[0].item = alloca(strlen(val) + 3);
3260     sprintf(tmpl.elements[0].item, "[%s]", val);
3261   line = getLineByType(LT_KERNEL|LT_HYPER, entry->lines);   tmpl.elements[0].indent = "";
3262   if (!line) return 0;   val = NULL;
3263     } else if (type == LT_MENUENTRY) {
3264          rootspec = getRootSpecifier(line->elements[1].item);   char *lineend = "--class gnu-linux --class gnu --class os {";
3265          printf("%s%s\n", bootPrefix, line->elements[1].item +   if (!val) {
3266                 ((rootspec != NULL) ? strlen(rootspec) : 0));   fprintf(stderr,
3267     "Line type LT_MENUENTRY requires a value\n");
3268     abort();
3269     }
3270     kw = getKeywordByType(type, cfi);
3271     if (!kw) {
3272     fprintf(stderr,
3273     "Looking up keyword for unknown type %d\n",
3274     type);
3275     abort();
3276     }
3277     tmpl.indent = "";
3278     tmpl.type = type;
3279     tmpl.numElements = 3;
3280     tmpl.elements =
3281        alloca(sizeof(*tmpl.elements) * tmpl.numElements);
3282     tmpl.elements[0].item = kw->key;
3283     tmpl.elements[0].indent = alloca(2);
3284     sprintf(tmpl.elements[0].indent, "%c", kw->nextChar);
3285     tmpl.elements[1].item = (char *)val;
3286     tmpl.elements[1].indent = alloca(2);
3287     sprintf(tmpl.elements[1].indent, "%c", kw->nextChar);
3288     tmpl.elements[2].item = alloca(strlen(lineend) + 1);
3289     strcpy(tmpl.elements[2].item, lineend);
3290     tmpl.elements[2].indent = "";
3291     } else {
3292     kw = getKeywordByType(type, cfi);
3293     if (!kw) {
3294     fprintf(stderr,
3295     "Looking up keyword for unknown type %d\n",
3296     type);
3297     abort();
3298     }
3299     tmpl.type = type;
3300     tmpl.numElements = val ? 2 : 1;
3301     tmpl.elements =
3302        alloca(sizeof(*tmpl.elements) * tmpl.numElements);
3303     tmpl.elements[0].item = kw->key;
3304     tmpl.elements[0].indent = alloca(2);
3305     sprintf(tmpl.elements[0].indent, "%c", kw->nextChar);
3306     if (val) {
3307     tmpl.elements[1].item = (char *)val;
3308     tmpl.elements[1].indent = "";
3309     }
3310     }
3311    
3312   return 0;   /* The last non-empty line gives us the indention to us and the line
3313      } else if (kernelInfo)   * to insert after. Note that comments are considered empty lines,
3314   return displayInfo(config, kernelInfo, bootPrefix);   * which may not be ideal? If there are no lines or we are looking at
3315     * the first line, we use defaultIndent (the first line is normally
3316     * indented differently from the rest) */
3317     for (line = entry->lines, prev = NULL; line; line = line->next) {
3318     if (line->numElements)
3319     prev = line;
3320     /* fall back on the last line if prev isn't otherwise set */
3321     if (!line->next && !prev)
3322     prev = line;
3323     }
3324    
3325     struct singleLine *menuEntry;
3326     menuEntry = getLineByType(LT_MENUENTRY, entry->lines);
3327     if (tmpl.type == LT_ENTRY_END) {
3328     if (menuEntry)
3329     tmpl.indent = menuEntry->indent;
3330     else
3331     tmpl.indent = defaultIndent ? : "";
3332     } else if (tmpl.type != LT_MENUENTRY) {
3333     if (menuEntry)
3334     tmpl.indent = "\t";
3335     else if (prev == entry->lines)
3336     tmpl.indent = defaultIndent ? : "";
3337     else
3338     tmpl.indent = prev->indent;
3339     }
3340    
3341      if (copyDefault) {   return addLineTmpl(entry, &tmpl, prev, val, cfi);
3342   template = findTemplate(config, bootPrefix, NULL, 0, flags);  }
  if (!template) return 1;  
     }  
3343    
3344      markRemovedImage(config, removeKernelPath, bootPrefix);  void removeLine(struct singleEntry *entry, struct singleLine *line)
3345      markRemovedImage(config, removeMBKernel, bootPrefix);  {
3346      setDefaultImage(config, newKernelPath != NULL, defaultKernel, makeDefault,   struct singleLine *prev;
3347      bootPrefix, flags);   int i;
3348      setFallbackImage(config, newKernelPath != NULL);  
3349      if (updateImage(config, updateKernelPath, bootPrefix, newKernelArgs,   for (i = 0; i < line->numElements; i++) {
3350                      removeArgs, newMBKernelArgs, removeMBKernelArgs)) return 1;   free(line->elements[i].item);
3351      if (updateKernelPath && newKernelInitrd) {   free(line->elements[i].indent);
3352              if (updateInitrd(config, updateKernelPath, bootPrefix,   }
3353                               newKernelInitrd)) return 1;   free(line->elements);
3354      }   free(line->indent);
3355      if (addNewKernel(config, template, bootPrefix, newKernelPath,  
3356                       newKernelTitle, newKernelArgs, newKernelInitrd,   if (line == entry->lines) {
3357                       extraInitrds, extraInitrdCount,   entry->lines = line->next;
3358                       newMBKernel, newMBKernelArgs)) return 1;   } else {
3359         prev = entry->lines;
3360     while (prev->next != line)
3361      if (numEntries(config) == 0) {   prev = prev->next;
3362          fprintf(stderr, _("grubby: doing this would leave no kernel entries. "   prev->next = line->next;
3363                            "Not writing out new config.\n"));   }
3364          return 1;  
3365      }   free(line);
3366    }
3367    
3368    static void requote(struct singleLine *tmplLine, struct configFileInfo *cfi)
3369    {
3370     struct singleLine newLine = {
3371     .indent = tmplLine->indent,
3372     .type = tmplLine->type,
3373     .next = tmplLine->next,
3374     };
3375     int firstQuotedItem = -1;
3376     int quoteLen = 0;
3377     int j;
3378     int element = 0;
3379     char *c;
3380    
3381     c = malloc(strlen(tmplLine->elements[0].item) + 1);
3382     strcpy(c, tmplLine->elements[0].item);
3383     insertElement(&newLine, c, element++, cfi);
3384     free(c);
3385     c = NULL;
3386    
3387     for (j = 1; j < tmplLine->numElements; j++) {
3388     if (firstQuotedItem == -1) {
3389     quoteLen += strlen(tmplLine->elements[j].item);
3390    
3391     if (isquote(tmplLine->elements[j].item[0])) {
3392     firstQuotedItem = j;
3393     quoteLen +=
3394        strlen(tmplLine->elements[j].indent);
3395     } else {
3396     c = malloc(quoteLen + 1);
3397     strcpy(c, tmplLine->elements[j].item);
3398     insertElement(&newLine, c, element++, cfi);
3399     free(c);
3400     quoteLen = 0;
3401     }
3402     } else {
3403     int itemlen = strlen(tmplLine->elements[j].item);
3404     quoteLen += itemlen;
3405     quoteLen += strlen(tmplLine->elements[j].indent);
3406    
3407     if (isquote(tmplLine->elements[j].item[itemlen - 1])) {
3408     c = malloc(quoteLen + 1);
3409     c[0] = '\0';
3410     for (int i = firstQuotedItem; i < j + 1; i++) {
3411     strcat(c, tmplLine->elements[i].item);
3412     strcat(c, tmplLine->elements[i].indent);
3413     }
3414     insertElement(&newLine, c, element++, cfi);
3415     free(c);
3416    
3417     firstQuotedItem = -1;
3418     quoteLen = 0;
3419     }
3420     }
3421     }
3422     while (tmplLine->numElements)
3423     removeElement(tmplLine, 0);
3424     if (tmplLine->elements)
3425     free(tmplLine->elements);
3426    
3427     tmplLine->numElements = newLine.numElements;
3428     tmplLine->elements = newLine.elements;
3429    }
3430    
3431    static void insertElement(struct singleLine *line,
3432      const char *item, int insertHere,
3433      struct configFileInfo *cfi)
3434    {
3435     struct keywordTypes *kw;
3436     char indent[2] = "";
3437    
3438     /* sanity check */
3439     if (insertHere > line->numElements) {
3440     dbgPrintf
3441        ("insertElement() adjusting insertHere from %d to %d\n",
3442         insertHere, line->numElements);
3443     insertHere = line->numElements;
3444     }
3445    
3446     line->elements = realloc(line->elements, (line->numElements + 1) *
3447     sizeof(*line->elements));
3448     memmove(&line->elements[insertHere + 1],
3449     &line->elements[insertHere],
3450     (line->numElements - insertHere) * sizeof(*line->elements));
3451     line->elements[insertHere].item = strdup(item);
3452    
3453     kw = getKeywordByType(line->type, cfi);
3454    
3455     if (line->numElements == 0) {
3456     indent[0] = '\0';
3457     } else if (insertHere == 0) {
3458     indent[0] = kw->nextChar;
3459     } else if (kw->separatorChar != '\0') {
3460     indent[0] = kw->separatorChar;
3461     } else {
3462     indent[0] = ' ';
3463     }
3464    
3465     if (insertHere > 0 && line->elements[insertHere - 1].indent[0] == '\0') {
3466     /* move the end-of-line forward */
3467     line->elements[insertHere].indent =
3468        line->elements[insertHere - 1].indent;
3469     line->elements[insertHere - 1].indent = strdup(indent);
3470     } else {
3471     line->elements[insertHere].indent = strdup(indent);
3472     }
3473    
3474     line->numElements++;
3475    
3476     dbgPrintf("insertElement(%s, '%s%s', %d)\n",
3477      line->elements[0].item,
3478      line->elements[insertHere].item,
3479      line->elements[insertHere].indent, insertHere);
3480    }
3481    
3482    static void removeElement(struct singleLine *line, int removeHere)
3483    {
3484     int i;
3485    
3486     /* sanity check */
3487     if (removeHere >= line->numElements)
3488     return;
3489    
3490     dbgPrintf("removeElement(%s, %d:%s)\n", line->elements[0].item,
3491      removeHere, line->elements[removeHere].item);
3492    
3493     free(line->elements[removeHere].item);
3494    
3495     if (removeHere > 1) {
3496     /* previous argument gets this argument's post-indentation */
3497     free(line->elements[removeHere - 1].indent);
3498     line->elements[removeHere - 1].indent =
3499        line->elements[removeHere].indent;
3500     } else {
3501     free(line->elements[removeHere].indent);
3502     }
3503    
3504     /* now collapse the array, but don't bother to realloc smaller */
3505     for (i = removeHere; i < line->numElements - 1; i++)
3506     line->elements[i] = line->elements[i + 1];
3507    
3508     line->numElements--;
3509    }
3510    
3511    int argMatch(const char *one, const char *two)
3512    {
3513     char *first, *second;
3514     char *chptr;
3515    
3516     first = strcpy(alloca(strlen(one) + 1), one);
3517     second = strcpy(alloca(strlen(two) + 1), two);
3518    
3519     chptr = strchr(first, '=');
3520     if (chptr)
3521     *chptr = '\0';
3522    
3523     chptr = strchr(second, '=');
3524     if (chptr)
3525     *chptr = '\0';
3526    
3527     return strcmp(first, second);
3528    }
3529    
3530    int updateActualImage(struct grubConfig *cfg, const char *image,
3531          const char *prefix, const char *addArgs,
3532          const char *removeArgs, int multibootArgs)
3533    {
3534     struct singleEntry *entry;
3535     struct singleLine *line, *rootLine;
3536     int index = 0;
3537     int i, k;
3538     const char **newArgs, **oldArgs;
3539     const char **arg;
3540     int useKernelArgs, useRoot;
3541     int firstElement;
3542     int *usedElements;
3543     int doreplace;
3544    
3545     if (!image)
3546     return 0;
3547    
3548     if (!addArgs) {
3549     newArgs = malloc(sizeof(*newArgs));
3550     *newArgs = NULL;
3551     } else {
3552     if (poptParseArgvString(addArgs, NULL, &newArgs)) {
3553     fprintf(stderr,
3554     _("grubby: error separating arguments '%s'\n"),
3555     addArgs);
3556     return 1;
3557     }
3558     }
3559    
3560     if (!removeArgs) {
3561     oldArgs = malloc(sizeof(*oldArgs));
3562     *oldArgs = NULL;
3563     } else {
3564     if (poptParseArgvString(removeArgs, NULL, &oldArgs)) {
3565     fprintf(stderr,
3566     _("grubby: error separating arguments '%s'\n"),
3567     removeArgs);
3568     free(newArgs);
3569     return 1;
3570     }
3571     }
3572    
3573     useKernelArgs = (getKeywordByType(LT_KERNELARGS, cfg->cfi)
3574     && (!multibootArgs || cfg->cfi->mbConcatArgs));
3575    
3576     useRoot = (getKeywordByType(LT_ROOT, cfg->cfi)
3577       && !multibootArgs);
3578    
3579     for (; (entry = findEntryByPath(cfg, image, prefix, &index)); index++) {
3580    
3581     if (multibootArgs && !entry->multiboot)
3582     continue;
3583    
3584     /* Determine where to put the args.  If this config supports
3585     * LT_KERNELARGS, use that.  Otherwise use
3586     * LT_HYPER/LT_KERNEL/LT_MBMODULE lines.
3587     */
3588     if (useKernelArgs) {
3589     line = getLineByType(LT_KERNELARGS, entry->lines);
3590     if (!line) {
3591     /* no LT_KERNELARGS, need to add it */
3592     line = addLine(entry, cfg->cfi, LT_KERNELARGS,
3593           cfg->secondaryIndent, NULL);
3594     }
3595     firstElement = 1;
3596    
3597     } else if (multibootArgs) {
3598     line = getLineByType(LT_HYPER, entry->lines);
3599     if (!line) {
3600     /* a multiboot entry without LT_HYPER? */
3601     continue;
3602     }
3603     firstElement = 2;
3604    
3605     } else {
3606     line =
3607        getLineByType(LT_KERNEL | LT_MBMODULE |
3608      LT_KERNEL_EFI | LT_KERNEL_16,
3609      entry->lines);
3610     if (!line) {
3611     /* no LT_KERNEL or LT_MBMODULE in this entry? */
3612     continue;
3613     }
3614     firstElement = 2;
3615     }
3616    
3617     /* handle the elilo case which does:
3618     *   append="hypervisor args -- kernel args"
3619     */
3620     if (entry->multiboot && cfg->cfi->mbConcatArgs) {
3621     /* this is a multiboot entry, make sure there's
3622     * -- on the args line
3623     */
3624     for (i = firstElement; i < line->numElements; i++) {
3625     if (!strcmp(line->elements[i].item, "--"))
3626     break;
3627     }
3628     if (i == line->numElements) {
3629     /* assume all existing args are kernel args,
3630     * prepend -- to make it official
3631     */
3632     insertElement(line, "--", firstElement,
3633          cfg->cfi);
3634     i = firstElement;
3635     }
3636     if (!multibootArgs) {
3637     /* kernel args start after the -- */
3638     firstElement = i + 1;
3639     }
3640     } else if (cfg->cfi->mbConcatArgs) {
3641     /* this is a non-multiboot entry, remove hyper args */
3642     for (i = firstElement; i < line->numElements; i++) {
3643     if (!strcmp(line->elements[i].item, "--"))
3644     break;
3645     }
3646     if (i < line->numElements) {
3647     /* remove args up to -- */
3648     while (strcmp
3649           (line->elements[firstElement].item,
3650     "--"))
3651     removeElement(line, firstElement);
3652     /* remove -- */
3653     removeElement(line, firstElement);
3654     }
3655     }
3656    
3657     usedElements = calloc(line->numElements, sizeof(*usedElements));
3658    
3659     for (k = 0, arg = newArgs; *arg; arg++, k++) {
3660    
3661     doreplace = 1;
3662     for (i = firstElement; i < line->numElements; i++) {
3663     if (multibootArgs && cfg->cfi->mbConcatArgs &&
3664        !strcmp(line->elements[i].item, "--")) {
3665     /* reached the end of hyper args, insert here */
3666     doreplace = 0;
3667     break;
3668     }
3669     if (usedElements[i])
3670     continue;
3671     if (!argMatch(line->elements[i].item, *arg)) {
3672     usedElements[i] = 1;
3673     break;
3674     }
3675     }
3676    
3677     if (i < line->numElements && doreplace) {
3678     /* direct replacement */
3679     free(line->elements[i].item);
3680     line->elements[i].item = strdup(*arg);
3681    
3682     } else if (useRoot && !strncmp(*arg, "root=/dev/", 10)) {
3683     /* root= replacement */
3684     rootLine = getLineByType(LT_ROOT, entry->lines);
3685     if (rootLine) {
3686     free(rootLine->elements[1].item);
3687     rootLine->elements[1].item =
3688        strdup(*arg + 5);
3689     } else {
3690     rootLine =
3691        addLine(entry, cfg->cfi, LT_ROOT,
3692        cfg->secondaryIndent,
3693        *arg + 5);
3694     }
3695     }
3696    
3697     else {
3698     /* insert/append */
3699     insertElement(line, *arg, i, cfg->cfi);
3700     usedElements =
3701        realloc(usedElements,
3702        line->numElements *
3703        sizeof(*usedElements));
3704     memmove(&usedElements[i + 1], &usedElements[i],
3705     line->numElements - i - 1);
3706     usedElements[i] = 1;
3707    
3708     /* if we updated a root= here even though
3709     * there is a LT_ROOT available we need to
3710     * remove the LT_ROOT entry (this will happen
3711     * if we switch from a device to a label) */
3712     if (useRoot && !strncmp(*arg, "root=", 5)) {
3713     rootLine =
3714        getLineByType(LT_ROOT,
3715      entry->lines);
3716     if (rootLine)
3717     removeLine(entry, rootLine);
3718     }
3719     }
3720     }
3721    
3722     free(usedElements);
3723    
3724     for (arg = oldArgs; *arg; arg++) {
3725     for (i = firstElement; i < line->numElements; i++) {
3726     if (multibootArgs && cfg->cfi->mbConcatArgs &&
3727        !strcmp(line->elements[i].item, "--"))
3728     /* reached the end of hyper args, stop here */
3729     break;
3730     if (!argMatch(line->elements[i].item, *arg)) {
3731     removeElement(line, i);
3732     break;
3733     }
3734     }
3735     /* handle removing LT_ROOT line too */
3736     if (useRoot && !strncmp(*arg, "root=", 5)) {
3737     rootLine = getLineByType(LT_ROOT, entry->lines);
3738     if (rootLine)
3739     removeLine(entry, rootLine);
3740     }
3741     }
3742    
3743     if (line->numElements == 1) {
3744     /* don't need the line at all (note it has to be a
3745       LT_KERNELARGS for this to happen */
3746     removeLine(entry, line);
3747     }
3748     }
3749    
3750     free(newArgs);
3751     free(oldArgs);
3752    
3753     return 0;
3754    }
3755    
3756    int updateImage(struct grubConfig *cfg, const char *image,
3757     const char *prefix, const char *addArgs,
3758     const char *removeArgs,
3759     const char *addMBArgs, const char *removeMBArgs)
3760    {
3761     int rc = 0;
3762    
3763     if (!image)
3764     return rc;
3765    
3766     /* update the main args first... */
3767     if (addArgs || removeArgs)
3768     rc = updateActualImage(cfg, image, prefix, addArgs, removeArgs,
3769           0);
3770     if (rc)
3771     return rc;
3772    
3773     /* and now any multiboot args */
3774     if (addMBArgs || removeMBArgs)
3775     rc = updateActualImage(cfg, image, prefix, addMBArgs,
3776           removeMBArgs, 1);
3777     return rc;
3778    }
3779    
3780    int addMBInitrd(struct grubConfig *cfg, const char *newMBKernel,
3781     const char *image, const char *prefix, const char *initrd,
3782     const char *title)
3783    {
3784     struct singleEntry *entry;
3785     struct singleLine *line, *kernelLine, *endLine = NULL;
3786     int index = 0;
3787    
3788     if (!image)
3789     return 0;
3790    
3791     for (; (entry = findEntryByPath(cfg, image, prefix, &index)); index++) {
3792     kernelLine = getLineByType(LT_MBMODULE, entry->lines);
3793     if (!kernelLine)
3794     continue;
3795    
3796     /* if title is supplied, the entry's title must match it. */
3797     if (title) {
3798     char *linetitle;
3799    
3800     line =
3801        getLineByType(LT_TITLE | LT_MENUENTRY,
3802      entry->lines);
3803     if (!line)
3804     continue;
3805    
3806     linetitle = extractTitle(cfg, line);
3807     if (!linetitle)
3808     continue;
3809     if (strcmp(title, linetitle)) {
3810     free(linetitle);
3811     continue;
3812     }
3813     free(linetitle);
3814     }
3815    
3816     if (prefix) {
3817     int prefixLen = strlen(prefix);
3818     if (!strncmp(initrd, prefix, prefixLen))
3819     initrd += prefixLen;
3820     }
3821     endLine = getLineByType(LT_ENTRY_END, entry->lines);
3822     if (endLine)
3823     removeLine(entry, endLine);
3824     line =
3825        addLine(entry, cfg->cfi,
3826        preferredLineType(LT_MBMODULE, cfg->cfi),
3827        kernelLine->indent, initrd);
3828     if (!line)
3829     return 1;
3830     if (endLine) {
3831     line = addLine(entry, cfg->cfi, LT_ENTRY_END, "", NULL);
3832     if (!line)
3833     return 1;
3834     }
3835    
3836     break;
3837     }
3838    
3839     return 0;
3840    }
3841    
3842    int updateInitrd(struct grubConfig *cfg, const char *image,
3843     const char *prefix, const char *initrd, const char *title)
3844    {
3845     struct singleEntry *entry;
3846     struct singleLine *line, *kernelLine, *endLine = NULL;
3847     int index = 0;
3848    
3849     if (!image)
3850     return 0;
3851    
3852     for (; (entry = findEntryByPath(cfg, image, prefix, &index)); index++) {
3853     kernelLine =
3854        getLineByType(LT_KERNEL | LT_KERNEL_EFI | LT_KERNEL_16,
3855      entry->lines);
3856     if (!kernelLine)
3857     continue;
3858    
3859     /* if title is supplied, the entry's title must match it. */
3860     if (title) {
3861     char *linetitle;
3862    
3863     line =
3864        getLineByType(LT_TITLE | LT_MENUENTRY,
3865      entry->lines);
3866     if (!line)
3867     continue;
3868    
3869     linetitle = extractTitle(cfg, line);
3870     if (!linetitle)
3871     continue;
3872     if (strcmp(title, linetitle)) {
3873     free(linetitle);
3874     continue;
3875     }
3876     free(linetitle);
3877     }
3878    
3879     line =
3880        getLineByType(LT_INITRD | LT_INITRD_EFI | LT_INITRD_16,
3881      entry->lines);
3882     if (line)
3883     removeLine(entry, line);
3884     if (prefix) {
3885     int prefixLen = strlen(prefix);
3886     if (!strncmp(initrd, prefix, prefixLen))
3887     initrd += prefixLen;
3888     }
3889     endLine = getLineByType(LT_ENTRY_END, entry->lines);
3890     if (endLine)
3891     removeLine(entry, endLine);
3892     enum lineType_e lt;
3893     switch (kernelLine->type) {
3894     case LT_KERNEL:
3895     lt = LT_INITRD;
3896     break;
3897     case LT_KERNEL_EFI:
3898     lt = LT_INITRD_EFI;
3899     break;
3900     case LT_KERNEL_16:
3901     lt = LT_INITRD_16;
3902     break;
3903     default:
3904     lt = preferredLineType(LT_INITRD, cfg->cfi);
3905     }
3906     line = addLine(entry, cfg->cfi, lt, kernelLine->indent, initrd);
3907     if (!line)
3908     return 1;
3909     if (endLine) {
3910     line = addLine(entry, cfg->cfi, LT_ENTRY_END, "", NULL);
3911     if (!line)
3912     return 1;
3913     }
3914    
3915     break;
3916     }
3917    
3918     return 0;
3919    }
3920    
3921    int checkDeviceBootloader(const char *device, const unsigned char *boot)
3922    {
3923     int fd;
3924     unsigned char bootSect[512];
3925     int offset;
3926    
3927     fd = open(device, O_RDONLY);
3928     if (fd < 0) {
3929     fprintf(stderr, _("grubby: unable to open %s: %s\n"),
3930     device, strerror(errno));
3931     return 1;
3932     }
3933    
3934     if (read(fd, bootSect, 512) != 512) {
3935     fprintf(stderr, _("grubby: unable to read %s: %s\n"),
3936     device, strerror(errno));
3937     return 1;
3938     }
3939     close(fd);
3940    
3941     /* first three bytes should match, a jmp short should be in there */
3942     if (memcmp(boot, bootSect, 3))
3943     return 0;
3944    
3945     if (boot[1] == JMP_SHORT_OPCODE) {
3946     offset = boot[2] + 2;
3947     } else if (boot[1] == 0xe8 || boot[1] == 0xe9) {
3948     offset = (boot[3] << 8) + boot[2] + 2;
3949     } else if (boot[0] == JMP_SHORT_OPCODE) {
3950     offset = boot[1] + 2;
3951     /*
3952     * it looks like grub, when copying stage1 into the mbr,
3953     * patches stage1 right after the JMP location, replacing
3954     * other instructions such as JMPs for NOOPs. So, relax the
3955     * check a little bit by skipping those different bytes.
3956     */
3957     if ((bootSect[offset + 1] == NOOP_OPCODE)
3958        && (bootSect[offset + 2] == NOOP_OPCODE)) {
3959     offset = offset + 3;
3960     }
3961     } else if (boot[0] == 0xe8 || boot[0] == 0xe9) {
3962     offset = (boot[2] << 8) + boot[1] + 2;
3963     } else {
3964     return 0;
3965     }
3966    
3967     if (memcmp(boot + offset, bootSect + offset, CODE_SEG_SIZE))
3968     return 0;
3969    
3970     return 2;
3971    }
3972    
3973    int checkLiloOnRaid(char *mdDev, const unsigned char *boot)
3974    {
3975     int fd;
3976     char buf[65536];
3977     char *end;
3978     char *chptr;
3979     char *chptr2;
3980     int rc;
3981    
3982     /* it's on raid; we need to parse /proc/mdstat and check all of the
3983     *raw* devices listed in there */
3984    
3985     if (!strncmp(mdDev, "/dev/", 5))
3986     mdDev += 5;
3987    
3988     if ((fd = open("/proc/mdstat", O_RDONLY)) < 0) {
3989     fprintf(stderr, _("grubby: failed to open /proc/mdstat: %s\n"),
3990     strerror(errno));
3991     return 2;
3992     }
3993    
3994     rc = read(fd, buf, sizeof(buf) - 1);
3995     if (rc < 0 || rc == (sizeof(buf) - 1)) {
3996     fprintf(stderr, _("grubby: failed to read /proc/mdstat: %s\n"),
3997     strerror(errno));
3998     close(fd);
3999     return 2;
4000     }
4001     close(fd);
4002     buf[rc] = '\0';
4003    
4004     chptr = buf;
4005     while (*chptr) {
4006     end = strchr(chptr, '\n');
4007     if (!end)
4008     break;
4009     *end = '\0';
4010    
4011     if (!strncmp(chptr, mdDev, strlen(mdDev)) &&
4012        chptr[strlen(mdDev)] == ' ') {
4013    
4014     /* found the device */
4015     while (*chptr && *chptr != ':')
4016     chptr++;
4017     chptr++;
4018     while (*chptr && isspace(*chptr))
4019     chptr++;
4020    
4021     /* skip the "active" bit */
4022     while (*chptr && !isspace(*chptr))
4023     chptr++;
4024     while (*chptr && isspace(*chptr))
4025     chptr++;
4026    
4027     /* skip the raid level */
4028     while (*chptr && !isspace(*chptr))
4029     chptr++;
4030     while (*chptr && isspace(*chptr))
4031     chptr++;
4032    
4033     /* everything else is partition stuff */
4034     while (*chptr) {
4035     chptr2 = chptr;
4036     while (*chptr2 && *chptr2 != '[')
4037     chptr2++;
4038     if (!*chptr2)
4039     break;
4040    
4041     /* yank off the numbers at the end */
4042     chptr2--;
4043     while (isdigit(*chptr2) && chptr2 > chptr)
4044     chptr2--;
4045     chptr2++;
4046     *chptr2 = '\0';
4047    
4048     /* Better, now we need the /dev/ back. We're
4049     * done with everything before this point, so
4050     * we can just put the /dev/ part there.
4051     * There will always be room. */
4052     memcpy(chptr - 5, "/dev/", 5);
4053     rc = checkDeviceBootloader(chptr - 5, boot);
4054     if (rc != 2) {
4055     return rc;
4056     }
4057    
4058     chptr = chptr2 + 1;
4059     /* skip the [11] bit */
4060     while (*chptr && !isspace(*chptr))
4061     chptr++;
4062     /* and move to the next one */
4063     while (*chptr && isspace(*chptr))
4064     chptr++;
4065     }
4066    
4067     /*  we're good to go */
4068     return 2;
4069     }
4070    
4071     chptr = end + 1;
4072     }
4073    
4074     fprintf(stderr,
4075     _("grubby: raid device /dev/%s not found in /proc/mdstat\n"),
4076     mdDev);
4077     return 0;
4078    }
4079    
4080    int checkForLilo(struct grubConfig *config)
4081    {
4082     int fd;
4083     unsigned char boot[512];
4084     struct singleLine *line;
4085    
4086     for (line = config->theLines; line; line = line->next)
4087     if (line->type == LT_BOOT)
4088     break;
4089    
4090     if (!line) {
4091     fprintf(stderr,
4092     _
4093     ("grubby: no boot line found in lilo configuration\n"));
4094     return 1;
4095     }
4096    
4097     if (line->numElements != 2)
4098     return 1;
4099    
4100     fd = open("/boot/boot.b", O_RDONLY);
4101     if (fd < 0) {
4102     fprintf(stderr, _("grubby: unable to open %s: %s\n"),
4103     "/boot/boot.b", strerror(errno));
4104     return 1;
4105     }
4106    
4107     if (read(fd, boot, 512) != 512) {
4108     fprintf(stderr, _("grubby: unable to read %s: %s\n"),
4109     "/boot/boot.b", strerror(errno));
4110     return 1;
4111     }
4112     close(fd);
4113    
4114     if (!strncmp("/dev/md", line->elements[1].item, 7))
4115     return checkLiloOnRaid(line->elements[1].item, boot);
4116    
4117     return checkDeviceBootloader(line->elements[1].item, boot);
4118    }
4119    
4120    int checkForGrub2(struct grubConfig *config)
4121    {
4122     if (!access("/etc/grub.d/", R_OK))
4123     return 2;
4124    
4125     return 1;
4126    }
4127    
4128    int checkForGrub(struct grubConfig *config)
4129    {
4130     int fd;
4131     unsigned char bootSect[512];
4132     char *boot;
4133     int onSuse = isSuseSystem();
4134    
4135     if (onSuse) {
4136     if (parseSuseGrubConf(NULL, &boot))
4137     return 0;
4138     } else {
4139     if (parseSysconfigGrub(NULL, &boot))
4140     return 0;
4141     }
4142    
4143     /* assume grub is not installed -- not an error condition */
4144     if (!boot)
4145     return 0;
4146    
4147     fd = open("/boot/grub/stage1", O_RDONLY);
4148     if (fd < 0)
4149     /* this doesn't exist if grub hasn't been installed */
4150     return 0;
4151    
4152     if (read(fd, bootSect, 512) != 512) {
4153     fprintf(stderr, _("grubby: unable to read %s: %s\n"),
4154     "/boot/grub/stage1", strerror(errno));
4155     close(fd);
4156     return 1;
4157     }
4158     close(fd);
4159    
4160     /* The more elaborate checks do not work on SuSE. The checks done
4161     * seem to be reasonble (at least for now), so just return success
4162     */
4163     if (onSuse)
4164     return 2;
4165    
4166     return checkDeviceBootloader(boot, bootSect);
4167    }
4168    
4169    int checkForExtLinux(struct grubConfig *config)
4170    {
4171     int fd;
4172     unsigned char bootSect[512];
4173     char *boot;
4174     char executable[] = "/boot/extlinux/extlinux";
4175    
4176     printf("entered: checkForExtLinux()\n");
4177    
4178     if (parseSysconfigGrub(NULL, &boot))
4179     return 0;
4180    
4181     /* assume grub is not installed -- not an error condition */
4182     if (!boot)
4183     return 0;
4184    
4185     fd = open(executable, O_RDONLY);
4186     if (fd < 0)
4187     /* this doesn't exist if grub hasn't been installed */
4188     return 0;
4189    
4190     if (read(fd, bootSect, 512) != 512) {
4191     fprintf(stderr, _("grubby: unable to read %s: %s\n"),
4192     executable, strerror(errno));
4193     return 1;
4194     }
4195     close(fd);
4196    
4197     return checkDeviceBootloader(boot, bootSect);
4198    }
4199    
4200    int checkForYaboot(struct grubConfig *config)
4201    {
4202     /*
4203     * This is a simplistic check that we consider good enough for own puporses
4204     *
4205     * If we were to properly check if yaboot is *installed* we'd need to:
4206     * 1) get the system boot device (LT_BOOT)
4207     * 2) considering it's a raw filesystem, check if the yaboot binary matches
4208     *    the content on the boot device
4209     * 3) if not, copy the binary to a temporary file and run "addnote" on it
4210     * 4) check again if binary and boot device contents match
4211     */
4212     if (!access("/etc/yaboot.conf", R_OK))
4213     return 2;
4214    
4215     return 1;
4216    }
4217    
4218    int checkForElilo(struct grubConfig *config)
4219    {
4220     if (!access("/etc/elilo.conf", R_OK))
4221     return 2;
4222    
4223     return 1;
4224    }
4225    
4226    static char *getRootSpecifier(char *str)
4227    {
4228     char *idx, *rootspec = NULL;
4229    
4230     if (*str == '(') {
4231     idx = rootspec = strdup(str);
4232     while (*idx && (*idx != ')') && (!isspace(*idx)))
4233     idx++;
4234     *(++idx) = '\0';
4235     }
4236     return rootspec;
4237    }
4238    
4239    static char *getInitrdVal(struct grubConfig *config,
4240      const char *prefix, struct singleLine *tmplLine,
4241      const char *newKernelInitrd,
4242      const char **extraInitrds, int extraInitrdCount)
4243    {
4244     char *initrdVal, *end;
4245     int i;
4246     size_t totalSize;
4247     size_t prefixLen;
4248     char separatorChar;
4249    
4250     prefixLen = strlen(prefix);
4251     totalSize = strlen(newKernelInitrd) - prefixLen + 1 /* \0 */ ;
4252    
4253     for (i = 0; i < extraInitrdCount; i++) {
4254     totalSize += sizeof(separatorChar);
4255     totalSize += strlen(extraInitrds[i]) - prefixLen;
4256     }
4257    
4258     initrdVal = end = malloc(totalSize);
4259    
4260     end = stpcpy(end, newKernelInitrd + prefixLen);
4261    
4262     separatorChar = getKeywordByType(LT_INITRD, config->cfi)->separatorChar;
4263     for (i = 0; i < extraInitrdCount; i++) {
4264     const char *extraInitrd;
4265     int j;
4266    
4267     extraInitrd = extraInitrds[i] + prefixLen;
4268     /* Don't add entries that are already there */
4269     if (tmplLine != NULL) {
4270     for (j = 2; j < tmplLine->numElements; j++)
4271     if (strcmp
4272        (extraInitrd,
4273         tmplLine->elements[j].item) == 0)
4274     break;
4275    
4276     if (j != tmplLine->numElements)
4277     continue;
4278     }
4279    
4280     *end++ = separatorChar;
4281     end = stpcpy(end, extraInitrd);
4282     }
4283    
4284     return initrdVal;
4285    }
4286    
4287    int addNewKernel(struct grubConfig *config, struct singleEntry *template,
4288     const char *prefix,
4289     const char *newKernelPath, const char *newKernelTitle,
4290     const char *newKernelArgs, const char *newKernelInitrd,
4291     const char **extraInitrds, int extraInitrdCount,
4292     const char *newMBKernel, const char *newMBKernelArgs,
4293     const char *newDevTreePath, int newIndex)
4294    {
4295     struct singleEntry *new, *entry, *prev = NULL;
4296     struct singleLine *newLine = NULL, *tmplLine = NULL, *masterLine = NULL;
4297     int needs;
4298     char *indexs;
4299     char *chptr;
4300     int rc;
4301    
4302     if (!newKernelPath)
4303     return 0;
4304    
4305     rc = asprintf(&indexs, "%d", newIndex);
4306     if (rc < 0)
4307     return 1;
4308    
4309     /* if the newKernelTitle is too long silently munge it into something
4310     * we can live with. truncating is first check, then we'll just mess with
4311     * it until it looks better */
4312     if (config->cfi->maxTitleLength &&
4313        (strlen(newKernelTitle) > config->cfi->maxTitleLength)) {
4314     char *buf = alloca(config->cfi->maxTitleLength + 7);
4315     char *numBuf = alloca(config->cfi->maxTitleLength + 1);
4316     int i = 1;
4317    
4318     sprintf(buf, "TITLE=%.*s", config->cfi->maxTitleLength,
4319     newKernelTitle);
4320     while (findEntryByPath(config, buf, NULL, NULL)) {
4321     sprintf(numBuf, "%d", i++);
4322     strcpy(buf + strlen(buf) - strlen(numBuf), numBuf);
4323     }
4324    
4325     newKernelTitle = buf + 6;
4326     }
4327    
4328     new = malloc(sizeof(*new));
4329     new->skip = 0;
4330     new->multiboot = 0;
4331     new->lines = NULL;
4332     entry = config->entries;
4333     for (unsigned int i = 0; i < newIndex; i++) {
4334     if (!entry)
4335     break;
4336     prev = entry;
4337     entry = entry->next;
4338     }
4339     new->next = entry;
4340    
4341     if (prev)
4342     prev->next = new;
4343     else
4344     config->entries = new;
4345    
4346     /* copy/update from the template */
4347     needs = NEED_KERNEL | NEED_TITLE;
4348     if (newKernelInitrd)
4349     needs |= NEED_INITRD;
4350     if (newMBKernel) {
4351     needs |= NEED_MB;
4352     new->multiboot = 1;
4353     }
4354     if (newDevTreePath && getKeywordByType(LT_DEVTREE, config->cfi))
4355     needs |= NEED_DEVTREE;
4356    
4357     if (template) {
4358     for (masterLine = template->lines;
4359         masterLine && (tmplLine = lineDup(masterLine));
4360         lineFree(tmplLine), masterLine = masterLine->next) {
4361     dbgPrintf("addNewKernel processing %d\n",
4362      tmplLine->type);
4363    
4364     /* skip comments */
4365     chptr = tmplLine->indent;
4366     while (*chptr && isspace(*chptr))
4367     chptr++;
4368     if (*chptr == '#')
4369     continue;
4370    
4371     if (iskernel(tmplLine->type)
4372        && tmplLine->numElements >= 2) {
4373     if (!template->multiboot && (needs & NEED_MB)) {
4374     /* it's not a multiboot template and
4375     * this is the kernel line.  Try to
4376     * be intelligent about inserting the
4377     * hypervisor at the same time.
4378     */
4379     if (config->cfi->mbHyperFirst) {
4380     /* insert the hypervisor first */
4381     newLine =
4382        addLine(new, config->cfi,
4383        LT_HYPER,
4384        tmplLine->indent,
4385        newMBKernel +
4386        strlen(prefix));
4387     /* set up for adding the
4388     * kernel line */
4389     free(tmplLine->indent);
4390     tmplLine->indent =
4391        strdup(config->
4392       secondaryIndent);
4393     needs &= ~NEED_MB;
4394     }
4395     if (needs & NEED_KERNEL) {
4396     /* use addLineTmpl to
4397     * preserve line elements,
4398     * otherwise we could just
4399     * call addLine.
4400     * Unfortunately this means
4401     * making some changes to the
4402     * template such as the
4403     * indent change above and
4404     * the type change below.
4405     */
4406     struct keywordTypes *mbm_kw =
4407        getKeywordByType
4408        (LT_MBMODULE, config->cfi);
4409     if (mbm_kw) {
4410     tmplLine->type =
4411        LT_MBMODULE;
4412     free(tmplLine->
4413         elements[0].item);
4414     tmplLine->elements[0].
4415        item =
4416        strdup(mbm_kw->key);
4417     }
4418     newLine =
4419        addLineTmpl(new, tmplLine,
4420     newLine,
4421     newKernelPath +
4422     strlen(prefix),
4423     config->cfi);
4424     needs &= ~NEED_KERNEL;
4425     }
4426     if (needs & NEED_MB) { /* !mbHyperFirst */
4427     newLine =
4428        addLine(new, config->cfi,
4429        LT_HYPER,
4430        config->
4431        secondaryIndent,
4432        newMBKernel +
4433        strlen(prefix));
4434     needs &= ~NEED_MB;
4435     }
4436     } else if (needs & NEED_KERNEL) {
4437     newLine =
4438        addLineTmpl(new, tmplLine, newLine,
4439     newKernelPath +
4440     strlen(prefix),
4441     config->cfi);
4442     needs &= ~NEED_KERNEL;
4443     }
4444    
4445     } else if (tmplLine->type == LT_HYPER &&
4446       tmplLine->numElements >= 2) {
4447     if (needs & NEED_MB) {
4448     newLine =
4449        addLineTmpl(new, tmplLine, newLine,
4450     newMBKernel +
4451     strlen(prefix),
4452     config->cfi);
4453     needs &= ~NEED_MB;
4454     }
4455    
4456     } else if (tmplLine->type == LT_MBMODULE &&
4457       tmplLine->numElements >= 2) {
4458     if (new->multiboot) {
4459     if (needs & NEED_KERNEL) {
4460     newLine =
4461        addLineTmpl(new, tmplLine,
4462     newLine,
4463     newKernelPath +
4464     strlen(prefix),
4465     config->cfi);
4466     needs &= ~NEED_KERNEL;
4467     } else if (config->cfi->mbInitRdIsModule
4468       && (needs & NEED_INITRD)) {
4469     char *initrdVal;
4470     initrdVal =
4471        getInitrdVal(config, prefix,
4472     tmplLine,
4473     newKernelInitrd,
4474     extraInitrds,
4475     extraInitrdCount);
4476     newLine =
4477        addLineTmpl(new, tmplLine,
4478     newLine,
4479     initrdVal,
4480     config->cfi);
4481     free(initrdVal);
4482     needs &= ~NEED_INITRD;
4483     }
4484     } else if (needs & NEED_KERNEL) {
4485     /* template is multi but new is not,
4486     * insert the kernel in the first
4487     * module slot
4488     */
4489     tmplLine->type =
4490        preferredLineType(LT_KERNEL,
4491          config->cfi);
4492     free(tmplLine->elements[0].item);
4493     tmplLine->elements[0].item =
4494        strdup(getKeywordByType
4495       (tmplLine->type,
4496        config->cfi)->key);
4497     newLine =
4498        addLineTmpl(new, tmplLine, newLine,
4499     newKernelPath +
4500     strlen(prefix),
4501     config->cfi);
4502     needs &= ~NEED_KERNEL;
4503     } else if (needs & NEED_INITRD) {
4504     char *initrdVal;
4505     /* template is multi but new is not,
4506     * insert the initrd in the second
4507     * module slot
4508     */
4509     tmplLine->type =
4510        preferredLineType(LT_INITRD,
4511          config->cfi);
4512     free(tmplLine->elements[0].item);
4513     tmplLine->elements[0].item =
4514        strdup(getKeywordByType
4515       (tmplLine->type,
4516        config->cfi)->key);
4517     initrdVal =
4518        getInitrdVal(config, prefix,
4519     tmplLine,
4520     newKernelInitrd,
4521     extraInitrds,
4522     extraInitrdCount);
4523     newLine =
4524        addLineTmpl(new, tmplLine, newLine,
4525     initrdVal, config->cfi);
4526     free(initrdVal);
4527     needs &= ~NEED_INITRD;
4528     }
4529    
4530     } else if (isinitrd(tmplLine->type)
4531       && tmplLine->numElements >= 2) {
4532     if (needs & NEED_INITRD && new->multiboot
4533        && !template->multiboot
4534        && config->cfi->mbInitRdIsModule) {
4535     /* make sure we don't insert the
4536     * module initrd before the module
4537     * kernel... if we don't do it here,
4538     * it will be inserted following the
4539     * template.
4540     */
4541     if (!needs & NEED_KERNEL) {
4542     char *initrdVal;
4543    
4544     initrdVal =
4545        getInitrdVal(config, prefix,
4546     tmplLine,
4547     newKernelInitrd,
4548     extraInitrds,
4549     extraInitrdCount);
4550     newLine =
4551        addLine(new, config->cfi,
4552        LT_MBMODULE,
4553        config->
4554        secondaryIndent,
4555        initrdVal);
4556     free(initrdVal);
4557     needs &= ~NEED_INITRD;
4558     }
4559     } else if (needs & NEED_INITRD) {
4560     char *initrdVal;
4561     initrdVal =
4562        getInitrdVal(config, prefix,
4563     tmplLine,
4564     newKernelInitrd,
4565     extraInitrds,
4566     extraInitrdCount);
4567     newLine =
4568        addLineTmpl(new, tmplLine, newLine,
4569     initrdVal, config->cfi);
4570     free(initrdVal);
4571     needs &= ~NEED_INITRD;
4572     }
4573    
4574     } else if (tmplLine->type == LT_MENUENTRY &&
4575       (needs & NEED_TITLE)) {
4576     requote(tmplLine, config->cfi);
4577     char *nkt = malloc(strlen(newKernelTitle) + 3);
4578     strcpy(nkt, "'");
4579     strcat(nkt, newKernelTitle);
4580     strcat(nkt, "'");
4581     newLine =
4582        addLineTmpl(new, tmplLine, newLine, nkt,
4583     config->cfi);
4584     free(nkt);
4585     needs &= ~NEED_TITLE;
4586     } else if (tmplLine->type == LT_TITLE &&
4587       (needs & NEED_TITLE)) {
4588     if (tmplLine->numElements >= 2) {
4589     newLine =
4590        addLineTmpl(new, tmplLine, newLine,
4591     newKernelTitle,
4592     config->cfi);
4593     needs &= ~NEED_TITLE;
4594     } else if (tmplLine->numElements == 1 &&
4595       config->cfi->titleBracketed) {
4596     /* addLineTmpl doesn't handle
4597     * titleBracketed */
4598     newLine =
4599        addLine(new, config->cfi, LT_TITLE,
4600        tmplLine->indent,
4601        newKernelTitle);
4602     needs &= ~NEED_TITLE;
4603     }
4604     } else if (tmplLine->type == LT_ECHO) {
4605     requote(tmplLine, config->cfi);
4606     static const char *prefix = "'Loading ";
4607     if (tmplLine->numElements > 1 &&
4608        strstr(tmplLine->elements[1].item, prefix)
4609        && masterLine->next
4610        && iskernel(masterLine->next->type)) {
4611     char *newTitle =
4612        malloc(strlen(prefix) +
4613       strlen(newKernelTitle) + 2);
4614    
4615     strcpy(newTitle, prefix);
4616     strcat(newTitle, newKernelTitle);
4617     strcat(newTitle, "'");
4618     newLine =
4619        addLine(new, config->cfi, LT_ECHO,
4620        tmplLine->indent, newTitle);
4621     free(newTitle);
4622     } else {
4623     /* pass through other lines from the
4624     * template */
4625     newLine =
4626        addLineTmpl(new, tmplLine, newLine,
4627     NULL, config->cfi);
4628     }
4629     } else if (tmplLine->type == LT_DEVTREE &&
4630       tmplLine->numElements == 2
4631       && newDevTreePath) {
4632     newLine =
4633        addLineTmpl(new, tmplLine, newLine,
4634     newDevTreePath + strlen(prefix),
4635     config->cfi);
4636     needs &= ~NEED_DEVTREE;
4637     } else if (tmplLine->type == LT_ENTRY_END
4638       && needs & NEED_DEVTREE) {
4639     const char *ndtp = newDevTreePath;
4640     if (!strncmp
4641        (newDevTreePath, prefix, strlen(prefix)))
4642     ndtp += strlen(prefix);
4643     newLine = addLine(new, config->cfi, LT_DEVTREE,
4644      config->secondaryIndent,
4645      ndtp);
4646     needs &= ~NEED_DEVTREE;
4647     newLine =
4648        addLineTmpl(new, tmplLine, newLine, NULL,
4649     config->cfi);
4650     } else {
4651     /* pass through other lines from the template */
4652     newLine =
4653        addLineTmpl(new, tmplLine, newLine, NULL,
4654     config->cfi);
4655     }
4656     }
4657    
4658     } else {
4659     /* don't have a template, so start the entry with the
4660     * appropriate starting line
4661     */
4662     switch (config->cfi->entryStart) {
4663     case LT_KERNEL:
4664     case LT_KERNEL_EFI:
4665     case LT_KERNEL_16:
4666     if (new->multiboot && config->cfi->mbHyperFirst) {
4667     /* fall through to LT_HYPER */
4668     } else {
4669     newLine = addLine(new, config->cfi,
4670      preferredLineType(LT_KERNEL,
4671        config->
4672        cfi),
4673      config->primaryIndent,
4674      newKernelPath +
4675      strlen(prefix));
4676     needs &= ~NEED_KERNEL;
4677     break;
4678     }
4679    
4680     case LT_HYPER:
4681     newLine = addLine(new, config->cfi, LT_HYPER,
4682      config->primaryIndent,
4683      newMBKernel + strlen(prefix));
4684     needs &= ~NEED_MB;
4685     break;
4686    
4687     case LT_MENUENTRY:{
4688     char *nkt = malloc(strlen(newKernelTitle) + 3);
4689     strcpy(nkt, "'");
4690     strcat(nkt, newKernelTitle);
4691     strcat(nkt, "'");
4692     newLine =
4693        addLine(new, config->cfi, LT_MENUENTRY,
4694        config->primaryIndent, nkt);
4695     free(nkt);
4696     needs &= ~NEED_TITLE;
4697     needs |= NEED_END;
4698     break;
4699     }
4700     case LT_TITLE:
4701     if (useextlinuxmenu != 0) { // We just need useextlinuxmenu to not be zero (set above)
4702     char *templabel;
4703     int x = 0, y = 0;
4704    
4705     templabel = strdup(newKernelTitle);
4706     while (templabel[x]) {
4707     if (templabel[x] == ' ') {
4708     y = x;
4709     while (templabel[y]) {
4710     templabel[y] =
4711        templabel[y + 1];
4712     y++;
4713     }
4714     }
4715     x++;
4716     }
4717     newLine = addLine(new, config->cfi, LT_TITLE,
4718      config->primaryIndent,
4719      templabel);
4720     free(templabel);
4721     } else {
4722     newLine = addLine(new, config->cfi, LT_TITLE,
4723      config->primaryIndent,
4724      newKernelTitle);
4725     }
4726     needs &= ~NEED_TITLE;
4727     break;
4728    
4729     default:
4730     abort();
4731     }
4732     }
4733    
4734     struct singleLine *endLine = NULL;
4735     endLine = getLineByType(LT_ENTRY_END, new->lines);
4736     if (endLine) {
4737     removeLine(new, endLine);
4738     needs |= NEED_END;
4739     }
4740    
4741     /* add the remainder of the lines, i.e. those that either
4742     * weren't present in the template, or in the case of no template,
4743     * all the lines following the entryStart.
4744     */
4745     if (needs & NEED_TITLE) {
4746     newLine = addLine(new, config->cfi, LT_TITLE,
4747      config->secondaryIndent, newKernelTitle);
4748     needs &= ~NEED_TITLE;
4749     }
4750     if ((needs & NEED_MB) && config->cfi->mbHyperFirst) {
4751     newLine = addLine(new, config->cfi, LT_HYPER,
4752      config->secondaryIndent,
4753      newMBKernel + strlen(prefix));
4754     needs &= ~NEED_MB;
4755     }
4756     if (needs & NEED_KERNEL) {
4757     newLine = addLine(new, config->cfi,
4758      (new->multiboot
4759       && getKeywordByType(LT_MBMODULE,
4760           config->cfi))
4761      ? LT_MBMODULE : preferredLineType(LT_KERNEL,
4762        config->
4763        cfi),
4764      config->secondaryIndent,
4765      newKernelPath + strlen(prefix));
4766     needs &= ~NEED_KERNEL;
4767     }
4768     if (needs & NEED_MB) {
4769     newLine = addLine(new, config->cfi, LT_HYPER,
4770      config->secondaryIndent,
4771      newMBKernel + strlen(prefix));
4772     needs &= ~NEED_MB;
4773     }
4774     if (needs & NEED_INITRD) {
4775     char *initrdVal;
4776     initrdVal =
4777        getInitrdVal(config, prefix, NULL, newKernelInitrd,
4778     extraInitrds, extraInitrdCount);
4779     newLine =
4780        addLine(new, config->cfi,
4781        (new->multiboot
4782         && getKeywordByType(LT_MBMODULE, config->cfi))
4783        ? LT_MBMODULE : preferredLineType(LT_INITRD,
4784          config->cfi),
4785        config->secondaryIndent, initrdVal);
4786     free(initrdVal);
4787     needs &= ~NEED_INITRD;
4788     }
4789     if (needs & NEED_DEVTREE) {
4790     newLine = addLine(new, config->cfi, LT_DEVTREE,
4791      config->secondaryIndent, newDevTreePath);
4792     needs &= ~NEED_DEVTREE;
4793     }
4794    
4795     /* NEEDS_END must be last on bootloaders that need it... */
4796     if (needs & NEED_END) {
4797     newLine = addLine(new, config->cfi, LT_ENTRY_END,
4798      config->secondaryIndent, NULL);
4799     needs &= ~NEED_END;
4800     }
4801    
4802     if (needs) {
4803     printf(_("grubby: needs=%d, aborting\n"), needs);
4804     abort();
4805     }
4806    
4807     if (updateImage(config, indexs, prefix, newKernelArgs, NULL,
4808     newMBKernelArgs, NULL)) {
4809     config->isModified = 1;
4810     return 1;
4811     }
4812    
4813     return 0;
4814    }
4815    
4816    int main(int argc, const char **argv)
4817    {
4818     poptContext optCon;
4819     const char *grubConfig = NULL;
4820     char *outputFile = NULL;
4821     int arg = 0;
4822     int flags = 0;
4823     int badImageOkay = 0;
4824     int configureGrub2 = 0;
4825     int configureLilo = 0, configureELilo = 0, configureGrub = 0;
4826     int configureYaboot = 0, configureSilo = 0, configureZipl = 0;
4827     int configureExtLinux = 0;
4828     int bootloaderProbe = 0;
4829     int extraInitrdCount = 0;
4830     char *updateKernelPath = NULL;
4831     char *newKernelPath = NULL;
4832     char *removeKernelPath = NULL;
4833     char *newKernelArgs = NULL;
4834     char *newKernelInitrd = NULL;
4835     char *newKernelTitle = NULL;
4836     char *newDevTreePath = NULL;
4837     char *newMBKernel = NULL;
4838     char *newMBKernelArgs = NULL;
4839     int newIndex = 0;
4840     char *removeMBKernelArgs = NULL;
4841     char *removeMBKernel = NULL;
4842     char *bootPrefix = NULL;
4843     char *defaultKernel = NULL;
4844     char *removeArgs = NULL;
4845     char *kernelInfo = NULL;
4846     char *extraInitrds[MAX_EXTRA_INITRDS] = { NULL };
4847     char *envPath = NULL;
4848     const char *chptr = NULL;
4849     struct configFileInfo *cfi = NULL;
4850     struct grubConfig *config;
4851     struct singleEntry *template = NULL;
4852     int copyDefault = 0, makeDefault = 0;
4853     int displayDefault = 0;
4854     int displayDefaultIndex = 0;
4855     int displayDefaultTitle = 0;
4856     int defaultIndex = -1;
4857     struct poptOption options[] = {
4858     {"add-kernel", 0, POPT_ARG_STRING, &newKernelPath, 0,
4859     _("add an entry for the specified kernel"), _("kernel-path")},
4860     {"add-multiboot", 0, POPT_ARG_STRING, &newMBKernel, 0,
4861     _("add an entry for the specified multiboot kernel"), NULL},
4862     {"args", 0, POPT_ARG_STRING, &newKernelArgs, 0,
4863     _("default arguments for the new kernel or new arguments for "
4864       "kernel being updated"), _("args")},
4865     {"mbargs", 0, POPT_ARG_STRING, &newMBKernelArgs, 0,
4866     _("default arguments for the new multiboot kernel or "
4867       "new arguments for multiboot kernel being updated"), NULL},
4868     {"bad-image-okay", 0, 0, &badImageOkay, 0,
4869     _
4870     ("don't sanity check images in boot entries (for testing only)"),
4871     NULL},
4872     {"boot-filesystem", 0, POPT_ARG_STRING, &bootPrefix, 0,
4873     _
4874     ("filesystem which contains /boot directory (for testing only)"),
4875     _("bootfs")},
4876    #if defined(__i386__) || defined(__x86_64__) || defined (__powerpc64__) || defined (__ia64__)
4877     {"bootloader-probe", 0, POPT_ARG_NONE, &bootloaderProbe, 0,
4878     _("check which bootloader is installed on boot sector")},
4879    #endif
4880     {"config-file", 'c', POPT_ARG_STRING, &grubConfig, 0,
4881     _("path to grub config file to update (\"-\" for stdin)"),
4882     _("path")},
4883     {"copy-default", 0, 0, &copyDefault, 0,
4884     _("use the default boot entry as a template for the new entry "
4885       "being added; if the default is not a linux image, or if "
4886       "the kernel referenced by the default image does not exist, "
4887       "the first linux entry whose kernel does exist is used as the "
4888       "template"), NULL},
4889     {"debug", 0, 0, &debug, 0,
4890     _("print debugging information for failures")},
4891     {"default-kernel", 0, 0, &displayDefault, 0,
4892     _("display the path of the default kernel")},
4893     {"default-index", 0, 0, &displayDefaultIndex, 0,
4894     _("display the index of the default kernel")},
4895     {"default-title", 0, 0, &displayDefaultTitle, 0,
4896     _("display the title of the default kernel")},
4897     {"devtree", 0, POPT_ARG_STRING, &newDevTreePath, 0,
4898     _("device tree file for new stanza"), _("dtb-path")},
4899     {"devtreedir", 0, POPT_ARG_STRING, &newDevTreePath, 0,
4900     _("device tree directory for new stanza"), _("dtb-path")},
4901     {"elilo", 0, POPT_ARG_NONE, &configureELilo, 0,
4902     _("configure elilo bootloader")},
4903     {"efi", 0, POPT_ARG_NONE, &isEfi, 0,
4904     _("force grub2 stanzas to use efi")},
4905     {"env", 0, POPT_ARG_STRING, &envPath, 0,
4906     _("path for environment data"),
4907     _("path")},
4908     {"extlinux", 0, POPT_ARG_NONE, &configureExtLinux, 0,
4909     _("configure extlinux bootloader (from syslinux)")},
4910     {"grub", 0, POPT_ARG_NONE, &configureGrub, 0,
4911     _("configure grub bootloader")},
4912     {"grub2", 0, POPT_ARG_NONE, &configureGrub2, 0,
4913     _("configure grub2 bootloader")},
4914     {"info", 0, POPT_ARG_STRING, &kernelInfo, 0,
4915     _("display boot information for specified kernel"),
4916     _("kernel-path")},
4917     {"initrd", 0, POPT_ARG_STRING, &newKernelInitrd, 0,
4918     _("initrd image for the new kernel"), _("initrd-path")},
4919     {"extra-initrd", 'i', POPT_ARG_STRING, NULL, 'i',
4920     _
4921     ("auxiliary initrd image for things other than the new kernel"),
4922     _("initrd-path")},
4923     {"lilo", 0, POPT_ARG_NONE, &configureLilo, 0,
4924     _("configure lilo bootloader")},
4925     {"make-default", 0, 0, &makeDefault, 0,
4926     _("make the newly added entry the default boot entry"), NULL},
4927     {"output-file", 'o', POPT_ARG_STRING, &outputFile, 0,
4928     _("path to output updated config file (\"-\" for stdout)"),
4929     _("path")},
4930     {"remove-args", 0, POPT_ARG_STRING, &removeArgs, 0,
4931     _("remove kernel arguments"), NULL},
4932     {"remove-mbargs", 0, POPT_ARG_STRING, &removeMBKernelArgs, 0,
4933     _("remove multiboot kernel arguments"), NULL},
4934     {"remove-kernel", 0, POPT_ARG_STRING, &removeKernelPath, 0,
4935     _("remove all entries for the specified kernel"),
4936     _("kernel-path")},
4937     {"remove-multiboot", 0, POPT_ARG_STRING, &removeMBKernel, 0,
4938     _("remove all entries for the specified multiboot kernel"),
4939     NULL},
4940     {"set-default", 0, POPT_ARG_STRING, &defaultKernel, 0,
4941     _("make the first entry referencing the specified kernel "
4942       "the default"), _("kernel-path")},
4943     {"set-default-index", 0, POPT_ARG_INT, &defaultIndex, 0,
4944     _("make the given entry index the default entry"),
4945     _("entry-index")},
4946     {"set-index", 0, POPT_ARG_INT, &newIndex, 0,
4947     _("use the given index when creating a new entry"),
4948     _("entry-index")},
4949     {"silo", 0, POPT_ARG_NONE, &configureSilo, 0,
4950     _("configure silo bootloader")},
4951     {"title", 0, POPT_ARG_STRING, &newKernelTitle, 0,
4952     _("title to use for the new kernel entry"), _("entry-title")},
4953     {"update-kernel", 0, POPT_ARG_STRING, &updateKernelPath, 0,
4954     _("updated information for the specified kernel"),
4955     _("kernel-path")},
4956     {"version", 'v', 0, NULL, 'v',
4957     _("print the version of this program and exit"), NULL},
4958     {"yaboot", 0, POPT_ARG_NONE, &configureYaboot, 0,
4959     _("configure yaboot bootloader")},
4960     {"zipl", 0, POPT_ARG_NONE, &configureZipl, 0,
4961     _("configure zipl bootloader")},
4962     POPT_AUTOHELP {0, 0, 0, 0, 0}
4963     };
4964    
4965     useextlinuxmenu = 0;
4966    
4967     int i = 0;
4968     for (int j = 1; j < argc; j++)
4969     i += strlen(argv[j]) + 1;
4970     saved_command_line = malloc(i);
4971     if (!saved_command_line) {
4972     fprintf(stderr, "grubby: %m\n");
4973     exit(1);
4974     }
4975     saved_command_line[0] = '\0';
4976     for (int j = 1; j < argc; j++) {
4977     strcat(saved_command_line, argv[j]);
4978     strncat(saved_command_line, j == argc - 1 ? "" : " ", 1);
4979     }
4980    
4981     optCon = poptGetContext("grubby", argc, argv, options, 0);
4982     poptReadDefaultConfig(optCon, 1);
4983    
4984     while ((arg = poptGetNextOpt(optCon)) >= 0) {
4985     switch (arg) {
4986     case 'v':
4987     printf("grubby version %s\n", VERSION);
4988     exit(0);
4989     break;
4990     case 'i':
4991     if (extraInitrdCount < MAX_EXTRA_INITRDS) {
4992     extraInitrds[extraInitrdCount++] =
4993        strdup(poptGetOptArg(optCon));
4994     } else {
4995     fprintf(stderr,
4996     _
4997     ("grubby: extra initrd maximum is %d\n"),
4998     extraInitrdCount);
4999     return 1;
5000     }
5001     break;
5002     }
5003     }
5004    
5005     if (arg < -1) {
5006     fprintf(stderr, _("grubby: bad argument %s: %s\n"),
5007     poptBadOption(optCon, POPT_BADOPTION_NOALIAS),
5008     poptStrerror(arg));
5009     return 1;
5010     }
5011    
5012     if ((chptr = poptGetArg(optCon))) {
5013     fprintf(stderr, _("grubby: unexpected argument %s\n"), chptr);
5014     return 1;
5015     }
5016    
5017     if ((configureLilo + configureGrub2 + configureGrub + configureELilo +
5018         configureYaboot + configureSilo + configureZipl +
5019         configureExtLinux) > 1) {
5020     fprintf(stderr,
5021     _("grubby: cannot specify multiple bootloaders\n"));
5022     return 1;
5023     } else if (bootloaderProbe && grubConfig) {
5024     fprintf(stderr,
5025     _
5026     ("grubby: cannot specify config file with --bootloader-probe\n"));
5027     return 1;
5028     } else if (configureGrub2) {
5029     cfi = &grub2ConfigType;
5030     if (envPath)
5031     cfi->envFile = envPath;
5032     } else if (configureLilo) {
5033     cfi = &liloConfigType;
5034     } else if (configureGrub) {
5035     cfi = &grubConfigType;
5036     } else if (configureELilo) {
5037     cfi = &eliloConfigType;
5038     } else if (configureYaboot) {
5039     cfi = &yabootConfigType;
5040     } else if (configureSilo) {
5041     cfi = &siloConfigType;
5042     } else if (configureZipl) {
5043     cfi = &ziplConfigType;
5044     } else if (configureExtLinux) {
5045     cfi = &extlinuxConfigType;
5046     useextlinuxmenu = 1;
5047     }
5048    
5049     if (!cfi) {
5050     if (grub2FindConfig(&grub2ConfigType)) {
5051     cfi = &grub2ConfigType;
5052     if (envPath)
5053     cfi->envFile = envPath;
5054     } else
5055    #ifdef __ia64__
5056     cfi = &eliloConfigType;
5057    #elif __powerpc__
5058     cfi = &yabootConfigType;
5059    #elif __sparc__
5060     cfi = &siloConfigType;
5061    #elif __s390__
5062     cfi = &ziplConfigType;
5063    #elif __s390x__
5064     cfi = &ziplConfigtype;
5065    #else
5066     cfi = &grubConfigType;
5067    #endif
5068     }
5069    
5070     if (!grubConfig) {
5071     if (cfi->findConfig)
5072     grubConfig = cfi->findConfig(cfi);
5073     if (!grubConfig)
5074     grubConfig = cfi->defaultConfig;
5075     }
5076    
5077     if (bootloaderProbe && (displayDefault || kernelInfo ||
5078     newKernelPath || removeKernelPath || makeDefault
5079     || defaultKernel || displayDefaultIndex
5080     || displayDefaultTitle
5081     || (defaultIndex >= 0))) {
5082     fprintf(stderr,
5083     _("grubby: --bootloader-probe may not be used with "
5084      "specified option"));
5085     return 1;
5086     }
5087    
5088     if ((displayDefault || kernelInfo) && (newKernelPath ||
5089           removeKernelPath)) {
5090     fprintf(stderr, _("grubby: --default-kernel and --info may not "
5091      "be used when adding or removing kernels\n"));
5092     return 1;
5093     }
5094    
5095     if (newKernelPath && !newKernelTitle) {
5096     fprintf(stderr, _("grubby: kernel title must be specified\n"));
5097     return 1;
5098     } else if (!newKernelPath && (copyDefault ||
5099          (newKernelInitrd && !updateKernelPath) ||
5100          makeDefault || extraInitrdCount > 0)) {
5101     fprintf(stderr, _("grubby: kernel path expected\n"));
5102     return 1;
5103     }
5104    
5105     if (newKernelPath && updateKernelPath) {
5106     fprintf(stderr, _("grubby: --add-kernel and --update-kernel may"
5107      "not be used together"));
5108     return 1;
5109     }
5110    
5111     if (makeDefault && defaultKernel) {
5112     fprintf(stderr, _("grubby: --make-default and --default-kernel "
5113      "may not be used together\n"));
5114     return 1;
5115     } else if (defaultKernel && removeKernelPath &&
5116       !strcmp(defaultKernel, removeKernelPath)) {
5117     fprintf(stderr,
5118     _("grubby: cannot make removed kernel the default\n"));
5119     return 1;
5120     } else if (defaultKernel && newKernelPath &&
5121       !strcmp(defaultKernel, newKernelPath)) {
5122     makeDefault = 1;
5123     defaultKernel = NULL;
5124     } else if (defaultKernel && (defaultIndex >= 0)) {
5125     fprintf(stderr,
5126     _("grubby: --set-default and --set-default-index "
5127      "may not be used together\n"));
5128     return 1;
5129     }
5130    
5131     if (grubConfig && !strcmp(grubConfig, "-") && !outputFile) {
5132     fprintf(stderr,
5133     _("grubby: output file must be specified if stdin "
5134      "is used\n"));
5135     return 1;
5136     }
5137    
5138     if (!removeKernelPath && !newKernelPath && !displayDefault
5139        && !defaultKernel && !kernelInfo && !bootloaderProbe
5140        && !updateKernelPath && !removeMBKernel && !displayDefaultIndex
5141        && !displayDefaultTitle && (defaultIndex == -1)) {
5142     fprintf(stderr, _("grubby: no action specified\n"));
5143     return 1;
5144     }
5145    
5146     flags |= badImageOkay ? GRUBBY_BADIMAGE_OKAY : 0;
5147    
5148     if (cfi->needsBootPrefix) {
5149     if (!bootPrefix) {
5150     bootPrefix = findBootPrefix();
5151     if (!bootPrefix)
5152     return 1;
5153     } else {
5154     /* this shouldn't end with a / */
5155     if (bootPrefix[strlen(bootPrefix) - 1] == '/')
5156     bootPrefix[strlen(bootPrefix) - 1] = '\0';
5157     }
5158     } else {
5159     bootPrefix = "";
5160     }
5161    
5162     if (!cfi->mbAllowExtraInitRds && extraInitrdCount > 0) {
5163     fprintf(stderr,
5164     _("grubby: %s doesn't allow multiple initrds\n"),
5165     cfi->defaultConfig);
5166     return 1;
5167     }
5168    
5169     if (bootloaderProbe) {
5170     int lrc = 0, grc = 0, gr2c = 0, extrc = 0, yrc = 0, erc = 0;
5171     struct grubConfig *lconfig, *gconfig, *yconfig, *econfig;
5172    
5173     const char *grub2config = grub2FindConfig(&grub2ConfigType);
5174     if (grub2config) {
5175     gconfig = readConfig(grub2config, &grub2ConfigType);
5176     if (!gconfig)
5177     gr2c = 1;
5178     else
5179     gr2c = checkForGrub2(gconfig);
5180     }
5181    
5182     const char *grubconfig = grubFindConfig(&grubConfigType);
5183     if (!access(grubconfig, F_OK)) {
5184     gconfig = readConfig(grubconfig, &grubConfigType);
5185     if (!gconfig)
5186     grc = 1;
5187     else
5188     grc = checkForGrub(gconfig);
5189     }
5190    
5191     if (!access(liloConfigType.defaultConfig, F_OK)) {
5192     lconfig =
5193        readConfig(liloConfigType.defaultConfig,
5194           &liloConfigType);
5195     if (!lconfig)
5196     lrc = 1;
5197     else
5198     lrc = checkForLilo(lconfig);
5199     }
5200    
5201     if (!access(eliloConfigType.defaultConfig, F_OK)) {
5202     econfig = readConfig(eliloConfigType.defaultConfig,
5203         &eliloConfigType);
5204     if (!econfig)
5205     erc = 1;
5206     else
5207     erc = checkForElilo(econfig);
5208     }
5209    
5210     if (!access(extlinuxConfigType.defaultConfig, F_OK)) {
5211     lconfig =
5212        readConfig(extlinuxConfigType.defaultConfig,
5213           &extlinuxConfigType);
5214     if (!lconfig)
5215     extrc = 1;
5216     else
5217     extrc = checkForExtLinux(lconfig);
5218     }
5219    
5220     if (!access(yabootConfigType.defaultConfig, F_OK)) {
5221     yconfig = readConfig(yabootConfigType.defaultConfig,
5222         &yabootConfigType);
5223     if (!yconfig)
5224     yrc = 1;
5225     else
5226     yrc = checkForYaboot(yconfig);
5227     }
5228    
5229     if (lrc == 1 || grc == 1 || gr2c == 1 || extrc == 1 || yrc == 1
5230        || erc == 1)
5231     return 1;
5232    
5233     if (lrc == 2)
5234     printf("lilo\n");
5235     if (gr2c == 2)
5236     printf("grub2\n");
5237     if (grc == 2)
5238     printf("grub\n");
5239     if (extrc == 2)
5240     printf("extlinux\n");
5241     if (yrc == 2)
5242     printf("yaboot\n");
5243     if (erc == 2)
5244     printf("elilo\n");
5245    
5246     return 0;
5247     }
5248    
5249     if (grubConfig == NULL) {
5250     printf("Could not find bootloader configuration file.\n");
5251     exit(1);
5252     }
5253    
5254     config = readConfig(grubConfig, cfi);
5255     if (!config)
5256     return 1;
5257    
5258     if (displayDefault) {
5259     struct singleLine *line;
5260     struct singleEntry *entry;
5261     char *rootspec;
5262    
5263     if (config->defaultImage == NO_DEFAULT_ENTRY)
5264     return 0;
5265     if (config->defaultImage == DEFAULT_SAVED_GRUB2 &&
5266        cfi->defaultIsSaved)
5267     config->defaultImage = FIRST_ENTRY_INDEX;
5268     entry = findEntryByIndex(config, config->defaultImage);
5269     if (!entry)
5270     return 0;
5271     if (!suitableImage(entry, bootPrefix, 0, flags))
5272     return 0;
5273    
5274     line =
5275        getLineByType(LT_KERNEL | LT_HYPER | LT_KERNEL_EFI |
5276      LT_KERNEL_16, entry->lines);
5277     if (!line)
5278     return 0;
5279    
5280     rootspec = getRootSpecifier(line->elements[1].item);
5281     printf("%s%s\n", bootPrefix, line->elements[1].item +
5282           ((rootspec != NULL) ? strlen(rootspec) : 0));
5283    
5284     return 0;
5285    
5286     } else if (displayDefaultTitle) {
5287     struct singleLine *line;
5288     struct singleEntry *entry;
5289    
5290     if (config->defaultImage == NO_DEFAULT_ENTRY)
5291     return 0;
5292     if (config->defaultImage == DEFAULT_SAVED_GRUB2 &&
5293        cfi->defaultIsSaved)
5294     config->defaultImage = FIRST_ENTRY_INDEX;
5295     entry = findEntryByIndex(config, config->defaultImage);
5296     if (!entry)
5297     return 0;
5298    
5299     if (!configureGrub2) {
5300     char *title;
5301     line = getLineByType(LT_TITLE, entry->lines);
5302     if (!line)
5303     return 0;
5304     title = extractTitle(config, line);
5305     if (!title)
5306     return 0;
5307     printf("%s\n", title);
5308     free(title);
5309     } else {
5310     char *title;
5311    
5312     dbgPrintf
5313        ("This is GRUB2, default title is embeded in menuentry\n");
5314     line = getLineByType(LT_MENUENTRY, entry->lines);
5315     if (!line)
5316     return 0;
5317     title = grub2ExtractTitle(line);
5318     if (title)
5319     printf("%s\n", title);
5320     }
5321     return 0;
5322    
5323     } else if (displayDefaultIndex) {
5324     if (config->defaultImage == NO_DEFAULT_ENTRY)
5325     return 0;
5326     if (config->defaultImage == DEFAULT_SAVED_GRUB2 &&
5327        cfi->defaultIsSaved)
5328     config->defaultImage = FIRST_ENTRY_INDEX;
5329     printf("%i\n", config->defaultImage);
5330     return 0;
5331    
5332     } else if (kernelInfo)
5333     return displayInfo(config, kernelInfo, bootPrefix);
5334    
5335     if (copyDefault) {
5336     template = findTemplate(config, bootPrefix, NULL, 0, flags);
5337     if (!template)
5338     return 1;
5339     }
5340    
5341     markRemovedImage(config, removeKernelPath, bootPrefix);
5342     markRemovedImage(config, removeMBKernel, bootPrefix);
5343     setDefaultImage(config, newKernelPath != NULL, defaultKernel,
5344     makeDefault, bootPrefix, flags, defaultIndex,
5345     newIndex);
5346     setFallbackImage(config, newKernelPath != NULL);
5347     if (updateImage(config, updateKernelPath, bootPrefix, newKernelArgs,
5348     removeArgs, newMBKernelArgs, removeMBKernelArgs))
5349     return 1;
5350     if (updateKernelPath && newKernelInitrd) {
5351     if (newMBKernel) {
5352     if (addMBInitrd(config, newMBKernel, updateKernelPath,
5353     bootPrefix, newKernelInitrd,
5354     newKernelTitle))
5355     return 1;
5356     } else {
5357     if (updateInitrd(config, updateKernelPath, bootPrefix,
5358     newKernelInitrd, newKernelTitle))
5359     return 1;
5360     }
5361     }
5362     if (addNewKernel(config, template, bootPrefix, newKernelPath,
5363     newKernelTitle, newKernelArgs, newKernelInitrd,
5364     (const char **)extraInitrds, extraInitrdCount,
5365     newMBKernel, newMBKernelArgs, newDevTreePath,
5366     newIndex))
5367     return 1;
5368    
5369     if (numEntries(config) == 0) {
5370     fprintf(stderr,
5371     _("grubby: doing this would leave no kernel entries. "
5372      "Not writing out new config.\n"));
5373     return 1;
5374     }
5375    
5376      if (!outputFile)   if (!outputFile)
5377   outputFile = grubConfig;   outputFile = (char *)grubConfig;
5378    
5379      return writeConfig(config, outputFile, bootPrefix);   return writeConfig(config, outputFile, bootPrefix);
5380  }  }

Legend:
Removed from v.1177  
changed lines
  Added in v.3026