xref: /freebsd/sys/dev/ips/ips_pci.c (revision 9517e866259191fcd39434a97ad849a9b59b9b9f)
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/ipsreg.h>
33 #include <dev/ips/ips.h>
34 
35 #include <dev/pci/pcireg.h>
36 #include <dev/pci/pcivar.h>
37 
38 static int ips_pci_free(ips_softc_t *sc);
39 static void ips_intrhook(void *arg);
40 
41 static int ips_pci_probe(device_t dev)
42 {
43 
44         if ((pci_get_vendor(dev) == IPS_VENDOR_ID) &&
45 	    (pci_get_device(dev) == IPS_MORPHEUS_DEVICE_ID)) {
46 		device_set_desc(dev, "IBM ServeRAID Adapter");
47                 return (BUS_PROBE_DEFAULT);
48         } else if ((pci_get_vendor(dev) == IPS_VENDOR_ID) &&
49 	    (pci_get_device(dev) == IPS_COPPERHEAD_DEVICE_ID)) {
50 		device_set_desc(dev, "IBM ServeRAID Adapter");
51 		return (BUS_PROBE_DEFAULT);
52         } else if ((pci_get_vendor(dev) == IPS_VENDOR_ID_ADAPTEC) &&
53 	    (pci_get_device(dev) == IPS_MARCO_DEVICE_ID)) {
54 		device_set_desc(dev, "Adaptec ServeRAID Adapter");
55 		return (BUS_PROBE_DEFAULT);
56 	}
57         return(ENXIO);
58 }
59 
60 static int ips_pci_attach(device_t dev)
61 {
62         u_int32_t command;
63         ips_softc_t *sc;
64 
65 
66 	if (resource_disabled(device_get_name(dev), device_get_unit(dev))) {
67 		device_printf(dev, "device is disabled\n");
68 		/* but return 0 so the !$)$)*!$*) unit isn't reused */
69 		return (0);
70 	}
71         DEVICE_PRINTF(1, dev, "in attach.\n");
72         sc = (ips_softc_t *)device_get_softc(dev);
73         if(!sc){
74                 printf("how is sc NULL?!\n");
75                 return (ENXIO);
76         }
77         bzero(sc, sizeof(ips_softc_t));
78         sc->dev = dev;
79 
80         if(pci_get_device(dev) == IPS_MORPHEUS_DEVICE_ID){
81 		sc->ips_adapter_reinit = ips_morpheus_reinit;
82                 sc->ips_adapter_intr = ips_morpheus_intr;
83 		sc->ips_issue_cmd    = ips_issue_morpheus_cmd;
84 		sc->ips_poll_cmd     = ips_morpheus_poll;
85         } else if(pci_get_device(dev) == IPS_COPPERHEAD_DEVICE_ID){
86 		sc->ips_adapter_reinit = ips_copperhead_reinit;
87                 sc->ips_adapter_intr = ips_copperhead_intr;
88 		sc->ips_issue_cmd    = ips_issue_copperhead_cmd;
89 		sc->ips_poll_cmd     = ips_copperhead_poll;
90 	} else if (pci_get_device(dev) == IPS_MARCO_DEVICE_ID){
91 		sc->ips_adapter_reinit = ips_morpheus_reinit;
92 		sc->ips_adapter_intr = ips_morpheus_intr;
93 		sc->ips_issue_cmd = ips_issue_morpheus_cmd;
94 		sc->ips_poll_cmd     = ips_morpheus_poll;
95 	} else
96                 goto error;
97         /* make sure busmastering is on */
98         command = pci_read_config(dev, PCIR_COMMAND, 1);
99 	command |= PCIM_CMD_BUSMASTEREN;
100 	pci_write_config(dev, PCIR_COMMAND, command, 1);
101         /* seting up io space */
102         sc->iores = NULL;
103         if(command & PCIM_CMD_MEMEN){
104                 PRINTF(10, "trying MEMIO\n");
105 		if(pci_get_device(dev) == IPS_COPPERHEAD_DEVICE_ID)
106                 	sc->rid = PCIR_BAR(1);
107 		else
108 			sc->rid = PCIR_BAR(0);
109                 sc->iotype = SYS_RES_MEMORY;
110                 sc->iores = bus_alloc_resource_any(dev, sc->iotype,
111 			&sc->rid, RF_ACTIVE);
112         }
113         if(!sc->iores && command & PCIM_CMD_PORTEN){
114                 PRINTF(10, "trying PORTIO\n");
115                 sc->rid = PCIR_BAR(0);
116                 sc->iotype = SYS_RES_IOPORT;
117                 sc->iores = bus_alloc_resource_any(dev, sc->iotype,
118 			&sc->rid, RF_ACTIVE);
119         }
120         if(sc->iores == NULL){
121                 device_printf(dev, "resource allocation failed\n");
122                 return (ENXIO);
123         }
124         sc->bustag = rman_get_bustag(sc->iores);
125         sc->bushandle = rman_get_bushandle(sc->iores);
126         /*allocate an interrupt. when does the irq become active? after leaving attach? */
127         sc->irqrid = 0;
128         if(!(sc->irqres = bus_alloc_resource_any(dev, SYS_RES_IRQ,
129 		&sc->irqrid, RF_SHAREABLE | RF_ACTIVE))){
130                 device_printf(dev, "irq allocation failed\n");
131                 goto error;
132         }
133 	if(bus_setup_intr(dev, sc->irqres, INTR_TYPE_BIO|INTR_MPSAFE, NULL,
134 	    sc->ips_adapter_intr, sc, &sc->irqcookie)){
135                 device_printf(dev, "irq setup failed\n");
136                 goto error;
137         }
138 	if (bus_dma_tag_create(	/* parent    */	NULL,
139 				/* alignemnt */	1,
140 				/* boundary  */	0,
141 				/* lowaddr   */	BUS_SPACE_MAXADDR_32BIT,
142 				/* highaddr  */	BUS_SPACE_MAXADDR,
143 				/* filter    */	NULL,
144 				/* filterarg */	NULL,
145 				/* maxsize   */	BUS_SPACE_MAXSIZE_32BIT,
146 				/* numsegs   */	IPS_MAX_SG_ELEMENTS,
147 				/* maxsegsize*/	BUS_SPACE_MAXSIZE_32BIT,
148 				/* flags     */	0,
149 				/* lockfunc  */ NULL,
150 				/* lockarg   */ NULL,
151 				&sc->adapter_dmatag) != 0) {
152                 printf("IPS can't alloc dma tag\n");
153                 goto error;
154         }
155 	sc->ips_ich.ich_func = ips_intrhook;
156 	sc->ips_ich.ich_arg = sc;
157 	mtx_init(&sc->queue_mtx, "IPS bioqueue lock", MTX_DEF, 0);
158 	sema_init(&sc->cmd_sema, 0, "IPS Command Semaphore");
159 	bioq_init(&sc->queue);
160 	if (config_intrhook_establish(&sc->ips_ich) != 0) {
161 		printf("IPS can't establish configuration hook\n");
162 		goto error;
163 	}
164         return 0;
165 error:
166 	ips_pci_free(sc);
167         return (ENXIO);
168 }
169 
170 static void
171 ips_intrhook(void *arg)
172 {
173 	struct ips_softc *sc = (struct ips_softc *)arg;
174 
175 	config_intrhook_disestablish(&sc->ips_ich);
176 	newbus_xlock();
177 	if (ips_adapter_init(sc))
178 		ips_pci_free(sc);
179 	else
180 		sc->configured = 1;
181 	newbus_xunlock();
182 }
183 
184 static int ips_pci_free(ips_softc_t *sc)
185 {
186 	if(sc->adapter_dmatag)
187 		bus_dma_tag_destroy(sc->adapter_dmatag);
188 	if(sc->irqcookie)
189                 bus_teardown_intr(sc->dev, sc->irqres, sc->irqcookie);
190         if(sc->irqres)
191                bus_release_resource(sc->dev, SYS_RES_IRQ, sc->irqrid, sc->irqres);
192         if(sc->iores)
193                 bus_release_resource(sc->dev, sc->iotype, sc->rid, sc->iores);
194 	sc->configured = 0;
195 	mtx_destroy(&sc->queue_mtx);
196 	sema_destroy(&sc->cmd_sema);
197 	return 0;
198 }
199 
200 static int ips_pci_detach(device_t dev)
201 {
202         ips_softc_t *sc;
203         DEVICE_PRINTF(1, dev, "detaching ServeRaid\n");
204         sc = (ips_softc_t *) device_get_softc(dev);
205 	if (sc->configured) {
206 		sc->configured = 0;
207 		ips_flush_cache(sc);
208 		if(ips_adapter_free(sc))
209 			return EBUSY;
210 		ips_pci_free(sc);
211 		bioq_flush(&sc->queue, NULL, ENXIO);
212 	}
213 	return 0;
214 }
215 
216 static int ips_pci_shutdown(device_t dev)
217 {
218 	ips_softc_t *sc = (ips_softc_t *) device_get_softc(dev);
219 	if (sc->configured) {
220 		ips_flush_cache(sc);
221 	}
222 	return 0;
223 }
224 
225 static device_method_t ips_driver_methods[] = {
226         DEVMETHOD(device_probe, ips_pci_probe),
227         DEVMETHOD(device_attach, ips_pci_attach),
228         DEVMETHOD(device_detach, ips_pci_detach),
229 	DEVMETHOD(device_shutdown, ips_pci_shutdown),
230         {0,0}
231 };
232 
233 static driver_t ips_pci_driver = {
234         "ips",
235         ips_driver_methods,
236         sizeof(ips_softc_t),
237 };
238 
239 static devclass_t ips_devclass;
240 DRIVER_MODULE(ips, pci, ips_pci_driver, ips_devclass, 0, 0);
241