vga_pci.c revision 1.52.4.1 1 /* $NetBSD: vga_pci.c,v 1.52.4.1 2011/02/08 16:19:53 bouyer Exp $ */
2
3 /*
4 * Copyright (c) 1995, 1996 Carnegie-Mellon University.
5 * All rights reserved.
6 *
7 * Author: Chris G. Demetriou
8 *
9 * Permission to use, copy, modify and distribute this software and
10 * its documentation is hereby granted, provided that both the copyright
11 * notice and this permission notice appear in all copies of the
12 * software, derivative works or modified versions, and any portions
13 * thereof, and that both notices appear in supporting documentation.
14 *
15 * CARNEGIE MELLON ALLOWS FREE USE OF THIS SOFTWARE IN ITS "AS IS"
16 * CONDITION. CARNEGIE MELLON DISCLAIMS ANY LIABILITY OF ANY KIND
17 * FOR ANY DAMAGES WHATSOEVER RESULTING FROM THE USE OF THIS SOFTWARE.
18 *
19 * Carnegie Mellon requests users of this software to return to
20 *
21 * Software Distribution Coordinator or Software.Distribution (at) CS.CMU.EDU
22 * School of Computer Science
23 * Carnegie Mellon University
24 * Pittsburgh PA 15213-3890
25 *
26 * any improvements or extensions that they make and grant Carnegie the
27 * rights to redistribute these changes.
28 */
29
30 #include <sys/cdefs.h>
31 __KERNEL_RCSID(0, "$NetBSD: vga_pci.c,v 1.52.4.1 2011/02/08 16:19:53 bouyer Exp $");
32
33 #include <sys/param.h>
34 #include <sys/systm.h>
35 #include <sys/kernel.h>
36 #include <sys/device.h>
37 #include <sys/malloc.h>
38
39 #include <dev/pci/pcireg.h>
40 #include <dev/pci/pcivar.h>
41 #include <dev/pci/pcidevs.h>
42 #include <dev/pci/pciio.h>
43
44 #include <dev/ic/mc6845reg.h>
45 #include <dev/ic/pcdisplayvar.h>
46 #include <dev/ic/vgareg.h>
47 #include <dev/ic/vgavar.h>
48 #include <dev/pci/vga_pcivar.h>
49
50 #include <dev/isa/isareg.h> /* For legacy VGA address ranges */
51
52 #include <dev/wscons/wsconsio.h>
53 #include <dev/wscons/wsdisplayvar.h>
54 #include <dev/pci/wsdisplay_pci.h>
55
56 #include "opt_vga.h"
57
58 #ifdef VGA_POST
59 # if defined(__i386__) || defined(__amd64__)
60 # include "acpica.h"
61 # endif
62 #include <x86/vga_post.h>
63 #endif
64
65 #define NBARS 6 /* number of PCI BARs */
66
67 struct vga_bar {
68 bus_addr_t vb_base;
69 bus_size_t vb_size;
70 pcireg_t vb_type;
71 int vb_flags;
72 };
73
74 struct vga_pci_softc {
75 struct vga_softc sc_vga;
76
77 pci_chipset_tag_t sc_pc;
78 pcitag_t sc_pcitag;
79
80 struct vga_bar sc_bars[NBARS];
81 struct vga_bar sc_rom;
82
83 #ifdef VGA_POST
84 struct vga_post *sc_posth;
85 #endif
86
87 struct pci_attach_args sc_paa;
88 };
89
90 static int vga_pci_match(device_t, cfdata_t, void *);
91 static void vga_pci_attach(device_t, device_t, void *);
92 static int vga_pci_rescan(device_t, const char *, const int *);
93 static int vga_pci_lookup_quirks(struct pci_attach_args *);
94 static bool vga_pci_resume(device_t dv, const pmf_qual_t *);
95
96 CFATTACH_DECL2_NEW(vga_pci, sizeof(struct vga_pci_softc),
97 vga_pci_match, vga_pci_attach, NULL, NULL, vga_pci_rescan, NULL);
98
99 static int vga_pci_ioctl(void *, u_long, void *, int, struct lwp *);
100 static paddr_t vga_pci_mmap(void *, off_t, int);
101
102 static const struct vga_funcs vga_pci_funcs = {
103 vga_pci_ioctl,
104 vga_pci_mmap,
105 };
106
107 static const struct {
108 int id;
109 int quirks;
110 } vga_pci_quirks[] = {
111 {PCI_ID_CODE(PCI_VENDOR_SILMOTION, PCI_PRODUCT_SILMOTION_SM712),
112 VGA_QUIRK_NOFASTSCROLL},
113 {PCI_ID_CODE(PCI_VENDOR_CYRIX, PCI_PRODUCT_CYRIX_CX5530_VIDEO),
114 VGA_QUIRK_NOFASTSCROLL},
115 };
116
117 static const struct {
118 int vid;
119 int quirks;
120 } vga_pci_vquirks[] = {
121 {PCI_VENDOR_ATI, VGA_QUIRK_ONEFONT},
122 };
123
124 static int
125 vga_pci_lookup_quirks(struct pci_attach_args *pa)
126 {
127 int i;
128
129 for (i = 0; i < sizeof(vga_pci_quirks) / sizeof (vga_pci_quirks[0]);
130 i++) {
131 if (vga_pci_quirks[i].id == pa->pa_id)
132 return (vga_pci_quirks[i].quirks);
133 }
134 for (i = 0; i < sizeof(vga_pci_vquirks) / sizeof (vga_pci_vquirks[0]);
135 i++) {
136 if (vga_pci_vquirks[i].vid == PCI_VENDOR(pa->pa_id))
137 return (vga_pci_vquirks[i].quirks);
138 }
139 return (0);
140 }
141
142 static int
143 vga_pci_match(device_t parent, cfdata_t match, void *aux)
144 {
145 struct pci_attach_args *pa = aux;
146 int potential;
147
148 potential = 0;
149
150 /*
151 * If it's prehistoric/vga or display/vga, we might match.
152 * For the console device, this is just a sanity check.
153 */
154 if (PCI_CLASS(pa->pa_class) == PCI_CLASS_PREHISTORIC &&
155 PCI_SUBCLASS(pa->pa_class) == PCI_SUBCLASS_PREHISTORIC_VGA)
156 potential = 1;
157 if (PCI_CLASS(pa->pa_class) == PCI_CLASS_DISPLAY &&
158 PCI_SUBCLASS(pa->pa_class) == PCI_SUBCLASS_DISPLAY_VGA)
159 potential = 1;
160
161 if (!potential)
162 return (0);
163
164 /* check whether it is disabled by firmware */
165 if ((pci_conf_read(pa->pa_pc, pa->pa_tag, PCI_COMMAND_STATUS_REG)
166 & (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MEM_ENABLE))
167 != (PCI_COMMAND_IO_ENABLE | PCI_COMMAND_MEM_ENABLE))
168 return (0);
169
170 /* If it's the console, we have a winner! */
171 if (vga_is_console(pa->pa_iot, WSDISPLAY_TYPE_PCIVGA))
172 return (1);
173
174 /*
175 * If we might match, make sure that the card actually looks OK.
176 */
177 if (!vga_common_probe(pa->pa_iot, pa->pa_memt))
178 return (0);
179
180 return (1);
181 }
182
183 static void
184 vga_pci_attach(device_t parent, device_t self, void *aux)
185 {
186 struct vga_pci_softc *psc = device_private(self);
187 struct vga_softc *sc = &psc->sc_vga;
188 struct pci_attach_args *pa = aux;
189 char devinfo[256];
190 int bar, reg;
191
192 sc->sc_dev = self;
193 psc->sc_pc = pa->pa_pc;
194 psc->sc_pcitag = pa->pa_tag;
195 psc->sc_paa = *pa;
196
197 pci_devinfo(pa->pa_id, pa->pa_class, 0, devinfo, sizeof(devinfo));
198 aprint_naive("\n");
199 aprint_normal(": %s (rev. 0x%02x)\n", devinfo,
200 PCI_REVISION(pa->pa_class));
201
202 /*
203 * Gather info about all the BARs. These are used to allow
204 * the X server to map the VGA device.
205 */
206 for (bar = 0; bar < NBARS; bar++) {
207 reg = PCI_MAPREG_START + (bar * 4);
208 if (!pci_mapreg_probe(psc->sc_pc, psc->sc_pcitag, reg,
209 &psc->sc_bars[bar].vb_type)) {
210 /* there is no valid mapping register */
211 continue;
212 }
213 if (PCI_MAPREG_TYPE(psc->sc_bars[bar].vb_type) ==
214 PCI_MAPREG_TYPE_IO) {
215 /* Don't bother fetching I/O BARs. */
216 continue;
217 }
218 #ifndef __LP64__
219 if (PCI_MAPREG_MEM_TYPE(psc->sc_bars[bar].vb_type) ==
220 PCI_MAPREG_MEM_TYPE_64BIT) {
221 /* XXX */
222 aprint_error_dev(self,
223 "WARNING: ignoring 64-bit BAR @ 0x%02x\n", reg);
224 bar++;
225 continue;
226 }
227 #endif
228 if (pci_mapreg_info(psc->sc_pc, psc->sc_pcitag, reg,
229 psc->sc_bars[bar].vb_type,
230 &psc->sc_bars[bar].vb_base,
231 &psc->sc_bars[bar].vb_size,
232 &psc->sc_bars[bar].vb_flags))
233 aprint_error_dev(self,
234 "WARNING: strange BAR @ 0x%02x\n", reg);
235 }
236
237 /* XXX Expansion ROM? */
238
239 vga_common_attach(sc, pa->pa_iot, pa->pa_memt, WSDISPLAY_TYPE_PCIVGA,
240 vga_pci_lookup_quirks(pa), &vga_pci_funcs);
241
242 #ifdef VGA_POST
243 psc->sc_posth = vga_post_init(pa->pa_bus, pa->pa_device, pa->pa_function);
244 if (psc->sc_posth == NULL)
245 aprint_error_dev(self, "WARNING: could not prepare POST handler\n");
246 #endif
247
248 /*
249 * XXX Do not use the generic PCI framework for now as
250 * XXX it would power down the device when the console
251 * XXX is still using it.
252 */
253 if (!pmf_device_register(self, NULL, vga_pci_resume))
254 aprint_error_dev(self, "couldn't establish power handler\n");
255 config_found_ia(self, "drm", aux, vga_drm_print);
256 }
257
258 static int
259 vga_pci_rescan(device_t self, const char *ifattr, const int *locators)
260 {
261 struct vga_pci_softc *psc = device_private(self);
262
263 config_found_ia(self, "drm", &psc->sc_paa, vga_drm_print);
264
265 return 0;
266 }
267
268 static bool
269 vga_pci_resume(device_t dv, const pmf_qual_t *qual)
270 {
271 #if defined(VGA_POST) && NACPICA > 0
272 extern int acpi_md_vbios_reset;
273 #endif
274 struct vga_pci_softc *sc = device_private(dv);
275
276 vga_resume(&sc->sc_vga);
277
278 #if defined(VGA_POST) && NACPICA > 0
279 if (sc->sc_posth != NULL && acpi_md_vbios_reset == 2)
280 vga_post_call(sc->sc_posth);
281 #endif
282
283 return true;
284 }
285
286 int
287 vga_pci_cnattach(bus_space_tag_t iot, bus_space_tag_t memt,
288 pci_chipset_tag_t pc, int bus, int device,
289 int function)
290 {
291
292 return (vga_cnattach(iot, memt, WSDISPLAY_TYPE_PCIVGA, 0));
293 }
294
295 int
296 vga_drm_print(void *aux, const char *pnp)
297 {
298 if (pnp)
299 aprint_normal("drm at %s", pnp);
300 return (UNCONF);
301 }
302
303
304 static int
305 vga_pci_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
306 {
307 struct vga_config *vc = v;
308 struct vga_pci_softc *psc = (void *) vc->softc;
309
310 switch (cmd) {
311 /* PCI config read/write passthrough. */
312 case PCI_IOC_CFGREAD:
313 case PCI_IOC_CFGWRITE:
314 return pci_devioctl(psc->sc_pc, psc->sc_pcitag,
315 cmd, data, flag, l);
316
317 case WSDISPLAYIO_GET_BUSID:
318 return wsdisplayio_busid_pci(vc->softc->sc_dev,
319 psc->sc_pc, psc->sc_pcitag, data);
320
321 default:
322 return EPASSTHROUGH;
323 }
324 }
325
326 static paddr_t
327 vga_pci_mmap(void *v, off_t offset, int prot)
328 {
329 struct vga_config *vc = v;
330 struct vga_pci_softc *psc = (void *) vc->softc;
331 struct vga_bar *vb;
332 int bar;
333
334 for (bar = 0; bar < NBARS; bar++) {
335 vb = &psc->sc_bars[bar];
336 if (vb->vb_size == 0)
337 continue;
338 if (offset >= vb->vb_base &&
339 offset < (vb->vb_base + vb->vb_size)) {
340 /* XXX This the right thing to do with flags? */
341 return (bus_space_mmap(vc->hdl.vh_memt, vb->vb_base,
342 (offset - vb->vb_base), prot, vb->vb_flags));
343 }
344 }
345
346 /* XXX Expansion ROM? */
347
348 /*
349 * Allow mmap access to the legacy ISA hole. This is where
350 * the legacy video BIOS will be located, and also where
351 * the legacy VGA display buffer is located.
352 *
353 * XXX Security implications, here?
354 */
355 if (offset >= IOM_BEGIN && offset < IOM_END)
356 return (bus_space_mmap(vc->hdl.vh_memt, IOM_BEGIN,
357 (offset - IOM_BEGIN), prot, 0));
358
359 #ifdef PCI_MAGIC_IO_RANGE
360 /* allow to map our IO space on non-x86 machines */
361 if ((offset >= PCI_MAGIC_IO_RANGE) &&
362 (offset < PCI_MAGIC_IO_RANGE + 0x10000)) {
363 return bus_space_mmap(vc->hdl.vh_iot,
364 offset - PCI_MAGIC_IO_RANGE,
365 0, prot, BUS_SPACE_MAP_LINEAR);
366 }
367 #endif
368
369 /* Range not found. */
370 return (-1);
371 }
372