summaryrefslogtreecommitdiff
path: root/drivers/block/paride/bpck.c
diff options
context:
space:
mode:
Diffstat (limited to 'drivers/block/paride/bpck.c')
-rw-r--r--drivers/block/paride/bpck.c477
1 files changed, 0 insertions, 477 deletions
diff --git a/drivers/block/paride/bpck.c b/drivers/block/paride/bpck.c
deleted file mode 100644
index d880a9465e9b..000000000000
--- a/drivers/block/paride/bpck.c
+++ /dev/null
@@ -1,477 +0,0 @@
-/*
- bpck.c (c) 1996-8 Grant R. Guenther <grant@torque.net>
- Under the terms of the GNU General Public License.
-
- bpck.c is a low-level protocol driver for the MicroSolutions
- "backpack" parallel port IDE adapter.
-
-*/
-
-/* Changes:
-
- 1.01 GRG 1998.05.05 init_proto, release_proto, pi->delay
- 1.02 GRG 1998.08.15 default pi->delay returned to 4
-
-*/
-
-#define BPCK_VERSION "1.02"
-
-#include <linux/module.h>
-#include <linux/init.h>
-#include <linux/delay.h>
-#include <linux/kernel.h>
-#include <linux/types.h>
-#include <linux/wait.h>
-#include <asm/io.h>
-
-#include "paride.h"
-
-#undef r2
-#undef w2
-#undef PC
-
-#define PC pi->private
-#define r2() (PC=(in_p(2) & 0xff))
-#define w2(byte) {out_p(2,byte); PC = byte;}
-#define t2(pat) {PC ^= pat; out_p(2,PC);}
-#define e2() {PC &= 0xfe; out_p(2,PC);}
-#define o2() {PC |= 1; out_p(2,PC);}
-
-#define j44(l,h) (((l>>3)&0x7)|((l>>4)&0x8)|((h<<1)&0x70)|(h&0x80))
-
-/* cont = 0 - access the IDE register file
- cont = 1 - access the IDE command set
- cont = 2 - use internal bpck register addressing
-*/
-
-static int cont_map[3] = { 0x40, 0x48, 0 };
-
-static int bpck_read_regr( PIA *pi, int cont, int regr )
-
-{ int r, l, h;
-
- r = regr + cont_map[cont];
-
- switch (pi->mode) {
-
- case 0: w0(r & 0xf); w0(r); t2(2); t2(4);
- l = r1();
- t2(4);
- h = r1();
- return j44(l,h);
-
- case 1: w0(r & 0xf); w0(r); t2(2);
- e2(); t2(0x20);
- t2(4); h = r0();
- t2(1); t2(0x20);
- return h;
-
- case 2:
- case 3:
- case 4: w0(r); w2(9); w2(0); w2(0x20);
- h = r4();
- w2(0);
- return h;
-
- }
- return -1;
-}
-
-static void bpck_write_regr( PIA *pi, int cont, int regr, int val )
-
-{ int r;
-
- r = regr + cont_map[cont];
-
- switch (pi->mode) {
-
- case 0:
- case 1: w0(r);
- t2(2);
- w0(val);
- o2(); t2(4); t2(1);
- break;
-
- case 2:
- case 3:
- case 4: w0(r); w2(9); w2(0);
- w0(val); w2(1); w2(3); w2(0);
- break;
-
- }
-}
-
-/* These macros access the bpck registers in native addressing */
-
-#define WR(r,v) bpck_write_regr(pi,2,r,v)
-#define RR(r) (bpck_read_regr(pi,2,r))
-
-static void bpck_write_block( PIA *pi, char * buf, int count )
-
-{ int i;
-
- switch (pi->mode) {
-
- case 0: WR(4,0x40);
- w0(0x40); t2(2); t2(1);
- for (i=0;i<count;i++) { w0(buf[i]); t2(4); }
- WR(4,0);
- break;
-
- case 1: WR(4,0x50);
- w0(0x40); t2(2); t2(1);
- for (i=0;i<count;i++) { w0(buf[i]); t2(4); }
- WR(4,0x10);
- break;
-
- case 2: WR(4,0x48);
- w0(0x40); w2(9); w2(0); w2(1);
- for (i=0;i<count;i++) w4(buf[i]);
- w2(0);
- WR(4,8);
- break;
-
- case 3: WR(4,0x48);
- w0(0x40); w2(9); w2(0); w2(1);
- for (i=0;i<count/2;i++) w4w(((u16 *)buf)[i]);
- w2(0);
- WR(4,8);
- break;
-
- case 4: WR(4,0x48);
- w0(0x40); w2(9); w2(0); w2(1);
- for (i=0;i<count/4;i++) w4l(((u32 *)buf)[i]);
- w2(0);
- WR(4,8);
- break;
- }
-}
-
-static void bpck_read_block( PIA *pi, char * buf, int count )
-
-{ int i, l, h;
-
- switch (pi->mode) {
-
- case 0: WR(4,0x40);
- w0(0x40); t2(2);
- for (i=0;i<count;i++) {
- t2(4); l = r1();
- t2(4); h = r1();
- buf[i] = j44(l,h);
- }
- WR(4,0);
- break;
-
- case 1: WR(4,0x50);
- w0(0x40); t2(2); t2(0x20);
- for(i=0;i<count;i++) { t2(4); buf[i] = r0(); }
- t2(1); t2(0x20);
- WR(4,0x10);
- break;
-
- case 2: WR(4,0x48);
- w0(0x40); w2(9); w2(0); w2(0x20);
- for (i=0;i<count;i++) buf[i] = r4();
- w2(0);
- WR(4,8);
- break;
-
- case 3: WR(4,0x48);
- w0(0x40); w2(9); w2(0); w2(0x20);
- for (i=0;i<count/2;i++) ((u16 *)buf)[i] = r4w();
- w2(0);
- WR(4,8);
- break;
-
- case 4: WR(4,0x48);
- w0(0x40); w2(9); w2(0); w2(0x20);
- for (i=0;i<count/4;i++) ((u32 *)buf)[i] = r4l();
- w2(0);
- WR(4,8);
- break;
-
- }
-}
-
-static int bpck_probe_unit ( PIA *pi )
-
-{ int o1, o0, f7, id;
- int t, s;
-
- id = pi->unit;
- s = 0;
- w2(4); w2(0xe); r2(); t2(2);
- o1 = r1()&0xf8;
- o0 = r0();
- w0(255-id); w2(4); w0(id);
- t2(8); t2(8); t2(8);
- t2(2); t = r1()&0xf8;
- f7 = ((id % 8) == 7);
- if ((f7) || (t != o1)) { t2(2); s = r1()&0xf8; }
- if ((t == o1) && ((!f7) || (s == o1))) {
- w2(0x4c); w0(o0);
- return 0;
- }
- t2(8); w0(0); t2(2); w2(0x4c); w0(o0);
- return 1;
-}
-
-static void bpck_connect ( PIA *pi )
-
-{ pi->saved_r0 = r0();
- w0(0xff-pi->unit); w2(4); w0(pi->unit);
- t2(8); t2(8); t2(8);
- t2(2); t2(2);
-
- switch (pi->mode) {
-
- case 0: t2(8); WR(4,0);
- break;
-
- case 1: t2(8); WR(4,0x10);
- break;
-
- case 2:
- case 3:
- case 4: w2(0); WR(4,8);
- break;
-
- }
-
- WR(5,8);
-
- if (pi->devtype == PI_PCD) {
- WR(0x46,0x10); /* fiddle with ESS logic ??? */
- WR(0x4c,0x38);
- WR(0x4d,0x88);
- WR(0x46,0xa0);
- WR(0x41,0);
- WR(0x4e,8);
- }
-}
-
-static void bpck_disconnect ( PIA *pi )
-
-{ w0(0);
- if (pi->mode >= 2) { w2(9); w2(0); } else t2(2);
- w2(0x4c); w0(pi->saved_r0);
-}
-
-static void bpck_force_spp ( PIA *pi )
-
-/* This fakes the EPP protocol to turn off EPP ... */
-
-{ pi->saved_r0 = r0();
- w0(0xff-pi->unit); w2(4); w0(pi->unit);
- t2(8); t2(8); t2(8);
- t2(2); t2(2);
-
- w2(0);
- w0(4); w2(9); w2(0);
- w0(0); w2(1); w2(3); w2(0);
- w0(0); w2(9); w2(0);
- w2(0x4c); w0(pi->saved_r0);
-}
-
-#define TEST_LEN 16
-
-static int bpck_test_proto( PIA *pi, char * scratch, int verbose )
-
-{ int i, e, l, h, om;
- char buf[TEST_LEN];
-
- bpck_force_spp(pi);
-
- switch (pi->mode) {
-
- case 0: bpck_connect(pi);
- WR(0x13,0x7f);
- w0(0x13); t2(2);
- for(i=0;i<TEST_LEN;i++) {
- t2(4); l = r1();
- t2(4); h = r1();
- buf[i] = j44(l,h);
- }
- bpck_disconnect(pi);
- break;
-
- case 1: bpck_connect(pi);
- WR(0x13,0x7f);
- w0(0x13); t2(2); t2(0x20);
- for(i=0;i<TEST_LEN;i++) { t2(4); buf[i] = r0(); }
- t2(1); t2(0x20);
- bpck_disconnect(pi);
- break;
-
- case 2:
- case 3:
- case 4: om = pi->mode;
- pi->mode = 0;
- bpck_connect(pi);
- WR(7,3);
- WR(4,8);
- bpck_disconnect(pi);
-
- pi->mode = om;
- bpck_connect(pi);
- w0(0x13); w2(9); w2(1); w0(0); w2(3); w2(0); w2(0xe0);
-
- switch (pi->mode) {
- case 2: for (i=0;i<TEST_LEN;i++) buf[i] = r4();
- break;
- case 3: for (i=0;i<TEST_LEN/2;i++) ((u16 *)buf)[i] = r4w();
- break;
- case 4: for (i=0;i<TEST_LEN/4;i++) ((u32 *)buf)[i] = r4l();
- break;
- }
-
- w2(0);
- WR(7,0);
- bpck_disconnect(pi);
-
- break;
-
- }
-
- if (verbose) {
- printk("%s: bpck: 0x%x unit %d mode %d: ",
- pi->device,pi->port,pi->unit,pi->mode);
- for (i=0;i<TEST_LEN;i++) printk("%3d",buf[i]);
- printk("\n");
- }
-
- e = 0;
- for (i=0;i<TEST_LEN;i++) if (buf[i] != (i+1)) e++;
- return e;
-}
-
-static void bpck_read_eeprom ( PIA *pi, char * buf )
-
-{ int i, j, k, p, v, f, om, od;
-
- bpck_force_spp(pi);
-
- om = pi->mode; od = pi->delay;
- pi->mode = 0; pi->delay = 6;
-
- bpck_connect(pi);
-
- WR(4,0);
- for (i=0;i<64;i++) {
- WR(6,8);
- WR(6,0xc);
- p = 0x100;
- for (k=0;k<9;k++) {
- f = (((i + 0x180) & p) != 0) * 2;
- WR(6,f+0xc);
- WR(6,f+0xd);
- WR(6,f+0xc);
- p = (p >> 1);
- }
- for (j=0;j<2;j++) {
- v = 0;
- for (k=0;k<8;k++) {
- WR(6,0xc);
- WR(6,0xd);
- WR(6,0xc);
- f = RR(0);
- v = 2*v + (f == 0x84);
- }
- buf[2*i+1-j] = v;
- }
- }
- WR(6,8);
- WR(6,0);
- WR(5,8);
-
- bpck_disconnect(pi);
-
- if (om >= 2) {
- bpck_connect(pi);
- WR(7,3);
- WR(4,8);
- bpck_disconnect(pi);
- }
-
- pi->mode = om; pi->delay = od;
-}
-
-static int bpck_test_port ( PIA *pi ) /* check for 8-bit port */
-
-{ int i, r, m;
-
- w2(0x2c); i = r0(); w0(255-i); r = r0(); w0(i);
- m = -1;
- if (r == i) m = 2;
- if (r == (255-i)) m = 0;
-
- w2(0xc); i = r0(); w0(255-i); r = r0(); w0(i);
- if (r != (255-i)) m = -1;
-
- if (m == 0) { w2(6); w2(0xc); r = r0(); w0(0xaa); w0(r); w0(0xaa); }
- if (m == 2) { w2(0x26); w2(0xc); }
-
- if (m == -1) return 0;
- return 5;
-}
-
-static void bpck_log_adapter( PIA *pi, char * scratch, int verbose )
-
-{ char *mode_string[5] = { "4-bit","8-bit","EPP-8",
- "EPP-16","EPP-32" };
-
-#ifdef DUMP_EEPROM
- int i;
-#endif
-
- bpck_read_eeprom(pi,scratch);
-
-#ifdef DUMP_EEPROM
- if (verbose) {
- for(i=0;i<128;i++)
- if ((scratch[i] < ' ') || (scratch[i] > '~'))
- scratch[i] = '.';
- printk("%s: bpck EEPROM: %64.64s\n",pi->device,scratch);
- printk("%s: %64.64s\n",pi->device,&scratch[64]);
- }
-#endif
-
- printk("%s: bpck %s, backpack %8.8s unit %d",
- pi->device,BPCK_VERSION,&scratch[110],pi->unit);
- printk(" at 0x%x, mode %d (%s), delay %d\n",pi->port,
- pi->mode,mode_string[pi->mode],pi->delay);
-}
-
-static struct pi_protocol bpck = {
- .owner = THIS_MODULE,
- .name = "bpck",
- .max_mode = 5,
- .epp_first = 2,
- .default_delay = 4,
- .max_units = 255,
- .write_regr = bpck_write_regr,
- .read_regr = bpck_read_regr,
- .write_block = bpck_write_block,
- .read_block = bpck_read_block,
- .connect = bpck_connect,
- .disconnect = bpck_disconnect,
- .test_port = bpck_test_port,
- .probe_unit = bpck_probe_unit,
- .test_proto = bpck_test_proto,
- .log_adapter = bpck_log_adapter,
-};
-
-static int __init bpck_init(void)
-{
- return paride_register(&bpck);
-}
-
-static void __exit bpck_exit(void)
-{
- paride_unregister(&bpck);
-}
-
-MODULE_LICENSE("GPL");
-module_init(bpck_init)
-module_exit(bpck_exit)