git.ozlabs.org Git - petitboot/blob - discover/pxe-parser.c

   1
   2 #if defined(HAVE_CONFIG_H)
   3 #include "config.h"
   4 #endif
   5 #include <stdlib.h>
   6 #include <string.h>
   7
   8 #include <talloc/talloc.h>
   9 #include <url/url.h>
  10 #include <log/log.h>
  11 #include <file/file.h>
  12 #include <i18n/i18n.h>
  13
  14 #include "parser.h"
  15 #include "parser-conf.h"
  16 #include "parser-utils.h"
  17 #include "resource.h"
  18 #include "paths.h"
  19 #include "event.h"
  20 #include "user-event.h"
  21 #include "network.h"
  22
  23 static const char *pxelinux_prefix = "pxelinux.cfg/";
  24
  25 static void pxe_conf_parse_cb(struct load_url_result *result, void *data);
  26
  27 struct pxe_parser_info {
  28         struct discover_boot_option     *opt;
  29         const char                      *default_name;
  30         char                            **pxe_conf_files;
  31         struct pb_url                   *pxe_base_url;
  32         int                             current;
  33 };
  34
  35 static void pxe_finish(struct conf_context *conf)
  36 {
  37         struct pxe_parser_info *info = conf->parser_info;
  38         if (info->opt)
  39                 discover_context_add_boot_option(conf->dc, info->opt);
  40 }
  41
  42 /* We need a slightly modified version of pb_url_join, to allow for the
  43  * pxelinux "::filename" syntax for absolute URLs
  44  */
  45 static struct pb_url *pxe_url_join(void *ctx, const struct pb_url *url,
  46                 const char *s)
  47 {
  48         struct pb_url *new_url;
  49         int len;
  50
  51         len = strlen(s);
  52
  53         if (len > 2 && s[0] == ':' && s[1] == ':') {
  54                 char *tmp;
  55
  56                 if (s[2] == '/') {
  57                         /* ::/path -> /path */
  58                         tmp = talloc_strdup(ctx, s+2);
  59                 } else {
  60                         /* ::path -> /path */
  61                         tmp = talloc_strdup(ctx, s+1);
  62                         tmp[0] = '/';
  63                 }
  64
  65                 new_url = pb_url_join(ctx, url, tmp);
  66
  67                 talloc_free(tmp);
  68
  69         } else {
  70                 const char *tmp;
  71                 /* strip leading slashes */
  72                 for (tmp = s; *tmp == '/'; tmp++)
  73                         ;
  74                 new_url = pb_url_join(ctx, url, tmp);
  75         }
  76
  77         return new_url;
  78 }
  79
  80 static void pxe_append_string(struct discover_boot_option *opt,
  81                 const char *str)
  82 {
  83         if (opt->option->boot_args)
  84                 opt->option->boot_args = talloc_asprintf_append(
  85                                 opt->option->boot_args, " %s", str);
  86         else
  87                 opt->option->boot_args = talloc_strdup(opt->option, str);
  88 }
  89
  90 static char *pxe_sysappend_mac(void *ctx, uint8_t *mac)
  91 {
  92         if (!mac)
  93                 return NULL;
  94
  95         return talloc_asprintf(ctx,
  96                 "BOOTIF=01-%02x-%02x-%02x-%02x-%02x-%02x",
  97                 mac[0], mac[1], mac[2], mac[3], mac[4], mac[5]);
  98 }
  99
 100 static void pxe_process_sysappend(struct discover_context *ctx,
 101                 struct discover_boot_option *opt,
 102                 unsigned long val)
 103 {
 104         struct event *event = ctx->event;
 105         char *str = NULL;
 106
 107         if (!event)
 108                 return;
 109
 110         if (val & 0x2) {
 111                 uint8_t *mac = find_mac_by_name(ctx, ctx->network,
 112                                         event->device);
 113                 str = pxe_sysappend_mac(ctx, mac);
 114                 if (str) {
 115                         pxe_append_string(opt, str);
 116                         talloc_free(str);
 117                 }
 118                 val &= ~0x2;
 119         }
 120
 121         if (val)
 122                 pb_log("pxe: unsupported features requested in "
 123                                 "ipappend/sysappend: 0x%04lx", val);
 124
 125 }
 126
 127 static void pxe_process_pair(struct conf_context *ctx,
 128                 const char *name, char *value)
 129 {
 130         struct pxe_parser_info *parser_info = ctx->parser_info;
 131         struct discover_boot_option *opt = parser_info->opt;
 132         struct pb_url *url;
 133
 134         /* quirk in the syslinux config format: initrd can be separated
 135          * by an '=' */
 136         if (!name && !strncasecmp(value, "initrd=", strlen("initrd="))) {
 137                 name = "initrd";
 138                 value += strlen("initrd=");
 139         }
 140
 141         if (!name)
 142                 return;
 143
 144         if (streq(name, "DEFAULT")) {
 145                 parser_info->default_name = talloc_strdup(parser_info, value);
 146                 return;
 147         }
 148
 149         if (streq(name, "LABEL")) {
 150                 if (opt)
 151                         pxe_finish(ctx);
 152
 153                 opt = discover_boot_option_create(ctx->dc, ctx->dc->device);
 154
 155                 opt->option->name = talloc_strdup(opt, value);
 156                 opt->option->id = talloc_asprintf(opt, "%s@%p",
 157                                 ctx->dc->device->device->id, opt);
 158
 159                 opt->option->is_default = parser_info->default_name &&
 160                                         streq(parser_info->default_name, value);
 161
 162                 parser_info->opt = opt;
 163                 return;
 164         }
 165
 166         /* all other parameters need an option */
 167         if (!opt)
 168                 return;
 169
 170         if (streq(name, "KERNEL")) {
 171                 url = pxe_url_join(ctx->dc, ctx->dc->conf_url, value);
 172                 opt->boot_image = create_url_resource(opt, url);
 173
 174                 char* args_sigfile_default = talloc_asprintf(opt,
 175                         "%s.cmdline.sig", value);
 176                 url = pxe_url_join(ctx->dc, ctx->dc->conf_url,
 177                         args_sigfile_default);
 178                 opt->args_sig_file = create_url_resource(opt, url);
 179                 talloc_free(args_sigfile_default);
 180
 181         } else if (streq(name, "INITRD")) {
 182                 url = pxe_url_join(ctx->dc, ctx->dc->conf_url, value);
 183                 opt->initrd = create_url_resource(opt, url);
 184
 185         } else if (streq(name, "APPEND")) {
 186                 char *str, *end;
 187
 188                 pxe_append_string(opt, value);
 189
 190                 str = strcasestr(value, "INITRD=");
 191                 if (str) {
 192                         str += strlen("INITRD=");
 193                         end = strchrnul(str, ' ');
 194                         *end = '\0';
 195
 196                         url = pxe_url_join(ctx->dc, ctx->dc->conf_url, str);
 197                         opt->initrd = create_url_resource(opt, url);
 198                 }
 199         } else if (streq(name, "SYSAPPEND") || streq(name, "IPAPPEND")) {
 200                 unsigned long type;
 201                 char *end;
 202
 203                 type = strtoul(value, &end, 10);
 204                 if (end != value && !(*end))
 205                         pxe_process_sysappend(ctx->dc, opt, type);
 206
 207         } else if (streq(name, "DTB") || streq(name, "FDT")) {
 208                 url = pxe_url_join(ctx->dc, ctx->dc->conf_url, value);
 209                 opt->dtb = create_url_resource(opt, url);
 210         }
 211
 212 }
 213
 214 static void pxe_load_next_filename(struct conf_context *conf)
 215 {
 216         struct pxe_parser_info *info = conf->parser_info;
 217         struct pb_url *url;
 218
 219         if (!info->pxe_conf_files)
 220                 return;
 221
 222         for (; info->pxe_conf_files[info->current]; info->current++) {
 223                 url = pb_url_join(conf->dc, info->pxe_base_url,
 224                                   info->pxe_conf_files[info->current]);
 225                 if (!url)
 226                         continue;
 227
 228                 if (load_url_async(conf, url, pxe_conf_parse_cb, conf))
 229                         break;
 230         }
 231
 232         return;
 233 }
 234
 235 /*
 236  * Callback for asynchronous loads from pxe_parse()
 237  * @param result Result of load_url_async()
 238  * @param data   Pointer to associated conf_context
 239  */
 240 static void pxe_conf_parse_cb(struct load_url_result *result, void *data)
 241 {
 242         struct conf_context *conf = data;
 243         struct device_handler *handler;
 244         struct status status = {0};
 245         struct pxe_parser_info *info;
 246         char *buf = NULL;
 247         int len, rc = 0;
 248
 249         if (!data)
 250                 return;
 251
 252         if (result && result->status == LOAD_OK)
 253                 rc = read_file(conf, result->local, &buf, &len);
 254         if (!result || result->status != LOAD_OK || rc) {
 255                 /* This load failed so try the next available filename */
 256                 info = conf->parser_info;
 257                 if (!info->pxe_conf_files)
 258                         return;
 259
 260                 info->current++;
 261                 pxe_load_next_filename(conf);
 262                 if (info->pxe_conf_files[info->current] == NULL) {
 263                         /* Nothing left to try */
 264                         goto out_clean;
 265                 }
 266                 return;
 267         }
 268
 269         /*
 270          * Parse the first successfully downloaded file. We only want to parse
 271          * the first because otherwise we could parse options from both a
 272          * machine-specific config and a 'fallback' default config
 273          */
 274
 275         conf_parse_buf(conf, buf, len);
 276
 277         /* We may be called well after the original caller of iterate_parsers(),
 278          * commit any new boot options ourselves */
 279         handler = talloc_parent(conf);
 280         device_handler_discover_context_commit(handler, conf->dc);
 281
 282         status.type = STATUS_INFO;
 283         /*
 284          * TRANSLATORS: the format specifier in this string in an IP address,
 285          * eg. 192.168.1.1
 286          */
 287         status.message = talloc_asprintf(conf, _("pxe: parsed config for %s"),
 288                                         conf->dc->conf_url->host);
 289         device_handler_status(handler, &status);
 290
 291         talloc_free(buf);
 292 out_clean:
 293         if (result->cleanup_local)
 294                 unlink(result->local);
 295         talloc_free(conf);
 296 }
 297
 298 /**
 299  * Return a new conf_context and increment the talloc reference count on
 300  * the discover_context struct.
 301  * @param  ctx  Parent talloc context
 302  * @param  orig Original discover_context
 303  * @return      Pointer to new conf_context
 304  */
 305 static struct conf_context *copy_context(void *ctx, struct discover_context *dc)
 306 {
 307         struct pxe_parser_info *info;
 308         struct conf_context *conf;
 309
 310         conf = talloc_zero(ctx, struct conf_context);
 311
 312         if (!conf)
 313                 return NULL;
 314
 315         conf->get_pair = conf_get_pair_space;
 316         conf->process_pair = pxe_process_pair;
 317         conf->finish = pxe_finish;
 318         info = talloc_zero(conf, struct pxe_parser_info);
 319         if (!info) {
 320                 talloc_free(conf);
 321                 return NULL;
 322         }
 323         conf->parser_info = info;
 324
 325         /*
 326          * The discover_context may be freed once pxe_parse() returns, but the
 327          * callback will still need it. Take a reference so that that it will
 328          * persist until the last callback completes.
 329          */
 330         conf->dc = talloc_reference(conf, dc);
 331
 332         return conf;
 333 }
 334
 335 static int pxe_parse(struct discover_context *dc)
 336 {
 337         struct pb_url *pxe_base_url;
 338         struct conf_context *conf = NULL;
 339         struct load_url_result *result;
 340         void *ctx = talloc_parent(dc);
 341         struct pxe_parser_info *info;
 342         char **pxe_conf_files;
 343         bool complete_url;
 344
 345         /* Expects dhcp event parameters to support network boot */
 346         if (!dc->event)
 347                 return -1;
 348
 349         dc->conf_url = user_event_parse_conf_url(dc, dc->event, &complete_url);
 350         if (!dc->conf_url)
 351                 return -1;
 352
 353         /*
 354          * Retrieving PXE configs over the network can take some time depending
 355          * on factors such as slow network, malformed paths, bad DNS, and
 356          * overzealous firewalls. Instead of blocking the discover server while
 357          * we wait for these, spawn an asynchronous job that will attempt to
 358          * retrieve each possible URL until it successfully finds one, and
 359          * parse and process the resulting file in a callback.
 360          */
 361         conf = copy_context(ctx, dc);
 362         if (!conf)
 363                 return -1;
 364
 365         if (complete_url) {
 366                 /* we have a complete URL; use this and we're done. */
 367                 result = load_url_async(conf->dc, conf->dc->conf_url,
 368                                         pxe_conf_parse_cb, conf);
 369                 if (!result) {
 370                         pb_log("load_url_async fails for %s\n",
 371                                         dc->conf_url->path);
 372                         goto out_conf;
 373                 }
 374         } else {
 375                 pxe_conf_files = user_event_parse_conf_filenames(dc, dc->event);
 376                 if (!pxe_conf_files)
 377                         goto out_conf;
 378
 379                 pxe_base_url = pb_url_join(dc, dc->conf_url, pxelinux_prefix);
 380                 if (!pxe_base_url)
 381                         goto out_pxe_conf;
 382
 383                 info = conf->parser_info;
 384                 info->pxe_conf_files = pxe_conf_files;
 385                 info->pxe_base_url = pxe_base_url;
 386
 387                 pxe_load_next_filename(conf);
 388         }
 389
 390         return 0;
 391
 392 out_pxe_conf:
 393         talloc_free(pxe_conf_files);
 394 out_conf:
 395         talloc_free(conf);
 396         return -1;
 397 }
 398
 399 static struct parser pxe_parser = {
 400         .name                   = "pxe",
 401         .parse                  = pxe_parse,
 402 };
 403
 404 register_parser(pxe_parser);