xref: /linux/drivers/ata/pata_parport/friq.c (revision 8a922b7728a93d837954315c98b84f6b78de0c4f)
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 <linux/pata_parport.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 {
266 	return paride_register(&friq);
267 }
268 
269 static void __exit friq_exit(void)
270 {
271 	paride_unregister(&friq);
272 }
273 
274 MODULE_LICENSE("GPL");
275 module_init(friq_init)
276 module_exit(friq_exit)
277