board/gateworks/gw_ventana/eeprom.c

   1 // SPDX-License-Identifier: GPL-2.0+
   2 /*
   3  * Copyright (C) 2014 Gateworks Corporation
   4  * Author: Tim Harvey <tharvey@gateworks.com>
   5  */
   6
   7 #include <common.h>
   8 #include <errno.h>
   9 #include <i2c.h>
  10 #include <malloc.h>
  11 #include <asm/bitops.h>
  12
  13 #include "gsc.h"
  14 #include "ventana_eeprom.h"
  15
  16 /* read ventana EEPROM, check for validity, and return baseboard type */
  17 int
  18 read_eeprom(int bus, struct ventana_board_info *info)
  19 {
  20         int i;
  21         int chksum;
  22         char baseboard;
  23         int type;
  24         unsigned char *buf = (unsigned char *)info;
  25
  26         memset(info, 0, sizeof(*info));
  27
  28         /*
  29          * On a board with a missing/depleted backup battery for GSC, the
  30          * board may be ready to probe the GSC before its firmware is
  31          * running.  We will wait here indefinately for the GSC/EEPROM.
  32          */
  33         while (1) {
  34                 if (0 == i2c_set_bus_num(bus) &&
  35                     0 == i2c_probe(GSC_EEPROM_ADDR))
  36                         break;
  37                 mdelay(1);
  38         }
  39
  40         /* read eeprom config section */
  41         if (gsc_i2c_read(GSC_EEPROM_ADDR, 0x00, 1, buf, sizeof(*info))) {
  42                 puts("EEPROM: Failed to read EEPROM\n");
  43                 return GW_UNKNOWN;
  44         }
  45
  46         /* sanity checks */
  47         if (info->model[0] != 'G' || info->model[1] != 'W') {
  48                 puts("EEPROM: Invalid Model in EEPROM\n");
  49                 return GW_UNKNOWN;
  50         }
  51
  52         /* validate checksum */
  53         for (chksum = 0, i = 0; i < sizeof(*info)-2; i++)
  54                 chksum += buf[i];
  55         if ((info->chksum[0] != chksum>>8) ||
  56             (info->chksum[1] != (chksum&0xff))) {
  57                 puts("EEPROM: Failed EEPROM checksum\n");
  58                 return GW_UNKNOWN;
  59         }
  60
  61         /* original GW5400-A prototype */
  62         baseboard = info->model[3];
  63         if (strncasecmp((const char *)info->model, "GW5400-A", 8) == 0)
  64                 baseboard = '0';
  65
  66         type = GW_UNKNOWN;
  67         switch (baseboard) {
  68         case '0': /* original GW5400-A prototype */
  69                 type = GW54proto;
  70                 break;
  71         case '1':
  72                 type = GW51xx;
  73                 break;
  74         case '2':
  75                 type = GW52xx;
  76                 break;
  77         case '3':
  78                 type = GW53xx;
  79                 break;
  80         case '4':
  81                 type = GW54xx;
  82                 break;
  83         case '5':
  84                 if (info->model[4] == '1') {
  85                         type = GW551x;
  86                         break;
  87                 } else if (info->model[4] == '2') {
  88                         type = GW552x;
  89                         break;
  90                 } else if (info->model[4] == '3') {
  91                         type = GW553x;
  92                         break;
  93                 }
  94                 break;
  95         case '6':
  96                 if (info->model[4] == '0')
  97                         type = GW560x;
  98                 break;
  99         case '9':
 100                 if (info->model[4] == '0' && info->model[5] == '3')
 101                         type = GW5903;
 102                 else if (info->model[4] == '0' && info->model[5] == '4')
 103                         type = GW5904;
 104                 else if (info->model[4] == '0' && info->model[5] == '5')
 105                         type = GW5905;
 106                 else if (info->model[4] == '0' && info->model[5] == '6')
 107                         type = GW5906;
 108                 else if (info->model[4] == '0' && info->model[5] == '7')
 109                         type = GW5907;
 110                 break;
 111         }
 112         return type;
 113 }
 114
 115 /* list of config bits that the bootloader will remove from dtb if not set */
 116 struct ventana_eeprom_config econfig[] = {
 117         { "eth0", "ethernet0", EECONFIG_ETH0 },
 118         { "usb0", NULL, EECONFIG_USB0 },
 119         { "usb1", NULL, EECONFIG_USB1 },
 120         { "mmc0", NULL, EECONFIG_SD0 },
 121         { "mmc1", NULL, EECONFIG_SD1 },
 122         { "mmc2", NULL, EECONFIG_SD2 },
 123         { "mmc3", NULL, EECONFIG_SD3 },
 124         { /* Sentinel */ }
 125 };
 126
 127 #if defined(CONFIG_CMD_EECONFIG) && !defined(CONFIG_SPL_BUILD)
 128 static struct ventana_eeprom_config *get_config(const char *name)
 129 {
 130         struct ventana_eeprom_config *cfg = econfig;
 131
 132         while (cfg->name) {
 133                 if (0 == strcmp(name, cfg->name))
 134                         return cfg;
 135                 cfg++;
 136         }
 137         return NULL;
 138 }
 139
 140 static u8 econfig_bytes[sizeof(ventana_info.config)];
 141 static int econfig_init = -1;
 142
 143 static int do_econfig(cmd_tbl_t *cmdtp, int flag, int argc, char * const argv[])
 144 {
 145         struct ventana_eeprom_config *cfg;
 146         struct ventana_board_info *info = &ventana_info;
 147         int i;
 148
 149         if (argc < 2)
 150                 return CMD_RET_USAGE;
 151
 152         /* initialize */
 153         if (econfig_init != 1) {
 154                 memcpy(econfig_bytes, info->config, sizeof(econfig_bytes));
 155                 econfig_init = 1;
 156         }
 157
 158         /* list configs */
 159         if ((strncmp(argv[1], "list", 4) == 0)) {
 160                 cfg = econfig;
 161                 while (cfg->name) {
 162                         printf("%s: %d\n", cfg->name,
 163                                test_bit(cfg->bit, econfig_bytes) ?  1 : 0);
 164                         cfg++;
 165                 }
 166         }
 167
 168         /* save */
 169         else if ((strncmp(argv[1], "save", 4) == 0)) {
 170                 unsigned char *buf = (unsigned char *)info;
 171                 int chksum;
 172
 173                 /* calculate new checksum */
 174                 memcpy(info->config, econfig_bytes, sizeof(econfig_bytes));
 175                 for (chksum = 0, i = 0; i < sizeof(*info)-2; i++)
 176                         chksum += buf[i];
 177                 debug("old chksum:0x%04x\n",
 178                       (info->chksum[0] << 8) | info->chksum[1]);
 179                 debug("new chksum:0x%04x\n", chksum);
 180                 info->chksum[0] = chksum >> 8;
 181                 info->chksum[1] = chksum & 0xff;
 182
 183                 /* write new config data */
 184                 if (gsc_i2c_write(GSC_EEPROM_ADDR, info->config - (u8 *)info,
 185                                   1, econfig_bytes, sizeof(econfig_bytes))) {
 186                         printf("EEPROM: Failed updating config\n");
 187                         return CMD_RET_FAILURE;
 188                 }
 189
 190                 /* write new config data */
 191                 if (gsc_i2c_write(GSC_EEPROM_ADDR, info->chksum - (u8 *)info,
 192                                   1, info->chksum, 2)) {
 193                         printf("EEPROM: Failed updating checksum\n");
 194                         return CMD_RET_FAILURE;
 195                 }
 196
 197                 printf("Config saved to EEPROM\n");
 198         }
 199
 200         /* get config */
 201         else if (argc == 2) {
 202                 cfg = get_config(argv[1]);
 203                 if (cfg) {
 204                         printf("%s: %d\n", cfg->name,
 205                                test_bit(cfg->bit, econfig_bytes) ? 1 : 0);
 206                 } else {
 207                         printf("invalid config: %s\n", argv[1]);
 208                         return CMD_RET_FAILURE;
 209                 }
 210         }
 211
 212         /* set config */
 213         else if (argc == 3) {
 214                 cfg = get_config(argv[1]);
 215                 if (cfg) {
 216                         if (simple_strtol(argv[2], NULL, 10)) {
 217                                 test_and_set_bit(cfg->bit, econfig_bytes);
 218                                 printf("Enabled %s\n", cfg->name);
 219                         } else {
 220                                 test_and_clear_bit(cfg->bit, econfig_bytes);
 221                                 printf("Disabled %s\n", cfg->name);
 222                         }
 223                 } else {
 224                         printf("invalid config: %s\n", argv[1]);
 225                         return CMD_RET_FAILURE;
 226                 }
 227         }
 228
 229         else
 230                 return CMD_RET_USAGE;
 231
 232         return CMD_RET_SUCCESS;
 233 }
 234
 235 U_BOOT_CMD(
 236         econfig, 3, 0, do_econfig,
 237         "EEPROM configuration",
 238         "list - list config\n"
 239         "save - save config to EEPROM\n"
 240         "<name> - get config 'name'\n"
 241         "<name> [0|1] - set config 'name' to value\n"
 242 );
 243
 244 #endif /* CONFIG_CMD_EECONFIG */