drivers/net/e1000_spi.c

   1 #include <common.h>
   2 #include "e1000.h"
   3 #include <linux/compiler.h>
   4
   5 /*-----------------------------------------------------------------------
   6  * SPI transfer
   7  *
   8  * This writes "bitlen" bits out the SPI MOSI port and simultaneously clocks
   9  * "bitlen" bits in the SPI MISO port.  That's just the way SPI works.
  10  *
  11  * The source of the outgoing bits is the "dout" parameter and the
  12  * destination of the input bits is the "din" parameter.  Note that "dout"
  13  * and "din" can point to the same memory location, in which case the
  14  * input data overwrites the output data (since both are buffered by
  15  * temporary variables, this is OK).
  16  *
  17  * This may be interrupted with Ctrl-C if "intr" is true, otherwise it will
  18  * never return an error.
  19  */
  20 static int e1000_spi_xfer(struct e1000_hw *hw, unsigned int bitlen,
  21                 const void *dout_mem, void *din_mem, bool intr)
  22 {
  23         const uint8_t *dout = dout_mem;
  24         uint8_t *din = din_mem;
  25
  26         uint8_t mask = 0;
  27         uint32_t eecd;
  28         unsigned long i;
  29
  30         /* Pre-read the control register */
  31         eecd = E1000_READ_REG(hw, EECD);
  32
  33         /* Iterate over each bit */
  34         for (i = 0, mask = 0x80; i < bitlen; i++, mask = (mask >> 1)?:0x80) {
  35                 /* Check for interrupt */
  36                 if (intr && ctrlc())
  37                         return -1;
  38
  39                 /* Determine the output bit */
  40                 if (dout && dout[i >> 3] & mask)
  41                         eecd |=  E1000_EECD_DI;
  42                 else
  43                         eecd &= ~E1000_EECD_DI;
  44
  45                 /* Write the output bit and wait 50us */
  46                 E1000_WRITE_REG(hw, EECD, eecd);
  47                 E1000_WRITE_FLUSH(hw);
  48                 udelay(50);
  49
  50                 /* Poke the clock (waits 50us) */
  51                 e1000_raise_ee_clk(hw, &eecd);
  52
  53                 /* Now read the input bit */
  54                 eecd = E1000_READ_REG(hw, EECD);
  55                 if (din) {
  56                         if (eecd & E1000_EECD_DO)
  57                                 din[i >> 3] |=  mask;
  58                         else
  59                                 din[i >> 3] &= ~mask;
  60                 }
  61
  62                 /* Poke the clock again (waits 50us) */
  63                 e1000_lower_ee_clk(hw, &eecd);
  64         }
  65
  66         /* Now clear any remaining bits of the input */
  67         if (din && (i & 7))
  68                 din[i >> 3] &= ~((mask << 1) - 1);
  69
  70         return 0;
  71 }
  72
  73 #ifdef CONFIG_E1000_SPI_GENERIC
  74 static inline struct e1000_hw *e1000_hw_from_spi(struct spi_slave *spi)
  75 {
  76         return container_of(spi, struct e1000_hw, spi);
  77 }
  78
  79 /* Not sure why all of these are necessary */
  80 void spi_init_r(void) { /* Nothing to do */ }
  81 void spi_init_f(void) { /* Nothing to do */ }
  82 void spi_init(void)   { /* Nothing to do */ }
  83
  84 struct spi_slave *spi_setup_slave(unsigned int bus, unsigned int cs,
  85                 unsigned int max_hz, unsigned int mode)
  86 {
  87         /* Find the right PCI device */
  88         struct e1000_hw *hw = e1000_find_card(bus);
  89         if (!hw) {
  90                 printf("ERROR: No such e1000 device: e1000#%u\n", bus);
  91                 return NULL;
  92         }
  93
  94         /* Make sure it has an SPI chip */
  95         if (hw->eeprom.type != e1000_eeprom_spi) {
  96                 E1000_ERR(hw->nic, "No attached SPI EEPROM found!\n");
  97                 return NULL;
  98         }
  99
 100         /* Argument sanity checks */
 101         if (cs != 0) {
 102                 E1000_ERR(hw->nic, "No such SPI chip: %u\n", cs);
 103                 return NULL;
 104         }
 105         if (mode != SPI_MODE_0) {
 106                 E1000_ERR(hw->nic, "Only SPI MODE-0 is supported!\n");
 107                 return NULL;
 108         }
 109
 110         /* TODO: Use max_hz somehow */
 111         E1000_DBG(hw->nic, "EEPROM SPI access requested\n");
 112         return &hw->spi;
 113 }
 114
 115 void spi_free_slave(struct spi_slave *spi)
 116 {
 117         __maybe_unused struct e1000_hw *hw = e1000_hw_from_spi(spi);
 118         E1000_DBG(hw->nic, "EEPROM SPI access released\n");
 119 }
 120
 121 int spi_claim_bus(struct spi_slave *spi)
 122 {
 123         struct e1000_hw *hw = e1000_hw_from_spi(spi);
 124
 125         if (e1000_acquire_eeprom(hw)) {
 126                 E1000_ERR(hw->nic, "EEPROM SPI cannot be acquired!\n");
 127                 return -1;
 128         }
 129
 130         return 0;
 131 }
 132
 133 void spi_release_bus(struct spi_slave *spi)
 134 {
 135         struct e1000_hw *hw = e1000_hw_from_spi(spi);
 136         e1000_release_eeprom(hw);
 137 }
 138
 139 /* Skinny wrapper around e1000_spi_xfer */
 140 int spi_xfer(struct spi_slave *spi, unsigned int bitlen,
 141                 const void *dout_mem, void *din_mem, unsigned long flags)
 142 {
 143         struct e1000_hw *hw = e1000_hw_from_spi(spi);
 144         int ret;
 145
 146         if (flags & SPI_XFER_BEGIN)
 147                 e1000_standby_eeprom(hw);
 148
 149         ret = e1000_spi_xfer(hw, bitlen, dout_mem, din_mem, true);
 150
 151         if (flags & SPI_XFER_END)
 152                 e1000_standby_eeprom(hw);
 153
 154         return ret;
 155 }
 156
 157 #endif /* not CONFIG_E1000_SPI_GENERIC */
 158
 159 #ifdef CONFIG_CMD_E1000
 160
 161 /* The EEPROM opcodes */
 162 #define SPI_EEPROM_ENABLE_WR    0x06
 163 #define SPI_EEPROM_DISABLE_WR   0x04
 164 #define SPI_EEPROM_WRITE_STATUS 0x01
 165 #define SPI_EEPROM_READ_STATUS  0x05
 166 #define SPI_EEPROM_WRITE_PAGE   0x02
 167 #define SPI_EEPROM_READ_PAGE    0x03
 168
 169 /* The EEPROM status bits */
 170 #define SPI_EEPROM_STATUS_BUSY  0x01
 171 #define SPI_EEPROM_STATUS_WREN  0x02
 172
 173 static int e1000_spi_eeprom_enable_wr(struct e1000_hw *hw, bool intr)
 174 {
 175         u8 op[] = { SPI_EEPROM_ENABLE_WR };
 176         e1000_standby_eeprom(hw);
 177         return e1000_spi_xfer(hw, 8*sizeof(op), op, NULL, intr);
 178 }
 179
 180 /*
 181  * These have been tested to perform correctly, but they are not used by any
 182  * of the EEPROM commands at this time.
 183  */
 184 #if 0
 185 static int e1000_spi_eeprom_disable_wr(struct e1000_hw *hw, bool intr)
 186 {
 187         u8 op[] = { SPI_EEPROM_DISABLE_WR };
 188         e1000_standby_eeprom(hw);
 189         return e1000_spi_xfer(hw, 8*sizeof(op), op, NULL, intr);
 190 }
 191
 192 static int e1000_spi_eeprom_write_status(struct e1000_hw *hw,
 193                 u8 status, bool intr)
 194 {
 195         u8 op[] = { SPI_EEPROM_WRITE_STATUS, status };
 196         e1000_standby_eeprom(hw);
 197         return e1000_spi_xfer(hw, 8*sizeof(op), op, NULL, intr);
 198 }
 199 #endif
 200
 201 static int e1000_spi_eeprom_read_status(struct e1000_hw *hw, bool intr)
 202 {
 203         u8 op[] = { SPI_EEPROM_READ_STATUS, 0 };
 204         e1000_standby_eeprom(hw);
 205         if (e1000_spi_xfer(hw, 8*sizeof(op), op, op, intr))
 206                 return -1;
 207         return op[1];
 208 }
 209
 210 static int e1000_spi_eeprom_write_page(struct e1000_hw *hw,
 211                 const void *data, u16 off, u16 len, bool intr)
 212 {
 213         u8 op[] = {
 214                 SPI_EEPROM_WRITE_PAGE,
 215                 (off >> (hw->eeprom.address_bits - 8)) & 0xff, off & 0xff
 216         };
 217
 218         e1000_standby_eeprom(hw);
 219
 220         if (e1000_spi_xfer(hw, 8 + hw->eeprom.address_bits, op, NULL, intr))
 221                 return -1;
 222         if (e1000_spi_xfer(hw, len << 3, data, NULL, intr))
 223                 return -1;
 224
 225         return 0;
 226 }
 227
 228 static int e1000_spi_eeprom_read_page(struct e1000_hw *hw,
 229                 void *data, u16 off, u16 len, bool intr)
 230 {
 231         u8 op[] = {
 232                 SPI_EEPROM_READ_PAGE,
 233                 (off >> (hw->eeprom.address_bits - 8)) & 0xff, off & 0xff
 234         };
 235
 236         e1000_standby_eeprom(hw);
 237
 238         if (e1000_spi_xfer(hw, 8 + hw->eeprom.address_bits, op, NULL, intr))
 239                 return -1;
 240         if (e1000_spi_xfer(hw, len << 3, NULL, data, intr))
 241                 return -1;
 242
 243         return 0;
 244 }
 245
 246 static int e1000_spi_eeprom_poll_ready(struct e1000_hw *hw, bool intr)
 247 {
 248         int status;
 249         while ((status = e1000_spi_eeprom_read_status(hw, intr)) >= 0) {
 250                 if (!(status & SPI_EEPROM_STATUS_BUSY))
 251                         return 0;
 252         }
 253         return -1;
 254 }
 255
 256 static int e1000_spi_eeprom_dump(struct e1000_hw *hw,
 257                 void *data, u16 off, unsigned int len, bool intr)
 258 {
 259         /* Interruptibly wait for the EEPROM to be ready */
 260         if (e1000_spi_eeprom_poll_ready(hw, intr))
 261                 return -1;
 262
 263         /* Dump each page in sequence */
 264         while (len) {
 265                 /* Calculate the data bytes on this page */
 266                 u16 pg_off = off & (hw->eeprom.page_size - 1);
 267                 u16 pg_len = hw->eeprom.page_size - pg_off;
 268                 if (pg_len > len)
 269                         pg_len = len;
 270
 271                 /* Now dump the page */
 272                 if (e1000_spi_eeprom_read_page(hw, data, off, pg_len, intr))
 273                         return -1;
 274
 275                 /* Otherwise go on to the next page */
 276                 len  -= pg_len;
 277                 off  += pg_len;
 278                 data += pg_len;
 279         }
 280
 281         /* We're done! */
 282         return 0;
 283 }
 284
 285 static int e1000_spi_eeprom_program(struct e1000_hw *hw,
 286                 const void *data, u16 off, u16 len, bool intr)
 287 {
 288         /* Program each page in sequence */
 289         while (len) {
 290                 /* Calculate the data bytes on this page */
 291                 u16 pg_off = off & (hw->eeprom.page_size - 1);
 292                 u16 pg_len = hw->eeprom.page_size - pg_off;
 293                 if (pg_len > len)
 294                         pg_len = len;
 295
 296                 /* Interruptibly wait for the EEPROM to be ready */
 297                 if (e1000_spi_eeprom_poll_ready(hw, intr))
 298                         return -1;
 299
 300                 /* Enable write access */
 301                 if (e1000_spi_eeprom_enable_wr(hw, intr))
 302                         return -1;
 303
 304                 /* Now program the page */
 305                 if (e1000_spi_eeprom_write_page(hw, data, off, pg_len, intr))
 306                         return -1;
 307
 308                 /* Otherwise go on to the next page */
 309                 len  -= pg_len;
 310                 off  += pg_len;
 311                 data += pg_len;
 312         }
 313
 314         /* Wait for the last write to complete */
 315         if (e1000_spi_eeprom_poll_ready(hw, intr))
 316                 return -1;
 317
 318         /* We're done! */
 319         return 0;
 320 }
 321
 322 static int do_e1000_spi_show(cmd_tbl_t *cmdtp, struct e1000_hw *hw,
 323                 int argc, char * const argv[])
 324 {
 325         unsigned int length = 0;
 326         u16 i, offset = 0;
 327         u8 *buffer;
 328         int err;
 329
 330         if (argc > 2) {
 331                 cmd_usage(cmdtp);
 332                 return 1;
 333         }
 334
 335         /* Parse the offset and length */
 336         if (argc >= 1)
 337                 offset = simple_strtoul(argv[0], NULL, 0);
 338         if (argc == 2)
 339                 length = simple_strtoul(argv[1], NULL, 0);
 340         else if (offset < (hw->eeprom.word_size << 1))
 341                 length = (hw->eeprom.word_size << 1) - offset;
 342
 343         /* Extra sanity checks */
 344         if (!length) {
 345                 E1000_ERR(hw->nic, "Requested zero-sized dump!\n");
 346                 return 1;
 347         }
 348         if ((0x10000 < length) || (0x10000 - length < offset)) {
 349                 E1000_ERR(hw->nic, "Can't dump past 0xFFFF!\n");
 350                 return 1;
 351         }
 352
 353         /* Allocate a buffer to hold stuff */
 354         buffer = malloc(length);
 355         if (!buffer) {
 356                 E1000_ERR(hw->nic, "Out of Memory!\n");
 357                 return 1;
 358         }
 359
 360         /* Acquire the EEPROM and perform the dump */
 361         if (e1000_acquire_eeprom(hw)) {
 362                 E1000_ERR(hw->nic, "EEPROM SPI cannot be acquired!\n");
 363                 free(buffer);
 364                 return 1;
 365         }
 366         err = e1000_spi_eeprom_dump(hw, buffer, offset, length, true);
 367         e1000_release_eeprom(hw);
 368         if (err) {
 369                 E1000_ERR(hw->nic, "Interrupted!\n");
 370                 free(buffer);
 371                 return 1;
 372         }
 373
 374         /* Now hexdump the result */
 375         printf("%s: ===== Intel e1000 EEPROM (0x%04hX - 0x%04hX) =====",
 376                         hw->nic->name, offset, offset + length - 1);
 377         for (i = 0; i < length; i++) {
 378                 if ((i & 0xF) == 0)
 379                         printf("\n%s: %04hX: ", hw->nic->name, offset + i);
 380                 else if ((i & 0xF) == 0x8)
 381                         printf(" ");
 382                 printf(" %02hx", buffer[i]);
 383         }
 384         printf("\n");
 385
 386         /* Success! */
 387         free(buffer);
 388         return 0;
 389 }
 390
 391 static int do_e1000_spi_dump(cmd_tbl_t *cmdtp, struct e1000_hw *hw,
 392                 int argc, char * const argv[])
 393 {
 394         unsigned int length;
 395         u16 offset;
 396         void *dest;
 397
 398         if (argc != 3) {
 399                 cmd_usage(cmdtp);
 400                 return 1;
 401         }
 402
 403         /* Parse the arguments */
 404         dest = (void *)simple_strtoul(argv[0], NULL, 16);
 405         offset = simple_strtoul(argv[1], NULL, 0);
 406         length = simple_strtoul(argv[2], NULL, 0);
 407
 408         /* Extra sanity checks */
 409         if (!length) {
 410                 E1000_ERR(hw->nic, "Requested zero-sized dump!\n");
 411                 return 1;
 412         }
 413         if ((0x10000 < length) || (0x10000 - length < offset)) {
 414                 E1000_ERR(hw->nic, "Can't dump past 0xFFFF!\n");
 415                 return 1;
 416         }
 417
 418         /* Acquire the EEPROM */
 419         if (e1000_acquire_eeprom(hw)) {
 420                 E1000_ERR(hw->nic, "EEPROM SPI cannot be acquired!\n");
 421                 return 1;
 422         }
 423
 424         /* Perform the programming operation */
 425         if (e1000_spi_eeprom_dump(hw, dest, offset, length, true) < 0) {
 426                 E1000_ERR(hw->nic, "Interrupted!\n");
 427                 e1000_release_eeprom(hw);
 428                 return 1;
 429         }
 430
 431         e1000_release_eeprom(hw);
 432         printf("%s: ===== EEPROM DUMP COMPLETE =====\n", hw->nic->name);
 433         return 0;
 434 }
 435
 436 static int do_e1000_spi_program(cmd_tbl_t *cmdtp, struct e1000_hw *hw,
 437                 int argc, char * const argv[])
 438 {
 439         unsigned int length;
 440         const void *source;
 441         u16 offset;
 442
 443         if (argc != 3) {
 444                 cmd_usage(cmdtp);
 445                 return 1;
 446         }
 447
 448         /* Parse the arguments */
 449         source = (const void *)simple_strtoul(argv[0], NULL, 16);
 450         offset = simple_strtoul(argv[1], NULL, 0);
 451         length = simple_strtoul(argv[2], NULL, 0);
 452
 453         /* Acquire the EEPROM */
 454         if (e1000_acquire_eeprom(hw)) {
 455                 E1000_ERR(hw->nic, "EEPROM SPI cannot be acquired!\n");
 456                 return 1;
 457         }
 458
 459         /* Perform the programming operation */
 460         if (e1000_spi_eeprom_program(hw, source, offset, length, true) < 0) {
 461                 E1000_ERR(hw->nic, "Interrupted!\n");
 462                 e1000_release_eeprom(hw);
 463                 return 1;
 464         }
 465
 466         e1000_release_eeprom(hw);
 467         printf("%s: ===== EEPROM PROGRAMMED =====\n", hw->nic->name);
 468         return 0;
 469 }
 470
 471 static int do_e1000_spi_checksum(cmd_tbl_t *cmdtp, struct e1000_hw *hw,
 472                 int argc, char * const argv[])
 473 {
 474         uint16_t i, length, checksum = 0, checksum_reg;
 475         uint16_t *buffer;
 476         bool upd;
 477
 478         if (argc == 0)
 479                 upd = 0;
 480         else if ((argc == 1) && !strcmp(argv[0], "update"))
 481                 upd = 1;
 482         else {
 483                 cmd_usage(cmdtp);
 484                 return 1;
 485         }
 486
 487         /* Allocate a temporary buffer */
 488         length = sizeof(uint16_t) * (EEPROM_CHECKSUM_REG + 1);
 489         buffer = malloc(length);
 490         if (!buffer) {
 491                 E1000_ERR(hw->nic, "Unable to allocate EEPROM buffer!\n");
 492                 return 1;
 493         }
 494
 495         /* Acquire the EEPROM */
 496         if (e1000_acquire_eeprom(hw)) {
 497                 E1000_ERR(hw->nic, "EEPROM SPI cannot be acquired!\n");
 498                 return 1;
 499         }
 500
 501         /* Read the EEPROM */
 502         if (e1000_spi_eeprom_dump(hw, buffer, 0, length, true) < 0) {
 503                 E1000_ERR(hw->nic, "Interrupted!\n");
 504                 e1000_release_eeprom(hw);
 505                 return 1;
 506         }
 507
 508         /* Compute the checksum and read the expected value */
 509         for (i = 0; i < EEPROM_CHECKSUM_REG; i++)
 510                 checksum += le16_to_cpu(buffer[i]);
 511         checksum = ((uint16_t)EEPROM_SUM) - checksum;
 512         checksum_reg = le16_to_cpu(buffer[i]);
 513
 514         /* Verify it! */
 515         if (checksum_reg == checksum) {
 516                 printf("%s: INFO: EEPROM checksum is correct! (0x%04hx)\n",
 517                                 hw->nic->name, checksum);
 518                 e1000_release_eeprom(hw);
 519                 return 0;
 520         }
 521
 522         /* Hrm, verification failed, print an error */
 523         E1000_ERR(hw->nic, "EEPROM checksum is incorrect!\n");
 524         E1000_ERR(hw->nic, "  ...register was 0x%04hx, calculated 0x%04hx\n",
 525                         checksum_reg, checksum);
 526
 527         /* If they didn't ask us to update it, just return an error */
 528         if (!upd) {
 529                 e1000_release_eeprom(hw);
 530                 return 1;
 531         }
 532
 533         /* Ok, correct it! */
 534         printf("%s: Reprogramming the EEPROM checksum...\n", hw->nic->name);
 535         buffer[i] = cpu_to_le16(checksum);
 536         if (e1000_spi_eeprom_program(hw, &buffer[i], i * sizeof(uint16_t),
 537                         sizeof(uint16_t), true)) {
 538                 E1000_ERR(hw->nic, "Interrupted!\n");
 539                 e1000_release_eeprom(hw);
 540                 return 1;
 541         }
 542
 543         e1000_release_eeprom(hw);
 544         return 0;
 545 }
 546
 547 int do_e1000_spi(cmd_tbl_t *cmdtp, struct e1000_hw *hw,
 548                 int argc, char * const argv[])
 549 {
 550         if (argc < 1) {
 551                 cmd_usage(cmdtp);
 552                 return 1;
 553         }
 554
 555         /* Make sure it has an SPI chip */
 556         if (hw->eeprom.type != e1000_eeprom_spi) {
 557                 E1000_ERR(hw->nic, "No attached SPI EEPROM found!\n");
 558                 return 1;
 559         }
 560
 561         /* Check the eeprom sub-sub-command arguments */
 562         if (!strcmp(argv[0], "show"))
 563                 return do_e1000_spi_show(cmdtp, hw, argc - 1, argv + 1);
 564
 565         if (!strcmp(argv[0], "dump"))
 566                 return do_e1000_spi_dump(cmdtp, hw, argc - 1, argv + 1);
 567
 568         if (!strcmp(argv[0], "program"))
 569                 return do_e1000_spi_program(cmdtp, hw, argc - 1, argv + 1);
 570
 571         if (!strcmp(argv[0], "checksum"))
 572                 return do_e1000_spi_checksum(cmdtp, hw, argc - 1, argv + 1);
 573
 574         cmd_usage(cmdtp);
 575         return 1;
 576 }
 577
 578 #endif /* not CONFIG_CMD_E1000 */