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