xref: /linux/drivers/mtd/nand/raw/r852.c (revision c79c3c34f75d72a066e292b10aa50fc758c97c89)
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 
25 static bool r852_enable_dma = 1;
26 module_param(r852_enable_dma, bool, S_IRUGO);
27 MODULE_PARM_DESC(r852_enable_dma, "Enable usage of the DMA (default)");
28 
29 static int debug;
30 module_param(debug, int, S_IRUGO | S_IWUSR);
31 MODULE_PARM_DESC(debug, "Debug level (0-2)");
32 
33 /* read register */
34 static 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 */
41 static 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 */
49 static 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 */
56 static 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 */
63 static 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 */
71 static 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  */
89 static 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  */
130 static 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  */
157 static 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 */
172 static 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  */
230 static 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  */
264 static 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  */
301 static 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  */
315 static 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  */
360 static 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 
387 static 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 
398 static 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 
430 static 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 
462 static 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 	}
510 exit:
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  */
518 static 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 
529 static 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 
547 static 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 
557 static 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  */
572 static 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 
586 static 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 
597 static DEVICE_ATTR(media_type, S_IRUGO, r852_media_type_show, NULL);
598 
599 
600 /* Detect properties of card in slot */
601 static 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  */
630 static 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;
653 error3:
654 	WARN_ON(mtd_device_unregister(nand_to_mtd(dev->chip)));
655 	nand_cleanup(dev->chip);
656 error1:
657 	/* Force card redetect */
658 	dev->card_detected = 0;
659 	return -1;
660 }
661 
662 /*
663  * Unregister the card
664  */
665 
666 static 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 */
681 static 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);
702 exit:
703 	r852_update_card_detect(dev);
704 }
705 
706 /* Ack + disable IRQ generation */
707 static 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 */
722 static 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 
815 out:
816 	spin_unlock_irqrestore(&dev->irqlock, flags);
817 	return ret;
818 }
819 
820 static 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 
839 static const struct nand_controller_ops r852_ops = {
840 	.attach_chip = r852_attach_chip,
841 };
842 
843 static 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 
953 error10:
954 	destroy_workqueue(dev->card_workqueue);
955 error9:
956 	kfree(dev->tmp_buffer);
957 error8:
958 	pci_iounmap(pci_dev, dev->mmio);
959 error7:
960 	dma_free_coherent(&pci_dev->dev, R852_DMA_LEN, dev->bounce_buffer,
961 			  dev->phys_bounce_buffer);
962 error6:
963 	kfree(dev);
964 error5:
965 	kfree(chip);
966 error4:
967 	pci_release_regions(pci_dev);
968 error3:
969 error2:
970 	pci_disable_device(pci_dev);
971 error1:
972 	return error;
973 }
974 
975 static 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 
1005 static 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
1016 static 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 
1037 static 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 
1070 static const struct pci_device_id r852_pci_id_tbl[] = {
1071 
1072 	{ PCI_VDEVICE(RICOH, 0x0852), },
1073 	{ },
1074 };
1075 
1076 MODULE_DEVICE_TABLE(pci, r852_pci_id_tbl);
1077 
1078 static SIMPLE_DEV_PM_OPS(r852_pm_ops, r852_suspend, r852_resume);
1079 
1080 static 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 
1089 module_pci_driver(r852_pci_driver);
1090 
1091 MODULE_LICENSE("GPL");
1092 MODULE_AUTHOR("Maxim Levitsky <maximlevitsky@gmail.com>");
1093 MODULE_DESCRIPTION("Ricoh 85xx xD/smartmedia card reader driver");
1094