Commit | Line | Data |
---|---|---|
a439fe51 | 1 | /* asm/floppy.h: Sparc specific parts of the Floppy driver. |
f5e706ad SR |
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 | ||
454eeb2d DM |
9 | #include <linux/of.h> |
10 | #include <linux/of_device.h> | |
11 | ||
f5e706ad SR |
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 | /* Our low-level entry point in arch/sparc/kernel/entry.S */ | |
285 | extern int sparc_floppy_request_irq(int irq, unsigned long flags, | |
286 | irq_handler_t irq_handler); | |
287 | ||
288 | static int sun_fd_request_irq(void) | |
289 | { | |
290 | static int once = 0; | |
291 | int error; | |
292 | ||
293 | if(!once) { | |
294 | once = 1; | |
295 | error = sparc_floppy_request_irq(FLOPPY_IRQ, | |
296 | IRQF_DISABLED, | |
297 | floppy_interrupt); | |
298 | return ((error == 0) ? 0 : -1); | |
299 | } else return 0; | |
300 | } | |
301 | ||
302 | static struct linux_prom_registers fd_regs[2]; | |
303 | ||
304 | static int sun_floppy_init(void) | |
305 | { | |
306 | char state[128]; | |
8d125562 AS |
307 | phandle tnode, fd_node; |
308 | int num_regs; | |
f5e706ad SR |
309 | struct resource r; |
310 | ||
311 | use_virtual_dma = 1; | |
312 | ||
313 | FLOPPY_IRQ = 11; | |
314 | /* Forget it if we aren't on a machine that could possibly | |
315 | * ever have a floppy drive. | |
316 | */ | |
317 | if((sparc_cpu_model != sun4c && sparc_cpu_model != sun4m) || | |
318 | ((idprom->id_machtype == (SM_SUN4C | SM_4C_SLC)) || | |
319 | (idprom->id_machtype == (SM_SUN4C | SM_4C_ELC)))) { | |
320 | /* We certainly don't have a floppy controller. */ | |
321 | goto no_sun_fdc; | |
322 | } | |
323 | /* Well, try to find one. */ | |
324 | tnode = prom_getchild(prom_root_node); | |
325 | fd_node = prom_searchsiblings(tnode, "obio"); | |
326 | if(fd_node != 0) { | |
327 | tnode = prom_getchild(fd_node); | |
328 | fd_node = prom_searchsiblings(tnode, "SUNW,fdtwo"); | |
329 | } else { | |
330 | fd_node = prom_searchsiblings(tnode, "fd"); | |
331 | } | |
332 | if(fd_node == 0) { | |
333 | goto no_sun_fdc; | |
334 | } | |
335 | ||
336 | /* The sun4m lets us know if the controller is actually usable. */ | |
337 | if(sparc_cpu_model == sun4m && | |
338 | prom_getproperty(fd_node, "status", state, sizeof(state)) != -1) { | |
339 | if(!strcmp(state, "disabled")) { | |
340 | goto no_sun_fdc; | |
341 | } | |
342 | } | |
343 | num_regs = prom_getproperty(fd_node, "reg", (char *) fd_regs, sizeof(fd_regs)); | |
344 | num_regs = (num_regs / sizeof(fd_regs[0])); | |
345 | prom_apply_obio_ranges(fd_regs, num_regs); | |
346 | memset(&r, 0, sizeof(r)); | |
347 | r.flags = fd_regs[0].which_io; | |
348 | r.start = fd_regs[0].phys_addr; | |
349 | sun_fdc = (struct sun_flpy_controller *) | |
454eeb2d | 350 | of_ioremap(&r, 0, fd_regs[0].reg_size, "floppy"); |
f5e706ad SR |
351 | |
352 | /* Last minute sanity check... */ | |
353 | if(sun_fdc->status_82072 == 0xff) { | |
354 | sun_fdc = NULL; | |
355 | goto no_sun_fdc; | |
356 | } | |
357 | ||
358 | sun_fdops.fd_inb = sun_82077_fd_inb; | |
359 | sun_fdops.fd_outb = sun_82077_fd_outb; | |
360 | fdc_status = &sun_fdc->status_82077; | |
361 | ||
362 | if (sun_fdc->dor_82077 == 0x80) { | |
363 | sun_fdc->dor_82077 = 0x02; | |
364 | if (sun_fdc->dor_82077 == 0x80) { | |
365 | sun_fdops.fd_inb = sun_82072_fd_inb; | |
366 | sun_fdops.fd_outb = sun_82072_fd_outb; | |
367 | fdc_status = &sun_fdc->status_82072; | |
368 | } | |
369 | } | |
370 | ||
371 | /* Success... */ | |
372 | allowed_drive_mask = 0x01; | |
373 | return (int) sun_fdc; | |
374 | ||
375 | no_sun_fdc: | |
376 | return -1; | |
377 | } | |
378 | ||
379 | static int sparc_eject(void) | |
380 | { | |
381 | set_dor(0x00, 0xff, 0x90); | |
382 | udelay(500); | |
383 | set_dor(0x00, 0x6f, 0x00); | |
384 | udelay(500); | |
385 | return 0; | |
386 | } | |
387 | ||
388 | #define fd_eject(drive) sparc_eject() | |
389 | ||
390 | #define EXTRA_FLOPPY_PARAMS | |
391 | ||
334ae614 DM |
392 | static DEFINE_SPINLOCK(dma_spin_lock); |
393 | ||
394 | #define claim_dma_lock() \ | |
395 | ({ unsigned long flags; \ | |
396 | spin_lock_irqsave(&dma_spin_lock, flags); \ | |
397 | flags; \ | |
398 | }) | |
399 | ||
400 | #define release_dma_lock(__flags) \ | |
401 | spin_unlock_irqrestore(&dma_spin_lock, __flags); | |
402 | ||
f5e706ad | 403 | #endif /* !(__ASM_SPARC_FLOPPY_H) */ |