common/bootm_os.c

   1 /*
   2  * (C) Copyright 2000-2009
   3  * Wolfgang Denk, DENX Software Engineering, wd@denx.de.
   4  *
   5  * SPDX-License-Identifier:     GPL-2.0+
   6  */
   7
   8 #include <common.h>
   9 #include <bootm.h>
  10 #include <fdt_support.h>
  11 #include <libfdt.h>
  12 #include <malloc.h>
  13 #include <vxworks.h>
  14
  15 DECLARE_GLOBAL_DATA_PTR;
  16
  17 static int do_bootm_standalone(int flag, int argc, char * const argv[],
  18                                bootm_headers_t *images)
  19 {
  20         char *s;
  21         int (*appl)(int, char *const[]);
  22
  23         /* Don't start if "autostart" is set to "no" */
  24         s = getenv("autostart");
  25         if ((s != NULL) && !strcmp(s, "no")) {
  26                 setenv_hex("filesize", images->os.image_len);
  27                 return 0;
  28         }
  29         appl = (int (*)(int, char * const []))images->ep;
  30         appl(argc, argv);
  31         return 0;
  32 }
  33
  34 /*******************************************************************/
  35 /* OS booting routines */
  36 /*******************************************************************/
  37
  38 #if defined(CONFIG_BOOTM_NETBSD) || defined(CONFIG_BOOTM_PLAN9)
  39 static void copy_args(char *dest, int argc, char * const argv[], char delim)
  40 {
  41         int i;
  42
  43         for (i = 0; i < argc; i++) {
  44                 if (i > 0)
  45                         *dest++ = delim;
  46                 strcpy(dest, argv[i]);
  47                 dest += strlen(argv[i]);
  48         }
  49 }
  50 #endif
  51
  52 #ifdef CONFIG_BOOTM_NETBSD
  53 static int do_bootm_netbsd(int flag, int argc, char * const argv[],
  54                             bootm_headers_t *images)
  55 {
  56         void (*loader)(bd_t *, image_header_t *, char *, char *);
  57         image_header_t *os_hdr, *hdr;
  58         ulong kernel_data, kernel_len;
  59         char *consdev;
  60         char *cmdline;
  61
  62         if (flag != BOOTM_STATE_OS_GO)
  63                 return 0;
  64
  65 #if defined(CONFIG_FIT)
  66         if (!images->legacy_hdr_valid) {
  67                 fit_unsupported_reset("NetBSD");
  68                 return 1;
  69         }
  70 #endif
  71         hdr = images->legacy_hdr_os;
  72
  73         /*
  74          * Booting a (NetBSD) kernel image
  75          *
  76          * This process is pretty similar to a standalone application:
  77          * The (first part of an multi-) image must be a stage-2 loader,
  78          * which in turn is responsible for loading & invoking the actual
  79          * kernel.  The only differences are the parameters being passed:
  80          * besides the board info strucure, the loader expects a command
  81          * line, the name of the console device, and (optionally) the
  82          * address of the original image header.
  83          */
  84         os_hdr = NULL;
  85         if (image_check_type(&images->legacy_hdr_os_copy, IH_TYPE_MULTI)) {
  86                 image_multi_getimg(hdr, 1, &kernel_data, &kernel_len);
  87                 if (kernel_len)
  88                         os_hdr = hdr;
  89         }
  90
  91         consdev = "";
  92 #if   defined(CONFIG_8xx_CONS_SMC1)
  93         consdev = "smc1";
  94 #elif defined(CONFIG_8xx_CONS_SMC2)
  95         consdev = "smc2";
  96 #elif defined(CONFIG_8xx_CONS_SCC2)
  97         consdev = "scc2";
  98 #elif defined(CONFIG_8xx_CONS_SCC3)
  99         consdev = "scc3";
 100 #endif
 101
 102         if (argc > 0) {
 103                 ulong len;
 104                 int   i;
 105
 106                 for (i = 0, len = 0; i < argc; i += 1)
 107                         len += strlen(argv[i]) + 1;
 108                 cmdline = malloc(len);
 109                 copy_args(cmdline, argc, argv, ' ');
 110         } else {
 111                 cmdline = getenv("bootargs");
 112                 if (cmdline == NULL)
 113                         cmdline = "";
 114         }
 115
 116         loader = (void (*)(bd_t *, image_header_t *, char *, char *))images->ep;
 117
 118         printf("## Transferring control to NetBSD stage-2 loader (at address %08lx) ...\n",
 119                (ulong)loader);
 120
 121         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 122
 123         /*
 124          * NetBSD Stage-2 Loader Parameters:
 125          *   arg[0]: pointer to board info data
 126          *   arg[1]: image load address
 127          *   arg[2]: char pointer to the console device to use
 128          *   arg[3]: char pointer to the boot arguments
 129          */
 130         (*loader)(gd->bd, os_hdr, consdev, cmdline);
 131
 132         return 1;
 133 }
 134 #endif /* CONFIG_BOOTM_NETBSD*/
 135
 136 #ifdef CONFIG_LYNXKDI
 137 static int do_bootm_lynxkdi(int flag, int argc, char * const argv[],
 138                              bootm_headers_t *images)
 139 {
 140         image_header_t *hdr = &images->legacy_hdr_os_copy;
 141
 142         if (flag != BOOTM_STATE_OS_GO)
 143                 return 0;
 144
 145 #if defined(CONFIG_FIT)
 146         if (!images->legacy_hdr_valid) {
 147                 fit_unsupported_reset("Lynx");
 148                 return 1;
 149         }
 150 #endif
 151
 152         lynxkdi_boot((image_header_t *)hdr);
 153
 154         return 1;
 155 }
 156 #endif /* CONFIG_LYNXKDI */
 157
 158 #ifdef CONFIG_BOOTM_RTEMS
 159 static int do_bootm_rtems(int flag, int argc, char * const argv[],
 160                            bootm_headers_t *images)
 161 {
 162         void (*entry_point)(bd_t *);
 163
 164         if (flag != BOOTM_STATE_OS_GO)
 165                 return 0;
 166
 167 #if defined(CONFIG_FIT)
 168         if (!images->legacy_hdr_valid) {
 169                 fit_unsupported_reset("RTEMS");
 170                 return 1;
 171         }
 172 #endif
 173
 174         entry_point = (void (*)(bd_t *))images->ep;
 175
 176         printf("## Transferring control to RTEMS (at address %08lx) ...\n",
 177                (ulong)entry_point);
 178
 179         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 180
 181         /*
 182          * RTEMS Parameters:
 183          *   r3: ptr to board info data
 184          */
 185         (*entry_point)(gd->bd);
 186
 187         return 1;
 188 }
 189 #endif /* CONFIG_BOOTM_RTEMS */
 190
 191 #if defined(CONFIG_BOOTM_OSE)
 192 static int do_bootm_ose(int flag, int argc, char * const argv[],
 193                            bootm_headers_t *images)
 194 {
 195         void (*entry_point)(void);
 196
 197         if (flag != BOOTM_STATE_OS_GO)
 198                 return 0;
 199
 200 #if defined(CONFIG_FIT)
 201         if (!images->legacy_hdr_valid) {
 202                 fit_unsupported_reset("OSE");
 203                 return 1;
 204         }
 205 #endif
 206
 207         entry_point = (void (*)(void))images->ep;
 208
 209         printf("## Transferring control to OSE (at address %08lx) ...\n",
 210                (ulong)entry_point);
 211
 212         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 213
 214         /*
 215          * OSE Parameters:
 216          *   None
 217          */
 218         (*entry_point)();
 219
 220         return 1;
 221 }
 222 #endif /* CONFIG_BOOTM_OSE */
 223
 224 #if defined(CONFIG_BOOTM_PLAN9)
 225 static int do_bootm_plan9(int flag, int argc, char * const argv[],
 226                            bootm_headers_t *images)
 227 {
 228         void (*entry_point)(void);
 229         char *s;
 230
 231         if (flag != BOOTM_STATE_OS_GO)
 232                 return 0;
 233
 234 #if defined(CONFIG_FIT)
 235         if (!images->legacy_hdr_valid) {
 236                 fit_unsupported_reset("Plan 9");
 237                 return 1;
 238         }
 239 #endif
 240
 241         /* See README.plan9 */
 242         s = getenv("confaddr");
 243         if (s != NULL) {
 244                 char *confaddr = (char *)simple_strtoul(s, NULL, 16);
 245
 246                 if (argc > 0) {
 247                         copy_args(confaddr, argc, argv, '\n');
 248                 } else {
 249                         s = getenv("bootargs");
 250                         if (s != NULL)
 251                                 strcpy(confaddr, s);
 252                 }
 253         }
 254
 255         entry_point = (void (*)(void))images->ep;
 256
 257         printf("## Transferring control to Plan 9 (at address %08lx) ...\n",
 258                (ulong)entry_point);
 259
 260         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 261
 262         /*
 263          * Plan 9 Parameters:
 264          *   None
 265          */
 266         (*entry_point)();
 267
 268         return 1;
 269 }
 270 #endif /* CONFIG_BOOTM_PLAN9 */
 271
 272 #if defined(CONFIG_BOOTM_VXWORKS) && \
 273         (defined(CONFIG_PPC) || defined(CONFIG_ARM))
 274
 275 void do_bootvx_fdt(bootm_headers_t *images)
 276 {
 277 #if defined(CONFIG_OF_LIBFDT)
 278         int ret;
 279         char *bootline;
 280         ulong of_size = images->ft_len;
 281         char **of_flat_tree = &images->ft_addr;
 282         struct lmb *lmb = &images->lmb;
 283
 284         if (*of_flat_tree) {
 285                 boot_fdt_add_mem_rsv_regions(lmb, *of_flat_tree);
 286
 287                 ret = boot_relocate_fdt(lmb, of_flat_tree, &of_size);
 288                 if (ret)
 289                         return;
 290
 291                 fdt_fixup_ethernet(*of_flat_tree);
 292
 293                 ret = fdt_add_subnode(*of_flat_tree, 0, "chosen");
 294                 if ((ret >= 0 || ret == -FDT_ERR_EXISTS)) {
 295                         bootline = getenv("bootargs");
 296                         if (bootline) {
 297                                 ret = fdt_find_and_setprop(*of_flat_tree,
 298                                                 "/chosen", "bootargs",
 299                                                 bootline,
 300                                                 strlen(bootline) + 1, 1);
 301                                 if (ret < 0) {
 302                                         printf("## ERROR: %s : %s\n", __func__,
 303                                                fdt_strerror(ret));
 304                                         return;
 305                                 }
 306                         }
 307                 } else {
 308                         printf("## ERROR: %s : %s\n", __func__,
 309                                fdt_strerror(ret));
 310                         return;
 311                 }
 312         }
 313 #endif
 314
 315         boot_prep_vxworks(images);
 316
 317         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 318
 319 #if defined(CONFIG_OF_LIBFDT)
 320         printf("## Starting vxWorks at 0x%08lx, device tree at 0x%08lx ...\n",
 321                (ulong)images->ep, (ulong)*of_flat_tree);
 322 #else
 323         printf("## Starting vxWorks at 0x%08lx\n", (ulong)images->ep);
 324 #endif
 325
 326         boot_jump_vxworks(images);
 327
 328         puts("## vxWorks terminated\n");
 329 }
 330
 331 static int do_bootm_vxworks(int flag, int argc, char * const argv[],
 332                              bootm_headers_t *images)
 333 {
 334         if (flag != BOOTM_STATE_OS_GO)
 335                 return 0;
 336
 337 #if defined(CONFIG_FIT)
 338         if (!images->legacy_hdr_valid) {
 339                 fit_unsupported_reset("VxWorks");
 340                 return 1;
 341         }
 342 #endif
 343
 344         do_bootvx_fdt(images);
 345
 346         return 1;
 347 }
 348 #endif
 349
 350 #if defined(CONFIG_CMD_ELF)
 351 static int do_bootm_qnxelf(int flag, int argc, char * const argv[],
 352                             bootm_headers_t *images)
 353 {
 354         char *local_args[2];
 355         char str[16];
 356
 357         if (flag != BOOTM_STATE_OS_GO)
 358                 return 0;
 359
 360 #if defined(CONFIG_FIT)
 361         if (!images->legacy_hdr_valid) {
 362                 fit_unsupported_reset("QNX");
 363                 return 1;
 364         }
 365 #endif
 366
 367         sprintf(str, "%lx", images->ep); /* write entry-point into string */
 368         local_args[0] = argv[0];
 369         local_args[1] = str;    /* and provide it via the arguments */
 370         do_bootelf(NULL, 0, 2, local_args);
 371
 372         return 1;
 373 }
 374 #endif
 375
 376 #ifdef CONFIG_INTEGRITY
 377 static int do_bootm_integrity(int flag, int argc, char * const argv[],
 378                            bootm_headers_t *images)
 379 {
 380         void (*entry_point)(void);
 381
 382         if (flag != BOOTM_STATE_OS_GO)
 383                 return 0;
 384
 385 #if defined(CONFIG_FIT)
 386         if (!images->legacy_hdr_valid) {
 387                 fit_unsupported_reset("INTEGRITY");
 388                 return 1;
 389         }
 390 #endif
 391
 392         entry_point = (void (*)(void))images->ep;
 393
 394         printf("## Transferring control to INTEGRITY (at address %08lx) ...\n",
 395                (ulong)entry_point);
 396
 397         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 398
 399         /*
 400          * INTEGRITY Parameters:
 401          *   None
 402          */
 403         (*entry_point)();
 404
 405         return 1;
 406 }
 407 #endif
 408
 409 #ifdef CONFIG_BOOTM_OPENRTOS
 410 static int do_bootm_openrtos(int flag, int argc, char * const argv[],
 411                            bootm_headers_t *images)
 412 {
 413         void (*entry_point)(void);
 414
 415         if (flag != BOOTM_STATE_OS_GO)
 416                 return 0;
 417
 418         entry_point = (void (*)(void))images->ep;
 419
 420         printf("## Transferring control to OpenRTOS (at address %08lx) ...\n",
 421                 (ulong)entry_point);
 422
 423         bootstage_mark(BOOTSTAGE_ID_RUN_OS);
 424
 425         /*
 426          * OpenRTOS Parameters:
 427          *   None
 428          */
 429         (*entry_point)();
 430
 431         return 1;
 432 }
 433 #endif
 434
 435 static boot_os_fn *boot_os[] = {
 436         [IH_OS_U_BOOT] = do_bootm_standalone,
 437 #ifdef CONFIG_BOOTM_LINUX
 438         [IH_OS_LINUX] = do_bootm_linux,
 439 #endif
 440 #ifdef CONFIG_BOOTM_NETBSD
 441         [IH_OS_NETBSD] = do_bootm_netbsd,
 442 #endif
 443 #ifdef CONFIG_LYNXKDI
 444         [IH_OS_LYNXOS] = do_bootm_lynxkdi,
 445 #endif
 446 #ifdef CONFIG_BOOTM_RTEMS
 447         [IH_OS_RTEMS] = do_bootm_rtems,
 448 #endif
 449 #if defined(CONFIG_BOOTM_OSE)
 450         [IH_OS_OSE] = do_bootm_ose,
 451 #endif
 452 #if defined(CONFIG_BOOTM_PLAN9)
 453         [IH_OS_PLAN9] = do_bootm_plan9,
 454 #endif
 455 #if defined(CONFIG_BOOTM_VXWORKS) && \
 456         (defined(CONFIG_PPC) || defined(CONFIG_ARM))
 457         [IH_OS_VXWORKS] = do_bootm_vxworks,
 458 #endif
 459 #if defined(CONFIG_CMD_ELF)
 460         [IH_OS_QNX] = do_bootm_qnxelf,
 461 #endif
 462 #ifdef CONFIG_INTEGRITY
 463         [IH_OS_INTEGRITY] = do_bootm_integrity,
 464 #endif
 465 #ifdef CONFIG_BOOTM_OPENRTOS
 466         [IH_OS_OPENRTOS] = do_bootm_openrtos,
 467 #endif
 468 };
 469
 470 /* Allow for arch specific config before we boot */
 471 __weak void arch_preboot_os(void)
 472 {
 473         /* please define platform specific arch_preboot_os() */
 474 }
 475
 476 int boot_selected_os(int argc, char * const argv[], int state,
 477                      bootm_headers_t *images, boot_os_fn *boot_fn)
 478 {
 479         arch_preboot_os();
 480         boot_fn(state, argc, argv, images);
 481
 482         /* Stand-alone may return when 'autostart' is 'no' */
 483         if (images->os.type == IH_TYPE_STANDALONE ||
 484             IS_ENABLED(CONFIG_SANDBOX) ||
 485             state == BOOTM_STATE_OS_FAKE_GO) /* We expect to return */
 486                 return 0;
 487         bootstage_error(BOOTSTAGE_ID_BOOT_OS_RETURNED);
 488         debug("\n## Control returned to monitor - resetting...\n");
 489
 490         return BOOTM_ERR_RESET;
 491 }
 492
 493 boot_os_fn *bootm_os_get_boot_func(int os)
 494 {
 495 #ifdef CONFIG_NEEDS_MANUAL_RELOC
 496         static bool relocated;
 497
 498         if (!relocated) {
 499                 int i;
 500
 501                 /* relocate boot function table */
 502                 for (i = 0; i < ARRAY_SIZE(boot_os); i++)
 503                         if (boot_os[i] != NULL)
 504                                 boot_os[i] += gd->reloc_off;
 505
 506                 relocated = true;
 507         }
 508 #endif
 509         return boot_os[os];
 510 }