Get rid of bus_{disable,enable}_intr(), it wasn't generic enough for
[dragonfly.git] / sys / dev / raid / mly / mly_pci.c
1 /*-
2  * Copyright (c) 2000, 2001 Michael Smith
3  * Copyright (c) 2000 BSDi
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  *
15  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
16  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
17  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
18  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
19  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
20  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
21  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
22  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
23  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
24  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
25  * SUCH DAMAGE.
26  *
27  *      $FreeBSD: src/sys/dev/mly/mly_pci.c,v 1.1.2.2 2001/03/05 20:17:24 msmith Exp $
28  *      $DragonFly: src/sys/dev/raid/mly/Attic/mly_pci.c,v 1.4 2005/05/24 20:59:04 dillon Exp $
29  */
30
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/malloc.h>
34 #include <sys/kernel.h>
35
36 #include <sys/bus.h>
37 #include <sys/conf.h>
38 #include <sys/devicestat.h>
39 #include <sys/disk.h>
40
41 #include <machine/bus_memio.h>
42 #include <machine/bus.h>
43 #include <machine/resource.h>
44 #include <sys/rman.h>
45
46 #include <bus/pci/pcireg.h>
47 #include <bus/pci/pcivar.h>
48
49 #include "mlyreg.h"
50 #include "mlyio.h"
51 #include "mlyvar.h"
52
53 static int      mly_pci_probe(device_t dev);
54 static int      mly_pci_attach(device_t dev);
55 static int      mly_pci_detach(device_t dev);
56 static int      mly_pci_shutdown(device_t dev);
57 static int      mly_pci_suspend(device_t dev); 
58 static int      mly_pci_resume(device_t dev);
59 static void     mly_pci_intr(void *arg);
60
61 static int      mly_sg_map(struct mly_softc *sc);
62 static void     mly_sg_map_helper(void *arg, bus_dma_segment_t *segs, int nseg, int error);
63 static int      mly_mmbox_map(struct mly_softc *sc);
64 static void     mly_mmbox_map_helper(void *arg, bus_dma_segment_t *segs, int nseg, int error);
65
66 static device_method_t mly_methods[] = {
67     /* Device interface */
68     DEVMETHOD(device_probe,     mly_pci_probe),
69     DEVMETHOD(device_attach,    mly_pci_attach),
70     DEVMETHOD(device_detach,    mly_pci_detach),
71     DEVMETHOD(device_shutdown,  mly_pci_shutdown),
72     DEVMETHOD(device_suspend,   mly_pci_suspend),
73     DEVMETHOD(device_resume,    mly_pci_resume),
74     { 0, 0 }
75 };
76
77 static driver_t mly_pci_driver = {
78         "mly",
79         mly_methods,
80         sizeof(struct mly_softc)
81 };
82
83 static devclass_t       mly_devclass;
84 DRIVER_MODULE(mly, pci, mly_pci_driver, mly_devclass, 0, 0);
85
86 struct mly_ident
87 {
88     u_int16_t           vendor;
89     u_int16_t           device;
90     u_int16_t           subvendor;
91     u_int16_t           subdevice;
92     int                 hwif;
93     char                *desc;
94 } mly_identifiers[] = {
95     {0x1069, 0xba56, 0x1069, 0x0040, MLY_HWIF_STRONGARM, "Mylex eXtremeRAID 2000"},
96     {0x1069, 0xba56, 0x1069, 0x0030, MLY_HWIF_STRONGARM, "Mylex eXtremeRAID 3000"},
97     {0x1069, 0x0050, 0x1069, 0x0050, MLY_HWIF_I960RX,    "Mylex AcceleRAID 352"},
98     {0x1069, 0x0050, 0x1069, 0x0052, MLY_HWIF_I960RX,    "Mylex AcceleRAID 170"},
99     {0x1069, 0x0050, 0x1069, 0x0054, MLY_HWIF_I960RX,    "Mylex AcceleRAID 160"},
100     {0, 0, 0, 0, 0, 0}
101 };
102
103 /********************************************************************************
104  ********************************************************************************
105                                                                     Bus Interface
106  ********************************************************************************
107  ********************************************************************************/
108
109 static int
110 mly_pci_probe(device_t dev)
111 {
112     struct mly_ident    *m;
113
114     debug_called(1);
115
116     for (m = mly_identifiers; m->vendor != 0; m++) {
117         if ((m->vendor == pci_get_vendor(dev)) &&
118             (m->device == pci_get_device(dev)) &&
119             ((m->subvendor == 0) || ((m->subvendor == pci_get_subvendor(dev)) &&
120                                      (m->subdevice == pci_get_subdevice(dev))))) {
121             
122             device_set_desc(dev, m->desc);
123             return(-10);        /* allow room to be overridden */
124         }
125     }
126     return(ENXIO);
127 }
128
129 static int
130 mly_pci_attach(device_t dev)
131 {
132     struct mly_softc    *sc;
133     int                 i, error;
134     u_int32_t           command;
135
136     debug_called(1);
137
138     /*
139      * Initialise softc.
140      */
141     sc = device_get_softc(dev);
142     bzero(sc, sizeof(*sc));
143     sc->mly_dev = dev;
144
145 #ifdef MLY_DEBUG
146     if (device_get_unit(sc->mly_dev) == 0)
147         mly_softc0 = sc;
148 #endif    
149
150     /* assume failure is 'not configured' */
151     error = ENXIO;
152
153     /* 
154      * Verify that the adapter is correctly set up in PCI space.
155      */
156     command = pci_read_config(sc->mly_dev, PCIR_COMMAND, 2);
157     command |= PCIM_CMD_BUSMASTEREN;
158     pci_write_config(dev, PCIR_COMMAND, command, 2);
159     command = pci_read_config(sc->mly_dev, PCIR_COMMAND, 2);
160     if (!(command & PCIM_CMD_BUSMASTEREN)) {
161         mly_printf(sc, "can't enable busmaster feature\n");
162         goto fail;
163     }
164     if ((command & PCIM_CMD_MEMEN) == 0) {
165         mly_printf(sc, "memory window not available\n");
166         goto fail;
167     }
168
169     /*
170      * Allocate the PCI register window.
171      */
172     sc->mly_regs_rid = PCIR_MAPS;       /* first base address register */
173     if ((sc->mly_regs_resource = bus_alloc_resource(sc->mly_dev, SYS_RES_MEMORY, &sc->mly_regs_rid, 
174                                                     0, ~0, 1, RF_ACTIVE)) == NULL) {
175         mly_printf(sc, "can't allocate register window\n");
176         goto fail;
177     }
178     sc->mly_btag = rman_get_bustag(sc->mly_regs_resource);
179     sc->mly_bhandle = rman_get_bushandle(sc->mly_regs_resource);
180
181     /* 
182      * Allocate and connect our interrupt.
183      */
184     sc->mly_irq_rid = 0;
185     if ((sc->mly_irq = bus_alloc_resource(sc->mly_dev, SYS_RES_IRQ, &sc->mly_irq_rid, 
186                                           0, ~0, 1, RF_SHAREABLE | RF_ACTIVE)) == NULL) {
187         mly_printf(sc, "can't allocate interrupt\n");
188         goto fail;
189     }
190     error = bus_setup_intr(sc->mly_dev, sc->mly_irq, INTR_TYPE_CAM, 
191                            mly_pci_intr, sc, &sc->mly_intr, NULL);
192     if (error) {
193         mly_printf(sc, "can't set up interrupt\n");
194         goto fail;
195     }
196
197     /* assume failure is 'out of memory' */
198     error = ENOMEM;
199
200     /*
201      * Allocate the parent bus DMA tag appropriate for our PCI interface.
202      * 
203      * Note that all of these controllers are 64-bit capable.
204      */
205     if (bus_dma_tag_create(NULL,                        /* parent */
206                            1, 0,                        /* alignment, boundary */
207                            BUS_SPACE_MAXADDR_32BIT,     /* lowaddr */
208                            BUS_SPACE_MAXADDR,           /* highaddr */
209                            NULL, NULL,                  /* filter, filterarg */
210                            MAXBSIZE, MLY_MAXSGENTRIES,  /* maxsize, nsegments */
211                            BUS_SPACE_MAXSIZE_32BIT,     /* maxsegsize */
212                            BUS_DMA_ALLOCNOW,            /* flags */
213                            &sc->mly_parent_dmat)) {
214         mly_printf(sc, "can't allocate parent DMA tag\n");
215         goto fail;
216     }
217
218     /*
219      * Create DMA tag for mapping buffers into controller-addressable space.
220      */
221     if (bus_dma_tag_create(sc->mly_parent_dmat,         /* parent */
222                            1, 0,                        /* alignment, boundary */
223                            BUS_SPACE_MAXADDR,           /* lowaddr */
224                            BUS_SPACE_MAXADDR,           /* highaddr */
225                            NULL, NULL,                  /* filter, filterarg */
226                            MAXBSIZE, MLY_MAXSGENTRIES,  /* maxsize, nsegments */
227                            BUS_SPACE_MAXSIZE_32BIT,     /* maxsegsize */
228                            0,                           /* flags */
229                            &sc->mly_buffer_dmat)) {
230         mly_printf(sc, "can't allocate buffer DMA tag\n");
231         goto fail;
232     }
233
234     /*
235      * Initialise the DMA tag for command packets.
236      */
237     if (bus_dma_tag_create(sc->mly_parent_dmat,         /* parent */
238                            1, 0,                        /* alignment, boundary */
239                            BUS_SPACE_MAXADDR,           /* lowaddr */
240                            BUS_SPACE_MAXADDR,           /* highaddr */
241                            NULL, NULL,                  /* filter, filterarg */
242                            sizeof(union mly_command_packet) * MLY_MAXCOMMANDS, 1,       /* maxsize, nsegments */
243                            BUS_SPACE_MAXSIZE_32BIT,     /* maxsegsize */
244                            0,                           /* flags */
245                            &sc->mly_packet_dmat)) {
246         mly_printf(sc, "can't allocate command packet DMA tag\n");
247         goto fail;
248     }
249
250     /* 
251      * Detect the hardware interface version 
252      */
253     for (i = 0; mly_identifiers[i].vendor != 0; i++) {
254         if ((mly_identifiers[i].vendor == pci_get_vendor(dev)) &&
255             (mly_identifiers[i].device == pci_get_device(dev))) {
256             sc->mly_hwif = mly_identifiers[i].hwif;
257             switch(sc->mly_hwif) {
258             case MLY_HWIF_I960RX:
259                 debug(2, "set hardware up for i960RX");
260                 sc->mly_doorbell_true = 0x00;
261                 sc->mly_command_mailbox =  MLY_I960RX_COMMAND_MAILBOX;
262                 sc->mly_status_mailbox =   MLY_I960RX_STATUS_MAILBOX;
263                 sc->mly_idbr =             MLY_I960RX_IDBR;
264                 sc->mly_odbr =             MLY_I960RX_ODBR;
265                 sc->mly_error_status =     MLY_I960RX_ERROR_STATUS;
266                 sc->mly_interrupt_status = MLY_I960RX_INTERRUPT_STATUS;
267                 sc->mly_interrupt_mask =   MLY_I960RX_INTERRUPT_MASK;
268                 break;
269             case MLY_HWIF_STRONGARM:
270                 debug(2, "set hardware up for StrongARM");
271                 sc->mly_doorbell_true = 0xff;           /* doorbell 'true' is 0 */
272                 sc->mly_command_mailbox =  MLY_STRONGARM_COMMAND_MAILBOX;
273                 sc->mly_status_mailbox =   MLY_STRONGARM_STATUS_MAILBOX;
274                 sc->mly_idbr =             MLY_STRONGARM_IDBR;
275                 sc->mly_odbr =             MLY_STRONGARM_ODBR;
276                 sc->mly_error_status =     MLY_STRONGARM_ERROR_STATUS;
277                 sc->mly_interrupt_status = MLY_STRONGARM_INTERRUPT_STATUS;
278                 sc->mly_interrupt_mask =   MLY_STRONGARM_INTERRUPT_MASK;
279                 break;
280             }
281             break;
282         }
283     }
284
285     /*
286      * Create the scatter/gather mappings.
287      */
288     if ((error = mly_sg_map(sc)))
289         goto fail;
290
291     /*
292      * Allocate and map the memory mailbox
293      */
294     if ((error = mly_mmbox_map(sc)))
295         goto fail;
296
297     /*
298      * Do bus-independent initialisation.
299      */
300     if ((error = mly_attach(sc)))
301         goto fail;
302     
303     return(0);
304             
305 fail:
306     mly_free(sc);
307     return(error);
308 }
309
310 /********************************************************************************
311  * Disconnect from the controller completely, in preparation for unload.
312  */
313 static int
314 mly_pci_detach(device_t dev)
315 {
316     struct mly_softc    *sc = device_get_softc(dev);
317     int                 error;
318
319     debug_called(1);
320
321     if (sc->mly_state & MLY_STATE_OPEN)
322         return(EBUSY);
323
324     if ((error = mly_pci_shutdown(dev)))
325         return(error);
326
327     mly_free(sc);
328
329     return(0);
330 }
331
332 /********************************************************************************
333  * Bring the controller down to a dormant state and detach all child devices.
334  *
335  * This function is called before detach or system shutdown.
336  *
337  * Note that we can assume that the camq on the controller is empty, as we won't
338  * allow shutdown if any device is open.
339  */
340 static int
341 mly_pci_shutdown(device_t dev)
342 {
343     struct mly_softc    *sc = device_get_softc(dev);
344
345     debug_called(1);
346
347     mly_detach(sc);
348     return(0);
349 }
350
351 /********************************************************************************
352  * Bring the controller to a quiescent state, ready for system suspend.
353  *
354  * We can't assume that the controller is not active at this point, so we need
355  * to mask interrupts.
356  */
357 static int
358 mly_pci_suspend(device_t dev)
359 {
360     struct mly_softc    *sc = device_get_softc(dev);
361     int                 s;
362
363     debug_called(1);
364     s = splcam();
365     mly_detach(sc);
366     splx(s);
367     return(0);
368 }
369
370 /********************************************************************************
371  * Bring the controller back to a state ready for operation.
372  */
373 static int
374 mly_pci_resume(device_t dev)
375 {
376     struct mly_softc    *sc = device_get_softc(dev);
377
378     debug_called(1);
379     sc->mly_state &= ~MLY_STATE_SUSPEND;
380     MLY_UNMASK_INTERRUPTS(sc);
381     return(0);
382 }
383
384 /*******************************************************************************
385  * Take an interrupt, or be poked by other code to look for interrupt-worthy
386  * status.
387  */
388 static void
389 mly_pci_intr(void *arg)
390 {
391     struct mly_softc    *sc = (struct mly_softc *)arg;
392
393     debug_called(3);
394
395     /* collect finished commands, queue anything waiting */
396     mly_done(sc);
397 };
398
399 /********************************************************************************
400  ********************************************************************************
401                                                 Bus-dependant Resource Management
402  ********************************************************************************
403  ********************************************************************************/
404
405 /********************************************************************************
406  * Allocate memory for the scatter/gather tables
407  */
408 static int
409 mly_sg_map(struct mly_softc *sc)
410 {
411     size_t      segsize;
412
413     debug_called(1);
414
415     /*
416      * Create a single tag describing a region large enough to hold all of
417      * the s/g lists we will need.
418      */
419     segsize = sizeof(struct mly_sg_entry) * MLY_MAXCOMMANDS * MLY_MAXSGENTRIES;
420     if (bus_dma_tag_create(sc->mly_parent_dmat,         /* parent */
421                            1, 0,                        /* alignment, boundary */
422                            BUS_SPACE_MAXADDR,           /* lowaddr */
423                            BUS_SPACE_MAXADDR,           /* highaddr */
424                            NULL, NULL,                  /* filter, filterarg */
425                            segsize, 1,                  /* maxsize, nsegments */
426                            BUS_SPACE_MAXSIZE_32BIT,     /* maxsegsize */
427                            0,                           /* flags */
428                            &sc->mly_sg_dmat)) {
429         mly_printf(sc, "can't allocate scatter/gather DMA tag\n");
430         return(ENOMEM);
431     }
432
433     /*
434      * Allocate enough s/g maps for all commands and permanently map them into
435      * controller-visible space.
436      *  
437      * XXX this assumes we can get enough space for all the s/g maps in one 
438      * contiguous slab.
439      */
440     if (bus_dmamem_alloc(sc->mly_sg_dmat, (void **)&sc->mly_sg_table, BUS_DMA_NOWAIT, &sc->mly_sg_dmamap)) {
441         mly_printf(sc, "can't allocate s/g table\n");
442         return(ENOMEM);
443     }
444     bus_dmamap_load(sc->mly_sg_dmat, sc->mly_sg_dmamap, sc->mly_sg_table, segsize, mly_sg_map_helper, sc, 0);
445     return(0);
446 }
447
448 /********************************************************************************
449  * Save the physical address of the base of the s/g table.
450  */
451 static void
452 mly_sg_map_helper(void *arg, bus_dma_segment_t *segs, int nseg, int error)
453 {
454     struct mly_softc    *sc = (struct mly_softc *)arg;
455
456     debug_called(2);
457
458     /* save base of s/g table's address in bus space */
459     sc->mly_sg_busaddr = segs->ds_addr;
460 }
461
462 /********************************************************************************
463  * Allocate memory for the memory-mailbox interface
464  */
465 static int
466 mly_mmbox_map(struct mly_softc *sc)
467 {
468
469     /*
470      * Create a DMA tag for a single contiguous region large enough for the
471      * memory mailbox structure.
472      */
473     if (bus_dma_tag_create(sc->mly_parent_dmat,         /* parent */
474                            1, 0,                        /* alignment, boundary */
475                            BUS_SPACE_MAXADDR,           /* lowaddr */
476                            BUS_SPACE_MAXADDR,           /* highaddr */
477                            NULL, NULL,                  /* filter, filterarg */
478                            sizeof(struct mly_mmbox), 1, /* maxsize, nsegments */
479                            BUS_SPACE_MAXSIZE_32BIT,     /* maxsegsize */
480                            0,                           /* flags */
481                            &sc->mly_mmbox_dmat)) {
482         mly_printf(sc, "can't allocate memory mailbox DMA tag\n");
483         return(ENOMEM);
484     }
485
486     /*
487      * Allocate the buffer
488      */
489     if (bus_dmamem_alloc(sc->mly_mmbox_dmat, (void **)&sc->mly_mmbox, BUS_DMA_NOWAIT, &sc->mly_mmbox_dmamap)) {
490         mly_printf(sc, "can't allocate memory mailbox\n");
491         return(ENOMEM);
492     }
493     bus_dmamap_load(sc->mly_mmbox_dmat, sc->mly_mmbox_dmamap, sc->mly_mmbox, sizeof(struct mly_mmbox), 
494                     mly_mmbox_map_helper, sc, 0);
495     bzero(sc->mly_mmbox, sizeof(*sc->mly_mmbox));
496     return(0);
497
498 }
499
500 /********************************************************************************
501  * Save the physical address of the memory mailbox 
502  */
503 static void
504 mly_mmbox_map_helper(void *arg, bus_dma_segment_t *segs, int nseg, int error)
505 {
506     struct mly_softc    *sc = (struct mly_softc *)arg;
507
508     debug_called(2);
509
510     sc->mly_mmbox_busaddr = segs->ds_addr;
511 }
512
513 /********************************************************************************
514  * Free all of the resources associated with (sc)
515  *
516  * Should not be called if the controller is active.
517  */
518 void
519 mly_free(struct mly_softc *sc)
520 {
521     struct mly_command  *mc;
522     
523     debug_called(1);
524
525     /* detach from CAM */
526     mly_cam_detach(sc);
527
528     /* throw away command buffer DMA maps */
529     while (mly_alloc_command(sc, &mc) == 0)
530         bus_dmamap_destroy(sc->mly_buffer_dmat, mc->mc_datamap);
531
532     /* release the packet storage */
533     if (sc->mly_packet != NULL) {
534         bus_dmamap_unload(sc->mly_packet_dmat, sc->mly_packetmap);
535         bus_dmamem_free(sc->mly_packet_dmat, sc->mly_packet, sc->mly_packetmap);
536     }
537
538     /* throw away the controllerinfo structure */
539     if (sc->mly_controllerinfo != NULL)
540         free(sc->mly_controllerinfo, M_DEVBUF);
541
542     /* throw away the controllerparam structure */
543     if (sc->mly_controllerparam != NULL)
544         free(sc->mly_controllerparam, M_DEVBUF);
545
546     /* destroy data-transfer DMA tag */
547     if (sc->mly_buffer_dmat)
548         bus_dma_tag_destroy(sc->mly_buffer_dmat);
549
550     /* free and destroy DMA memory and tag for s/g lists */
551     if (sc->mly_sg_table) {
552         bus_dmamap_unload(sc->mly_sg_dmat, sc->mly_sg_dmamap);
553         bus_dmamem_free(sc->mly_sg_dmat, sc->mly_sg_table, sc->mly_sg_dmamap);
554     }
555     if (sc->mly_sg_dmat)
556         bus_dma_tag_destroy(sc->mly_sg_dmat);
557
558     /* free and destroy DMA memory and tag for memory mailbox */
559     if (sc->mly_mmbox) {
560         bus_dmamap_unload(sc->mly_mmbox_dmat, sc->mly_mmbox_dmamap);
561         bus_dmamem_free(sc->mly_mmbox_dmat, sc->mly_mmbox, sc->mly_mmbox_dmamap);
562     }
563     if (sc->mly_mmbox_dmat)
564         bus_dma_tag_destroy(sc->mly_mmbox_dmat);
565
566     /* disconnect the interrupt handler */
567     if (sc->mly_intr)
568         bus_teardown_intr(sc->mly_dev, sc->mly_irq, sc->mly_intr);
569     if (sc->mly_irq != NULL)
570         bus_release_resource(sc->mly_dev, SYS_RES_IRQ, sc->mly_irq_rid, sc->mly_irq);
571
572     /* destroy the parent DMA tag */
573     if (sc->mly_parent_dmat)
574         bus_dma_tag_destroy(sc->mly_parent_dmat);
575
576     /* release the register window mapping */
577     if (sc->mly_regs_resource != NULL)
578         bus_release_resource(sc->mly_dev, SYS_RES_MEMORY, sc->mly_regs_rid, sc->mly_regs_resource);
579 }
580