watchdog: Implement generic watchdog_reset() version
[project/bcm63xx/u-boot.git] / board / CZ.NIC / turris_mox / turris_mox.c
index 130d4c606d3a565f0028201b7e6d33f7beb4b761..8a4872343b65d634edbc3751889e4372324716f4 100644 (file)
  */
 
 #include <common.h>
+#include <asm/gpio.h>
+#include <asm/io.h>
 #include <dm.h>
 #include <clk.h>
 #include <spi.h>
+#include <mvebu/comphy.h>
+#include <miiphy.h>
 #include <linux/string.h>
+#include <linux/libfdt.h>
+#include <fdt_support.h>
+#include <environment.h>
 
-#ifdef CONFIG_WDT_ARMADA_3720
+#ifdef CONFIG_WDT_ARMADA_37XX
 #include <wdt.h>
 #endif
 
+#include "mox_sp.h"
+
+#define MAX_MOX_MODULES                10
+
+#define MOX_MODULE_SFP         0x1
+#define MOX_MODULE_PCI         0x2
+#define MOX_MODULE_TOPAZ       0x3
+#define MOX_MODULE_PERIDOT     0x4
+#define MOX_MODULE_USB3                0x5
+#define MOX_MODULE_PASSPCI     0x6
+
+#define ARMADA_37XX_NB_GPIO_SEL        0xd0013830
+#define ARMADA_37XX_SPI_CTRL   0xd0010600
+#define ARMADA_37XX_SPI_CFG    0xd0010604
+#define ARMADA_37XX_SPI_DOUT   0xd0010608
+#define ARMADA_37XX_SPI_DIN    0xd001060c
+
+#define PCIE_PATH      "/soc/pcie@d0070000"
+
 DECLARE_GLOBAL_DATA_PTR;
 
-#ifdef CONFIG_WDT_ARMADA_3720
-static struct udevice *watchdog_dev;
+int dram_init(void)
+{
+       gd->ram_base = 0;
+       gd->ram_size = (phys_size_t)get_ram_size(0, 0x40000000);
 
-void watchdog_reset(void)
+       return 0;
+}
+
+int dram_init_banksize(void)
 {
-       static ulong next_reset;
-       ulong now;
+       gd->bd->bi_dram[0].start = (phys_addr_t)0;
+       gd->bd->bi_dram[0].size = gd->ram_size;
 
-       if (!watchdog_dev)
-               return;
+       return 0;
+}
+
+#if defined(CONFIG_OF_BOARD_FIXUP)
+int board_fix_fdt(void *blob)
+{
+       u8 topology[MAX_MOX_MODULES];
+       int i, size, node;
+       bool enable;
+
+       /*
+        * SPI driver is not loaded in driver model yet, but we have to find out
+        * if pcie should be enabled in U-Boot's device tree. Therefore we have
+        * to read SPI by reading/writing SPI registers directly
+        */
+
+       writel(0x563fa, ARMADA_37XX_NB_GPIO_SEL);
+       writel(0x10df, ARMADA_37XX_SPI_CFG);
+       writel(0x2005b, ARMADA_37XX_SPI_CTRL);
+
+       while (!(readl(ARMADA_37XX_SPI_CTRL) & 0x2))
+               udelay(1);
+
+       for (i = 0; i < MAX_MOX_MODULES; ++i) {
+               writel(0x0, ARMADA_37XX_SPI_DOUT);
+
+               while (!(readl(ARMADA_37XX_SPI_CTRL) & 0x2))
+                       udelay(1);
+
+               topology[i] = readl(ARMADA_37XX_SPI_DIN) & 0xff;
+               if (topology[i] == 0xff)
+                       break;
 
-       now = timer_get_us();
+               topology[i] &= 0xf;
+       }
+
+       size = i;
+
+       writel(0x5b, ARMADA_37XX_SPI_CTRL);
 
-       /* Do not reset the watchdog too often */
-       if (now > next_reset) {
-               wdt_reset(watchdog_dev);
-               next_reset = now + 100000;
+       if (size > 1 && (topology[1] == MOX_MODULE_PCI ||
+                        topology[1] == MOX_MODULE_USB3 ||
+                        topology[1] == MOX_MODULE_PASSPCI))
+               enable = true;
+       else
+               enable = false;
+
+       node = fdt_path_offset(blob, PCIE_PATH);
+
+       if (node < 0) {
+               printf("Cannot find PCIe node in U-Boot's device tree!\n");
+               return 0;
        }
+
+       if (fdt_setprop_string(blob, node, "status",
+                              enable ? "okay" : "disabled") < 0) {
+               printf("Cannot %s PCIe in U-Boot's device tree!\n",
+                      enable ? "enable" : "disable");
+               return 0;
+       }
+
+       return 0;
 }
 #endif
 
@@ -41,29 +124,18 @@ int board_init(void)
        /* address of boot parameters */
        gd->bd->bi_boot_params = CONFIG_SYS_SDRAM_BASE + 0x100;
 
-#ifdef CONFIG_WDT_ARMADA_3720
-       if (uclass_get_device(UCLASS_WDT, 0, &watchdog_dev)) {
-               printf("Cannot find Armada 3720 watchdog!\n");
-       } else {
-               printf("Enabling Armada 3720 watchdog (3 minutes timeout).\n");
-               wdt_start(watchdog_dev, 180000, 0);
-       }
-#endif
-
        return 0;
 }
 
