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