xref: /freebsd/sys/dev/ips/ips_pci.c (revision 6af83ee0d2941d18880b6aaa2b4facd1d30c6106)
1 /*-
2  * Copyright (c) 2002 Adaptec Inc.
3  * All rights reserved.
4  *
5  * Written by: David Jeffery
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #include <dev/ips/ips.h>
33 
34 static int ips_pci_free(ips_softc_t *sc);
35 static void ips_intrhook(void *arg);
36 
37 static int ips_pci_probe(device_t dev)
38 {
39 
40         if ((pci_get_vendor(dev) == IPS_VENDOR_ID) &&
41 	    (pci_get_device(dev) == IPS_MORPHEUS_DEVICE_ID)) {
42 		device_set_desc(dev, "IBM ServeRAID Adapter");
43                 return 0;
44         } else if ((pci_get_vendor(dev) == IPS_VENDOR_ID) &&
45 	    (pci_get_device(dev) == IPS_COPPERHEAD_DEVICE_ID)) {
46 		device_set_desc(dev, "IBM ServeRAID Adapter");
47 		return (0);
48         } else if ((pci_get_vendor(dev) == IPS_VENDOR_ID_ADAPTEC) &&
49 	    (pci_get_device(dev) == IPS_MARCO_DEVICE_ID)) {
50 		device_set_desc(dev, "Adaptec ServeRAID Adapter");
51 		return (0);
52 	}
53         return(ENXIO);
54 }
55 
56 static int ips_pci_attach(device_t dev)
57 {
58         u_int32_t command;
59         ips_softc_t *sc;
60 
61 
62 	if (resource_disabled(device_get_name(dev), device_get_unit(dev))) {
63 		device_printf(dev, "device is disabled\n");
64 		/* but return 0 so the !$)$)*!$*) unit isn't reused */
65 		return (0);
66 	}
67         DEVICE_PRINTF(1, dev, "in attach.\n");
68         sc = (ips_softc_t *)device_get_softc(dev);
69         if(!sc){
70                 printf("how is sc NULL?!\n");
71                 return (ENXIO);
72         }
73         bzero(sc, sizeof(ips_softc_t));
74         sc->dev = dev;
75 
76         if(pci_get_device(dev) == IPS_MORPHEUS_DEVICE_ID){
77 		sc->ips_adapter_reinit = ips_morpheus_reinit;
78                 sc->ips_adapter_intr = ips_morpheus_intr;
79 		sc->ips_issue_cmd    = ips_issue_morpheus_cmd;
80 		sc->ips_poll_cmd     = ips_morpheus_poll;
81         } else if(pci_get_device(dev) == IPS_COPPERHEAD_DEVICE_ID){
82 		sc->ips_adapter_reinit = ips_copperhead_reinit;
83                 sc->ips_adapter_intr = ips_copperhead_intr;
84 		sc->ips_issue_cmd    = ips_issue_copperhead_cmd;
85 		sc->ips_poll_cmd     = ips_copperhead_poll;
86 	} else if (pci_get_device(dev) == IPS_MARCO_DEVICE_ID){
87 		sc->ips_adapter_reinit = ips_morpheus_reinit;
88 		sc->ips_adapter_intr = ips_morpheus_intr;
89 		sc->ips_issue_cmd = ips_issue_morpheus_cmd;
90 		sc->ips_poll_cmd     = ips_morpheus_poll;
91 	} else
92                 goto error;
93         /* make sure busmastering is on */
94         command = pci_read_config(dev, PCIR_COMMAND, 1);
95 	command |= PCIM_CMD_BUSMASTEREN;
96 	pci_write_config(dev, PCIR_COMMAND, command, 1);
97         /* seting up io space */
98         sc->iores = NULL;
99         if(command & PCIM_CMD_MEMEN){
100                 PRINTF(10, "trying MEMIO\n");
101 		if(pci_get_device(dev) == IPS_COPPERHEAD_DEVICE_ID)
102                 	sc->rid = PCIR_BAR(1);
103 		else
104 			sc->rid = PCIR_BAR(0);
105                 sc->iotype = SYS_RES_MEMORY;
106                 sc->iores = bus_alloc_resource_any(dev, sc->iotype,
107 			&sc->rid, RF_ACTIVE);
108         }
109         if(!sc->iores && command & PCIM_CMD_PORTEN){
110                 PRINTF(10, "trying PORTIO\n");
111                 sc->rid = PCIR_BAR(0);
112                 sc->iotype = SYS_RES_IOPORT;
113                 sc->iores = bus_alloc_resource_any(dev, sc->iotype,
114 			&sc->rid, RF_ACTIVE);
115         }
116         if(sc->iores == NULL){
117                 device_printf(dev, "resource allocation failed\n");
118                 return (ENXIO);
119         }
120         sc->bustag = rman_get_bustag(sc->iores);
121         sc->bushandle = rman_get_bushandle(sc->iores);
122         /*allocate an interrupt. when does the irq become active? after leaving attach? */
123         sc->irqrid = 0;
124         if(!(sc->irqres = bus_alloc_resource_any(dev, SYS_RES_IRQ,
125 		&sc->irqrid, RF_SHAREABLE | RF_ACTIVE))){
126                 device_printf(dev, "irq allocation failed\n");
127                 goto error;
128         }
129 	if(bus_setup_intr(dev, sc->irqres, INTR_TYPE_BIO|INTR_MPSAFE, sc->ips_adapter_intr, sc, &sc->irqcookie)){
130                 device_printf(dev, "irq setup failed\n");
131                 goto error;
132         }
133 	if (bus_dma_tag_create(	/* parent    */	NULL,
134 				/* alignemnt */	1,
135 				/* boundary  */	0,
136 				/* lowaddr   */	BUS_SPACE_MAXADDR_32BIT,
137 				/* highaddr  */	BUS_SPACE_MAXADDR,
138 				/* filter    */	NULL,
139 				/* filterarg */	NULL,
140 				/* maxsize   */	BUS_SPACE_MAXSIZE_32BIT,
141 				/* numsegs   */	IPS_MAX_SG_ELEMENTS,
142 				/* maxsegsize*/	BUS_SPACE_MAXSIZE_32BIT,
143 				/* flags     */	0,
144 				/* lockfunc  */ NULL,
145 				/* lockarg   */ NULL,
146 				&sc->adapter_dmatag) != 0) {
147                 printf("IPS can't alloc dma tag\n");
148                 goto error;
149         }
150 	sc->ips_ich.ich_func = ips_intrhook;
151 	sc->ips_ich.ich_arg = sc;
152 	mtx_init(&sc->queue_mtx, "IPS bioqueue lock", MTX_DEF, 0);
153 	sema_init(&sc->cmd_sema, 0, "IPS Command Semaphore");
154 	bioq_init(&sc->queue);
155 	if (config_intrhook_establish(&sc->ips_ich) != 0) {
156 		printf("IPS can't establish configuration hook\n");
157 		goto error;
158 	}
159         return 0;
160 error:
161 	ips_pci_free(sc);
162         return (ENXIO);
163 }
164 
165 static void
166 ips_intrhook(void *arg)
167 {
168 	struct ips_softc *sc = (struct ips_softc *)arg;
169 
170 	config_intrhook_disestablish(&sc->ips_ich);
171 	if (ips_adapter_init(sc))
172 		ips_pci_free(sc);
173 	else
174 		sc->configured = 1;
175 }
176 
177 static int ips_pci_free(ips_softc_t *sc)
178 {
179 	if(sc->adapter_dmatag)
180 		bus_dma_tag_destroy(sc->adapter_dmatag);
181 	if(sc->irqcookie)
182                 bus_teardown_intr(sc->dev, sc->irqres, sc->irqcookie);
183         if(sc->irqres)
184                bus_release_resource(sc->dev, SYS_RES_IRQ, sc->irqrid, sc->irqres);
185         if(sc->iores)
186                 bus_release_resource(sc->dev, sc->iotype, sc->rid, sc->iores);
187 	sc->configured = 0;
188 	mtx_destroy(&sc->queue_mtx);
189 	sema_destroy(&sc->cmd_sema);
190 	return 0;
191 }
192 
193 static int ips_pci_detach(device_t dev)
194 {
195         ips_softc_t *sc;
196         DEVICE_PRINTF(1, dev, "detaching ServeRaid\n");
197         sc = (ips_softc_t *) device_get_softc(dev);
198 	if (sc->configured) {
199 		sc->configured = 0;
200 		ips_flush_cache(sc);
201 		if(ips_adapter_free(sc))
202 			return EBUSY;
203 		ips_pci_free(sc);
204 		bioq_flush(&sc->queue, NULL, ENXIO);
205 	}
206 	return 0;
207 }
208 
209 static int ips_pci_shutdown(device_t dev)
210 {
211 	ips_softc_t *sc = (ips_softc_t *) device_get_softc(dev);
212 	if (sc->configured) {
213 		ips_flush_cache(sc);
214 	}
215 	return 0;
216 }
217 
218 static device_method_t ips_driver_methods[] = {
219         DEVMETHOD(device_probe, ips_pci_probe),
220         DEVMETHOD(device_attach, ips_pci_attach),
221         DEVMETHOD(device_detach, ips_pci_detach),
222 	DEVMETHOD(device_shutdown, ips_pci_shutdown),
223         {0,0}
224 };
225 
226 static driver_t ips_pci_driver = {
227         "ips",
228         ips_driver_methods,
229         sizeof(ips_softc_t),
230 };
231 
232 static devclass_t ips_devclass;
233 DRIVER_MODULE(ips, pci, ips_pci_driver, ips_devclass, 0, 0);
234