Merge branch 'timers-core-for-linus' of git://git.kernel.org/pub/scm/linux/kernel...
[sfrench/cifs-2.6.git] / drivers / mtd / nand / sh_flctl.c
1 /*
2  * SuperH FLCTL nand controller
3  *
4  * Copyright (c) 2008 Renesas Solutions Corp.
5  * Copyright (c) 2008 Atom Create Engineering Co., Ltd.
6  *
7  * Based on fsl_elbc_nand.c, Copyright (c) 2006-2007 Freescale Semiconductor
8  *
9  * This program is free software; you can redistribute it and/or modify
10  * it under the terms of the GNU General Public License as published by
11  * the Free Software Foundation; version 2 of the License.
12  *
13  * This program is distributed in the hope that it will be useful,
14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16  * GNU General Public License for more details.
17  *
18  * You should have received a copy of the GNU General Public License
19  * along with this program; if not, write to the Free Software
20  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
21  *
22  */
23
24 #include <linux/module.h>
25 #include <linux/kernel.h>
26 #include <linux/completion.h>
27 #include <linux/delay.h>
28 #include <linux/dmaengine.h>
29 #include <linux/dma-mapping.h>
30 #include <linux/interrupt.h>
31 #include <linux/io.h>
32 #include <linux/of.h>
33 #include <linux/of_device.h>
34 #include <linux/platform_device.h>
35 #include <linux/pm_runtime.h>
36 #include <linux/sh_dma.h>
37 #include <linux/slab.h>
38 #include <linux/string.h>
39
40 #include <linux/mtd/mtd.h>
41 #include <linux/mtd/rawnand.h>
42 #include <linux/mtd/partitions.h>
43 #include <linux/mtd/sh_flctl.h>
44
45 static int flctl_4secc_ooblayout_sp_ecc(struct mtd_info *mtd, int section,
46                                         struct mtd_oob_region *oobregion)
47 {
48         struct nand_chip *chip = mtd_to_nand(mtd);
49
50         if (section)
51                 return -ERANGE;
52
53         oobregion->offset = 0;
54         oobregion->length = chip->ecc.bytes;
55
56         return 0;
57 }
58
59 static int flctl_4secc_ooblayout_sp_free(struct mtd_info *mtd, int section,
60                                          struct mtd_oob_region *oobregion)
61 {
62         if (section)
63                 return -ERANGE;
64
65         oobregion->offset = 12;
66         oobregion->length = 4;
67
68         return 0;
69 }
70
71 static const struct mtd_ooblayout_ops flctl_4secc_oob_smallpage_ops = {
72         .ecc = flctl_4secc_ooblayout_sp_ecc,
73         .free = flctl_4secc_ooblayout_sp_free,
74 };
75
76 static int flctl_4secc_ooblayout_lp_ecc(struct mtd_info *mtd, int section,
77                                         struct mtd_oob_region *oobregion)
78 {
79         struct nand_chip *chip = mtd_to_nand(mtd);
80
81         if (section >= chip->ecc.steps)
82                 return -ERANGE;
83
84         oobregion->offset = (section * 16) + 6;
85         oobregion->length = chip->ecc.bytes;
86
87         return 0;
88 }
89
90 static int flctl_4secc_ooblayout_lp_free(struct mtd_info *mtd, int section,
91                                          struct mtd_oob_region *oobregion)
92 {
93         struct nand_chip *chip = mtd_to_nand(mtd);
94
95         if (section >= chip->ecc.steps)
96                 return -ERANGE;
97
98         oobregion->offset = section * 16;
99         oobregion->length = 6;
100
101         if (!section) {
102                 oobregion->offset += 2;
103                 oobregion->length -= 2;
104         }
105
106         return 0;
107 }
108
109 static const struct mtd_ooblayout_ops flctl_4secc_oob_largepage_ops = {
110         .ecc = flctl_4secc_ooblayout_lp_ecc,
111         .free = flctl_4secc_ooblayout_lp_free,
112 };
113
114 static uint8_t scan_ff_pattern[] = { 0xff, 0xff };
115
116 static struct nand_bbt_descr flctl_4secc_smallpage = {
117         .options = NAND_BBT_SCAN2NDPAGE,
118         .offs = 11,
119         .len = 1,
120         .pattern = scan_ff_pattern,
121 };
122
123 static struct nand_bbt_descr flctl_4secc_largepage = {
124         .options = NAND_BBT_SCAN2NDPAGE,
125         .offs = 0,
126         .len = 2,
127         .pattern = scan_ff_pattern,
128 };
129
130 static void empty_fifo(struct sh_flctl *flctl)
131 {
132         writel(flctl->flintdmacr_base | AC1CLR | AC0CLR, FLINTDMACR(flctl));
133         writel(flctl->flintdmacr_base, FLINTDMACR(flctl));
134 }
135
136 static void start_translation(struct sh_flctl *flctl)
137 {
138         writeb(TRSTRT, FLTRCR(flctl));
139 }
140
141 static void timeout_error(struct sh_flctl *flctl, const char *str)
142 {
143         dev_err(&flctl->pdev->dev, "Timeout occurred in %s\n", str);
144 }
145
146 static void wait_completion(struct sh_flctl *flctl)
147 {
148         uint32_t timeout = LOOP_TIMEOUT_MAX;
149
150         while (timeout--) {
151                 if (readb(FLTRCR(flctl)) & TREND) {
152                         writeb(0x0, FLTRCR(flctl));
153                         return;
154                 }
155                 udelay(1);
156         }
157
158         timeout_error(flctl, __func__);
159         writeb(0x0, FLTRCR(flctl));
160 }
161
162 static void flctl_dma_complete(void *param)
163 {
164         struct sh_flctl *flctl = param;
165
166         complete(&flctl->dma_complete);
167 }
168
169 static void flctl_release_dma(struct sh_flctl *flctl)
170 {
171         if (flctl->chan_fifo0_rx) {
172                 dma_release_channel(flctl->chan_fifo0_rx);
173                 flctl->chan_fifo0_rx = NULL;
174         }
175         if (flctl->chan_fifo0_tx) {
176                 dma_release_channel(flctl->chan_fifo0_tx);
177                 flctl->chan_fifo0_tx = NULL;
178         }
179 }
180
181 static void flctl_setup_dma(struct sh_flctl *flctl)
182 {
183         dma_cap_mask_t mask;
184         struct dma_slave_config cfg;
185         struct platform_device *pdev = flctl->pdev;
186         struct sh_flctl_platform_data *pdata = dev_get_platdata(&pdev->dev);
187         int ret;
188
189         if (!pdata)
190                 return;
191
192         if (pdata->slave_id_fifo0_tx <= 0 || pdata->slave_id_fifo0_rx <= 0)
193                 return;
194
195         /* We can only either use DMA for both Tx and Rx or not use it at all */
196         dma_cap_zero(mask);
197         dma_cap_set(DMA_SLAVE, mask);
198
199         flctl->chan_fifo0_tx = dma_request_channel(mask, shdma_chan_filter,
200                                 (void *)(uintptr_t)pdata->slave_id_fifo0_tx);
201         dev_dbg(&pdev->dev, "%s: TX: got channel %p\n", __func__,
202                 flctl->chan_fifo0_tx);
203
204         if (!flctl->chan_fifo0_tx)
205                 return;
206
207         memset(&cfg, 0, sizeof(cfg));
208         cfg.direction = DMA_MEM_TO_DEV;
209         cfg.dst_addr = flctl->fifo;
210         cfg.src_addr = 0;
211         ret = dmaengine_slave_config(flctl->chan_fifo0_tx, &cfg);
212         if (ret < 0)
213                 goto err;
214
215         flctl->chan_fifo0_rx = dma_request_channel(mask, shdma_chan_filter,
216                                 (void *)(uintptr_t)pdata->slave_id_fifo0_rx);
217         dev_dbg(&pdev->dev, "%s: RX: got channel %p\n", __func__,
218                 flctl->chan_fifo0_rx);
219
220         if (!flctl->chan_fifo0_rx)
221                 goto err;
222
223         cfg.direction = DMA_DEV_TO_MEM;
224         cfg.dst_addr = 0;
225         cfg.src_addr = flctl->fifo;
226         ret = dmaengine_slave_config(flctl->chan_fifo0_rx, &cfg);
227         if (ret < 0)
228                 goto err;
229
230         init_completion(&flctl->dma_complete);
231
232         return;
233
234 err:
235         flctl_release_dma(flctl);
236 }
237
238 static void set_addr(struct mtd_info *mtd, int column, int page_addr)
239 {
240         struct sh_flctl *flctl = mtd_to_flctl(mtd);
241         uint32_t addr = 0;
242
243         if (column == -1) {
244                 addr = page_addr;       /* ERASE1 */
245         } else if (page_addr != -1) {
246                 /* SEQIN, READ0, etc.. */
247                 if (flctl->chip.options & NAND_BUSWIDTH_16)
248                         column >>= 1;
249                 if (flctl->page_size) {
250                         addr = column & 0x0FFF;
251                         addr |= (page_addr & 0xff) << 16;
252                         addr |= ((page_addr >> 8) & 0xff) << 24;
253                         /* big than 128MB */
254                         if (flctl->rw_ADRCNT == ADRCNT2_E) {
255                                 uint32_t        addr2;
256                                 addr2 = (page_addr >> 16) & 0xff;
257                                 writel(addr2, FLADR2(flctl));
258                         }
259                 } else {
260                         addr = column;
261                         addr |= (page_addr & 0xff) << 8;
262                         addr |= ((page_addr >> 8) & 0xff) << 16;
263                         addr |= ((page_addr >> 16) & 0xff) << 24;
264                 }
265         }
266         writel(addr, FLADR(flctl));
267 }
268
269 static void wait_rfifo_ready(struct sh_flctl *flctl)
270 {
271         uint32_t timeout = LOOP_TIMEOUT_MAX;
272
273         while (timeout--) {
274                 uint32_t val;
275                 /* check FIFO */
276                 val = readl(FLDTCNTR(flctl)) >> 16;
277                 if (val & 0xFF)
278                         return;
279                 udelay(1);
280         }
281         timeout_error(flctl, __func__);
282 }
283
284 static void wait_wfifo_ready(struct sh_flctl *flctl)
285 {
286         uint32_t len, timeout = LOOP_TIMEOUT_MAX;
287
288         while (timeout--) {
289                 /* check FIFO */
290                 len = (readl(FLDTCNTR(flctl)) >> 16) & 0xFF;
291                 if (len >= 4)
292                         return;
293                 udelay(1);
294         }
295         timeout_error(flctl, __func__);
296 }
297
298 static enum flctl_ecc_res_t wait_recfifo_ready
299                 (struct sh_flctl *flctl, int sector_number)
300 {
301         uint32_t timeout = LOOP_TIMEOUT_MAX;
302         void __iomem *ecc_reg[4];
303         int i;
304         int state = FL_SUCCESS;
305         uint32_t data, size;
306
307         /*
308          * First this loops checks in FLDTCNTR if we are ready to read out the
309          * oob data. This is the case if either all went fine without errors or
310          * if the bottom part of the loop corrected the errors or marked them as
311          * uncorrectable and the controller is given time to push the data into
312          * the FIFO.
313          */
314         while (timeout--) {
315                 /* check if all is ok and we can read out the OOB */
316                 size = readl(FLDTCNTR(flctl)) >> 24;
317                 if ((size & 0xFF) == 4)
318                         return state;
319
320                 /* check if a correction code has been calculated */
321                 if (!(readl(FL4ECCCR(flctl)) & _4ECCEND)) {
322                         /*
323                          * either we wait for the fifo to be filled or a
324                          * correction pattern is being generated
325                          */
326                         udelay(1);
327                         continue;
328                 }
329
330                 /* check for an uncorrectable error */
331                 if (readl(FL4ECCCR(flctl)) & _4ECCFA) {
332                         /* check if we face a non-empty page */
333                         for (i = 0; i < 512; i++) {
334                                 if (flctl->done_buff[i] != 0xff) {
335                                         state = FL_ERROR; /* can't correct */
336                                         break;
337                                 }
338                         }
339
340                         if (state == FL_SUCCESS)
341                                 dev_dbg(&flctl->pdev->dev,
342                                 "reading empty sector %d, ecc error ignored\n",
343                                 sector_number);
344
345                         writel(0, FL4ECCCR(flctl));
346                         continue;
347                 }
348
349                 /* start error correction */
350                 ecc_reg[0] = FL4ECCRESULT0(flctl);
351                 ecc_reg[1] = FL4ECCRESULT1(flctl);
352                 ecc_reg[2] = FL4ECCRESULT2(flctl);
353                 ecc_reg[3] = FL4ECCRESULT3(flctl);
354
355                 for (i = 0; i < 3; i++) {
356                         uint8_t org;
357                         unsigned int index;
358
359                         data = readl(ecc_reg[i]);
360
361                         if (flctl->page_size)
362                                 index = (512 * sector_number) +
363                                         (data >> 16);
364                         else
365                                 index = data >> 16;
366
367                         org = flctl->done_buff[index];
368                         flctl->done_buff[index] = org ^ (data & 0xFF);
369                 }
370                 state = FL_REPAIRABLE;
371                 writel(0, FL4ECCCR(flctl));
372         }
373
374         timeout_error(flctl, __func__);
375         return FL_TIMEOUT;      /* timeout */
376 }
377
378 static void wait_wecfifo_ready(struct sh_flctl *flctl)
379 {
380         uint32_t timeout = LOOP_TIMEOUT_MAX;
381         uint32_t len;
382
383         while (timeout--) {
384                 /* check FLECFIFO */
385                 len = (readl(FLDTCNTR(flctl)) >> 24) & 0xFF;
386                 if (len >= 4)
387                         return;
388                 udelay(1);
389         }
390         timeout_error(flctl, __func__);
391 }
392
393 static int flctl_dma_fifo0_transfer(struct sh_flctl *flctl, unsigned long *buf,
394                                         int len, enum dma_data_direction dir)
395 {
396         struct dma_async_tx_descriptor *desc = NULL;
397         struct dma_chan *chan;
398         enum dma_transfer_direction tr_dir;
399         dma_addr_t dma_addr;
400         dma_cookie_t cookie;
401         uint32_t reg;
402         int ret;
403
404         if (dir == DMA_FROM_DEVICE) {
405                 chan = flctl->chan_fifo0_rx;
406                 tr_dir = DMA_DEV_TO_MEM;
407         } else {
408                 chan = flctl->chan_fifo0_tx;
409                 tr_dir = DMA_MEM_TO_DEV;
410         }
411
412         dma_addr = dma_map_single(chan->device->dev, buf, len, dir);
413
414         if (!dma_mapping_error(chan->device->dev, dma_addr))
415                 desc = dmaengine_prep_slave_single(chan, dma_addr, len,
416                         tr_dir, DMA_PREP_INTERRUPT | DMA_CTRL_ACK);
417
418         if (desc) {
419                 reg = readl(FLINTDMACR(flctl));
420                 reg |= DREQ0EN;
421                 writel(reg, FLINTDMACR(flctl));
422
423                 desc->callback = flctl_dma_complete;
424                 desc->callback_param = flctl;
425                 cookie = dmaengine_submit(desc);
426                 if (dma_submit_error(cookie)) {
427                         ret = dma_submit_error(cookie);
428                         dev_warn(&flctl->pdev->dev,
429                                  "DMA submit failed, falling back to PIO\n");
430                         goto out;
431                 }
432
433                 dma_async_issue_pending(chan);
434         } else {
435                 /* DMA failed, fall back to PIO */
436                 flctl_release_dma(flctl);
437                 dev_warn(&flctl->pdev->dev,
438                          "DMA failed, falling back to PIO\n");
439                 ret = -EIO;
440                 goto out;
441         }
442
443         ret =
444         wait_for_completion_timeout(&flctl->dma_complete,
445                                 msecs_to_jiffies(3000));
446
447         if (ret <= 0) {
448                 dmaengine_terminate_all(chan);
449                 dev_err(&flctl->pdev->dev, "wait_for_completion_timeout\n");
450         }
451
452 out:
453         reg = readl(FLINTDMACR(flctl));
454         reg &= ~DREQ0EN;
455         writel(reg, FLINTDMACR(flctl));
456
457         dma_unmap_single(chan->device->dev, dma_addr, len, dir);
458
459         /* ret > 0 is success */
460         return ret;
461 }
462
463 static void read_datareg(struct sh_flctl *flctl, int offset)
464 {
465         unsigned long data;
466         unsigned long *buf = (unsigned long *)&flctl->done_buff[offset];
467
468         wait_completion(flctl);
469
470         data = readl(FLDATAR(flctl));
471         *buf = le32_to_cpu(data);
472 }
473
474 static void read_fiforeg(struct sh_flctl *flctl, int rlen, int offset)
475 {
476         int i, len_4align;
477         unsigned long *buf = (unsigned long *)&flctl->done_buff[offset];
478
479         len_4align = (rlen + 3) / 4;
480
481         /* initiate DMA transfer */
482         if (flctl->chan_fifo0_rx && rlen >= 32 &&
483                 flctl_dma_fifo0_transfer(flctl, buf, rlen, DMA_DEV_TO_MEM) > 0)
484                         goto convert;   /* DMA success */
485
486         /* do polling transfer */
487         for (i = 0; i < len_4align; i++) {
488                 wait_rfifo_ready(flctl);
489                 buf[i] = readl(FLDTFIFO(flctl));
490         }
491
492 convert:
493         for (i = 0; i < len_4align; i++)
494                 buf[i] = be32_to_cpu(buf[i]);
495 }
496
497 static enum flctl_ecc_res_t read_ecfiforeg
498                 (struct sh_flctl *flctl, uint8_t *buff, int sector)
499 {
500         int i;
501         enum flctl_ecc_res_t res;
502         unsigned long *ecc_buf = (unsigned long *)buff;
503
504         res = wait_recfifo_ready(flctl , sector);
505
506         if (res != FL_ERROR) {
507                 for (i = 0; i < 4; i++) {
508                         ecc_buf[i] = readl(FLECFIFO(flctl));
509                         ecc_buf[i] = be32_to_cpu(ecc_buf[i]);
510                 }
511         }
512
513         return res;
514 }
515
516 static void write_fiforeg(struct sh_flctl *flctl, int rlen,
517                                                 unsigned int offset)
518 {
519         int i, len_4align;
520         unsigned long *buf = (unsigned long *)&flctl->done_buff[offset];
521
522         len_4align = (rlen + 3) / 4;
523         for (i = 0; i < len_4align; i++) {
524                 wait_wfifo_ready(flctl);
525                 writel(cpu_to_be32(buf[i]), FLDTFIFO(flctl));
526         }
527 }
528
529 static void write_ec_fiforeg(struct sh_flctl *flctl, int rlen,
530                                                 unsigned int offset)
531 {
532         int i, len_4align;
533         unsigned long *buf = (unsigned long *)&flctl->done_buff[offset];
534
535         len_4align = (rlen + 3) / 4;
536
537         for (i = 0; i < len_4align; i++)
538                 buf[i] = cpu_to_be32(buf[i]);
539
540         /* initiate DMA transfer */
541         if (flctl->chan_fifo0_tx && rlen >= 32 &&
542                 flctl_dma_fifo0_transfer(flctl, buf, rlen, DMA_MEM_TO_DEV) > 0)
543                         return; /* DMA success */
544
545         /* do polling transfer */
546         for (i = 0; i < len_4align; i++) {
547                 wait_wecfifo_ready(flctl);
548                 writel(buf[i], FLECFIFO(flctl));
549         }
550 }
551
552 static void set_cmd_regs(struct mtd_info *mtd, uint32_t cmd, uint32_t flcmcdr_val)
553 {
554         struct sh_flctl *flctl = mtd_to_flctl(mtd);
555         uint32_t flcmncr_val = flctl->flcmncr_base & ~SEL_16BIT;
556         uint32_t flcmdcr_val, addr_len_bytes = 0;
557
558         /* Set SNAND bit if page size is 2048byte */
559         if (flctl->page_size)
560                 flcmncr_val |= SNAND_E;
561         else
562                 flcmncr_val &= ~SNAND_E;
563
564         /* default FLCMDCR val */
565         flcmdcr_val = DOCMD1_E | DOADR_E;
566
567         /* Set for FLCMDCR */
568         switch (cmd) {
569         case NAND_CMD_ERASE1:
570                 addr_len_bytes = flctl->erase_ADRCNT;
571                 flcmdcr_val |= DOCMD2_E;
572                 break;
573         case NAND_CMD_READ0:
574         case NAND_CMD_READOOB:
575         case NAND_CMD_RNDOUT:
576                 addr_len_bytes = flctl->rw_ADRCNT;
577                 flcmdcr_val |= CDSRC_E;
578                 if (flctl->chip.options & NAND_BUSWIDTH_16)
579                         flcmncr_val |= SEL_16BIT;
580                 break;
581         case NAND_CMD_SEQIN:
582                 /* This case is that cmd is READ0 or READ1 or READ00 */
583                 flcmdcr_val &= ~DOADR_E;        /* ONLY execute 1st cmd */
584                 break;
585         case NAND_CMD_PAGEPROG:
586                 addr_len_bytes = flctl->rw_ADRCNT;
587                 flcmdcr_val |= DOCMD2_E | CDSRC_E | SELRW;
588                 if (flctl->chip.options & NAND_BUSWIDTH_16)
589                         flcmncr_val |= SEL_16BIT;
590                 break;
591         case NAND_CMD_READID:
592                 flcmncr_val &= ~SNAND_E;
593                 flcmdcr_val |= CDSRC_E;
594                 addr_len_bytes = ADRCNT_1;
595                 break;
596         case NAND_CMD_STATUS:
597         case NAND_CMD_RESET:
598                 flcmncr_val &= ~SNAND_E;
599                 flcmdcr_val &= ~(DOADR_E | DOSR_E);
600                 break;
601         default:
602                 break;
603         }
604
605         /* Set address bytes parameter */
606         flcmdcr_val |= addr_len_bytes;
607
608         /* Now actually write */
609         writel(flcmncr_val, FLCMNCR(flctl));
610         writel(flcmdcr_val, FLCMDCR(flctl));
611         writel(flcmcdr_val, FLCMCDR(flctl));
612 }
613
614 static int flctl_read_page_hwecc(struct mtd_info *mtd, struct nand_chip *chip,
615                                 uint8_t *buf, int oob_required, int page)
616 {
617         nand_read_page_op(chip, page, 0, buf, mtd->writesize);
618         if (oob_required)
619                 chip->read_buf(mtd, chip->oob_poi, mtd->oobsize);
620         return 0;
621 }
622
623 static int flctl_write_page_hwecc(struct mtd_info *mtd, struct nand_chip *chip,
624                                   const uint8_t *buf, int oob_required,
625                                   int page)
626 {
627         nand_prog_page_begin_op(chip, page, 0, buf, mtd->writesize);
628         chip->write_buf(mtd, chip->oob_poi, mtd->oobsize);
629         return nand_prog_page_end_op(chip);
630 }
631
632 static void execmd_read_page_sector(struct mtd_info *mtd, int page_addr)
633 {
634         struct sh_flctl *flctl = mtd_to_flctl(mtd);
635         int sector, page_sectors;
636         enum flctl_ecc_res_t ecc_result;
637
638         page_sectors = flctl->page_size ? 4 : 1;
639
640         set_cmd_regs(mtd, NAND_CMD_READ0,
641                 (NAND_CMD_READSTART << 8) | NAND_CMD_READ0);
642
643         writel(readl(FLCMNCR(flctl)) | ACM_SACCES_MODE | _4ECCCORRECT,
644                  FLCMNCR(flctl));
645         writel(readl(FLCMDCR(flctl)) | page_sectors, FLCMDCR(flctl));
646         writel(page_addr << 2, FLADR(flctl));
647
648         empty_fifo(flctl);
649         start_translation(flctl);
650
651         for (sector = 0; sector < page_sectors; sector++) {
652                 read_fiforeg(flctl, 512, 512 * sector);
653
654                 ecc_result = read_ecfiforeg(flctl,
655                         &flctl->done_buff[mtd->writesize + 16 * sector],
656                         sector);
657
658                 switch (ecc_result) {
659                 case FL_REPAIRABLE:
660                         dev_info(&flctl->pdev->dev,
661                                 "applied ecc on page 0x%x", page_addr);
662                         mtd->ecc_stats.corrected++;
663                         break;
664                 case FL_ERROR:
665                         dev_warn(&flctl->pdev->dev,
666                                 "page 0x%x contains corrupted data\n",
667                                 page_addr);
668                         mtd->ecc_stats.failed++;
669                         break;
670                 default:
671                         ;
672                 }
673         }
674
675         wait_completion(flctl);
676
677         writel(readl(FLCMNCR(flctl)) & ~(ACM_SACCES_MODE | _4ECCCORRECT),
678                         FLCMNCR(flctl));
679 }
680
681 static void execmd_read_oob(struct mtd_info *mtd, int page_addr)
682 {
683         struct sh_flctl *flctl = mtd_to_flctl(mtd);
684         int page_sectors = flctl->page_size ? 4 : 1;
685         int i;
686
687         set_cmd_regs(mtd, NAND_CMD_READ0,
688                 (NAND_CMD_READSTART << 8) | NAND_CMD_READ0);
689
690         empty_fifo(flctl);
691
692         for (i = 0; i < page_sectors; i++) {
693                 set_addr(mtd, (512 + 16) * i + 512 , page_addr);
694                 writel(16, FLDTCNTR(flctl));
695
696                 start_translation(flctl);
697                 read_fiforeg(flctl, 16, 16 * i);
698                 wait_completion(flctl);
699         }
700 }
701
702 static void execmd_write_page_sector(struct mtd_info *mtd)
703 {
704         struct sh_flctl *flctl = mtd_to_flctl(mtd);
705         int page_addr = flctl->seqin_page_addr;
706         int sector, page_sectors;
707
708         page_sectors = flctl->page_size ? 4 : 1;
709
710         set_cmd_regs(mtd, NAND_CMD_PAGEPROG,
711                         (NAND_CMD_PAGEPROG << 8) | NAND_CMD_SEQIN);
712
713         empty_fifo(flctl);
714         writel(readl(FLCMNCR(flctl)) | ACM_SACCES_MODE, FLCMNCR(flctl));
715         writel(readl(FLCMDCR(flctl)) | page_sectors, FLCMDCR(flctl));
716         writel(page_addr << 2, FLADR(flctl));
717         start_translation(flctl);
718
719         for (sector = 0; sector < page_sectors; sector++) {
720                 write_fiforeg(flctl, 512, 512 * sector);
721                 write_ec_fiforeg(flctl, 16, mtd->writesize + 16 * sector);
722         }
723
724         wait_completion(flctl);
725         writel(readl(FLCMNCR(flctl)) & ~ACM_SACCES_MODE, FLCMNCR(flctl));
726 }
727
728 static void execmd_write_oob(struct mtd_info *mtd)
729 {
730         struct sh_flctl *flctl = mtd_to_flctl(mtd);
731         int page_addr = flctl->seqin_page_addr;
732         int sector, page_sectors;
733
734         page_sectors = flctl->page_size ? 4 : 1;
735
736         set_cmd_regs(mtd, NAND_CMD_PAGEPROG,
737                         (NAND_CMD_PAGEPROG << 8) | NAND_CMD_SEQIN);
738
739         for (sector = 0; sector < page_sectors; sector++) {
740                 empty_fifo(flctl);
741                 set_addr(mtd, sector * 528 + 512, page_addr);
742                 writel(16, FLDTCNTR(flctl));    /* set read size */
743
744                 start_translation(flctl);
745                 write_fiforeg(flctl, 16, 16 * sector);
746                 wait_completion(flctl);
747         }
748 }
749
750 static void flctl_cmdfunc(struct mtd_info *mtd, unsigned int command,
751                         int column, int page_addr)
752 {
753         struct sh_flctl *flctl = mtd_to_flctl(mtd);
754         uint32_t read_cmd = 0;
755
756         pm_runtime_get_sync(&flctl->pdev->dev);
757
758         flctl->read_bytes = 0;
759         if (command != NAND_CMD_PAGEPROG)
760                 flctl->index = 0;
761
762         switch (command) {
763         case NAND_CMD_READ1:
764         case NAND_CMD_READ0:
765                 if (flctl->hwecc) {
766                         /* read page with hwecc */
767                         execmd_read_page_sector(mtd, page_addr);
768                         break;
769                 }
770                 if (flctl->page_size)
771                         set_cmd_regs(mtd, command, (NAND_CMD_READSTART << 8)
772                                 | command);
773                 else
774                         set_cmd_regs(mtd, command, command);
775
776                 set_addr(mtd, 0, page_addr);
777
778                 flctl->read_bytes = mtd->writesize + mtd->oobsize;
779                 if (flctl->chip.options & NAND_BUSWIDTH_16)
780                         column >>= 1;
781                 flctl->index += column;
782                 goto read_normal_exit;
783
784         case NAND_CMD_READOOB:
785                 if (flctl->hwecc) {
786                         /* read page with hwecc */
787                         execmd_read_oob(mtd, page_addr);
788                         break;
789                 }
790
791                 if (flctl->page_size) {
792                         set_cmd_regs(mtd, command, (NAND_CMD_READSTART << 8)
793                                 | NAND_CMD_READ0);
794                         set_addr(mtd, mtd->writesize, page_addr);
795                 } else {
796                         set_cmd_regs(mtd, command, command);
797                         set_addr(mtd, 0, page_addr);
798                 }
799                 flctl->read_bytes = mtd->oobsize;
800                 goto read_normal_exit;
801
802         case NAND_CMD_RNDOUT:
803                 if (flctl->hwecc)
804                         break;
805
806                 if (flctl->page_size)
807                         set_cmd_regs(mtd, command, (NAND_CMD_RNDOUTSTART << 8)
808                                 | command);
809                 else
810                         set_cmd_regs(mtd, command, command);
811
812                 set_addr(mtd, column, 0);
813
814                 flctl->read_bytes = mtd->writesize + mtd->oobsize - column;
815                 goto read_normal_exit;
816
817         case NAND_CMD_READID:
818                 set_cmd_regs(mtd, command, command);
819
820                 /* READID is always performed using an 8-bit bus */
821                 if (flctl->chip.options & NAND_BUSWIDTH_16)
822                         column <<= 1;
823                 set_addr(mtd, column, 0);
824
825                 flctl->read_bytes = 8;
826                 writel(flctl->read_bytes, FLDTCNTR(flctl)); /* set read size */
827                 empty_fifo(flctl);
828                 start_translation(flctl);
829                 read_fiforeg(flctl, flctl->read_bytes, 0);
830                 wait_completion(flctl);
831                 break;
832
833         case NAND_CMD_ERASE1:
834                 flctl->erase1_page_addr = page_addr;
835                 break;
836
837         case NAND_CMD_ERASE2:
838                 set_cmd_regs(mtd, NAND_CMD_ERASE1,
839                         (command << 8) | NAND_CMD_ERASE1);
840                 set_addr(mtd, -1, flctl->erase1_page_addr);
841                 start_translation(flctl);
842                 wait_completion(flctl);
843                 break;
844
845         case NAND_CMD_SEQIN:
846                 if (!flctl->page_size) {
847                         /* output read command */
848                         if (column >= mtd->writesize) {
849                                 column -= mtd->writesize;
850                                 read_cmd = NAND_CMD_READOOB;
851                         } else if (column < 256) {
852                                 read_cmd = NAND_CMD_READ0;
853                         } else {
854                                 column -= 256;
855                                 read_cmd = NAND_CMD_READ1;
856                         }
857                 }
858                 flctl->seqin_column = column;
859                 flctl->seqin_page_addr = page_addr;
860                 flctl->seqin_read_cmd = read_cmd;
861                 break;
862
863         case NAND_CMD_PAGEPROG:
864                 empty_fifo(flctl);
865                 if (!flctl->page_size) {
866                         set_cmd_regs(mtd, NAND_CMD_SEQIN,
867                                         flctl->seqin_read_cmd);
868                         set_addr(mtd, -1, -1);
869                         writel(0, FLDTCNTR(flctl));     /* set 0 size */
870                         start_translation(flctl);
871                         wait_completion(flctl);
872                 }
873                 if (flctl->hwecc) {
874                         /* write page with hwecc */
875                         if (flctl->seqin_column == mtd->writesize)
876                                 execmd_write_oob(mtd);
877                         else if (!flctl->seqin_column)
878                                 execmd_write_page_sector(mtd);
879                         else
880                                 printk(KERN_ERR "Invalid address !?\n");
881                         break;
882                 }
883                 set_cmd_regs(mtd, command, (command << 8) | NAND_CMD_SEQIN);
884                 set_addr(mtd, flctl->seqin_column, flctl->seqin_page_addr);
885                 writel(flctl->index, FLDTCNTR(flctl));  /* set write size */
886                 start_translation(flctl);
887                 write_fiforeg(flctl, flctl->index, 0);
888                 wait_completion(flctl);
889                 break;
890
891         case NAND_CMD_STATUS:
892                 set_cmd_regs(mtd, command, command);
893                 set_addr(mtd, -1, -1);
894
895                 flctl->read_bytes = 1;
896                 writel(flctl->read_bytes, FLDTCNTR(flctl)); /* set read size */
897                 start_translation(flctl);
898                 read_datareg(flctl, 0); /* read and end */
899                 break;
900
901         case NAND_CMD_RESET:
902                 set_cmd_regs(mtd, command, command);
903                 set_addr(mtd, -1, -1);
904
905                 writel(0, FLDTCNTR(flctl));     /* set 0 size */
906                 start_translation(flctl);
907                 wait_completion(flctl);
908                 break;
909
910         default:
911                 break;
912         }
913         goto runtime_exit;
914
915 read_normal_exit:
916         writel(flctl->read_bytes, FLDTCNTR(flctl));     /* set read size */
917         empty_fifo(flctl);
918         start_translation(flctl);
919         read_fiforeg(flctl, flctl->read_bytes, 0);
920         wait_completion(flctl);
921 runtime_exit:
922         pm_runtime_put_sync(&flctl->pdev->dev);
923         return;
924 }
925
926 static void flctl_select_chip(struct mtd_info *mtd, int chipnr)
927 {
928         struct sh_flctl *flctl = mtd_to_flctl(mtd);
929         int ret;
930
931         switch (chipnr) {
932         case -1:
933                 flctl->flcmncr_base &= ~CE0_ENABLE;
934
935                 pm_runtime_get_sync(&flctl->pdev->dev);
936                 writel(flctl->flcmncr_base, FLCMNCR(flctl));
937
938                 if (flctl->qos_request) {
939                         dev_pm_qos_remove_request(&flctl->pm_qos);
940                         flctl->qos_request = 0;
941                 }
942
943                 pm_runtime_put_sync(&flctl->pdev->dev);
944                 break;
945         case 0:
946                 flctl->flcmncr_base |= CE0_ENABLE;
947
948                 if (!flctl->qos_request) {
949                         ret = dev_pm_qos_add_request(&flctl->pdev->dev,
950                                                         &flctl->pm_qos,
951                                                         DEV_PM_QOS_RESUME_LATENCY,
952                                                         100);
953                         if (ret < 0)
954                                 dev_err(&flctl->pdev->dev,
955                                         "PM QoS request failed: %d\n", ret);
956                         flctl->qos_request = 1;
957                 }
958
959                 if (flctl->holden) {
960                         pm_runtime_get_sync(&flctl->pdev->dev);
961                         writel(HOLDEN, FLHOLDCR(flctl));
962                         pm_runtime_put_sync(&flctl->pdev->dev);
963                 }
964                 break;
965         default:
966                 BUG();
967         }
968 }
969
970 static void flctl_write_buf(struct mtd_info *mtd, const uint8_t *buf, int len)
971 {
972         struct sh_flctl *flctl = mtd_to_flctl(mtd);
973
974         memcpy(&flctl->done_buff[flctl->index], buf, len);
975         flctl->index += len;
976 }
977
978 static uint8_t flctl_read_byte(struct mtd_info *mtd)
979 {
980         struct sh_flctl *flctl = mtd_to_flctl(mtd);
981         uint8_t data;
982
983         data = flctl->done_buff[flctl->index];
984         flctl->index++;
985         return data;
986 }
987
988 static uint16_t flctl_read_word(struct mtd_info *mtd)
989 {
990         struct sh_flctl *flctl = mtd_to_flctl(mtd);
991         uint16_t *buf = (uint16_t *)&flctl->done_buff[flctl->index];
992
993         flctl->index += 2;
994         return *buf;
995 }
996
997 static void flctl_read_buf(struct mtd_info *mtd, uint8_t *buf, int len)
998 {
999         struct sh_flctl *flctl = mtd_to_flctl(mtd);
1000
1001         memcpy(buf, &flctl->done_buff[flctl->index], len);
1002         flctl->index += len;
1003 }
1004
1005 static int flctl_chip_init_tail(struct mtd_info *mtd)
1006 {
1007         struct sh_flctl *flctl = mtd_to_flctl(mtd);
1008         struct nand_chip *chip = &flctl->chip;
1009
1010         if (mtd->writesize == 512) {
1011                 flctl->page_size = 0;
1012                 if (chip->chipsize > (32 << 20)) {
1013                         /* big than 32MB */
1014                         flctl->rw_ADRCNT = ADRCNT_4;
1015                         flctl->erase_ADRCNT = ADRCNT_3;
1016                 } else if (chip->chipsize > (2 << 16)) {
1017                         /* big than 128KB */
1018                         flctl->rw_ADRCNT = ADRCNT_3;
1019                         flctl->erase_ADRCNT = ADRCNT_2;
1020                 } else {
1021                         flctl->rw_ADRCNT = ADRCNT_2;
1022                         flctl->erase_ADRCNT = ADRCNT_1;
1023                 }
1024         } else {
1025                 flctl->page_size = 1;
1026                 if (chip->chipsize > (128 << 20)) {
1027                         /* big than 128MB */
1028                         flctl->rw_ADRCNT = ADRCNT2_E;
1029                         flctl->erase_ADRCNT = ADRCNT_3;
1030                 } else if (chip->chipsize > (8 << 16)) {
1031                         /* big than 512KB */
1032                         flctl->rw_ADRCNT = ADRCNT_4;
1033                         flctl->erase_ADRCNT = ADRCNT_2;
1034                 } else {
1035                         flctl->rw_ADRCNT = ADRCNT_3;
1036                         flctl->erase_ADRCNT = ADRCNT_1;
1037                 }
1038         }
1039
1040         if (flctl->hwecc) {
1041                 if (mtd->writesize == 512) {
1042                         mtd_set_ooblayout(mtd, &flctl_4secc_oob_smallpage_ops);
1043                         chip->badblock_pattern = &flctl_4secc_smallpage;
1044                 } else {
1045                         mtd_set_ooblayout(mtd, &flctl_4secc_oob_largepage_ops);
1046                         chip->badblock_pattern = &flctl_4secc_largepage;
1047                 }
1048
1049                 chip->ecc.size = 512;
1050                 chip->ecc.bytes = 10;
1051                 chip->ecc.strength = 4;
1052                 chip->ecc.read_page = flctl_read_page_hwecc;
1053                 chip->ecc.write_page = flctl_write_page_hwecc;
1054                 chip->ecc.mode = NAND_ECC_HW;
1055
1056                 /* 4 symbols ECC enabled */
1057                 flctl->flcmncr_base |= _4ECCEN;
1058         } else {
1059                 chip->ecc.mode = NAND_ECC_SOFT;
1060                 chip->ecc.algo = NAND_ECC_HAMMING;
1061         }
1062
1063         return 0;
1064 }
1065
1066 static irqreturn_t flctl_handle_flste(int irq, void *dev_id)
1067 {
1068         struct sh_flctl *flctl = dev_id;
1069
1070         dev_err(&flctl->pdev->dev, "flste irq: %x\n", readl(FLINTDMACR(flctl)));
1071         writel(flctl->flintdmacr_base, FLINTDMACR(flctl));
1072
1073         return IRQ_HANDLED;
1074 }
1075
1076 struct flctl_soc_config {
1077         unsigned long flcmncr_val;
1078         unsigned has_hwecc:1;
1079         unsigned use_holden:1;
1080 };
1081
1082 static struct flctl_soc_config flctl_sh7372_config = {
1083         .flcmncr_val = CLK_16B_12L_4H | TYPESEL_SET | SHBUSSEL,
1084         .has_hwecc = 1,
1085         .use_holden = 1,
1086 };
1087
1088 static const struct of_device_id of_flctl_match[] = {
1089         { .compatible = "renesas,shmobile-flctl-sh7372",
1090                                 .data = &flctl_sh7372_config },
1091         {},
1092 };
1093 MODULE_DEVICE_TABLE(of, of_flctl_match);
1094
1095 static struct sh_flctl_platform_data *flctl_parse_dt(struct device *dev)
1096 {
1097         const struct flctl_soc_config *config;
1098         struct sh_flctl_platform_data *pdata;
1099
1100         config = of_device_get_match_data(dev);
1101         if (!config) {
1102                 dev_err(dev, "%s: no OF configuration attached\n", __func__);
1103                 return NULL;
1104         }
1105
1106         pdata = devm_kzalloc(dev, sizeof(struct sh_flctl_platform_data),
1107                                                                 GFP_KERNEL);
1108         if (!pdata)
1109                 return NULL;
1110
1111         /* set SoC specific options */
1112         pdata->flcmncr_val = config->flcmncr_val;
1113         pdata->has_hwecc = config->has_hwecc;
1114         pdata->use_holden = config->use_holden;
1115
1116         return pdata;
1117 }
1118
1119 static int flctl_probe(struct platform_device *pdev)
1120 {
1121         struct resource *res;
1122         struct sh_flctl *flctl;
1123         struct mtd_info *flctl_mtd;
1124         struct nand_chip *nand;
1125         struct sh_flctl_platform_data *pdata;
1126         int ret;
1127         int irq;
1128
1129         flctl = devm_kzalloc(&pdev->dev, sizeof(struct sh_flctl), GFP_KERNEL);
1130         if (!flctl)
1131                 return -ENOMEM;
1132
1133         res = platform_get_resource(pdev, IORESOURCE_MEM, 0);
1134         flctl->reg = devm_ioremap_resource(&pdev->dev, res);
1135         if (IS_ERR(flctl->reg))
1136                 return PTR_ERR(flctl->reg);
1137         flctl->fifo = res->start + 0x24; /* FLDTFIFO */
1138
1139         irq = platform_get_irq(pdev, 0);
1140         if (irq < 0) {
1141                 dev_err(&pdev->dev, "failed to get flste irq data: %d\n", irq);
1142                 return irq;
1143         }
1144
1145         ret = devm_request_irq(&pdev->dev, irq, flctl_handle_flste, IRQF_SHARED,
1146                                "flste", flctl);
1147         if (ret) {
1148                 dev_err(&pdev->dev, "request interrupt failed.\n");
1149                 return ret;
1150         }
1151
1152         if (pdev->dev.of_node)
1153                 pdata = flctl_parse_dt(&pdev->dev);
1154         else
1155                 pdata = dev_get_platdata(&pdev->dev);
1156
1157         if (!pdata) {
1158                 dev_err(&pdev->dev, "no setup data defined\n");
1159                 return -EINVAL;
1160         }
1161
1162         platform_set_drvdata(pdev, flctl);
1163         nand = &flctl->chip;
1164         flctl_mtd = nand_to_mtd(nand);
1165         nand_set_flash_node(nand, pdev->dev.of_node);
1166         flctl_mtd->dev.parent = &pdev->dev;
1167         flctl->pdev = pdev;
1168         flctl->hwecc = pdata->has_hwecc;
1169         flctl->holden = pdata->use_holden;
1170         flctl->flcmncr_base = pdata->flcmncr_val;
1171         flctl->flintdmacr_base = flctl->hwecc ? (STERINTE | ECERB) : STERINTE;
1172
1173         /* Set address of hardware control function */
1174         /* 20 us command delay time */
1175         nand->chip_delay = 20;
1176
1177         nand->read_byte = flctl_read_byte;
1178         nand->read_word = flctl_read_word;
1179         nand->write_buf = flctl_write_buf;
1180         nand->read_buf = flctl_read_buf;
1181         nand->select_chip = flctl_select_chip;
1182         nand->cmdfunc = flctl_cmdfunc;
1183         nand->onfi_set_features = nand_onfi_get_set_features_notsupp;
1184         nand->onfi_get_features = nand_onfi_get_set_features_notsupp;
1185
1186         if (pdata->flcmncr_val & SEL_16BIT)
1187                 nand->options |= NAND_BUSWIDTH_16;
1188
1189         pm_runtime_enable(&pdev->dev);
1190         pm_runtime_resume(&pdev->dev);
1191
1192         flctl_setup_dma(flctl);
1193
1194         ret = nand_scan_ident(flctl_mtd, 1, NULL);
1195         if (ret)
1196                 goto err_chip;
1197
1198         if (nand->options & NAND_BUSWIDTH_16) {
1199                 /*
1200                  * NAND_BUSWIDTH_16 may have been set by nand_scan_ident().
1201                  * Add the SEL_16BIT flag in pdata->flcmncr_val and re-assign
1202                  * flctl->flcmncr_base to pdata->flcmncr_val.
1203                  */
1204                 pdata->flcmncr_val |= SEL_16BIT;
1205                 flctl->flcmncr_base = pdata->flcmncr_val;
1206         }
1207
1208         ret = flctl_chip_init_tail(flctl_mtd);
1209         if (ret)
1210                 goto err_chip;
1211
1212         ret = nand_scan_tail(flctl_mtd);
1213         if (ret)
1214                 goto err_chip;
1215
1216         ret = mtd_device_register(flctl_mtd, pdata->parts, pdata->nr_parts);
1217
1218         return 0;
1219
1220 err_chip:
1221         flctl_release_dma(flctl);
1222         pm_runtime_disable(&pdev->dev);
1223         return ret;
1224 }
1225
1226 static int flctl_remove(struct platform_device *pdev)
1227 {
1228         struct sh_flctl *flctl = platform_get_drvdata(pdev);
1229
1230         flctl_release_dma(flctl);
1231         nand_release(nand_to_mtd(&flctl->chip));
1232         pm_runtime_disable(&pdev->dev);
1233
1234         return 0;
1235 }
1236
1237 static struct platform_driver flctl_driver = {
1238         .remove         = flctl_remove,
1239         .driver = {
1240                 .name   = "sh_flctl",
1241                 .of_match_table = of_match_ptr(of_flctl_match),
1242         },
1243 };
1244
1245 module_platform_driver_probe(flctl_driver, flctl_probe);
1246
1247 MODULE_LICENSE("GPL");
1248 MODULE_AUTHOR("Yoshihiro Shimoda");
1249 MODULE_DESCRIPTION("SuperH FLCTL driver");
1250 MODULE_ALIAS("platform:sh_flctl");