11da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds/* 21da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia.c (c) 1997-8 Grant R. Guenther <grant@torque.net> 31da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds Under the terms of the GNU General Public License. 41da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 51da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia.c is a low-level protocol driver for Shuttle Technologies 61da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds EPIA parallel to IDE adapter chip. This device is now obsolete 71da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds and has been replaced with the EPAT chip, which is supported 81da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds by epat.c, however, some devices based on EPIA are still 91da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds available. 101da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 111da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds*/ 121da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 131da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds/* Changes: 141da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 151da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1.01 GRG 1998.05.06 init_proto, release_proto 161da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1.02 GRG 1998.06.17 support older versions of EPIA 171da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 181da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds*/ 191da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 201da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#define EPIA_VERSION "1.02" 211da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 221da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <linux/module.h> 231da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <linux/init.h> 241da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <linux/delay.h> 251da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <linux/kernel.h> 261da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <linux/types.h> 271da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <linux/wait.h> 281da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include <asm/io.h> 291da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 301da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#include "paride.h" 311da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 321da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds/* mode codes: 0 nybble reads on port 1, 8-bit writes 331da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1 5/3 reads on ports 1 & 2, 8-bit writes 341da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2 8-bit reads and writes 351da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 3 8-bit EPP mode 361da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 4 16-bit EPP 371da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 5 32-bit EPP 381da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds*/ 391da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 401da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#define j44(a,b) (((a>>4)&0x0f)+(b&0xf0)) 411da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#define j53(a,b) (((a>>3)&0x1f)+((b<<4)&0xe0)) 421da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 431da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds/* cont = 0 IDE register file 441da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds cont = 1 IDE control registers 451da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds*/ 461da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 471da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic int cont_map[2] = { 0, 0x80 }; 481da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 491da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic int epia_read_regr( PIA *pi, int cont, int regr ) 501da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 511da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ int a, b, r; 521da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 531da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds regr += cont_map[cont]; 541da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 551da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds switch (pi->mode) { 561da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 571da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 0: r = regr^0x39; 581da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(r); w2(1); w2(3); w0(r); 591da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds a = r1(); w2(1); b = r1(); w2(4); 601da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds return j44(a,b); 611da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 621da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 1: r = regr^0x31; 631da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(r); w2(1); w0(r&0x37); 641da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(3); w2(5); w0(r|0xf0); 651da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds a = r1(); b = r2(); w2(4); 661da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds return j53(a,b); 671da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 681da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 2: r = regr^0x29; 691da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(r); w2(1); w2(0X21); w2(0x23); 701da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds a = r0(); w2(4); 711da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds return a; 721da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 731da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 3: 741da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 4: 751da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 5: w3(regr); w2(0x24); a = r4(); w2(4); 761da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds return a; 771da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 781da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 791da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds return -1; 801da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 811da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 821da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void epia_write_regr( PIA *pi, int cont, int regr, int val) 831da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 841da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ int r; 851da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 861da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds regr += cont_map[cont]; 871da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 881da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds switch (pi->mode) { 891da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 901da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 0: 911da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 1: 921da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 2: r = regr^0x19; 931da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(r); w2(1); w0(val); w2(3); w2(4); 941da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 951da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 961da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 3: 971da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 4: 981da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 5: r = regr^0x40; 991da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(r); w4(val); w2(4); 1001da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1011da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 1021da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 1031da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1041da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#define WR(r,v) epia_write_regr(pi,0,r,v) 1051da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds#define RR(r) (epia_read_regr(pi,0,r)) 1061da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1071da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds/* The use of register 0x84 is entirely unclear - it seems to control 1081da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds some EPP counters ... currently we know about 3 different block 1091da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds sizes: the standard 512 byte reads and writes, 12 byte writes and 1101da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2048 byte reads (the last two being used in the CDrom drivers. 1111da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds*/ 1121da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1131da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void epia_connect ( PIA *pi ) 1141da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1151da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ pi->saved_r0 = r0(); 1161da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds pi->saved_r2 = r2(); 1171da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1181da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4); w0(0xa0); w0(0x50); w0(0xc0); w0(0x30); w0(0xa0); w0(0); 1191da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(1); w2(4); 1201da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (pi->mode >= 3) { 1211da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(0xa); w2(1); w2(4); w0(0x82); w2(4); w2(0xc); w2(4); 1221da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(0x24); w2(0x26); w2(4); 1231da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 1241da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(0x86,8); 1251da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 1261da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1271da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void epia_disconnect ( PIA *pi ) 1281da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1291da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ /* WR(0x84,0x10); */ 1301da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(pi->saved_r0); 1311da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(1); w2(4); 1321da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(pi->saved_r0); 1331da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(pi->saved_r2); 1341da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 1351da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1361da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void epia_read_block( PIA *pi, char * buf, int count ) 1371da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1381da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ int k, ph, a, b; 1391da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1401da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds switch (pi->mode) { 1411da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1421da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 0: w0(0x81); w2(1); w2(3); w0(0xc1); 1431da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1; 1441da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count;k++) { 1451da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(2+ph); a = r1(); 1461da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4+ph); b = r1(); 1471da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds buf[k] = j44(a,b); 1481da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1 - ph; 1491da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 1501da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(0); w2(4); 1511da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1521da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1531da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 1: w0(0x91); w2(1); w0(0x10); w2(3); 1541da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(0x51); w2(5); w0(0xd1); 1551da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1; 1561da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count;k++) { 1571da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4+ph); 1581da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds a = r1(); b = r2(); 1591da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds buf[k] = j53(a,b); 1601da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1 - ph; 1611da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 1621da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w0(0); w2(4); 1631da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1641da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1651da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 2: w0(0x89); w2(1); w2(0x23); w2(0x21); 1661da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1; 1671da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count;k++) { 1681da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(0x24+ph); 1691da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds buf[k] = r0(); 1701da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1 - ph; 1711da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 1721da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(6); w2(4); 1731da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1741da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1751da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 3: if (count > 512) WR(0x84,3); 1761da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(0); w2(0x24); 1771da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count;k++) buf[k] = r4(); 1781da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4); WR(0x84,0); 1791da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1801da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1811da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 4: if (count > 512) WR(0x84,3); 1821da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(0); w2(0x24); 1831da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count/2;k++) ((u16 *)buf)[k] = r4w(); 1841da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4); WR(0x84,0); 1851da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1861da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1871da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 5: if (count > 512) WR(0x84,3); 1881da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(0); w2(0x24); 1891da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count/4;k++) ((u32 *)buf)[k] = r4l(); 1901da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4); WR(0x84,0); 1911da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 1921da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1931da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 1941da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 1951da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1961da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void epia_write_block( PIA *pi, char * buf, int count ) 1971da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 1981da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ int ph, k, last, d; 1991da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2001da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds switch (pi->mode) { 2011da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2021da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 0: 2031da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 1: 2041da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 2: w0(0xa1); w2(1); w2(3); w2(1); w2(5); 2051da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 0; last = 0x8000; 2061da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count;k++) { 2071da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds d = buf[k]; 2081da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (d != last) { last = d; w0(d); } 2091da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(4+ph); 2101da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds ph = 1 - ph; 2111da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 2121da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w2(7); w2(4); 2131da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 2141da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2151da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 3: if (count < 512) WR(0x84,1); 2161da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(0x40); 2171da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count;k++) w4(buf[k]); 2181da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (count < 512) WR(0x84,0); 2191da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 2201da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2211da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 4: if (count < 512) WR(0x84,1); 2221da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(0x40); 2231da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count/2;k++) w4w(((u16 *)buf)[k]); 2241da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (count < 512) WR(0x84,0); 2251da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 2261da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2271da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds case 5: if (count < 512) WR(0x84,1); 2281da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds w3(0x40); 2291da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<count/4;k++) w4l(((u32 *)buf)[k]); 2301da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (count < 512) WR(0x84,0); 2311da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds break; 2321da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2331da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 2341da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2351da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 2361da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2371da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic int epia_test_proto( PIA *pi, char * scratch, int verbose ) 2381da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2391da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ int j, k, f; 2401da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds int e[2] = {0,0}; 2411da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2421da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia_connect(pi); 2431da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (j=0;j<2;j++) { 2441da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(6,0xa0+j*0x10); 2451da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<256;k++) { 2461da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(2,k^0xaa); 2471da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(3,k^0x55); 2481da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (RR(2) != (k^0xaa)) e[j]++; 2491da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 2501da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(2,1); WR(3,1); 2511da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 2521da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia_disconnect(pi); 2531da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2541da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds f = 0; 2551da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia_connect(pi); 2561da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(0x84,8); 2571da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia_read_block(pi,scratch,512); 2581da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds for (k=0;k<256;k++) { 2591da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if ((scratch[2*k] & 0xff) != ((k+1) & 0xff)) f++; 2601da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if ((scratch[2*k+1] & 0xff) != ((-2-k) & 0xff)) f++; 2611da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 2621da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds WR(0x84,0); 2631da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds epia_disconnect(pi); 2641da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2651da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds if (verbose) { 2661da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds printk("%s: epia: port 0x%x, mode %d, test=(%d,%d,%d)\n", 2671da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds pi->device,pi->port,pi->mode,e[0],e[1],f); 2681da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds } 2691da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2701da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds return (e[0] && e[1]) || f; 2711da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2721da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 2731da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2741da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2751da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void epia_log_adapter( PIA *pi, char * scratch, int verbose ) 2761da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2771da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ char *mode_string[6] = {"4-bit","5/3","8-bit", 2781da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds "EPP-8","EPP-16","EPP-32"}; 2791da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2801da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds printk("%s: epia %s, Shuttle EPIA at 0x%x, ", 2811da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds pi->device,EPIA_VERSION,pi->port); 2821da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds printk("mode %d (%s), delay %d\n",pi->mode, 2831da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds mode_string[pi->mode],pi->delay); 2841da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2851da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 2861da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 2871da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic struct pi_protocol epia = { 2881da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .owner = THIS_MODULE, 2891da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .name = "epia", 2901da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .max_mode = 6, 2911da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .epp_first = 3, 2921da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .default_delay = 1, 2931da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .max_units = 1, 2941da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .write_regr = epia_write_regr, 2951da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .read_regr = epia_read_regr, 2961da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .write_block = epia_write_block, 2971da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .read_block = epia_read_block, 2981da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .connect = epia_connect, 2991da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .disconnect = epia_disconnect, 3001da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .test_proto = epia_test_proto, 3011da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds .log_adapter = epia_log_adapter, 3021da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds}; 3031da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 3041da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic int __init epia_init(void) 3051da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ 306b4178ab58aa81f4ed3c75c48940682fe3b45d880Alexey Dobriyan return paride_register(&epia); 3071da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 3081da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 3091da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsstatic void __exit epia_exit(void) 3101da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds{ 311f4330002d11f032559954cbff68a5cad95b6d27fAlexey Dobriyan paride_unregister(&epia); 3121da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds} 3131da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvalds 3141da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus TorvaldsMODULE_LICENSE("GPL"); 3151da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsmodule_init(epia_init) 3161da177e4c3f41524e886b7f1b8a0c1fc7321cacLinus Torvaldsmodule_exit(epia_exit) 317