Home | History | Annotate | Line # | Download | only in sbus
mgx.c revision 1.2
      1  1.2  macallan /*	$NetBSD: mgx.c,v 1.2 2015/01/04 18:18:20 macallan Exp $ */
      2  1.1  macallan 
      3  1.1  macallan /*-
      4  1.1  macallan  * Copyright (c) 2014 Michael Lorenz
      5  1.1  macallan  * All rights reserved.
      6  1.1  macallan  *
      7  1.1  macallan  * Redistribution and use in source and binary forms, with or without
      8  1.1  macallan  * modification, are permitted provided that the following conditions
      9  1.1  macallan  * are met:
     10  1.1  macallan  * 1. Redistributions of source code must retain the above copyright
     11  1.1  macallan  *    notice, this list of conditions and the following disclaimer.
     12  1.1  macallan  * 2. Redistributions in binary form must reproduce the above copyright
     13  1.1  macallan  *    notice, this list of conditions and the following disclaimer in the
     14  1.1  macallan  *    documentation and/or other materials provided with the distribution.
     15  1.1  macallan  *
     16  1.1  macallan  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     17  1.1  macallan  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     18  1.1  macallan  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     19  1.1  macallan  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     20  1.1  macallan  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     21  1.1  macallan  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     22  1.1  macallan  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     23  1.1  macallan  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     24  1.1  macallan  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     25  1.1  macallan  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     26  1.1  macallan  * POSSIBILITY OF SUCH DAMAGE.
     27  1.1  macallan  */
     28  1.1  macallan 
     29  1.1  macallan /* a console driver for the SSB 4096V-MGX graphics card */
     30  1.1  macallan 
     31  1.1  macallan #include <sys/cdefs.h>
     32  1.2  macallan __KERNEL_RCSID(0, "$NetBSD: mgx.c,v 1.2 2015/01/04 18:18:20 macallan Exp $");
     33  1.1  macallan 
     34  1.1  macallan #include <sys/param.h>
     35  1.1  macallan #include <sys/systm.h>
     36  1.1  macallan #include <sys/buf.h>
     37  1.1  macallan #include <sys/device.h>
     38  1.1  macallan #include <sys/ioctl.h>
     39  1.1  macallan #include <sys/conf.h>
     40  1.1  macallan #include <sys/kmem.h>
     41  1.1  macallan 
     42  1.1  macallan #include <sys/bus.h>
     43  1.1  macallan #include <machine/autoconf.h>
     44  1.1  macallan 
     45  1.1  macallan #include <dev/sbus/sbusvar.h>
     46  1.1  macallan #include <dev/sun/fbio.h>
     47  1.1  macallan #include <dev/sun/fbvar.h>
     48  1.1  macallan 
     49  1.1  macallan #include <dev/wscons/wsdisplayvar.h>
     50  1.1  macallan #include <dev/wscons/wsconsio.h>
     51  1.1  macallan #include <dev/wsfont/wsfont.h>
     52  1.1  macallan #include <dev/rasops/rasops.h>
     53  1.1  macallan 
     54  1.1  macallan #include <dev/wscons/wsdisplay_vconsvar.h>
     55  1.2  macallan #include <dev/wscons/wsdisplay_glyphcachevar.h>
     56  1.1  macallan 
     57  1.1  macallan #include <dev/ic/vgareg.h>
     58  1.1  macallan #include <dev/sbus/mgxreg.h>
     59  1.1  macallan 
     60  1.1  macallan #include "opt_wsemul.h"
     61  1.1  macallan 
     62  1.1  macallan 
     63  1.1  macallan struct mgx_softc {
     64  1.1  macallan 	device_t	sc_dev;
     65  1.1  macallan 	bus_space_tag_t sc_tag;
     66  1.1  macallan 	bus_space_handle_t sc_blith;
     67  1.1  macallan 	bus_space_handle_t sc_vgah;
     68  1.1  macallan 	bus_addr_t	sc_paddr;
     69  1.1  macallan 	void		*sc_fbaddr;
     70  1.1  macallan 	int		sc_width;
     71  1.1  macallan 	int		sc_height;
     72  1.1  macallan 	int		sc_stride;
     73  1.1  macallan 	int		sc_fbsize;
     74  1.1  macallan 	int		sc_mode;
     75  1.2  macallan 	uint32_t	sc_dec;
     76  1.1  macallan 	u_char		sc_cmap_red[256];
     77  1.1  macallan 	u_char		sc_cmap_green[256];
     78  1.1  macallan 	u_char		sc_cmap_blue[256];
     79  1.2  macallan 	void (*sc_putchar)(void *, int, int, u_int, long);
     80  1.1  macallan 	struct vcons_screen sc_console_screen;
     81  1.1  macallan 	struct wsscreen_descr sc_defaultscreen_descr;
     82  1.1  macallan 	const struct wsscreen_descr *sc_screens[1];
     83  1.1  macallan 	struct wsscreen_list sc_screenlist;
     84  1.1  macallan 	struct vcons_data vd;
     85  1.2  macallan 	glyphcache 	sc_gc;
     86  1.1  macallan };
     87  1.1  macallan 
     88  1.1  macallan static int	mgx_match(device_t, cfdata_t, void *);
     89  1.1  macallan static void	mgx_attach(device_t, device_t, void *);
     90  1.1  macallan static int	mgx_ioctl(void *, void *, u_long, void *, int,
     91  1.1  macallan 				 struct lwp*);
     92  1.1  macallan static paddr_t	mgx_mmap(void *, void *, off_t, int);
     93  1.1  macallan static void	mgx_init_screen(void *, struct vcons_screen *, int,
     94  1.1  macallan 				 long *);
     95  1.1  macallan static void	mgx_write_dac(struct mgx_softc *, int, int, int, int);
     96  1.1  macallan static void	mgx_setup(struct mgx_softc *, int);
     97  1.1  macallan static void	mgx_init_palette(struct mgx_softc *);
     98  1.2  macallan static int	mgx_wait_engine(struct mgx_softc *);
     99  1.2  macallan static int	mgx_wait_fifo(struct mgx_softc *, unsigned int);
    100  1.2  macallan 
    101  1.2  macallan static void	mgx_bitblt(void *, int, int, int, int, int, int, int);
    102  1.2  macallan static void 	mgx_rectfill(void *, int, int, int, int, long);
    103  1.2  macallan 
    104  1.2  macallan static void	mgx_putchar(void *, int, int, u_int, long);
    105  1.2  macallan static void	mgx_cursor(void *, int, int, int);
    106  1.2  macallan static void	mgx_copycols(void *, int, int, int, int);
    107  1.2  macallan static void	mgx_erasecols(void *, int, int, int, long);
    108  1.2  macallan static void	mgx_copyrows(void *, int, int, int);
    109  1.2  macallan static void	mgx_eraserows(void *, int, int, long);
    110  1.1  macallan 
    111  1.1  macallan CFATTACH_DECL_NEW(mgx, sizeof(struct mgx_softc),
    112  1.1  macallan     mgx_match, mgx_attach, NULL, NULL);
    113  1.1  macallan 
    114  1.1  macallan struct wsdisplay_accessops mgx_accessops = {
    115  1.1  macallan 	mgx_ioctl,
    116  1.1  macallan 	mgx_mmap,
    117  1.1  macallan 	NULL,	/* vcons_alloc_screen */
    118  1.1  macallan 	NULL,	/* vcons_free_screen */
    119  1.1  macallan 	NULL,	/* vcons_show_screen */
    120  1.1  macallan 	NULL,	/* load_font */
    121  1.1  macallan 	NULL,	/* polls */
    122  1.1  macallan 	NULL,	/* scroll */
    123  1.1  macallan };
    124  1.1  macallan 
    125  1.1  macallan static int
    126  1.1  macallan mgx_match(device_t parent, cfdata_t cf, void *aux)
    127  1.1  macallan {
    128  1.1  macallan 	struct sbus_attach_args *sa = aux;
    129  1.1  macallan 
    130  1.1  macallan 	if (strcmp("SMSI,mgx", sa->sa_name) == 0)
    131  1.1  macallan 		return 100;
    132  1.1  macallan 	return 0;
    133  1.1  macallan }
    134  1.1  macallan 
    135  1.1  macallan /*
    136  1.1  macallan  * Attach a display.  We need to notice if it is the console, too.
    137  1.1  macallan  */
    138  1.1  macallan static void
    139  1.1  macallan mgx_attach(device_t parent, device_t self, void *args)
    140  1.1  macallan {
    141  1.1  macallan 	struct mgx_softc *sc = device_private(self);
    142  1.1  macallan 	struct sbus_attach_args *sa = args;
    143  1.1  macallan 	struct wsemuldisplaydev_attach_args aa;
    144  1.1  macallan 	struct rasops_info *ri;
    145  1.1  macallan 	unsigned long defattr;
    146  1.1  macallan 	bus_space_handle_t bh;
    147  1.1  macallan 	int node = sa->sa_node;
    148  1.1  macallan 	int isconsole;
    149  1.1  macallan 
    150  1.1  macallan 	aprint_normal("\n");
    151  1.1  macallan 	sc->sc_dev = self;
    152  1.1  macallan 	sc->sc_tag = sa->sa_bustag;
    153  1.1  macallan 
    154  1.1  macallan 	sc->sc_paddr = sbus_bus_addr(sa->sa_bustag, sa->sa_slot,
    155  1.1  macallan 	    sa->sa_reg[8].oa_base);
    156  1.1  macallan 
    157  1.1  macallan 	/* read geometry information from the device tree */
    158  1.1  macallan 	sc->sc_width = prom_getpropint(sa->sa_node, "width", 1152);
    159  1.1  macallan 	sc->sc_height = prom_getpropint(sa->sa_node, "height", 900);
    160  1.1  macallan 	sc->sc_stride = prom_getpropint(sa->sa_node, "linebytes", 900);
    161  1.1  macallan 	sc->sc_fbsize = sc->sc_height * sc->sc_stride;
    162  1.2  macallan 	sc->sc_fbaddr = NULL;
    163  1.1  macallan 	if (sc->sc_fbaddr == NULL) {
    164  1.1  macallan 		if (sbus_bus_map(sa->sa_bustag,
    165  1.1  macallan 			 sa->sa_slot,
    166  1.1  macallan 			 sa->sa_reg[8].oa_base,
    167  1.1  macallan 			 sc->sc_fbsize,
    168  1.2  macallan 			 BUS_SPACE_MAP_LINEAR | BUS_SPACE_MAP_LARGE,
    169  1.2  macallan 			 &bh) != 0) {
    170  1.1  macallan 			aprint_error_dev(self, "cannot map framebuffer\n");
    171  1.1  macallan 			return;
    172  1.1  macallan 		}
    173  1.1  macallan 		sc->sc_fbaddr = bus_space_vaddr(sa->sa_bustag, bh);
    174  1.1  macallan 	}
    175  1.1  macallan 
    176  1.1  macallan 	aprint_normal_dev(self, "%d x %d\n", sc->sc_width, sc->sc_height);
    177  1.1  macallan 
    178  1.1  macallan 	if (sbus_bus_map(sa->sa_bustag,
    179  1.1  macallan 			 sa->sa_slot,
    180  1.1  macallan 			 sa->sa_reg[4].oa_base, 0x1000, 0,
    181  1.1  macallan 			 &sc->sc_vgah) != 0) {
    182  1.1  macallan 		aprint_error("%s: couldn't map VGA registers\n",
    183  1.1  macallan 		    device_xname(sc->sc_dev));
    184  1.1  macallan 		return;
    185  1.1  macallan 	}
    186  1.1  macallan 
    187  1.1  macallan 	if (sbus_bus_map(sa->sa_bustag,
    188  1.1  macallan 			 sa->sa_slot,
    189  1.2  macallan 			 sa->sa_reg[5].oa_base + MGX_REG_ATREG_OFFSET, 0x1000,
    190  1.2  macallan 			 0, &sc->sc_blith) != 0) {
    191  1.1  macallan 		aprint_error("%s: couldn't map blitter registers\n",
    192  1.1  macallan 		    device_xname(sc->sc_dev));
    193  1.1  macallan 		return;
    194  1.1  macallan 	}
    195  1.1  macallan 
    196  1.1  macallan 	mgx_setup(sc, 8);
    197  1.1  macallan 
    198  1.1  macallan 	sc->sc_defaultscreen_descr = (struct wsscreen_descr) {
    199  1.1  macallan 		"default",
    200  1.1  macallan 		0, 0,
    201  1.1  macallan 		NULL,
    202  1.1  macallan 		8, 16,
    203  1.1  macallan 		WSSCREEN_WSCOLORS | WSSCREEN_HILIT,
    204  1.1  macallan 		NULL
    205  1.1  macallan 	};
    206  1.1  macallan 	sc->sc_screens[0] = &sc->sc_defaultscreen_descr;
    207  1.1  macallan 	sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens};
    208  1.1  macallan 
    209  1.1  macallan 	isconsole = fb_is_console(node);
    210  1.1  macallan 
    211  1.1  macallan 	sc->sc_mode = WSDISPLAYIO_MODE_EMUL;
    212  1.1  macallan 	wsfont_init();
    213  1.1  macallan 
    214  1.1  macallan 	vcons_init(&sc->vd, sc, &sc->sc_defaultscreen_descr, &mgx_accessops);
    215  1.1  macallan 	sc->vd.init_screen = mgx_init_screen;
    216  1.1  macallan 
    217  1.1  macallan 	vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1, &defattr);
    218  1.1  macallan 	sc->sc_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC;
    219  1.1  macallan 
    220  1.1  macallan 	ri = &sc->sc_console_screen.scr_ri;
    221  1.1  macallan 
    222  1.1  macallan 	sc->sc_defaultscreen_descr.nrows = ri->ri_rows;
    223  1.1  macallan 	sc->sc_defaultscreen_descr.ncols = ri->ri_cols;
    224  1.1  macallan 	sc->sc_defaultscreen_descr.textops = &ri->ri_ops;
    225  1.1  macallan 	sc->sc_defaultscreen_descr.capabilities = ri->ri_caps;
    226  1.1  macallan 
    227  1.2  macallan 	sc->sc_gc.gc_bitblt = mgx_bitblt;
    228  1.2  macallan 	sc->sc_gc.gc_rectfill = mgx_rectfill;
    229  1.2  macallan 	sc->sc_gc.gc_blitcookie = sc;
    230  1.2  macallan 	sc->sc_gc.gc_rop = ROP_SRC;
    231  1.2  macallan 
    232  1.2  macallan 	glyphcache_init(&sc->sc_gc,
    233  1.2  macallan 	    sc->sc_height + 5,
    234  1.2  macallan 	    (0x400000 / sc->sc_stride) - sc->sc_height - 5,
    235  1.2  macallan 	    sc->sc_width,
    236  1.2  macallan 	    ri->ri_font->fontwidth,
    237  1.2  macallan 	    ri->ri_font->fontheight,
    238  1.2  macallan 	    defattr);
    239  1.2  macallan 
    240  1.1  macallan 	mgx_init_palette(sc);
    241  1.1  macallan 
    242  1.1  macallan 	if(isconsole) {
    243  1.2  macallan 		wsdisplay_cnattach(&sc->sc_defaultscreen_descr, ri, 0, 0,
    244  1.2  macallan 		    defattr);
    245  1.1  macallan 		vcons_replay_msgbuf(&sc->sc_console_screen);
    246  1.1  macallan 	}
    247  1.1  macallan 
    248  1.1  macallan 	aa.console = isconsole;
    249  1.1  macallan 	aa.scrdata = &sc->sc_screenlist;
    250  1.1  macallan 	aa.accessops = &mgx_accessops;
    251  1.1  macallan 	aa.accesscookie = &sc->vd;
    252  1.1  macallan 
    253  1.1  macallan 	config_found(self, &aa, wsemuldisplaydevprint);
    254  1.1  macallan }
    255  1.1  macallan 
    256  1.2  macallan static inline void
    257  1.1  macallan mgx_write_vga(struct mgx_softc *sc, uint32_t reg, uint8_t val)
    258  1.1  macallan {
    259  1.1  macallan 	bus_space_write_1(sc->sc_tag, sc->sc_vgah, reg ^ 3, val);
    260  1.1  macallan }
    261  1.1  macallan 
    262  1.2  macallan static inline void
    263  1.2  macallan mgx_write_1(struct mgx_softc *sc, uint32_t reg, uint8_t val)
    264  1.2  macallan {
    265  1.2  macallan 	bus_space_write_1(sc->sc_tag, sc->sc_blith, reg ^ 3, val);
    266  1.2  macallan }
    267  1.2  macallan 
    268  1.2  macallan static inline uint8_t
    269  1.2  macallan mgx_read_1(struct mgx_softc *sc, uint32_t reg)
    270  1.2  macallan {
    271  1.2  macallan 	return bus_space_read_1(sc->sc_tag, sc->sc_blith, reg ^ 3);
    272  1.2  macallan }
    273  1.2  macallan 
    274  1.2  macallan static inline void
    275  1.2  macallan mgx_write_4(struct mgx_softc *sc, uint32_t reg, uint32_t val)
    276  1.2  macallan {
    277  1.2  macallan 	bus_space_write_4(sc->sc_tag, sc->sc_blith, reg, val);
    278  1.2  macallan }
    279  1.2  macallan 
    280  1.2  macallan 
    281  1.1  macallan static void
    282  1.1  macallan mgx_write_dac(struct mgx_softc *sc, int idx, int r, int g, int b)
    283  1.1  macallan {
    284  1.1  macallan 	mgx_write_vga(sc, VGA_BASE + VGA_DAC_ADDRW, idx);
    285  1.1  macallan 	mgx_write_vga(sc, VGA_BASE + VGA_DAC_PALETTE, r);
    286  1.1  macallan 	mgx_write_vga(sc, VGA_BASE + VGA_DAC_PALETTE, g);
    287  1.1  macallan 	mgx_write_vga(sc, VGA_BASE + VGA_DAC_PALETTE, b);
    288  1.1  macallan }
    289  1.1  macallan 
    290  1.1  macallan static void
    291  1.1  macallan mgx_init_palette(struct mgx_softc *sc)
    292  1.1  macallan {
    293  1.1  macallan 	struct rasops_info *ri = &sc->sc_console_screen.scr_ri;
    294  1.1  macallan 	int i, j = 0;
    295  1.1  macallan 	uint8_t cmap[768];
    296  1.1  macallan 
    297  1.1  macallan 	rasops_get_cmap(ri, cmap, sizeof(cmap));
    298  1.1  macallan 	for (i = 0; i < 256; i++) {
    299  1.1  macallan 		sc->sc_cmap_red[i] = cmap[j];
    300  1.1  macallan 		sc->sc_cmap_green[i] = cmap[j + 1];
    301  1.1  macallan 		sc->sc_cmap_blue[i] = cmap[j + 2];
    302  1.1  macallan 		mgx_write_dac(sc, i, cmap[j], cmap[j + 1], cmap[j + 2]);
    303  1.1  macallan 		j += 3;
    304  1.1  macallan 	}
    305  1.1  macallan }
    306  1.1  macallan 
    307  1.2  macallan static int
    308  1.2  macallan mgx_wait_engine(struct mgx_softc *sc)
    309  1.2  macallan {
    310  1.2  macallan 	unsigned int i;
    311  1.2  macallan 	uint8_t stat;
    312  1.2  macallan 
    313  1.2  macallan 	for (i = 100000; i != 0; i--) {
    314  1.2  macallan 		stat = mgx_read_1(sc, ATR_BLT_STATUS);
    315  1.2  macallan 		if ((stat & (BLT_HOST_BUSY | BLT_ENGINE_BUSY)) == 0)
    316  1.2  macallan 			break;
    317  1.2  macallan 	}
    318  1.2  macallan 
    319  1.2  macallan 	return i;
    320  1.2  macallan }
    321  1.2  macallan 
    322  1.2  macallan static int
    323  1.2  macallan mgx_wait_fifo(struct mgx_softc *sc, unsigned int nfifo)
    324  1.2  macallan {
    325  1.2  macallan 	unsigned int i;
    326  1.2  macallan 	uint8_t stat;
    327  1.2  macallan 
    328  1.2  macallan 	for (i = 100000; i != 0; i--) {
    329  1.2  macallan 		stat = mgx_read_1(sc, ATR_FIFO_STATUS);
    330  1.2  macallan 		stat = (stat & FIFO_MASK) >> FIFO_SHIFT;
    331  1.2  macallan 		if (stat >= nfifo)
    332  1.2  macallan 			break;
    333  1.2  macallan 		mgx_write_1(sc, ATR_FIFO_STATUS, 0);
    334  1.2  macallan 	}
    335  1.2  macallan 
    336  1.2  macallan 	return i;
    337  1.2  macallan }
    338  1.2  macallan 
    339  1.1  macallan static void
    340  1.1  macallan mgx_setup(struct mgx_softc *sc, int depth)
    341  1.1  macallan {
    342  1.2  macallan 	/* wait for everything to go idle */
    343  1.2  macallan 	if (mgx_wait_engine(sc) == 0)
    344  1.2  macallan 		return;
    345  1.2  macallan 	if (mgx_wait_fifo(sc, FIFO_AT24) == 0)
    346  1.2  macallan 		return;
    347  1.2  macallan 	/*
    348  1.2  macallan 	 * Compute the invariant bits of the DEC register.
    349  1.2  macallan 	 */
    350  1.2  macallan 
    351  1.2  macallan 	switch (depth) {
    352  1.2  macallan 		case 8:
    353  1.2  macallan 			sc->sc_dec = DEC_DEPTH_8 << DEC_DEPTH_SHIFT;
    354  1.2  macallan 			break;
    355  1.2  macallan 		case 15:
    356  1.2  macallan 		case 16:
    357  1.2  macallan 			sc->sc_dec = DEC_DEPTH_16 << DEC_DEPTH_SHIFT;
    358  1.2  macallan 			break;
    359  1.2  macallan 		case 32:
    360  1.2  macallan 			sc->sc_dec = DEC_DEPTH_32 << DEC_DEPTH_SHIFT;
    361  1.2  macallan 			break;
    362  1.2  macallan 		default:
    363  1.2  macallan 			return; /* not supported */
    364  1.2  macallan 	}
    365  1.2  macallan 
    366  1.2  macallan 	switch (sc->sc_stride) {
    367  1.2  macallan 		case 640:
    368  1.2  macallan 			sc->sc_dec |= DEC_WIDTH_640 << DEC_WIDTH_SHIFT;
    369  1.2  macallan 			break;
    370  1.2  macallan 		case 800:
    371  1.2  macallan 			sc->sc_dec |= DEC_WIDTH_800 << DEC_WIDTH_SHIFT;
    372  1.2  macallan 			break;
    373  1.2  macallan 		case 1024:
    374  1.2  macallan 			sc->sc_dec |= DEC_WIDTH_1024 << DEC_WIDTH_SHIFT;
    375  1.2  macallan 			break;
    376  1.2  macallan 		case 1152:
    377  1.2  macallan 			sc->sc_dec |= DEC_WIDTH_1152 << DEC_WIDTH_SHIFT;
    378  1.2  macallan 			break;
    379  1.2  macallan 		case 1280:
    380  1.2  macallan 			sc->sc_dec |= DEC_WIDTH_1280 << DEC_WIDTH_SHIFT;
    381  1.2  macallan 			break;
    382  1.2  macallan 		case 1600:
    383  1.2  macallan 			sc->sc_dec |= DEC_WIDTH_1600 << DEC_WIDTH_SHIFT;
    384  1.2  macallan 			break;
    385  1.2  macallan 		default:
    386  1.2  macallan 			return; /* not supported */
    387  1.2  macallan 	}
    388  1.2  macallan 	mgx_write_1(sc, ATR_CLIP_CONTROL, 0);
    389  1.2  macallan 	mgx_write_1(sc, ATR_BYTEMASK, 0xff);
    390  1.2  macallan }
    391  1.2  macallan 
    392  1.2  macallan static void
    393  1.2  macallan mgx_bitblt(void *cookie, int xs, int ys, int xd, int yd, int wi, int he,
    394  1.2  macallan              int rop)
    395  1.2  macallan {
    396  1.2  macallan 	struct mgx_softc *sc = cookie;
    397  1.2  macallan 	uint32_t dec = sc->sc_dec;
    398  1.2  macallan 
    399  1.2  macallan         dec |= (DEC_COMMAND_BLT << DEC_COMMAND_SHIFT) |
    400  1.2  macallan 	       (DEC_START_DIMX << DEC_START_SHIFT);
    401  1.2  macallan 	if (xs < xd) {
    402  1.2  macallan 		xs += wi - 1;
    403  1.2  macallan 		xd += wi - 1;
    404  1.2  macallan 		dec |= DEC_DIR_X_REVERSE;
    405  1.2  macallan 	}
    406  1.2  macallan 	if (ys < yd) {
    407  1.2  macallan 		ys += he - 1;
    408  1.2  macallan 		yd += he - 1;
    409  1.2  macallan 		dec |= DEC_DIR_Y_REVERSE;
    410  1.2  macallan 	}
    411  1.2  macallan 	mgx_wait_fifo(sc, 5);
    412  1.2  macallan 	mgx_write_1(sc, ATR_ROP, rop);
    413  1.2  macallan 	mgx_write_4(sc, ATR_DEC, dec);
    414  1.2  macallan 	mgx_write_4(sc, ATR_SRC_XY, (ys << 16) | xs);
    415  1.2  macallan 	mgx_write_4(sc, ATR_DST_XY, (yd << 16) | xd);
    416  1.2  macallan 	mgx_write_4(sc, ATR_WH, (he << 16) | wi);
    417  1.2  macallan }
    418  1.2  macallan 
    419  1.2  macallan static void
    420  1.2  macallan mgx_rectfill(void *cookie, int x, int y, int wi, int he, long fg)
    421  1.2  macallan {
    422  1.2  macallan 	struct mgx_softc *sc = cookie;
    423  1.2  macallan 	struct vcons_screen *scr = sc->vd.active;
    424  1.2  macallan 	uint32_t dec = sc->sc_dec;
    425  1.2  macallan 	uint32_t col;
    426  1.2  macallan 
    427  1.2  macallan 	if (scr == NULL)
    428  1.2  macallan 		return;
    429  1.2  macallan 	col = scr->scr_ri.ri_devcmap[fg];
    430  1.2  macallan 
    431  1.2  macallan 	dec = sc->sc_dec;
    432  1.2  macallan 	dec |= (DEC_COMMAND_RECT << DEC_COMMAND_SHIFT) |
    433  1.2  macallan 	       (DEC_START_DIMX << DEC_START_SHIFT);
    434  1.2  macallan 	mgx_wait_fifo(sc, 5);
    435  1.2  macallan 	mgx_write_1(sc, ATR_ROP, ROP_SRC);
    436  1.2  macallan 	mgx_write_4(sc, ATR_FG, col);
    437  1.2  macallan 	mgx_write_4(sc, ATR_DEC, dec);
    438  1.2  macallan 	mgx_write_4(sc, ATR_DST_XY, (y << 16) | x);
    439  1.2  macallan 	mgx_write_4(sc, ATR_WH, (he << 16) | wi);
    440  1.2  macallan }
    441  1.2  macallan 
    442  1.2  macallan static void
    443  1.2  macallan mgx_putchar(void *cookie, int row, int col, u_int c, long attr)
    444  1.2  macallan {
    445  1.2  macallan 	struct rasops_info *ri = cookie;
    446  1.2  macallan 	struct wsdisplay_font *font = PICK_FONT(ri, c);
    447  1.2  macallan 	struct vcons_screen *scr = ri->ri_hw;
    448  1.2  macallan 	struct mgx_softc *sc = scr->scr_cookie;
    449  1.2  macallan 	uint32_t fg, bg;
    450  1.2  macallan 	int x, y, wi, he, rv;
    451  1.2  macallan 
    452  1.2  macallan 	wi = font->fontwidth;
    453  1.2  macallan 	he = font->fontheight;
    454  1.2  macallan 
    455  1.2  macallan 	bg = (attr >> 16) & 0xf;
    456  1.2  macallan 	fg = (attr >> 24) & 0xf;
    457  1.2  macallan 
    458  1.2  macallan 	x = ri->ri_xorigin + col * wi;
    459  1.2  macallan 	y = ri->ri_yorigin + row * he;
    460  1.2  macallan 
    461  1.2  macallan 	if (c == 0x20) {
    462  1.2  macallan 		mgx_rectfill(sc, x, y, wi, he, bg);
    463  1.2  macallan 		if (attr & 1)
    464  1.2  macallan 			mgx_rectfill(sc, x, y + he - 2, wi, 1, fg);
    465  1.2  macallan 		return;
    466  1.2  macallan 	}
    467  1.2  macallan 	rv = glyphcache_try(&sc->sc_gc, c, x, y, attr);
    468  1.2  macallan 	if (rv == GC_OK)
    469  1.2  macallan 		return;
    470  1.2  macallan 	mgx_wait_engine(sc);
    471  1.2  macallan 	sc->sc_putchar(cookie, row, col, c, attr & ~1);
    472  1.2  macallan 
    473  1.2  macallan 	if (rv == GC_ADD) {
    474  1.2  macallan 		glyphcache_add(&sc->sc_gc, c, x, y);
    475  1.2  macallan 	} else {
    476  1.2  macallan 		if (attr & 1)
    477  1.2  macallan 			mgx_rectfill(sc, x, y + he - 2, wi, 1, fg);
    478  1.2  macallan 	}
    479  1.2  macallan }
    480  1.2  macallan 
    481  1.2  macallan static void
    482  1.2  macallan mgx_cursor(void *cookie, int on, int row, int col)
    483  1.2  macallan {
    484  1.2  macallan 	struct rasops_info *ri = cookie;
    485  1.2  macallan 	struct vcons_screen *scr = ri->ri_hw;
    486  1.2  macallan 	struct mgx_softc *sc = scr->scr_cookie;
    487  1.2  macallan 	int x, y, wi,he;
    488  1.2  macallan 
    489  1.2  macallan 	wi = ri->ri_font->fontwidth;
    490  1.2  macallan 	he = ri->ri_font->fontheight;
    491  1.2  macallan 
    492  1.2  macallan 	if (ri->ri_flg & RI_CURSOR) {
    493  1.2  macallan 		x = ri->ri_ccol * wi + ri->ri_xorigin;
    494  1.2  macallan 		y = ri->ri_crow * he + ri->ri_yorigin;
    495  1.2  macallan 		mgx_bitblt(sc, x, y, x, y, wi, he, ROP_INV);
    496  1.2  macallan 		ri->ri_flg &= ~RI_CURSOR;
    497  1.2  macallan 	}
    498  1.2  macallan 
    499  1.2  macallan 	ri->ri_crow = row;
    500  1.2  macallan 	ri->ri_ccol = col;
    501  1.2  macallan 
    502  1.2  macallan 	if (on)
    503  1.2  macallan 	{
    504  1.2  macallan 		x = ri->ri_ccol * wi + ri->ri_xorigin;
    505  1.2  macallan 		y = ri->ri_crow * he + ri->ri_yorigin;
    506  1.2  macallan 		mgx_bitblt(sc, x, y, x, y, wi, he, ROP_INV);
    507  1.2  macallan 		ri->ri_flg |= RI_CURSOR;
    508  1.2  macallan 	}
    509  1.2  macallan }
    510  1.2  macallan 
    511  1.2  macallan static void
    512  1.2  macallan mgx_copycols(void *cookie, int row, int srccol, int dstcol, int ncols)
    513  1.2  macallan {
    514  1.2  macallan 	struct rasops_info *ri = cookie;
    515  1.2  macallan 	struct vcons_screen *scr = ri->ri_hw;
    516  1.2  macallan 	struct mgx_softc *sc = scr->scr_cookie;
    517  1.2  macallan 	int32_t xs, xd, y, width, height;
    518  1.2  macallan 
    519  1.2  macallan 	xs = ri->ri_xorigin + ri->ri_font->fontwidth * srccol;
    520  1.2  macallan 	xd = ri->ri_xorigin + ri->ri_font->fontwidth * dstcol;
    521  1.2  macallan 	y = ri->ri_yorigin + ri->ri_font->fontheight * row;
    522  1.2  macallan 	width = ri->ri_font->fontwidth * ncols;
    523  1.2  macallan 	height = ri->ri_font->fontheight;
    524  1.2  macallan 	mgx_bitblt(sc, xs, y, xd, y, width, height, ROP_SRC);
    525  1.2  macallan }
    526  1.2  macallan 
    527  1.2  macallan static void
    528  1.2  macallan mgx_erasecols(void *cookie, int row, int startcol, int ncols, long fillattr)
    529  1.2  macallan {
    530  1.2  macallan 	struct rasops_info *ri = cookie;
    531  1.2  macallan 	struct vcons_screen *scr = ri->ri_hw;
    532  1.2  macallan 	struct mgx_softc *sc = scr->scr_cookie;
    533  1.2  macallan 	int32_t x, y, width, height, bg;
    534  1.2  macallan 
    535  1.2  macallan 	x = ri->ri_xorigin + ri->ri_font->fontwidth * startcol;
    536  1.2  macallan 	y = ri->ri_yorigin + ri->ri_font->fontheight * row;
    537  1.2  macallan 	width = ri->ri_font->fontwidth * ncols;
    538  1.2  macallan 	height = ri->ri_font->fontheight;
    539  1.2  macallan 	bg = (fillattr >> 16) & 0xff;
    540  1.2  macallan 	mgx_rectfill(sc, x, y, width, height, bg);
    541  1.2  macallan }
    542  1.2  macallan 
    543  1.2  macallan static void
    544  1.2  macallan mgx_copyrows(void *cookie, int srcrow, int dstrow, int nrows)
    545  1.2  macallan {
    546  1.2  macallan 	struct rasops_info *ri = cookie;
    547  1.2  macallan 	struct vcons_screen *scr = ri->ri_hw;
    548  1.2  macallan 	struct mgx_softc *sc = scr->scr_cookie;
    549  1.2  macallan 	int32_t x, ys, yd, width, height;
    550  1.2  macallan 
    551  1.2  macallan 	x = ri->ri_xorigin;
    552  1.2  macallan 	ys = ri->ri_yorigin + ri->ri_font->fontheight * srcrow;
    553  1.2  macallan 	yd = ri->ri_yorigin + ri->ri_font->fontheight * dstrow;
    554  1.2  macallan 	width = ri->ri_emuwidth;
    555  1.2  macallan 	height = ri->ri_font->fontheight * nrows;
    556  1.2  macallan 	mgx_bitblt(sc, x, ys, x, yd, width, height, ROP_SRC);
    557  1.2  macallan }
    558  1.2  macallan 
    559  1.2  macallan static void
    560  1.2  macallan mgx_eraserows(void *cookie, int row, int nrows, long fillattr)
    561  1.2  macallan {
    562  1.2  macallan 	struct rasops_info *ri = cookie;
    563  1.2  macallan 	struct vcons_screen *scr = ri->ri_hw;
    564  1.2  macallan 	struct mgx_softc *sc = scr->scr_cookie;
    565  1.2  macallan 	int32_t x, y, width, height, bg;
    566  1.2  macallan 
    567  1.2  macallan 	if ((row == 0) && (nrows == ri->ri_rows)) {
    568  1.2  macallan 		x = y = 0;
    569  1.2  macallan 		width = ri->ri_width;
    570  1.2  macallan 		height = ri->ri_height;
    571  1.2  macallan 	} else {
    572  1.2  macallan 		x = ri->ri_xorigin;
    573  1.2  macallan 		y = ri->ri_yorigin + ri->ri_font->fontheight * row;
    574  1.2  macallan 		width = ri->ri_emuwidth;
    575  1.2  macallan 		height = ri->ri_font->fontheight * nrows;
    576  1.2  macallan 	}
    577  1.2  macallan 	bg = (fillattr >> 16) & 0xff;
    578  1.2  macallan 	mgx_rectfill(sc, x, y, width, height, bg);
    579  1.1  macallan }
    580  1.1  macallan 
    581  1.1  macallan static void
    582  1.1  macallan mgx_init_screen(void *cookie, struct vcons_screen *scr,
    583  1.1  macallan     int existing, long *defattr)
    584  1.1  macallan {
    585  1.1  macallan 	struct mgx_softc *sc = cookie;
    586  1.1  macallan 	struct rasops_info *ri = &scr->scr_ri;
    587  1.1  macallan 
    588  1.1  macallan 	ri->ri_depth = 8;
    589  1.1  macallan 	ri->ri_width = sc->sc_width;
    590  1.1  macallan 	ri->ri_height = sc->sc_height;
    591  1.1  macallan 	ri->ri_stride = sc->sc_stride;
    592  1.1  macallan 	ri->ri_flg = RI_CENTER;
    593  1.1  macallan 
    594  1.1  macallan #if _LP64
    595  1.1  macallan 	/*
    596  1.1  macallan 	 * XXX
    597  1.1  macallan 	 * Assuming all 64bit SPARCs are fast enough to render anti-aliased
    598  1.1  macallan 	 * text on the fly. Matters only as long as we don't have acceleration
    599  1.1  macallan 	 * and glyphcache.
    600  1.1  macallan 	 */
    601  1.1  macallan 	if (ri->ri_depth == 8)
    602  1.1  macallan 		ri->ri_flg |= RI_8BIT_IS_RGB | RI_ENABLE_ALPHA;
    603  1.1  macallan #endif
    604  1.1  macallan 
    605  1.1  macallan 	ri->ri_bits = sc->sc_fbaddr;
    606  1.1  macallan 
    607  1.1  macallan 	rasops_init(ri, 0, 0);
    608  1.2  macallan 	sc->sc_putchar = ri->ri_ops.putchar;
    609  1.1  macallan 
    610  1.1  macallan 	ri->ri_caps = WSSCREEN_REVERSE | WSSCREEN_WSCOLORS;
    611  1.1  macallan 
    612  1.1  macallan 	rasops_reconfig(ri, ri->ri_height / ri->ri_font->fontheight,
    613  1.1  macallan 		    ri->ri_width / ri->ri_font->fontwidth);
    614  1.2  macallan 
    615  1.2  macallan 	ri->ri_hw = scr;
    616  1.2  macallan 	ri->ri_ops.putchar   = mgx_putchar;
    617  1.2  macallan 	ri->ri_ops.cursor    = mgx_cursor;
    618  1.2  macallan 	ri->ri_ops.copyrows  = mgx_copyrows;
    619  1.2  macallan 	ri->ri_ops.eraserows = mgx_eraserows;
    620  1.2  macallan 	ri->ri_ops.copycols  = mgx_copycols;
    621  1.2  macallan 	ri->ri_ops.erasecols = mgx_erasecols;
    622  1.1  macallan }
    623  1.1  macallan 
    624  1.1  macallan static int
    625  1.1  macallan mgx_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
    626  1.1  macallan     struct lwp *l)
    627  1.1  macallan {
    628  1.1  macallan 	struct vcons_data *vd = v;
    629  1.1  macallan 	struct mgx_softc *sc = vd->cookie;
    630  1.1  macallan 	struct wsdisplay_fbinfo *wdf;
    631  1.1  macallan 	struct vcons_screen *ms = vd->active;
    632  1.1  macallan 
    633  1.1  macallan 	switch (cmd) {
    634  1.1  macallan 		case WSDISPLAYIO_GTYPE:
    635  1.1  macallan 			*(u_int *)data = WSDISPLAY_TYPE_MGX;
    636  1.1  macallan 			return 0;
    637  1.1  macallan 
    638  1.1  macallan 		case WSDISPLAYIO_GINFO:
    639  1.1  macallan 			wdf = (void *)data;
    640  1.1  macallan 			wdf->height = sc->sc_height;
    641  1.1  macallan 			wdf->width = sc->sc_width;
    642  1.1  macallan 			wdf->depth = 8;
    643  1.1  macallan 			wdf->cmsize = 256;
    644  1.1  macallan 			return 0;
    645  1.1  macallan 
    646  1.1  macallan 		case FBIOGVIDEO:
    647  1.1  macallan 		case WSDISPLAYIO_GVIDEO:
    648  1.1  macallan 			*(int *)data = 1;
    649  1.1  macallan 			return 0;
    650  1.1  macallan 
    651  1.1  macallan 		case WSDISPLAYIO_SVIDEO:
    652  1.1  macallan 		case FBIOSVIDEO:
    653  1.1  macallan 			return 0;
    654  1.1  macallan 
    655  1.1  macallan 		case WSDISPLAYIO_LINEBYTES:
    656  1.1  macallan 			{
    657  1.1  macallan 				int *ret = (int *)data;
    658  1.1  macallan 				*ret = sc->sc_stride;
    659  1.1  macallan 			}
    660  1.1  macallan 			return 0;
    661  1.1  macallan 
    662  1.1  macallan 		case WSDISPLAYIO_SMODE:
    663  1.1  macallan 			{
    664  1.1  macallan 				int new_mode = *(int*)data;
    665  1.1  macallan 				if (new_mode != sc->sc_mode)
    666  1.1  macallan 				{
    667  1.1  macallan 					sc->sc_mode = new_mode;
    668  1.1  macallan 					if (new_mode == WSDISPLAYIO_MODE_EMUL)
    669  1.1  macallan 					{
    670  1.1  macallan 						mgx_setup(sc, 8);
    671  1.1  macallan 						vcons_redraw_screen(ms);
    672  1.1  macallan 					} else {
    673  1.1  macallan 						mgx_setup(sc, 32);
    674  1.1  macallan 					}
    675  1.1  macallan 				}
    676  1.1  macallan 			}
    677  1.1  macallan 	}
    678  1.1  macallan 
    679  1.1  macallan 	return EPASSTHROUGH;
    680  1.1  macallan }
    681  1.1  macallan 
    682  1.1  macallan static paddr_t
    683  1.1  macallan mgx_mmap(void *v, void *vs, off_t offset, int prot)
    684  1.1  macallan {
    685  1.1  macallan 	struct vcons_data *vd = v;
    686  1.1  macallan 	struct mgx_softc *sc = vd->cookie;
    687  1.1  macallan 
    688  1.1  macallan 	/* regular fb mapping at 0 */
    689  1.1  macallan 	if ((offset >= 0) && (offset < 0x400000)) {
    690  1.1  macallan 		return bus_space_mmap(sc->sc_tag, sc->sc_paddr,
    691  1.1  macallan 		    offset, prot, BUS_SPACE_MAP_LINEAR);
    692  1.1  macallan 	}
    693  1.1  macallan 
    694  1.1  macallan 	return -1;
    695  1.1  macallan }
    696