1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38#define REALLY_SLOW_IO
39
40#include <linux/module.h>
41#include <linux/types.h>
42#include <linux/kernel.h>
43#include <linux/delay.h>
44#include <linux/timer.h>
45#include <linux/mm.h>
46#include <linux/ioport.h>
47#include <linux/blkdev.h>
48#include <linux/ide.h>
49#include <linux/init.h>
50
51#include <asm/io.h>
52
53#define DRV_NAME "umc8672"
54
55
56
57
58#define UMC_DRIVE0 1
59#define UMC_DRIVE1 1
60#define UMC_DRIVE2 1
61#define UMC_DRIVE3 1
62
63static u8 current_speeds[4] = {UMC_DRIVE0, UMC_DRIVE1, UMC_DRIVE2, UMC_DRIVE3};
64static const u8 pio_to_umc [5] = {0, 3, 7, 10, 11};
65
66
67static const u8 speedtab [3][12] = {
68 {0x0f, 0x0b, 0x02, 0x02, 0x02, 0x01, 0x01, 0x01, 0x01, 0x01, 0x01, 0x1},
69 {0x03, 0x02, 0x02, 0x02, 0x02, 0x02, 0x01, 0x01, 0x01, 0x01, 0x01, 0x1},
70 {0xff, 0xcb, 0xc0, 0x58, 0x36, 0x33, 0x23, 0x22, 0x21, 0x11, 0x10, 0x0}
71};
72
73static void out_umc(char port, char wert)
74{
75 outb_p(port, 0x108);
76 outb_p(wert, 0x109);
77}
78
79static inline u8 in_umc(char port)
80{
81 outb_p(port, 0x108);
82 return inb_p(0x109);
83}
84
85static void umc_set_speeds(u8 speeds[])
86{
87 int i, tmp;
88
89 outb_p(0x5A, 0x108);
90
91 out_umc(0xd7, (speedtab[0][speeds[2]] | (speedtab[0][speeds[3]]<<4)));
92 out_umc(0xd6, (speedtab[0][speeds[0]] | (speedtab[0][speeds[1]]<<4)));
93 tmp = 0;
94 for (i = 3; i >= 0; i--)
95 tmp = (tmp << 2) | speedtab[1][speeds[i]];
96 out_umc(0xdc, tmp);
97 for (i = 0; i < 4; i++) {
98 out_umc(0xd0 + i, speedtab[2][speeds[i]]);
99 out_umc(0xd8 + i, speedtab[2][speeds[i]]);
100 }
101 outb_p(0xa5, 0x108);
102
103 printk("umc8672: drive speeds [0 to 11]: %d %d %d %d\n",
104 speeds[0], speeds[1], speeds[2], speeds[3]);
105}
106
107static void umc_set_pio_mode(ide_drive_t *drive, const u8 pio)
108{
109 ide_hwif_t *hwif = drive->hwif, *mate = hwif->mate;
110 unsigned long uninitialized_var(flags);
111
112 printk("%s: setting umc8672 to PIO mode%d (speed %d)\n",
113 drive->name, pio, pio_to_umc[pio]);
114 if (mate)
115 spin_lock_irqsave(&mate->lock, flags);
116 if (mate && mate->handler) {
117 printk(KERN_ERR "umc8672: other interface is busy: exiting tune_umc()\n");
118 } else {
119 current_speeds[drive->name[2] - 'a'] = pio_to_umc[pio];
120 umc_set_speeds(current_speeds);
121 }
122 if (mate)
123 spin_unlock_irqrestore(&mate->lock, flags);
124}
125
126static const struct ide_port_ops umc8672_port_ops = {
127 .set_pio_mode = umc_set_pio_mode,
128};
129
130static const struct ide_port_info umc8672_port_info __initdata = {
131 .name = DRV_NAME,
132 .chipset = ide_umc8672,
133 .port_ops = &umc8672_port_ops,
134 .host_flags = IDE_HFLAG_NO_DMA,
135 .pio_mask = ATA_PIO4,
136};
137
138static int __init umc8672_probe(void)
139{
140 unsigned long flags;
141
142 if (!request_region(0x108, 2, "umc8672")) {
143 printk(KERN_ERR "umc8672: ports 0x108-0x109 already in use.\n");
144 return 1;
145 }
146 local_irq_save(flags);
147 outb_p(0x5A, 0x108);
148 if (in_umc (0xd5) != 0xa0) {
149 local_irq_restore(flags);
150 printk(KERN_ERR "umc8672: not found\n");
151 release_region(0x108, 2);
152 return 1;
153 }
154 outb_p(0xa5, 0x108);
155
156 umc_set_speeds(current_speeds);
157 local_irq_restore(flags);
158
159 return ide_legacy_device_add(&umc8672_port_info, 0);
160}
161
162static int probe_umc8672;
163
164module_param_named(probe, probe_umc8672, bool, 0);
165MODULE_PARM_DESC(probe, "probe for UMC8672 chipset");
166
167static int __init umc8672_init(void)
168{
169 if (probe_umc8672 == 0)
170 goto out;
171
172 if (umc8672_probe() == 0)
173 return 0;
174out:
175 return -ENODEV;
176}
177
178module_init(umc8672_init);
179
180MODULE_AUTHOR("Wolfram Podien");
181MODULE_DESCRIPTION("Support for UMC 8672 IDE chipset");
182MODULE_LICENSE("GPL");
183