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 8#if !defined(CONFIG_SPL_BUILD) 9 10#include <env.h> 11#include <g_dnl.h> 12#include <net.h> 13#include <asm/io.h> 14#if CONFIG_IS_ENABLED(AM33XX) 15#include <asm/arch/cpu.h> 16#endif 17#include "eeprom.h" 18#include "factoryset.h" 19 20#define EEPR_PG_SZ 0x80 21#define OFF_PG (SIEMENS_EE_ADDR_FACTORYSET / EEPR_PG_SZ) 22 23/* Global variable that contains necessary information from FactorySet */ 24struct factorysetcontainer factory_dat; 25 26#define fact_get_char(i) *((char *)&eeprom_buf[i]) 27 28static int fact_match(unsigned char *eeprom_buf, uchar *s1, int i2) 29{ 30 if (s1 == NULL) 31 return -1; 32 33 while (*s1 == fact_get_char(i2++)) 34 if (*s1++ == '=') 35 return i2; 36 37 if (*s1 == '\0' && fact_get_char(i2-1) == '=') 38 return i2; 39 40 return -1; 41} 42 43static int get_factory_val(unsigned char *eeprom_buf, int size, uchar *name, 44 uchar *buf, int len) 45{ 46 int i, nxt = 0; 47 48 for (i = 0; fact_get_char(i) != '\0'; i = nxt + 1) { 49 int val, n; 50 51 for (nxt = i; fact_get_char(nxt) != '\0'; ++nxt) { 52 if (nxt >= size) 53 return -1; 54 } 55 56 val = fact_match(eeprom_buf, (uchar *)name, i); 57 if (val < 0) 58 continue; 59 60 /* found; copy out */ 61 for (n = 0; n < len; ++n, ++buf) { 62 *buf = fact_get_char(val++); 63 if (*buf == '\0') 64 return n; 65 } 66 67 if (n) 68 *--buf = '\0'; 69 70 printf("env_buf [%d bytes] too small for value of \"%s\"\n", 71 len, name); 72 73 return n; 74 } 75 return -1; 76} 77 78static 79int get_factory_record_val(unsigned char *eeprom_buf, int size, uchar *record, 80 uchar *name, uchar *buf, int len) 81{ 82 int ret = -1; 83 int i, nxt = 0; 84 int c; 85 unsigned char end = 0xff; 86 unsigned char tmp; 87 88 for (i = 0; fact_get_char(i) != end; i = nxt) { 89 nxt = i + 1; 90 if (fact_get_char(i) == '>') { 91 int pos; 92 int endpos; 93 int z; 94 int level = 0; 95 96 c = strncmp((char *)&eeprom_buf[i + 1], (char *)record, 97 strlen((char *)record)); 98 if (c == 0) { 99 /* record found */ 100 pos = i + strlen((char *)record) + 2; 101 nxt = pos; 102 /* search for "<" */ 103 c = -1; 104 for (z = pos; fact_get_char(z) != end; z++) { 105 if (fact_get_char(z) == '<') { 106 if (level == 0) { 107 endpos = z; 108 nxt = endpos; 109 c = 0; 110 break; 111 } else { 112 level--; 113 } 114 } 115 if (fact_get_char(z) == '>') 116 level++; 117 } 118 } else { 119 continue; 120 } 121 if (c == 0) { 122 /* end found -> call get_factory_val */ 123 tmp = eeprom_buf[endpos]; 124 eeprom_buf[endpos] = end; 125 ret = get_factory_val(&eeprom_buf[pos], 126 endpos - pos, name, buf, len); 127 /* fix buffer */ 128 eeprom_buf[endpos] = tmp; 129 debug("%s: %s.%s = %s\n", 130 __func__, record, name, buf); 131 return ret; 132 } 133 } 134 } 135 return ret; 136} 137 138int factoryset_read_eeprom(int i2c_addr) 139{ 140 int i, pages = 0, size = 0; 141 unsigned char eeprom_buf[0x3c00], hdr[4], buf[MAX_STRING_LENGTH]; 142 unsigned char *cp, *cp1; 143 144#if defined(CONFIG_DFU_OVER_USB) 145 factory_dat.usb_vendor_id = CONFIG_USB_GADGET_VENDOR_NUM; 146 factory_dat.usb_product_id = CONFIG_USB_GADGET_PRODUCT_NUM; 147#endif 148 149 if (siemens_ee_read_data(SIEMENS_EE_ADDR_FACTORYSET, hdr, sizeof(hdr))) 150 goto err; 151 152 if ((hdr[0] != 0x99) || (hdr[1] != 0x80)) { 153 printf("FactorySet is not right in eeprom.\n"); 154 return 1; 155 } 156 157 /* get FactorySet size */ 158 size = (hdr[2] << 8) + hdr[3] + sizeof(hdr); 159 if (size > 0x3bfa) 160 size = 0x3bfa; 161 162 pages = size / EEPR_PG_SZ; 163 164 /* 165 * read the eeprom using i2c 166 * I can not read entire eeprom in once, so separate into several 167 * times. Furthermore, fetch eeprom take longer time, so we fetch 168 * data after every time we got a record from eeprom 169 */ 170 debug("Read eeprom page :\n"); 171 for (i = 0; i < pages; i++) 172 if (siemens_ee_read_data((OFF_PG + i) * EEPR_PG_SZ, 173 eeprom_buf + (i * EEPR_PG_SZ), EEPR_PG_SZ)) 174 goto err; 175 176 if (size % EEPR_PG_SZ) 177 if (siemens_ee_read_data((OFF_PG + pages) * EEPR_PG_SZ, 178 eeprom_buf + (pages * EEPR_PG_SZ), 179 size % EEPR_PG_SZ)) 180 goto err; 181 182 /* we do below just for eeprom align */ 183 for (i = 0; i < size; i++) 184 if (eeprom_buf[i] == '\n') 185 eeprom_buf[i] = 0; 186 187 /* skip header */ 188 size -= sizeof(hdr); 189 cp = (uchar *)eeprom_buf + sizeof(hdr); 190 191 /* get mac address */ 192 get_factory_record_val(cp, size, (uchar *)"ETH1", (uchar *)"mac", 193 buf, MAX_STRING_LENGTH); 194 cp1 = buf; 195 for (i = 0; i < 6; i++) { 196 factory_dat.mac[i] = hextoul((char *)cp1, NULL); 197 cp1 += 3; 198 } 199 200#if CONFIG_IS_ENABLED(IMX8) 201 /* get mac address for WLAN */ 202 if (get_factory_record_val(cp, size, (uchar *)"WLAN1", (uchar *)"mac", 203 buf, MAX_STRING_LENGTH) > 0) { 204 cp1 = buf; 205 for (i = 0; i < 6; i++) { 206 factory_dat.mac_wlan[i] = hextoul((char *)cp1, NULL); 207 cp1 += 3; 208 } 209 } 210#endif 211 212#if defined(CONFIG_DFU_OVER_USB) 213 /* read vid and pid for dfu mode */ 214 if (0 <= get_factory_record_val(cp, size, (uchar *)"USBD1", 215 (uchar *)"vid", buf, 216 MAX_STRING_LENGTH)) { 217 factory_dat.usb_vendor_id = hextoul((char *)buf, NULL); 218 } 219 220 if (0 <= get_factory_record_val(cp, size, (uchar *)"USBD1", 221 (uchar *)"pid", buf, 222 MAX_STRING_LENGTH)) { 223 factory_dat.usb_product_id = hextoul((char *)buf, NULL); 224 } 225 printf("DFU USB: VID = 0x%4x, PID = 0x%4x\n", factory_dat.usb_vendor_id, 226 factory_dat.usb_product_id); 227#endif 228 if (0 <= get_factory_record_val(cp, size, (uchar *)"DEV", 229 (uchar *)"num", factory_dat.serial, 230 MAX_STRING_LENGTH)) { 231 debug("serial number: %s\n", factory_dat.serial); 232 } 233 if (0 <= get_factory_record_val(cp, size, (uchar *)"DEV", 234 (uchar *)"ver", buf, 235 MAX_STRING_LENGTH)) { 236 factory_dat.version = hextoul((char *)buf, NULL); 237 debug("version number: %d\n", factory_dat.version); 238 } 239 /* Get ASN from factory set if available */ 240 if (0 <= get_factory_record_val(cp, size, (uchar *)"DEV", 241 (uchar *)"id", factory_dat.asn, 242 MAX_STRING_LENGTH)) { 243 debug("factoryset asn: %s\n", factory_dat.asn); 244 } else { 245 factory_dat.asn[0] = 0; 246 } 247 /* Get COMP/ver from factory set if available */ 248 if (0 <= get_factory_record_val(cp, size, (uchar *)"COMP", 249 (uchar *)"ver", 250 factory_dat.comp_version, 251 MAX_STRING_LENGTH)) { 252 debug("factoryset COMP/ver: %s\n", factory_dat.comp_version); 253 } else { 254 strcpy((char *)factory_dat.comp_version, "1.0"); 255 } 256 257 return 0; 258 259err: 260 printf("Could not read the EEPROM; something fundamentally wrong on the I2C bus.\n"); 261 return 1; 262} 263 264static int get_mac_from_efuse(uint8_t mac[6]) 265{ 266#ifdef CONFIG_AM33XX 267 struct ctrl_dev *cdev = (struct ctrl_dev *)CTRL_DEVICE_BASE; 268 uint32_t mac_hi, mac_lo; 269 270 mac_lo = readl(&cdev->macid0l); 271 mac_hi = readl(&cdev->macid0h); 272 273 mac[0] = mac_hi & 0xFF; 274 mac[1] = (mac_hi & 0xFF00) >> 8; 275 mac[2] = (mac_hi & 0xFF0000) >> 16; 276 mac[3] = (mac_hi & 0xFF000000) >> 24; 277 mac[4] = mac_lo & 0xFF; 278 mac[5] = (mac_lo & 0xFF00) >> 8; 279#else 280 /* unhandled */ 281 memset(mac, 0, 6); 282#endif 283 if (!is_valid_ethaddr(mac)) { 284 puts("Warning: ethaddr not set by FactorySet or E-fuse. "); 285 puts("Set <ethaddr> variable to overcome this.\n"); 286 return -1; 287 } 288 return 0; 289} 290 291static int factoryset_mac_env_set(void) 292{ 293 uint8_t mac_addr[6]; 294 295 /* Set mac from factoryset or try reading E-fuse */ 296 debug("FactorySet: Set mac address\n"); 297 if (is_valid_ethaddr(factory_dat.mac)) { 298 memcpy(mac_addr, factory_dat.mac, 6); 299 } else { 300 debug("Warning: FactorySet: <ethaddr> not set. Fallback to E-fuse\n"); 301 if (get_mac_from_efuse(mac_addr) < 0) 302 return -1; 303 } 304 305 eth_env_set_enetaddr("ethaddr", mac_addr); 306 307#if CONFIG_IS_ENABLED(IMX8) 308 eth_env_set_enetaddr("eth1addr", mac_addr); 309 310 /* wlan mac */ 311 if (is_valid_ethaddr(factory_dat.mac_wlan)) 312 eth_env_set_enetaddr("eth2addr", factory_dat.mac_wlan); 313#endif 314 return 0; 315} 316 317static void factoryset_dtb_env_set(void) 318{ 319 /* Set ASN in environment*/ 320 if (factory_dat.asn[0] != 0) { 321 env_set("dtb_name", (char *)factory_dat.asn); 322 } else { 323 /* dtb suffix gets added in load script */ 324 env_set("dtb_name", "default"); 325 } 326} 327 328int factoryset_env_set(void) 329{ 330 int ret = 0; 331 332 factoryset_dtb_env_set(); 333 334 if (factoryset_mac_env_set() < 0) 335 ret = -1; 336 337 return ret; 338} 339 340int g_dnl_bind_fixup(struct usb_device_descriptor *dev, const char *name) 341{ 342 put_unaligned(factory_dat.usb_vendor_id, &dev->idVendor); 343 put_unaligned(factory_dat.usb_product_id, &dev->idProduct); 344 g_dnl_set_serialnumber((char *)factory_dat.serial); 345 346 return 0; 347} 348 349int g_dnl_get_board_bcd_device_number(int gcnum) 350{ 351 return factory_dat.version; 352} 353#endif /* defined(CONFIG_SPL_BUILD) */ 354