xref: /linux/drivers/ata/pata_parport/comm.c (revision d6fd48ef)
1 /*
2         comm.c    (c) 1997-8  Grant R. Guenther <grant@torque.net>
3                               Under the terms of the GNU General Public License.
4 
5 	comm.c is a low-level protocol driver for some older models
6 	of the DataStor "Commuter" parallel to IDE adapter.  Some of
7 	the parallel port devices marketed by Arista currently
8 	use this adapter.
9 */
10 
11 /* Changes:
12 
13 	1.01	GRG 1998.05.05  init_proto, release_proto
14 
15 */
16 
17 #define COMM_VERSION      "1.01"
18 
19 #include <linux/module.h>
20 #include <linux/init.h>
21 #include <linux/delay.h>
22 #include <linux/kernel.h>
23 #include <linux/types.h>
24 #include <linux/wait.h>
25 #include <asm/io.h>
26 
27 #include <linux/pata_parport.h>
28 
29 /* mode codes:  0  nybble reads, 8-bit writes
30                 1  8-bit reads and writes
31                 2  8-bit EPP mode
32 */
33 
34 #define j44(a,b)	(((a>>3)&0x0f)|((b<<1)&0xf0))
35 
36 #define P1	w2(5);w2(0xd);w2(0xd);w2(5);w2(4);
37 #define P2	w2(5);w2(7);w2(7);w2(5);w2(4);
38 
39 /* cont = 0 - access the IDE register file
40    cont = 1 - access the IDE command set
41 */
42 
43 static int  cont_map[2] = { 0x08, 0x10 };
44 
45 static int comm_read_regr( PIA *pi, int cont, int regr )
46 
47 {       int     l, h, r;
48 
49         r = regr + cont_map[cont];
50 
51         switch (pi->mode)  {
52 
53         case 0: w0(r); P1; w0(0);
54         	w2(6); l = r1(); w0(0x80); h = r1(); w2(4);
55                 return j44(l,h);
56 
57         case 1: w0(r+0x20); P1;
58         	w0(0); w2(0x26); h = r0(); w2(4);
59                 return h;
60 
61 	case 2:
62 	case 3:
63         case 4: w3(r+0x20); (void)r1();
64         	w2(0x24); h = r4(); w2(4);
65                 return h;
66 
67         }
68         return -1;
69 }
70 
71 static void comm_write_regr( PIA *pi, int cont, int regr, int val )
72 
73 {       int  r;
74 
75         r = regr + cont_map[cont];
76 
77         switch (pi->mode)  {
78 
79         case 0:
80         case 1: w0(r); P1; w0(val); P2;
81 		break;
82 
83 	case 2:
84 	case 3:
85         case 4: w3(r); (void)r1(); w4(val);
86                 break;
87         }
88 }
89 
90 static void comm_connect ( PIA *pi  )
91 
92 {       pi->saved_r0 = r0();
93         pi->saved_r2 = r2();
94         w2(4); w0(0xff); w2(6);
95         w2(4); w0(0xaa); w2(6);
96         w2(4); w0(0x00); w2(6);
97         w2(4); w0(0x87); w2(6);
98         w2(4); w0(0xe0); w2(0xc); w2(0xc); w2(4);
99 }
100 
101 static void comm_disconnect ( PIA *pi )
102 
103 {       w2(0); w2(0); w2(0); w2(4);
104 	w0(pi->saved_r0);
105         w2(pi->saved_r2);
106 }
107 
108 static void comm_read_block( PIA *pi, char * buf, int count )
109 
110 {       int     i, l, h;
111 
112         switch (pi->mode) {
113 
114         case 0: w0(0x48); P1;
115                 for(i=0;i<count;i++) {
116                         w0(0); w2(6); l = r1();
117                         w0(0x80); h = r1(); w2(4);
118                         buf[i] = j44(l,h);
119                 }
120                 break;
121 
122         case 1: w0(0x68); P1; w0(0);
123                 for(i=0;i<count;i++) {
124                         w2(0x26); buf[i] = r0(); w2(0x24);
125                 }
126 		w2(4);
127 		break;
128 
129 	case 2: w3(0x68); (void)r1(); w2(0x24);
130 		for (i=0;i<count;i++) buf[i] = r4();
131 		w2(4);
132 		break;
133 
134         case 3: w3(0x68); (void)r1(); w2(0x24);
135                 for (i=0;i<count/2;i++) ((u16 *)buf)[i] = r4w();
136                 w2(4);
137                 break;
138 
139         case 4: w3(0x68); (void)r1(); w2(0x24);
140                 for (i=0;i<count/4;i++) ((u32 *)buf)[i] = r4l();
141                 w2(4);
142                 break;
143 
144 	}
145 }
146 
147 /* NB: Watch out for the byte swapped writes ! */
148 
149 static void comm_write_block( PIA *pi, char * buf, int count )
150 
151 {       int	k;
152 
153         switch (pi->mode) {
154 
155         case 0:
156         case 1: w0(0x68); P1;
157         	for (k=0;k<count;k++) {
158                         w2(5); w0(buf[k^1]); w2(7);
159                 }
160                 w2(5); w2(4);
161                 break;
162 
163         case 2: w3(0x48); (void)r1();
164                 for (k=0;k<count;k++) w4(buf[k^1]);
165                 break;
166 
167         case 3: w3(0x48); (void)r1();
168                 for (k=0;k<count/2;k++) w4w(pi_swab16(buf,k));
169                 break;
170 
171         case 4: w3(0x48); (void)r1();
172                 for (k=0;k<count/4;k++) w4l(pi_swab32(buf,k));
173                 break;
174 
175 
176         }
177 }
178 
179 static void comm_log_adapter( PIA *pi, char * scratch, int verbose )
180 
181 {       char    *mode_string[5] = {"4-bit","8-bit","EPP-8","EPP-16","EPP-32"};
182 
183         printk("%s: comm %s, DataStor Commuter at 0x%x, ",
184                 pi->device,COMM_VERSION,pi->port);
185         printk("mode %d (%s), delay %d\n",pi->mode,
186 		mode_string[pi->mode],pi->delay);
187 
188 }
189 
190 static struct pi_protocol comm = {
191 	.owner		= THIS_MODULE,
192 	.name		= "comm",
193 	.max_mode	= 5,
194 	.epp_first	= 2,
195 	.default_delay	= 1,
196 	.max_units	= 1,
197 	.write_regr	= comm_write_regr,
198 	.read_regr	= comm_read_regr,
199 	.write_block	= comm_write_block,
200 	.read_block	= comm_read_block,
201 	.connect	= comm_connect,
202 	.disconnect	= comm_disconnect,
203 	.log_adapter	= comm_log_adapter,
204 };
205 
206 static int __init comm_init(void)
207 {
208 	return paride_register(&comm);
209 }
210 
211 static void __exit comm_exit(void)
212 {
213 	paride_unregister(&comm);
214 }
215 
216 MODULE_LICENSE("GPL");
217 module_init(comm_init)
218 module_exit(comm_exit)
219