update atp870u driver to 0.78 from D-Link source
[linux-2.4.git] / drivers / ide / legacy / umc8672.c
1 /*
2  *  linux/drivers/ide/legacy/umc8672.c          Version 0.05    Jul 31, 1996
3  *
4  *  Copyright (C) 1995-1996  Linus Torvalds & author (see below)
5  */
6
7 /*
8  *  Principal Author/Maintainer:  PODIEN@hml2.atlas.de (Wolfram Podien)
9  *
10  *  This file provides support for the advanced features
11  *  of the UMC 8672 IDE interface.
12  *
13  *  Version 0.01        Initial version, hacked out of ide.c,
14  *                      and #include'd rather than compiled separately.
15  *                      This will get cleaned up in a subsequent release.
16  *
17  *  Version 0.02        now configs/compiles separate from ide.c  -ml
18  *  Version 0.03        enhanced auto-tune, fix display bug
19  *  Version 0.05        replace sti() with restore_flags()  -ml
20  *                      add detection of possible race condition  -ml
21  */
22
23 /*
24  * VLB Controller Support from 
25  * Wolfram Podien
26  * Rohoefe 3
27  * D28832 Achim
28  * Germany
29  *
30  * To enable UMC8672 support there must a lilo line like
31  * append="ide0=umc8672"...
32  * To set the speed according to the abilities of the hardware there must be a
33  * line like
34  * #define UMC_DRIVE0 11
35  * in the beginning of the driver, which sets the speed of drive 0 to 11 (there
36  * are some lines present). 0 - 11 are allowed speed values. These values are
37  * the results from the DOS speed test program supplied from UMC. 11 is the 
38  * highest speed (about PIO mode 3)
39  */
40 #define REALLY_SLOW_IO          /* some systems can safely undef this */
41
42 #include <linux/module.h>
43 #include <linux/config.h>
44 #include <linux/types.h>
45 #include <linux/kernel.h>
46 #include <linux/delay.h>
47 #include <linux/timer.h>
48 #include <linux/mm.h>
49 #include <linux/ioport.h>
50 #include <linux/blkdev.h>
51 #include <linux/hdreg.h>
52 #include <linux/ide.h>
53 #include <linux/init.h>
54
55 #include <asm/io.h>
56
57 #ifdef CONFIG_BLK_DEV_UMC8672_MODULE
58 # define _IDE_C
59 # include "ide_modes.h"
60 # undef _IDE_C
61 #else
62 # include "ide_modes.h"
63 #endif /* CONFIG_BLK_DEV_UMC8672_MODULE */
64
65 /*
66  * Default speeds.  These can be changed with "auto-tune" and/or hdparm.
67  */
68 #define UMC_DRIVE0      1              /* DOS measured drive speeds */
69 #define UMC_DRIVE1      1              /* 0 to 11 allowed */
70 #define UMC_DRIVE2      1              /* 11 = Fastest Speed */
71 #define UMC_DRIVE3      1              /* In case of crash reduce speed */
72
73 static u8 current_speeds[4] = {UMC_DRIVE0, UMC_DRIVE1, UMC_DRIVE2, UMC_DRIVE3};
74 static const u8 pio_to_umc [5] = {0,3,7,10,11}; /* rough guesses */
75
76 /*       0    1    2    3    4    5    6    7    8    9    10   11      */
77 static const u8 speedtab [3][12] = {
78         {0xf, 0xb, 0x2, 0x2, 0x2, 0x1, 0x1, 0x1, 0x1, 0x1, 0x1, 0x1 },
79         {0x3, 0x2, 0x2, 0x2, 0x2, 0x2, 0x1, 0x1, 0x1, 0x1, 0x1, 0x1 },
80         {0xff,0xcb,0xc0,0x58,0x36,0x33,0x23,0x22,0x21,0x11,0x10,0x0}};
81
82 static void out_umc (char port,char wert)
83 {
84         outb_p(port,0x108);
85         outb_p(wert,0x109);
86 }
87
88 static inline u8 in_umc (char port)
89 {
90         outb_p(port,0x108);
91         return inb_p(0x109);
92 }
93
94 static void umc_set_speeds (u8 speeds[])
95 {
96         int i, tmp;
97
98         outb_p(0x5A,0x108); /* enable umc */
99
100         out_umc (0xd7,(speedtab[0][speeds[2]] | (speedtab[0][speeds[3]]<<4)));
101         out_umc (0xd6,(speedtab[0][speeds[0]] | (speedtab[0][speeds[1]]<<4)));
102         tmp = 0;
103         for (i = 3; i >= 0; i--) {
104                 tmp = (tmp << 2) | speedtab[1][speeds[i]];
105         }
106         out_umc (0xdc,tmp);
107         for (i = 0;i < 4; i++) {
108                 out_umc (0xd0+i,speedtab[2][speeds[i]]);
109                 out_umc (0xd8+i,speedtab[2][speeds[i]]);
110         }
111         outb_p(0xa5,0x108); /* disable umc */
112
113         printk ("umc8672: drive speeds [0 to 11]: %d %d %d %d\n",
114                 speeds[0], speeds[1], speeds[2], speeds[3]);
115 }
116
117 static void tune_umc (ide_drive_t *drive, u8 pio)
118 {
119         unsigned long flags;
120         ide_hwgroup_t *hwgroup = ide_hwifs[HWIF(drive)->index^1].hwgroup;
121
122         pio = ide_get_best_pio_mode(drive, pio, 4, NULL);
123         printk("%s: setting umc8672 to PIO mode%d (speed %d)\n",
124                 drive->name, pio, pio_to_umc[pio]);
125         spin_lock_irqsave(&io_request_lock, flags);
126         if (hwgroup && hwgroup->handler != NULL) {
127                 printk(KERN_ERR "umc8672: other interface is busy: exiting tune_umc()\n");
128         } else {
129                 current_speeds[drive->name[2] - 'a'] = pio_to_umc[pio];
130                 umc_set_speeds (current_speeds);
131         }
132         spin_unlock_irqrestore(&io_request_lock, flags);
133 }
134
135 int __init probe_umc8672 (void)
136 {
137         unsigned long flags;
138
139         local_irq_save(flags);
140         if (!request_region(0x108, 2, "umc8672")) {
141                 local_irq_restore(flags);
142                 printk(KERN_ERR "umc8672: ports 0x108-0x109 already in use.\n");
143                 return 1;
144         }
145         outb_p(0x5A,0x108); /* enable umc */
146         if (in_umc (0xd5) != 0xa0) {
147                 local_irq_restore(flags);
148                 printk(KERN_ERR "umc8672: not found\n");
149                 release_region(0x108, 2);
150                 return 1;  
151         }
152         outb_p(0xa5,0x108); /* disable umc */
153
154         umc_set_speeds (current_speeds);
155         local_irq_restore(flags);
156
157         ide_hwifs[0].chipset = ide_umc8672;
158         ide_hwifs[1].chipset = ide_umc8672;
159         ide_hwifs[0].tuneproc = &tune_umc;
160         ide_hwifs[1].tuneproc = &tune_umc;
161         ide_hwifs[0].mate = &ide_hwifs[1];
162         ide_hwifs[1].mate = &ide_hwifs[0];
163         ide_hwifs[1].channel = 1;
164
165 #ifndef HWIF_PROBE_CLASSIC_METHOD
166         probe_hwif_init(&ide_hwifs[0]);
167         probe_hwif_init(&ide_hwifs[1]);
168 #endif /* HWIF_PROBE_CLASSIC_METHOD */
169
170         return 0;
171 }
172
173 void __init umc8672_release (void)
174 {
175         unsigned long flags;
176
177         local_irq_save(flags);
178         if (ide_hwifs[0].chipset != ide_umc8672 &&
179             ide_hwifs[1].chipset != ide_umc8672) {
180                 local_irq_restore(flags);
181                 return;
182         }
183
184         ide_hwifs[0].chipset = ide_unknown;
185         ide_hwifs[1].chipset = ide_unknown;     
186         ide_hwifs[0].tuneproc = NULL;
187         ide_hwifs[1].tuneproc = NULL;
188         ide_hwifs[0].mate = NULL;
189         ide_hwifs[1].mate = NULL;
190         ide_hwifs[0].channel = 0;
191         ide_hwifs[1].channel = 0;
192
193         outb_p(0xa5,0x108); /* disable umc */
194
195         release_region(0x108, 2);
196         local_irq_restore(flags);
197 }
198
199 #ifndef MODULE
200 /*
201  * init_umc8672:
202  *
203  * called by ide.c when parsing command line
204  */
205
206 void __init init_umc8672 (void)
207 {
208         if (probe_umc8672())
209                 printk(KERN_ERR "init_umc8672: umc8672 controller not found.\n");
210 }
211
212 #else
213
214 MODULE_AUTHOR("Wolfram Podien");
215 MODULE_DESCRIPTION("Support for UMC 8672 IDE chipset");
216 MODULE_LICENSE("GPL");
217
218 int __init umc8672_mod_init(void)
219 {
220         if (probe_umc8672())
221                 return -ENODEV;
222         if (ide_hwifs[0].chipset != ide_umc8672 &&
223             ide_hwifs[1].chipset != ide_umc8672) {
224                 umc8672_release();
225                 return -ENODEV;
226         }
227         return 0;
228 }
229 module_init(umc8672_mod_init);
230
231 void __init umc8672_mod_exit(void)
232 {
233         umc8672_release();
234 }
235 module_exit(umc8672_mod_exit);
236 #endif
237