-int last_stage_init(void)
+static int mox_do_spi(u8 *in, u8 *out, size_t size)
 {
        struct spi_slave *slave;
        struct udevice *dev;
-       u8 din[10], dout[10];
-       int ret, i;
-       size_t len = 0;
-       char module_topology[128];
+       int ret;
 
-       ret = spi_get_bus_and_cs(0, 1, 20000000, SPI_CPHA, "spi_generic_drv",
-                                "mox-modules@1", &dev, &slave);
+       ret = spi_get_bus_and_cs(0, 1, 1000000, SPI_CPHA | SPI_CPOL,
+                                "spi_generic_drv", "moxtet@1", &dev,
+                                &slave);
        if (ret)
                goto fail;
 
@@ -71,57 +143,411 @@ int last_stage_init(void)
        if (ret)
                goto fail_free;
 
-       memset(din, 0, 10);
-       memset(dout, 0, 10);
+       ret = spi_xfer(slave, size * 8, out, in, SPI_XFER_ONCE);
+
+       spi_release_bus(slave);
+fail_free:
+       spi_free_slave(slave);
+fail:
+       return ret;
+}
+
+static int mox_get_topology(const u8 **ptopology, int *psize, int *pis_sd)
+{
+       static int is_sd;
+       static u8 topology[MAX_MOX_MODULES - 1];
+       static int size;
+       u8 din[MAX_MOX_MODULES], dout[MAX_MOX_MODULES];
+       int ret, i;
+
+       if (size) {
+               if (ptopology)
+                       *ptopology = topology;
+               if (psize)
+                       *psize = size;
+               if (pis_sd)
+                       *pis_sd = is_sd;
+               return 0;
+       }
 
-       ret = spi_xfer(slave, 80, dout, din, SPI_XFER_ONCE);
+       memset(din, 0, MAX_MOX_MODULES);
+       memset(dout, 0, MAX_MOX_MODULES);
+
+       ret = mox_do_spi(din, dout, MAX_MOX_MODULES);
        if (ret)
-               goto fail_release;
+               return ret;
+
+       if (din[0] == 0x10)
+               is_sd = 1;
+       else if (din[0] == 0x00)
+               is_sd = 0;
+       else
+               return -ENODEV;
+
+       for (i = 1; i < MAX_MOX_MODULES && din[i] != 0xff; ++i)
+               topology[i - 1] = din[i] & 0xf;
+       size = i - 1;
+
+       if (ptopology)
+               *ptopology = topology;
+       if (psize)
+               *psize = size;
+       if (pis_sd)
+               *pis_sd = is_sd;
+
+       return 0;
+}
+
+int comphy_update_map(struct comphy_map *serdes_map, int count)
+{
+       int ret, i, size, sfpindex = -1, swindex = -1;
+       const u8 *topology;
+
+       ret = mox_get_topology(&topology, &size, NULL);
+       if (ret)
+               return ret;
+
+       for (i = 0; i < size; ++i) {
+               if (topology[i] == MOX_MODULE_SFP && sfpindex == -1)
+                       sfpindex = i;
+               else if ((topology[i] == MOX_MODULE_TOPAZ ||
+                         topology[i] == MOX_MODULE_PERIDOT) &&
+                        swindex == -1)
+                       swindex = i;
+       }
+
+       if (sfpindex >= 0 && swindex >= 0) {
+               if (sfpindex < swindex)
+                       serdes_map[0].speed = PHY_SPEED_1_25G;
+               else
+                       serdes_map[0].speed = PHY_SPEED_3_125G;
+       } else if (sfpindex >= 0) {
+               serdes_map[0].speed = PHY_SPEED_1_25G;
+       } else if (swindex >= 0) {
+               serdes_map[0].speed = PHY_SPEED_3_125G;
+       }
+
+       return 0;
+}
+
+#define SW_SMI_CMD_R(d, r)     (0x9800 | (((d) & 0x1f) << 5) | ((r) & 0x1f))
+#define SW_SMI_CMD_W(d, r)     (0x9400 | (((d) & 0x1f) << 5) | ((r) & 0x1f))
+
+static int sw_multi_read(struct mii_dev *bus, int sw, int dev, int reg)
+{
+       bus->write(bus, sw, 0, 0, SW_SMI_CMD_R(dev, reg));
+       mdelay(5);
+       return bus->read(bus, sw, 0, 1);
+}
+
+static void sw_multi_write(struct mii_dev *bus, int sw, int dev, int reg,
+                          u16 val)
+{
+       bus->write(bus, sw, 0, 1, val);
+       bus->write(bus, sw, 0, 0, SW_SMI_CMD_W(dev, reg));
+       mdelay(5);
+}
+
+static int sw_scratch_read(struct mii_dev *bus, int sw, int reg)
+{
+       sw_multi_write(bus, sw, 0x1c, 0x1a, (reg & 0x7f) << 8);
+       return sw_multi_read(bus, sw, 0x1c, 0x1a) & 0xff;
+}
+
+static void sw_led_write(struct mii_dev *bus, int sw, int port, int reg,
+                        u16 val)
+{
+       sw_multi_write(bus, sw, port, 0x16, 0x8000 | ((reg & 7) << 12)
+                                           | (val & 0x7ff));
+}
+
+static void sw_blink_leds(struct mii_dev *bus, int peridot, int topaz)
+{
+       int i, p;
+       struct {
+               int port;
+               u16 val;
+               int wait;
+       } regs[] = {
+               { 2, 0xef, 1 }, { 2, 0xfe, 1 }, { 2, 0x33, 0 },
+               { 4, 0xef, 1 }, { 4, 0xfe, 1 }, { 4, 0x33, 0 },
+               { 3, 0xfe, 1 }, { 3, 0xef, 1 }, { 3, 0x33, 0 },
+               { 1, 0xfe, 1 }, { 1, 0xef, 1 }, { 1, 0x33, 0 }
+       };
+
+       for (i = 0; i < 12; ++i) {
+               for (p = 0; p < peridot; ++p) {
+                       sw_led_write(bus, 0x10 + p, regs[i].port, 0,
+                                    regs[i].val);
+                       sw_led_write(bus, 0x10 + p, regs[i].port + 4, 0,
+                                    regs[i].val);
+               }
+               if (topaz) {
+                       sw_led_write(bus, 0x2, 0x10 + regs[i].port, 0,
+                                    regs[i].val);
+               }
 
-       if (din[0] != 0x00 && din[0] != 0xff)
-               goto fail_release;
+               if (regs[i].wait)
+                       mdelay(75);
+       }
+}
+
+static void check_switch_address(struct mii_dev *bus, int addr)
+{
+       if (sw_scratch_read(bus, addr, 0x70) >> 3 != addr)
+               printf("Check of switch MDIO address failed for 0x%02x\n",
+                      addr);
+}
+
+static int sfp, pci, topaz, peridot, usb, passpci;
+static int sfp_pos, peridot_pos[3];
+static int module_count;
+
+static int configure_peridots(struct gpio_desc *reset_gpio)
+{
+       int i, ret;
+       u8 dout[MAX_MOX_MODULES];
+
+       memset(dout, 0, MAX_MOX_MODULES);
+
+       /* set addresses of Peridot modules */
+       for (i = 0; i < peridot; ++i)
+               dout[module_count - peridot_pos[i]] = (~i) & 3;
+
+       /*
+        * if there is a SFP module connected to the last Peridot module, set
+        * the P10_SMODE to 1 for the Peridot module
+        */
+       if (sfp)
+               dout[module_count - peridot_pos[i - 1]] |= 1 << 3;
+
+       dm_gpio_set_value(reset_gpio, 1);
+       mdelay(10);
+
+       ret = mox_do_spi(NULL, dout, module_count + 1);
+
+       mdelay(10);
+       dm_gpio_set_value(reset_gpio, 0);
+
+       mdelay(50);
+
+       return ret;
+}
+
+static int get_reset_gpio(struct gpio_desc *reset_gpio)
+{
+       int node;
+
+       node = fdt_node_offset_by_compatible(gd->fdt_blob, 0, "cznic,moxtet");
+       if (node < 0) {
+               printf("Cannot find Moxtet bus device node!\n");
+               return -1;
+       }
+
+       gpio_request_by_name_nodev(offset_to_ofnode(node), "reset-gpios", 0,
+                                  reset_gpio, GPIOD_IS_OUT);
+
+       if (!dm_gpio_is_valid(reset_gpio)) {
+               printf("Cannot find reset GPIO for Moxtet bus!\n");
+               return -1;
+       }
+
+       return 0;
+}
+
+int misc_init_r(void)
+{
+       int ret;
+       u8 mac1[6], mac2[6];
+
+       ret = mbox_sp_get_board_info(NULL, mac1, mac2, NULL, NULL);
+       if (ret < 0) {
+               printf("Cannot read data from OTP!\n");
+               return 0;
+       }
+
+       if (is_valid_ethaddr(mac1) && !env_get("ethaddr"))
+               eth_env_set_enetaddr("ethaddr", mac1);
+
+       if (is_valid_ethaddr(mac2) && !env_get("eth1addr"))
+               eth_env_set_enetaddr("eth1addr", mac2);
+
+       return 0;
+}
+
+static void mox_print_info(void)
+{
+       int ret, board_version, ram_size;
+       u64 serial_number;
+       const char *pub_key;
+
+       ret = mbox_sp_get_board_info(&serial_number, NULL, NULL, &board_version,
+                                    &ram_size);
+       if (ret < 0)
+               return;
+
+       printf("Turris Mox:\n");
+       printf("  Board version: %i\n", board_version);
+       printf("  RAM size: %i MiB\n", ram_size);
+       printf("  Serial Number: %016llX\n", serial_number);
 
-       printf("Module Topology:\n");
-       for (i = 1; i < 10 && din[i] != 0xff; ++i) {
-               u8 mid = din[i] & 0xf;
-               size_t mlen;
-               const char *mname = "";
+       pub_key = mox_sp_get_ecdsa_public_key();
+       if (pub_key)
+               printf("  ECDSA Public Key: %s\n", pub_key);
+       else
+               printf("Cannot read ECDSA Public Key\n");
+}
+
+int last_stage_init(void)
+{
+       int ret, i;
+       const u8 *topology;
+       int is_sd;
+       struct mii_dev *bus;
+       struct gpio_desc reset_gpio = {};
+
+       mox_print_info();
+
+       ret = mox_get_topology(&topology, &module_count, &is_sd);
+       if (ret) {
+               printf("Cannot read module topology!\n");
+               return 0;
+       }
+
+       printf("  SD/eMMC version: %s\n", is_sd ? "SD" : "eMMC");
+
+       if (module_count)
+               printf("Module Topology:\n");
 
-               switch (mid) {
-               case 0x1:
-                       mname = "sfp-";
-                       printf("% 4i: SFP Module\n", i);
+       for (i = 0; i < module_count; ++i) {
+               switch (topology[i]) {
+               case MOX_MODULE_SFP:
+                       printf("% 4i: SFP Module\n", i + 1);
                        break;
-               case 0x2:
-                       mname = "pci-";
-                       printf("% 4i: Mini-PCIe Module\n", i);
+               case MOX_MODULE_PCI:
+                       printf("% 4i: Mini-PCIe Module\n", i + 1);
                        break;
-               case 0x3:
-                       mname = "topaz-";
-                       printf("% 4i: Topaz Switch Module\n", i);
+               case MOX_MODULE_TOPAZ:
+                       printf("% 4i: Topaz Switch Module (4-port)\n", i + 1);
+                       break;
+               case MOX_MODULE_PERIDOT:
+                       printf("% 4i: Peridot Switch Module (8-port)\n", i + 1);
+                       break;
+               case MOX_MODULE_USB3:
+                       printf("% 4i: USB 3.0 Module (4 ports)\n", i + 1);
+                       break;
+               case MOX_MODULE_PASSPCI:
+                       printf("% 4i: Passthrough Mini-PCIe Module\n", i + 1);
                        break;
                default:
-                       printf("% 4i: unknown (ID %i)\n", i, mid);
+                       printf("% 4i: unknown (ID %i)\n", i + 1, topology[i]);
+               }
+       }
+
+       /* now check if modules are connected in supported mode */
+
+       for (i = 0; i < module_count; ++i) {
+               switch (topology[i]) {
+               case MOX_MODULE_SFP:
+                       if (sfp) {
+                               printf("Error: Only one SFP module is supported!\n");
+                       } else if (topaz) {
+                               printf("Error: SFP module cannot be connected after Topaz Switch module!\n");
+                       } else {
+                               sfp_pos = i;
+                               ++sfp;
+                       }
+                       break;
+               case MOX_MODULE_PCI:
+                       if (pci) {
+                               printf("Error: Only one Mini-PCIe module is supported!\n");
+                       } else if (usb) {
+                               printf("Error: Mini-PCIe module cannot come after USB 3.0 module!\n");
+                       } else if (i && (i != 1 || !passpci)) {
+                               printf("Error: Mini-PCIe module should be the first connected module or come right after Passthrough Mini-PCIe module!\n");
+                       } else {
+                               ++pci;
+                       }
+                       break;
+               case MOX_MODULE_TOPAZ:
+                       if (topaz) {
+                               printf("Error: Only one Topaz module is supported!\n");
+                       } else if (peridot >= 3) {
+                               printf("Error: At most two Peridot modules can come before Topaz module!\n");
+                       } else {
+                               ++topaz;
+                       }
+                       break;
+               case MOX_MODULE_PERIDOT:
+                       if (sfp || topaz) {
+                               printf("Error: Peridot module must come before SFP or Topaz module!\n");
+                       } else if (peridot >= 3) {
+                               printf("Error: At most three Peridot modules are supported!\n");
+                       } else {
+                               peridot_pos[peridot] = i;
+                               ++peridot;
+                       }
+                       break;
+               case MOX_MODULE_USB3:
+                       if (pci) {
+                               printf("Error: USB 3.0 module cannot come after Mini-PCIe module!\n");
+                       } else if (usb) {
+                               printf("Error: Only one USB 3.0 module is supported!\n");
+                       } else if (i && (i != 1 || !passpci)) {
+                               printf("Error: USB 3.0 module should be the first connected module or come right after Passthrough Mini-PCIe module!\n");
+                       } else {
+                               ++usb;
+                       }
+                       break;
+               case MOX_MODULE_PASSPCI:
+                       if (passpci) {
+                               printf("Error: Only one Passthrough Mini-PCIe module is supported!\n");
+                       } else if (i != 0) {
+                               printf("Error: Passthrough Mini-PCIe module should be the first connected module!\n");
+                       } else {
+                               ++passpci;
+                       }
                }
+       }
 
-               mlen = strlen(mname);
-               if (len + mlen < sizeof(module_topology)) {
-                       strcpy(module_topology + len, mname);
-                       len += mlen;
+       /* now configure modules */
+
+       if (get_reset_gpio(&reset_gpio) < 0)
+               return 0;
+
+       if (peridot > 0) {
+               if (configure_peridots(&reset_gpio) < 0) {
+                       printf("Cannot configure Peridot modules!\n");
+                       peridot = 0;
                }
+       } else {
+               dm_gpio_set_value(&reset_gpio, 1);
+               mdelay(50);
+               dm_gpio_set_value(&reset_gpio, 0);
+               mdelay(50);
        }
-       printf("\n");
 
-       module_topology[len > 0 ? len - 1 : 0] = '\0';
+       if (peridot || topaz) {
+               /*
+                * now check if the addresses are set by reading Scratch & Misc
+                * register 0x70 of Peridot (and potentially Topaz) modules
+                */
 
-       env_set("module_topology", module_topology);
+               bus = miiphy_get_dev_by_name("neta@30000");
+               if (!bus) {
+                       printf("Cannot get MDIO bus device!\n");
+               } else {
+                       for (i = 0; i < peridot; ++i)
+                               check_switch_address(bus, 0x10 + i);
 
-fail_release:
-       spi_release_bus(slave);
-fail_free:
-       spi_free_slave(slave);
-fail:
-       if (ret)
-               printf("Cannot read module topology!\n");
-       return ret;
+                       if (topaz)
+                               check_switch_address(bus, 0x2);
+
+                       sw_blink_leds(bus, peridot, topaz);
+               }
+       }
+
+       printf("\n");
+
+       return 0;
 }