2         epia.c    (c) 1997-8  Grant R. Guenther <grant@torque.net>
32 /* mode codes:  0  nybble reads on port 1, 8-bit writes
33                 1  5/3 reads on ports 1 & 2, 8-bit writes
34                 2  8-bit reads and writes
35                 3  8-bit EPP mode
124         WR(0x86,8);    in epia_connect()
138 {       int     k, ph, a, b;  in epia_read_block()  local
144                 for (k=0;k<count;k++) {  in epia_read_block()
147                         buf[k] = j44(a,b);  in epia_read_block()
156                 for (k=0;k<count;k++) {  in epia_read_block()
159                         buf[k] = j53(a,b);  in epia_read_block()
167                 for (k=0;k<count;k++) {  in epia_read_block()
169                         buf[k] = r0();  in epia_read_block()
177                 for (k=0;k<count;k++) buf[k] = r4();  in epia_read_block()
183 		for (k=0;k<count/2;k++) ((u16 *)buf)[k] = r4w();  in epia_read_block()
189                 for (k=0;k<count/4;k++) ((u32 *)buf)[k] = r4l();  in epia_read_block()
198 {       int     ph, k, last, d;  in epia_write_block()  local
206                 for (k=0;k<count;k++) {  in epia_write_block()
207                         d = buf[k];  in epia_write_block()
217                 for (k=0;k<count;k++) w4(buf[k]);  in epia_write_block()
223                 for (k=0;k<count/2;k++) w4w(((u16 *)buf)[k]);  in epia_write_block()
229                 for (k=0;k<count/4;k++) w4l(((u32 *)buf)[k]);  in epia_write_block()
239 {       int     j, k, f;  in epia_test_proto()  local
245             for (k=0;k<256;k++) {  in epia_test_proto()
246                 WR(2,k^0xaa);  in epia_test_proto()
247                 WR(3,k^0x55);  in epia_test_proto()
248                 if (RR(2) != (k^0xaa)) e[j]++;  in epia_test_proto()
256         WR(0x84,8);  in epia_test_proto()
258         for (k=0;k<256;k++) {  in epia_test_proto()
259             if ((scratch[2*k] & 0xff) != ((k+1) & 0xff)) f++;  in epia_test_proto()
260             if ((scratch[2*k+1] & 0xff) != ((-2-k) & 0xff)) f++;  in epia_test_proto()
277 {       char    *mode_string[6] = {"4-bit","5/3","8-bit",  in epia_log_adapter()
278 				   "EPP-8","EPP-16","EPP-32"};  in epia_log_adapter()