cmd_elf.c 9.1 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331
  1. /*
  2. * Copyright (c) 2001 William L. Pitts
  3. * All rights reserved.
  4. *
  5. * Redistribution and use in source and binary forms are freely
  6. * permitted provided that the above copyright notice and this
  7. * paragraph and the following disclaimer are duplicated in all
  8. * such forms.
  9. *
  10. * This software is provided "AS IS" and without any express or
  11. * implied warranties, including, without limitation, the implied
  12. * warranties of merchantability and fitness for a particular
  13. * purpose.
  14. */
  15. #include <common.h>
  16. #include <command.h>
  17. #include <linux/ctype.h>
  18. #include <net.h>
  19. #include <elf.h>
  20. #if (CONFIG_COMMANDS & CFG_CMD_ELF)
  21. #ifndef MAX
  22. #define MAX(a,b) ((a) > (b) ? (a) : (b))
  23. #endif
  24. int valid_elf_image (unsigned long addr);
  25. unsigned long load_elf_image (unsigned long addr);
  26. /* ======================================================================
  27. * Interpreter command to boot an arbitrary ELF image from memory.
  28. * ====================================================================== */
  29. int do_bootelf (cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
  30. {
  31. unsigned long addr; /* Address of the ELF image */
  32. unsigned long rc; /* Return value from user code */
  33. /* -------------------------------------------------- */
  34. int rcode = 0;
  35. if (argc < 2)
  36. addr = load_addr;
  37. else
  38. addr = simple_strtoul (argv[1], NULL, 16);
  39. if (!valid_elf_image (addr))
  40. return 1;
  41. addr = load_elf_image (addr);
  42. printf ("## Starting application at 0x%08lx ...\n", addr);
  43. /*
  44. * QNX images require the data cache is disabled.
  45. * Data cache is already flushed, so just turn it off.
  46. */
  47. if (dcache_status ())
  48. dcache_disable ();
  49. /*
  50. * pass address parameter as argv[0] (aka command name),
  51. * and all remaining args
  52. */
  53. rc = ((ulong (*)(int, char *[])) addr) (--argc, &argv[1]);
  54. if (rc != 0)
  55. rcode = 1;
  56. printf ("## Application terminated, rc = 0x%lx\n", rc);
  57. return rcode;
  58. }
  59. /* ======================================================================
  60. * Interpreter command to boot VxWorks from a memory image. The image can
  61. * be either an ELF image or a raw binary. Will attempt to setup the
  62. * bootline and other parameters correctly.
  63. * ====================================================================== */
  64. int do_bootvx ( cmd_tbl_t *cmdtp, int flag, int argc, char *argv[])
  65. {
  66. #if defined(CONFIG_WALNUT) || \
  67. defined(CFG_VXWORKS_MAC_PTR)
  68. DECLARE_GLOBAL_DATA_PTR;
  69. #endif
  70. unsigned long addr; /* Address of image */
  71. unsigned long bootaddr; /* Address to put the bootline */
  72. char *bootline; /* Text of the bootline */
  73. char *tmp; /* Temporary char pointer */
  74. #if defined(CONFIG_4xx) || defined(CONFIG_IOP480)
  75. char build_buf[80]; /* Buffer for building the bootline */
  76. #endif
  77. /* -------------------------------------------------- */
  78. /*
  79. * Check the loadaddr variable.
  80. * If we don't know where the image is then we're done.
  81. */
  82. if ((tmp = getenv ("loadaddr")) != NULL) {
  83. addr = simple_strtoul (tmp, NULL, 16);
  84. } else {
  85. puts ("No load address provided\n");
  86. return 1;
  87. }
  88. #if (CONFIG_COMMANDS & CFG_CMD_NET)
  89. /* Check to see if we need to tftp the image ourselves before starting */
  90. if ((argc == 2) && (strcmp (argv[1], "tftp") == 0)) {
  91. if (NetLoop (TFTP) <= 0)
  92. return 1;
  93. printf ("Automatic boot of VxWorks image at address 0x%08lx ... \n", addr);
  94. }
  95. #endif
  96. /* This should equate
  97. * to NV_RAM_ADRS + NV_BOOT_OFFSET + NV_ENET_OFFSET
  98. * from the VxWorks BSP header files.
  99. * This will vary from board to board
  100. */
  101. #if defined(CONFIG_WALNUT)
  102. tmp = (char *) CFG_NVRAM_BASE_ADDR + 0x500;
  103. memcpy ((char *) tmp, (char *) &gd->bd->bi_enetaddr[3], 3);
  104. #elif defined(CFG_VXWORKS_MAC_PTR)
  105. tmp = (char *) CFG_VXWORKS_MAC_PTR;
  106. memcpy ((char *) tmp, (char *) &gd->bd->bi_enetaddr[0], 6);
  107. #else
  108. puts ("## Ethernet MAC address not copied to NV RAM\n");
  109. #endif
  110. /*
  111. * Use bootaddr to find the location in memory that VxWorks
  112. * will look for the bootline string. The default value for
  113. * PowerPC is LOCAL_MEM_LOCAL_ADRS + BOOT_LINE_OFFSET which
  114. * defaults to 0x4200
  115. */
  116. if ((tmp = getenv ("bootaddr")) == NULL)
  117. bootaddr = 0x4200;
  118. else
  119. bootaddr = simple_strtoul (tmp, NULL, 16);
  120. /*
  121. * Check to see if the bootline is defined in the 'bootargs'
  122. * parameter. If it is not defined, we may be able to
  123. * construct the info
  124. */
  125. if ((bootline = getenv ("bootargs")) != NULL) {
  126. memcpy ((void *) bootaddr, bootline, MAX(strlen(bootline), 255));
  127. flush_cache (bootaddr, MAX(strlen(bootline), 255));
  128. } else {
  129. #if defined(CONFIG_4xx)
  130. sprintf (build_buf, "ibmEmac(0,0)");
  131. if ((tmp = getenv ("hostname")) != NULL) {
  132. sprintf (&build_buf[strlen (build_buf - 1)],
  133. "host:%s ", tmp);
  134. } else {
  135. sprintf (&build_buf[strlen (build_buf - 1)],
  136. ": ");
  137. }
  138. if ((tmp = getenv ("ipaddr")) != NULL) {
  139. sprintf (&build_buf[strlen (build_buf - 1)],
  140. "e=%s ", tmp);
  141. }
  142. memcpy ((void *)bootaddr, build_buf, MAX(strlen(build_buf), 255));
  143. flush_cache (bootaddr, MAX(strlen(build_buf), 255));
  144. #elif defined(CONFIG_IOP480)
  145. sprintf (build_buf, "dc(0,0)");
  146. if ((tmp = getenv ("hostname")) != NULL) {
  147. sprintf (&build_buf[strlen (build_buf - 1)],
  148. "host:%s ", tmp);
  149. } else {
  150. sprintf (&build_buf[strlen (build_buf - 1)],
  151. ": ");
  152. }
  153. if ((tmp = getenv ("ipaddr")) != NULL) {
  154. sprintf (&build_buf[strlen (build_buf - 1)],
  155. "e=%s ", tmp);
  156. }
  157. memcpy ((void *) bootaddr, build_buf, MAX(strlen(build_buf), 255));
  158. flush_cache (bootaddr, MAX(strlen(build_buf), 255));
  159. #else
  160. /*
  161. * I'm not sure what the device should be for other
  162. * PPC flavors, the hostname and ipaddr should be ok
  163. * to just copy
  164. */
  165. puts ("No bootargs defined\n");
  166. return 1;
  167. #endif
  168. }
  169. /*
  170. * If the data at the load address is an elf image, then
  171. * treat it like an elf image. Otherwise, assume that it is a
  172. * binary image
  173. */
  174. if (valid_elf_image (addr)) {
  175. addr = load_elf_image (addr);
  176. } else {
  177. puts ("## Not an ELF image, assuming binary\n");
  178. /* leave addr as load_addr */
  179. }
  180. printf ("## Using bootline (@ 0x%lx): %s\n", bootaddr,
  181. (char *) bootaddr);
  182. printf ("## Starting vxWorks at 0x%08lx ...\n", addr);
  183. ((void (*)(void)) addr) ();
  184. puts ("## vxWorks terminated\n");
  185. return 1;
  186. }
  187. /* ======================================================================
  188. * Determine if a valid ELF image exists at the given memory location.
  189. * First looks at the ELF header magic field, the makes sure that it is
  190. * executable and makes sure that it is for a PowerPC.
  191. * ====================================================================== */
  192. int valid_elf_image (unsigned long addr)
  193. {
  194. Elf32_Ehdr *ehdr; /* Elf header structure pointer */
  195. /* -------------------------------------------------- */
  196. ehdr = (Elf32_Ehdr *) addr;
  197. if (!IS_ELF (*ehdr)) {
  198. printf ("## No elf image at address 0x%08lx\n", addr);
  199. return 0;
  200. }
  201. if (ehdr->e_type != ET_EXEC) {
  202. printf ("## Not a 32-bit elf image at address 0x%08lx\n",
  203. addr);
  204. return 0;
  205. }
  206. #if 0
  207. if (ehdr->e_machine != EM_PPC) {
  208. printf ("## Not a PowerPC elf image at address 0x%08lx\n",
  209. addr);
  210. return 0;
  211. }
  212. #endif
  213. return 1;
  214. }
  215. /* ======================================================================
  216. * A very simple elf loader, assumes the image is valid, returns the
  217. * entry point address.
  218. * ====================================================================== */
  219. unsigned long load_elf_image (unsigned long addr)
  220. {
  221. Elf32_Ehdr *ehdr; /* Elf header structure pointer */
  222. Elf32_Shdr *shdr; /* Section header structure pointer */
  223. unsigned char *strtab = 0; /* String table pointer */
  224. unsigned char *image; /* Binary image pointer */
  225. int i; /* Loop counter */
  226. /* -------------------------------------------------- */
  227. ehdr = (Elf32_Ehdr *) addr;
  228. /* Find the section header string table for output info */
  229. shdr = (Elf32_Shdr *) (addr + ehdr->e_shoff +
  230. (ehdr->e_shstrndx * sizeof (Elf32_Shdr)));
  231. if (shdr->sh_type == SHT_STRTAB)
  232. strtab = (unsigned char *) (addr + shdr->sh_offset);
  233. /* Load each appropriate section */
  234. for (i = 0; i < ehdr->e_shnum; ++i) {
  235. shdr = (Elf32_Shdr *) (addr + ehdr->e_shoff +
  236. (i * sizeof (Elf32_Shdr)));
  237. if (!(shdr->sh_flags & SHF_ALLOC)
  238. || shdr->sh_addr == 0 || shdr->sh_size == 0) {
  239. continue;
  240. }
  241. if (strtab) {
  242. printf ("%sing %s @ 0x%08lx (%ld bytes)\n",
  243. (shdr->sh_type == SHT_NOBITS) ?
  244. "Clear" : "Load",
  245. &strtab[shdr->sh_name],
  246. (unsigned long) shdr->sh_addr,
  247. (long) shdr->sh_size);
  248. }
  249. if (shdr->sh_type == SHT_NOBITS) {
  250. memset ((void *)shdr->sh_addr, 0, shdr->sh_size);
  251. } else {
  252. image = (unsigned char *) addr + shdr->sh_offset;
  253. memcpy ((void *) shdr->sh_addr,
  254. (const void *) image,
  255. shdr->sh_size);
  256. }
  257. flush_cache (shdr->sh_addr, shdr->sh_size);
  258. }
  259. return ehdr->e_entry;
  260. }
  261. /* ====================================================================== */
  262. U_BOOT_CMD(
  263. bootelf, 2, 0, do_bootelf,
  264. "bootelf - Boot from an ELF image in memory\n",
  265. " [address] - load address of ELF image.\n"
  266. );
  267. U_BOOT_CMD(
  268. bootvx, 2, 0, do_bootvx,
  269. "bootvx - Boot vxWorks from an ELF image\n",
  270. " [address] - load address of vxWorks ELF image.\n"
  271. );
  272. #endif /* CFG_CMD_ELF */