arch/sparc/include/asm/floppy_32.h

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