Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | friq.c (c) 1998 Grant R. Guenther <grant@torque.net> | |
3 | Under the terms of the GNU General Public License | |
4 | ||
5 | friq.c is a low-level protocol driver for the Freecom "IQ" | |
6 | parallel port IDE adapter. Early versions of this adapter | |
7 | use the 'frpw' protocol. | |
8 | ||
9 | Freecom uses this adapter in a battery powered external | |
10 | CD-ROM drive. It is also used in LS-120 drives by | |
11 | Maxell and Panasonic, and other devices. | |
12 | ||
13 | The battery powered drive requires software support to | |
14 | control the power to the drive. This module enables the | |
15 | drive power when the high level driver (pcd) is loaded | |
16 | and disables it when the module is unloaded. Note, if | |
17 | the friq module is built in to the kernel, the power | |
18 | will never be switched off, so other means should be | |
19 | used to conserve battery power. | |
20 | ||
21 | */ | |
22 | ||
23 | /* Changes: | |
24 | ||
25 | 1.01 GRG 1998.12.20 Added support for soft power switch | |
26 | */ | |
27 | ||
28 | #define FRIQ_VERSION "1.01" | |
29 | ||
30 | #include <linux/module.h> | |
31 | #include <linux/init.h> | |
32 | #include <linux/delay.h> | |
33 | #include <linux/kernel.h> | |
34 | #include <linux/types.h> | |
35 | #include <linux/wait.h> | |
36 | #include <asm/io.h> | |
37 | ||
38 | #include "paride.h" | |
39 | ||
40 | #define CMD(x) w2(4);w0(0xff);w0(0xff);w0(0x73);w0(0x73);\ | |
41 | w0(0xc9);w0(0xc9);w0(0x26);w0(0x26);w0(x);w0(x); | |
42 | ||
43 | #define j44(l,h) (((l>>4)&0x0f)|(h&0xf0)) | |
44 | ||
45 | /* cont = 0 - access the IDE register file | |
46 | cont = 1 - access the IDE command set | |
47 | */ | |
48 | ||
49 | static int cont_map[2] = { 0x08, 0x10 }; | |
50 | ||
51 | static int friq_read_regr( PIA *pi, int cont, int regr ) | |
52 | ||
53 | { int h,l,r; | |
54 | ||
55 | r = regr + cont_map[cont]; | |
56 | ||
57 | CMD(r); | |
58 | w2(6); l = r1(); | |
59 | w2(4); h = r1(); | |
60 | w2(4); | |
61 | ||
62 | return j44(l,h); | |
63 | ||
64 | } | |
65 | ||
66 | static void friq_write_regr( PIA *pi, int cont, int regr, int val) | |
67 | ||
68 | { int r; | |
69 | ||
70 | r = regr + cont_map[cont]; | |
71 | ||
72 | CMD(r); | |
73 | w0(val); | |
74 | w2(5);w2(7);w2(5);w2(4); | |
75 | } | |
76 | ||
77 | static void friq_read_block_int( PIA *pi, char * buf, int count, int regr ) | |
78 | ||
79 | { int h, l, k, ph; | |
80 | ||
81 | switch(pi->mode) { | |
82 | ||
83 | case 0: CMD(regr); | |
84 | for (k=0;k<count;k++) { | |
85 | w2(6); l = r1(); | |
86 | w2(4); h = r1(); | |
87 | buf[k] = j44(l,h); | |
88 | } | |
89 | w2(4); | |
90 | break; | |
91 | ||
92 | case 1: ph = 2; | |
93 | CMD(regr+0xc0); | |
94 | w0(0xff); | |
95 | for (k=0;k<count;k++) { | |
96 | w2(0xa4 + ph); | |
97 | buf[k] = r0(); | |
98 | ph = 2 - ph; | |
99 | } | |
100 | w2(0xac); w2(0xa4); w2(4); | |
101 | break; | |
102 | ||
103 | case 2: CMD(regr+0x80); | |
104 | for (k=0;k<count-2;k++) buf[k] = r4(); | |
105 | w2(0xac); w2(0xa4); | |
106 | buf[count-2] = r4(); | |
107 | buf[count-1] = r4(); | |
108 | w2(4); | |
109 | break; | |
110 | ||
111 | case 3: CMD(regr+0x80); | |
112 | for (k=0;k<(count/2)-1;k++) ((u16 *)buf)[k] = r4w(); | |
113 | w2(0xac); w2(0xa4); | |
114 | buf[count-2] = r4(); | |
115 | buf[count-1] = r4(); | |
116 | w2(4); | |
117 | break; | |
118 | ||
119 | case 4: CMD(regr+0x80); | |
120 | for (k=0;k<(count/4)-1;k++) ((u32 *)buf)[k] = r4l(); | |
121 | buf[count-4] = r4(); | |
122 | buf[count-3] = r4(); | |
123 | w2(0xac); w2(0xa4); | |
124 | buf[count-2] = r4(); | |
125 | buf[count-1] = r4(); | |
126 | w2(4); | |
127 | break; | |
128 | ||
129 | } | |
130 | } | |
131 | ||
132 | static void friq_read_block( PIA *pi, char * buf, int count) | |
133 | ||
134 | { friq_read_block_int(pi,buf,count,0x08); | |
135 | } | |
136 | ||
137 | static void friq_write_block( PIA *pi, char * buf, int count ) | |
138 | ||
139 | { int k; | |
140 | ||
141 | switch(pi->mode) { | |
142 | ||
143 | case 0: | |
144 | case 1: CMD(8); w2(5); | |
145 | for (k=0;k<count;k++) { | |
146 | w0(buf[k]); | |
147 | w2(7);w2(5); | |
148 | } | |
149 | w2(4); | |
150 | break; | |
151 | ||
152 | case 2: CMD(0xc8); w2(5); | |
153 | for (k=0;k<count;k++) w4(buf[k]); | |
154 | w2(4); | |
155 | break; | |
156 | ||
157 | case 3: CMD(0xc8); w2(5); | |
158 | for (k=0;k<count/2;k++) w4w(((u16 *)buf)[k]); | |
159 | w2(4); | |
160 | break; | |
161 | ||
162 | case 4: CMD(0xc8); w2(5); | |
163 | for (k=0;k<count/4;k++) w4l(((u32 *)buf)[k]); | |
164 | w2(4); | |
165 | break; | |
166 | } | |
167 | } | |
168 | ||
169 | static void friq_connect ( PIA *pi ) | |
170 | ||
171 | { pi->saved_r0 = r0(); | |
172 | pi->saved_r2 = r2(); | |
173 | w2(4); | |
174 | } | |
175 | ||
176 | static void friq_disconnect ( PIA *pi ) | |
177 | ||
178 | { CMD(0x20); | |
179 | w0(pi->saved_r0); | |
180 | w2(pi->saved_r2); | |
181 | } | |
182 | ||
183 | static int friq_test_proto( PIA *pi, char * scratch, int verbose ) | |
184 | ||
185 | { int j, k, r; | |
186 | int e[2] = {0,0}; | |
187 | ||
188 | pi->saved_r0 = r0(); | |
189 | w0(0xff); udelay(20); CMD(0x3d); /* turn the power on */ | |
190 | udelay(500); | |
191 | w0(pi->saved_r0); | |
192 | ||
193 | friq_connect(pi); | |
194 | for (j=0;j<2;j++) { | |
195 | friq_write_regr(pi,0,6,0xa0+j*0x10); | |
196 | for (k=0;k<256;k++) { | |
197 | friq_write_regr(pi,0,2,k^0xaa); | |
198 | friq_write_regr(pi,0,3,k^0x55); | |
199 | if (friq_read_regr(pi,0,2) != (k^0xaa)) e[j]++; | |
200 | } | |
201 | } | |
202 | friq_disconnect(pi); | |
203 | ||
204 | friq_connect(pi); | |
205 | friq_read_block_int(pi,scratch,512,0x10); | |
206 | r = 0; | |
207 | for (k=0;k<128;k++) if (scratch[k] != k) r++; | |
208 | friq_disconnect(pi); | |
209 | ||
210 | if (verbose) { | |
211 | printk("%s: friq: port 0x%x, mode %d, test=(%d,%d,%d)\n", | |
212 | pi->device,pi->port,pi->mode,e[0],e[1],r); | |
213 | } | |
214 | ||
215 | return (r || (e[0] && e[1])); | |
216 | } | |
217 | ||
218 | ||
219 | static void friq_log_adapter( PIA *pi, char * scratch, int verbose ) | |
220 | ||
221 | { char *mode_string[6] = {"4-bit","8-bit", | |
222 | "EPP-8","EPP-16","EPP-32"}; | |
223 | ||
224 | printk("%s: friq %s, Freecom IQ ASIC-2 adapter at 0x%x, ", pi->device, | |
225 | FRIQ_VERSION,pi->port); | |
226 | printk("mode %d (%s), delay %d\n",pi->mode, | |
227 | mode_string[pi->mode],pi->delay); | |
228 | ||
229 | pi->private = 1; | |
230 | friq_connect(pi); | |
231 | CMD(0x9e); /* disable sleep timer */ | |
232 | friq_disconnect(pi); | |
233 | ||
234 | } | |
235 | ||
236 | static void friq_release_proto( PIA *pi) | |
237 | { | |
238 | if (pi->private) { /* turn off the power */ | |
239 | friq_connect(pi); | |
240 | CMD(0x1d); CMD(0x1e); | |
241 | friq_disconnect(pi); | |
242 | pi->private = 0; | |
243 | } | |
244 | } | |
245 | ||
246 | static struct pi_protocol friq = { | |
247 | .owner = THIS_MODULE, | |
248 | .name = "friq", | |
249 | .max_mode = 5, | |
250 | .epp_first = 2, | |
251 | .default_delay = 1, | |
252 | .max_units = 1, | |
253 | .write_regr = friq_write_regr, | |
254 | .read_regr = friq_read_regr, | |
255 | .write_block = friq_write_block, | |
256 | .read_block = friq_read_block, | |
257 | .connect = friq_connect, | |
258 | .disconnect = friq_disconnect, | |
259 | .test_proto = friq_test_proto, | |
260 | .log_adapter = friq_log_adapter, | |
261 | .release_proto = friq_release_proto, | |
262 | }; | |
263 | ||
264 | static int __init friq_init(void) | |
265 | { | |
b4178ab5 | 266 | return paride_register(&friq); |
1da177e4 LT |
267 | } |
268 | ||
269 | static void __exit friq_exit(void) | |
270 | { | |
f4330002 | 271 | paride_unregister(&friq); |
1da177e4 LT |
272 | } |
273 | ||
274 | MODULE_LICENSE("GPL"); | |
275 | module_init(friq_init) | |
276 | module_exit(friq_exit) |