1 /* $OpenBSD: i82365_pci.c,v 1.9 2005/08/09 04:10:11 mickey Exp $ */
2 /* $NetBSD: i82365_pci.c,v 1.11 2000/02/24 03:42:44 itohy Exp $ */
3
4 /*
5 * Copyright (c) 1997 Marc Horowitz. All rights reserved.
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 * 3. All advertising materials mentioning features or use of this software
16 * must display the following acknowledgement:
17 * This product includes software developed by Marc Horowitz.
18 * 4. The name of the author may not be used to endorse or promote products
19 * derived from this software without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
22 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
23 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
24 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
25 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
26 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
27 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
28 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
29 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
30 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 /*
34 * XXX this driver frontend is *very* i386 dependent and should be relocated
35 */
36
37 #include <sys/types.h>
38 #include <sys/param.h>
39 #include <sys/systm.h>
40 #include <sys/kernel.h>
41 #include <sys/device.h>
42
43 #include <dev/ic/i82365reg.h>
44 #include <dev/ic/i82365var.h>
45
46 #include <dev/pci/pcivar.h>
47 #include <dev/pci/pcireg.h>
48 #include <dev/pci/pcidevs.h>
49 #include <dev/pci/i82365_pcivar.h>
50
51 #include <dev/isa/isavar.h>
52 #include <dev/isa/i82365_isavar.h>
53
54 /*
55 * PCI constants.
56 * XXX These should be in a common file!
57 */
58 #define PCI_CBIO 0x10 /* Configuration Base IO Address */
59
60 int pcic_pci_match(struct device *, void *, void *);
61 void pcic_pci_attach(struct device *, struct device *, void *);
62
63 struct cfattach pcic_pci_ca = {
64 sizeof(struct pcic_pci_softc), pcic_pci_match, pcic_pci_attach
65 };
66
67 static struct pcmcia_chip_functions pcic_pci_functions = {
68 pcic_chip_mem_alloc,
69 pcic_chip_mem_free,
70 pcic_chip_mem_map,
71 pcic_chip_mem_unmap,
72
73 pcic_chip_io_alloc,
74 pcic_chip_io_free,
75 pcic_chip_io_map,
76 pcic_chip_io_unmap,
77
78 /* XXX */
79 pcic_isa_chip_intr_establish,
80 pcic_isa_chip_intr_disestablish,
81 pcic_isa_chip_intr_string,
82
83 pcic_chip_socket_enable,
84 pcic_chip_socket_disable,
85 };
86
87 int
88 pcic_pci_match(parent, match, aux)
89 struct device *parent;
90 void *match;
91 void *aux;
92 {
93 struct pci_attach_args *pa = (struct pci_attach_args *) aux;
94
95 if (PCI_VENDOR(pa->pa_id) == PCI_VENDOR_CIRRUS &&
96 PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_CIRRUS_CL_PD6729)
97 return (1);
98 return (0);
99 }
100
101 void pcic_isa_config_interrupts(struct device *);
102
103 void
104 pcic_pci_attach(parent, self, aux)
105 struct device *parent, *self;
106 void *aux;
107 {
108 struct pcic_softc *sc = (void *) self;
109 struct pcic_pci_softc *psc = (void *) self;
110 struct pcic_handle *h;
111 struct pci_attach_args *pa = aux;
112 pci_chipset_tag_t pc = pa->pa_pc;
113 bus_space_tag_t memt = pa->pa_memt;
114 bus_space_handle_t memh;
115 bus_size_t size;
116 int irq, i;
117
118 if (pci_mapreg_map(pa, PCI_CBIO, PCI_MAPREG_TYPE_IO, 0,
119 &sc->iot, &sc->ioh, NULL, &size, 0)) {
120 printf(": can't map i/o space\n");
121 return;
122 }
123
124 /*
125 * XXX need some memory for mapping pcmcia cards into. Ideally, this
126 * would be completely dynamic. Practically this doesn't work,
127 * because the extent mapper doesn't know about all the devices all
128 * the time. With ISA we could finesse the issue by specifying the
129 * memory region in the config line. We can't do that here, so we
130 * cheat for now. Jason Thorpe, you are my Savior, come up with a fix
131 * :-)
132 */
133
134 /* Map mem space. */
135 if (bus_space_map(memt, 0xd0000, 0x10000, 0, &memh)) {
136 printf(": can't map mem space");
137 bus_space_unmap(sc->iot, sc->ioh, size);
138 return;
139 }
140
141 sc->membase = 0xd0000;
142 sc->subregionmask = (1 << (0x10000 / PCIC_MEM_PAGESIZE)) - 1;
143
144 /* same deal for io allocation */
145
146 sc->iobase = 0x400;
147 sc->iosize = 0xbff;
148
149 /* end XXX */
150
151 sc->pct = (pcmcia_chipset_tag_t) & pcic_pci_functions;
152
153 sc->memt = memt;
154 sc->memh = memh;
155
156 printf("\n");
157 pcic_attach(sc);
158 pcic_attach_sockets(sc);
159
160 /*
161 * Check to see if we're using PCI or ISA interrupts. I don't
162 * know of any i386 systems that use the 6729 in PCI interrupt
163 * mode, but maybe when the PCMCIA code runs on other platforms
164 * we'll need to fix this.
165 */
166 pcic_write(&sc->handle[0], PCIC_CIRRUS_EXTENDED_INDEX,
167 PCIC_CIRRUS_EXT_CONTROL_1);
168 if ((pcic_read(&sc->handle[0], PCIC_CIRRUS_EXTENDED_DATA) &
169 PCIC_CIRRUS_EXT_CONTROL_1_PCI_INTR_MASK)) {
170 printf("%s: PCI interrupts not supported\n",
171 sc->dev.dv_xname);
172 return;
173 }
174
175 psc->intr_est = pcic_pci_machdep_intr_est(pc);
176
177 irq = pcic_intr_find(sc, IST_EDGE);
178
179 /* Map and establish the interrupt. */
180 if (irq) {
181 sc->ih = pcic_pci_machdep_pcic_intr_establish(sc, pcic_intr);
182 if (sc->ih == NULL) {
183 printf("%s: couldnt map interrupt\n", sc->dev.dv_xname);
184 bus_space_unmap(memt, memh, 0x10000);
185 bus_space_unmap(sc->iot, sc->ioh, size);
186 return;
187 }
188 }
189 sc->irq = irq;
190
191 if (irq) {
192 printf("%s: irq %d, ", sc->dev.dv_xname, irq);
193
194 /* Set up the pcic to interrupt on card detect. */
195 for (i = 0; i < PCIC_NSLOTS; i++) {
196 h = &sc->handle[i];
197 if (h->flags & PCIC_FLAG_SOCKETP) {
198 pcic_write(h, PCIC_CSC_INTR,
199 (sc->irq << PCIC_CSC_INTR_IRQ_SHIFT) |
200 PCIC_CSC_INTR_CD_ENABLE);
201 powerhook_establish(pcic_power, h);
202 }
203 }
204 } else
205 printf("%s: no irq, ", sc->dev.dv_xname);
206
207 printf("polling enabled\n");
208 if (sc->poll_established == 0) {
209 timeout_set(&sc->poll_timeout, pcic_poll_intr, sc);
210 timeout_add(&sc->poll_timeout, hz / 2);
211 sc->poll_established = 1;
212 }
213 }