cmd_arc.c 8.4 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405
  1. // SPDX-License-Identifier: GPL-2.0+ OR BSD-3-Clause
  2. /*
  3. * Command for accessing Arcturus factory environment.
  4. *
  5. * Copyright 2013-2019 Arcturus Networks Inc.
  6. * https://www.arcturusnetworks.com/products/
  7. * by Oleksandr G Zhadan et al.
  8. *
  9. */
  10. #include <common.h>
  11. #include <cpu_func.h>
  12. #include <div64.h>
  13. #include <env.h>
  14. #include <flash.h>
  15. #include <malloc.h>
  16. #include <spi_flash.h>
  17. #include <mmc.h>
  18. #include <version.h>
  19. #include <asm/io.h>
  20. static ulong fwenv_addr[MAX_FWENV_ADDR];
  21. const char mystrerr[] = "ERROR: Failed to save factory info";
  22. static int ishwaddr(char *hwaddr)
  23. {
  24. if (strlen(hwaddr) == MAX_HWADDR_SIZE)
  25. if (hwaddr[2] == ':' &&
  26. hwaddr[5] == ':' &&
  27. hwaddr[8] == ':' &&
  28. hwaddr[11] == ':' &&
  29. hwaddr[14] == ':')
  30. return 0;
  31. return -1;
  32. }
  33. #if (FWENV_TYPE == FWENV_MMC)
  34. static char smac[29][18] __attribute__ ((aligned(0x200))); /* 1 MMC block is 512 bytes */
  35. int set_mmc_arc_product(int argc, char *const argv[])
  36. {
  37. struct mmc *mmc;
  38. u32 blk, cnt, n;
  39. int i, err = 1;
  40. void *addr;
  41. const u8 mmc_dev_num = CONFIG_SYS_MMC_ENV_DEV;
  42. mmc = find_mmc_device(mmc_dev_num);
  43. if (!mmc) {
  44. printf("No SD/MMC/eMMC card found\n");
  45. return 0;
  46. }
  47. if (mmc_init(mmc)) {
  48. printf("%s(%d) init failed\n", IS_SD(mmc) ? "SD" : "MMC",
  49. mmc_dev_num);
  50. return 0;
  51. }
  52. if (mmc_getwp(mmc) == 1) {
  53. printf("Error: card is write protected!\n");
  54. return CMD_RET_FAILURE;
  55. }
  56. /* Save factory defaults */
  57. addr = (void *)smac;
  58. cnt = 1; /* One 512 bytes block */
  59. for (i = 0; i < MAX_FWENV_ADDR; i++)
  60. if (fwenv_addr[i] != -1) {
  61. blk = fwenv_addr[i] / 512;
  62. n = blk_dwrite(mmc_get_blk_desc(mmc), blk, cnt, addr);
  63. if (n != cnt)
  64. printf("%s: %s [%d]\n", __func__, mystrerr, i);
  65. else
  66. err = 0;
  67. }
  68. if (err)
  69. return -2;
  70. return err;
  71. }
  72. static int read_mmc_arc_info(void)
  73. {
  74. struct mmc *mmc;
  75. u32 blk, cnt, n;
  76. int i;
  77. void *addr;
  78. const u8 mmc_dev_num = CONFIG_SYS_MMC_ENV_DEV;
  79. mmc = find_mmc_device(mmc_dev_num);
  80. if (!mmc) {
  81. printf("No SD/MMC/eMMC card found\n");
  82. return 0;
  83. }
  84. if (mmc_init(mmc)) {
  85. printf("%s(%d) init failed\n", IS_SD(mmc) ? "SD" : "MMC",
  86. mmc_dev_num);
  87. return 0;
  88. }
  89. addr = (void *)smac;
  90. cnt = 1; /* One 512 bytes block */
  91. for (i = 0; i < MAX_FWENV_ADDR; i++)
  92. if (fwenv_addr[i] != -1) {
  93. blk = fwenv_addr[i] / 512;
  94. n = blk_dread(mmc_get_blk_desc(mmc), blk, cnt, addr);
  95. flush_cache((ulong) addr, 512);
  96. if (n == cnt)
  97. return (i + 1);
  98. }
  99. return 0;
  100. }
  101. #endif
  102. #if (FWENV_TYPE == FWENV_SPI_FLASH)
  103. static struct spi_flash *flash;
  104. static char smac[4][18];
  105. int set_spi_arc_product(int argc, char *const argv[])
  106. {
  107. int i, err = 1;
  108. flash = spi_flash_probe(CONFIG_ENV_SPI_BUS, CONFIG_ENV_SPI_CS,
  109. CONFIG_ENV_SPI_MAX_HZ, CONFIG_ENV_SPI_MODE);
  110. if (!flash) {
  111. printf("Failed to initialize SPI flash at %u:%u\n",
  112. CONFIG_ENV_SPI_BUS, CONFIG_ENV_SPI_CS);
  113. return -1;
  114. }
  115. /* Save factory defaults */
  116. for (i = 0; i < MAX_FWENV_ADDR; i++)
  117. if (fwenv_addr[i] != -1)
  118. if (spi_flash_write
  119. (flash, fwenv_addr[i], sizeof(smac), smac))
  120. printf("%s: %s [%d]\n", __func__, mystrerr, i);
  121. else
  122. err = 0;
  123. if (err)
  124. return -2;
  125. return err;
  126. }
  127. static int read_spi_arc_info(void)
  128. {
  129. int i;
  130. flash = spi_flash_probe(CONFIG_ENV_SPI_BUS, CONFIG_ENV_SPI_CS,
  131. CONFIG_ENV_SPI_MAX_HZ, CONFIG_ENV_SPI_MODE);
  132. if (!flash) {
  133. printf("Failed to initialize SPI flash at %u:%u\n",
  134. CONFIG_ENV_SPI_BUS, CONFIG_ENV_SPI_CS);
  135. return 0;
  136. }
  137. for (i = 0; i < MAX_FWENV_ADDR; i++)
  138. if (fwenv_addr[i] != -1)
  139. if (!spi_flash_read
  140. (flash, fwenv_addr[i], sizeof(smac), smac))
  141. return (i + 1);
  142. return 0;
  143. }
  144. #endif
  145. #if (FWENV_TYPE == FWENV_NOR_FLASH)
  146. static char smac[4][18];
  147. int set_nor_arc_product(int argc, char *const argv[])
  148. {
  149. int i, err = 1;
  150. /* Save factory defaults */
  151. for (i = 0; i < MAX_FWENV_ADDR; i++)
  152. if (fwenv_addr[i] != -1) {
  153. ulong fwenv_end = fwenv_addr[i] + 4;
  154. flash_sect_roundb(&fwenv_end);
  155. flash_sect_protect(0, fwenv_addr[i], fwenv_end);
  156. if (flash_write
  157. ((char *)smac, fwenv_addr[i], sizeof(smac)))
  158. printf("%s: %s [%d]\n", __func__, mystrerr, i);
  159. else
  160. err = 0;
  161. flash_sect_protect(1, fwenv_addr[i], fwenv_end);
  162. }
  163. if (err)
  164. return -2;
  165. return err;
  166. }
  167. static int read_nor_arc_info(void)
  168. {
  169. int i;
  170. for (i = 0; i < MAX_FWENV_ADDR; i++)
  171. if (fwenv_addr[i] != -1) {
  172. memcpy(smac, (void *)fwenv_addr[i], sizeof(smac));
  173. return (i + 1);
  174. }
  175. return 0;
  176. }
  177. #endif
  178. int set_arc_product(int argc, char *const argv[])
  179. {
  180. if (argc != 5)
  181. return -1;
  182. /* Check serial number */
  183. if (strlen(argv[1]) != MAX_SERIAL_SIZE)
  184. return -1;
  185. /* Check HWaddrs */
  186. if (ishwaddr(argv[2]) || ishwaddr(argv[3]) || ishwaddr(argv[4]))
  187. return -1;
  188. strcpy(smac[0], argv[1]);
  189. strcpy(smac[1], argv[2]);
  190. strcpy(smac[2], argv[3]);
  191. strcpy(smac[3], argv[4]);
  192. #if (FWENV_TYPE == FWENV_NOR_FLASH)
  193. return set_nor_arc_product(argc, argv);
  194. #endif
  195. #if (FWENV_TYPE == FWENV_SPI_FLASH)
  196. return set_spi_arc_product(argc, argv);
  197. #endif
  198. #if (FWENV_TYPE == FWENV_MMC)
  199. return set_mmc_arc_product(argc, argv);
  200. #endif
  201. return -2;
  202. }
  203. static int read_arc_info(void)
  204. {
  205. #if (FWENV_TYPE == FWENV_NOR_FLASH)
  206. return read_nor_arc_info();
  207. #endif
  208. #if (FWENV_TYPE == FWENV_SPI_FLASH)
  209. return read_spi_arc_info();
  210. #endif
  211. #if (FWENV_TYPE == FWENV_MMC)
  212. return read_mmc_arc_info();
  213. #endif
  214. return 0;
  215. }
  216. static int do_get_arc_info(void)
  217. {
  218. int l = read_arc_info();
  219. char *oldserial = env_get("SERIAL");
  220. char *oldversion = env_get("VERSION");
  221. if (oldversion != NULL)
  222. if (strcmp(oldversion, U_BOOT_VERSION) != 0)
  223. oldversion = NULL;
  224. if (l == 0) {
  225. printf("%s: failed to read factory info\n", __func__);
  226. return -2;
  227. }
  228. printf("\rSERIAL: ");
  229. if (smac[0][0] == EMPY_CHAR) {
  230. printf("<not found>\n");
  231. } else {
  232. printf("%s\n", smac[0]);
  233. env_set("SERIAL", smac[0]);
  234. }
  235. if (strcmp(smac[1], "00:00:00:00:00:00") == 0) {
  236. env_set("ethaddr", NULL);
  237. env_set("eth1addr", NULL);
  238. env_set("eth2addr", NULL);
  239. goto done;
  240. }
  241. printf("HWADDR0: ");
  242. if (smac[1][0] == EMPY_CHAR) {
  243. printf("<not found>\n");
  244. } else {
  245. char *ret = env_get("ethaddr");
  246. if (ret == NULL) {
  247. env_set("ethaddr", smac[1]);
  248. printf("%s\n", smac[1]);
  249. } else if (strcmp(ret, __stringify(CONFIG_ETHADDR)) == 0) {
  250. env_set("ethaddr", smac[1]);
  251. printf("%s (factory)\n", smac[1]);
  252. } else {
  253. printf("%s\n", ret);
  254. }
  255. }
  256. if (strcmp(smac[2], "00:00:00:00:00:00") == 0) {
  257. env_set("eth1addr", NULL);
  258. env_set("eth2addr", NULL);
  259. goto done;
  260. }
  261. printf("HWADDR1: ");
  262. if (smac[2][0] == EMPY_CHAR) {
  263. printf("<not found>\n");
  264. } else {
  265. char *ret = env_get("eth1addr");
  266. if (ret == NULL) {
  267. env_set("ethaddr", smac[2]);
  268. printf("%s\n", smac[2]);
  269. } else if (strcmp(ret, __stringify(CONFIG_ETH1ADDR)) == 0) {
  270. env_set("eth1addr", smac[2]);
  271. printf("%s (factory)\n", smac[2]);
  272. } else {
  273. printf("%s\n", ret);
  274. }
  275. }
  276. if (strcmp(smac[3], "00:00:00:00:00:00") == 0) {
  277. env_set("eth2addr", NULL);
  278. goto done;
  279. }
  280. printf("HWADDR2: ");
  281. if (smac[3][0] == EMPY_CHAR) {
  282. printf("<not found>\n");
  283. } else {
  284. char *ret = env_get("eth2addr");
  285. if (ret == NULL) {
  286. env_set("ethaddr", smac[3]);
  287. printf("%s\n", smac[3]);
  288. } else if (strcmp(ret, __stringify(CONFIG_ETH2ADDR)) == 0) {
  289. env_set("eth2addr", smac[3]);
  290. printf("%s (factory)\n", smac[3]);
  291. } else {
  292. printf("%s\n", ret);
  293. }
  294. }
  295. done:
  296. if (oldserial == NULL || oldversion == NULL) {
  297. if (oldversion == NULL)
  298. env_set("VERSION", U_BOOT_VERSION);
  299. env_save();
  300. }
  301. return 0;
  302. }
  303. static int init_fwenv(void)
  304. {
  305. int i, ret = -1;
  306. fwenv_addr[0] = FWENV_ADDR1;
  307. fwenv_addr[1] = FWENV_ADDR2;
  308. fwenv_addr[2] = FWENV_ADDR3;
  309. fwenv_addr[3] = FWENV_ADDR4;
  310. for (i = 0; i < MAX_FWENV_ADDR; i++)
  311. if (fwenv_addr[i] != -1)
  312. ret = 0;
  313. if (ret)
  314. printf("%s: No firmfare info storage address is defined\n",
  315. __func__);
  316. return ret;
  317. }
  318. void get_arc_info(void)
  319. {
  320. if (!init_fwenv())
  321. do_get_arc_info();
  322. }
  323. static int do_arc_cmd(cmd_tbl_t * cmdtp, int flag, int argc, char *const argv[])
  324. {
  325. const char *cmd;
  326. int ret = -1;
  327. cmd = argv[1];
  328. --argc;
  329. ++argv;
  330. if (init_fwenv())
  331. return ret;
  332. if (strcmp(cmd, "product") == 0)
  333. ret = set_arc_product(argc, argv);
  334. else if (strcmp(cmd, "info") == 0)
  335. ret = do_get_arc_info();
  336. if (ret == -1)
  337. return CMD_RET_USAGE;
  338. return ret;
  339. }
  340. U_BOOT_CMD(arc, 6, 1, do_arc_cmd,
  341. "Arcturus product command sub-system",
  342. "product serial hwaddr0 hwaddr1 hwaddr2 - save Arcturus factory env\n"
  343. "info - show Arcturus factory env\n\n");