turris_mox.c 12 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550
  1. // SPDX-License-Identifier: GPL-2.0+
  2. /*
  3. * Copyright (C) 2018 Marek Behun <marek.behun@nic.cz>
  4. */
  5. #include <common.h>
  6. #include <asm/gpio.h>
  7. #include <asm/io.h>
  8. #include <dm.h>
  9. #include <clk.h>
  10. #include <env.h>
  11. #include <spi.h>
  12. #include <mvebu/comphy.h>
  13. #include <miiphy.h>
  14. #include <linux/string.h>
  15. #include <linux/libfdt.h>
  16. #include <fdt_support.h>
  17. #include <environment.h>
  18. #include "mox_sp.h"
  19. #define MAX_MOX_MODULES 10
  20. #define MOX_MODULE_SFP 0x1
  21. #define MOX_MODULE_PCI 0x2
  22. #define MOX_MODULE_TOPAZ 0x3
  23. #define MOX_MODULE_PERIDOT 0x4
  24. #define MOX_MODULE_USB3 0x5
  25. #define MOX_MODULE_PASSPCI 0x6
  26. #define ARMADA_37XX_NB_GPIO_SEL 0xd0013830
  27. #define ARMADA_37XX_SPI_CTRL 0xd0010600
  28. #define ARMADA_37XX_SPI_CFG 0xd0010604
  29. #define ARMADA_37XX_SPI_DOUT 0xd0010608
  30. #define ARMADA_37XX_SPI_DIN 0xd001060c
  31. #define PCIE_PATH "/soc/pcie@d0070000"
  32. DECLARE_GLOBAL_DATA_PTR;
  33. int dram_init(void)
  34. {
  35. gd->ram_base = 0;
  36. gd->ram_size = (phys_size_t)get_ram_size(0, 0x40000000);
  37. return 0;
  38. }
  39. int dram_init_banksize(void)
  40. {
  41. gd->bd->bi_dram[0].start = (phys_addr_t)0;
  42. gd->bd->bi_dram[0].size = gd->ram_size;
  43. return 0;
  44. }
  45. #if defined(CONFIG_OF_BOARD_FIXUP)
  46. int board_fix_fdt(void *blob)
  47. {
  48. u8 topology[MAX_MOX_MODULES];
  49. int i, size, node;
  50. bool enable;
  51. /*
  52. * SPI driver is not loaded in driver model yet, but we have to find out
  53. * if pcie should be enabled in U-Boot's device tree. Therefore we have
  54. * to read SPI by reading/writing SPI registers directly
  55. */
  56. writel(0x563fa, ARMADA_37XX_NB_GPIO_SEL);
  57. writel(0x10df, ARMADA_37XX_SPI_CFG);
  58. writel(0x2005b, ARMADA_37XX_SPI_CTRL);
  59. while (!(readl(ARMADA_37XX_SPI_CTRL) & 0x2))
  60. udelay(1);
  61. for (i = 0; i < MAX_MOX_MODULES; ++i) {
  62. writel(0x0, ARMADA_37XX_SPI_DOUT);
  63. while (!(readl(ARMADA_37XX_SPI_CTRL) & 0x2))
  64. udelay(1);
  65. topology[i] = readl(ARMADA_37XX_SPI_DIN) & 0xff;
  66. if (topology[i] == 0xff)
  67. break;
  68. topology[i] &= 0xf;
  69. }
  70. size = i;
  71. writel(0x5b, ARMADA_37XX_SPI_CTRL);
  72. if (size > 1 && (topology[1] == MOX_MODULE_PCI ||
  73. topology[1] == MOX_MODULE_USB3 ||
  74. topology[1] == MOX_MODULE_PASSPCI))
  75. enable = true;
  76. else
  77. enable = false;
  78. node = fdt_path_offset(blob, PCIE_PATH);
  79. if (node < 0) {
  80. printf("Cannot find PCIe node in U-Boot's device tree!\n");
  81. return 0;
  82. }
  83. if (fdt_setprop_string(blob, node, "status",
  84. enable ? "okay" : "disabled") < 0) {
  85. printf("Cannot %s PCIe in U-Boot's device tree!\n",
  86. enable ? "enable" : "disable");
  87. return 0;
  88. }
  89. return 0;
  90. }
  91. #endif
  92. int board_init(void)
  93. {
  94. /* address of boot parameters */
  95. gd->bd->bi_boot_params = CONFIG_SYS_SDRAM_BASE + 0x100;
  96. return 0;
  97. }
  98. static int mox_do_spi(u8 *in, u8 *out, size_t size)
  99. {
  100. struct spi_slave *slave;
  101. struct udevice *dev;
  102. int ret;
  103. ret = spi_get_bus_and_cs(0, 1, 1000000, SPI_CPHA | SPI_CPOL,
  104. "spi_generic_drv", "moxtet@1", &dev,
  105. &slave);
  106. if (ret)
  107. goto fail;
  108. ret = spi_claim_bus(slave);
  109. if (ret)
  110. goto fail_free;
  111. ret = spi_xfer(slave, size * 8, out, in, SPI_XFER_ONCE);
  112. spi_release_bus(slave);
  113. fail_free:
  114. spi_free_slave(slave);
  115. fail:
  116. return ret;
  117. }
  118. static int mox_get_topology(const u8 **ptopology, int *psize, int *pis_sd)
  119. {
  120. static int is_sd;
  121. static u8 topology[MAX_MOX_MODULES - 1];
  122. static int size;
  123. u8 din[MAX_MOX_MODULES], dout[MAX_MOX_MODULES];
  124. int ret, i;
  125. if (size) {
  126. if (ptopology)
  127. *ptopology = topology;
  128. if (psize)
  129. *psize = size;
  130. if (pis_sd)
  131. *pis_sd = is_sd;
  132. return 0;
  133. }
  134. memset(din, 0, MAX_MOX_MODULES);
  135. memset(dout, 0, MAX_MOX_MODULES);
  136. ret = mox_do_spi(din, dout, MAX_MOX_MODULES);
  137. if (ret)
  138. return ret;
  139. if (din[0] == 0x10)
  140. is_sd = 1;
  141. else if (din[0] == 0x00)
  142. is_sd = 0;
  143. else
  144. return -ENODEV;
  145. for (i = 1; i < MAX_MOX_MODULES && din[i] != 0xff; ++i)
  146. topology[i - 1] = din[i] & 0xf;
  147. size = i - 1;
  148. if (ptopology)
  149. *ptopology = topology;
  150. if (psize)
  151. *psize = size;
  152. if (pis_sd)
  153. *pis_sd = is_sd;
  154. return 0;
  155. }
  156. int comphy_update_map(struct comphy_map *serdes_map, int count)
  157. {
  158. int ret, i, size, sfpindex = -1, swindex = -1;
  159. const u8 *topology;
  160. ret = mox_get_topology(&topology, &size, NULL);
  161. if (ret)
  162. return ret;
  163. for (i = 0; i < size; ++i) {
  164. if (topology[i] == MOX_MODULE_SFP && sfpindex == -1)
  165. sfpindex = i;
  166. else if ((topology[i] == MOX_MODULE_TOPAZ ||
  167. topology[i] == MOX_MODULE_PERIDOT) &&
  168. swindex == -1)
  169. swindex = i;
  170. }
  171. if (sfpindex >= 0 && swindex >= 0) {
  172. if (sfpindex < swindex)
  173. serdes_map[0].speed = PHY_SPEED_1_25G;
  174. else
  175. serdes_map[0].speed = PHY_SPEED_3_125G;
  176. } else if (sfpindex >= 0) {
  177. serdes_map[0].speed = PHY_SPEED_1_25G;
  178. } else if (swindex >= 0) {
  179. serdes_map[0].speed = PHY_SPEED_3_125G;
  180. }
  181. return 0;
  182. }
  183. #define SW_SMI_CMD_R(d, r) (0x9800 | (((d) & 0x1f) << 5) | ((r) & 0x1f))
  184. #define SW_SMI_CMD_W(d, r) (0x9400 | (((d) & 0x1f) << 5) | ((r) & 0x1f))
  185. static int sw_multi_read(struct mii_dev *bus, int sw, int dev, int reg)
  186. {
  187. bus->write(bus, sw, 0, 0, SW_SMI_CMD_R(dev, reg));
  188. mdelay(5);
  189. return bus->read(bus, sw, 0, 1);
  190. }
  191. static void sw_multi_write(struct mii_dev *bus, int sw, int dev, int reg,
  192. u16 val)
  193. {
  194. bus->write(bus, sw, 0, 1, val);
  195. bus->write(bus, sw, 0, 0, SW_SMI_CMD_W(dev, reg));
  196. mdelay(5);
  197. }
  198. static int sw_scratch_read(struct mii_dev *bus, int sw, int reg)
  199. {
  200. sw_multi_write(bus, sw, 0x1c, 0x1a, (reg & 0x7f) << 8);
  201. return sw_multi_read(bus, sw, 0x1c, 0x1a) & 0xff;
  202. }
  203. static void sw_led_write(struct mii_dev *bus, int sw, int port, int reg,
  204. u16 val)
  205. {
  206. sw_multi_write(bus, sw, port, 0x16, 0x8000 | ((reg & 7) << 12)
  207. | (val & 0x7ff));
  208. }
  209. static void sw_blink_leds(struct mii_dev *bus, int peridot, int topaz)
  210. {
  211. int i, p;
  212. struct {
  213. int port;
  214. u16 val;
  215. int wait;
  216. } regs[] = {
  217. { 2, 0xef, 1 }, { 2, 0xfe, 1 }, { 2, 0x33, 0 },
  218. { 4, 0xef, 1 }, { 4, 0xfe, 1 }, { 4, 0x33, 0 },
  219. { 3, 0xfe, 1 }, { 3, 0xef, 1 }, { 3, 0x33, 0 },
  220. { 1, 0xfe, 1 }, { 1, 0xef, 1 }, { 1, 0x33, 0 }
  221. };
  222. for (i = 0; i < 12; ++i) {
  223. for (p = 0; p < peridot; ++p) {
  224. sw_led_write(bus, 0x10 + p, regs[i].port, 0,
  225. regs[i].val);
  226. sw_led_write(bus, 0x10 + p, regs[i].port + 4, 0,
  227. regs[i].val);
  228. }
  229. if (topaz) {
  230. sw_led_write(bus, 0x2, 0x10 + regs[i].port, 0,
  231. regs[i].val);
  232. }
  233. if (regs[i].wait)
  234. mdelay(75);
  235. }
  236. }
  237. static void check_switch_address(struct mii_dev *bus, int addr)
  238. {
  239. if (sw_scratch_read(bus, addr, 0x70) >> 3 != addr)
  240. printf("Check of switch MDIO address failed for 0x%02x\n",
  241. addr);
  242. }
  243. static int sfp, pci, topaz, peridot, usb, passpci;
  244. static int sfp_pos, peridot_pos[3];
  245. static int module_count;
  246. static int configure_peridots(struct gpio_desc *reset_gpio)
  247. {
  248. int i, ret;
  249. u8 dout[MAX_MOX_MODULES];
  250. memset(dout, 0, MAX_MOX_MODULES);
  251. /* set addresses of Peridot modules */
  252. for (i = 0; i < peridot; ++i)
  253. dout[module_count - peridot_pos[i]] = (~i) & 3;
  254. /*
  255. * if there is a SFP module connected to the last Peridot module, set
  256. * the P10_SMODE to 1 for the Peridot module
  257. */
  258. if (sfp)
  259. dout[module_count - peridot_pos[i - 1]] |= 1 << 3;
  260. dm_gpio_set_value(reset_gpio, 1);
  261. mdelay(10);
  262. ret = mox_do_spi(NULL, dout, module_count + 1);
  263. mdelay(10);
  264. dm_gpio_set_value(reset_gpio, 0);
  265. mdelay(50);
  266. return ret;
  267. }
  268. static int get_reset_gpio(struct gpio_desc *reset_gpio)
  269. {
  270. int node;
  271. node = fdt_node_offset_by_compatible(gd->fdt_blob, 0, "cznic,moxtet");
  272. if (node < 0) {
  273. printf("Cannot find Moxtet bus device node!\n");
  274. return -1;
  275. }
  276. gpio_request_by_name_nodev(offset_to_ofnode(node), "reset-gpios", 0,
  277. reset_gpio, GPIOD_IS_OUT);
  278. if (!dm_gpio_is_valid(reset_gpio)) {
  279. printf("Cannot find reset GPIO for Moxtet bus!\n");
  280. return -1;
  281. }
  282. return 0;
  283. }
  284. int misc_init_r(void)
  285. {
  286. int ret;
  287. u8 mac1[6], mac2[6];
  288. ret = mbox_sp_get_board_info(NULL, mac1, mac2, NULL, NULL);
  289. if (ret < 0) {
  290. printf("Cannot read data from OTP!\n");
  291. return 0;
  292. }
  293. if (is_valid_ethaddr(mac1) && !env_get("ethaddr"))
  294. eth_env_set_enetaddr("ethaddr", mac1);
  295. if (is_valid_ethaddr(mac2) && !env_get("eth1addr"))
  296. eth_env_set_enetaddr("eth1addr", mac2);
  297. return 0;
  298. }
  299. static void mox_print_info(void)
  300. {
  301. int ret, board_version, ram_size;
  302. u64 serial_number;
  303. const char *pub_key;
  304. ret = mbox_sp_get_board_info(&serial_number, NULL, NULL, &board_version,
  305. &ram_size);
  306. if (ret < 0)
  307. return;
  308. printf("Turris Mox:\n");
  309. printf(" Board version: %i\n", board_version);
  310. printf(" RAM size: %i MiB\n", ram_size);
  311. printf(" Serial Number: %016llX\n", serial_number);
  312. pub_key = mox_sp_get_ecdsa_public_key();
  313. if (pub_key)
  314. printf(" ECDSA Public Key: %s\n", pub_key);
  315. else
  316. printf("Cannot read ECDSA Public Key\n");
  317. }
  318. int last_stage_init(void)
  319. {
  320. int ret, i;
  321. const u8 *topology;
  322. int is_sd;
  323. struct mii_dev *bus;
  324. struct gpio_desc reset_gpio = {};
  325. mox_print_info();
  326. ret = mox_get_topology(&topology, &module_count, &is_sd);
  327. if (ret) {
  328. printf("Cannot read module topology!\n");
  329. return 0;
  330. }
  331. printf(" SD/eMMC version: %s\n", is_sd ? "SD" : "eMMC");
  332. if (module_count)
  333. printf("Module Topology:\n");
  334. for (i = 0; i < module_count; ++i) {
  335. switch (topology[i]) {
  336. case MOX_MODULE_SFP:
  337. printf("% 4i: SFP Module\n", i + 1);
  338. break;
  339. case MOX_MODULE_PCI:
  340. printf("% 4i: Mini-PCIe Module\n", i + 1);
  341. break;
  342. case MOX_MODULE_TOPAZ:
  343. printf("% 4i: Topaz Switch Module (4-port)\n", i + 1);
  344. break;
  345. case MOX_MODULE_PERIDOT:
  346. printf("% 4i: Peridot Switch Module (8-port)\n", i + 1);
  347. break;
  348. case MOX_MODULE_USB3:
  349. printf("% 4i: USB 3.0 Module (4 ports)\n", i + 1);
  350. break;
  351. case MOX_MODULE_PASSPCI:
  352. printf("% 4i: Passthrough Mini-PCIe Module\n", i + 1);
  353. break;
  354. default:
  355. printf("% 4i: unknown (ID %i)\n", i + 1, topology[i]);
  356. }
  357. }
  358. /* now check if modules are connected in supported mode */
  359. for (i = 0; i < module_count; ++i) {
  360. switch (topology[i]) {
  361. case MOX_MODULE_SFP:
  362. if (sfp) {
  363. printf("Error: Only one SFP module is supported!\n");
  364. } else if (topaz) {
  365. printf("Error: SFP module cannot be connected after Topaz Switch module!\n");
  366. } else {
  367. sfp_pos = i;
  368. ++sfp;
  369. }
  370. break;
  371. case MOX_MODULE_PCI:
  372. if (pci) {
  373. printf("Error: Only one Mini-PCIe module is supported!\n");
  374. } else if (usb) {
  375. printf("Error: Mini-PCIe module cannot come after USB 3.0 module!\n");
  376. } else if (i && (i != 1 || !passpci)) {
  377. printf("Error: Mini-PCIe module should be the first connected module or come right after Passthrough Mini-PCIe module!\n");
  378. } else {
  379. ++pci;
  380. }
  381. break;
  382. case MOX_MODULE_TOPAZ:
  383. if (topaz) {
  384. printf("Error: Only one Topaz module is supported!\n");
  385. } else if (peridot >= 3) {
  386. printf("Error: At most two Peridot modules can come before Topaz module!\n");
  387. } else {
  388. ++topaz;
  389. }
  390. break;
  391. case MOX_MODULE_PERIDOT:
  392. if (sfp || topaz) {
  393. printf("Error: Peridot module must come before SFP or Topaz module!\n");
  394. } else if (peridot >= 3) {
  395. printf("Error: At most three Peridot modules are supported!\n");
  396. } else {
  397. peridot_pos[peridot] = i;
  398. ++peridot;
  399. }
  400. break;
  401. case MOX_MODULE_USB3:
  402. if (pci) {
  403. printf("Error: USB 3.0 module cannot come after Mini-PCIe module!\n");
  404. } else if (usb) {
  405. printf("Error: Only one USB 3.0 module is supported!\n");
  406. } else if (i && (i != 1 || !passpci)) {
  407. printf("Error: USB 3.0 module should be the first connected module or come right after Passthrough Mini-PCIe module!\n");
  408. } else {
  409. ++usb;
  410. }
  411. break;
  412. case MOX_MODULE_PASSPCI:
  413. if (passpci) {
  414. printf("Error: Only one Passthrough Mini-PCIe module is supported!\n");
  415. } else if (i != 0) {
  416. printf("Error: Passthrough Mini-PCIe module should be the first connected module!\n");
  417. } else {
  418. ++passpci;
  419. }
  420. }
  421. }
  422. /* now configure modules */
  423. if (get_reset_gpio(&reset_gpio) < 0)
  424. return 0;
  425. if (peridot > 0) {
  426. if (configure_peridots(&reset_gpio) < 0) {
  427. printf("Cannot configure Peridot modules!\n");
  428. peridot = 0;
  429. }
  430. } else {
  431. dm_gpio_set_value(&reset_gpio, 1);
  432. mdelay(50);
  433. dm_gpio_set_value(&reset_gpio, 0);
  434. mdelay(50);
  435. }
  436. if (peridot || topaz) {
  437. /*
  438. * now check if the addresses are set by reading Scratch & Misc
  439. * register 0x70 of Peridot (and potentially Topaz) modules
  440. */
  441. bus = miiphy_get_dev_by_name("neta@30000");
  442. if (!bus) {
  443. printf("Cannot get MDIO bus device!\n");
  444. } else {
  445. for (i = 0; i < peridot; ++i)
  446. check_switch_address(bus, 0x10 + i);
  447. if (topaz)
  448. check_switch_address(bus, 0x2);
  449. sw_blink_leds(bus, peridot, topaz);
  450. }
  451. }
  452. printf("\n");
  453. return 0;
  454. }