factoryset.c 7.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322
  1. // SPDX-License-Identifier: GPL-2.0+
  2. /*
  3. *
  4. * Read FactorySet information from EEPROM into global structure.
  5. * (C) Copyright 2013 Siemens Schweiz AG
  6. */
  7. #if !defined(CONFIG_SPL_BUILD)
  8. #include <common.h>
  9. #include <env.h>
  10. #include <i2c.h>
  11. #include <asm/io.h>
  12. #include <asm/arch/cpu.h>
  13. #include <asm/arch/sys_proto.h>
  14. #include <asm/unaligned.h>
  15. #include <net.h>
  16. #include <errno.h>
  17. #include <g_dnl.h>
  18. #include "factoryset.h"
  19. #define EEPR_PG_SZ 0x80
  20. #define EEPROM_FATORYSET_OFFSET 0x400
  21. #define OFF_PG EEPROM_FATORYSET_OFFSET/EEPR_PG_SZ
  22. /* Global variable that contains necessary information from FactorySet */
  23. struct factorysetcontainer factory_dat;
  24. #define fact_get_char(i) *((char *)&eeprom_buf[i])
  25. static int fact_match(unsigned char *eeprom_buf, uchar *s1, int i2)
  26. {
  27. if (s1 == NULL)
  28. return -1;
  29. while (*s1 == fact_get_char(i2++))
  30. if (*s1++ == '=')
  31. return i2;
  32. if (*s1 == '\0' && fact_get_char(i2-1) == '=')
  33. return i2;
  34. return -1;
  35. }
  36. static int get_factory_val(unsigned char *eeprom_buf, int size, uchar *name,
  37. uchar *buf, int len)
  38. {
  39. int i, nxt = 0;
  40. for (i = 0; fact_get_char(i) != '\0'; i = nxt + 1) {
  41. int val, n;
  42. for (nxt = i; fact_get_char(nxt) != '\0'; ++nxt) {
  43. if (nxt >= size)
  44. return -1;
  45. }
  46. val = fact_match(eeprom_buf, (uchar *)name, i);
  47. if (val < 0)
  48. continue;
  49. /* found; copy out */
  50. for (n = 0; n < len; ++n, ++buf) {
  51. *buf = fact_get_char(val++);
  52. if (*buf == '\0')
  53. return n;
  54. }
  55. if (n)
  56. *--buf = '\0';
  57. printf("env_buf [%d bytes] too small for value of \"%s\"\n",
  58. len, name);
  59. return n;
  60. }
  61. return -1;
  62. }
  63. static
  64. int get_factory_record_val(unsigned char *eeprom_buf, int size, uchar *record,
  65. uchar *name, uchar *buf, int len)
  66. {
  67. int ret = -1;
  68. int i, nxt = 0;
  69. int c;
  70. unsigned char end = 0xff;
  71. unsigned char tmp;
  72. for (i = 0; fact_get_char(i) != end; i = nxt) {
  73. nxt = i + 1;
  74. if (fact_get_char(i) == '>') {
  75. int pos;
  76. int endpos;
  77. int z;
  78. int level = 0;
  79. c = strncmp((char *)&eeprom_buf[i + 1], (char *)record,
  80. strlen((char *)record));
  81. if (c == 0) {
  82. /* record found */
  83. pos = i + strlen((char *)record) + 2;
  84. nxt = pos;
  85. /* search for "<" */
  86. c = -1;
  87. for (z = pos; fact_get_char(z) != end; z++) {
  88. if (fact_get_char(z) == '<') {
  89. if (level == 0) {
  90. endpos = z;
  91. nxt = endpos;
  92. c = 0;
  93. break;
  94. } else {
  95. level--;
  96. }
  97. }
  98. if (fact_get_char(z) == '>')
  99. level++;
  100. }
  101. } else {
  102. continue;
  103. }
  104. if (c == 0) {
  105. /* end found -> call get_factory_val */
  106. tmp = eeprom_buf[endpos];
  107. eeprom_buf[endpos] = end;
  108. ret = get_factory_val(&eeprom_buf[pos],
  109. endpos - pos, name, buf, len);
  110. /* fix buffer */
  111. eeprom_buf[endpos] = tmp;
  112. debug("%s: %s.%s = %s\n",
  113. __func__, record, name, buf);
  114. return ret;
  115. }
  116. }
  117. }
  118. return ret;
  119. }
  120. int factoryset_read_eeprom(int i2c_addr)
  121. {
  122. int i, pages = 0, size = 0;
  123. unsigned char eeprom_buf[0x3c00], hdr[4], buf[MAX_STRING_LENGTH];
  124. unsigned char *cp, *cp1;
  125. #if defined(CONFIG_DFU_OVER_USB)
  126. factory_dat.usb_vendor_id = CONFIG_USB_GADGET_VENDOR_NUM;
  127. factory_dat.usb_product_id = CONFIG_USB_GADGET_PRODUCT_NUM;
  128. #endif
  129. if (i2c_probe(i2c_addr))
  130. goto err;
  131. if (i2c_read(i2c_addr, EEPROM_FATORYSET_OFFSET, 2, hdr, sizeof(hdr)))
  132. goto err;
  133. if ((hdr[0] != 0x99) || (hdr[1] != 0x80)) {
  134. printf("FactorySet is not right in eeprom.\n");
  135. return 1;
  136. }
  137. /* get FactorySet size */
  138. size = (hdr[2] << 8) + hdr[3] + sizeof(hdr);
  139. if (size > 0x3bfa)
  140. size = 0x3bfa;
  141. pages = size / EEPR_PG_SZ;
  142. /*
  143. * read the eeprom using i2c
  144. * I can not read entire eeprom in once, so separate into several
  145. * times. Furthermore, fetch eeprom take longer time, so we fetch
  146. * data after every time we got a record from eeprom
  147. */
  148. debug("Read eeprom page :\n");
  149. for (i = 0; i < pages; i++)
  150. if (i2c_read(i2c_addr, (OFF_PG + i) * EEPR_PG_SZ, 2,
  151. eeprom_buf + (i * EEPR_PG_SZ), EEPR_PG_SZ))
  152. goto err;
  153. if (size % EEPR_PG_SZ)
  154. if (i2c_read(i2c_addr, (OFF_PG + pages) * EEPR_PG_SZ, 2,
  155. eeprom_buf + (pages * EEPR_PG_SZ),
  156. (size % EEPR_PG_SZ)))
  157. goto err;
  158. /* we do below just for eeprom align */
  159. for (i = 0; i < size; i++)
  160. if (eeprom_buf[i] == '\n')
  161. eeprom_buf[i] = 0;
  162. /* skip header */
  163. size -= sizeof(hdr);
  164. cp = (uchar *)eeprom_buf + sizeof(hdr);
  165. /* get mac address */
  166. get_factory_record_val(cp, size, (uchar *)"ETH1", (uchar *)"mac",
  167. buf, MAX_STRING_LENGTH);
  168. cp1 = buf;
  169. for (i = 0; i < 6; i++) {
  170. factory_dat.mac[i] = simple_strtoul((char *)cp1, NULL, 16);
  171. cp1 += 3;
  172. }
  173. #if defined(CONFIG_DFU_OVER_USB)
  174. /* read vid and pid for dfu mode */
  175. if (0 <= get_factory_record_val(cp, size, (uchar *)"USBD1",
  176. (uchar *)"vid", buf,
  177. MAX_STRING_LENGTH)) {
  178. factory_dat.usb_vendor_id = simple_strtoul((char *)buf,
  179. NULL, 16);
  180. }
  181. if (0 <= get_factory_record_val(cp, size, (uchar *)"USBD1",
  182. (uchar *)"pid", buf,
  183. MAX_STRING_LENGTH)) {
  184. factory_dat.usb_product_id = simple_strtoul((char *)buf,
  185. NULL, 16);
  186. }
  187. printf("DFU USB: VID = 0x%4x, PID = 0x%4x\n", factory_dat.usb_vendor_id,
  188. factory_dat.usb_product_id);
  189. #endif
  190. #if defined(CONFIG_VIDEO)
  191. if (0 <= get_factory_record_val(cp, size, (uchar *)"DISP1",
  192. (uchar *)"name", factory_dat.disp_name,
  193. MAX_STRING_LENGTH)) {
  194. debug("display name: %s\n", factory_dat.disp_name);
  195. }
  196. #endif
  197. if (0 <= get_factory_record_val(cp, size, (uchar *)"DEV",
  198. (uchar *)"num", factory_dat.serial,
  199. MAX_STRING_LENGTH)) {
  200. debug("serial number: %s\n", factory_dat.serial);
  201. }
  202. if (0 <= get_factory_record_val(cp, size, (uchar *)"DEV",
  203. (uchar *)"ver", buf,
  204. MAX_STRING_LENGTH)) {
  205. factory_dat.version = simple_strtoul((char *)buf,
  206. NULL, 16);
  207. debug("version number: %d\n", factory_dat.version);
  208. }
  209. /* Get ASN from factory set if available */
  210. if (0 <= get_factory_record_val(cp, size, (uchar *)"DEV",
  211. (uchar *)"id", factory_dat.asn,
  212. MAX_STRING_LENGTH)) {
  213. debug("factoryset asn: %s\n", factory_dat.asn);
  214. } else {
  215. factory_dat.asn[0] = 0;
  216. }
  217. /* Get COMP/ver from factory set if available */
  218. if (0 <= get_factory_record_val(cp, size, (uchar *)"COMP",
  219. (uchar *)"ver",
  220. factory_dat.comp_version,
  221. MAX_STRING_LENGTH)) {
  222. debug("factoryset COMP/ver: %s\n", factory_dat.comp_version);
  223. } else {
  224. strcpy((char *)factory_dat.comp_version, "1.0");
  225. }
  226. return 0;
  227. err:
  228. printf("Could not read the EEPROM; something fundamentally wrong on the I2C bus.\n");
  229. return 1;
  230. }
  231. static struct ctrl_dev *cdev = (struct ctrl_dev *)CTRL_DEVICE_BASE;
  232. static int factoryset_mac_env_set(void)
  233. {
  234. uint8_t mac_addr[6];
  235. debug("FactorySet: Set mac address\n");
  236. if (is_valid_ethaddr(factory_dat.mac)) {
  237. memcpy(mac_addr, factory_dat.mac, 6);
  238. } else {
  239. uint32_t mac_hi, mac_lo;
  240. debug("Warning: FactorySet: <ethaddr> not set. Fallback to E-fuse\n");
  241. mac_lo = readl(&cdev->macid0l);
  242. mac_hi = readl(&cdev->macid0h);
  243. mac_addr[0] = mac_hi & 0xFF;
  244. mac_addr[1] = (mac_hi & 0xFF00) >> 8;
  245. mac_addr[2] = (mac_hi & 0xFF0000) >> 16;
  246. mac_addr[3] = (mac_hi & 0xFF000000) >> 24;
  247. mac_addr[4] = mac_lo & 0xFF;
  248. mac_addr[5] = (mac_lo & 0xFF00) >> 8;
  249. if (!is_valid_ethaddr(mac_addr)) {
  250. printf("Warning: ethaddr not set by FactorySet or E-fuse. Set <ethaddr> variable to overcome this.\n");
  251. return -1;
  252. }
  253. }
  254. eth_env_set_enetaddr("ethaddr", mac_addr);
  255. return 0;
  256. }
  257. int factoryset_env_set(void)
  258. {
  259. int ret = 0;
  260. if (factoryset_mac_env_set() < 0)
  261. ret = -1;
  262. return ret;
  263. }
  264. int g_dnl_bind_fixup(struct usb_device_descriptor *dev, const char *name)
  265. {
  266. put_unaligned(factory_dat.usb_vendor_id, &dev->idVendor);
  267. put_unaligned(factory_dat.usb_product_id, &dev->idProduct);
  268. g_dnl_set_serialnumber((char *)factory_dat.serial);
  269. return 0;
  270. }
  271. int g_dnl_get_board_bcd_device_number(int gcnum)
  272. {
  273. return factory_dat.version;
  274. }
  275. #endif /* defined(CONFIG_SPL_BUILD) */