xref: /kernel/linux/linux-5.10/drivers/mtd/nand/raw/r852.c (revision 8c2ecf20)
1// SPDX-License-Identifier: GPL-2.0-only
2/*
3 * Copyright © 2009 - Maxim Levitsky
4 * driver for Ricoh xD readers
5 */
6
7#define DRV_NAME "r852"
8#define pr_fmt(fmt)  DRV_NAME ": " fmt
9
10#include <linux/kernel.h>
11#include <linux/module.h>
12#include <linux/jiffies.h>
13#include <linux/workqueue.h>
14#include <linux/interrupt.h>
15#include <linux/pci.h>
16#include <linux/pci_ids.h>
17#include <linux/delay.h>
18#include <linux/slab.h>
19#include <asm/byteorder.h>
20#include <linux/sched.h>
21#include "sm_common.h"
22#include "r852.h"
23
24
25static bool r852_enable_dma = 1;
26module_param(r852_enable_dma, bool, S_IRUGO);
27MODULE_PARM_DESC(r852_enable_dma, "Enable usage of the DMA (default)");
28
29static int debug;
30module_param(debug, int, S_IRUGO | S_IWUSR);
31MODULE_PARM_DESC(debug, "Debug level (0-2)");
32
33/* read register */
34static inline uint8_t r852_read_reg(struct r852_device *dev, int address)
35{
36	uint8_t reg = readb(dev->mmio + address);
37	return reg;
38}
39
40/* write register */
41static inline void r852_write_reg(struct r852_device *dev,
42						int address, uint8_t value)
43{
44	writeb(value, dev->mmio + address);
45}
46
47
48/* read dword sized register */
49static inline uint32_t r852_read_reg_dword(struct r852_device *dev, int address)
50{
51	uint32_t reg = le32_to_cpu(readl(dev->mmio + address));
52	return reg;
53}
54
55/* write dword sized register */
56static inline void r852_write_reg_dword(struct r852_device *dev,
57							int address, uint32_t value)
58{
59	writel(cpu_to_le32(value), dev->mmio + address);
60}
61
62/* returns pointer to our private structure */
63static inline struct r852_device *r852_get_dev(struct mtd_info *mtd)
64{
65	struct nand_chip *chip = mtd_to_nand(mtd);
66	return nand_get_controller_data(chip);
67}
68
69
70/* check if controller supports dma */
71static void r852_dma_test(struct r852_device *dev)
72{
73	dev->dma_usable = (r852_read_reg(dev, R852_DMA_CAP) &
74		(R852_DMA1 | R852_DMA2)) == (R852_DMA1 | R852_DMA2);
75
76	if (!dev->dma_usable)
77		message("Non dma capable device detected, dma disabled");
78
79	if (!r852_enable_dma) {
80		message("disabling dma on user request");
81		dev->dma_usable = 0;
82	}
83}
84
85/*
86 * Enable dma. Enables ether first or second stage of the DMA,
87 * Expects dev->dma_dir and dev->dma_state be set
88 */
89static void r852_dma_enable(struct r852_device *dev)
90{
91	uint8_t dma_reg, dma_irq_reg;
92
93	/* Set up dma settings */
94	dma_reg = r852_read_reg_dword(dev, R852_DMA_SETTINGS);
95	dma_reg &= ~(R852_DMA_READ | R852_DMA_INTERNAL | R852_DMA_MEMORY);
96
97	if (dev->dma_dir)
98		dma_reg |= R852_DMA_READ;
99
100	if (dev->dma_state == DMA_INTERNAL) {
101		dma_reg |= R852_DMA_INTERNAL;
102		/* Precaution to make sure HW doesn't write */
103			/* to random kernel memory */
104		r852_write_reg_dword(dev, R852_DMA_ADDR,
105			cpu_to_le32(dev->phys_bounce_buffer));
106	} else {
107		dma_reg |= R852_DMA_MEMORY;
108		r852_write_reg_dword(dev, R852_DMA_ADDR,
109			cpu_to_le32(dev->phys_dma_addr));
110	}
111
112	/* Precaution: make sure write reached the device */
113	r852_read_reg_dword(dev, R852_DMA_ADDR);
114
115	r852_write_reg_dword(dev, R852_DMA_SETTINGS, dma_reg);
116
117	/* Set dma irq */
118	dma_irq_reg = r852_read_reg_dword(dev, R852_DMA_IRQ_ENABLE);
119	r852_write_reg_dword(dev, R852_DMA_IRQ_ENABLE,
120		dma_irq_reg |
121		R852_DMA_IRQ_INTERNAL |
122		R852_DMA_IRQ_ERROR |
123		R852_DMA_IRQ_MEMORY);
124}
125
126/*
127 * Disable dma, called from the interrupt handler, which specifies
128 * success of the operation via 'error' argument
129 */
130static void r852_dma_done(struct r852_device *dev, int error)
131{
132	WARN_ON(dev->dma_stage == 0);
133
134	r852_write_reg_dword(dev, R852_DMA_IRQ_STA,
135			r852_read_reg_dword(dev, R852_DMA_IRQ_STA));
136
137	r852_write_reg_dword(dev, R852_DMA_SETTINGS, 0);
138	r852_write_reg_dword(dev, R852_DMA_IRQ_ENABLE, 0);
139
140	/* Precaution to make sure HW doesn't write to random kernel memory */
141	r852_write_reg_dword(dev, R852_DMA_ADDR,
142		cpu_to_le32(dev->phys_bounce_buffer));
143	r852_read_reg_dword(dev, R852_DMA_ADDR);
144
145	dev->dma_error = error;
146	dev->dma_stage = 0;
147
148	if (dev->phys_dma_addr && dev->phys_dma_addr != dev->phys_bounce_buffer)
149		dma_unmap_single(&dev->pci_dev->dev, dev->phys_dma_addr,
150			R852_DMA_LEN,
151			dev->dma_dir ? DMA_FROM_DEVICE : DMA_TO_DEVICE);
152}
153
154/*
155 * Wait, till dma is done, which includes both phases of it
156 */
157static int r852_dma_wait(struct r852_device *dev)
158{
159	long timeout = wait_for_completion_timeout(&dev->dma_done,
160				msecs_to_jiffies(1000));
161	if (!timeout) {
162		dbg("timeout waiting for DMA interrupt");
163		return -ETIMEDOUT;
164	}
165
166	return 0;
167}
168
169/*
170 * Read/Write one page using dma. Only pages can be read (512 bytes)
171*/
172static void r852_do_dma(struct r852_device *dev, uint8_t *buf, int do_read)
173{
174	int bounce = 0;
175	unsigned long flags;
176	int error;
177
178	dev->dma_error = 0;
179
180	/* Set dma direction */
181	dev->dma_dir = do_read;
182	dev->dma_stage = 1;
183	reinit_completion(&dev->dma_done);
184
185	dbg_verbose("doing dma %s ", do_read ? "read" : "write");
186
187	/* Set initial dma state: for reading first fill on board buffer,
188	  from device, for writes first fill the buffer  from memory*/
189	dev->dma_state = do_read ? DMA_INTERNAL : DMA_MEMORY;
190
191	/* if incoming buffer is not page aligned, we should do bounce */
192	if ((unsigned long)buf & (R852_DMA_LEN-1))
193		bounce = 1;
194
195	if (!bounce) {
196		dev->phys_dma_addr = dma_map_single(&dev->pci_dev->dev, buf,
197			R852_DMA_LEN,
198			do_read ? DMA_FROM_DEVICE : DMA_TO_DEVICE);
199		if (dma_mapping_error(&dev->pci_dev->dev, dev->phys_dma_addr))
200			bounce = 1;
201	}
202
203	if (bounce) {
204		dbg_verbose("dma: using bounce buffer");
205		dev->phys_dma_addr = dev->phys_bounce_buffer;
206		if (!do_read)
207			memcpy(dev->bounce_buffer, buf, R852_DMA_LEN);
208	}
209
210	/* Enable DMA */
211	spin_lock_irqsave(&dev->irqlock, flags);
212	r852_dma_enable(dev);
213	spin_unlock_irqrestore(&dev->irqlock, flags);
214
215	/* Wait till complete */
216	error = r852_dma_wait(dev);
217
218	if (error) {
219		r852_dma_done(dev, error);
220		return;
221	}
222
223	if (do_read && bounce)
224		memcpy((void *)buf, dev->bounce_buffer, R852_DMA_LEN);
225}
226
227/*
228 * Program data lines of the nand chip to send data to it
229 */
230static void r852_write_buf(struct nand_chip *chip, const uint8_t *buf, int len)
231{
232	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
233	uint32_t reg;
234
235	/* Don't allow any access to hardware if we suspect card removal */
236	if (dev->card_unstable)
237		return;
238
239	/* Special case for whole sector read */
240	if (len == R852_DMA_LEN && dev->dma_usable) {
241		r852_do_dma(dev, (uint8_t *)buf, 0);
242		return;
243	}
244
245	/* write DWORD chinks - faster */
246	while (len >= 4) {
247		reg = buf[0] | buf[1] << 8 | buf[2] << 16 | buf[3] << 24;
248		r852_write_reg_dword(dev, R852_DATALINE, reg);
249		buf += 4;
250		len -= 4;
251
252	}
253
254	/* write rest */
255	while (len > 0) {
256		r852_write_reg(dev, R852_DATALINE, *buf++);
257		len--;
258	}
259}
260
261/*
262 * Read data lines of the nand chip to retrieve data
263 */
264static void r852_read_buf(struct nand_chip *chip, uint8_t *buf, int len)
265{
266	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
267	uint32_t reg;
268
269	if (dev->card_unstable) {
270		/* since we can't signal error here, at least, return
271			predictable buffer */
272		memset(buf, 0, len);
273		return;
274	}
275
276	/* special case for whole sector read */
277	if (len == R852_DMA_LEN && dev->dma_usable) {
278		r852_do_dma(dev, buf, 1);
279		return;
280	}
281
282	/* read in dword sized chunks */
283	while (len >= 4) {
284
285		reg = r852_read_reg_dword(dev, R852_DATALINE);
286		*buf++ = reg & 0xFF;
287		*buf++ = (reg >> 8) & 0xFF;
288		*buf++ = (reg >> 16) & 0xFF;
289		*buf++ = (reg >> 24) & 0xFF;
290		len -= 4;
291	}
292
293	/* read the reset by bytes */
294	while (len--)
295		*buf++ = r852_read_reg(dev, R852_DATALINE);
296}
297
298/*
299 * Read one byte from nand chip
300 */
301static uint8_t r852_read_byte(struct nand_chip *chip)
302{
303	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
304
305	/* Same problem as in r852_read_buf.... */
306	if (dev->card_unstable)
307		return 0;
308
309	return r852_read_reg(dev, R852_DATALINE);
310}
311
312/*
313 * Control several chip lines & send commands
314 */
315static void r852_cmdctl(struct nand_chip *chip, int dat, unsigned int ctrl)
316{
317	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
318
319	if (dev->card_unstable)
320		return;
321
322	if (ctrl & NAND_CTRL_CHANGE) {
323
324		dev->ctlreg &= ~(R852_CTL_DATA | R852_CTL_COMMAND |
325				 R852_CTL_ON | R852_CTL_CARDENABLE);
326
327		if (ctrl & NAND_ALE)
328			dev->ctlreg |= R852_CTL_DATA;
329
330		if (ctrl & NAND_CLE)
331			dev->ctlreg |= R852_CTL_COMMAND;
332
333		if (ctrl & NAND_NCE)
334			dev->ctlreg |= (R852_CTL_CARDENABLE | R852_CTL_ON);
335		else
336			dev->ctlreg &= ~R852_CTL_WRITE;
337
338		/* when write is stareted, enable write access */
339		if (dat == NAND_CMD_ERASE1)
340			dev->ctlreg |= R852_CTL_WRITE;
341
342		r852_write_reg(dev, R852_CTL, dev->ctlreg);
343	}
344
345	 /* HACK: NAND_CMD_SEQIN is called without NAND_CTRL_CHANGE, but we need
346		to set write mode */
347	if (dat == NAND_CMD_SEQIN && (dev->ctlreg & R852_CTL_COMMAND)) {
348		dev->ctlreg |= R852_CTL_WRITE;
349		r852_write_reg(dev, R852_CTL, dev->ctlreg);
350	}
351
352	if (dat != NAND_CMD_NONE)
353		r852_write_reg(dev, R852_DATALINE, dat);
354}
355
356/*
357 * Wait till card is ready.
358 * based on nand_wait, but returns errors on DMA error
359 */
360static int r852_wait(struct nand_chip *chip)
361{
362	struct r852_device *dev = nand_get_controller_data(chip);
363
364	unsigned long timeout;
365	u8 status;
366
367	timeout = jiffies + msecs_to_jiffies(400);
368
369	while (time_before(jiffies, timeout))
370		if (chip->legacy.dev_ready(chip))
371			break;
372
373	nand_status_op(chip, &status);
374
375	/* Unfortunelly, no way to send detailed error status... */
376	if (dev->dma_error) {
377		status |= NAND_STATUS_FAIL;
378		dev->dma_error = 0;
379	}
380	return status;
381}
382
383/*
384 * Check if card is ready
385 */
386
387static int r852_ready(struct nand_chip *chip)
388{
389	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
390	return !(r852_read_reg(dev, R852_CARD_STA) & R852_CARD_STA_BUSY);
391}
392
393
394/*
395 * Set ECC engine mode
396*/
397
398static void r852_ecc_hwctl(struct nand_chip *chip, int mode)
399{
400	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
401
402	if (dev->card_unstable)
403		return;
404
405	switch (mode) {
406	case NAND_ECC_READ:
407	case NAND_ECC_WRITE:
408		/* enable ecc generation/check*/
409		dev->ctlreg |= R852_CTL_ECC_ENABLE;
410
411		/* flush ecc buffer */
412		r852_write_reg(dev, R852_CTL,
413			dev->ctlreg | R852_CTL_ECC_ACCESS);
414
415		r852_read_reg_dword(dev, R852_DATALINE);
416		r852_write_reg(dev, R852_CTL, dev->ctlreg);
417		return;
418
419	case NAND_ECC_READSYN:
420		/* disable ecc generation */
421		dev->ctlreg &= ~R852_CTL_ECC_ENABLE;
422		r852_write_reg(dev, R852_CTL, dev->ctlreg);
423	}
424}
425
426/*
427 * Calculate ECC, only used for writes
428 */
429
430static int r852_ecc_calculate(struct nand_chip *chip, const uint8_t *dat,
431			      uint8_t *ecc_code)
432{
433	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
434	struct sm_oob *oob = (struct sm_oob *)ecc_code;
435	uint32_t ecc1, ecc2;
436
437	if (dev->card_unstable)
438		return 0;
439
440	dev->ctlreg &= ~R852_CTL_ECC_ENABLE;
441	r852_write_reg(dev, R852_CTL, dev->ctlreg | R852_CTL_ECC_ACCESS);
442
443	ecc1 = r852_read_reg_dword(dev, R852_DATALINE);
444	ecc2 = r852_read_reg_dword(dev, R852_DATALINE);
445
446	oob->ecc1[0] = (ecc1) & 0xFF;
447	oob->ecc1[1] = (ecc1 >> 8) & 0xFF;
448	oob->ecc1[2] = (ecc1 >> 16) & 0xFF;
449
450	oob->ecc2[0] = (ecc2) & 0xFF;
451	oob->ecc2[1] = (ecc2 >> 8) & 0xFF;
452	oob->ecc2[2] = (ecc2 >> 16) & 0xFF;
453
454	r852_write_reg(dev, R852_CTL, dev->ctlreg);
455	return 0;
456}
457
458/*
459 * Correct the data using ECC, hw did almost everything for us
460 */
461
462static int r852_ecc_correct(struct nand_chip *chip, uint8_t *dat,
463			    uint8_t *read_ecc, uint8_t *calc_ecc)
464{
465	uint32_t ecc_reg;
466	uint8_t ecc_status, err_byte;
467	int i, error = 0;
468
469	struct r852_device *dev = r852_get_dev(nand_to_mtd(chip));
470
471	if (dev->card_unstable)
472		return 0;
473
474	if (dev->dma_error) {
475		dev->dma_error = 0;
476		return -EIO;
477	}
478
479	r852_write_reg(dev, R852_CTL, dev->ctlreg | R852_CTL_ECC_ACCESS);
480	ecc_reg = r852_read_reg_dword(dev, R852_DATALINE);
481	r852_write_reg(dev, R852_CTL, dev->ctlreg);
482
483	for (i = 0 ; i <= 1 ; i++) {
484
485		ecc_status = (ecc_reg >> 8) & 0xFF;
486
487		/* ecc uncorrectable error */
488		if (ecc_status & R852_ECC_FAIL) {
489			dbg("ecc: unrecoverable error, in half %d", i);
490			error = -EBADMSG;
491			goto exit;
492		}
493
494		/* correctable error */
495		if (ecc_status & R852_ECC_CORRECTABLE) {
496
497			err_byte = ecc_reg & 0xFF;
498			dbg("ecc: recoverable error, "
499				"in half %d, byte %d, bit %d", i,
500				err_byte, ecc_status & R852_ECC_ERR_BIT_MSK);
501
502			dat[err_byte] ^=
503				1 << (ecc_status & R852_ECC_ERR_BIT_MSK);
504			error++;
505		}
506
507		dat += 256;
508		ecc_reg >>= 16;
509	}
510exit:
511	return error;
512}
513
514/*
515 * This is copy of nand_read_oob_std
516 * nand_read_oob_syndrome assumes we can send column address - we can't
517 */
518static int r852_read_oob(struct nand_chip *chip, int page)
519{
520	struct mtd_info *mtd = nand_to_mtd(chip);
521
522	return nand_read_oob_op(chip, page, 0, chip->oob_poi, mtd->oobsize);
523}
524
525/*
526 * Start the nand engine
527 */
528
529static void r852_engine_enable(struct r852_device *dev)
530{
531	if (r852_read_reg_dword(dev, R852_HW) & R852_HW_UNKNOWN) {
532		r852_write_reg(dev, R852_CTL, R852_CTL_RESET | R852_CTL_ON);
533		r852_write_reg_dword(dev, R852_HW, R852_HW_ENABLED);
534	} else {
535		r852_write_reg_dword(dev, R852_HW, R852_HW_ENABLED);
536		r852_write_reg(dev, R852_CTL, R852_CTL_RESET | R852_CTL_ON);
537	}
538	msleep(300);
539	r852_write_reg(dev, R852_CTL, 0);
540}
541
542
543/*
544 * Stop the nand engine
545 */
546
547static void r852_engine_disable(struct r852_device *dev)
548{
549	r852_write_reg_dword(dev, R852_HW, 0);
550	r852_write_reg(dev, R852_CTL, R852_CTL_RESET);
551}
552
553/*
554 * Test if card is present
555 */
556
557static void r852_card_update_present(struct r852_device *dev)
558{
559	unsigned long flags;
560	uint8_t reg;
561
562	spin_lock_irqsave(&dev->irqlock, flags);
563	reg = r852_read_reg(dev, R852_CARD_STA);
564	dev->card_detected = !!(reg & R852_CARD_STA_PRESENT);
565	spin_unlock_irqrestore(&dev->irqlock, flags);
566}
567
568/*
569 * Update card detection IRQ state according to current card state
570 * which is read in r852_card_update_present
571 */
572static void r852_update_card_detect(struct r852_device *dev)
573{
574	int card_detect_reg = r852_read_reg(dev, R852_CARD_IRQ_ENABLE);
575	dev->card_unstable = 0;
576
577	card_detect_reg &= ~(R852_CARD_IRQ_REMOVE | R852_CARD_IRQ_INSERT);
578	card_detect_reg |= R852_CARD_IRQ_GENABLE;
579
580	card_detect_reg |= dev->card_detected ?
581		R852_CARD_IRQ_REMOVE : R852_CARD_IRQ_INSERT;
582
583	r852_write_reg(dev, R852_CARD_IRQ_ENABLE, card_detect_reg);
584}
585
586static ssize_t r852_media_type_show(struct device *sys_dev,
587			struct device_attribute *attr, char *buf)
588{
589	struct mtd_info *mtd = container_of(sys_dev, struct mtd_info, dev);
590	struct r852_device *dev = r852_get_dev(mtd);
591	char *data = dev->sm ? "smartmedia" : "xd";
592
593	strcpy(buf, data);
594	return strlen(data);
595}
596
597static DEVICE_ATTR(media_type, S_IRUGO, r852_media_type_show, NULL);
598
599
600/* Detect properties of card in slot */
601static void r852_update_media_status(struct r852_device *dev)
602{
603	uint8_t reg;
604	unsigned long flags;
605	int readonly;
606
607	spin_lock_irqsave(&dev->irqlock, flags);
608	if (!dev->card_detected) {
609		message("card removed");
610		spin_unlock_irqrestore(&dev->irqlock, flags);
611		return ;
612	}
613
614	readonly  = r852_read_reg(dev, R852_CARD_STA) & R852_CARD_STA_RO;
615	reg = r852_read_reg(dev, R852_DMA_CAP);
616	dev->sm = (reg & (R852_DMA1 | R852_DMA2)) && (reg & R852_SMBIT);
617
618	message("detected %s %s card in slot",
619		dev->sm ? "SmartMedia" : "xD",
620		readonly ? "readonly" : "writeable");
621
622	dev->readonly = readonly;
623	spin_unlock_irqrestore(&dev->irqlock, flags);
624}
625
626/*
627 * Register the nand device
628 * Called when the card is detected
629 */
630static int r852_register_nand_device(struct r852_device *dev)
631{
632	struct mtd_info *mtd = nand_to_mtd(dev->chip);
633
634	WARN_ON(dev->card_registered);
635
636	mtd->dev.parent = &dev->pci_dev->dev;
637
638	if (dev->readonly)
639		dev->chip->options |= NAND_ROM;
640
641	r852_engine_enable(dev);
642
643	if (sm_register_device(mtd, dev->sm))
644		goto error1;
645
646	if (device_create_file(&mtd->dev, &dev_attr_media_type)) {
647		message("can't create media type sysfs attribute");
648		goto error3;
649	}
650
651	dev->card_registered = 1;
652	return 0;
653error3:
654	WARN_ON(mtd_device_unregister(nand_to_mtd(dev->chip)));
655	nand_cleanup(dev->chip);
656error1:
657	/* Force card redetect */
658	dev->card_detected = 0;
659	return -1;
660}
661
662/*
663 * Unregister the card
664 */
665
666static void r852_unregister_nand_device(struct r852_device *dev)
667{
668	struct mtd_info *mtd = nand_to_mtd(dev->chip);
669
670	if (!dev->card_registered)
671		return;
672
673	device_remove_file(&mtd->dev, &dev_attr_media_type);
674	WARN_ON(mtd_device_unregister(mtd));
675	nand_cleanup(dev->chip);
676	r852_engine_disable(dev);
677	dev->card_registered = 0;
678}
679
680/* Card state updater */
681static void r852_card_detect_work(struct work_struct *work)
682{
683	struct r852_device *dev =
684		container_of(work, struct r852_device, card_detect_work.work);
685
686	r852_card_update_present(dev);
687	r852_update_card_detect(dev);
688	dev->card_unstable = 0;
689
690	/* False alarm */
691	if (dev->card_detected == dev->card_registered)
692		goto exit;
693
694	/* Read media properties */
695	r852_update_media_status(dev);
696
697	/* Register the card */
698	if (dev->card_detected)
699		r852_register_nand_device(dev);
700	else
701		r852_unregister_nand_device(dev);
702exit:
703	r852_update_card_detect(dev);
704}
705
706/* Ack + disable IRQ generation */
707static void r852_disable_irqs(struct r852_device *dev)
708{
709	uint8_t reg;
710	reg = r852_read_reg(dev, R852_CARD_IRQ_ENABLE);
711	r852_write_reg(dev, R852_CARD_IRQ_ENABLE, reg & ~R852_CARD_IRQ_MASK);
712
713	reg = r852_read_reg_dword(dev, R852_DMA_IRQ_ENABLE);
714	r852_write_reg_dword(dev, R852_DMA_IRQ_ENABLE,
715					reg & ~R852_DMA_IRQ_MASK);
716
717	r852_write_reg(dev, R852_CARD_IRQ_STA, R852_CARD_IRQ_MASK);
718	r852_write_reg_dword(dev, R852_DMA_IRQ_STA, R852_DMA_IRQ_MASK);
719}
720
721/* Interrupt handler */
722static irqreturn_t r852_irq(int irq, void *data)
723{
724	struct r852_device *dev = (struct r852_device *)data;
725
726	uint8_t card_status, dma_status;
727	unsigned long flags;
728	irqreturn_t ret = IRQ_NONE;
729
730	spin_lock_irqsave(&dev->irqlock, flags);
731
732	/* handle card detection interrupts first */
733	card_status = r852_read_reg(dev, R852_CARD_IRQ_STA);
734	r852_write_reg(dev, R852_CARD_IRQ_STA, card_status);
735
736	if (card_status & (R852_CARD_IRQ_INSERT|R852_CARD_IRQ_REMOVE)) {
737
738		ret = IRQ_HANDLED;
739		dev->card_detected = !!(card_status & R852_CARD_IRQ_INSERT);
740
741		/* we shouldn't receive any interrupts if we wait for card
742			to settle */
743		WARN_ON(dev->card_unstable);
744
745		/* disable irqs while card is unstable */
746		/* this will timeout DMA if active, but better that garbage */
747		r852_disable_irqs(dev);
748
749		if (dev->card_unstable)
750			goto out;
751
752		/* let, card state to settle a bit, and then do the work */
753		dev->card_unstable = 1;
754		queue_delayed_work(dev->card_workqueue,
755			&dev->card_detect_work, msecs_to_jiffies(100));
756		goto out;
757	}
758
759
760	/* Handle dma interrupts */
761	dma_status = r852_read_reg_dword(dev, R852_DMA_IRQ_STA);
762	r852_write_reg_dword(dev, R852_DMA_IRQ_STA, dma_status);
763
764	if (dma_status & R852_DMA_IRQ_MASK) {
765
766		ret = IRQ_HANDLED;
767
768		if (dma_status & R852_DMA_IRQ_ERROR) {
769			dbg("received dma error IRQ");
770			r852_dma_done(dev, -EIO);
771			complete(&dev->dma_done);
772			goto out;
773		}
774
775		/* received DMA interrupt out of nowhere? */
776		WARN_ON_ONCE(dev->dma_stage == 0);
777
778		if (dev->dma_stage == 0)
779			goto out;
780
781		/* done device access */
782		if (dev->dma_state == DMA_INTERNAL &&
783				(dma_status & R852_DMA_IRQ_INTERNAL)) {
784
785			dev->dma_state = DMA_MEMORY;
786			dev->dma_stage++;
787		}
788
789		/* done memory DMA */
790		if (dev->dma_state == DMA_MEMORY &&
791				(dma_status & R852_DMA_IRQ_MEMORY)) {
792			dev->dma_state = DMA_INTERNAL;
793			dev->dma_stage++;
794		}
795
796		/* Enable 2nd half of dma dance */
797		if (dev->dma_stage == 2)
798			r852_dma_enable(dev);
799
800		/* Operation done */
801		if (dev->dma_stage == 3) {
802			r852_dma_done(dev, 0);
803			complete(&dev->dma_done);
804		}
805		goto out;
806	}
807
808	/* Handle unknown interrupts */
809	if (dma_status)
810		dbg("bad dma IRQ status = %x", dma_status);
811
812	if (card_status & ~R852_CARD_STA_CD)
813		dbg("strange card status = %x", card_status);
814
815out:
816	spin_unlock_irqrestore(&dev->irqlock, flags);
817	return ret;
818}
819
820static int r852_attach_chip(struct nand_chip *chip)
821{
822	if (chip->ecc.engine_type != NAND_ECC_ENGINE_TYPE_ON_HOST)
823		return 0;
824
825	chip->ecc.placement = NAND_ECC_PLACEMENT_INTERLEAVED;
826	chip->ecc.size = R852_DMA_LEN;
827	chip->ecc.bytes = SM_OOB_SIZE;
828	chip->ecc.strength = 2;
829	chip->ecc.hwctl = r852_ecc_hwctl;
830	chip->ecc.calculate = r852_ecc_calculate;
831	chip->ecc.correct = r852_ecc_correct;
832
833	/* TODO: hack */
834	chip->ecc.read_oob = r852_read_oob;
835
836	return 0;
837}
838
839static const struct nand_controller_ops r852_ops = {
840	.attach_chip = r852_attach_chip,
841};
842
843static int  r852_probe(struct pci_dev *pci_dev, const struct pci_device_id *id)
844{
845	int error;
846	struct nand_chip *chip;
847	struct r852_device *dev;
848
849	/* pci initialization */
850	error = pci_enable_device(pci_dev);
851
852	if (error)
853		goto error1;
854
855	pci_set_master(pci_dev);
856
857	error = dma_set_mask(&pci_dev->dev, DMA_BIT_MASK(32));
858	if (error)
859		goto error2;
860
861	error = pci_request_regions(pci_dev, DRV_NAME);
862
863	if (error)
864		goto error3;
865
866	error = -ENOMEM;
867
868	/* init nand chip, but register it only on card insert */
869	chip = kzalloc(sizeof(struct nand_chip), GFP_KERNEL);
870
871	if (!chip)
872		goto error4;
873
874	/* commands */
875	chip->legacy.cmd_ctrl = r852_cmdctl;
876	chip->legacy.waitfunc = r852_wait;
877	chip->legacy.dev_ready = r852_ready;
878
879	/* I/O */
880	chip->legacy.read_byte = r852_read_byte;
881	chip->legacy.read_buf = r852_read_buf;
882	chip->legacy.write_buf = r852_write_buf;
883
884	/* init our device structure */
885	dev = kzalloc(sizeof(struct r852_device), GFP_KERNEL);
886
887	if (!dev)
888		goto error5;
889
890	nand_set_controller_data(chip, dev);
891	dev->chip = chip;
892	dev->pci_dev = pci_dev;
893	pci_set_drvdata(pci_dev, dev);
894
895	nand_controller_init(&dev->controller);
896	dev->controller.ops = &r852_ops;
897	chip->controller = &dev->controller;
898
899	dev->bounce_buffer = dma_alloc_coherent(&pci_dev->dev, R852_DMA_LEN,
900		&dev->phys_bounce_buffer, GFP_KERNEL);
901
902	if (!dev->bounce_buffer)
903		goto error6;
904
905
906	error = -ENODEV;
907	dev->mmio = pci_ioremap_bar(pci_dev, 0);
908
909	if (!dev->mmio)
910		goto error7;
911
912	error = -ENOMEM;
913	dev->tmp_buffer = kzalloc(SM_SECTOR_SIZE, GFP_KERNEL);
914
915	if (!dev->tmp_buffer)
916		goto error8;
917
918	init_completion(&dev->dma_done);
919
920	dev->card_workqueue = create_freezable_workqueue(DRV_NAME);
921
922	if (!dev->card_workqueue)
923		goto error9;
924
925	INIT_DELAYED_WORK(&dev->card_detect_work, r852_card_detect_work);
926
927	/* shutdown everything - precation */
928	r852_engine_disable(dev);
929	r852_disable_irqs(dev);
930
931	r852_dma_test(dev);
932
933	dev->irq = pci_dev->irq;
934	spin_lock_init(&dev->irqlock);
935
936	dev->card_detected = 0;
937	r852_card_update_present(dev);
938
939	/*register irq handler*/
940	error = -ENODEV;
941	if (request_irq(pci_dev->irq, &r852_irq, IRQF_SHARED,
942			  DRV_NAME, dev))
943		goto error10;
944
945	/* kick initial present test */
946	queue_delayed_work(dev->card_workqueue,
947		&dev->card_detect_work, 0);
948
949
950	pr_notice("driver loaded successfully\n");
951	return 0;
952
953error10:
954	destroy_workqueue(dev->card_workqueue);
955error9:
956	kfree(dev->tmp_buffer);
957error8:
958	pci_iounmap(pci_dev, dev->mmio);
959error7:
960	dma_free_coherent(&pci_dev->dev, R852_DMA_LEN, dev->bounce_buffer,
961			  dev->phys_bounce_buffer);
962error6:
963	kfree(dev);
964error5:
965	kfree(chip);
966error4:
967	pci_release_regions(pci_dev);
968error3:
969error2:
970	pci_disable_device(pci_dev);
971error1:
972	return error;
973}
974
975static void r852_remove(struct pci_dev *pci_dev)
976{
977	struct r852_device *dev = pci_get_drvdata(pci_dev);
978
979	/* Stop detect workqueue -
980		we are going to unregister the device anyway*/
981	cancel_delayed_work_sync(&dev->card_detect_work);
982	destroy_workqueue(dev->card_workqueue);
983
984	/* Unregister the device, this might make more IO */
985	r852_unregister_nand_device(dev);
986
987	/* Stop interrupts */
988	r852_disable_irqs(dev);
989	free_irq(dev->irq, dev);
990
991	/* Cleanup */
992	kfree(dev->tmp_buffer);
993	pci_iounmap(pci_dev, dev->mmio);
994	dma_free_coherent(&pci_dev->dev, R852_DMA_LEN, dev->bounce_buffer,
995			  dev->phys_bounce_buffer);
996
997	kfree(dev->chip);
998	kfree(dev);
999
1000	/* Shutdown the PCI device */
1001	pci_release_regions(pci_dev);
1002	pci_disable_device(pci_dev);
1003}
1004
1005static void r852_shutdown(struct pci_dev *pci_dev)
1006{
1007	struct r852_device *dev = pci_get_drvdata(pci_dev);
1008
1009	cancel_delayed_work_sync(&dev->card_detect_work);
1010	r852_disable_irqs(dev);
1011	synchronize_irq(dev->irq);
1012	pci_disable_device(pci_dev);
1013}
1014
1015#ifdef CONFIG_PM_SLEEP
1016static int r852_suspend(struct device *device)
1017{
1018	struct r852_device *dev = dev_get_drvdata(device);
1019
1020	if (dev->ctlreg & R852_CTL_CARDENABLE)
1021		return -EBUSY;
1022
1023	/* First make sure the detect work is gone */
1024	cancel_delayed_work_sync(&dev->card_detect_work);
1025
1026	/* Turn off the interrupts and stop the device */
1027	r852_disable_irqs(dev);
1028	r852_engine_disable(dev);
1029
1030	/* If card was pulled off just during the suspend, which is very
1031		unlikely, we will remove it on resume, it too late now
1032		anyway... */
1033	dev->card_unstable = 0;
1034	return 0;
1035}
1036
1037static int r852_resume(struct device *device)
1038{
1039	struct r852_device *dev = dev_get_drvdata(device);
1040
1041	r852_disable_irqs(dev);
1042	r852_card_update_present(dev);
1043	r852_engine_disable(dev);
1044
1045
1046	/* If card status changed, just do the work */
1047	if (dev->card_detected != dev->card_registered) {
1048		dbg("card was %s during low power state",
1049			dev->card_detected ? "added" : "removed");
1050
1051		queue_delayed_work(dev->card_workqueue,
1052		&dev->card_detect_work, msecs_to_jiffies(1000));
1053		return 0;
1054	}
1055
1056	/* Otherwise, initialize the card */
1057	if (dev->card_registered) {
1058		r852_engine_enable(dev);
1059		nand_select_target(dev->chip, 0);
1060		nand_reset_op(dev->chip);
1061		nand_deselect_target(dev->chip);
1062	}
1063
1064	/* Program card detection IRQ */
1065	r852_update_card_detect(dev);
1066	return 0;
1067}
1068#endif
1069
1070static const struct pci_device_id r852_pci_id_tbl[] = {
1071
1072	{ PCI_VDEVICE(RICOH, 0x0852), },
1073	{ },
1074};
1075
1076MODULE_DEVICE_TABLE(pci, r852_pci_id_tbl);
1077
1078static SIMPLE_DEV_PM_OPS(r852_pm_ops, r852_suspend, r852_resume);
1079
1080static struct pci_driver r852_pci_driver = {
1081	.name		= DRV_NAME,
1082	.id_table	= r852_pci_id_tbl,
1083	.probe		= r852_probe,
1084	.remove		= r852_remove,
1085	.shutdown	= r852_shutdown,
1086	.driver.pm	= &r852_pm_ops,
1087};
1088
1089module_pci_driver(r852_pci_driver);
1090
1091MODULE_LICENSE("GPL");
1092MODULE_AUTHOR("Maxim Levitsky <maximlevitsky@gmail.com>");
1093MODULE_DESCRIPTION("Ricoh 85xx xD/smartmedia card reader driver");
1094