1 /*- 2 * Copyright (c) 2017 Netflix, Inc. 3 * All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer 10 * in this position and unchanged. 11 * 2. Redistributions in binary form must reproduce the above copyright 12 * notice, this list of conditions and the following disclaimer in the 13 * documentation and/or other materials provided with the distribution. 14 * 15 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 18 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 25 */ 26 27 #include <sys/cdefs.h> 28 __FBSDID("$FreeBSD$"); 29 30 #include <sys/stat.h> 31 #include <sys/vtoc.h> 32 #include <sys/param.h> 33 #include <assert.h> 34 #include <ctype.h> 35 #include <err.h> 36 #include <errno.h> 37 #include <fcntl.h> 38 #include <libgeom.h> 39 #include <paths.h> 40 #include <signal.h> 41 #include <stdint.h> 42 #include <stdio.h> 43 #include <stdlib.h> 44 #include <getopt.h> 45 #include <limits.h> 46 #include <inttypes.h> 47 #include <stdbool.h> 48 #include <string.h> 49 #include <strings.h> 50 #include <unistd.h> 51 #include <libgeom.h> 52 #include <geom/geom.h> 53 #include <geom/geom_ctl.h> 54 #include <geom/geom_int.h> 55 56 #include <efivar.h> 57 #include <efiutil.h> 58 #include <efichar.h> 59 #include <efivar-dp.h> 60 61 #ifndef LOAD_OPTION_ACTIVE 62 #define LOAD_OPTION_ACTIVE 0x00000001 63 #endif 64 65 #ifndef LOAD_OPTION_CATEGORY_BOOT 66 #define LOAD_OPTION_CATEGORY_BOOT 0x00000000 67 #endif 68 69 #define BAD_LENGTH ((size_t)-1) 70 71 typedef struct _bmgr_opts { 72 char *env; 73 char *loader; 74 char *label; 75 char *kernel; 76 char *name; 77 char *order; 78 int bootnum; 79 bool copy; 80 bool create; 81 bool delete; 82 bool delete_bootnext; 83 bool del_timeout; 84 bool dry_run; 85 bool once; 86 int cp_src; 87 bool set_active; 88 bool set_bootnext; 89 bool set_inactive; 90 bool set_timeout; 91 int timeout; 92 bool verbose; 93 } bmgr_opts_t; 94 95 static struct option lopts[] = { 96 {"activate", required_argument, NULL, 'a'}, 97 {"bootnext", required_argument, NULL, 'n'}, /* set bootnext */ 98 {"bootorder", required_argument, NULL, 'o'}, /* set order */ 99 {"copy", required_argument, NULL, 'C'}, /* Copy boot method */ 100 {"create", no_argument, NULL, 'c'}, 101 {"deactivate", required_argument, NULL, 'A'}, 102 {"del-timout", no_argument, NULL, 'T'}, 103 {"delete", required_argument, NULL, 'B'}, 104 {"delete-bootnext", required_argument, NULL, 'N'}, 105 {"device", required_argument, NULL, 'd'}, 106 {"dry-run", no_argument, NULL, 'D'}, 107 {"env", required_argument, NULL, 'e'}, 108 {"help", no_argument, NULL, 'h'}, 109 {"kernel", required_argument, NULL, 'k'}, 110 {"label", required_argument, NULL, 'L'}, 111 {"loader", required_argument, NULL, 'l'}, 112 {"once", no_argument, NULL, 'O'}, 113 {"partition", required_argument, NULL, 'p'}, 114 {"set-timeout", required_argument, NULL, 't'}, 115 {"verbose", no_argument, NULL, 'v'}, 116 { NULL, 0, NULL, 0} 117 }; 118 119 /* global efibootmgr opts */ 120 static bmgr_opts_t opts; 121 122 static LIST_HEAD(efivars_head, entry) efivars = 123 LIST_HEAD_INITIALIZER(efivars); 124 125 struct entry { 126 efi_guid_t guid; 127 uint32_t attrs; 128 uint8_t *data; 129 size_t size; 130 char *name; 131 char *label; 132 int idx; 133 int part; 134 135 LIST_ENTRY(entry) entries; 136 }; 137 138 #define MAX_DP_LEN 4096 139 #define MAX_LOADOPT_LEN 8192 140 141 142 static char * 143 mangle_loader(char *loader) 144 { 145 char *c; 146 147 for (c = loader; *c; c++) 148 if (*c == '/') 149 *c = '\\'; 150 151 return loader; 152 } 153 154 155 #define COMMON_ATTRS EFI_VARIABLE_NON_VOLATILE | \ 156 EFI_VARIABLE_BOOTSERVICE_ACCESS | \ 157 EFI_VARIABLE_RUNTIME_ACCESS 158 159 /* 160 * We use global guid, and common var attrs and 161 * find it better to just delete and re-create a var. 162 */ 163 static int 164 set_bootvar(const char *name, uint8_t *data, size_t size) 165 { 166 167 return efi_set_variable(EFI_GLOBAL_GUID, name, data, size, 168 COMMON_ATTRS); 169 } 170 171 172 #define USAGE \ 173 " [-aAnNB Bootvar] [-t timeout] [-T] [-o bootorder] [-O] [--verbose] [--help] \n\ 174 [-c -l loader [-k kernel ] [-L label] [--dry-run]]" 175 176 #define CREATE_USAGE \ 177 " efibootmgr -c -l loader [-k kernel] [-L label] [--dry-run]" 178 #define ORDER_USAGE \ 179 " efibootmgr -o bootvarnum1,bootvarnum2,..." 180 #define TIMEOUT_USAGE \ 181 " efibootmgr -t seconds" 182 #define DELETE_USAGE \ 183 " efibootmgr -B bootvarnum" 184 #define ACTIVE_USAGE \ 185 " efibootmgr [-a | -A] bootvarnum" 186 #define BOOTNEXT_USAGE \ 187 " efibootmgr [-n | -N] bootvarnum" 188 189 static void 190 parse_args(int argc, char *argv[]) 191 { 192 int ch; 193 194 while ((ch = getopt_long(argc, argv, "A:a:B:C:cDe:hk:L:l:Nn:Oo:Tt:v", 195 lopts, NULL)) != -1) { 196 switch (ch) { 197 case 'A': 198 opts.set_inactive = true; 199 opts.bootnum = strtoul(optarg, NULL, 16); 200 break; 201 case 'a': 202 opts.set_active = true; 203 opts.bootnum = strtoul(optarg, NULL, 16); 204 break; 205 case 'B': 206 opts.delete = true; 207 opts.bootnum = strtoul(optarg, NULL, 16); 208 break; 209 case 'C': 210 opts.copy = true; 211 opts.cp_src = strtoul(optarg, NULL, 16); 212 case 'c': 213 opts.create = true; 214 break; 215 case 'D': /* should be remove dups XXX */ 216 opts.dry_run = true; 217 break; 218 case 'e': 219 free(opts.env); 220 opts.env = strdup(optarg); 221 break; 222 case 'h': 223 default: 224 errx(1, "%s", USAGE); 225 break; 226 case 'k': 227 free(opts.kernel); 228 opts.kernel = strdup(optarg); 229 break; 230 case 'L': 231 free(opts.label); 232 opts.label = strdup(optarg); 233 break; 234 case 'l': 235 free(opts.loader); 236 opts.loader = strdup(optarg); 237 opts.loader = mangle_loader(opts.loader); 238 break; 239 case 'N': 240 opts.delete_bootnext = true; 241 break; 242 case 'n': 243 opts.set_bootnext = true; 244 opts.bootnum = strtoul(optarg, NULL, 16); 245 break; 246 case 'O': 247 opts.once = true; 248 break; 249 case 'o': 250 free(opts.order); 251 opts.order = strdup(optarg); 252 break; 253 case 'T': 254 opts.del_timeout = true; 255 break; 256 case 't': 257 opts.set_timeout = true; 258 opts.timeout = strtoul(optarg, NULL, 10); 259 break; 260 case 'v': 261 opts.verbose = true; 262 break; 263 } 264 } 265 if (opts.create) { 266 if (!opts.loader) 267 errx(1, "%s",CREATE_USAGE); 268 return; 269 } 270 if (opts.set_bootnext && !(opts.bootnum)) 271 errx(1, "%s", BOOTNEXT_USAGE); 272 273 if ((opts.set_active || opts.set_inactive) && !(opts.bootnum)) 274 errx(1, "%s", ACTIVE_USAGE); 275 276 if (opts.order && !(opts.order)) 277 errx(1, "%s", ORDER_USAGE); 278 } 279 280 281 static void 282 print_order(void) 283 { 284 uint32_t attrs; 285 uint8_t *data; 286 size_t size, i; 287 288 if (efi_get_variable(EFI_GLOBAL_GUID, "BootOrder", &data, &size, &attrs) < 0) { 289 printf("BootOrder : Couldn't get value for BootOrder\n"); 290 return; 291 } 292 293 if (size % 2 == 1) 294 errx(1, "Bad BootOrder variable: odd length"); 295 296 printf("BootOrder : "); 297 for (i = 0; i < size; i += 2) 298 printf("%04x%s", le16dec(data + i), i == size - 2 ? "\n" : ", "); 299 } 300 301 302 static void 303 read_vars(void) 304 { 305 306 efi_guid_t *guid; 307 char *next_name = NULL; 308 int ret = 0; 309 310 struct entry *nent; 311 312 LIST_INIT(&efivars); 313 while ((ret = efi_get_next_variable_name(&guid, &next_name)) > 0) { 314 /* 315 * Only pay attention to EFI:BootXXXX variables to get the list. 316 */ 317 if (efi_guid_cmp(guid, &EFI_GLOBAL_GUID) != 0 || 318 strlen(next_name) != 8 || 319 strncmp(next_name, "Boot", 4) != 0 || 320 !isxdigit(next_name[4]) || 321 !isxdigit(next_name[5]) || 322 !isxdigit(next_name[6]) || 323 !isxdigit(next_name[7])) 324 continue; 325 nent = malloc(sizeof(struct entry)); 326 nent->name = strdup(next_name); 327 328 ret = efi_get_variable(*guid, next_name, &nent->data, 329 &nent->size, &nent->attrs); 330 if (ret < 0) 331 err(1, "efi_get_variable"); 332 nent->guid = *guid; 333 nent->idx = strtoul(&next_name[4], NULL, 16); 334 LIST_INSERT_HEAD(&efivars, nent, entries); 335 } 336 } 337 338 339 static void 340 set_boot_order(char *order) 341 { 342 uint16_t *new_data; 343 size_t size; 344 char *next, *cp; 345 int cnt; 346 int i; 347 348 cp = order; 349 cnt = 1; 350 while (*cp) { 351 if (*cp++ == ',') 352 cnt++; 353 } 354 size = sizeof(uint16_t) * cnt; 355 new_data = malloc(size); 356 357 i = 0; 358 cp = strdup(order); 359 while ((next = strsep(&cp, ",")) != NULL) { 360 new_data[i] = strtoul(next, NULL, 16); 361 if (new_data[i] == 0 && errno == EINVAL) { 362 warnx("can't parse %s as a numb", next); 363 errx(1, "%s", ORDER_USAGE); 364 } 365 i++; 366 } 367 free(cp); 368 if (set_bootvar("BootOrder", (uint8_t*)new_data, size) < 0) 369 err(1, "Unabke to set BootOrder to %s", order); 370 free(new_data); 371 } 372 373 static void 374 handle_activity(int bootnum, bool active) 375 { 376 uint32_t attrs, load_attrs; 377 uint8_t *data; 378 size_t size; 379 char *name; 380 381 asprintf(&name, "%s%04X", "Boot", bootnum); 382 if (name == NULL) 383 err(1, "asprintf"); 384 if (efi_get_variable(EFI_GLOBAL_GUID, name, &data, &size, &attrs) < 0) 385 err(1, "No such bootvar %s\n", name); 386 387 load_attrs = le32dec(data); 388 389 if (active) 390 load_attrs |= LOAD_OPTION_ACTIVE; 391 else 392 load_attrs &= ~LOAD_OPTION_ACTIVE; 393 394 le32enc(data, load_attrs); 395 396 if (set_bootvar(name, data, size) < 0) 397 err(1, "handle activity efi_set_variable"); 398 } 399 400 401 /* 402 * add boot var to boot order. 403 * called by create boot var. There is no option 404 * to add one independent of create. 405 * 406 * Note: we currently don't support where it goes 407 * so it goes on the front, inactive. 408 * use -o 2,3,7 etc to affect order, -a to activate. 409 */ 410 static void 411 add_to_boot_order(char *bootvar) 412 { 413 size_t size; 414 uint32_t attrs; 415 uint16_t val; 416 uint8_t *data, *new; 417 418 val = strtoul(&bootvar[4], NULL, 16); 419 420 if (efi_get_variable(EFI_GLOBAL_GUID, "BootOrder", &data, &size, &attrs) < 0) { 421 if (errno == ENOENT) { /* create it and set this bootvar to active */ 422 size = 0; 423 data = NULL; 424 } else 425 err(1, "efi_get_variable BootOrder"); 426 } 427 428 /* 429 * We have BootOrder with the current order 430 * so grow the array by one, add the value 431 * and write the new variable value. 432 */ 433 size += sizeof(uint16_t); 434 new = malloc(size); 435 if (!new) 436 err(1, "malloc"); 437 438 le16enc(new, val); 439 if (size > sizeof(uint16_t)) 440 memcpy(new + sizeof(uint16_t), data, size - sizeof(uint16_t)); 441 442 if (set_bootvar("BootOrder", new, size) < 0) 443 err(1, "set_bootvar"); 444 free(new); 445 } 446 447 448 static void 449 remove_from_order(uint16_t bootnum) 450 { 451 uint32_t attrs; 452 size_t size, i, j; 453 uint8_t *new, *data; 454 455 if (efi_get_variable(EFI_GLOBAL_GUID, "BootOrder", &data, &size, &attrs) < 0) 456 return; 457 458 new = malloc(size); 459 if (new == NULL) 460 err(1, "malloc"); 461 462 for (j = i = 0; i < size; i += sizeof(uint16_t)) { 463 if (le16dec(data + i) == bootnum) 464 continue; 465 memcpy(new + j, data + i, sizeof(uint16_t)); 466 j += sizeof(uint16_t); 467 } 468 if (i == j) 469 warnx("Boot variable %04x not in BootOrder", bootnum); 470 else if (set_bootvar("BootOrder", new, j) < 0) 471 err(1, "Unable to update BootOrder with new value"); 472 free(new); 473 } 474 475 476 static void 477 delete_bootvar(int bootnum) 478 { 479 char *name; 480 int defer = 0; 481 482 /* 483 * Try to delete the boot variable and remocve it 484 * from the boot order. We always do both actions 485 * to make it easy to clean up from oopses. 486 */ 487 if (bootnum < 0 || bootnum > 0xffff) 488 errx(1, "Bad boot variable %#x", bootnum); 489 asprintf(&name, "%s%04X", "Boot", bootnum); 490 if (name == NULL) 491 err(1, "asprintf"); 492 printf("Removing boot variable '%s'\n", name); 493 if (efi_del_variable(EFI_GLOBAL_GUID, name) < 0) { 494 defer = 1; 495 warn("cannot delete variable %s", name); 496 } 497 printf("Removing 0x%x from BootOrder\n", bootnum); 498 remove_from_order(bootnum); 499 free(name); 500 if (defer) 501 exit(defer); 502 } 503 504 505 static void 506 del_bootnext(void) 507 { 508 509 if (efi_del_variable(EFI_GLOBAL_GUID, "BootNext") < 0) 510 err(1, "efi_del_variable"); 511 } 512 513 static void 514 handle_bootnext(uint16_t bootnum) 515 { 516 uint16_t num; 517 518 le16enc(&num, bootnum); 519 if (set_bootvar("BootNext", (uint8_t*)&bootnum, sizeof(uint16_t)) < 0) 520 err(1, "set_bootvar"); 521 } 522 523 524 static int 525 compare(const void *a, const void *b) 526 { 527 uint16_t c; 528 uint16_t d; 529 530 memcpy(&c, a, sizeof(uint16_t)); 531 memcpy(&d, b, sizeof(uint16_t)); 532 533 if (c < d) 534 return -1; 535 if (c == d) 536 return 0; 537 return 1; 538 } 539 540 static char * 541 make_next_boot_var_name(void) 542 { 543 struct entry *v; 544 uint16_t *vals, next_free = 0; 545 char *name; 546 int cnt = 0; 547 int i; 548 549 LIST_FOREACH(v, &efivars, entries) { 550 cnt++; 551 } 552 553 vals = malloc(sizeof(uint16_t) * cnt); 554 if (!vals) 555 return NULL; 556 557 i = 0; 558 LIST_FOREACH(v, &efivars, entries) { 559 vals[i++] = v->idx; 560 } 561 qsort(vals, cnt, sizeof(uint16_t), compare); 562 /* if the hole is at the beginning, just return zero */ 563 if (vals[0] > 0) { 564 next_free = 0; 565 } else { 566 /* now just run the list looking for the first hole */ 567 for (i = 0; i < cnt - 1 && next_free == 0; i++) 568 if (vals[i] + 1 != vals[i + 1]) 569 next_free = vals[i] + 1; 570 if (next_free == 0) 571 next_free = vals[cnt - 1] + 1; 572 /* In theory we could have used all 65k slots -- what to do? */ 573 } 574 free(vals); 575 576 asprintf(&name, "%s%04X", "Boot", next_free); 577 if (name == NULL) 578 err(1, "asprintf"); 579 return name; 580 } 581 582 583 static size_t 584 create_loadopt(uint8_t *buf, size_t bufmax, uint32_t attributes, efidp dp, size_t dp_size, 585 const char *description, const uint8_t *optional_data, size_t optional_data_size) 586 { 587 efi_char *bbuf = NULL; 588 uint8_t *pos = buf; 589 size_t desc_len = 0; 590 size_t len; 591 592 if (optional_data == NULL && optional_data_size != 0) 593 return BAD_LENGTH; 594 if (dp == NULL && dp_size != 0) 595 return BAD_LENGTH; 596 597 /* 598 * Compute the length to make sure the passed in buffer is long enough. 599 */ 600 utf8_to_ucs2(description, &bbuf, &desc_len); 601 len = sizeof(uint32_t) + sizeof(uint16_t) + desc_len + dp_size + optional_data_size; 602 if (len > bufmax) { 603 free(bbuf); 604 return BAD_LENGTH; 605 } 606 607 le32enc(pos, attributes); 608 pos += sizeof (attributes); 609 610 le16enc(pos, dp_size); 611 pos += sizeof (uint16_t); 612 613 memcpy(pos, bbuf, desc_len); /* NB:desc_len includes strailing NUL */ 614 pos += desc_len; 615 free(bbuf); 616 617 memcpy(pos, dp, dp_size); 618 pos += dp_size; 619 620 if (optional_data && optional_data_size > 0) { 621 memcpy(pos, optional_data, optional_data_size); 622 pos += optional_data_size; 623 } 624 625 return pos - buf; 626 } 627 628 629 static int 630 make_boot_var(const char *label, const char *loader, const char *kernel, const char *env, bool dry_run) 631 { 632 struct entry *new_ent; 633 uint32_t load_attrs = 0; 634 uint8_t *load_opt_buf; 635 size_t lopt_size, llen, klen; 636 efidp dp, loaderdp, kerneldp; 637 char *bootvar = NULL; 638 int ret; 639 640 assert(label != NULL); 641 642 bootvar = make_next_boot_var_name(); 643 if (bootvar == NULL) 644 err(1, "bootvar creation"); 645 if (loader == NULL) 646 errx(1, "Must specify boot loader"); 647 if (efivar_unix_path_to_device_path(loader, &loaderdp) != 0) 648 err(1, "Cannot translate unix loader path '%s' to UEFI", loader); 649 if (kernel != NULL) { 650 if (efivar_unix_path_to_device_path(kernel, &kerneldp) != 0) 651 err(1, "Cannot translate unix kernel path '%s' to UEFI", kernel); 652 } else { 653 kerneldp = NULL; 654 } 655 llen = efidp_size(loaderdp); 656 if (llen > MAX_DP_LEN) 657 errx(1, "Loader path too long."); 658 klen = efidp_size(kerneldp); 659 if (klen > MAX_DP_LEN) 660 errx(1, "Kernel path too long."); 661 dp = malloc(llen + klen); 662 if (dp == NULL) 663 errx(1, "Can't allocate memory for new device paths"); 664 memcpy(dp, loaderdp, llen); 665 if (kerneldp != NULL) 666 memcpy((char *)dp + llen, kerneldp, klen); 667 668 /* don't make the new bootvar active by default, use the -a option later */ 669 load_attrs = LOAD_OPTION_CATEGORY_BOOT; 670 load_opt_buf = malloc(MAX_LOADOPT_LEN); 671 if (load_opt_buf == NULL) 672 err(1, "malloc"); 673 674 lopt_size = create_loadopt(load_opt_buf, MAX_LOADOPT_LEN, load_attrs, 675 dp, llen + klen, label, env, env ? strlen(env) + 1 : 0); 676 if (lopt_size == BAD_LENGTH) 677 errx(1, "Can't crate loadopt"); 678 679 ret = 0; 680 if (!dry_run) { 681 ret = efi_set_variable(EFI_GLOBAL_GUID, bootvar, 682 (uint8_t*)load_opt_buf, lopt_size, COMMON_ATTRS); 683 } 684 685 if (ret) 686 err(1, "efi_set_variable"); 687 688 add_to_boot_order(bootvar); /* first, still not active */ 689 new_ent = malloc(sizeof(struct entry)); 690 if (new_ent == NULL) 691 err(1, "malloc"); 692 memset(new_ent, 0, sizeof(struct entry)); 693 new_ent->name = bootvar; 694 new_ent->guid = EFI_GLOBAL_GUID; 695 LIST_INSERT_HEAD(&efivars, new_ent, entries); 696 free(load_opt_buf); 697 free(dp); 698 699 return 0; 700 } 701 702 703 static void 704 print_loadopt_str(uint8_t *data, size_t datalen) 705 { 706 char *dev, *relpath, *abspath; 707 uint32_t attr; 708 uint16_t fplen; 709 efi_char *descr; 710 uint8_t *ep = data + datalen; 711 uint8_t *walker = data; 712 efidp dp, edp; 713 char buf[1024]; 714 int len; 715 int rv; 716 int indent; 717 718 if (datalen < sizeof(attr) + sizeof(fplen) + sizeof(efi_char)) 719 return; 720 // First 4 bytes are attribute flags 721 attr = le32dec(walker); 722 walker += sizeof(attr); 723 // Next two bytes are length of the file paths 724 fplen = le16dec(walker); 725 walker += sizeof(fplen); 726 // Next we have a 0 terminated UCS2 string that we know to be aligned 727 descr = (efi_char *)(intptr_t)(void *)walker; 728 len = ucs2len(descr); // XXX need to sanity check that len < (datalen - (ep - walker) / 2) 729 walker += (len + 1) * sizeof(efi_char); 730 if (walker > ep) 731 return; 732 // Now we have fplen bytes worth of file path stuff 733 dp = (efidp)walker; 734 walker += fplen; 735 if (walker > ep) 736 return; 737 edp = (efidp)walker; 738 /* 739 * Everything left is the binary option args 740 * opt = walker; 741 * optlen = ep - walker; 742 */ 743 indent = 1; 744 while (dp < edp) { 745 efidp_format_device_path(buf, sizeof(buf), dp, 746 (intptr_t)(void *)edp - (intptr_t)(void *)dp); 747 printf("%*s%s\n", indent, "", buf); 748 indent = 10 + len + 1; 749 rv = efivar_device_path_to_unix_path(dp, &dev, &relpath, &abspath); 750 if (rv == 0) { 751 printf("%*s%s:%s %s\n", indent + 4, "", dev, relpath, abspath); 752 free(dev); 753 free(relpath); 754 free(abspath); 755 } 756 dp = (efidp)((char *)dp + efidp_size(dp)); 757 } 758 } 759 760 static char * 761 get_descr(uint8_t *data) 762 { 763 uint8_t *pos = data; 764 efi_char *desc; 765 int len; 766 char *buf; 767 int i = 0; 768 769 pos += sizeof(uint32_t) + sizeof(uint16_t); 770 desc = (efi_char*)(intptr_t)(void *)pos; 771 len = ucs2len(desc); 772 buf = malloc(len + 1); 773 memset(buf, 0, len + 1); 774 while (desc[i]) { 775 buf[i] = desc[i]; 776 i++; 777 } 778 return (char*)buf; 779 } 780 781 782 /* Cmd epilogue, or just the default with no args. 783 * The order is [bootnext] bootcurrent, timeout, order, and the bootvars [-v] 784 */ 785 static int 786 print_boot_vars(bool verbose) 787 { 788 /* 789 * just read and print the current values 790 * as a command epilogue 791 */ 792 struct entry *v; 793 uint8_t *data; 794 char *d; 795 size_t size; 796 uint32_t attrs, load_attrs; 797 int ret; 798 799 ret = efi_get_variable(EFI_GLOBAL_GUID, "BootNext", &data, &size, &attrs); 800 if (ret > 0) { 801 printf("BootNext : %04x\n", le16dec(data)); 802 } 803 804 ret = efi_get_variable(EFI_GLOBAL_GUID, "BootCurrent", &data, &size,&attrs); 805 printf("BootCurrent: %04x\n", le16dec(data)); 806 807 ret = efi_get_variable(EFI_GLOBAL_GUID, "Timeout", &data, &size, &attrs); 808 if (ret > 0) { 809 printf("Timeout : %d seconds\n", le16dec(data)); 810 } 811 print_order(); 812 813 /* now we want to fetch 'em all fresh again 814 * which possibly includes a newly created bootvar 815 */ 816 LIST_FOREACH(v, &efivars, entries) { 817 attrs = 0; 818 ret = efi_get_variable(EFI_GLOBAL_GUID, v->name, &data, 819 &size, &attrs); 820 if (ret < 0) 821 continue; /* we must have deleted it */ 822 load_attrs = le32dec(data); 823 d = get_descr(data); 824 printf("%s%c %s", v->name, 825 ((load_attrs & LOAD_OPTION_ACTIVE) ? '*': ' '), d); 826 free(d); 827 if (verbose) 828 print_loadopt_str(data, size); 829 else 830 printf("\n"); 831 } 832 return 0; 833 } 834 835 static void 836 delete_timeout(void) 837 { 838 839 efi_del_variable(EFI_GLOBAL_GUID,"Timeout"); 840 } 841 842 static void 843 handle_timeout(int to) 844 { 845 uint16_t timeout; 846 847 le16enc(&timeout, to); 848 if (set_bootvar("Timeout", (uint8_t *)&timeout, sizeof(timeout)) < 0) 849 errx(1, "Can't set Timeout for booting."); 850 } 851 852 int 853 main(int argc, char *argv[]) 854 { 855 856 if (!efi_variables_supported()) 857 errx(1, "efi variables not supported on this system. root? kldload efirt?"); 858 859 memset(&opts, 0, sizeof (bmgr_opts_t)); 860 parse_args(argc, argv); 861 read_vars(); 862 863 if (opts.create) 864 /* 865 * side effect, adds to boot order, but not yet active. 866 */ 867 make_boot_var(opts.label ? opts.label : "", 868 opts.loader, opts.kernel, opts.env, opts.dry_run); 869 else if (opts.set_active || opts.set_inactive ) 870 handle_activity(opts.bootnum, opts.set_active); 871 else if (opts.order != NULL) 872 set_boot_order(opts.order); /* create a new bootorder with opts.order */ 873 else if (opts.set_bootnext) 874 handle_bootnext(opts.bootnum); 875 else if (opts.delete_bootnext) 876 del_bootnext(); 877 else if (opts.delete) 878 delete_bootvar(opts.bootnum); 879 else if (opts.del_timeout) 880 delete_timeout(); 881 else if (opts.set_timeout) 882 handle_timeout(opts.timeout); 883 884 print_boot_vars(opts.verbose); 885 } 886