root/include/asm-sparc/floppy.h

/* */

INCLUDED FROM

DEFINITIONS

1. sun_82072_fd_inb
2. sun_82072_fd_outb
3. sun_82077_fd_inb
4. sun_82077_fd_outb
5. virtual_dma_init
6. sun_fd_disable_dma
7. sun_fd_set_dma_mode
8. sun_fd_set_dma_addr
9. sun_fd_set_dma_count
10. sun_fd_enable_dma
11. sun_fd_request_irq
12. sun_floppy_init
13. sparc_eject

   1 /* asm-sparc/floppy.h: Sparc specific parts of the Floppy driver.
   2  *
   3  * Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
   4  */
   5 
   6 #ifndef __ASM_SPARC_FLOPPY_H
   7 #define __ASM_SPARC_FLOPPY_H
   8 
   9 #include <asm/page.h>
  10 #include <asm/pgtable.h>
  11 #include <asm/system.h>
  12 #include <asm/idprom.h>
  13 #include <asm/machines.h>
  14 #include <asm/oplib.h>
  15 #include <asm/auxio.h>
  16 #include <asm/irq.h>
  17 
  18 /* References:
  19  * 1) Netbsd Sun floppy driver.
  20  * 2) NCR 82077 controller manual
  21  * 3) Intel 82077 controller manual
  22  */
  23 struct sun_flpy_controller {
  24         volatile unsigned char status_82072;  /* Main Status reg. */
  25 #define dcr_82072              status_82072   /* Digital Control reg. */
  26 #define status1_82077          status_82072   /* Auxiliary Status reg. 1 */
  27 
  28         volatile unsigned char data_82072;    /* Data fifo. */
  29 #define status2_82077          data_82072     /* Auxiliary Status reg. 2 */
  30 
  31         volatile unsigned char dor_82077;     /* Digital Output reg. */
  32         volatile unsigned char tapectl_82077; /* What the? Tape control reg? */
  33 
  34         volatile unsigned char status_82077;  /* Main Status Register. */
  35 #define drs_82077              status_82077   /* Digital Rate Select reg. */
  36 
  37         volatile unsigned char data_82077;    /* Data fifo. */
  38         volatile unsigned char ___unused;
  39         volatile unsigned char dir_82077;     /* Digital Input reg. */
  40 #define dcr_82077              dir_82077      /* Config Control reg. */
  41 };
  42 
  43 /* You'll only ever find one controller on a SparcStation anyways. */
  44 static struct sun_flpy_controller *sun_fdc = NULL;
  45 volatile unsigned char *fdc_status;
  46 
  47 struct sun_floppy_ops {
  48         unsigned char (*fd_inb)(int port);
  49         void (*fd_outb)(unsigned char value, int port);
  50 };
  51 
  52 static struct sun_floppy_ops sun_fdops;
  53 
  54 #define fd_inb(port)              sun_fdops.fd_inb(port)
  55 #define fd_outb(value,port)       sun_fdops.fd_outb(value,port)
  56 #define fd_enable_dma()           sun_fd_enable_dma()
  57 #define fd_disable_dma()          sun_fd_disable_dma()
  58 #define fd_request_dma()          (0) /* nothing... */
  59 #define fd_free_dma()             /* nothing... */
  60 #define fd_clear_dma_ff()         /* nothing... */
  61 #define fd_set_dma_mode(mode)     sun_fd_set_dma_mode(mode)
  62 #define fd_set_dma_addr(addr)     sun_fd_set_dma_addr(addr)
  63 #define fd_set_dma_count(count)   sun_fd_set_dma_count(count)
  64 #define fd_enable_irq()           /* nothing... */
  65 #define fd_disable_irq()          /* nothing... */
  66 #define fd_cacheflush(addr, size) /* nothing... */
  67 #define fd_request_irq()          sun_fd_request_irq()
  68 #define fd_free_irq()             /* nothing... */
  69 
  70 #define FLOPPY_MOTOR_MASK         0x10
  71 
  72 /* It's all the same... */
  73 #define virt_to_bus(x)            (x)
  74 #define bus_to_virt(x)            (x)
  75 
  76 /* XXX This isn't really correct. XXX */
  77 #define get_dma_residue(x)        (0)
  78 
  79 #define FLOPPY0_TYPE  4
  80 #define FLOPPY1_TYPE  0
  81 
  82 /* Super paranoid... */
  83 #undef HAVE_DISABLE_HLT
  84 
  85 /* Here is where we catch the floppy driver trying to initialize,
  86  * therefore this is where we call the PROM device tree probing
  87  * routine etc. on the Sparc.
  88  */
  89 #define FDC1                      sun_floppy_init()
  90 
  91 static int FDC2=-1;
  92 
  93 #define N_FDC    1
  94 #define N_DRIVE  8
  95 
  96 /* No 64k boundary crossing problems on the Sparc. */
  97 #define CROSS_64KB(a,s) (0)
  98 
  99 /* Routines unique to each controller type on a Sun. */
 100 static unsigned char sun_82072_fd_inb(int port)
     /*  */
 101 {
 102         switch(port & 7) {
 103         default:
 104                 printk("floppy: Asked to read unknown port %d\n", port);
 105                 panic("floppy: Port bolixed.");
 106         case 4: /* FD_STATUS */
 107                 return sun_fdc->status_82072 & ~STATUS_DMA;
 108         case 5: /* FD_DATA */
 109                 return sun_fdc->data_82072;
 110         case 7: /* FD_DIR */
 111                 /* Always return 0, the disk never changes
 112                  * without the kernel explicitly doing so.
 113                  */
 114                 return 0;
 115         };
 116         panic("sun_82072_fd_inb: How did I get here?");
 117 }
 118 
 119 static void sun_82072_fd_outb(unsigned char value, int port)
     /*  */
 120 {
 121         switch(port & 7) {
 122         default:
 123                 printk("floppy: Asked to write to unknown port %d\n", port);
 124                 panic("floppy: Port bolixed.");
 125         case 2: /* FD_DOR */
 126                 /* Oh geese, 82072 on the Sun has no DOR register,
 127                  * the functionality is implemented via the AUXIO
 128                  * I/O register.  So we must emulate the behavior.
 129                  *
 130                  * ASSUMPTIONS:  There will only ever be one floppy
 131                  *               drive attached to a Sun controller
 132                  *               and it will be at drive zero.
 133                  */
 134                 {
 135                         unsigned bits = 0;
 136                         if (value & 0x10) bits |= AUXIO_FLPY_DSEL;
 137                         if ((value & 0x80) == 0) bits |= AUXIO_FLPY_EJCT;
 138                         set_auxio(bits, (~bits) & (AUXIO_FLPY_DSEL|AUXIO_FLPY_EJCT));
 139                 }
 140                 break;
 141         case 5: /* FD_DATA */
 142                 sun_fdc->data_82072 = value;
 143                 break;
 144         case 7: /* FD_DCR */
 145                 sun_fdc->dcr_82072 = value;
 146                 break;
 147         case 4: /* FD_STATUS */
 148                 sun_fdc->status_82072 = value;
 149                 break;
 150         };
 151         return;
 152 }
 153 
 154 static unsigned char sun_82077_fd_inb(int port)
     /*  */
 155 {
 156         switch(port & 7) {
 157         default:
 158                 printk("floppy: Asked to read unknown port %d\n", port);
 159                 panic("floppy: Port bolixed.");
 160         case 4: /* FD_STATUS */
 161                 return sun_fdc->status_82077 & ~STATUS_DMA;
 162         case 5: /* FD_DATA */
 163                 return sun_fdc->data_82077;
 164         case 7: /* FD_DIR */
 165                 /* Always return 0, the disk never changes
 166                  * without the kernel explicitly ejecting it.
 167                  */
 168                 return 0;
 169         };
 170         panic("sun_82072_fd_inb: How did I get here?");
 171 }
 172 
 173 static void sun_82077_fd_outb(unsigned char value, int port)
     /*  */
 174 {
 175         switch(port & 7) {
 176         default:
 177                 printk("floppy: Asked to write to unknown port %d\n", port);
 178                 panic("floppy: Port bolixed.");
 179         case 2: /* FD_DOR */
 180                 /* Happily, the 82077 has a real DOR register. */
 181                 sun_fdc->dor_82077 = value;
 182                 break;
 183         case 5: /* FD_DATA */
 184                 sun_fdc->data_82077 = value;
 185                 break;
 186         case 7: /* FD_DCR */
 187                 sun_fdc->dcr_82077 = value;
 188                 break;
 189         case 4: /* FD_STATUS */
 190                 sun_fdc->status_82077 = value;
 191                 break;
 192         };
 193         return;
 194 }
 195 
 196 /* For pseudo-dma (Sun floppy drives have no real DMA available to
 197  * them so we must eat the data fifo bytes directly ourselves) we have
 198  * three state variables.  doing_pdma tells our inline low-level
 199  * assembly floppy interrupt entry point whether it should sit and eat
 200  * bytes from the fifo or just transfer control up to the higher level
 201  * floppy interrupt c-code.  I tried very hard but I could not get the
 202  * pseudo-dma to work in c-code without getting many overruns and
 203  * underruns.  If non-zero, doing_pdma encodes the direction of
 204  * the transfer for debugging.  1=read 2=write
 205  */
 206 char *pdma_vaddr;
 207 unsigned long pdma_size;
 208 volatile int doing_pdma = 0;
 209 
 210 /* This is software state */
 211 char *pdma_base = 0;
 212 unsigned long pdma_areasize;
 213 
 214 /* Common routines to all controller types on the Sparc. */
 215 static inline void virtual_dma_init(void)
     /*  */
 216 {
 217         /* nothing... */
 218 }
 219 
 220 static inline void sun_fd_disable_dma(void)
     /*  */
 221 {
 222         doing_pdma = 0;
 223         if (pdma_base) {
 224                 mmu_unlockarea(pdma_base, pdma_areasize);
 225                 pdma_base = 0;
 226         }
 227 }
 228 
 229 static inline void sun_fd_set_dma_mode(int mode)
     /*  */
 230 {
 231         switch(mode) {
 232         case DMA_MODE_READ:
 233                 doing_pdma = 1;
 234                 break;
 235         case DMA_MODE_WRITE:
 236                 doing_pdma = 2;
 237                 break;
 238         default:
 239                 printk("Unknown dma mode %d\n", mode);
 240                 panic("floppy: Giving up...");
 241         }
 242 }
 243 
 244 static inline void sun_fd_set_dma_addr(char *buffer)
     /*  */
 245 {
 246         pdma_vaddr = buffer;
 247 }
 248 
 249 static inline void sun_fd_set_dma_count(int length)
     /*  */
 250 {
 251         pdma_size = length;
 252 }
 253 
 254 static inline void sun_fd_enable_dma(void)
     /*  */
 255 {
 256         pdma_vaddr = mmu_lockarea(pdma_vaddr, pdma_size);
 257         pdma_base = pdma_vaddr;
 258         pdma_areasize = pdma_size;
 259 }
 260 
 261 /* Our low-level entry point in arch/sparc/kernel/entry.S */
 262 extern void floppy_hardint(int irq, void *unused, struct pt_regs *regs);
 263 
 264 static int sun_fd_request_irq(void)
     /*  */
 265 {
 266         static int once = 0;
 267         int error;
 268 
 269         if(!once) {
 270                 once = 1;
 271                 error = request_fast_irq(FLOPPY_IRQ, floppy_hardint, SA_INTERRUPT, "floppy");
 272                 return ((error == 0) ? 0 : -1);
 273         } else return 0;
 274 }
 275 
 276 static struct linux_prom_registers fd_regs[2];
 277 
 278 static int sun_floppy_init(void)
     /*  */
 279 {
 280         char state[128];
 281         int tnode, fd_node, num_regs;
 282 
 283         FLOPPY_IRQ = 11;
 284         /* Forget it if we aren't on a machine that could possibly
 285          * ever have a floppy drive.
 286          */
 287         if((sparc_cpu_model != sun4c && sparc_cpu_model != sun4m) ||
 288            ((idprom->id_machtype == (SM_SUN4C | SM_4C_SLC)) ||
 289             (idprom->id_machtype == (SM_SUN4C | SM_4C_ELC)))) {
 290                 /* We certainly don't have a floppy controller. */
 291                 goto no_sun_fdc;
 292         }
 293         /* Well, try and find one. */
 294         tnode = prom_getchild(prom_root_node);
 295         fd_node = prom_searchsiblings(tnode, "obio");
 296         if(fd_node != 0) {
 297                 tnode = prom_getchild(fd_node);
 298                 fd_node = prom_searchsiblings(tnode, "SUNW,fdtwo");
 299         } else {
 300                 fd_node = prom_searchsiblings(tnode, "fd");
 301         }
 302         if(fd_node == 0) {
 303                 goto no_sun_fdc;
 304         }
 305 
 306         /* The sun4m lets us know if the controller is actually usable. */
 307         if(sparc_cpu_model == sun4m) {
 308                 prom_getproperty(fd_node, "status", state, sizeof(state));
 309                 if(!strcmp(state, "disabled")) {
 310                         goto no_sun_fdc;
 311                 }
 312         }
 313         num_regs = prom_getproperty(fd_node, "reg", (char *) fd_regs, sizeof(fd_regs));
 314         num_regs = (num_regs / sizeof(fd_regs[0]));
 315         prom_apply_obio_ranges(fd_regs, num_regs);
 316         sun_fdc = (struct sun_flpy_controller *) sparc_alloc_io(fd_regs[0].phys_addr,
 317                                                                 0x0,
 318                                                                 fd_regs[0].reg_size,
 319                                                                 "floppy",
 320                                                                 fd_regs[0].which_io,
 321                                                                 0x0);
 322         /* Last minute sanity check... */
 323         if(sun_fdc->status_82072 == 0xff) {
 324                 sun_fdc = NULL;
 325                 goto no_sun_fdc;
 326         }
 327 
 328         if(sparc_cpu_model == sun4c) {
 329                 sun_fdops.fd_inb = sun_82072_fd_inb;
 330                 sun_fdops.fd_outb = sun_82072_fd_outb;
 331                 fdc_status = &sun_fdc->status_82072;
 332                 /* printk("AUXIO @0x%p\n", auxio_register); */ /* P3 */
 333         } else {
 334                 sun_fdops.fd_inb = sun_82077_fd_inb;
 335                 sun_fdops.fd_outb = sun_82077_fd_outb;
 336                 fdc_status = &sun_fdc->status_82077;
 337                 /* printk("DOR @0x%p\n", &sun_fdc->dor_82077); */ /* P3 */
 338         }
 339 
 340         /* Success... */
 341         return (int) sun_fdc;
 342 
 343 no_sun_fdc:
 344         return -1;
 345 }
 346 
 347 static int sparc_eject(void)
     /*  */
 348 {
 349         set_dor(0, ~0, 0x90);
 350         udelay(500);
 351         set_dor(0, ~0x90, 0);
 352         udelay(500);
 353         return 0;
 354 }
 355 
 356 #define fd_eject(drive) sparc_eject()
 357 
 358 #endif /* !(__ASM_SPARC_FLOPPY_H) */

/* */