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