2 * MTD chip driver for pre-CFI Sharp flash chips
4 * Copyright 2000,2001 David A. Schleef <ds@schleef.org>
5 * 2000,2001 Lineo, Inc.
7 * $Id: sharp.c,v 1.12 2003/05/28 15:39:52 dwmw2 Exp $
10 * LH28F016SCT Symmetrical block flash memory, 2Mx8
11 * LH28F008SCT Symmetrical block flash memory, 1Mx8
14 * http://www.sharpmeg.com/datasheets/memic/flashcmp/
15 * http://www.sharpmeg.com/datasheets/memic/flashcmp/01symf/16m/016sctl9.pdf
19 * This driver only supports 4x1 arrangement of chips.
20 * Not tested on anything but PowerPC.
23 #include <linux/kernel.h>
24 #include <linux/module.h>
25 #include <linux/types.h>
26 #include <linux/sched.h>
27 #include <linux/errno.h>
28 #include <linux/interrupt.h>
29 #include <linux/mtd/map.h>
30 #include <linux/mtd/mtd.h>
31 #include <linux/mtd/cfi.h>
32 #include <linux/delay.h>
34 #define CMD_RESET 0xffffffff
35 #define CMD_READ_ID 0x90909090
36 #define CMD_READ_STATUS 0x70707070
37 #define CMD_CLEAR_STATUS 0x50505050
38 #define CMD_BLOCK_ERASE_1 0x20202020
39 #define CMD_BLOCK_ERASE_2 0xd0d0d0d0
40 #define CMD_BYTE_WRITE 0x40404040
41 #define CMD_SUSPEND 0xb0b0b0b0
42 #define CMD_RESUME 0xd0d0d0d0
43 #define CMD_SET_BLOCK_LOCK_1 0x60606060
44 #define CMD_SET_BLOCK_LOCK_2 0x01010101
45 #define CMD_SET_MASTER_LOCK_1 0x60606060
46 #define CMD_SET_MASTER_LOCK_2 0xf1f1f1f1
47 #define CMD_CLEAR_BLOCK_LOCKS_1 0x60606060
48 #define CMD_CLEAR_BLOCK_LOCKS_2 0xd0d0d0d0
50 #define SR_READY 0x80808080 // 1 = ready
51 #define SR_ERASE_SUSPEND 0x40404040 // 1 = block erase suspended
52 #define SR_ERROR_ERASE 0x20202020 // 1 = error in block erase or clear lock bits
53 #define SR_ERROR_WRITE 0x10101010 // 1 = error in byte write or set lock bit
54 #define SR_VPP 0x08080808 // 1 = Vpp is low
55 #define SR_WRITE_SUSPEND 0x04040404 // 1 = byte write suspended
56 #define SR_PROTECT 0x02020202 // 1 = lock bit set
57 #define SR_RESERVED 0x01010101
59 #define SR_ERRORS (SR_ERROR_ERASE|SR_ERROR_WRITE|SR_VPP|SR_PROTECT)
61 /* Configuration options */
63 #undef AUTOUNLOCK /* automatically unlocks blocks before erasing */
65 struct mtd_info *sharp_probe(struct map_info *);
67 static int sharp_probe_map(struct map_info *map,struct mtd_info *mtd);
69 static int sharp_read(struct mtd_info *mtd, loff_t from, size_t len,
70 size_t *retlen, u_char *buf);
71 static int sharp_write(struct mtd_info *mtd, loff_t from, size_t len,
72 size_t *retlen, const u_char *buf);
73 static int sharp_erase(struct mtd_info *mtd, struct erase_info *instr);
74 static void sharp_sync(struct mtd_info *mtd);
75 static int sharp_suspend(struct mtd_info *mtd);
76 static void sharp_resume(struct mtd_info *mtd);
77 static void sharp_destroy(struct mtd_info *mtd);
79 static int sharp_write_oneword(struct map_info *map, struct flchip *chip,
80 unsigned long adr, __u32 datum);
81 static int sharp_erase_oneblock(struct map_info *map, struct flchip *chip,
84 static void sharp_unlock_oneblock(struct map_info *map, struct flchip *chip,
94 struct flchip chips[1];
97 struct mtd_info *sharp_probe(struct map_info *map);
98 static void sharp_destroy(struct mtd_info *mtd);
100 static struct mtd_chip_driver sharp_chipdrv = {
101 .probe = sharp_probe,
102 .destroy = sharp_destroy,
104 .module = THIS_MODULE
108 struct mtd_info *sharp_probe(struct map_info *map)
110 struct mtd_info *mtd = NULL;
111 struct sharp_info *sharp = NULL;
114 mtd = kmalloc(sizeof(*mtd), GFP_KERNEL);
118 sharp = kmalloc(sizeof(*sharp), GFP_KERNEL);
124 memset(mtd, 0, sizeof(*mtd));
126 width = sharp_probe_map(map,mtd);
134 mtd->type = MTD_NORFLASH;
135 mtd->erase = sharp_erase;
136 mtd->read = sharp_read;
137 mtd->write = sharp_write;
138 mtd->sync = sharp_sync;
139 mtd->suspend = sharp_suspend;
140 mtd->resume = sharp_resume;
141 mtd->flags = MTD_CAP_NORFLASH;
142 mtd->name = map->name;
144 memset(sharp, 0, sizeof(*sharp));
145 sharp->chipshift = 23;
147 sharp->chips[0].start = 0;
148 sharp->chips[0].state = FL_READY;
149 sharp->chips[0].mutex = &sharp->chips[0]._spinlock;
150 sharp->chips[0].word_write_time = 0;
151 init_waitqueue_head(&sharp->chips[0].wq);
152 spin_lock_init(&sharp->chips[0]._spinlock);
154 map->fldrv = &sharp_chipdrv;
155 map->fldrv_priv = sharp;
161 static int sharp_probe_map(struct map_info *map,struct mtd_info *mtd)
164 unsigned long base = 0;
168 tmp = map_read32(map, base+0);
170 map_write32(map, CMD_READ_ID, base+0);
172 read0=map_read32(map, base+0);
173 read4=map_read32(map, base+4);
174 if(read0 == 0x89898989){
175 printk("Looks like sharp flash\n");
179 /* aa - LH28F016SCT-L95 2Mx8, 32 64k blocks*/
180 /* a0 - LH28F016SCT-Z4 2Mx8, 32 64k blocks*/
181 mtd->erasesize = 0x10000 * width;
182 mtd->size = 0x200000 * width;
185 /* a6 - LH28F008SCT-L12 1Mx8, 16 64k blocks*/
186 /* a6 - LH28F008SCR-L85 1Mx8, 16 64k blocks*/
187 mtd->erasesize = 0x10000 * width;
188 mtd->size = 0x100000 * width;
191 case 0x00000000: /* unknown */
192 /* XX - LH28F004SCT 512kx8, 8 64k blocks*/
193 mtd->erasesize = 0x10000 * width;
194 mtd->size = 0x80000 * width;
198 printk("Sort-of looks like sharp flash, 0x%08x 0x%08x\n",
201 }else if((map_read32(map, base+0) == CMD_READ_ID)){
203 printk("Looks like RAM\n");
204 map_write32(map, tmp, base+0);
206 printk("Doesn't look like sharp flash, 0x%08x 0x%08x\n",
213 /* This function returns with the chip->mutex lock held. */
214 static int sharp_wait(struct map_info *map, struct flchip *chip)
217 unsigned long timeo = jiffies + HZ;
218 DECLARE_WAITQUEUE(wait, current);
222 spin_lock_bh(chip->mutex);
226 map_write32(map,CMD_READ_STATUS,adr);
227 chip->state = FL_STATUS;
229 status = map_read32(map,adr);
230 //printk("status=%08x\n",status);
233 if((status & SR_READY)!=SR_READY){
234 //printk(".status=%08x\n",status);
239 printk("Waiting for chip\n");
241 set_current_state(TASK_INTERRUPTIBLE);
242 add_wait_queue(&chip->wq, &wait);
244 spin_unlock_bh(chip->mutex);
247 remove_wait_queue(&chip->wq, &wait);
249 if(signal_pending(current))
252 timeo = jiffies + HZ;
257 map_write32(map,CMD_RESET, adr);
259 chip->state = FL_READY;
264 static void sharp_release(struct flchip *chip)
267 spin_unlock_bh(chip->mutex);
270 static int sharp_read(struct mtd_info *mtd, loff_t from, size_t len,
271 size_t *retlen, u_char *buf)
273 struct map_info *map = mtd->priv;
274 struct sharp_info *sharp = map->fldrv_priv;
279 chipnum = (from >> sharp->chipshift);
280 ofs = from & ((1 << sharp->chipshift)-1);
285 unsigned long thislen;
287 if(chipnum>=sharp->numchips)
291 if(ofs+thislen >= (1<<sharp->chipshift))
292 thislen = (1<<sharp->chipshift) - ofs;
294 ret = sharp_wait(map,&sharp->chips[chipnum]);
298 map_copy_from(map,buf,ofs,thislen);
300 sharp_release(&sharp->chips[chipnum]);
312 static int sharp_write(struct mtd_info *mtd, loff_t to, size_t len,
313 size_t *retlen, const u_char *buf)
315 struct map_info *map = mtd->priv;
316 struct sharp_info *sharp = map->fldrv_priv;
321 union { u32 l; unsigned char uc[4]; } tbuf;
327 chipnum = to >> sharp->chipshift;
328 ofs = to & ((1<<sharp->chipshift)-1);
331 for(i=ofs&3;i<4 && len;i++){
338 sharp_write_oneword(map, &sharp->chips[chipnum], ofs&~3, tbuf.l);
347 static int sharp_write_oneword(struct map_info *map, struct flchip *chip,
348 unsigned long adr, __u32 datum)
356 ret = sharp_wait(map,chip);
358 for(try=0;try<10;try++){
359 map_write32(map,CMD_BYTE_WRITE,adr);
360 /* cpu_to_le32 -> hack to fix the writel be->le conversion */
361 map_write32(map,cpu_to_le32(datum),adr);
363 chip->state = FL_WRITING;
365 timeo = jiffies + (HZ/2);
367 map_write32(map,CMD_READ_STATUS,adr);
369 status = map_read32(map,adr);
370 if((status & SR_READY)==SR_READY)
374 printk("sharp: timed out writing\n");
377 if(!(status&SR_ERRORS))
380 printk("sharp: error writing byte at addr=%08lx status=%08x\n",adr,status);
382 map_write32(map,CMD_CLEAR_STATUS,adr);
384 map_write32(map,CMD_RESET,adr);
385 chip->state = FL_READY;
388 spin_unlock_bh(chip->mutex);
393 static int sharp_erase(struct mtd_info *mtd, struct erase_info *instr)
395 struct map_info *map = mtd->priv;
396 struct sharp_info *sharp = map->fldrv_priv;
397 unsigned long adr,len;
400 //printk("sharp_erase()\n");
401 if(instr->addr & (mtd->erasesize - 1))
403 if(instr->len & (mtd->erasesize - 1))
405 if(instr->len + instr->addr > mtd->size)
408 chipnum = instr->addr >> sharp->chipshift;
409 adr = instr->addr & ((1<<sharp->chipshift)-1);
413 ret = sharp_erase_oneblock(map, &sharp->chips[chipnum], adr);
416 adr += mtd->erasesize;
417 len -= mtd->erasesize;
418 if(adr >> sharp->chipshift){
421 if(chipnum>=sharp->numchips)
426 instr->state = MTD_ERASE_DONE;
428 instr->callback(instr);
433 static int sharp_do_wait_for_ready(struct map_info *map, struct flchip *chip,
439 DECLARE_WAITQUEUE(wait, current);
441 map_write32(map,CMD_READ_STATUS,adr);
442 status = map_read32(map,adr);
444 timeo = jiffies + HZ;
446 while(time_before(jiffies, timeo)){
447 map_write32(map,CMD_READ_STATUS,adr);
448 status = map_read32(map,adr);
449 if((status & SR_READY)==SR_READY){
453 set_current_state(TASK_INTERRUPTIBLE);
454 add_wait_queue(&chip->wq, &wait);
456 //spin_unlock_bh(chip->mutex);
460 remove_wait_queue(&chip->wq, &wait);
462 //spin_lock_bh(chip->mutex);
464 if (signal_pending(current)){
475 static int sharp_erase_oneblock(struct map_info *map, struct flchip *chip,
483 //printk("sharp_erase_oneblock()\n");
486 /* This seems like a good place to do an unlock */
487 sharp_unlock_oneblock(map,chip,adr);
490 map_write32(map,CMD_BLOCK_ERASE_1,adr);
491 map_write32(map,CMD_BLOCK_ERASE_2,adr);
493 chip->state = FL_ERASING;
495 ret = sharp_do_wait_for_ready(map,chip,adr);
498 map_write32(map,CMD_READ_STATUS,adr);
499 status = map_read32(map,adr);
501 if(!(status&SR_ERRORS)){
502 map_write32(map,CMD_RESET,adr);
503 chip->state = FL_READY;
504 //spin_unlock_bh(chip->mutex);
508 printk("sharp: error erasing block at addr=%08lx status=%08x\n",adr,status);
509 map_write32(map,CMD_CLEAR_STATUS,adr);
511 //spin_unlock_bh(chip->mutex);
517 static void sharp_unlock_oneblock(struct map_info *map, struct flchip *chip,
523 map_write32(map,CMD_CLEAR_BLOCK_LOCKS_1,adr);
524 map_write32(map,CMD_CLEAR_BLOCK_LOCKS_2,adr);
528 status = map_read32(map,adr);
529 printk("status=%08x\n",status);
532 //map_write32(map,CMD_READ_STATUS,adr);
533 status = map_read32(map,adr);
534 if((status & SR_READY)==SR_READY)
539 printk("sharp: timed out unlocking block\n");
542 if(!(status&SR_ERRORS)){
543 map_write32(map,CMD_RESET,adr);
544 chip->state = FL_READY;
548 printk("sharp: error unlocking block at addr=%08lx status=%08x\n",adr,status);
549 map_write32(map,CMD_CLEAR_STATUS,adr);
553 static void sharp_sync(struct mtd_info *mtd)
555 //printk("sharp_sync()\n");
558 static int sharp_suspend(struct mtd_info *mtd)
560 printk("sharp_suspend()\n");
564 static void sharp_resume(struct mtd_info *mtd)
566 printk("sharp_resume()\n");
570 static void sharp_destroy(struct mtd_info *mtd)
572 printk("sharp_destroy()\n");
576 int __init sharp_probe_init(void)
578 printk("MTD Sharp chip driver <ds@lineo.com>\n");
580 register_mtd_chip_driver(&sharp_chipdrv);
585 static void __exit sharp_probe_exit(void)
587 unregister_mtd_chip_driver(&sharp_chipdrv);
590 module_init(sharp_probe_init);
591 module_exit(sharp_probe_exit);
594 MODULE_LICENSE("GPL");
595 MODULE_AUTHOR("David Schleef <ds@schleef.org>");
596 MODULE_DESCRIPTION("Old MTD chip driver for pre-CFI Sharp flash chips");