drivers/block/paride/friq.c

   1 /*
   2         friq.c  (c) 1998    Grant R. Guenther <grant@torque.net>
   3                             Under the terms of the GNU General Public License
   4
   5         friq.c is a low-level protocol driver for the Freecom "IQ"
   6         parallel port IDE adapter.   Early versions of this adapter
   7         use the 'frpw' protocol.
   8
   9         Freecom uses this adapter in a battery powered external
  10         CD-ROM drive.  It is also used in LS-120 drives by
  11         Maxell and Panasonic, and other devices.
  12
  13         The battery powered drive requires software support to
  14         control the power to the drive.  This module enables the
  15         drive power when the high level driver (pcd) is loaded
  16         and disables it when the module is unloaded.  Note, if
  17         the friq module is built in to the kernel, the power
  18         will never be switched off, so other means should be
  19         used to conserve battery power.
  20
  21 */
  22
  23 /* Changes:
  24
  25         1.01    GRG 1998.12.20   Added support for soft power switch
  26 */
  27
  28 #define FRIQ_VERSION    "1.01"
  29
  30 #include <linux/module.h>
  31 #include <linux/init.h>
  32 #include <linux/delay.h>
  33 #include <linux/kernel.h>
  34 #include <linux/types.h>
  35 #include <linux/wait.h>
  36 #include <asm/io.h>
  37
  38 #include "paride.h"
  39
  40 #define CMD(x)          w2(4);w0(0xff);w0(0xff);w0(0x73);w0(0x73);\
  41                         w0(0xc9);w0(0xc9);w0(0x26);w0(0x26);w0(x);w0(x);
  42
  43 #define j44(l,h)        (((l>>4)&0x0f)|(h&0xf0))
  44
  45 /* cont = 0 - access the IDE register file
  46    cont = 1 - access the IDE command set
  47 */
  48
  49 static int  cont_map[2] = { 0x08, 0x10 };
  50
  51 static int friq_read_regr( PIA *pi, int cont, int regr )
  52
  53 {       int     h,l,r;
  54
  55         r = regr + cont_map[cont];
  56
  57         CMD(r);
  58         w2(6); l = r1();
  59         w2(4); h = r1();
  60         w2(4);
  61
  62         return j44(l,h);
  63
  64 }
  65
  66 static void friq_write_regr( PIA *pi, int cont, int regr, int val)
  67
  68 {       int r;
  69
  70         r = regr + cont_map[cont];
  71
  72         CMD(r);
  73         w0(val);
  74         w2(5);w2(7);w2(5);w2(4);
  75 }
  76
  77 static void friq_read_block_int( PIA *pi, char * buf, int count, int regr )
  78
  79 {       int     h, l, k, ph;
  80
  81         switch(pi->mode) {
  82
  83         case 0: CMD(regr);
  84                 for (k=0;k<count;k++) {
  85                         w2(6); l = r1();
  86                         w2(4); h = r1();
  87                         buf[k] = j44(l,h);
  88                 }
  89                 w2(4);
  90                 break;
  91
  92         case 1: ph = 2;
  93                 CMD(regr+0xc0);
  94                 w0(0xff);
  95                 for (k=0;k<count;k++) {
  96                         w2(0xa4 + ph);
  97                         buf[k] = r0();
  98                         ph = 2 - ph;
  99                 }
 100                 w2(0xac); w2(0xa4); w2(4);
 101                 break;
 102
 103         case 2: CMD(regr+0x80);
 104                 for (k=0;k<count-2;k++) buf[k] = r4();
 105                 w2(0xac); w2(0xa4);
 106                 buf[count-2] = r4();
 107                 buf[count-1] = r4();
 108                 w2(4);
 109                 break;
 110
 111         case 3: CMD(regr+0x80);
 112                 for (k=0;k<(count/2)-1;k++) ((u16 *)buf)[k] = r4w();
 113                 w2(0xac); w2(0xa4);
 114                 buf[count-2] = r4();
 115                 buf[count-1] = r4();
 116                 w2(4);
 117                 break;
 118
 119         case 4: CMD(regr+0x80);
 120                 for (k=0;k<(count/4)-1;k++) ((u32 *)buf)[k] = r4l();
 121                 buf[count-4] = r4();
 122                 buf[count-3] = r4();
 123                 w2(0xac); w2(0xa4);
 124                 buf[count-2] = r4();
 125                 buf[count-1] = r4();
 126                 w2(4);
 127                 break;
 128
 129         }
 130 }
 131
 132 static void friq_read_block( PIA *pi, char * buf, int count)
 133
 134 {       friq_read_block_int(pi,buf,count,0x08);
 135 }
 136
 137 static void friq_write_block( PIA *pi, char * buf, int count )
 138
 139 {       int     k;
 140
 141         switch(pi->mode) {
 142
 143         case 0:
 144         case 1: CMD(8); w2(5);
 145                 for (k=0;k<count;k++) {
 146                         w0(buf[k]);
 147                         w2(7);w2(5);
 148                 }
 149                 w2(4);
 150                 break;
 151
 152         case 2: CMD(0xc8); w2(5);
 153                 for (k=0;k<count;k++) w4(buf[k]);
 154                 w2(4);
 155                 break;
 156
 157         case 3: CMD(0xc8); w2(5);
 158                 for (k=0;k<count/2;k++) w4w(((u16 *)buf)[k]);
 159                 w2(4);
 160                 break;
 161
 162         case 4: CMD(0xc8); w2(5);
 163                 for (k=0;k<count/4;k++) w4l(((u32 *)buf)[k]);
 164                 w2(4);
 165                 break;
 166         }
 167 }
 168
 169 static void friq_connect ( PIA *pi  )
 170
 171 {       pi->saved_r0 = r0();
 172         pi->saved_r2 = r2();
 173         w2(4);
 174 }
 175
 176 static void friq_disconnect ( PIA *pi )
 177
 178 {       CMD(0x20);
 179         w0(pi->saved_r0);
 180         w2(pi->saved_r2);
 181 }
 182
 183 static int friq_test_proto( PIA *pi, char * scratch, int verbose )
 184
 185 {       int     j, k, r;
 186         int     e[2] = {0,0};
 187
 188         pi->saved_r0 = r0();
 189         w0(0xff); udelay(20); CMD(0x3d); /* turn the power on */
 190         udelay(500);
 191         w0(pi->saved_r0);
 192
 193         friq_connect(pi);
 194         for (j=0;j<2;j++) {
 195                 friq_write_regr(pi,0,6,0xa0+j*0x10);
 196                 for (k=0;k<256;k++) {
 197                         friq_write_regr(pi,0,2,k^0xaa);
 198                         friq_write_regr(pi,0,3,k^0x55);
 199                         if (friq_read_regr(pi,0,2) != (k^0xaa)) e[j]++;
 200                         }
 201                 }
 202         friq_disconnect(pi);
 203
 204         friq_connect(pi);
 205         friq_read_block_int(pi,scratch,512,0x10);
 206         r = 0;
 207         for (k=0;k<128;k++) if (scratch[k] != k) r++;
 208         friq_disconnect(pi);
 209
 210         if (verbose)  {
 211             printk("%s: friq: port 0x%x, mode %d, test=(%d,%d,%d)\n",
 212                    pi->device,pi->port,pi->mode,e[0],e[1],r);
 213         }
 214
 215         return (r || (e[0] && e[1]));
 216 }
 217
 218
 219 static void friq_log_adapter( PIA *pi, char * scratch, int verbose )
 220
 221 {       char    *mode_string[6] = {"4-bit","8-bit",
 222                                    "EPP-8","EPP-16","EPP-32"};
 223
 224         printk("%s: friq %s, Freecom IQ ASIC-2 adapter at 0x%x, ", pi->device,
 225                 FRIQ_VERSION,pi->port);
 226         printk("mode %d (%s), delay %d\n",pi->mode,
 227                 mode_string[pi->mode],pi->delay);
 228
 229         pi->private = 1;
 230         friq_connect(pi);
 231         CMD(0x9e);              /* disable sleep timer */
 232         friq_disconnect(pi);
 233
 234 }
 235
 236 static void friq_release_proto( PIA *pi)
 237 {
 238         if (pi->private) {              /* turn off the power */
 239                 friq_connect(pi);
 240                 CMD(0x1d); CMD(0x1e);
 241                 friq_disconnect(pi);
 242                 pi->private = 0;
 243         }
 244 }
 245
 246 static struct pi_protocol friq = {
 247         .owner          = THIS_MODULE,
 248         .name           = "friq",
 249         .max_mode       = 5,
 250         .epp_first      = 2,
 251         .default_delay  = 1,
 252         .max_units      = 1,
 253         .write_regr     = friq_write_regr,
 254         .read_regr      = friq_read_regr,
 255         .write_block    = friq_write_block,
 256         .read_block     = friq_read_block,
 257         .connect        = friq_connect,
 258         .disconnect     = friq_disconnect,
 259         .test_proto     = friq_test_proto,
 260         .log_adapter    = friq_log_adapter,
 261         .release_proto  = friq_release_proto,
 262 };
 263
 264 static int __init friq_init(void)
 265 {
 266         return paride_register(&friq);
 267 }
 268
 269 static void __exit friq_exit(void)
 270 {
 271         paride_unregister(&friq);
 272 }
 273
 274 MODULE_LICENSE("GPL");
 275 module_init(friq_init)
 276 module_exit(friq_exit)