kbic.c
上传用户:ajay2009
上传日期:2009-05-22
资源大小:495k
文件大小:7k
源码类别:

驱动编程

开发平台:

Unix_Linux

  1. /*
  2.         kbic.c    (c) 1997-8  Grant R. Guenther <grant@torque.net>
  3.                               Under the terms of the GNU General Public License.
  4.         This is a low-level driver for the KBIC-951A and KBIC-971A
  5.         parallel to IDE adapter chips from KingByte Information Systems.
  6. The chips are almost identical, however, the wakeup code 
  7. required for the 971A interferes with the correct operation of
  8.         the 951A, so this driver registers itself twice, once for
  9. each chip.
  10. */
  11. /* Changes:
  12.         1.01    GRG 1998.05.06 init_proto, release_proto
  13. */
  14. #define KBIC_VERSION      "1.01"
  15. #include <linux/module.h>
  16. #include <linux/init.h>
  17. #include <linux/delay.h>
  18. #include <linux/kernel.h>
  19. #include <linux/types.h>
  20. #include <linux/wait.h>
  21. #include <asm/io.h>
  22. #include "paride.h"
  23. #define r12w() (delay_p,inw(pi->port+1)&0xffff) 
  24. #define j44(a,b)                ((((a>>4)&0x0f)|(b&0xf0))^0x88)
  25. #define j53(w)                  (((w>>3)&0x1f)|((w>>4)&0xe0))
  26. /* cont = 0 - access the IDE register file 
  27.    cont = 1 - access the IDE command set 
  28. */
  29. static int  cont_map[2] = { 0x80, 0x40 };
  30. static int kbic_read_regr( PIA *pi, int cont, int regr )
  31. {       int     a, b, s;
  32.         s = cont_map[cont];
  33. switch (pi->mode) {
  34. case 0: w0(regr|0x18|s); w2(4); w2(6); w2(4); w2(1); w0(8);
  35.         a = r1(); w0(0x28); b = r1(); w2(4);
  36. return j44(a,b);
  37. case 1: w0(regr|0x38|s); w2(4); w2(6); w2(4); w2(5); w0(8);
  38. a = r12w(); w2(4);
  39. return j53(a);
  40. case 2: w0(regr|0x08|s); w2(4); w2(6); w2(4); w2(0xa5); w2(0xa1);
  41. a = r0(); w2(4);
  42.         return a;
  43. case 3:
  44. case 4:
  45. case 5: w0(0x20|s); w2(4); w2(6); w2(4); w3(regr);
  46. a = r4(); b = r4(); w2(4); w2(0); w2(4);
  47. return a;
  48. }
  49. return -1;
  50. }       
  51. static void  kbic_write_regr( PIA *pi, int cont, int regr, int val)
  52. {       int  s;
  53.         s = cont_map[cont];
  54.         switch (pi->mode) {
  55. case 0: 
  56.         case 1:
  57. case 2: w0(regr|0x10|s); w2(4); w2(6); w2(4); 
  58. w0(val); w2(5); w2(4);
  59. break;
  60. case 3:
  61. case 4:
  62. case 5: w0(0x20|s); w2(4); w2(6); w2(4); w3(regr);
  63. w4(val); w4(val);
  64. w2(4); w2(0); w2(4);
  65.                 break;
  66. }
  67. }
  68. static void k951_connect ( PIA *pi  )
  69. {  pi->saved_r0 = r0();
  70.         pi->saved_r2 = r2();
  71.         w2(4); 
  72. }
  73. static void k951_disconnect ( PIA *pi )
  74. {       w0(pi->saved_r0);
  75.         w2(pi->saved_r2);
  76. }
  77. #define CCP(x) w2(0xc4);w0(0xaa);w0(0x55);w0(0);w0(0xff);w0(0x87);
  78. w0(0x78);w0(x);w2(0xc5);w2(0xc4);w0(0xff);
  79. static void k971_connect ( PIA *pi  )
  80. {  pi->saved_r0 = r0();
  81.         pi->saved_r2 = r2();
  82. CCP(0x20);
  83.         w2(4); 
  84. }
  85. static void k971_disconnect ( PIA *pi )
  86. {       CCP(0x30);
  87. w0(pi->saved_r0);
  88.         w2(pi->saved_r2);
  89. }
  90. /* counts must be congruent to 0 MOD 4, but all known applications
  91.    have this property.
  92. */
  93. static void kbic_read_block( PIA *pi, char * buf, int count )
  94. {       int     k, a, b;
  95.         switch (pi->mode) {
  96.         case 0: w0(0x98); w2(4); w2(6); w2(4);
  97.                 for (k=0;k<count/2;k++) {
  98. w2(1); w0(8);    a = r1();
  99.        w0(0x28); b = r1();
  100. buf[2*k]   = j44(a,b);
  101. w2(5);           b = r1();
  102.        w0(8);    a = r1();
  103. buf[2*k+1] = j44(a,b);
  104. w2(4);
  105.                 } 
  106.                 break;
  107.         case 1: w0(0xb8); w2(4); w2(6); w2(4); 
  108.                 for (k=0;k<count/4;k++) {
  109.                         w0(0xb8); 
  110. w2(4); w2(5); 
  111.                         w0(8);    buf[4*k]   = j53(r12w());
  112. w0(0xb8); buf[4*k+1] = j53(r12w());
  113. w2(4); w2(5);
  114.           buf[4*k+3] = j53(r12w());
  115. w0(8);    buf[4*k+2] = j53(r12w());
  116.                 }
  117.                 w2(4);
  118.                 break;
  119.         case 2: w0(0x88); w2(4); w2(6); w2(4);
  120.                 for (k=0;k<count/2;k++) {
  121.                         w2(0xa0); w2(0xa1); buf[2*k] = r0();
  122.                         w2(0xa5); buf[2*k+1] = r0();
  123.                 }
  124.                 w2(4);
  125.                 break;
  126.         case 3: w0(0xa0); w2(4); w2(6); w2(4); w3(0);
  127.                 for (k=0;k<count;k++) buf[k] = r4();
  128.                 w2(4); w2(0); w2(4);
  129.                 break;
  130. case 4: w0(0xa0); w2(4); w2(6); w2(4); w3(0);
  131.                 for (k=0;k<count/2;k++) ((u16 *)buf)[k] = r4w();
  132.                 w2(4); w2(0); w2(4);
  133.                 break;
  134.         case 5: w0(0xa0); w2(4); w2(6); w2(4); w3(0);
  135.                 for (k=0;k<count/4;k++) ((u32 *)buf)[k] = r4l();
  136.                 w2(4); w2(0); w2(4);
  137.                 break;
  138.         }
  139. }
  140. static void kbic_write_block( PIA *pi, char * buf, int count )
  141. {       int     k;
  142.         switch (pi->mode) {
  143.         case 0:
  144.         case 1:
  145.         case 2: w0(0x90); w2(4); w2(6); w2(4); 
  146. for(k=0;k<count/2;k++) {
  147. w0(buf[2*k+1]); w2(0); w2(4); 
  148. w0(buf[2*k]);   w2(5); w2(4); 
  149. }
  150. break;
  151.         case 3: w0(0xa0); w2(4); w2(6); w2(4); w3(0);
  152. for(k=0;k<count/2;k++) {
  153. w4(buf[2*k+1]); 
  154.                         w4(buf[2*k]);
  155.                 }
  156. w2(4); w2(0); w2(4);
  157. break;
  158. case 4: w0(0xa0); w2(4); w2(6); w2(4); w3(0);
  159.                 for(k=0;k<count/2;k++) w4w(pi_swab16(buf,k));
  160.                 w2(4); w2(0); w2(4);
  161.                 break;
  162.         case 5: w0(0xa0); w2(4); w2(6); w2(4); w3(0);
  163.                 for(k=0;k<count/4;k++) w4l(pi_swab32(buf,k));
  164.                 w2(4); w2(0); w2(4);
  165.                 break;
  166.         }
  167. }
  168. static void kbic_log_adapter( PIA *pi, char * scratch, 
  169.       int verbose, char * chip )
  170. {       char    *mode_string[6] = {"4-bit","5/3","8-bit",
  171.    "EPP-8","EPP_16","EPP-32"};
  172.         printk("%s: kbic %s, KingByte %s at 0x%x, ",
  173.                 pi->device,KBIC_VERSION,chip,pi->port);
  174.         printk("mode %d (%s), delay %dn",pi->mode,
  175. mode_string[pi->mode],pi->delay);
  176. }
  177. static void k951_log_adapter( PIA *pi, char * scratch, int verbose )
  178. { kbic_log_adapter(pi,scratch,verbose,"KBIC-951A");
  179. }
  180. static void k971_log_adapter( PIA *pi, char * scratch, int verbose )
  181. {       kbic_log_adapter(pi,scratch,verbose,"KBIC-971A");
  182. }
  183. static struct pi_protocol k951 = {
  184. .owner = THIS_MODULE,
  185. .name = "k951",
  186. .max_mode = 6,
  187. .epp_first = 3,
  188. .default_delay = 1,
  189. .max_units = 1,
  190. .write_regr = kbic_write_regr,
  191. .read_regr = kbic_read_regr,
  192. .write_block = kbic_write_block,
  193. .read_block = kbic_read_block,
  194. .connect = k951_connect,
  195. .disconnect = k951_disconnect,
  196. .log_adapter = k951_log_adapter,
  197. };
  198. static struct pi_protocol k971 = {
  199. .owner = THIS_MODULE,
  200. .name = "k971",
  201. .max_mode = 6,
  202. .epp_first = 3,
  203. .default_delay = 1,
  204. .max_units = 1,
  205. .write_regr = kbic_write_regr,
  206. .read_regr = kbic_read_regr,
  207. .write_block = kbic_write_block,
  208. .read_block = kbic_read_block,
  209. .connect = k971_connect,
  210. .disconnect = k971_disconnect,
  211. .log_adapter = k971_log_adapter,
  212. };
  213. static int __init kbic_init(void)
  214. {
  215. return (pi_register(&k951)||pi_register(&k971))-1;
  216. }
  217. static void __exit kbic_exit(void)
  218. {
  219. pi_unregister(&k951);
  220. pi_unregister(&k971);
  221. }
  222. MODULE_LICENSE("GPL");
  223. module_init(kbic_init)
  224. module_exit(kbic_exit)