File: /usr/src/linux/drivers/block/paride/aten.c
1 /*
2 aten.c (c) 1997-8 Grant R. Guenther <grant@torque.net>
3 Under the terms of the GNU General Public License.
4
5 aten.c is a low-level protocol driver for the ATEN EH-100
6 parallel port adapter. The EH-100 supports 4-bit and 8-bit
7 modes only. There is also an EH-132 which supports EPP mode
8 transfers. The EH-132 is not yet supported.
9
10 */
11
12 /* Changes:
13
14 1.01 GRG 1998.05.05 init_proto, release_proto
15
16 */
17
18 #define ATEN_VERSION "1.01"
19
20 #include <linux/module.h>
21 #include <linux/delay.h>
22 #include <linux/kernel.h>
23 #include <linux/wait.h>
24 #include <linux/types.h>
25 #include <asm/io.h>
26
27 #include "paride.h"
28
29 #define j44(a,b) ((((a>>4)&0x0f)|(b&0xf0))^0x88)
30
31 /* cont = 0 - access the IDE register file
32 cont = 1 - access the IDE command set
33 */
34
35 static int cont_map[2] = { 0x08, 0x20 };
36
37 static void aten_write_regr( PIA *pi, int cont, int regr, int val)
38
39 { int r;
40
41 r = regr + cont_map[cont] + 0x80;
42
43 w0(r); w2(0xe); w2(6); w0(val); w2(7); w2(6); w2(0xc);
44 }
45
46 static int aten_read_regr( PIA *pi, int cont, int regr )
47
48 { int a, b, r;
49
50 r = regr + cont_map[cont] + 0x40;
51
52 switch (pi->mode) {
53
54 case 0: w0(r); w2(0xe); w2(6);
55 w2(7); w2(6); w2(0);
56 a = r1(); w0(0x10); b = r1(); w2(0xc);
57 return j44(a,b);
58
59 case 1: r |= 0x10;
60 w0(r); w2(0xe); w2(6); w0(0xff);
61 w2(0x27); w2(0x26); w2(0x20);
62 a = r0();
63 w2(0x26); w2(0xc);
64 return a;
65 }
66 return -1;
67 }
68
69 static void aten_read_block( PIA *pi, char * buf, int count )
70
71 { int k, a, b, c, d;
72
73 switch (pi->mode) {
74
75 case 0: w0(0x48); w2(0xe); w2(6);
76 for (k=0;k<count/2;k++) {
77 w2(7); w2(6); w2(2);
78 a = r1(); w0(0x58); b = r1();
79 w2(0); d = r1(); w0(0x48); c = r1();
80 buf[2*k] = j44(c,d);
81 buf[2*k+1] = j44(a,b);
82 }
83 w2(0xc);
84 break;
85
86 case 1: w0(0x58); w2(0xe); w2(6);
87 for (k=0;k<count/2;k++) {
88 w2(0x27); w2(0x26); w2(0x22);
89 a = r0(); w2(0x20); b = r0();
90 buf[2*k] = b; buf[2*k+1] = a;
91 }
92 w2(0x26); w2(0xc);
93 break;
94 }
95 }
96
97 static void aten_write_block( PIA *pi, char * buf, int count )
98
99 { int k;
100
101 w0(0x88); w2(0xe); w2(6);
102 for (k=0;k<count/2;k++) {
103 w0(buf[2*k+1]); w2(0xe); w2(6);
104 w0(buf[2*k]); w2(7); w2(6);
105 }
106 w2(0xc);
107 }
108
109 static void aten_connect ( PIA *pi )
110
111 { pi->saved_r0 = r0();
112 pi->saved_r2 = r2();
113 w2(0xc);
114 }
115
116 static void aten_disconnect ( PIA *pi )
117
118 { w0(pi->saved_r0);
119 w2(pi->saved_r2);
120 }
121
122 static void aten_log_adapter( PIA *pi, char * scratch, int verbose )
123
124 { char *mode_string[2] = {"4-bit","8-bit"};
125
126 printk("%s: aten %s, ATEN EH-100 at 0x%x, ",
127 pi->device,ATEN_VERSION,pi->port);
128 printk("mode %d (%s), delay %d\n",pi->mode,
129 mode_string[pi->mode],pi->delay);
130
131 }
132
133 static void aten_init_proto( PIA *pi )
134
135 { MOD_INC_USE_COUNT;
136 }
137
138 static void aten_release_proto( PIA *pi )
139
140 { MOD_DEC_USE_COUNT;
141 }
142
143 struct pi_protocol aten = {"aten",0,2,2,1,1,
144 aten_write_regr,
145 aten_read_regr,
146 aten_write_block,
147 aten_read_block,
148 aten_connect,
149 aten_disconnect,
150 0,
151 0,
152 0,
153 aten_log_adapter,
154 aten_init_proto,
155 aten_release_proto
156 };
157
158
159 #ifdef MODULE
160
161 int init_module(void)
162
163 { return pi_register( &aten ) - 1;
164 }
165
166 void cleanup_module(void)
167
168 { pi_unregister( &aten );
169 }
170
171 #endif
172
173 /* end of aten.c */
174