drivers/mtd/devices/m25p80.c

   1 /*
   2  * MTD SPI driver for ST M25Pxx (and similar) serial flash chips
   3  *
   4  * Author: Mike Lavender, mike@steroidmicros.com
   5  *
   6  * Copyright (c) 2005, Intec Automation Inc.
   7  *
   8  * Some parts are based on lart.c by Abraham Van Der Merwe
   9  *
  10  * Cleaned up and generalized based on mtd_dataflash.c
  11  *
  12  * This code is free software; you can redistribute it and/or modify
  13  * it under the terms of the GNU General Public License version 2 as
  14  * published by the Free Software Foundation.
  15  *
  16  */
  17
  18 #include <linux/init.h>
  19 #include <linux/err.h>
  20 #include <linux/errno.h>
  21 #include <linux/module.h>
  22 #include <linux/device.h>
  23 #include <linux/interrupt.h>
  24 #include <linux/mutex.h>
  25 #include <linux/math64.h>
  26 #include <linux/slab.h>
  27 #include <linux/sched.h>
  28 #include <linux/mod_devicetable.h>
  29
  30 #include <linux/mtd/mtd.h>
  31 #include <linux/mtd/partitions.h>
  32
  33 #include <linux/spi/spi.h>
  34 #include <linux/spi/flash.h>
  35
  36 /* Flash opcodes. */
  37 #define OPCODE_WREN             0x06    /* Write enable */
  38 #define OPCODE_RDSR             0x05    /* Read status register */
  39 #define OPCODE_WRSR             0x01    /* Write status register 1 byte */
  40 #define OPCODE_NORM_READ        0x03    /* Read data bytes (low frequency) */
  41 #define OPCODE_FAST_READ        0x0b    /* Read data bytes (high frequency) */
  42 #define OPCODE_PP               0x02    /* Page program (up to 256 bytes) */
  43 #define OPCODE_BE_4K            0x20    /* Erase 4KiB block */
  44 #define OPCODE_BE_32K           0x52    /* Erase 32KiB block */
  45 #define OPCODE_CHIP_ERASE       0xc7    /* Erase whole flash chip */
  46 #define OPCODE_SE               0xd8    /* Sector erase (usually 64KiB) */
  47 #define OPCODE_RDID             0x9f    /* Read JEDEC ID */
  48
  49 /* Used for SST flashes only. */
  50 #define OPCODE_BP               0x02    /* Byte program */
  51 #define OPCODE_WRDI             0x04    /* Write disable */
  52 #define OPCODE_AAI_WP           0xad    /* Auto address increment word program */
  53
  54 /* Used for Macronix flashes only. */
  55 #define OPCODE_EN4B             0xb7    /* Enter 4-byte mode */
  56 #define OPCODE_EX4B             0xe9    /* Exit 4-byte mode */
  57
  58 /* Status Register bits. */
  59 #define SR_WIP                  1       /* Write in progress */
  60 #define SR_WEL                  2       /* Write enable latch */
  61 /* meaning of other SR_* bits may differ between vendors */
  62 #define SR_BP0                  4       /* Block protect 0 */
  63 #define SR_BP1                  8       /* Block protect 1 */
  64 #define SR_BP2                  0x10    /* Block protect 2 */
  65 #define SR_SRWD                 0x80    /* SR write protect */
  66
  67 /* Define max times to check status register before we give up. */
  68 #define MAX_READY_WAIT_JIFFIES  (40 * HZ)       /* M25P16 specs 40s max chip erase */
  69 #define MAX_CMD_SIZE            5
  70
  71 #ifdef CONFIG_M25PXX_USE_FAST_READ
  72 #define OPCODE_READ     OPCODE_FAST_READ
  73 #define FAST_READ_DUMMY_BYTE 1
  74 #else
  75 #define OPCODE_READ     OPCODE_NORM_READ
  76 #define FAST_READ_DUMMY_BYTE 0
  77 #endif
  78
  79 /****************************************************************************/
  80
  81 struct m25p {
  82         struct spi_device       *spi;
  83         struct mutex            lock;
  84         struct mtd_info         mtd;
  85         unsigned                partitioned:1;
  86         u16                     page_size;
  87         u16                     addr_width;
  88         u8                      erase_opcode;
  89         u8                      *command;
  90 };
  91
  92 static inline struct m25p *mtd_to_m25p(struct mtd_info *mtd)
  93 {
  94         return container_of(mtd, struct m25p, mtd);
  95 }
  96
  97 /****************************************************************************/
  98
  99 /*
 100  * Internal helper functions
 101  */
 102
 103 /*
 104  * Read the status register, returning its value in the location
 105  * Return the status register value.
 106  * Returns negative if error occurred.
 107  */
 108 static int read_sr(struct m25p *flash)
 109 {
 110         ssize_t retval;
 111         u8 code = OPCODE_RDSR;
 112         u8 val;
 113
 114         retval = spi_write_then_read(flash->spi, &code, 1, &val, 1);
 115
 116         if (retval < 0) {
 117                 dev_err(&flash->spi->dev, "error %d reading SR\n",
 118                                 (int) retval);
 119                 return retval;
 120         }
 121
 122         return val;
 123 }
 124
 125 /*
 126  * Write status register 1 byte
 127  * Returns negative if error occurred.
 128  */
 129 static int write_sr(struct m25p *flash, u8 val)
 130 {
 131         flash->command[0] = OPCODE_WRSR;
 132         flash->command[1] = val;
 133
 134         return spi_write(flash->spi, flash->command, 2);
 135 }
 136
 137 /*
 138  * Set write enable latch with Write Enable command.
 139  * Returns negative if error occurred.
 140  */
 141 static inline int write_enable(struct m25p *flash)
 142 {
 143         u8      code = OPCODE_WREN;
 144
 145         return spi_write_then_read(flash->spi, &code, 1, NULL, 0);
 146 }
 147
 148 /*
 149  * Send write disble instruction to the chip.
 150  */
 151 static inline int write_disable(struct m25p *flash)
 152 {
 153         u8      code = OPCODE_WRDI;
 154
 155         return spi_write_then_read(flash->spi, &code, 1, NULL, 0);
 156 }
 157
 158 /*
 159  * Enable/disable 4-byte addressing mode.
 160  */
 161 static inline int set_4byte(struct m25p *flash, int enable)
 162 {
 163         u8      code = enable ? OPCODE_EN4B : OPCODE_EX4B;
 164
 165         return spi_write_then_read(flash->spi, &code, 1, NULL, 0);
 166 }
 167
 168 /*
 169  * Service routine to read status register until ready, or timeout occurs.
 170  * Returns non-zero if error.
 171  */
 172 static int wait_till_ready(struct m25p *flash)
 173 {
 174         unsigned long deadline;
 175         int sr;
 176
 177         deadline = jiffies + MAX_READY_WAIT_JIFFIES;
 178
 179         do {
 180                 if ((sr = read_sr(flash)) < 0)
 181                         break;
 182                 else if (!(sr & SR_WIP))
 183                         return 0;
 184
 185                 cond_resched();
 186
 187         } while (!time_after_eq(jiffies, deadline));
 188
 189         return 1;
 190 }
 191
 192 /*
 193  * Erase the whole flash memory
 194  *
 195  * Returns 0 if successful, non-zero otherwise.
 196  */
 197 static int erase_chip(struct m25p *flash)
 198 {
 199         DEBUG(MTD_DEBUG_LEVEL3, "%s: %s %lldKiB\n",
 200               dev_name(&flash->spi->dev), __func__,
 201               (long long)(flash->mtd.size >> 10));
 202
 203         /* Wait until finished previous write command. */
 204         if (wait_till_ready(flash))
 205                 return 1;
 206
 207         /* Send write enable, then erase commands. */
 208         write_enable(flash);
 209
 210         /* Set up command buffer. */
 211         flash->command[0] = OPCODE_CHIP_ERASE;
 212
 213         spi_write(flash->spi, flash->command, 1);
 214
 215         return 0;
 216 }
 217
 218 static void m25p_addr2cmd(struct m25p *flash, unsigned int addr, u8 *cmd)
 219 {
 220         /* opcode is in cmd[0] */
 221         cmd[1] = addr >> (flash->addr_width * 8 -  8);
 222         cmd[2] = addr >> (flash->addr_width * 8 - 16);
 223         cmd[3] = addr >> (flash->addr_width * 8 - 24);
 224         cmd[4] = addr >> (flash->addr_width * 8 - 32);
 225 }
 226
 227 static int m25p_cmdsz(struct m25p *flash)
 228 {
 229         return 1 + flash->addr_width;
 230 }
 231
 232 /*
 233  * Erase one sector of flash memory at offset ``offset'' which is any
 234  * address within the sector which should be erased.
 235  *
 236  * Returns 0 if successful, non-zero otherwise.
 237  */
 238 static int erase_sector(struct m25p *flash, u32 offset)
 239 {
 240         DEBUG(MTD_DEBUG_LEVEL3, "%s: %s %dKiB at 0x%08x\n",
 241                         dev_name(&flash->spi->dev), __func__,
 242                         flash->mtd.erasesize / 1024, offset);
 243
 244         /* Wait until finished previous write command. */
 245         if (wait_till_ready(flash))
 246                 return 1;
 247
 248         /* Send write enable, then erase commands. */
 249         write_enable(flash);
 250
 251         /* Set up command buffer. */
 252         flash->command[0] = flash->erase_opcode;
 253         m25p_addr2cmd(flash, offset, flash->command);
 254
 255         spi_write(flash->spi, flash->command, m25p_cmdsz(flash));
 256
 257         return 0;
 258 }
 259
 260 /****************************************************************************/
 261
 262 /*
 263  * MTD implementation
 264  */
 265
 266 /*
 267  * Erase an address range on the flash chip.  The address range may extend
 268  * one or more erase sectors.  Return an error is there is a problem erasing.
 269  */
 270 static int m25p80_erase(struct mtd_info *mtd, struct erase_info *instr)
 271 {
 272         struct m25p *flash = mtd_to_m25p(mtd);
 273         u32 addr,len;
 274         uint32_t rem;
 275
 276         DEBUG(MTD_DEBUG_LEVEL2, "%s: %s %s 0x%llx, len %lld\n",
 277               dev_name(&flash->spi->dev), __func__, "at",
 278               (long long)instr->addr, (long long)instr->len);
 279
 280         /* sanity checks */
 281         if (instr->addr + instr->len > flash->mtd.size)
 282                 return -EINVAL;
 283         div_u64_rem(instr->len, mtd->erasesize, &rem);
 284         if (rem)
 285                 return -EINVAL;
 286
 287         addr = instr->addr;
 288         len = instr->len;
 289
 290         mutex_lock(&flash->lock);
 291
 292         /* whole-chip erase? */
 293         if (len == flash->mtd.size) {
 294                 if (erase_chip(flash)) {
 295                         instr->state = MTD_ERASE_FAILED;
 296                         mutex_unlock(&flash->lock);
 297                         return -EIO;
 298                 }
 299
 300         /* REVISIT in some cases we could speed up erasing large regions
 301          * by using OPCODE_SE instead of OPCODE_BE_4K.  We may have set up
 302          * to use "small sector erase", but that's not always optimal.
 303          */
 304
 305         /* "sector"-at-a-time erase */
 306         } else {
 307                 while (len) {
 308                         if (erase_sector(flash, addr)) {
 309                                 instr->state = MTD_ERASE_FAILED;
 310                                 mutex_unlock(&flash->lock);
 311                                 return -EIO;
 312                         }
 313
 314                         addr += mtd->erasesize;
 315                         len -= mtd->erasesize;
 316                 }
 317         }
 318
 319         mutex_unlock(&flash->lock);
 320
 321         instr->state = MTD_ERASE_DONE;
 322         mtd_erase_callback(instr);
 323
 324         return 0;
 325 }
 326
 327 /*
 328  * Read an address range from the flash chip.  The address range
 329  * may be any size provided it is within the physical boundaries.
 330  */
 331 static int m25p80_read(struct mtd_info *mtd, loff_t from, size_t len,
 332         size_t *retlen, u_char *buf)
 333 {
 334         struct m25p *flash = mtd_to_m25p(mtd);
 335         struct spi_transfer t[2];
 336         struct spi_message m;
 337
 338         DEBUG(MTD_DEBUG_LEVEL2, "%s: %s %s 0x%08x, len %zd\n",
 339                         dev_name(&flash->spi->dev), __func__, "from",
 340                         (u32)from, len);
 341
 342         /* sanity checks */
 343         if (!len)
 344                 return 0;
 345
 346         if (from + len > flash->mtd.size)
 347                 return -EINVAL;
 348
 349         spi_message_init(&m);
 350         memset(t, 0, (sizeof t));
 351
 352         /* NOTE:
 353          * OPCODE_FAST_READ (if available) is faster.
 354          * Should add 1 byte DUMMY_BYTE.
 355          */
 356         t[0].tx_buf = flash->command;
 357         t[0].len = m25p_cmdsz(flash) + FAST_READ_DUMMY_BYTE;
 358         spi_message_add_tail(&t[0], &m);
 359
 360         t[1].rx_buf = buf;
 361         t[1].len = len;
 362         spi_message_add_tail(&t[1], &m);
 363
 364         /* Byte count starts at zero. */
 365         *retlen = 0;
 366
 367         mutex_lock(&flash->lock);
 368
 369         /* Wait till previous write/erase is done. */
 370         if (wait_till_ready(flash)) {
 371                 /* REVISIT status return?? */
 372                 mutex_unlock(&flash->lock);
 373                 return 1;
 374         }
 375
 376         /* FIXME switch to OPCODE_FAST_READ.  It's required for higher
 377          * clocks; and at this writing, every chip this driver handles
 378          * supports that opcode.
 379          */
 380
 381         /* Set up the write data buffer. */
 382         flash->command[0] = OPCODE_READ;
 383         m25p_addr2cmd(flash, from, flash->command);
 384
 385         spi_sync(flash->spi, &m);
 386
 387         *retlen = m.actual_length - m25p_cmdsz(flash) - FAST_READ_DUMMY_BYTE;
 388
 389         mutex_unlock(&flash->lock);
 390
 391         return 0;
 392 }
 393
 394 /*
 395  * Write an address range to the flash chip.  Data must be written in
 396  * FLASH_PAGESIZE chunks.  The address range may be any size provided
 397  * it is within the physical boundaries.
 398  */
 399 static int m25p80_write(struct mtd_info *mtd, loff_t to, size_t len,
 400         size_t *retlen, const u_char *buf)
 401 {
 402         struct m25p *flash = mtd_to_m25p(mtd);
 403         u32 page_offset, page_size;
 404         struct spi_transfer t[2];
 405         struct spi_message m;
 406
 407         DEBUG(MTD_DEBUG_LEVEL2, "%s: %s %s 0x%08x, len %zd\n",
 408                         dev_name(&flash->spi->dev), __func__, "to",
 409                         (u32)to, len);
 410
 411         *retlen = 0;
 412
 413         /* sanity checks */
 414         if (!len)
 415                 return(0);
 416
 417         if (to + len > flash->mtd.size)
 418                 return -EINVAL;
 419
 420         spi_message_init(&m);
 421         memset(t, 0, (sizeof t));
 422
 423         t[0].tx_buf = flash->command;
 424         t[0].len = m25p_cmdsz(flash);
 425         spi_message_add_tail(&t[0], &m);
 426
 427         t[1].tx_buf = buf;
 428         spi_message_add_tail(&t[1], &m);
 429
 430         mutex_lock(&flash->lock);
 431
 432         /* Wait until finished previous write command. */
 433         if (wait_till_ready(flash)) {
 434                 mutex_unlock(&flash->lock);
 435                 return 1;
 436         }
 437
 438         write_enable(flash);
 439
 440         /* Set up the opcode in the write buffer. */
 441         flash->command[0] = OPCODE_PP;
 442         m25p_addr2cmd(flash, to, flash->command);
 443
 444         page_offset = to & (flash->page_size - 1);
 445
 446         /* do all the bytes fit onto one page? */
 447         if (page_offset + len <= flash->page_size) {
 448                 t[1].len = len;
 449
 450                 spi_sync(flash->spi, &m);
 451
 452                 *retlen = m.actual_length - m25p_cmdsz(flash);
 453         } else {
 454                 u32 i;
 455
 456                 /* the size of data remaining on the first page */
 457                 page_size = flash->page_size - page_offset;
 458
 459                 t[1].len = page_size;
 460                 spi_sync(flash->spi, &m);
 461
 462                 *retlen = m.actual_length - m25p_cmdsz(flash);
 463
 464                 /* write everything in flash->page_size chunks */
 465                 for (i = page_size; i < len; i += page_size) {
 466                         page_size = len - i;
 467                         if (page_size > flash->page_size)
 468                                 page_size = flash->page_size;
 469
 470                         /* write the next page to flash */
 471                         m25p_addr2cmd(flash, to + i, flash->command);
 472
 473                         t[1].tx_buf = buf + i;
 474                         t[1].len = page_size;
 475
 476                         wait_till_ready(flash);
 477
 478                         write_enable(flash);
 479
 480                         spi_sync(flash->spi, &m);
 481
 482                         *retlen += m.actual_length - m25p_cmdsz(flash);
 483                 }
 484         }
 485
 486         mutex_unlock(&flash->lock);
 487
 488         return 0;
 489 }
 490
 491 static int sst_write(struct mtd_info *mtd, loff_t to, size_t len,
 492                 size_t *retlen, const u_char *buf)
 493 {
 494         struct m25p *flash = mtd_to_m25p(mtd);
 495         struct spi_transfer t[2];
 496         struct spi_message m;
 497         size_t actual;
 498         int cmd_sz, ret;
 499
 500         DEBUG(MTD_DEBUG_LEVEL2, "%s: %s %s 0x%08x, len %zd\n",
 501                         dev_name(&flash->spi->dev), __func__, "to",
 502                         (u32)to, len);
 503
 504         *retlen = 0;
 505
 506         /* sanity checks */
 507         if (!len)
 508                 return 0;
 509
 510         if (to + len > flash->mtd.size)
 511                 return -EINVAL;
 512
 513         spi_message_init(&m);
 514         memset(t, 0, (sizeof t));
 515
 516         t[0].tx_buf = flash->command;
 517         t[0].len = m25p_cmdsz(flash);
 518         spi_message_add_tail(&t[0], &m);
 519
 520         t[1].tx_buf = buf;
 521         spi_message_add_tail(&t[1], &m);
 522
 523         mutex_lock(&flash->lock);
 524
 525         /* Wait until finished previous write command. */
 526         ret = wait_till_ready(flash);
 527         if (ret)
 528                 goto time_out;
 529
 530         write_enable(flash);
 531
 532         actual = to % 2;
 533         /* Start write from odd address. */
 534         if (actual) {
 535                 flash->command[0] = OPCODE_BP;
 536                 m25p_addr2cmd(flash, to, flash->command);
 537
 538                 /* write one byte. */
 539                 t[1].len = 1;
 540                 spi_sync(flash->spi, &m);
 541                 ret = wait_till_ready(flash);
 542                 if (ret)
 543                         goto time_out;
 544                 *retlen += m.actual_length - m25p_cmdsz(flash);
 545         }
 546         to += actual;
 547
 548         flash->command[0] = OPCODE_AAI_WP;
 549         m25p_addr2cmd(flash, to, flash->command);
 550
 551         /* Write out most of the data here. */
 552         cmd_sz = m25p_cmdsz(flash);
 553         for (; actual < len - 1; actual += 2) {
 554                 t[0].len = cmd_sz;
 555                 /* write two bytes. */
 556                 t[1].len = 2;
 557                 t[1].tx_buf = buf + actual;
 558
 559                 spi_sync(flash->spi, &m);
 560                 ret = wait_till_ready(flash);
 561                 if (ret)
 562                         goto time_out;
 563                 *retlen += m.actual_length - cmd_sz;
 564                 cmd_sz = 1;
 565                 to += 2;
 566         }
 567         write_disable(flash);
 568         ret = wait_till_ready(flash);
 569         if (ret)
 570                 goto time_out;
 571
 572         /* Write out trailing byte if it exists. */
 573         if (actual != len) {
 574                 write_enable(flash);
 575                 flash->command[0] = OPCODE_BP;
 576                 m25p_addr2cmd(flash, to, flash->command);
 577                 t[0].len = m25p_cmdsz(flash);
 578                 t[1].len = 1;
 579                 t[1].tx_buf = buf + actual;
 580
 581                 spi_sync(flash->spi, &m);
 582                 ret = wait_till_ready(flash);
 583                 if (ret)
 584                         goto time_out;
 585                 *retlen += m.actual_length - m25p_cmdsz(flash);
 586                 write_disable(flash);
 587         }
 588
 589 time_out:
 590         mutex_unlock(&flash->lock);
 591         return ret;
 592 }
 593
 594 /****************************************************************************/
 595
 596 /*
 597  * SPI device driver setup and teardown
 598  */
 599
 600 struct flash_info {
 601         /* JEDEC id zero means "no ID" (most older chips); otherwise it has
 602          * a high byte of zero plus three data bytes: the manufacturer id,
 603          * then a two byte device id.
 604          */
 605         u32             jedec_id;
 606         u16             ext_id;
 607
 608         /* The size listed here is what works with OPCODE_SE, which isn't
 609          * necessarily called a "sector" by the vendor.
 610          */
 611         unsigned        sector_size;
 612         u16             n_sectors;
 613
 614         u16             page_size;
 615         u16             addr_width;
 616
 617         u16             flags;
 618 #define SECT_4K         0x01            /* OPCODE_BE_4K works uniformly */
 619 #define M25P_NO_ERASE   0x02            /* No erase command needed */
 620 };
 621
 622 #define INFO(_jedec_id, _ext_id, _sector_size, _n_sectors, _flags)      \
 623         ((kernel_ulong_t)&(struct flash_info) {                         \
 624                 .jedec_id = (_jedec_id),                                \
 625                 .ext_id = (_ext_id),                                    \
 626                 .sector_size = (_sector_size),                          \
 627                 .n_sectors = (_n_sectors),                              \
 628                 .page_size = 256,                                       \
 629                 .flags = (_flags),                                      \
 630         })
 631
 632 #define CAT25_INFO(_sector_size, _n_sectors, _page_size, _addr_width)   \
 633         ((kernel_ulong_t)&(struct flash_info) {                         \
 634                 .sector_size = (_sector_size),                          \
 635                 .n_sectors = (_n_sectors),                              \
 636                 .page_size = (_page_size),                              \
 637                 .addr_width = (_addr_width),                            \
 638                 .flags = M25P_NO_ERASE,                                 \
 639         })
 640
 641 /* NOTE: double check command sets and memory organization when you add
 642  * more flash chips.  This current list focusses on newer chips, which
 643  * have been converging on command sets which including JEDEC ID.
 644  */
 645 static const struct spi_device_id m25p_ids[] = {
 646         /* Atmel -- some are (confusingly) marketed as "DataFlash" */
 647         { "at25fs010",  INFO(0x1f6601, 0, 32 * 1024,   4, SECT_4K) },
 648         { "at25fs040",  INFO(0x1f6604, 0, 64 * 1024,   8, SECT_4K) },
 649
 650         { "at25df041a", INFO(0x1f4401, 0, 64 * 1024,   8, SECT_4K) },
 651         { "at25df641",  INFO(0x1f4800, 0, 64 * 1024, 128, SECT_4K) },
 652
 653         { "at26f004",   INFO(0x1f0400, 0, 64 * 1024,  8, SECT_4K) },
 654         { "at26df081a", INFO(0x1f4501, 0, 64 * 1024, 16, SECT_4K) },
 655         { "at26df161a", INFO(0x1f4601, 0, 64 * 1024, 32, SECT_4K) },
 656         { "at26df321",  INFO(0x1f4700, 0, 64 * 1024, 64, SECT_4K) },
 657
 658         /* EON -- en25xxx */
 659         { "en25f32", INFO(0x1c3116, 0, 64 * 1024,  64, SECT_4K) },
 660         { "en25p32", INFO(0x1c2016, 0, 64 * 1024,  64, 0) },
 661         { "en25p64", INFO(0x1c2017, 0, 64 * 1024, 128, 0) },
 662
 663         /* Intel/Numonyx -- xxxs33b */
 664         { "160s33b",  INFO(0x898911, 0, 64 * 1024,  32, 0) },
 665         { "320s33b",  INFO(0x898912, 0, 64 * 1024,  64, 0) },
 666         { "640s33b",  INFO(0x898913, 0, 64 * 1024, 128, 0) },
 667
 668         /* Macronix */
 669         { "mx25l4005a",  INFO(0xc22013, 0, 64 * 1024,   8, SECT_4K) },
 670         { "mx25l8005",   INFO(0xc22014, 0, 64 * 1024,  16, 0) },
 671         { "mx25l1606e",  INFO(0xc22015, 0, 64 * 1024,  32, SECT_4K) },
 672         { "mx25l3205d",  INFO(0xc22016, 0, 64 * 1024,  64, 0) },
 673         { "mx25l6405d",  INFO(0xc22017, 0, 64 * 1024, 128, 0) },
 674         { "mx25l12805d", INFO(0xc22018, 0, 64 * 1024, 256, 0) },
 675         { "mx25l12855e", INFO(0xc22618, 0, 64 * 1024, 256, 0) },
 676         { "mx25l25635e", INFO(0xc22019, 0, 64 * 1024, 512, 0) },
 677         { "mx25l25655e", INFO(0xc22619, 0, 64 * 1024, 512, 0) },
 678
 679         /* Spansion -- single (large) sector size only, at least
 680          * for the chips listed here (without boot sectors).
 681          */
 682         { "s25sl004a",  INFO(0x010212,      0,  64 * 1024,   8, 0) },
 683         { "s25sl008a",  INFO(0x010213,      0,  64 * 1024,  16, 0) },
 684         { "s25sl016a",  INFO(0x010214,      0,  64 * 1024,  32, 0) },
 685         { "s25sl032a",  INFO(0x010215,      0,  64 * 1024,  64, 0) },
 686         { "s25sl032p",  INFO(0x010215, 0x4d00,  64 * 1024,  64, SECT_4K) },
 687         { "s25sl064a",  INFO(0x010216,      0,  64 * 1024, 128, 0) },
 688         { "s25sl12800", INFO(0x012018, 0x0300, 256 * 1024,  64, 0) },
 689         { "s25sl12801", INFO(0x012018, 0x0301,  64 * 1024, 256, 0) },
 690         { "s25fl129p0", INFO(0x012018, 0x4d00, 256 * 1024,  64, 0) },
 691         { "s25fl129p1", INFO(0x012018, 0x4d01,  64 * 1024, 256, 0) },
 692         { "s25fl016k",  INFO(0xef4015,      0,  64 * 1024,  32, SECT_4K) },
 693         { "s25fl064k",  INFO(0xef4017,      0,  64 * 1024, 128, SECT_4K) },
 694
 695         /* SST -- large erase sizes are "overlays", "sectors" are 4K */
 696         { "sst25vf040b", INFO(0xbf258d, 0, 64 * 1024,  8, SECT_4K) },
 697         { "sst25vf080b", INFO(0xbf258e, 0, 64 * 1024, 16, SECT_4K) },
 698         { "sst25vf016b", INFO(0xbf2541, 0, 64 * 1024, 32, SECT_4K) },
 699         { "sst25vf032b", INFO(0xbf254a, 0, 64 * 1024, 64, SECT_4K) },
 700         { "sst25wf512",  INFO(0xbf2501, 0, 64 * 1024,  1, SECT_4K) },
 701         { "sst25wf010",  INFO(0xbf2502, 0, 64 * 1024,  2, SECT_4K) },
 702         { "sst25wf020",  INFO(0xbf2503, 0, 64 * 1024,  4, SECT_4K) },
 703         { "sst25wf040",  INFO(0xbf2504, 0, 64 * 1024,  8, SECT_4K) },
 704
 705         /* ST Microelectronics -- newer production may have feature updates */
 706         { "m25p05",  INFO(0x202010,  0,  32 * 1024,   2, 0) },
 707         { "m25p10",  INFO(0x202011,  0,  32 * 1024,   4, 0) },
 708         { "m25p20",  INFO(0x202012,  0,  64 * 1024,   4, 0) },
 709         { "m25p40",  INFO(0x202013,  0,  64 * 1024,   8, 0) },
 710         { "m25p80",  INFO(0x202014,  0,  64 * 1024,  16, 0) },
 711         { "m25p16",  INFO(0x202015,  0,  64 * 1024,  32, 0) },
 712         { "m25p32",  INFO(0x202016,  0,  64 * 1024,  64, 0) },
 713         { "m25p64",  INFO(0x202017,  0,  64 * 1024, 128, 0) },
 714         { "m25p128", INFO(0x202018,  0, 256 * 1024,  64, 0) },
 715
 716         { "m25p05-nonjedec",  INFO(0, 0,  32 * 1024,   2, 0) },
 717         { "m25p10-nonjedec",  INFO(0, 0,  32 * 1024,   4, 0) },
 718         { "m25p20-nonjedec",  INFO(0, 0,  64 * 1024,   4, 0) },
 719         { "m25p40-nonjedec",  INFO(0, 0,  64 * 1024,   8, 0) },
 720         { "m25p80-nonjedec",  INFO(0, 0,  64 * 1024,  16, 0) },
 721         { "m25p16-nonjedec",  INFO(0, 0,  64 * 1024,  32, 0) },
 722         { "m25p32-nonjedec",  INFO(0, 0,  64 * 1024,  64, 0) },
 723         { "m25p64-nonjedec",  INFO(0, 0,  64 * 1024, 128, 0) },
 724         { "m25p128-nonjedec", INFO(0, 0, 256 * 1024,  64, 0) },
 725
 726         { "m45pe10", INFO(0x204011,  0, 64 * 1024,    2, 0) },
 727         { "m45pe80", INFO(0x204014,  0, 64 * 1024,   16, 0) },
 728         { "m45pe16", INFO(0x204015,  0, 64 * 1024,   32, 0) },
 729
 730         { "m25pe80", INFO(0x208014,  0, 64 * 1024, 16,       0) },
 731         { "m25pe16", INFO(0x208015,  0, 64 * 1024, 32, SECT_4K) },
 732
 733         { "m25px32",    INFO(0x207116,  0, 64 * 1024, 64, SECT_4K) },
 734         { "m25px32-s0", INFO(0x207316,  0, 64 * 1024, 64, SECT_4K) },
 735         { "m25px32-s1", INFO(0x206316,  0, 64 * 1024, 64, SECT_4K) },
 736         { "m25px64",    INFO(0x207117,  0, 64 * 1024, 128, 0) },
 737
 738         /* Winbond -- w25x "blocks" are 64K, "sectors" are 4KiB */
 739         { "w25x10", INFO(0xef3011, 0, 64 * 1024,  2,  SECT_4K) },
 740         { "w25x20", INFO(0xef3012, 0, 64 * 1024,  4,  SECT_4K) },
 741         { "w25x40", INFO(0xef3013, 0, 64 * 1024,  8,  SECT_4K) },
 742         { "w25x80", INFO(0xef3014, 0, 64 * 1024,  16, SECT_4K) },
 743         { "w25x16", INFO(0xef3015, 0, 64 * 1024,  32, SECT_4K) },
 744         { "w25x32", INFO(0xef3016, 0, 64 * 1024,  64, SECT_4K) },
 745         { "w25q32", INFO(0xef4016, 0, 64 * 1024,  64, SECT_4K) },
 746         { "w25x64", INFO(0xef3017, 0, 64 * 1024, 128, SECT_4K) },
 747         { "w25q64", INFO(0xef4017, 0, 64 * 1024, 128, SECT_4K) },
 748
 749         /* Catalyst / On Semiconductor -- non-JEDEC */
 750         { "cat25c11", CAT25_INFO(  16, 8, 16, 1) },
 751         { "cat25c03", CAT25_INFO(  32, 8, 16, 2) },
 752         { "cat25c09", CAT25_INFO( 128, 8, 32, 2) },
 753         { "cat25c17", CAT25_INFO( 256, 8, 32, 2) },
 754         { "cat25128", CAT25_INFO(2048, 8, 64, 2) },
 755         { },
 756 };
 757 MODULE_DEVICE_TABLE(spi, m25p_ids);
 758
 759 static const struct spi_device_id *__devinit jedec_probe(struct spi_device *spi)
 760 {
 761         int                     tmp;
 762         u8                      code = OPCODE_RDID;
 763         u8                      id[5];
 764         u32                     jedec;
 765         u16                     ext_jedec;
 766         struct flash_info       *info;
 767
 768         /* JEDEC also defines an optional "extended device information"
 769          * string for after vendor-specific data, after the three bytes
 770          * we use here.  Supporting some chips might require using it.
 771          */
 772         tmp = spi_write_then_read(spi, &code, 1, id, 5);
 773         if (tmp < 0) {
 774                 DEBUG(MTD_DEBUG_LEVEL0, "%s: error %d reading JEDEC ID\n",
 775                         dev_name(&spi->dev), tmp);
 776                 return ERR_PTR(tmp);
 777         }
 778         jedec = id[0];
 779         jedec = jedec << 8;
 780         jedec |= id[1];
 781         jedec = jedec << 8;
 782         jedec |= id[2];
 783
 784         ext_jedec = id[3] << 8 | id[4];
 785
 786         for (tmp = 0; tmp < ARRAY_SIZE(m25p_ids) - 1; tmp++) {
 787                 info = (void *)m25p_ids[tmp].driver_data;
 788                 if (info->jedec_id == jedec) {
 789                         if (info->ext_id != 0 && info->ext_id != ext_jedec)
 790                                 continue;
 791                         return &m25p_ids[tmp];
 792                 }
 793         }
 794         dev_err(&spi->dev, "unrecognized JEDEC id %06x\n", jedec);
 795         return ERR_PTR(-ENODEV);
 796 }
 797
 798
 799 /*
 800  * board specific setup should have ensured the SPI clock used here
 801  * matches what the READ command supports, at least until this driver
 802  * understands FAST_READ (for clocks over 25 MHz).
 803  */
 804 static int __devinit m25p_probe(struct spi_device *spi)
 805 {
 806         const struct spi_device_id      *id = spi_get_device_id(spi);
 807         struct flash_platform_data      *data;
 808         struct m25p                     *flash;
 809         struct flash_info               *info;
 810         unsigned                        i;
 811
 812         /* Platform data helps sort out which chip type we have, as
 813          * well as how this board partitions it.  If we don't have
 814          * a chip ID, try the JEDEC id commands; they'll work for most
 815          * newer chips, even if we don't recognize the particular chip.
 816          */
 817         data = spi->dev.platform_data;
 818         if (data && data->type) {
 819                 const struct spi_device_id *plat_id;
 820
 821                 for (i = 0; i < ARRAY_SIZE(m25p_ids) - 1; i++) {
 822                         plat_id = &m25p_ids[i];
 823                         if (strcmp(data->type, plat_id->name))
 824                                 continue;
 825                         break;
 826                 }
 827
 828                 if (i < ARRAY_SIZE(m25p_ids) - 1)
 829                         id = plat_id;
 830                 else
 831                         dev_warn(&spi->dev, "unrecognized id %s\n", data->type);
 832         }
 833
 834         info = (void *)id->driver_data;
 835
 836         if (info->jedec_id) {
 837                 const struct spi_device_id *jid;
 838
 839                 jid = jedec_probe(spi);
 840                 if (IS_ERR(jid)) {
 841                         return PTR_ERR(jid);
 842                 } else if (jid != id) {
 843                         /*
 844                          * JEDEC knows better, so overwrite platform ID. We
 845                          * can't trust partitions any longer, but we'll let
 846                          * mtd apply them anyway, since some partitions may be
 847                          * marked read-only, and we don't want to lose that
 848                          * information, even if it's not 100% accurate.
 849                          */
 850                         dev_warn(&spi->dev, "found %s, expected %s\n",
 851                                  jid->name, id->name);
 852                         id = jid;
 853                         info = (void *)jid->driver_data;
 854                 }
 855         }
 856
 857         flash = kzalloc(sizeof *flash, GFP_KERNEL);
 858         if (!flash)
 859                 return -ENOMEM;
 860         flash->command = kmalloc(MAX_CMD_SIZE + FAST_READ_DUMMY_BYTE, GFP_KERNEL);
 861         if (!flash->command) {
 862                 kfree(flash);
 863                 return -ENOMEM;
 864         }
 865
 866         flash->spi = spi;
 867         mutex_init(&flash->lock);
 868         dev_set_drvdata(&spi->dev, flash);
 869
 870         /*
 871          * Atmel, SST and Intel/Numonyx serial flash tend to power
 872          * up with the software protection bits set
 873          */
 874
 875         if (info->jedec_id >> 16 == 0x1f ||
 876             info->jedec_id >> 16 == 0x89 ||
 877             info->jedec_id >> 16 == 0xbf) {
 878                 write_enable(flash);
 879                 write_sr(flash, 0);
 880         }
 881
 882         if (data && data->name)
 883                 flash->mtd.name = data->name;
 884         else
 885                 flash->mtd.name = dev_name(&spi->dev);
 886
 887         flash->mtd.type = MTD_NORFLASH;
 888         flash->mtd.writesize = 1;
 889         flash->mtd.flags = MTD_CAP_NORFLASH;
 890         flash->mtd.size = info->sector_size * info->n_sectors;
 891         flash->mtd.erase = m25p80_erase;
 892         flash->mtd.read = m25p80_read;
 893
 894         /* sst flash chips use AAI word program */
 895         if (info->jedec_id >> 16 == 0xbf)
 896                 flash->mtd.write = sst_write;
 897         else
 898                 flash->mtd.write = m25p80_write;
 899
 900         /* prefer "small sector" erase if possible */
 901         if (info->flags & SECT_4K) {
 902                 flash->erase_opcode = OPCODE_BE_4K;
 903                 flash->mtd.erasesize = 4096;
 904         } else {
 905                 flash->erase_opcode = OPCODE_SE;
 906                 flash->mtd.erasesize = info->sector_size;
 907         }
 908
 909         if (info->flags & M25P_NO_ERASE)
 910                 flash->mtd.flags |= MTD_NO_ERASE;
 911
 912         flash->mtd.dev.parent = &spi->dev;
 913         flash->page_size = info->page_size;
 914
 915         if (info->addr_width)
 916                 flash->addr_width = info->addr_width;
 917         else {
 918                 /* enable 4-byte addressing if the device exceeds 16MiB */
 919                 if (flash->mtd.size > 0x1000000) {
 920                         flash->addr_width = 4;
 921                         set_4byte(flash, 1);
 922                 } else
 923                         flash->addr_width = 3;
 924         }
 925
 926         dev_info(&spi->dev, "%s (%lld Kbytes)\n", id->name,
 927                         (long long)flash->mtd.size >> 10);
 928
 929         DEBUG(MTD_DEBUG_LEVEL2,
 930                 "mtd .name = %s, .size = 0x%llx (%lldMiB) "
 931                         ".erasesize = 0x%.8x (%uKiB) .numeraseregions = %d\n",
 932                 flash->mtd.name,
 933                 (long long)flash->mtd.size, (long long)(flash->mtd.size >> 20),
 934                 flash->mtd.erasesize, flash->mtd.erasesize / 1024,
 935                 flash->mtd.numeraseregions);
 936
 937         if (flash->mtd.numeraseregions)
 938                 for (i = 0; i < flash->mtd.numeraseregions; i++)
 939                         DEBUG(MTD_DEBUG_LEVEL2,
 940                                 "mtd.eraseregions[%d] = { .offset = 0x%llx, "
 941                                 ".erasesize = 0x%.8x (%uKiB), "
 942                                 ".numblocks = %d }\n",
 943                                 i, (long long)flash->mtd.eraseregions[i].offset,
 944                                 flash->mtd.eraseregions[i].erasesize,
 945                                 flash->mtd.eraseregions[i].erasesize / 1024,
 946                                 flash->mtd.eraseregions[i].numblocks);
 947
 948
 949         /* partitions should match sector boundaries; and it may be good to
 950          * use readonly partitions for writeprotected sectors (BP2..BP0).
 951          */
 952         if (mtd_has_partitions()) {
 953                 struct mtd_partition    *parts = NULL;
 954                 int                     nr_parts = 0;
 955
 956                 if (mtd_has_cmdlinepart()) {
 957                         static const char *part_probes[]
 958                                         = { "cmdlinepart", NULL, };
 959
 960                         nr_parts = parse_mtd_partitions(&flash->mtd,
 961                                         part_probes, &parts, 0);
 962                 }
 963
 964                 if (nr_parts <= 0 && data && data->parts) {
 965                         parts = data->parts;
 966                         nr_parts = data->nr_parts;
 967                 }
 968
 969 #ifdef CONFIG_MTD_OF_PARTS
 970                 if (nr_parts <= 0 && spi->dev.of_node) {
 971                         nr_parts = of_mtd_parse_partitions(&spi->dev,
 972                                         spi->dev.of_node, &parts);
 973                 }
 974 #endif
 975
 976                 if (nr_parts > 0) {
 977                         for (i = 0; i < nr_parts; i++) {
 978                                 DEBUG(MTD_DEBUG_LEVEL2, "partitions[%d] = "
 979                                         "{.name = %s, .offset = 0x%llx, "
 980                                                 ".size = 0x%llx (%lldKiB) }\n",
 981                                         i, parts[i].name,
 982                                         (long long)parts[i].offset,
 983                                         (long long)parts[i].size,
 984                                         (long long)(parts[i].size >> 10));
 985                         }
 986                         flash->partitioned = 1;
 987                         return add_mtd_partitions(&flash->mtd, parts, nr_parts);
 988                 }
 989         } else if (data && data->nr_parts)
 990                 dev_warn(&spi->dev, "ignoring %d default partitions on %s\n",
 991                                 data->nr_parts, data->name);
 992
 993         return add_mtd_device(&flash->mtd) == 1 ? -ENODEV : 0;
 994 }
 995
 996
 997 static int __devexit m25p_remove(struct spi_device *spi)
 998 {
 999         struct m25p     *flash = dev_get_drvdata(&spi->dev);
1000         int             status;
1001
1002         /* Clean up MTD stuff. */
1003         if (mtd_has_partitions() && flash->partitioned)
1004                 status = del_mtd_partitions(&flash->mtd);
1005         else
1006                 status = del_mtd_device(&flash->mtd);
1007         if (status == 0) {
1008                 kfree(flash->command);
1009                 kfree(flash);
1010         }
1011         return 0;
1012 }
1013
1014
1015 static struct spi_driver m25p80_driver = {
1016         .driver = {
1017                 .name   = "m25p80",
1018                 .bus    = &spi_bus_type,
1019                 .owner  = THIS_MODULE,
1020         },
1021         .id_table       = m25p_ids,
1022         .probe  = m25p_probe,
1023         .remove = __devexit_p(m25p_remove),
1024
1025         /* REVISIT: many of these chips have deep power-down modes, which
1026          * should clearly be entered on suspend() to minimize power use.
1027          * And also when they're otherwise idle...
1028          */
1029 };
1030
1031
1032 static int __init m25p80_init(void)
1033 {
1034         return spi_register_driver(&m25p80_driver);
1035 }
1036
1037
1038 static void __exit m25p80_exit(void)
1039 {
1040         spi_unregister_driver(&m25p80_driver);
1041 }
1042
1043
1044 module_init(m25p80_init);
1045 module_exit(m25p80_exit);
1046
1047 MODULE_LICENSE("GPL");
1048 MODULE_AUTHOR("Mike Lavender");
1049 MODULE_DESCRIPTION("MTD SPI driver for ST M25Pxx flash chips");