31 #define j44(a,b)		(((a>>4)&0x0f)+(b&0xf0))
32 #define j53(a,b)		(((a>>3)&0x1f)+((b<<4)&0xe0))
57 	case 2:	w0(0x60+r); w2(1); w0(val); w2(4);  in epat_write_regr()
61 	case 4:  in epat_write_regr()
77 		a = r1(); w2(4); b = r1();  in epat_read_regr()
80 	case 1: w0(0x40+r); w2(1); w2(4);  in epat_read_regr()
85 		a = r0(); w2(4);  in epat_read_regr()
89 	case 4:  in epat_read_regr()
90 	case 5: w3(r); w2(0x24); a = r4(); w2(4);  in epat_read_regr()
99 {	int  k, ph, a, b;  in epat_read_block()  local
105 		for(k=0;k<count;k++) {  in epat_read_block()
106 			if (k == count-1) w0(0xfd);  in epat_read_block()
109 			  else { w2(4+ph); b = r1(); }  in epat_read_block()
110 			buf[k] = j44(a,b);  in epat_read_block()
113 		w0(0); w2(4);  in epat_read_block()
118 		for(k=0;k<count;k++) {  in epat_read_block()
119 			if (k == count-1) w0(0xfd);   in epat_read_block()
120 			w2(4+ph);  in epat_read_block()
122 			buf[k] = j53(a,b);  in epat_read_block()
125 		w0(0); w2(4);  in epat_read_block()
130 		for(k=0;k<count-1;k++) {  in epat_read_block()
132 			buf[k] = r0();  in epat_read_block()
136 		w2(0x25); w2(4);  in epat_read_block()
140 		for(k=0;k<count-1;k++) buf[k] = r4();  in epat_read_block()
141 		w2(4); w3(0xa0); w2(0x24); buf[count-1] = r4();  in epat_read_block()
142 		w2(4);  in epat_read_block()
145 	case 4: w3(0x80); w2(0x24);  in epat_read_block()
146 		for(k=0;k<(count/2)-1;k++) ((u16 *)buf)[k] = r4w();  in epat_read_block()
148 		w2(4); w3(0xa0); w2(0x24); buf[count-1] = r4();  in epat_read_block()
149 		w2(4);  in epat_read_block()
153 		for(k=0;k<(count/4)-1;k++) ((u32 *)buf)[k] = r4l();  in epat_read_block()
154 		for(k=count-4;k<count-1;k++) buf[k] = r4();  in epat_read_block()
155 		w2(4); w3(0xa0); w2(0x24); buf[count-1] = r4();  in epat_read_block()
156 		w2(4);  in epat_read_block()
164 {	int ph, k;  in epat_write_block()  local
172 		for(k=0;k<count;k++) {  in epat_write_block()
173 		  	w0(buf[k]);  in epat_write_block()
174 			w2(4+ph);  in epat_write_block()
177 		w2(7); w2(4);  in epat_write_block()
181 		for(k=0;k<count;k++) w4(buf[k]);  in epat_write_block()
182 		w2(4);  in epat_write_block()
185 	case 4: w3(0xc0);   in epat_write_block()
186 		for(k=0;k<(count/2);k++) w4w(((u16 *)buf)[k]);  in epat_write_block()
187 		w2(4);  in epat_write_block()
191 		for(k=0;k<(count/4);k++) w4l(((u32 *)buf)[k]);  in epat_write_block()
192 		w2(4);  in epat_write_block()
210 #define CPP(x) 	w2(4);w0(0x22);w0(0xaa);w0(0x55);w0(0);w0(0xff);\
211                 w0(0x87);w0(0x78);w0(x);w2(4);w2(5);w2(4);w0(0xff);
223 		w0(0);w2(1);w2(4);  in epat_connect()
225 		WR(0xe,0xf);WR(0xf,4);  in epat_connect()
226 		/* WR(0xe,0xa);WR(0xf,4); */  in epat_connect()
233         w0(0);w2(1);w2(4); /* Idle into SPP */  in epat_connect()
235           w0(0);w2(1);w2(4);w2(0xc);  in epat_connect()
237           w0(0x40);w2(6);w2(7);w2(4);w2(0xc);w2(4);  in epat_connect()
253 {       int     k, j, f, cc;  in epat_test_proto()  local
263             for (k=0;k<256;k++) {  in epat_test_proto()
264                 WRi(2,k^0xaa);  in epat_test_proto()
265                 WRi(3,k^0x55);  in epat_test_proto()
266                 if (RRi(2) != (k^0xaa)) e[j]++;  in epat_test_proto()
276         for (k=0;k<256;k++) {  in epat_test_proto()
277             if ((scratch[2*k] & 0xff) != k) f++;  in epat_test_proto()
278             if ((scratch[2*k+1] & 0xff) != (0xff-k)) f++;  in epat_test_proto()
294 		   {"4-bit","5/3","8-bit","EPP-8","EPP-16","EPP-32"};  in epat_log_adapter()