xref: /openbmc/linux/drivers/block/swim.c (revision e7bae9bb)
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * Driver for SWIM (Sander Woz Integrated Machine) floppy controller
4  *
5  * Copyright (C) 2004,2008 Laurent Vivier <Laurent@lvivier.info>
6  *
7  * based on Alastair Bridgewater SWIM analysis, 2001
8  * based on SWIM3 driver (c) Paul Mackerras, 1996
9  * based on netBSD IWM driver (c) 1997, 1998 Hauke Fath.
10  *
11  * 2004-08-21 (lv) - Initial implementation
12  * 2008-10-30 (lv) - Port to 2.6
13  */
14 
15 #include <linux/module.h>
16 #include <linux/fd.h>
17 #include <linux/slab.h>
18 #include <linux/blk-mq.h>
19 #include <linux/mutex.h>
20 #include <linux/hdreg.h>
21 #include <linux/kernel.h>
22 #include <linux/delay.h>
23 #include <linux/platform_device.h>
24 
25 #include <asm/mac_via.h>
26 
27 #define CARDNAME "swim"
28 
29 struct sector_header {
30 	unsigned char side;
31 	unsigned char track;
32 	unsigned char sector;
33 	unsigned char size;
34 	unsigned char crc0;
35 	unsigned char crc1;
36 } __attribute__((packed));
37 
38 #define DRIVER_VERSION "Version 0.2 (2008-10-30)"
39 
40 #define REG(x)	unsigned char x, x ## _pad[0x200 - 1];
41 
42 struct swim {
43 	REG(write_data)
44 	REG(write_mark)
45 	REG(write_CRC)
46 	REG(write_parameter)
47 	REG(write_phase)
48 	REG(write_setup)
49 	REG(write_mode0)
50 	REG(write_mode1)
51 
52 	REG(read_data)
53 	REG(read_mark)
54 	REG(read_error)
55 	REG(read_parameter)
56 	REG(read_phase)
57 	REG(read_setup)
58 	REG(read_status)
59 	REG(read_handshake)
60 } __attribute__((packed));
61 
62 #define swim_write(base, reg, v) 	out_8(&(base)->write_##reg, (v))
63 #define swim_read(base, reg)		in_8(&(base)->read_##reg)
64 
65 /* IWM registers */
66 
67 struct iwm {
68 	REG(ph0L)
69 	REG(ph0H)
70 	REG(ph1L)
71 	REG(ph1H)
72 	REG(ph2L)
73 	REG(ph2H)
74 	REG(ph3L)
75 	REG(ph3H)
76 	REG(mtrOff)
77 	REG(mtrOn)
78 	REG(intDrive)
79 	REG(extDrive)
80 	REG(q6L)
81 	REG(q6H)
82 	REG(q7L)
83 	REG(q7H)
84 } __attribute__((packed));
85 
86 #define iwm_write(base, reg, v) 	out_8(&(base)->reg, (v))
87 #define iwm_read(base, reg)		in_8(&(base)->reg)
88 
89 /* bits in phase register */
90 
91 #define SEEK_POSITIVE	0x070
92 #define SEEK_NEGATIVE	0x074
93 #define STEP		0x071
94 #define MOTOR_ON	0x072
95 #define MOTOR_OFF	0x076
96 #define INDEX		0x073
97 #define EJECT		0x077
98 #define SETMFM		0x171
99 #define SETGCR		0x175
100 
101 #define RELAX		0x033
102 #define LSTRB		0x008
103 
104 #define CA_MASK		0x077
105 
106 /* Select values for swim_select and swim_readbit */
107 
108 #define READ_DATA_0	0x074
109 #define ONEMEG_DRIVE	0x075
110 #define SINGLE_SIDED	0x076
111 #define DRIVE_PRESENT	0x077
112 #define DISK_IN		0x170
113 #define WRITE_PROT	0x171
114 #define TRACK_ZERO	0x172
115 #define TACHO		0x173
116 #define READ_DATA_1	0x174
117 #define GCR_MODE	0x175
118 #define SEEK_COMPLETE	0x176
119 #define TWOMEG_MEDIA	0x177
120 
121 /* Bits in handshake register */
122 
123 #define MARK_BYTE	0x01
124 #define CRC_ZERO	0x02
125 #define RDDATA		0x04
126 #define SENSE		0x08
127 #define MOTEN		0x10
128 #define ERROR		0x20
129 #define DAT2BYTE	0x40
130 #define DAT1BYTE	0x80
131 
132 /* bits in setup register */
133 
134 #define S_INV_WDATA	0x01
135 #define S_3_5_SELECT	0x02
136 #define S_GCR		0x04
137 #define S_FCLK_DIV2	0x08
138 #define S_ERROR_CORR	0x10
139 #define S_IBM_DRIVE	0x20
140 #define S_GCR_WRITE	0x40
141 #define S_TIMEOUT	0x80
142 
143 /* bits in mode register */
144 
145 #define CLFIFO		0x01
146 #define ENBL1		0x02
147 #define ENBL2		0x04
148 #define ACTION		0x08
149 #define WRITE_MODE	0x10
150 #define HEDSEL		0x20
151 #define MOTON		0x80
152 
153 /*----------------------------------------------------------------------------*/
154 
155 enum drive_location {
156 	INTERNAL_DRIVE = 0x02,
157 	EXTERNAL_DRIVE = 0x04,
158 };
159 
160 enum media_type {
161 	DD_MEDIA,
162 	HD_MEDIA,
163 };
164 
165 struct floppy_state {
166 
167 	/* physical properties */
168 
169 	enum drive_location location;	/* internal or external drive */
170 	int		 head_number;	/* single- or double-sided drive */
171 
172 	/* media */
173 
174 	int		 disk_in;
175 	int		 ejected;
176 	enum media_type	 type;
177 	int		 write_protected;
178 
179 	int		 total_secs;
180 	int		 secpercyl;
181 	int		 secpertrack;
182 
183 	/* in-use information */
184 
185 	int		track;
186 	int		ref_count;
187 
188 	struct gendisk *disk;
189 	struct blk_mq_tag_set tag_set;
190 
191 	/* parent controller */
192 
193 	struct swim_priv *swd;
194 };
195 
196 enum motor_action {
197 	OFF,
198 	ON,
199 };
200 
201 enum head {
202 	LOWER_HEAD = 0,
203 	UPPER_HEAD = 1,
204 };
205 
206 #define FD_MAX_UNIT	2
207 
208 struct swim_priv {
209 	struct swim __iomem *base;
210 	spinlock_t lock;
211 	int floppy_count;
212 	struct floppy_state unit[FD_MAX_UNIT];
213 };
214 
215 extern int swim_read_sector_header(struct swim __iomem *base,
216 				   struct sector_header *header);
217 extern int swim_read_sector_data(struct swim __iomem *base,
218 				 unsigned char *data);
219 
220 static DEFINE_MUTEX(swim_mutex);
221 static inline void set_swim_mode(struct swim __iomem *base, int enable)
222 {
223 	struct iwm __iomem *iwm_base;
224 	unsigned long flags;
225 
226 	if (!enable) {
227 		swim_write(base, mode0, 0xf8);
228 		return;
229 	}
230 
231 	iwm_base = (struct iwm __iomem *)base;
232 	local_irq_save(flags);
233 
234 	iwm_read(iwm_base, q7L);
235 	iwm_read(iwm_base, mtrOff);
236 	iwm_read(iwm_base, q6H);
237 
238 	iwm_write(iwm_base, q7H, 0x57);
239 	iwm_write(iwm_base, q7H, 0x17);
240 	iwm_write(iwm_base, q7H, 0x57);
241 	iwm_write(iwm_base, q7H, 0x57);
242 
243 	local_irq_restore(flags);
244 }
245 
246 static inline int get_swim_mode(struct swim __iomem *base)
247 {
248 	unsigned long flags;
249 
250 	local_irq_save(flags);
251 
252 	swim_write(base, phase, 0xf5);
253 	if (swim_read(base, phase) != 0xf5)
254 		goto is_iwm;
255 	swim_write(base, phase, 0xf6);
256 	if (swim_read(base, phase) != 0xf6)
257 		goto is_iwm;
258 	swim_write(base, phase, 0xf7);
259 	if (swim_read(base, phase) != 0xf7)
260 		goto is_iwm;
261 	local_irq_restore(flags);
262 	return 1;
263 is_iwm:
264 	local_irq_restore(flags);
265 	return 0;
266 }
267 
268 static inline void swim_select(struct swim __iomem *base, int sel)
269 {
270 	swim_write(base, phase, RELAX);
271 
272 	via1_set_head(sel & 0x100);
273 
274 	swim_write(base, phase, sel & CA_MASK);
275 }
276 
277 static inline void swim_action(struct swim __iomem *base, int action)
278 {
279 	unsigned long flags;
280 
281 	local_irq_save(flags);
282 
283 	swim_select(base, action);
284 	udelay(1);
285 	swim_write(base, phase, (LSTRB<<4) | LSTRB);
286 	udelay(1);
287 	swim_write(base, phase, (LSTRB<<4) | ((~LSTRB) & 0x0F));
288 	udelay(1);
289 
290 	local_irq_restore(flags);
291 }
292 
293 static inline int swim_readbit(struct swim __iomem *base, int bit)
294 {
295 	int stat;
296 
297 	swim_select(base, bit);
298 
299 	udelay(10);
300 
301 	stat = swim_read(base, handshake);
302 
303 	return (stat & SENSE) == 0;
304 }
305 
306 static inline void swim_drive(struct swim __iomem *base,
307 			      enum drive_location location)
308 {
309 	if (location == INTERNAL_DRIVE) {
310 		swim_write(base, mode0, EXTERNAL_DRIVE); /* clear drive 1 bit */
311 		swim_write(base, mode1, INTERNAL_DRIVE); /* set drive 0 bit */
312 	} else if (location == EXTERNAL_DRIVE) {
313 		swim_write(base, mode0, INTERNAL_DRIVE); /* clear drive 0 bit */
314 		swim_write(base, mode1, EXTERNAL_DRIVE); /* set drive 1 bit */
315 	}
316 }
317 
318 static inline void swim_motor(struct swim __iomem *base,
319 			      enum motor_action action)
320 {
321 	if (action == ON) {
322 		int i;
323 
324 		swim_action(base, MOTOR_ON);
325 
326 		for (i = 0; i < 2*HZ; i++) {
327 			swim_select(base, RELAX);
328 			if (swim_readbit(base, MOTOR_ON))
329 				break;
330 			set_current_state(TASK_INTERRUPTIBLE);
331 			schedule_timeout(1);
332 		}
333 	} else if (action == OFF) {
334 		swim_action(base, MOTOR_OFF);
335 		swim_select(base, RELAX);
336 	}
337 }
338 
339 static inline void swim_eject(struct swim __iomem *base)
340 {
341 	int i;
342 
343 	swim_action(base, EJECT);
344 
345 	for (i = 0; i < 2*HZ; i++) {
346 		swim_select(base, RELAX);
347 		if (!swim_readbit(base, DISK_IN))
348 			break;
349 		set_current_state(TASK_INTERRUPTIBLE);
350 		schedule_timeout(1);
351 	}
352 	swim_select(base, RELAX);
353 }
354 
355 static inline void swim_head(struct swim __iomem *base, enum head head)
356 {
357 	/* wait drive is ready */
358 
359 	if (head == UPPER_HEAD)
360 		swim_select(base, READ_DATA_1);
361 	else if (head == LOWER_HEAD)
362 		swim_select(base, READ_DATA_0);
363 }
364 
365 static inline int swim_step(struct swim __iomem *base)
366 {
367 	int wait;
368 
369 	swim_action(base, STEP);
370 
371 	for (wait = 0; wait < HZ; wait++) {
372 
373 		set_current_state(TASK_INTERRUPTIBLE);
374 		schedule_timeout(1);
375 
376 		swim_select(base, RELAX);
377 		if (!swim_readbit(base, STEP))
378 			return 0;
379 	}
380 	return -1;
381 }
382 
383 static inline int swim_track00(struct swim __iomem *base)
384 {
385 	int try;
386 
387 	swim_action(base, SEEK_NEGATIVE);
388 
389 	for (try = 0; try < 100; try++) {
390 
391 		swim_select(base, RELAX);
392 		if (swim_readbit(base, TRACK_ZERO))
393 			break;
394 
395 		if (swim_step(base))
396 			return -1;
397 	}
398 
399 	if (swim_readbit(base, TRACK_ZERO))
400 		return 0;
401 
402 	return -1;
403 }
404 
405 static inline int swim_seek(struct swim __iomem *base, int step)
406 {
407 	if (step == 0)
408 		return 0;
409 
410 	if (step < 0) {
411 		swim_action(base, SEEK_NEGATIVE);
412 		step = -step;
413 	} else
414 		swim_action(base, SEEK_POSITIVE);
415 
416 	for ( ; step > 0; step--) {
417 		if (swim_step(base))
418 			return -1;
419 	}
420 
421 	return 0;
422 }
423 
424 static inline int swim_track(struct floppy_state *fs,  int track)
425 {
426 	struct swim __iomem *base = fs->swd->base;
427 	int ret;
428 
429 	ret = swim_seek(base, track - fs->track);
430 
431 	if (ret == 0)
432 		fs->track = track;
433 	else {
434 		swim_track00(base);
435 		fs->track = 0;
436 	}
437 
438 	return ret;
439 }
440 
441 static int floppy_eject(struct floppy_state *fs)
442 {
443 	struct swim __iomem *base = fs->swd->base;
444 
445 	swim_drive(base, fs->location);
446 	swim_motor(base, OFF);
447 	swim_eject(base);
448 
449 	fs->disk_in = 0;
450 	fs->ejected = 1;
451 
452 	return 0;
453 }
454 
455 static inline int swim_read_sector(struct floppy_state *fs,
456 				   int side, int track,
457 				   int sector, unsigned char *buffer)
458 {
459 	struct swim __iomem *base = fs->swd->base;
460 	unsigned long flags;
461 	struct sector_header header;
462 	int ret = -1;
463 	short i;
464 
465 	swim_track(fs, track);
466 
467 	swim_write(base, mode1, MOTON);
468 	swim_head(base, side);
469 	swim_write(base, mode0, side);
470 
471 	local_irq_save(flags);
472 	for (i = 0; i < 36; i++) {
473 		ret = swim_read_sector_header(base, &header);
474 		if (!ret && (header.sector == sector)) {
475 			/* found */
476 
477 			ret = swim_read_sector_data(base, buffer);
478 			break;
479 		}
480 	}
481 	local_irq_restore(flags);
482 
483 	swim_write(base, mode0, MOTON);
484 
485 	if ((header.side != side)  || (header.track != track) ||
486 	     (header.sector != sector))
487 		return 0;
488 
489 	return ret;
490 }
491 
492 static blk_status_t floppy_read_sectors(struct floppy_state *fs,
493 			       int req_sector, int sectors_nb,
494 			       unsigned char *buffer)
495 {
496 	struct swim __iomem *base = fs->swd->base;
497 	int ret;
498 	int side, track, sector;
499 	int i, try;
500 
501 
502 	swim_drive(base, fs->location);
503 	for (i = req_sector; i < req_sector + sectors_nb; i++) {
504 		int x;
505 		track = i / fs->secpercyl;
506 		x = i % fs->secpercyl;
507 		side = x / fs->secpertrack;
508 		sector = x % fs->secpertrack + 1;
509 
510 		try = 5;
511 		do {
512 			ret = swim_read_sector(fs, side, track, sector,
513 						buffer);
514 			if (try-- == 0)
515 				return BLK_STS_IOERR;
516 		} while (ret != 512);
517 
518 		buffer += ret;
519 	}
520 
521 	return 0;
522 }
523 
524 static blk_status_t swim_queue_rq(struct blk_mq_hw_ctx *hctx,
525 				  const struct blk_mq_queue_data *bd)
526 {
527 	struct floppy_state *fs = hctx->queue->queuedata;
528 	struct swim_priv *swd = fs->swd;
529 	struct request *req = bd->rq;
530 	blk_status_t err;
531 
532 	if (!spin_trylock_irq(&swd->lock))
533 		return BLK_STS_DEV_RESOURCE;
534 
535 	blk_mq_start_request(req);
536 
537 	if (!fs->disk_in || rq_data_dir(req) == WRITE) {
538 		err = BLK_STS_IOERR;
539 		goto out;
540 	}
541 
542 	do {
543 		err = floppy_read_sectors(fs, blk_rq_pos(req),
544 					  blk_rq_cur_sectors(req),
545 					  bio_data(req->bio));
546 	} while (blk_update_request(req, err, blk_rq_cur_bytes(req)));
547 	__blk_mq_end_request(req, err);
548 
549 	err = BLK_STS_OK;
550 out:
551 	spin_unlock_irq(&swd->lock);
552 	return err;
553 
554 }
555 
556 static struct floppy_struct floppy_type[4] = {
557 	{    0,  0, 0,  0, 0, 0x00, 0x00, 0x00, 0x00, NULL }, /* no testing   */
558 	{  720,  9, 1, 80, 0, 0x2A, 0x02, 0xDF, 0x50, NULL }, /* 360KB SS 3.5"*/
559 	{ 1440,  9, 2, 80, 0, 0x2A, 0x02, 0xDF, 0x50, NULL }, /* 720KB 3.5"   */
560 	{ 2880, 18, 2, 80, 0, 0x1B, 0x00, 0xCF, 0x6C, NULL }, /* 1.44MB 3.5"  */
561 };
562 
563 static int get_floppy_geometry(struct floppy_state *fs, int type,
564 			       struct floppy_struct **g)
565 {
566 	if (type >= ARRAY_SIZE(floppy_type))
567 		return -EINVAL;
568 
569 	if (type)
570 		*g = &floppy_type[type];
571 	else if (fs->type == HD_MEDIA) /* High-Density media */
572 		*g = &floppy_type[3];
573 	else if (fs->head_number == 2) /* double-sided */
574 		*g = &floppy_type[2];
575 	else
576 		*g = &floppy_type[1];
577 
578 	return 0;
579 }
580 
581 static void setup_medium(struct floppy_state *fs)
582 {
583 	struct swim __iomem *base = fs->swd->base;
584 
585 	if (swim_readbit(base, DISK_IN)) {
586 		struct floppy_struct *g;
587 		fs->disk_in = 1;
588 		fs->write_protected = swim_readbit(base, WRITE_PROT);
589 
590 		if (swim_track00(base))
591 			printk(KERN_ERR
592 				"SWIM: cannot move floppy head to track 0\n");
593 
594 		swim_track00(base);
595 
596 		fs->type = swim_readbit(base, TWOMEG_MEDIA) ?
597 			HD_MEDIA : DD_MEDIA;
598 		fs->head_number = swim_readbit(base, SINGLE_SIDED) ? 1 : 2;
599 		get_floppy_geometry(fs, 0, &g);
600 		fs->total_secs = g->size;
601 		fs->secpercyl = g->head * g->sect;
602 		fs->secpertrack = g->sect;
603 		fs->track = 0;
604 	} else {
605 		fs->disk_in = 0;
606 	}
607 }
608 
609 static int floppy_open(struct block_device *bdev, fmode_t mode)
610 {
611 	struct floppy_state *fs = bdev->bd_disk->private_data;
612 	struct swim __iomem *base = fs->swd->base;
613 	int err;
614 
615 	if (fs->ref_count == -1 || (fs->ref_count && mode & FMODE_EXCL))
616 		return -EBUSY;
617 
618 	if (mode & FMODE_EXCL)
619 		fs->ref_count = -1;
620 	else
621 		fs->ref_count++;
622 
623 	swim_write(base, setup, S_IBM_DRIVE  | S_FCLK_DIV2);
624 	udelay(10);
625 	swim_drive(base, fs->location);
626 	swim_motor(base, ON);
627 	swim_action(base, SETMFM);
628 	if (fs->ejected)
629 		setup_medium(fs);
630 	if (!fs->disk_in) {
631 		err = -ENXIO;
632 		goto out;
633 	}
634 
635 	set_capacity(fs->disk, fs->total_secs);
636 
637 	if (mode & FMODE_NDELAY)
638 		return 0;
639 
640 	if (mode & (FMODE_READ|FMODE_WRITE)) {
641 		check_disk_change(bdev);
642 		if ((mode & FMODE_WRITE) && fs->write_protected) {
643 			err = -EROFS;
644 			goto out;
645 		}
646 	}
647 	return 0;
648 out:
649 	if (fs->ref_count < 0)
650 		fs->ref_count = 0;
651 	else if (fs->ref_count > 0)
652 		--fs->ref_count;
653 
654 	if (fs->ref_count == 0)
655 		swim_motor(base, OFF);
656 	return err;
657 }
658 
659 static int floppy_unlocked_open(struct block_device *bdev, fmode_t mode)
660 {
661 	int ret;
662 
663 	mutex_lock(&swim_mutex);
664 	ret = floppy_open(bdev, mode);
665 	mutex_unlock(&swim_mutex);
666 
667 	return ret;
668 }
669 
670 static void floppy_release(struct gendisk *disk, fmode_t mode)
671 {
672 	struct floppy_state *fs = disk->private_data;
673 	struct swim __iomem *base = fs->swd->base;
674 
675 	mutex_lock(&swim_mutex);
676 	if (fs->ref_count < 0)
677 		fs->ref_count = 0;
678 	else if (fs->ref_count > 0)
679 		--fs->ref_count;
680 
681 	if (fs->ref_count == 0)
682 		swim_motor(base, OFF);
683 	mutex_unlock(&swim_mutex);
684 }
685 
686 static int floppy_ioctl(struct block_device *bdev, fmode_t mode,
687 			unsigned int cmd, unsigned long param)
688 {
689 	struct floppy_state *fs = bdev->bd_disk->private_data;
690 	int err;
691 
692 	if ((cmd & 0x80) && !capable(CAP_SYS_ADMIN))
693 			return -EPERM;
694 
695 	switch (cmd) {
696 	case FDEJECT:
697 		if (fs->ref_count != 1)
698 			return -EBUSY;
699 		mutex_lock(&swim_mutex);
700 		err = floppy_eject(fs);
701 		mutex_unlock(&swim_mutex);
702 		return err;
703 
704 	case FDGETPRM:
705 		if (copy_to_user((void __user *) param, (void *) &floppy_type,
706 				 sizeof(struct floppy_struct)))
707 			return -EFAULT;
708 		return 0;
709 	}
710 	return -ENOTTY;
711 }
712 
713 static int floppy_getgeo(struct block_device *bdev, struct hd_geometry *geo)
714 {
715 	struct floppy_state *fs = bdev->bd_disk->private_data;
716 	struct floppy_struct *g;
717 	int ret;
718 
719 	ret = get_floppy_geometry(fs, 0, &g);
720 	if (ret)
721 		return ret;
722 
723 	geo->heads = g->head;
724 	geo->sectors = g->sect;
725 	geo->cylinders = g->track;
726 
727 	return 0;
728 }
729 
730 static unsigned int floppy_check_events(struct gendisk *disk,
731 					unsigned int clearing)
732 {
733 	struct floppy_state *fs = disk->private_data;
734 
735 	return fs->ejected ? DISK_EVENT_MEDIA_CHANGE : 0;
736 }
737 
738 static int floppy_revalidate(struct gendisk *disk)
739 {
740 	struct floppy_state *fs = disk->private_data;
741 	struct swim __iomem *base = fs->swd->base;
742 
743 	swim_drive(base, fs->location);
744 
745 	if (fs->ejected)
746 		setup_medium(fs);
747 
748 	if (!fs->disk_in)
749 		swim_motor(base, OFF);
750 	else
751 		fs->ejected = 0;
752 
753 	return !fs->disk_in;
754 }
755 
756 static const struct block_device_operations floppy_fops = {
757 	.owner		 = THIS_MODULE,
758 	.open		 = floppy_unlocked_open,
759 	.release	 = floppy_release,
760 	.ioctl		 = floppy_ioctl,
761 	.getgeo		 = floppy_getgeo,
762 	.check_events	 = floppy_check_events,
763 	.revalidate_disk = floppy_revalidate,
764 };
765 
766 static struct kobject *floppy_find(dev_t dev, int *part, void *data)
767 {
768 	struct swim_priv *swd = data;
769 	int drive = (*part & 3);
770 
771 	if (drive >= swd->floppy_count)
772 		return NULL;
773 
774 	*part = 0;
775 	return get_disk_and_module(swd->unit[drive].disk);
776 }
777 
778 static int swim_add_floppy(struct swim_priv *swd, enum drive_location location)
779 {
780 	struct floppy_state *fs = &swd->unit[swd->floppy_count];
781 	struct swim __iomem *base = swd->base;
782 
783 	fs->location = location;
784 
785 	swim_drive(base, location);
786 
787 	swim_motor(base, OFF);
788 
789 	fs->type = HD_MEDIA;
790 	fs->head_number = 2;
791 
792 	fs->ref_count = 0;
793 	fs->ejected = 1;
794 
795 	swd->floppy_count++;
796 
797 	return 0;
798 }
799 
800 static const struct blk_mq_ops swim_mq_ops = {
801 	.queue_rq = swim_queue_rq,
802 };
803 
804 static int swim_floppy_init(struct swim_priv *swd)
805 {
806 	int err;
807 	int drive;
808 	struct swim __iomem *base = swd->base;
809 
810 	/* scan floppy drives */
811 
812 	swim_drive(base, INTERNAL_DRIVE);
813 	if (swim_readbit(base, DRIVE_PRESENT) &&
814 	    !swim_readbit(base, ONEMEG_DRIVE))
815 		swim_add_floppy(swd, INTERNAL_DRIVE);
816 	swim_drive(base, EXTERNAL_DRIVE);
817 	if (swim_readbit(base, DRIVE_PRESENT) &&
818 	    !swim_readbit(base, ONEMEG_DRIVE))
819 		swim_add_floppy(swd, EXTERNAL_DRIVE);
820 
821 	/* register floppy drives */
822 
823 	err = register_blkdev(FLOPPY_MAJOR, "fd");
824 	if (err) {
825 		printk(KERN_ERR "Unable to get major %d for SWIM floppy\n",
826 		       FLOPPY_MAJOR);
827 		return -EBUSY;
828 	}
829 
830 	spin_lock_init(&swd->lock);
831 
832 	for (drive = 0; drive < swd->floppy_count; drive++) {
833 		struct request_queue *q;
834 
835 		swd->unit[drive].disk = alloc_disk(1);
836 		if (swd->unit[drive].disk == NULL) {
837 			err = -ENOMEM;
838 			goto exit_put_disks;
839 		}
840 
841 		q = blk_mq_init_sq_queue(&swd->unit[drive].tag_set, &swim_mq_ops,
842 						2, BLK_MQ_F_SHOULD_MERGE);
843 		if (IS_ERR(q)) {
844 			err = PTR_ERR(q);
845 			goto exit_put_disks;
846 		}
847 
848 		swd->unit[drive].disk->queue = q;
849 		blk_queue_bounce_limit(swd->unit[drive].disk->queue,
850 				BLK_BOUNCE_HIGH);
851 		swd->unit[drive].disk->queue->queuedata = &swd->unit[drive];
852 		swd->unit[drive].swd = swd;
853 	}
854 
855 	for (drive = 0; drive < swd->floppy_count; drive++) {
856 		swd->unit[drive].disk->flags = GENHD_FL_REMOVABLE;
857 		swd->unit[drive].disk->major = FLOPPY_MAJOR;
858 		swd->unit[drive].disk->first_minor = drive;
859 		sprintf(swd->unit[drive].disk->disk_name, "fd%d", drive);
860 		swd->unit[drive].disk->fops = &floppy_fops;
861 		swd->unit[drive].disk->events = DISK_EVENT_MEDIA_CHANGE;
862 		swd->unit[drive].disk->private_data = &swd->unit[drive];
863 		set_capacity(swd->unit[drive].disk, 2880);
864 		add_disk(swd->unit[drive].disk);
865 	}
866 
867 	blk_register_region(MKDEV(FLOPPY_MAJOR, 0), 256, THIS_MODULE,
868 			    floppy_find, NULL, swd);
869 
870 	return 0;
871 
872 exit_put_disks:
873 	unregister_blkdev(FLOPPY_MAJOR, "fd");
874 	do {
875 		struct gendisk *disk = swd->unit[drive].disk;
876 
877 		if (disk) {
878 			if (disk->queue) {
879 				blk_cleanup_queue(disk->queue);
880 				disk->queue = NULL;
881 			}
882 			blk_mq_free_tag_set(&swd->unit[drive].tag_set);
883 			put_disk(disk);
884 		}
885 	} while (drive--);
886 	return err;
887 }
888 
889 static int swim_probe(struct platform_device *dev)
890 {
891 	struct resource *res;
892 	struct swim __iomem *swim_base;
893 	struct swim_priv *swd;
894 	int ret;
895 
896 	res = platform_get_resource(dev, IORESOURCE_MEM, 0);
897 	if (!res) {
898 		ret = -ENODEV;
899 		goto out;
900 	}
901 
902 	if (!request_mem_region(res->start, resource_size(res), CARDNAME)) {
903 		ret = -EBUSY;
904 		goto out;
905 	}
906 
907 	swim_base = (struct swim __iomem *)res->start;
908 	if (!swim_base) {
909 		ret = -ENOMEM;
910 		goto out_release_io;
911 	}
912 
913 	/* probe device */
914 
915 	set_swim_mode(swim_base, 1);
916 	if (!get_swim_mode(swim_base)) {
917 		printk(KERN_INFO "SWIM device not found !\n");
918 		ret = -ENODEV;
919 		goto out_release_io;
920 	}
921 
922 	/* set platform driver data */
923 
924 	swd = kzalloc(sizeof(struct swim_priv), GFP_KERNEL);
925 	if (!swd) {
926 		ret = -ENOMEM;
927 		goto out_release_io;
928 	}
929 	platform_set_drvdata(dev, swd);
930 
931 	swd->base = swim_base;
932 
933 	ret = swim_floppy_init(swd);
934 	if (ret)
935 		goto out_kfree;
936 
937 	return 0;
938 
939 out_kfree:
940 	kfree(swd);
941 out_release_io:
942 	release_mem_region(res->start, resource_size(res));
943 out:
944 	return ret;
945 }
946 
947 static int swim_remove(struct platform_device *dev)
948 {
949 	struct swim_priv *swd = platform_get_drvdata(dev);
950 	int drive;
951 	struct resource *res;
952 
953 	blk_unregister_region(MKDEV(FLOPPY_MAJOR, 0), 256);
954 
955 	for (drive = 0; drive < swd->floppy_count; drive++) {
956 		del_gendisk(swd->unit[drive].disk);
957 		blk_cleanup_queue(swd->unit[drive].disk->queue);
958 		blk_mq_free_tag_set(&swd->unit[drive].tag_set);
959 		put_disk(swd->unit[drive].disk);
960 	}
961 
962 	unregister_blkdev(FLOPPY_MAJOR, "fd");
963 
964 	/* eject floppies */
965 
966 	for (drive = 0; drive < swd->floppy_count; drive++)
967 		floppy_eject(&swd->unit[drive]);
968 
969 	res = platform_get_resource(dev, IORESOURCE_MEM, 0);
970 	if (res)
971 		release_mem_region(res->start, resource_size(res));
972 
973 	kfree(swd);
974 
975 	return 0;
976 }
977 
978 static struct platform_driver swim_driver = {
979 	.probe  = swim_probe,
980 	.remove = swim_remove,
981 	.driver   = {
982 		.name	= CARDNAME,
983 	},
984 };
985 
986 static int __init swim_init(void)
987 {
988 	printk(KERN_INFO "SWIM floppy driver %s\n", DRIVER_VERSION);
989 
990 	return platform_driver_register(&swim_driver);
991 }
992 module_init(swim_init);
993 
994 static void __exit swim_exit(void)
995 {
996 	platform_driver_unregister(&swim_driver);
997 }
998 module_exit(swim_exit);
999 
1000 MODULE_DESCRIPTION("Driver for SWIM floppy controller");
1001 MODULE_LICENSE("GPL");
1002 MODULE_AUTHOR("Laurent Vivier <laurent@lvivier.info>");
1003 MODULE_ALIAS_BLOCKDEV_MAJOR(FLOPPY_MAJOR);
1004