22  * mode codes:  0  nybble reads on port 1, 8-bit writes
23  *		1  5/3 reads on ports 1 & 2, 8-bit writes
35  * cont =  1   IDE control registers
48 		w0(r); w2(1); w2(3); w0(r);  in epia_read_regr()
49 		a = r1(); w2(1); b = r1(); w2(4);  in epia_read_regr()
51 	case 1:  in epia_read_regr()
53 		w0(r); w2(1); w0(r & 0x37);  in epia_read_regr()
59 		w0(r); w2(1); w2(0X21); w2(0x23);  in epia_read_regr()
69 	return -1;  in epia_read_regr()
80 	case 1:  in epia_write_regr()
83 		w0(r); w2(1); w0(val); w2(3); w2(4);  in epia_write_regr()
109 	w2(1); w2(4);  in epia_connect()
111 		w0(0xa); w2(1); w2(4); w0(0x82); w2(4); w2(0xc); w2(4);  in epia_connect()
121 	w2(1); w2(4);  in epia_disconnect()
129 	int k, ph, a, b;  in epia_read_block()  local
133 		w0(0x81); w2(1); w2(3); w0(0xc1);  in epia_read_block()
134 		ph = 1;  in epia_read_block()
135 		for (k = 0; k < count; k++) {  in epia_read_block()
138 			buf[k] = j44(a, b);  in epia_read_block()
139 			ph = 1 - ph;  in epia_read_block()
143 	case 1:  in epia_read_block()
144 		w0(0x91); w2(1); w0(0x10); w2(3);  in epia_read_block()
146 		ph = 1;  in epia_read_block()
147 		for (k = 0; k < count; k++) {  in epia_read_block()
150 			buf[k] = j53(a, b);  in epia_read_block()
151 			ph = 1 - ph;  in epia_read_block()
156 		w0(0x89); w2(1); w2(0x23); w2(0x21);  in epia_read_block()
157 		ph = 1;  in epia_read_block()
158 		for (k = 0; k < count; k++) {  in epia_read_block()
160 			buf[k] = r0();  in epia_read_block()
161 			ph = 1 - ph;  in epia_read_block()
169 		for (k = 0; k < count; k++)  in epia_read_block()
170 			buf[k] = r4();  in epia_read_block()
177 		for (k = 0; k < count / 2; k++)  in epia_read_block()
178 			((u16 *)buf)[k] = r4w();  in epia_read_block()
185 		for (k = 0; k < count / 4; k++)  in epia_read_block()
186 			((u32 *)buf)[k] = r4l();  in epia_read_block()
194 	int ph, k, last, d;  in epia_write_block()  local
198 	case 1:  in epia_write_block()
200 		w0(0xa1); w2(1); w2(3); w2(1); w2(5);  in epia_write_block()
202 		for (k = 0; k < count; k++) {  in epia_write_block()
203 			d = buf[k];  in epia_write_block()
209 			ph = 1 - ph;  in epia_write_block()
215 			WR(0x84, 1);  in epia_write_block()
217 		for (k = 0; k < count; k++)  in epia_write_block()
218 			w4(buf[k]);  in epia_write_block()
224 			WR(0x84, 1);  in epia_write_block()
226 		for (k = 0; k < count / 2; k++)  in epia_write_block()
227 			w4w(((u16 *)buf)[k]);  in epia_write_block()
233 			WR(0x84, 1);  in epia_write_block()
235 		for (k = 0; k < count / 4; k++)  in epia_write_block()
236 			w4l(((u32 *)buf)[k]);  in epia_write_block()
245 	int j, k, f;  in epia_test_proto()  local
252 		for (k = 0; k < 256; k++) {  in epia_test_proto()
253 			WR(2, k ^ 0xaa);  in epia_test_proto()
254 			WR(3, k ^ 0x55);  in epia_test_proto()
255 			if (RR(2) != (k ^ 0xaa))  in epia_test_proto()
258 		WR(2, 1); WR(3, 1);  in epia_test_proto()
266 	for (k = 0; k < 256; k++) {  in epia_test_proto()
267 		if ((scratch[2 * k] & 0xff) != ((k + 1) & 0xff))  in epia_test_proto()
269 		if ((scratch[2 * k + 1] & 0xff) != ((-2 - k) & 0xff))  in epia_test_proto()
276 		pi->port, pi->mode, e[0], e[1], f);  in epia_test_proto()
278 	return (e[0] && e[1]) || f;  in epia_test_proto()
296 	.default_delay	= 1,
297 	.max_units	= 1,