xref: /netbsd-src/sys/dev/pci/sisfb.c (revision 28c57159b6e8619b72ca9c78a0e5a04dc48bed36)
1 /*	$OpenBSD: sisfb.c,v 1.2 2010/12/26 15:40:59 miod Exp $	*/
2 
3 /*
4  * Copyright (c) 2010 Miodrag Vallat.
5  *
6  * Permission to use, copy, modify, and distribute this software for any
7  * purpose with or without fee is hereby granted, provided that the above
8  * copyright notice and this permission notice appear in all copies.
9  *
10  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
11  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
12  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
13  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
14  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
15  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
16  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
17  */
18 
19 /*
20  * Minimalistic driver for the SIS315 Pro frame buffer found on the
21  * Lemote Fuloong 2F systems.
22  * Does not support accelaration, mode change, secondary output, or
23  * anything fancy.
24  */
25 
26 #include <sys/cdefs.h>
27 __KERNEL_RCSID(0, "$NetBSD: sisfb.c,v 1.9 2023/08/08 06:57:20 mrg Exp $");
28 
29 #include <sys/param.h>
30 #include <sys/systm.h>
31 #include <sys/device.h>
32 #include <sys/bus.h>
33 #include <sys/kauth.h>
34 
35 #include <uvm/uvm_extern.h>
36 
37 #include <dev/pci/pcireg.h>
38 #include <dev/pci/pcivar.h>
39 #include <dev/pci/pcidevs.h>
40 #include <dev/pci/pciio.h>
41 
42 #include <dev/videomode/videomode.h>
43 
44 #include <dev/wscons/wsdisplayvar.h>
45 #include <dev/wscons/wsconsio.h>
46 #include <dev/wsfont/wsfont.h>
47 #include <dev/rasops/rasops.h>
48 #include <dev/wscons/wsdisplay_vconsvar.h>
49 #include <dev/pci/wsdisplay_pci.h>
50 
51 #include <dev/i2c/i2cvar.h>
52 
53 #include <dev/pci/sisfb.h>
54 
55 struct sisfb_softc;
56 
57 /* minimal frame buffer information, suitable for early console */
58 
59 struct sisfb {
60 	struct sisfb_softc	*sc;
61 	uint8_t			 cmap[256 * 3];
62 
63 	bus_space_tag_t		 fbt;
64 	bus_space_handle_t	 fbh;
65 	bus_addr_t	 	 fbbase;
66 	bus_size_t	 	 fbsize;
67 
68 	bus_space_tag_t		 mmiot;
69 	bus_space_handle_t	 mmioh;
70 	bus_addr_t	 	 mmiobase;
71 	bus_size_t	 	 mmiosize;
72 
73 	bus_space_tag_t		 iot;
74 	bus_space_handle_t	 ioh;
75 	bus_addr_t	 	 iobase;
76 	bus_size_t	 	 iosize;
77 
78 	struct vcons_screen	 vcs;
79 	struct wsscreen_descr	 wsd;
80 
81 	int			 fb_depth;
82 	int			 fb_width;
83 	int			 fb_height;
84 	int			 fb_stride;
85 	void 			 *fb_addr;
86 };
87 
88 struct sisfb_softc {
89 	device_t		 sc_dev;
90 	struct sisfb		*sc_fb;
91 	struct sisfb		 sc_fb_store;
92 
93 	struct vcons_data	vd;
94 	struct wsscreen_list	sc_wsl;
95 	const struct wsscreen_descr	*sc_scrlist[1];
96 	int			sc_nscr;
97 	int			sc_mode;
98 
99 	pci_chipset_tag_t	sc_pc;
100 	pcitag_t		sc_pt;
101 };
102 
103 int	sisfb_match(device_t, cfdata_t, void *);
104 void	sisfb_attach(device_t, device_t, void *);
105 
106 CFATTACH_DECL_NEW(sisfb, sizeof(struct sisfb_softc),
107     sisfb_match, sisfb_attach, NULL, NULL);
108 
109 
110 int	sisfb_alloc_screen(void *, const struct wsscreen_descr *, void **, int *,
111 	    int *, long *);
112 void	sisfb_free_screen(void *, void *);
113 int	sisfb_ioctl(void *, void *, u_long, void *, int, struct lwp *);
114 int	sisfb_show_screen(void *, void *, int, void (*)(void *, int, int),
115 	    void *);
116 paddr_t	sisfb_mmap(void *, void *, off_t, int);
117 void	sisfb_init_screen(void *, struct vcons_screen *, int, long *);
118 
119 
120 struct wsdisplay_accessops sisfb_accessops = {
121 	sisfb_ioctl,
122 	sisfb_mmap,
123 	sisfb_alloc_screen,
124 	sisfb_free_screen,
125 	sisfb_show_screen,
126 	NULL,	/* load_font */
127 	NULL,	/* poolc */
128 	NULL	/* scroll */
129 };
130 
131 int	sisfb_getcmap(uint8_t *, struct wsdisplay_cmap *);
132 void	sisfb_loadcmap(struct sisfb *, int, int);
133 int	sisfb_putcmap(uint8_t *, struct wsdisplay_cmap *);
134 int	sisfb_setup(struct sisfb *);
135 
136 static struct sisfb sisfbcn;
137 
138 /*
139  * Control Register access
140  *
141  * These are 8 bit registers; the choice of larger width types is intentional.
142  */
143 
144 #define	SIS_VGA_PORT_OFFSET	0x380
145 
146 #define	SEQ_ADDR		(0x3c4 - SIS_VGA_PORT_OFFSET)
147 #define	SEQ_DATA		(0x3c5 - SIS_VGA_PORT_OFFSET)
148 #define	DAC_ADDR		(0x3c8 - SIS_VGA_PORT_OFFSET)
149 #define	DAC_DATA		(0x3c9 - SIS_VGA_PORT_OFFSET)
150 #undef	CRTC_ADDR
151 #define	CRTC_ADDR		(0x3d4 - SIS_VGA_PORT_OFFSET)
152 #define	CRTC_DATA		(0x3d5 - SIS_VGA_PORT_OFFSET)
153 
154 #define	CRTC_HDISPLE	0x01	/* horizontal display end */
155 #define	CRTC_OVERFLL	0x07	/* overflow low */
156 #define	CRTC_STARTADRH	0x0C	/* linear start	address mid */
157 #define	CRTC_STARTADRL	0x0D	/* linear start	address low */
158 #define	CRTC_VDE	0x12	/* vertical display end */
159 
160 
161 static inline uint sisfb_crtc_read(struct sisfb *, uint);
162 static inline void sisfb_crtc_write(struct sisfb *, uint, uint);
163 static inline uint sisfb_seq_read(struct sisfb *, uint);
164 static inline void sisfb_seq_write(struct sisfb *, uint, uint);
165 
166 static inline uint
sisfb_crtc_read(struct sisfb * fb,uint idx)167 sisfb_crtc_read(struct sisfb *fb, uint idx)
168 {
169 	uint val;
170 	bus_space_write_1(fb->iot, fb->ioh, CRTC_ADDR, idx);
171 	val = bus_space_read_1(fb->iot, fb->ioh, CRTC_DATA);
172 #ifdef SIS_DEBUG
173 	printf("CRTC %04x -> %02x\n", idx, val);
174 #endif
175 	return val;
176 }
177 
178 static inline void
sisfb_crtc_write(struct sisfb * fb,uint idx,uint val)179 sisfb_crtc_write(struct sisfb *fb, uint idx, uint val)
180 {
181 #ifdef SIS_DEBUG
182 	printf("CRTC %04x <- %02x\n", idx, val);
183 #endif
184 	bus_space_write_1(fb->iot, fb->ioh, CRTC_ADDR, idx);
185 	bus_space_write_1(fb->iot, fb->ioh, CRTC_DATA, val);
186 }
187 
188 static inline uint
sisfb_seq_read(struct sisfb * fb,uint idx)189 sisfb_seq_read(struct sisfb *fb, uint idx)
190 {
191 	uint val;
192 	bus_space_write_1(fb->iot, fb->ioh, SEQ_ADDR, idx);
193 	val = bus_space_read_1(fb->iot, fb->ioh, SEQ_DATA);
194 #ifdef SIS_DEBUG
195 	printf("SEQ %04x -> %02x\n", idx, val);
196 #endif
197 	return val;
198 }
199 
200 static inline void
sisfb_seq_write(struct sisfb * fb,uint idx,uint val)201 sisfb_seq_write(struct sisfb *fb, uint idx, uint val)
202 {
203 #ifdef SIS_DEBUG
204 	printf("SEQ %04x <- %02x\n", idx, val);
205 #endif
206 	bus_space_write_1(fb->iot, fb->ioh, SEQ_ADDR, idx);
207 	bus_space_write_1(fb->iot, fb->ioh, SEQ_DATA, val);
208 }
209 
210 int
sisfb_match(device_t parent,cfdata_t match,void * aux)211 sisfb_match(device_t parent, cfdata_t match, void *aux)
212 {
213 	struct pci_attach_args *pa = (struct pci_attach_args *)aux;
214 
215 	if (PCI_CLASS(pa->pa_class) != PCI_CLASS_DISPLAY)
216 		return 0;
217 
218 	if (PCI_VENDOR(pa->pa_id) != PCI_VENDOR_SIS)
219 		return 0;
220 
221 	if (PCI_PRODUCT(pa->pa_id) == PCI_PRODUCT_SIS_315PRO_VGA)
222 		return 100;
223 	return (0);
224 }
225 
226 void
sisfb_attach(device_t parent,device_t self,void * aux)227 sisfb_attach(device_t parent, device_t self, void *aux)
228 {
229 	struct sisfb_softc *sc = device_private(self);
230 	struct pci_attach_args *pa = (struct pci_attach_args *)aux;
231 	struct rasops_info *ri;
232 	struct wsemuldisplaydev_attach_args waa;
233 	struct sisfb *fb;
234 	int console;
235 	unsigned long defattr;
236 
237 	sc->sc_dev = self;
238 	console = sisfbcn.vcs.scr_ri.ri_hw != NULL;
239 
240 	if (console)
241 		fb = &sisfbcn;
242 	else {
243 		fb = &sc->sc_fb_store;
244 	}
245 
246 	sc->sc_fb = fb;
247 	fb->sc = sc;
248 
249 	pci_aprint_devinfo(pa, NULL);
250 
251 	sc->sc_pt = pa->pa_tag;
252 	sc->sc_pc = pa->pa_pc;
253 
254 	if (!console) {
255 		fb->fbt = pa->pa_memt;
256 		fb->mmiot = pa->pa_memt;
257 		fb->iot = pa->pa_iot;
258 		if (pci_mapreg_map(pa, PCI_MAPREG_START, PCI_MAPREG_TYPE_MEM,
259 		    BUS_SPACE_MAP_LINEAR, &fb->fbt, &fb->fbh,
260 		    &fb->fbbase, &fb->fbsize) != 0) {
261 			aprint_error_dev(self, ": can't map frame buffer\n");
262 			return;
263 		}
264 
265 		if (pci_mapreg_map(pa, PCI_MAPREG_START + 4,
266 		    PCI_MAPREG_TYPE_MEM, 0,
267 		    &fb->mmiot, &fb->mmioh, &fb->mmiobase, &fb->mmiosize) != 0) {
268 			aprint_error_dev(self, ": can't map mmio area\n");
269 			goto fail1;
270 		}
271 
272 		if (pci_mapreg_map(pa, PCI_MAPREG_START + 8, PCI_MAPREG_TYPE_IO,
273 		    0, &fb->iot, &fb->ioh, &fb->iobase, &fb->iosize) != 0) {
274 			aprint_error_dev(self, ": can't map registers\n");
275 			goto fail2;
276 		}
277 
278 
279 		if (sisfb_setup(sc->sc_fb) != 0) {
280 			aprint_error_dev(self, ": can't setup frame buffer\n");
281 			goto fail3;
282 		}
283 	}
284 
285 	aprint_normal_dev(self, ": %dx%dx%d frame buffer\n",
286 	    fb->vcs.scr_ri.ri_width, fb->vcs.scr_ri.ri_height,
287 	    fb->vcs.scr_ri.ri_depth);
288 
289 	aprint_debug_dev(self, ": fb 0x%" PRIxBUSSIZE "@0x%" PRIxBUSADDR
290 	    ", mmio 0x%" PRIxBUSSIZE "@0x%" PRIxBUSADDR
291 	    ", io 0x%" PRIxBUSSIZE "@0x%" PRIxBUSADDR "\n",
292 	    fb->fbsize, fb->fbbase,
293 	    fb->mmiosize, fb->mmiobase,
294 	    fb->iosize, fb->iobase);
295 
296 	fb->wsd = (struct wsscreen_descr){
297 		"default",
298 		0, 0,
299 		NULL,
300 		8, 16,
301 		WSSCREEN_WSCOLORS | WSSCREEN_HILIT,
302 		NULL
303 	};
304 	sc->sc_scrlist[0] = &fb->wsd;
305 	sc->sc_wsl = (struct wsscreen_list){1, sc->sc_scrlist};
306 	sc->sc_mode = WSDISPLAYIO_MODE_EMUL;
307 
308 
309 	vcons_init(&sc->vd, sc, &fb->wsd, &sisfb_accessops);
310 	sc->vd.init_screen = sisfb_init_screen;
311 
312 	ri = &fb->vcs.scr_ri;
313 	if (console) {
314 		vcons_init_screen(&sc->vd, &fb->vcs, 1, &defattr);
315 		fb->vcs.scr_flags |= VCONS_SCREEN_IS_STATIC;
316 		fb->wsd.textops = &ri->ri_ops;
317 		fb->wsd.capabilities = ri->ri_caps;
318 		fb->wsd.nrows = ri->ri_rows;
319 		fb->wsd.ncols = ri->ri_cols;
320 		wsdisplay_cnattach(&fb->wsd, ri, 0, 0, defattr);
321 		vcons_replay_msgbuf(&fb->vcs);
322 	} else {
323 		/*
324 		 * since we're not the console we can postpone the rest
325 		 * until someone actually allocates a screen for us
326 		 */
327 		(*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
328 	}
329 
330 	waa.console = console;
331 	waa.scrdata = &sc->sc_wsl;
332 	waa.accessops = &sisfb_accessops;
333 	waa.accesscookie = &sc->vd;
334 
335 	config_found(sc->sc_dev, &waa, wsemuldisplaydevprint, CFARGS_NONE);
336 	return;
337 
338 fail3:
339 	bus_space_unmap(fb->iot, fb->ioh, fb->iosize);
340 fail2:
341 	bus_space_unmap(fb->mmiot, fb->mmioh, fb->mmiosize);
342 fail1:
343 	bus_space_unmap(fb->fbt, fb->fbh, fb->fbsize);
344 }
345 
346 /*
347  * wsdisplay accesops
348  */
349 
350 int
sisfb_alloc_screen(void * v,const struct wsscreen_descr * type,void ** cookiep,int * curxp,int * curyp,long * attrp)351 sisfb_alloc_screen(void *v, const struct wsscreen_descr *type, void **cookiep,
352     int *curxp, int *curyp, long *attrp)
353 {
354 	struct sisfb_softc *sc = (struct sisfb_softc *)v;
355 	struct rasops_info *ri = &sc->sc_fb->vcs.scr_ri;
356 
357 	if (sc->sc_nscr > 0)
358 		return ENOMEM;
359 
360 	*cookiep = ri;
361 	*curxp = *curyp = 0;
362 	ri->ri_ops.allocattr(ri, 0, 0, 0, attrp);
363 	sc->sc_nscr++;
364 
365 	return 0;
366 }
367 
368 void
sisfb_free_screen(void * v,void * cookie)369 sisfb_free_screen(void *v, void *cookie)
370 {
371 	struct sisfb_softc *sc = (struct sisfb_softc *)v;
372 
373 	sc->sc_nscr--;
374 }
375 
376 int
sisfb_ioctl(void * v,void * vs,u_long cmd,void * data,int flags,struct lwp * l)377 sisfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flags,
378     struct lwp *l)
379 {
380 	struct vcons_data *vd = v;
381 	struct sisfb_softc *sc = vd->cookie;
382 	struct sisfb *fb = sc->sc_fb;
383 	struct rasops_info *ri = &fb->vcs.scr_ri;
384 	struct wsdisplay_cmap *cm;
385 	struct wsdisplay_fbinfo *wdf;
386 	int rc;
387 
388 	switch (cmd) {
389 	case WSDISPLAYIO_GTYPE:
390 		*(uint *)data = WSDISPLAY_TYPE_PCIMISC;
391 		return 0;
392 	case WSDISPLAYIO_GINFO:
393 		if (vd->active != NULL) {
394 			wdf = (struct wsdisplay_fbinfo *)data;
395 			wdf->width = ri->ri_width;
396 			wdf->height = ri->ri_height;
397 			wdf->depth = ri->ri_depth;
398 			wdf->cmsize = 256;
399 			return 0;
400 		} else
401 			return ENODEV;
402 	case WSDISPLAYIO_LINEBYTES:
403 		*(uint *)data = ri->ri_stride;
404 		return 0;
405 	case WSDISPLAYIO_GETCMAP:
406 		cm = (struct wsdisplay_cmap *)data;
407 		rc = sisfb_getcmap(fb->cmap, cm);
408 		return rc;
409 	case WSDISPLAYIO_PUTCMAP:
410 		cm = (struct wsdisplay_cmap *)data;
411 		rc = sisfb_putcmap(fb->cmap, cm);
412 		if (rc != 0)
413 			return rc;
414 		if (ri->ri_depth == 8)
415 			sisfb_loadcmap(fb, cm->index, cm->count);
416 		return 0;
417 	case WSDISPLAYIO_SMODE:
418 		sc->sc_mode = *(uint *)data;
419 		aprint_debug_dev(sc->sc_dev, ": switching to ");
420 		switch(sc->sc_mode) {
421 		case WSDISPLAYIO_MODE_EMUL:
422 			aprint_debug("WSDISPLAYIO_MODE_EMUL\n");
423 			break;
424 		case WSDISPLAYIO_MODE_MAPPED:
425 			aprint_debug("WSDISPLAYIO_MODE_MAPPED\n");
426 			break;
427 		case WSDISPLAYIO_MODE_DUMBFB:
428 			aprint_debug("WSDISPLAYIO_MODE_DUMBFB\n");
429 			break;
430 		default:
431 			aprint_debug("unknown mode %d\n", sc->sc_mode);
432 			return EINVAL;
433 		}
434 		return 0;
435 	case WSDISPLAYIO_GMODE:
436 		*(uint *)data = sc->sc_mode;
437 		return 0;
438 	case PCI_IOC_CFGREAD:
439 	case PCI_IOC_CFGWRITE:
440 		return pci_devioctl(sc->sc_pc, sc->sc_pt, cmd, data, flags, l);
441 	case WSDISPLAYIO_GET_BUSID:
442 		return wsdisplayio_busid_pci(sc->sc_dev, sc->sc_pc,
443 		    sc->sc_pt, data);
444 	}
445 	return EPASSTHROUGH;
446 }
447 
448 int
sisfb_show_screen(void * v,void * cookie,int waitok,void (* cb)(void *,int,int),void * cbarg)449 sisfb_show_screen(void *v, void *cookie, int waitok,
450     void (*cb)(void *, int, int), void *cbarg)
451 {
452 	return 0;
453 }
454 
455 paddr_t
sisfb_mmap(void * v,void * vs,off_t offset,int prot)456 sisfb_mmap(void *v, void *vs, off_t offset, int prot)
457 {
458 	struct vcons_data *vd = v;
459 	struct sisfb_softc *sc = vd->cookie;
460 	struct rasops_info *ri = &sc->sc_fb->vcs.scr_ri;
461 	struct sisfb *fb = sc->sc_fb;
462 	const uintptr_t fb_offset =
463 	  (uintptr_t)bus_space_vaddr(fb->fbt, fb->fbh) - (uintptr_t)fb->fb_addr;
464 	paddr_t pa;
465 
466 	if (sc->sc_mode != WSDISPLAYIO_MODE_MAPPED) {
467 		if (offset >= 0 && offset < ri->ri_stride * ri->ri_height) {
468 			pa = bus_space_mmap(fb->fbt,
469 			    fb->fbbase, fb_offset + offset,
470 			    prot, BUS_SPACE_MAP_LINEAR);
471 			return pa;
472 		}
473 		return -1;
474 	}
475 
476 	if (kauth_authorize_machdep(kauth_cred_get(),
477 	    KAUTH_MACHDEP_UNMANAGEDMEM, NULL, NULL, NULL, NULL) != 0) {
478 		aprint_error_dev(sc->sc_dev, "mmap() rejected.\n");
479 		return -1;
480 	}
481 
482 	if (offset >= (fb->fbbase & ~PAGE_MASK) &&
483 	    offset <= ((fb->fbbase + fb->fbsize + PAGE_SIZE - 1) & ~PAGE_MASK)) {
484 		pa = bus_space_mmap(fb->fbt, fb->fbbase, offset - fb->fbbase,
485 		    prot, BUS_SPACE_MAP_LINEAR|BUS_SPACE_MAP_PREFETCHABLE);
486 		return pa;
487 	}
488 	if (offset >= (fb->mmiobase & ~PAGE_MASK) &&
489 	    offset <= ((fb->mmiobase + fb->mmiosize + PAGE_SIZE - 1) & ~PAGE_MASK)) {
490 		pa = bus_space_mmap(fb->mmiot, fb->mmiobase, offset - fb->mmiobase,
491 		    prot, BUS_SPACE_MAP_LINEAR);
492 		return pa;
493 	}
494 	if (offset >= (fb->iobase & ~PAGE_MASK) &&
495 	    offset <= ((fb->iobase + fb->iosize + PAGE_SIZE - 1) & ~PAGE_MASK)) {
496 		pa = bus_space_mmap(fb->iot, fb->iobase, offset - fb->iobase,
497 		    prot, BUS_SPACE_MAP_LINEAR);
498 		return pa;
499 	}
500 	return -1;
501 }
502 
503 void
sisfb_init_screen(void * cookie,struct vcons_screen * scr,int existing,long * defattr)504 sisfb_init_screen(void *cookie, struct vcons_screen *scr,
505     int existing, long *defattr)
506 {
507 	struct sisfb_softc *sc = cookie;
508 	struct sisfb *fb = sc->sc_fb;
509 	struct rasops_info *ri = &scr->scr_ri;
510 
511 	ri->ri_depth = fb->fb_depth;
512 	ri->ri_width = fb->fb_width;
513 	ri->ri_height = fb->fb_height;
514 	ri->ri_stride = fb->fb_stride;
515 	ri->ri_flg = RI_CENTER | RI_FULLCLEAR;
516 
517 	ri->ri_bits = fb->fb_addr;
518 
519 	if (existing) {
520 		ri->ri_flg |= RI_CLEAR;
521 	}
522 
523 	rasops_init(ri, fb->fb_height / 8, fb->fb_width / 8);
524 	ri->ri_caps = WSSCREEN_WSCOLORS;
525 	rasops_reconfig(ri, fb->fb_height / ri->ri_font->fontheight,
526 		    fb->fb_width / ri->ri_font->fontwidth);
527 
528 	ri->ri_hw = scr;
529 }
530 
531 
532 /*
533  * Frame buffer initialization.
534  */
535 
536 int
sisfb_setup(struct sisfb * fb)537 sisfb_setup(struct sisfb *fb)
538 {
539 	struct rasops_info *ri = &fb->vcs.scr_ri;
540 	uint width, height, bpp;
541 	bus_size_t fbaddr;
542 	uint tmp;
543 
544 	/*
545 	 * Unlock access to extended registers.
546 	 */
547 
548 	sisfb_seq_write(fb, 0x05, 0x86);
549 
550 	/*
551 	 * Try and figure out display settings.
552 	 */
553 
554 	height = sisfb_crtc_read(fb, CRTC_VDE);
555 	tmp = sisfb_crtc_read(fb, CRTC_OVERFLL);
556 	if (ISSET(tmp, 1 << 1))
557 		height |= 1 << 8;
558 	if (ISSET(tmp, 1 << 6))
559 		height |= 1 << 9;
560 	tmp = sisfb_seq_read(fb, 0x0a);
561 	if (ISSET(tmp, 1 << 1))
562 		height |= 1 << 10;
563 	height++;
564 
565 	width = sisfb_crtc_read(fb, CRTC_HDISPLE);
566 	tmp = sisfb_seq_read(fb, 0x0b);
567 	if (ISSET(tmp, 1 << 2))
568 		width |= 1 << 8;
569 	if (ISSET(tmp, 1 << 3))
570 		width |= 1 << 9;
571 	width++;
572 	width <<= 3;
573 
574 #ifdef SIS_DEBUG
575 	printf("height %d width %d\n", height, width);
576 #endif
577 
578 	fbaddr = sisfb_crtc_read(fb, CRTC_STARTADRL) |
579 	    (sisfb_crtc_read(fb, CRTC_STARTADRH) << 8) |
580 	    (sisfb_seq_read(fb, 0x0d) << 16) |
581 	    ((sisfb_seq_read(fb, 0x37) & 0x03) << 24);
582 	fbaddr <<= 2;
583 #ifdef SIS_DEBUG
584 	printf("FBADDR %lx\n", fbaddr);
585 #endif
586 
587 	tmp = sisfb_seq_read(fb, 0x06);
588 	switch (tmp & 0x1c) {
589 	case 0x00:
590 		bpp = 8;
591 		break;
592 	case 0x04:
593 		bpp = 15;
594 		break;
595 	case 0x08:
596 		bpp = 16;
597 		break;
598 	case 0x10:
599 		bpp = 32;
600 		break;
601 	default:
602 		aprint_error("unknown bpp for 0x%x\n", tmp);
603 		return EINVAL;
604 	}
605 #ifdef SIS_DEBUG
606 	printf("BPP %d\n", bpp);
607 #endif
608 
609 	fb->fb_width = ri->ri_width = width;
610 	fb->fb_height = ri->ri_height = height;
611 	fb->fb_depth = ri->ri_depth = bpp;
612 	fb->fb_stride = ri->ri_stride = (ri->ri_width * ri->ri_depth) / 8;
613 	ri->ri_flg = /* RI_CENTER | RI_CLEAR | RI_FULLCLEAR */ RI_CENTER | RI_NO_AUTO;
614 	fb->fb_addr = ri->ri_bits =
615 	    (void *)((char *)bus_space_vaddr(fb->fbt, fb->fbh) + fbaddr);
616 	ri->ri_hw = fb;
617 
618 #ifdef SIS_DEBUG
619 	printf("ri_bits %p\n", ri->ri_bits);
620 #endif
621 
622 #ifdef __MIPSEL__
623 	/* swap B and R */
624 	switch (bpp) {
625 	case 15:
626 		ri->ri_rnum = 5;
627 		ri->ri_rpos = 10;
628 		ri->ri_gnum = 5;
629 		ri->ri_gpos = 5;
630 		ri->ri_bnum = 5;
631 		ri->ri_bpos = 0;
632 		break;
633 	case 16:
634 		ri->ri_rnum = 5;
635 		ri->ri_rpos = 11;
636 		ri->ri_gnum = 6;
637 		ri->ri_gpos = 5;
638 		ri->ri_bnum = 5;
639 		ri->ri_bpos = 0;
640 		break;
641 	}
642 #endif
643 
644 	bcopy(rasops_cmap, fb->cmap, sizeof(fb->cmap));
645 	if (bpp == 8) {
646 		sisfb_loadcmap(fb, 0, 256);
647 	}
648 
649 	rasops_init(ri, 25, 80);
650 	rasops_reconfig(ri, ri->ri_height / ri->ri_font->fontheight,
651 	    ri->ri_width / ri->ri_font->fontwidth);
652 
653 	fb->wsd.name = "std";
654 	fb->wsd.ncols = ri->ri_cols;
655 	fb->wsd.nrows = ri->ri_rows;
656 	fb->wsd.textops = &ri->ri_ops;
657 	fb->wsd.fontwidth = ri->ri_font->fontwidth;
658 	fb->wsd.fontheight = ri->ri_font->fontheight;
659 	fb->wsd.capabilities = ri->ri_caps;
660 
661 	return 0;
662 }
663 
664 /*
665  * Colormap handling routines.
666  */
667 
668 void
sisfb_loadcmap(struct sisfb * fb,int baseidx,int count)669 sisfb_loadcmap(struct sisfb *fb, int baseidx, int count)
670 {
671 	uint8_t *cmap = fb->cmap + baseidx * 3;
672 
673 	bus_space_write_1(fb->iot, fb->ioh, DAC_ADDR, baseidx);
674 	while (count-- != 0) {
675 		bus_space_write_1(fb->iot, fb->ioh, DAC_DATA, *cmap++ >> 2);
676 		bus_space_write_1(fb->iot, fb->ioh, DAC_DATA, *cmap++ >> 2);
677 		bus_space_write_1(fb->iot, fb->ioh, DAC_DATA, *cmap++ >> 2);
678 	}
679 }
680 
681 int
sisfb_getcmap(uint8_t * cmap,struct wsdisplay_cmap * cm)682 sisfb_getcmap(uint8_t *cmap, struct wsdisplay_cmap *cm)
683 {
684 	uint index = cm->index, count = cm->count, i;
685 	uint8_t ramp[256], *dst, *src;
686 	int rc;
687 
688 	if (index >= 256 || count > 256 - index)
689 		return EINVAL;
690 
691 	index *= 3;
692 
693 	src = cmap + index;
694 	dst = ramp;
695 	for (i = 0; i < count; i++)
696 		*dst++ = *src, src += 3;
697 	for (; i < sizeof(ramp); i++)
698 		*dst++ = 0;
699 	rc = copyout(ramp, cm->red, count);
700 	if (rc != 0)
701 		return rc;
702 
703 	src = cmap + index + 1;
704 	dst = ramp;
705 	for (i = 0; i < count; i++)
706 		*dst++ = *src, src += 3;
707 	rc = copyout(ramp, cm->green, count);
708 	if (rc != 0)
709 		return rc;
710 
711 	src = cmap + index + 2;
712 	dst = ramp;
713 	for (i = 0; i < count; i++)
714 		*dst++ = *src, src += 3;
715 	rc = copyout(ramp, cm->blue, count);
716 	if (rc != 0)
717 		return rc;
718 
719 	return 0;
720 }
721 
722 int
sisfb_putcmap(uint8_t * cmap,struct wsdisplay_cmap * cm)723 sisfb_putcmap(uint8_t *cmap, struct wsdisplay_cmap *cm)
724 {
725 	uint index = cm->index, count = cm->count, i;
726 	uint8_t ramp[256], *dst, *src;
727 	int rc;
728 
729 	if (index >= 256 || count > 256 - index)
730 		return EINVAL;
731 
732 	index *= 3;
733 
734 	rc = copyin(cm->red, ramp, count);
735 	if (rc != 0)
736 		return rc;
737 	dst = cmap + index;
738 	src = ramp;
739 	for (i = 0; i < count; i++)
740 		*dst = *src++, dst += 3;
741 
742 	rc = copyin(cm->green, ramp, count);
743 	if (rc != 0)
744 		return rc;
745 	dst = cmap + index + 1;
746 	src = ramp;
747 	for (i = 0; i < count; i++)
748 		*dst = *src++, dst += 3;
749 
750 	rc = copyin(cm->blue, ramp, count);
751 	if (rc != 0)
752 		return rc;
753 	dst = cmap + index + 2;
754 	src = ramp;
755 	for (i = 0; i < count; i++)
756 		*dst = *src++, dst += 3;
757 
758 	return 0;
759 }
760 
761 /*
762  * Early console code
763  */
764 
765 int
sisfb_cnattach(bus_space_tag_t memt,bus_space_tag_t iot,pci_chipset_tag_t pc,pcitag_t tag,pcireg_t id)766 sisfb_cnattach(bus_space_tag_t memt, bus_space_tag_t iot,
767     pci_chipset_tag_t pc, pcitag_t tag, pcireg_t id)
768 {
769 	long defattr;
770 	struct rasops_info * const ri = &sisfbcn.vcs.scr_ri;
771 	int flags;
772 	int rc;
773 
774 	/* filter out unrecognized devices */
775 	switch (id) {
776 	default:
777 		return ENODEV;
778 	case PCI_ID_CODE(PCI_VENDOR_SIS, PCI_PRODUCT_SIS_315PRO_VGA):
779 		break;
780 	}
781 
782 	if (pci_mapreg_info(pc, tag, PCI_MAPREG_START,
783 	    PCI_MAPREG_TYPE_MEM,
784 	    &sisfbcn.fbbase, &sisfbcn.fbsize, &flags)) {
785 		printf("sisfb can't map frame buffer\n");
786 		return ENODEV;
787 	}
788 
789 	sisfbcn.fbt = memt;
790 	rc = bus_space_map(memt, sisfbcn.fbbase, sisfbcn.fbsize,
791 	    BUS_SPACE_MAP_LINEAR, &sisfbcn.fbh);
792 #ifdef SIS_DEBUG
793 	printf("sisfb_cnattach(memt, 0x%x rc %d\n", PCI_MAPREG_MEM_ADDR(bar), rc);
794 #endif
795 	if (rc != 0)
796 		return rc;
797 
798 	if (pci_mapreg_info(pc, tag, PCI_MAPREG_START + 4,
799 	    PCI_MAPREG_TYPE_MEM,
800 	    &sisfbcn.mmiobase, &sisfbcn.mmiosize, &flags)) {
801 		printf("sisfb can't map mem space\n");
802 		return ENODEV;
803 	}
804 	sisfbcn.mmiot = memt;
805 	rc = bus_space_map(memt, sisfbcn.mmiobase, sisfbcn.mmiosize,
806 	    BUS_SPACE_MAP_LINEAR, &sisfbcn.mmioh);
807 #ifdef SIS_DEBUG
808 	printf("sisfb_cnattach(memt2, 0x%x rc %d\n", PCI_MAPREG_MEM_ADDR(bar), rc);
809 #endif
810 	if (rc != 0)
811 		return rc;
812 
813 	if (pci_mapreg_info(pc, tag, PCI_MAPREG_START + 8,
814 	    PCI_MAPREG_TYPE_IO,
815 	    &sisfbcn.iobase, &sisfbcn.iosize, &flags)) {
816 		printf("sisfb can't map mem space\n");
817 		return ENODEV;
818 	}
819 	sisfbcn.iot = iot;
820 	rc = bus_space_map(iot, sisfbcn.iobase, sisfbcn.iosize,
821 	    0, &sisfbcn.ioh);
822 #ifdef SIS_DEBUG
823 	printf("sisfb_cnattach(iot, 0x%x rc %d\n", PCI_MAPREG_MEM_ADDR(bar), rc);
824 #endif
825 	if (rc != 0)
826 		return rc;
827 
828 	rc = sisfb_setup(&sisfbcn);
829 #ifdef SIS_DEBUG
830 	printf("sisfb_setup %d %p\n", rc, sisfbcn.vcs.scr_ri.ri_hw);
831 #endif
832 	if (rc != 0)
833 		return rc;
834 
835 	ri->ri_ops.allocattr(ri, 0,  ri->ri_rows - 1, 0, &defattr);
836 	wsdisplay_preattach(&sisfbcn.wsd, ri, 0, 0, defattr);
837 
838 	return 0;
839 }
840