board/Synology/ds414/cmd_syno.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * Commands to deal with Synology specifics.
   4  *
   5  * Copyright (C) 2015  Phil Sutter <phil@nwl.cc>
   6  */
   7
   8 #include <common.h>
   9 #include <div64.h>
  10 #include <env.h>
  11 #include <spi.h>
  12 #include <spi_flash.h>
  13 #include <linux/mtd/mtd.h>
  14
  15 #include <asm/io.h>
  16 #include "../drivers/ddr/marvell/axp/ddr3_init.h"
  17
  18 #define ETHADDR_MAX             4
  19 #define SYNO_SN_TAG             "SN="
  20 #define SYNO_CHKSUM_TAG         "CHK="
  21
  22
  23 static int do_syno_populate(int argc, char * const argv[])
  24 {
  25         unsigned int bus = CONFIG_SF_DEFAULT_BUS;
  26         unsigned int cs = CONFIG_SF_DEFAULT_CS;
  27         unsigned int speed = CONFIG_SF_DEFAULT_SPEED;
  28         unsigned int mode = CONFIG_SF_DEFAULT_MODE;
  29         struct spi_flash *flash;
  30         unsigned long addr = 0x80000; /* XXX: parameterize this? */
  31         loff_t offset = 0x007d0000;
  32         loff_t len = 0x00010000;
  33         char *buf, *bufp;
  34         char var[128];
  35         char val[128];
  36         int ret, n;
  37
  38         /* XXX: arg parsing to select flash here? */
  39
  40         flash = spi_flash_probe(bus, cs, speed, mode);
  41         if (!flash) {
  42                 printf("Failed to initialize SPI flash at %u:%u\n", bus, cs);
  43                 return 1;
  44         }
  45
  46         buf = map_physmem(addr, len, MAP_WRBACK);
  47         if (!buf) {
  48                 puts("Failed to map physical memory\n");
  49                 return 1;
  50         }
  51
  52         ret = spi_flash_read(flash, offset, len, buf);
  53         if (ret) {
  54                 puts("Failed to read from SPI flash\n");
  55                 goto out_unmap;
  56         }
  57
  58         for (n = 0; n < ETHADDR_MAX; n++) {
  59                 char ethaddr[ETH_ALEN];
  60                 int i, sum = 0;
  61                 unsigned char csum = 0;
  62
  63                 for (i = 0, bufp = buf + n * 7; i < ETH_ALEN; i++) {
  64                         sum += bufp[i];
  65                         csum += bufp[i];
  66                         ethaddr[i] = bufp[i];
  67                 }
  68                 if (!sum)               /* MAC address empty */
  69                         continue;
  70                 if (csum != bufp[i]) {  /* seventh byte is checksum value */
  71                         printf("Invalid MAC address for interface %d!\n", n);
  72                         continue;
  73                 }
  74                 if (n == 0)
  75                         sprintf(var, "ethaddr");
  76                 else
  77                         sprintf(var, "eth%daddr", n);
  78                 snprintf(val, sizeof(val) - 1,
  79                          "%02x:%02x:%02x:%02x:%02x:%02x",
  80                          ethaddr[0], ethaddr[1], ethaddr[2],
  81                          ethaddr[3], ethaddr[4], ethaddr[5]);
  82                 printf("parsed %s = %s\n", var, val);
  83                 env_set(var, val);
  84         }
  85         if (!strncmp(buf + 32, SYNO_SN_TAG, strlen(SYNO_SN_TAG))) {
  86                 char *snp, *csump;
  87                 int csum = 0;
  88                 unsigned long c;
  89
  90                 snp = bufp = buf + 32 + strlen(SYNO_SN_TAG);
  91                 for (n = 0; bufp[n] && bufp[n] != ','; n++)
  92                         csum += bufp[n];
  93                 bufp[n] = '\0';
  94
  95                 /* should come right after, but you never know */
  96                 bufp = strstr(bufp + n + 1, SYNO_CHKSUM_TAG);
  97                 if (!bufp) {
  98                         printf("Serial number checksum tag missing!\n");
  99                         goto out_unmap;
 100                 }
 101
 102                 csump = bufp += strlen(SYNO_CHKSUM_TAG);
 103                 for (n = 0; bufp[n] && bufp[n] != ','; n++)
 104                         ;
 105                 bufp[n] = '\0';
 106
 107                 if (strict_strtoul(csump, 10, &c) || c != csum) {
 108                         puts("Invalid serial number found!\n");
 109                         ret = 1;
 110                         goto out_unmap;
 111                 }
 112                 printf("parsed SN = %s\n", snp);
 113                 env_set("SN", snp);
 114         } else {        /* old style format */
 115                 unsigned char csum = 0;
 116
 117                 for (n = 0, bufp = buf + 32; n < 10; n++)
 118                         csum += bufp[n];
 119
 120                 if (csum != bufp[n]) {
 121                         puts("Invalid serial number found!\n");
 122                         ret = 1;
 123                         goto out_unmap;
 124                 }
 125                 bufp[n] = '\0';
 126                 printf("parsed SN = %s\n", buf + 32);
 127                 env_set("SN", buf + 32);
 128         }
 129 out_unmap:
 130         unmap_physmem(buf, len);
 131         return ret;
 132 }
 133
 134 /* map bit position to function in POWER_MNG_CTRL_REG */
 135 static const char * const pwr_mng_bit_func[] = {
 136         "audio",
 137         "ge3", "ge2", "ge1", "ge0",
 138         "pcie00", "pcie01", "pcie02", "pcie03",
 139         "pcie10", "pcie11", "pcie12", "pcie13",
 140         "bp",
 141         "sata0_link", "sata0_core",
 142         "lcd",
 143         "sdio",
 144         "usb0", "usb1", "usb2",
 145         "idma", "xor0", "crypto",
 146         NULL,
 147         "tdm",
 148         "pcie20", "pcie30",
 149         "xor1",
 150         "sata1_link", "sata1_core",
 151         NULL,
 152 };
 153
 154 static int do_syno_clk_gate(int argc, char * const argv[])
 155 {
 156         u32 pwr_mng_ctrl_reg = reg_read(POWER_MNG_CTRL_REG);
 157         const char *func, *state;
 158         int i, val;
 159
 160         if (argc < 2)
 161                 return -1;
 162
 163         if (!strcmp(argv[1], "get")) {
 164                 puts("Clock Gating:\n");
 165                 for (i = 0; i < 32; i++) {
 166                         func = pwr_mng_bit_func[i];
 167                         if (!func)
 168                                 continue;
 169                         state = pwr_mng_ctrl_reg & (1 << i) ?  "ON" : "OFF";
 170                         printf("%s:\t\t%s\n", func, state);
 171                 }
 172                 return 0;
 173         }
 174         if (argc < 4)
 175                 return -1;
 176         if (!strcmp(argv[1], "set")) {
 177                 func = argv[2];
 178                 state = argv[3];
 179                 for (i = 0; i < 32; i++) {
 180                         if (!pwr_mng_bit_func[i])
 181                                 continue;
 182                         if (!strcmp(func, pwr_mng_bit_func[i]))
 183                                 break;
 184                 }
 185                 if (i == 32) {
 186                         printf("Error: name '%s' not known\n", func);
 187                         return -1;
 188                 }
 189                 val = state[0] != '0';
 190                 pwr_mng_ctrl_reg |= (val << i);
 191                 pwr_mng_ctrl_reg &= ~(!val << i);
 192                 reg_write(POWER_MNG_CTRL_REG, pwr_mng_ctrl_reg);
 193         }
 194         return 0;
 195 }
 196
 197 static int do_syno(cmd_tbl_t *cmdtp, int flag,
 198                    int argc, char * const argv[])
 199 {
 200         const char *cmd;
 201         int ret = 0;
 202
 203         if (argc < 2)
 204                 goto usage;
 205
 206         cmd = argv[1];
 207         --argc;
 208         ++argv;
 209
 210         if (!strcmp(cmd, "populate_env"))
 211                 ret = do_syno_populate(argc, argv);
 212         else if (!strcmp(cmd, "clk_gate"))
 213                 ret = do_syno_clk_gate(argc, argv);
 214
 215         if (ret != -1)
 216                 return ret;
 217 usage:
 218         return CMD_RET_USAGE;
 219 }
 220
 221 U_BOOT_CMD(
 222         syno, 5, 1, do_syno,
 223         "Synology specific commands",
 224         "populate_env                 - Read vendor data from SPI flash into environment\n"
 225         "clk_gate (get|set name 1|0)  - Manage clock gating\n"
 226 );