Home | History | Annotate | Line # | Download | only in dev
hyperfb.c revision 1.17
      1 /*	$NetBSD: hyperfb.c,v 1.17 2024/10/01 07:44:22 macallan Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2024 Michael Lorenz
      5  * 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  *
     16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
     17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
     18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
     19  * IN NO EVENT SHALL THE AUTHOR OR HIS RELATIVES BE LIABLE FOR ANY DIRECT,
     20  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES
     21  * (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
     22  * SERVICES; LOSS OF MIND, USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT,
     24  * STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING
     25  * IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF
     26  * THE POSSIBILITY OF SUCH DAMAGE.
     27  */
     28 
     29 /*
     30  * a native driver for HCRX / hyperdrive cards
     31  * tested on a HCRX24Z in a C360 only so far
     32  */
     33 
     34 #include <sys/cdefs.h>
     35 __KERNEL_RCSID(0, "$NetBSD: hyperfb.c,v 1.17 2024/10/01 07:44:22 macallan Exp $");
     36 
     37 #include "opt_cputype.h"
     38 #include "opt_hyperfb.h"
     39 
     40 #include <sys/param.h>
     41 #include <sys/systm.h>
     42 #include <sys/device.h>
     43 
     44 #include <sys/bus.h>
     45 #include <machine/cpu.h>
     46 #include <machine/iomod.h>
     47 #include <machine/autoconf.h>
     48 
     49 #include <dev/wscons/wsdisplayvar.h>
     50 #include <dev/wscons/wsconsio.h>
     51 #include <dev/wsfont/wsfont.h>
     52 #include <dev/rasops/rasops.h>
     53 #include <dev/wscons/wsdisplay_vconsvar.h>
     54 #include <dev/wscons/wsdisplay_glyphcachevar.h>
     55 
     56 #include <dev/ic/stireg.h>
     57 #include <dev/ic/stivar.h>
     58 
     59 #include <hppa/dev/cpudevs.h>
     60 #include <hppa/hppa/machdep.h>
     61 
     62 #ifdef HYPERFB_DEBUG
     63 #define	DPRINTF printf
     64 #else
     65 #define DPRINTF if (0) printf
     66 #endif
     67 
     68 #define	STI_ROMSIZE	(sizeof(struct sti_dd) * 4)
     69 
     70 #define HCRX_FBOFFSET	0x01000000
     71 #define HCRX_FBLEN	0x01000000
     72 #define HCRX_REGOFFSET	0x00100000
     73 #define HCRX_REGLEN	0x00280000
     74 
     75 #define HCRX_CONFIG_24BIT	0x100
     76 
     77 int hyperfb_match(device_t, cfdata_t, void *);
     78 void hyperfb_attach(device_t, device_t, void *);
     79 
     80 struct	hyperfb_softc {
     81 	device_t		sc_dev;
     82 	bus_space_tag_t		sc_iot;
     83 	bus_addr_t		sc_base;
     84 	bus_space_handle_t	sc_hfb, sc_hreg;
     85 	void 			*sc_fb;
     86 
     87 	int sc_width, sc_height;
     88 	int sc_locked, sc_is_console, sc_24bit;
     89 	struct vcons_screen sc_console_screen;
     90 	struct wsscreen_descr sc_defaultscreen_descr;
     91 	const struct wsscreen_descr *sc_screens[1];
     92 	struct wsscreen_list sc_screenlist;
     93 	struct vcons_data vd;
     94 	int sc_mode;
     95 	u_char sc_cmap_red[256];
     96 	u_char sc_cmap_green[256];
     97 	u_char sc_cmap_blue[256];
     98 	kmutex_t sc_hwlock;
     99 	uint32_t sc_hwmode;
    100 #define HW_FB		0
    101 #define HW_FILL		1
    102 #define HW_BLIT		2
    103 #define HW_SFILL	3
    104 	/* cursor stuff */
    105 	int sc_cursor_x, sc_cursor_y;
    106 	int sc_hot_x, sc_hot_y, sc_enabled;
    107 	int sc_video_on;
    108 	glyphcache sc_gc;
    109 };
    110 
    111 extern struct cfdriver hyperfb_cd;
    112 
    113 CFATTACH_DECL_NEW(hyperfb, sizeof(struct hyperfb_softc), hyperfb_match,
    114     hyperfb_attach, NULL, NULL);
    115 
    116 static inline void  hyperfb_setup_fb(struct hyperfb_softc *);
    117 static inline void  hyperfb_setup_fb24(struct hyperfb_softc *);
    118 static void 	hyperfb_init_screen(void *, struct vcons_screen *,
    119 			    int, long *);
    120 static int	hyperfb_ioctl(void *, void *, u_long, void *, int,
    121 			     struct lwp *);
    122 static paddr_t	hyperfb_mmap(void *, void *, off_t, int);
    123 
    124 static int	hyperfb_putcmap(struct hyperfb_softc *,
    125 		    struct wsdisplay_cmap *);
    126 static int 	hyperfb_getcmap(struct hyperfb_softc *,
    127 		    struct wsdisplay_cmap *);
    128 static void	hyperfb_restore_palette(struct hyperfb_softc *);
    129 static int 	hyperfb_putpalreg(struct hyperfb_softc *, uint8_t, uint8_t,
    130 			    uint8_t, uint8_t);
    131 void 	hyperfb_setup(struct hyperfb_softc *);
    132 static void	hyperfb_set_video(struct hyperfb_softc *, int);
    133 
    134 static void	hyperfb_rectfill(struct hyperfb_softc *, int, int, int, int,
    135 			    uint32_t);
    136 static void	hyperfb_bitblt(void *, int, int, int, int, int,
    137 			    int, int);
    138 
    139 static void	hyperfb_cursor(void *, int, int, int);
    140 static void	hyperfb_putchar(void *, int, int, u_int, long);
    141 static void	hyperfb_copycols(void *, int, int, int, int);
    142 static void	hyperfb_erasecols(void *, int, int, int, long);
    143 static void	hyperfb_copyrows(void *, int, int, int);
    144 static void	hyperfb_eraserows(void *, int, int, long);
    145 
    146 static void	hyperfb_move_cursor(struct hyperfb_softc *, int, int);
    147 static int	hyperfb_do_cursor(struct hyperfb_softc *,
    148 		    struct wsdisplay_cursor *);
    149 
    150 static inline void hyperfb_wait_fifo(struct hyperfb_softc *, uint32_t);
    151 
    152 #define	ngle_bt458_write(sc, r, v) \
    153 	hyperfb_write4(sc, NGLE_REG_RAMDAC + ((r) << 2), (v) << 24)
    154 
    155 struct wsdisplay_accessops hyperfb_accessops = {
    156 	hyperfb_ioctl,
    157 	hyperfb_mmap,
    158 	NULL,	/* alloc_screen */
    159 	NULL,	/* free_screen */
    160 	NULL,	/* show_screen */
    161 	NULL, 	/* load_font */
    162 	NULL,	/* pollc */
    163 	NULL	/* scroll */
    164 };
    165 
    166 static inline uint32_t
    167 hyperfb_read4(struct hyperfb_softc *sc, uint32_t offset)
    168 {
    169 	return bus_space_read_4(sc->sc_iot, sc->sc_hreg, offset);
    170 }
    171 
    172 static inline uint8_t
    173 hyperfb_read1(struct hyperfb_softc *sc, uint32_t offset)
    174 {
    175 	return bus_space_read_1(sc->sc_iot, sc->sc_hreg, offset);
    176 }
    177 
    178 static inline void
    179 hyperfb_write4(struct hyperfb_softc *sc, uint32_t offset, uint32_t val)
    180 {
    181 	bus_space_write_4(sc->sc_iot, sc->sc_hreg, offset, val);
    182 }
    183 
    184 static inline void
    185 hyperfb_write1(struct hyperfb_softc *sc, uint32_t offset, uint8_t val)
    186 {
    187 	bus_space_write_1(sc->sc_iot, sc->sc_hreg, offset, val);
    188 }
    189 
    190 static inline void
    191 hyperfb_wait(struct hyperfb_softc *sc)
    192 {
    193 	uint8_t stat;
    194 
    195 	do {
    196 		stat = hyperfb_read1(sc, NGLE_REG_15b0);
    197 		if (stat == 0)
    198 			stat = hyperfb_read1(sc, NGLE_REG_15b0);
    199 	} while (stat != 0);
    200 }
    201 
    202 static inline void
    203 hyperfb_wait_fifo(struct hyperfb_softc *sc, uint32_t slots)
    204 {
    205 	uint32_t reg;
    206 
    207 	do {
    208 		reg = hyperfb_read4(sc, NGLE_REG_34);
    209 	} while (reg < slots);
    210 }
    211 
    212 static inline void
    213 hyperfb_setup_fb(struct hyperfb_softc *sc)
    214 {
    215 
    216 	/*
    217 	 * turns out the plane mask is applied to everything, including
    218 	 * direct framebuffer writes, so make sure we always set it
    219 	 */
    220 	hyperfb_wait(sc);
    221 	if ((sc->sc_mode != WSDISPLAYIO_MODE_EMUL) && sc->sc_24bit) {
    222 		hyperfb_write4(sc, NGLE_REG_10,
    223 		    BA(FractDcd, Otc24, Ots08, AddrLong, 0, BINapp0F8, 0));
    224 		hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    225 	} else {
    226 		hyperfb_write4(sc, NGLE_REG_10,
    227 		    BA(IndexedDcd, Otc04, Ots08, AddrByte, 0, BINovly, 0));
    228 		hyperfb_write4(sc, NGLE_REG_13, 0xff);
    229 	}
    230 	hyperfb_write4(sc, NGLE_REG_14, 0x83000300);
    231 	hyperfb_wait(sc);
    232 	hyperfb_write1(sc, NGLE_REG_16b1, 1);
    233 	sc->sc_hwmode = HW_FB;
    234 }
    235 
    236 static inline void
    237 hyperfb_setup_fb24(struct hyperfb_softc *sc)
    238 {
    239 
    240 	hyperfb_wait(sc);
    241 	hyperfb_write4(sc, NGLE_REG_10,
    242 	    BA(FractDcd, Otc24, Ots08, AddrLong, 0, BINapp0F8, 0));
    243 	hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    244 	hyperfb_write4(sc, NGLE_REG_14, 0x83000300);
    245 	//IBOvals(RopSrc,0,BitmapExtent08,0,DataDynamic,MaskDynamic,0,0)
    246 	hyperfb_wait(sc);
    247 	hyperfb_write1(sc, NGLE_REG_16b1, 1);
    248 	sc->sc_hwmode = HW_FB;
    249 }
    250 
    251 int
    252 hyperfb_match(device_t parent, cfdata_t cf, void *aux)
    253 {
    254 	struct confargs *ca = aux;
    255 	bus_space_handle_t romh;
    256 	paddr_t rom;
    257 	uint32_t id = 0;
    258 	u_char devtype;
    259 	int rv = 0, romunmapped = 0;
    260 
    261 	if (ca->ca_type.iodc_type != HPPA_TYPE_FIO)
    262 		return 0;
    263 
    264 	/* these need further checking for the graphics id */
    265 	if (ca->ca_type.iodc_sv_model != HPPA_FIO_GSGC &&
    266 	    ca->ca_type.iodc_sv_model != HPPA_FIO_SGC)
    267 		return 0;
    268 
    269 	if (ca->ca_naddrs > 0)
    270 		rom = ca->ca_addrs[0].addr;
    271 	else
    272 		rom = ca->ca_hpa;
    273 
    274 	DPRINTF("%s: hpa=%x, rom=%x\n", __func__, (uint)ca->ca_hpa,
    275 	    (uint)rom);
    276 
    277 	/* if it does not map, probably part of the lasi space */
    278 	if (bus_space_map(ca->ca_iot, rom, STI_ROMSIZE, 0, &romh)) {
    279 		DPRINTF("%s: can't map rom space (%d)\n", __func__, rv);
    280 
    281 		if ((rom & HPPA_IOBEGIN) == HPPA_IOBEGIN) {
    282 			romh = rom;
    283 			romunmapped++;
    284 		} else {
    285 			/* in this case nobody has no freaking idea */
    286 			return 0;
    287 		}
    288 	}
    289 
    290 	devtype = bus_space_read_1(ca->ca_iot, romh, 3);
    291 	DPRINTF("%s: devtype=%d\n", __func__, devtype);
    292 	rv = 1;
    293 	switch (devtype) {
    294 	case STI_DEVTYPE4:
    295 		id = bus_space_read_4(ca->ca_iot, romh, STI_DEV4_DD_GRID);
    296 		break;
    297 	case STI_DEVTYPE1:
    298 		id = (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID
    299 		    +  3) << 24) |
    300 		    (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID
    301 		    +  7) << 16) |
    302 		    (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID
    303 		    + 11) <<  8) |
    304 		    (bus_space_read_1(ca->ca_iot, romh, STI_DEV1_DD_GRID
    305 		    + 15));
    306 		break;
    307 	default:
    308 		DPRINTF("%s: unknown type (%x)\n", __func__, devtype);
    309 		rv = 0;
    310 	}
    311 
    312 	if (id == STI_DD_HCRX)
    313 		rv = 100;	/* beat out sti */
    314 
    315 	ca->ca_addrs[ca->ca_naddrs].addr = rom;
    316 	ca->ca_addrs[ca->ca_naddrs].size = sti_rom_size(ca->ca_iot, romh);
    317 	ca->ca_naddrs++;
    318 
    319 	if (!romunmapped)
    320 		bus_space_unmap(ca->ca_iot, romh, STI_ROMSIZE);
    321 	return rv;
    322 }
    323 
    324 void
    325 hyperfb_attach(device_t parent, device_t self, void *aux)
    326 {
    327 	struct hyperfb_softc *sc = device_private(self);
    328 	struct confargs *ca = aux;
    329 	struct rasops_info *ri;
    330 	struct wsemuldisplaydev_attach_args aa;
    331 	bus_space_handle_t hrom;
    332 	hppa_hpa_t consaddr;
    333 	long defattr;
    334 	int pagezero_cookie;
    335 	paddr_t rom;
    336 	uint32_t config;
    337 
    338 	pagezero_cookie = hppa_pagezero_map();
    339 	consaddr = (hppa_hpa_t)PAGE0->mem_cons.pz_hpa;
    340 	hppa_pagezero_unmap(pagezero_cookie);
    341 
    342 	sc->sc_dev = self;
    343 	sc->sc_base = ca->ca_hpa;
    344 	sc->sc_iot = ca->ca_iot;
    345 	sc->sc_is_console =(ca->ca_hpa == consaddr);
    346 	sc->sc_width = 1280;
    347 	sc->sc_height = 1024;
    348 
    349 	/* we can *not* be interrupted when doing colour map accesses */
    350 	mutex_init(&sc->sc_hwlock, MUTEX_DEFAULT, IPL_HIGH);
    351 
    352 	/* we stashed rom addr/len into the last slot during probe */
    353 	rom = ca->ca_addrs[ca->ca_naddrs - 1].addr;
    354 
    355 	if (bus_space_map(sc->sc_iot,
    356 	    sc->sc_base + HCRX_FBOFFSET, HCRX_FBLEN,
    357 	    BUS_SPACE_MAP_LINEAR | BUS_SPACE_MAP_PREFETCHABLE,
    358 	    &sc->sc_hfb)) {
    359 	    	aprint_error_dev(sc->sc_dev,
    360 		    "failed to map the framebuffer\n");
    361 	    	return;
    362 	}
    363 	sc->sc_fb = bus_space_vaddr(sc->sc_iot, sc->sc_hfb);
    364 
    365 	if (bus_space_map(sc->sc_iot,
    366 	    sc->sc_base + HCRX_REGOFFSET, HCRX_REGLEN, 0, &sc->sc_hreg)) {
    367 	    	aprint_error_dev(sc->sc_dev, "failed to map registers\n");
    368 	    	return;
    369 	}
    370 
    371 	/*
    372 	 * we really only need the first word so we can grab the config bits
    373 	 * between the bytes
    374 	 */
    375 	if (bus_space_map(sc->sc_iot, rom, 4, 0, &hrom)) {
    376 	    	aprint_error_dev(sc->sc_dev,
    377 		    "failed to map ROM, assuming 8bit\n");
    378 	    	config = 0;
    379 	} else {
    380 		/* alright, we got the ROM. now do the idle dance. */
    381 		volatile uint32_t r = hyperfb_read4(sc, NGLE_REG_15);
    382 		__USE(r);
    383 		hyperfb_wait(sc);
    384 		config = bus_space_read_4(sc->sc_iot, hrom, 0);
    385 		bus_space_unmap(sc->sc_iot, hrom, 4);
    386 	}
    387 	sc->sc_24bit = ((config & HCRX_CONFIG_24BIT) != 0);
    388 
    389 	printf(" %s\n", sc->sc_24bit ? "HCRX24" : "HCRX");
    390 #ifdef HP7300LC_CPU
    391 	/*
    392 	 * PCXL2: enable accel I/O for this space, see PCX-L2 ERS "ACCEL_IO".
    393 	 * "pcxl2_ers.{ps,pdf}", (section / chapter . rel. page / abs. page)
    394 	 * 8.7.4 / 8-12 / 92, 11.3.14 / 11-14 / 122 and 14.8 / 14-5 / 203.
    395 	 */
    396 	if (hppa_cpu_info->hci_cputype == hpcxl2
    397 	    && ca->ca_hpa >= PCXL2_ACCEL_IO_START
    398 	    && ca->ca_hpa <= PCXL2_ACCEL_IO_END)
    399 		eaio_l2(PCXL2_ACCEL_IO_ADDR2MASK(ca->ca_hpa));
    400 #endif /* HP7300LC_CPU */
    401 
    402 	sc->sc_mode = WSDISPLAYIO_MODE_EMUL;
    403 	sc->sc_locked = 0;
    404 
    405 	hyperfb_setup(sc);
    406 	hyperfb_setup_fb(sc);
    407 
    408 	sc->sc_defaultscreen_descr = (struct wsscreen_descr){
    409 		"default",
    410 		0, 0,
    411 		NULL,
    412 		8, 16,
    413 		WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_UNDERLINE |
    414 		      WSSCREEN_RESIZE,
    415 		NULL
    416 	};
    417 
    418 	sc->sc_screens[0] = &sc->sc_defaultscreen_descr;
    419 	sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens};
    420 
    421 	vcons_init(&sc->vd, sc, &sc->sc_defaultscreen_descr,
    422 	    &hyperfb_accessops);
    423 	sc->vd.init_screen = hyperfb_init_screen;
    424 	sc->vd.show_screen_cookie = &sc->sc_gc;
    425 	sc->vd.show_screen_cb = glyphcache_adapt;
    426 
    427 	ri = &sc->sc_console_screen.scr_ri;
    428 
    429 	//sc->sc_gc.gc_bitblt = hyperfb_bitblt;
    430 	//sc->sc_gc.gc_blitcookie = sc;
    431 	//sc->sc_gc.gc_rop = RopSrc;
    432 
    433 	if (sc->sc_is_console) {
    434 		vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1,
    435 		    &defattr);
    436 		sc->sc_console_screen.scr_flags |= VCONS_SCREEN_IS_STATIC;
    437 
    438 		sc->sc_defaultscreen_descr.textops = &ri->ri_ops;
    439 		sc->sc_defaultscreen_descr.capabilities = ri->ri_caps;
    440 		sc->sc_defaultscreen_descr.nrows = ri->ri_rows;
    441 		sc->sc_defaultscreen_descr.ncols = ri->ri_cols;
    442 
    443 #if 0
    444 		glyphcache_init(&sc->sc_gc, sc->sc_height + 5,
    445 				sc->sc_scr.fbheight - sc->sc_height - 5,
    446 				sc->sc_scr.fbwidth,
    447 				ri->ri_font->fontwidth,
    448 				ri->ri_font->fontheight,
    449 				defattr);
    450 #endif
    451 		wsdisplay_cnattach(&sc->sc_defaultscreen_descr, ri, 0, 0,
    452 		    defattr);
    453 
    454 		hyperfb_rectfill(sc, 0, 0, sc->sc_width, sc->sc_height,
    455 		    ri->ri_devcmap[(defattr >> 16) & 0xff]);
    456 
    457 		vcons_replay_msgbuf(&sc->sc_console_screen);
    458 	} else {
    459 		/*
    460 		 * since we're not the console we can postpone the rest
    461 		 * until someone actually allocates a screen for us
    462 		 */
    463 		if (sc->sc_console_screen.scr_ri.ri_rows == 0) {
    464 			/* do some minimal setup to avoid weirdnesses later */
    465 			vcons_init_screen(&sc->vd, &sc->sc_console_screen, 1,
    466 			    &defattr);
    467 		} else
    468 			(*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
    469 
    470 #if 0
    471 		glyphcache_init(&sc->sc_gc, sc->sc_height + 5,
    472 				sc->sc_scr.fbheight - sc->sc_height - 5,
    473 				sc->sc_scr.fbwidth,
    474 				ri->ri_font->fontwidth,
    475 				ri->ri_font->fontheight,
    476 				defattr);
    477 #endif
    478 	}
    479 
    480 	hyperfb_restore_palette(sc);
    481 
    482 	/* no suspend/resume support yet */
    483 	if (!pmf_device_register(sc->sc_dev, NULL, NULL))
    484 		aprint_error_dev(sc->sc_dev,
    485 		    "couldn't establish power handler\n");
    486 
    487 	aa.console = sc->sc_is_console;
    488 	aa.scrdata = &sc->sc_screenlist;
    489 	aa.accessops = &hyperfb_accessops;
    490 	aa.accesscookie = &sc->vd;
    491 
    492 	config_found(sc->sc_dev, &aa, wsemuldisplaydevprint, CFARGS_NONE);
    493 
    494 	hyperfb_setup_fb(sc);
    495 
    496 #ifdef HYPERFB_DEBUG
    497 	int i;
    498 
    499 	hyperfb_wait_fifo(sc, 4);
    500 	/* transfer data */
    501 	hyperfb_write4(sc, NGLE_REG_8, 0xff00ff00);
    502 	/* plane mask */
    503 	hyperfb_write4(sc, NGLE_REG_13, 0xff);
    504 	/* bitmap op */
    505 	hyperfb_write4(sc, NGLE_REG_14,
    506 	    IBOvals(RopSrc, 0, BitmapExtent08, 0, DataDynamic, MaskOtc, 1, 0));
    507 	/* dst bitmap access */
    508 	hyperfb_write4(sc, NGLE_REG_11,
    509 	    BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINovly, 0));
    510 
    511 	hyperfb_wait_fifo(sc, 3);
    512 	hyperfb_write4(sc, NGLE_REG_35, 0xe0);
    513 	hyperfb_write4(sc, NGLE_REG_36, 0x1c);
    514 	/* dst XY */
    515 	hyperfb_write4(sc, NGLE_REG_6, (2 << 16) | 902);
    516 	/* len XY start */
    517 	hyperfb_write4(sc, NGLE_REG_9, (28 << 16) | 32);
    518 
    519 	for (i = 0; i < 32; i++)
    520 		hyperfb_write4(sc, NGLE_REG_8, (i & 4) ? 0xff00ff00 : 0x00ff00ff);
    521 
    522 	hyperfb_rectfill(sc, 70, 902, 16, 32, 0xe0);
    523 	hyperfb_rectfill(sc, 50, 902, 16, 32, 0x1c);
    524 #endif
    525 }
    526 
    527 static void
    528 hyperfb_init_screen(void *cookie, struct vcons_screen *scr,
    529     int existing, long *defattr)
    530 {
    531 	struct hyperfb_softc *sc = cookie;
    532 	struct rasops_info *ri = &scr->scr_ri;
    533 
    534 	ri->ri_depth = 8;
    535 	ri->ri_width = 1280;
    536 #ifdef HYPERFB_DEBUG
    537 	ri->ri_height = 900;
    538 #else
    539 	ri->ri_height = 1024;
    540 #endif
    541 	ri->ri_stride = 2048;
    542 	ri->ri_flg = RI_CENTER | RI_8BIT_IS_RGB /*|
    543 		     RI_ENABLE_ALPHA | RI_PREFER_ALPHA*/;
    544 
    545 	ri->ri_bits = (void *)sc->sc_fb;
    546 	rasops_init(ri, 0, 0);
    547 	ri->ri_caps = WSSCREEN_WSCOLORS | WSSCREEN_HILIT | WSSCREEN_UNDERLINE |
    548 		      WSSCREEN_RESIZE;
    549 	scr->scr_flags |= VCONS_LOADFONT;
    550 
    551 	rasops_reconfig(ri, sc->sc_height / ri->ri_font->fontheight,
    552 		    sc->sc_width / ri->ri_font->fontwidth);
    553 
    554 	ri->ri_hw = scr;
    555 
    556 	ri->ri_ops.copyrows = hyperfb_copyrows;
    557 	ri->ri_ops.copycols = hyperfb_copycols;
    558 	ri->ri_ops.eraserows = hyperfb_eraserows;
    559 	ri->ri_ops.erasecols = hyperfb_erasecols;
    560 	ri->ri_ops.cursor = hyperfb_cursor;
    561 	ri->ri_ops.putchar = hyperfb_putchar;
    562 }
    563 
    564 static int
    565 hyperfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
    566     struct lwp *l)
    567 {
    568 	struct vcons_data *vd = v;
    569 	struct hyperfb_softc *sc = vd->cookie;
    570 	struct wsdisplay_fbinfo *wdf;
    571 	struct vcons_screen *ms = vd->active;
    572 
    573 	switch (cmd) {
    574 	case WSDISPLAYIO_GTYPE:
    575 		*(u_int *)data = WSDISPLAY_TYPE_STI;
    576 		return 0;
    577 
    578 	case GCID:
    579 		*(u_int *)data = STI_DD_HCRX;
    580 		return 0;
    581 
    582 	case WSDISPLAYIO_GINFO:
    583 		if (ms == NULL)
    584 			return ENODEV;
    585 		wdf = (void *)data;
    586 		wdf->height = ms->scr_ri.ri_height;
    587 		wdf->width = sc->sc_24bit ? ms->scr_ri.ri_width << 2
    588 		    : ms->scr_ri.ri_width;
    589 		wdf->depth = ms->scr_ri.ri_depth;
    590 		wdf->cmsize = 256;
    591 		return 0;
    592 
    593 	case WSDISPLAYIO_GETCMAP:
    594 		return hyperfb_getcmap(sc,
    595 		    (struct wsdisplay_cmap *)data);
    596 
    597 	case WSDISPLAYIO_PUTCMAP:
    598 		return hyperfb_putcmap(sc,
    599 		    (struct wsdisplay_cmap *)data);
    600 	case WSDISPLAYIO_LINEBYTES:
    601 		*(u_int *)data = sc->sc_24bit ? 8192 : 2048;
    602 		return 0;
    603 
    604 	case WSDISPLAYIO_SMODE: {
    605 		int new_mode = *(int*)data;
    606 		if (new_mode != sc->sc_mode) {
    607 			sc->sc_mode = new_mode;
    608 			if (new_mode == WSDISPLAYIO_MODE_EMUL) {
    609 				hyperfb_setup(sc);
    610 				hyperfb_restore_palette(sc);
    611 #if 0
    612 				glyphcache_wipe(&sc->sc_gc);
    613 #endif
    614 				hyperfb_rectfill(sc, 0, 0, sc->sc_width,
    615 				    sc->sc_height, ms->scr_ri.ri_devcmap[
    616 				    (ms->scr_defattr >> 16) & 0xff]);
    617 				vcons_redraw_screen(ms);
    618 				hyperfb_set_video(sc, 1);
    619 			} else {
    620 				hyperfb_setup(sc);
    621 				hyperfb_rectfill(sc, 0, 0, sc->sc_width,
    622 				    sc->sc_height, 0xff);
    623 				hyperfb_setup_fb24(sc);
    624 			}
    625 		}
    626 		}
    627 		return 0;
    628 
    629 	case WSDISPLAYIO_GET_FBINFO: {
    630 		struct wsdisplayio_fbinfo *fbi = data;
    631 		int ret;
    632 
    633 		ret = wsdisplayio_get_fbinfo(&ms->scr_ri, fbi);
    634 		fbi->fbi_fbsize = sc->sc_height * 2048;
    635 		if (sc->sc_24bit) {
    636 			fbi->fbi_stride = 8192;
    637 			fbi->fbi_bitsperpixel = 32;
    638 			fbi->fbi_pixeltype = WSFB_RGB;
    639 			fbi->fbi_subtype.fbi_rgbmasks.red_offset = 16;
    640 			fbi->fbi_subtype.fbi_rgbmasks.red_size = 8;
    641 			fbi->fbi_subtype.fbi_rgbmasks.green_offset = 8;
    642 			fbi->fbi_subtype.fbi_rgbmasks.green_size = 8;
    643 			fbi->fbi_subtype.fbi_rgbmasks.blue_offset = 0;
    644 			fbi->fbi_subtype.fbi_rgbmasks.blue_size = 8;
    645 			fbi->fbi_subtype.fbi_rgbmasks.alpha_size = 0;
    646 				fbi->fbi_fbsize = sc->sc_height * 8192;
    647 		}
    648 		return ret;
    649 	}
    650 
    651 	case WSDISPLAYIO_GCURPOS: {
    652 		struct wsdisplay_curpos *cp = (void *)data;
    653 
    654 		cp->x = sc->sc_cursor_x;
    655 		cp->y = sc->sc_cursor_y;
    656 	}
    657 		return 0;
    658 
    659 	case WSDISPLAYIO_SCURPOS: {
    660 		struct wsdisplay_curpos *cp = (void *)data;
    661 
    662 		hyperfb_move_cursor(sc, cp->x, cp->y);
    663 	}
    664 		return 0;
    665 
    666 	case WSDISPLAYIO_GCURMAX: {
    667 		struct wsdisplay_curpos *cp = (void *)data;
    668 
    669 		cp->x = 64;
    670 		cp->y = 64;
    671 	}
    672 		return 0;
    673 
    674 	case WSDISPLAYIO_SCURSOR: {
    675 		struct wsdisplay_cursor *cursor = (void *)data;
    676 
    677 		return hyperfb_do_cursor(sc, cursor);
    678 	}
    679 
    680 	case WSDISPLAYIO_SVIDEO:
    681 		hyperfb_set_video(sc, *(int *)data);
    682 		return 0;
    683 	case WSDISPLAYIO_GVIDEO:
    684 		*(u_int *)data = sc->sc_video_on ?
    685 		    WSDISPLAYIO_VIDEO_ON : WSDISPLAYIO_VIDEO_OFF;
    686 		return 0;
    687 	}
    688 	return EPASSTHROUGH;
    689 }
    690 
    691 static paddr_t
    692 hyperfb_mmap(void *v, void *vs, off_t offset, int prot)
    693 {
    694 	struct vcons_data *vd = v;
    695 	struct hyperfb_softc *sc = vd->cookie;
    696 	paddr_t pa = -1;
    697 
    698 
    699 	if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)
    700 		return -1;
    701 
    702 	/* GSC framebuffer space is 16MB */
    703 	if (offset >= 0 && offset < 0x1000000) {
    704 		/* framebuffer */
    705 		pa = bus_space_mmap(sc->sc_iot, sc->sc_base + HCRX_FBOFFSET,
    706 		    offset, prot,
    707 		    BUS_SPACE_MAP_LINEAR | BUS_SPACE_MAP_PREFETCHABLE);
    708 	} else if (offset >= 0x80000000 && offset < 0x8040000) {
    709 		/* blitter registers etc. */
    710 		pa = bus_space_mmap(sc->sc_iot, sc->sc_base + HCRX_REGOFFSET,
    711 		    offset - 0x80000000, prot, BUS_SPACE_MAP_LINEAR);
    712 	}
    713 
    714 	return pa;
    715 }
    716 
    717 static int
    718 hyperfb_putcmap(struct hyperfb_softc *sc, struct wsdisplay_cmap *cm)
    719 {
    720 	u_char *r, *g, *b;
    721 	u_int index = cm->index;
    722 	u_int count = cm->count;
    723 	int i, error;
    724 	u_char rbuf[256], gbuf[256], bbuf[256];
    725 
    726 	if (cm->index >= 256 || cm->count > 256 ||
    727 	    (cm->index + cm->count) > 256)
    728 		return EINVAL;
    729 	error = copyin(cm->red, &rbuf[index], count);
    730 	if (error)
    731 		return error;
    732 	error = copyin(cm->green, &gbuf[index], count);
    733 	if (error)
    734 		return error;
    735 	error = copyin(cm->blue, &bbuf[index], count);
    736 	if (error)
    737 		return error;
    738 
    739 	memcpy(&sc->sc_cmap_red[index], &rbuf[index], count);
    740 	memcpy(&sc->sc_cmap_green[index], &gbuf[index], count);
    741 	memcpy(&sc->sc_cmap_blue[index], &bbuf[index], count);
    742 
    743 	r = &sc->sc_cmap_red[index];
    744 	g = &sc->sc_cmap_green[index];
    745 	b = &sc->sc_cmap_blue[index];
    746 
    747 	for (i = 0; i < count; i++) {
    748 		hyperfb_putpalreg(sc, index, *r, *g, *b);
    749 		index++;
    750 		r++, g++, b++;
    751 	}
    752 	return 0;
    753 }
    754 
    755 static int
    756 hyperfb_getcmap(struct hyperfb_softc *sc, struct wsdisplay_cmap *cm)
    757 {
    758 	u_int index = cm->index;
    759 	u_int count = cm->count;
    760 	int error;
    761 
    762 	if (index >= 255 || count > 256 || index + count > 256)
    763 		return EINVAL;
    764 
    765 	error = copyout(&sc->sc_cmap_red[index],   cm->red,   count);
    766 	if (error)
    767 		return error;
    768 	error = copyout(&sc->sc_cmap_green[index], cm->green, count);
    769 	if (error)
    770 		return error;
    771 	error = copyout(&sc->sc_cmap_blue[index],  cm->blue,  count);
    772 	if (error)
    773 		return error;
    774 
    775 	return 0;
    776 }
    777 
    778 static void
    779 hyperfb_restore_palette(struct hyperfb_softc *sc)
    780 {
    781 	uint8_t cmap[768];
    782 	int i, j;
    783 
    784 	j = 0;
    785 	rasops_get_cmap(&sc->sc_console_screen.scr_ri, cmap, sizeof(cmap));
    786 	for (i = 0; i < 256; i++) {
    787 		sc->sc_cmap_red[i] = cmap[j];
    788 		sc->sc_cmap_green[i] = cmap[j + 1];
    789 		sc->sc_cmap_blue[i] = cmap[j + 2];
    790 		hyperfb_putpalreg(sc, i, cmap[j], cmap[j + 1], cmap[j + 2]);
    791 		j += 3;
    792 	}
    793 }
    794 
    795 static int
    796 hyperfb_putpalreg(struct hyperfb_softc *sc, uint8_t idx, uint8_t r, uint8_t g,
    797     uint8_t b)
    798 {
    799 
    800 	mutex_enter(&sc->sc_hwlock);
    801 	hyperfb_wait(sc);
    802 	hyperfb_write4(sc, NGLE_REG_10, 0xbbe0f000);
    803 	hyperfb_write4(sc, NGLE_REG_14, 0x03000300);
    804 	hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    805 
    806 	hyperfb_wait(sc);
    807 	hyperfb_write4(sc, NGLE_REG_3, 0x400 | (idx << 2));
    808 	hyperfb_write4(sc, NGLE_REG_4, (r << 16) | (g << 8) | b);
    809 
    810 	hyperfb_write4(sc, NGLE_REG_2, 0x400);
    811 	hyperfb_write4(sc, NGLE_REG_38, 0x82000100);
    812 	hyperfb_setup_fb(sc);
    813 	mutex_exit(&sc->sc_hwlock);
    814 	return 0;
    815 }
    816 
    817 void
    818 hyperfb_setup(struct hyperfb_softc *sc)
    819 {
    820 	int i;
    821 	uint32_t reg;
    822 
    823 	sc->sc_hwmode = HW_FB;
    824 	sc->sc_hot_x = 0;
    825 	sc->sc_hot_y = 0;
    826 	sc->sc_enabled = 0;
    827 	sc->sc_video_on = 1;
    828 
    829 	/* set Bt458 read mask register to all planes */
    830 	/* XXX I'm not sure HCRX even has one of these */
    831 	hyperfb_wait(sc);
    832 	ngle_bt458_write(sc, 0x08, 0x04);
    833 	ngle_bt458_write(sc, 0x0a, 0xff);
    834 
    835 	reg = hyperfb_read4(sc, NGLE_REG_32);
    836 	DPRINTF("planereg %08x\n", reg);
    837 	hyperfb_write4(sc, NGLE_REG_32, 0xffffffff);
    838 
    839 	/* hyperbowl */
    840 	hyperfb_wait(sc);
    841 	if (sc->sc_24bit) {
    842 		/* write must happen twice because hw bug */
    843 		hyperfb_write4(sc, NGLE_REG_40,
    844 		    HYPERBOWL_MODE01_8_24_LUT0_TRANSPARENT_LUT1_OPAQUE);
    845 		hyperfb_write4(sc, NGLE_REG_40,
    846 		    HYPERBOWL_MODE01_8_24_LUT0_TRANSPARENT_LUT1_OPAQUE);
    847 		hyperfb_write4(sc, NGLE_REG_39, HYPERBOWL_MODE2_8_24);
    848 		/* Set lut 0 to be the direct color */
    849 		hyperfb_write4(sc, NGLE_REG_42, 0x014c0148);
    850 		hyperfb_write4(sc, NGLE_REG_43, 0x404c4048);
    851 		hyperfb_write4(sc, NGLE_REG_44, 0x034c0348);
    852 		hyperfb_write4(sc, NGLE_REG_45, 0x444c4448);
    853 	} else {
    854 		hyperfb_write4(sc, NGLE_REG_40,
    855 		    HYPERBOWL_MODE_FOR_8_OVER_88_LUT0_NO_TRANSPARENCIES);
    856 		hyperfb_write4(sc, NGLE_REG_40,
    857 		    HYPERBOWL_MODE_FOR_8_OVER_88_LUT0_NO_TRANSPARENCIES);
    858 
    859 		hyperfb_write4(sc, NGLE_REG_42, 0);
    860 		hyperfb_write4(sc, NGLE_REG_43, 0);
    861 		hyperfb_write4(sc, NGLE_REG_44, 0);
    862 		hyperfb_write4(sc, NGLE_REG_45, 0x444c4048);
    863 	}
    864 
    865 	/* attr. planes */
    866 	hyperfb_wait(sc);
    867 	hyperfb_write4(sc, NGLE_REG_11,
    868 	    BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINattr, 0));
    869 	hyperfb_write4(sc, NGLE_REG_14,
    870 	    IBOvals(RopSrc, 0, BitmapExtent08, 1, DataDynamic, MaskOtc, 1, 0));
    871 	hyperfb_write4(sc, NGLE_REG_12, 0x04000F00/*NGLE_BUFF0_CMAP0*/);
    872 	hyperfb_write4(sc, NGLE_REG_8, 0xffffffff);
    873 
    874 	hyperfb_wait(sc);
    875 	hyperfb_write4(sc, NGLE_REG_6, 0x00000000);
    876 	hyperfb_write4(sc, NGLE_REG_9,
    877 	    (sc->sc_width << 16) | sc->sc_height);
    878 	/*
    879 	 * blit into offscreen memory to force flush previous - apparently
    880 	 * some chips have a bug this works around
    881 	 */
    882 	hyperfb_wait(sc);
    883 	hyperfb_write4(sc, NGLE_REG_6, 0x05000000);
    884 	hyperfb_write4(sc, NGLE_REG_9, 0x00040001);
    885 
    886 	/*
    887 	 * on 24bit-capable hardware we:
    888 	 * - make overlay colour 255 transparent
    889 	 * - blit the 24bit buffer all white
    890 	 * - install a linear ramp in CMAP 0
    891 	 */
    892 	if (sc->sc_24bit) {
    893 		/* overlay transparency */
    894 		hyperfb_wait_fifo(sc, 7);
    895 		hyperfb_write4(sc, NGLE_REG_11,
    896 		    BA(IndexedDcd, Otc04, Ots08, AddrLong, 0, BINovly, 0));
    897 		hyperfb_write4(sc, NGLE_REG_14, 0x03000300);
    898 		hyperfb_write4(sc, NGLE_REG_3, 0x000017f0);
    899 		hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    900 		hyperfb_write4(sc, NGLE_REG_22, 0xffffffff);
    901 		hyperfb_write4(sc, NGLE_REG_23, 0x0);
    902 
    903 		hyperfb_wait(sc);
    904 		hyperfb_write4(sc, NGLE_REG_12, 0x00000000);
    905 
    906 		/* clear 24bit buffer */
    907 		hyperfb_wait(sc);
    908 		/* plane mask */
    909 		hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    910 		hyperfb_write4(sc, NGLE_REG_8, 0xffffffff); /* transfer data */
    911 		/* bitmap op */
    912 		hyperfb_write4(sc, NGLE_REG_14,
    913 		    IBOvals(RopSrc, 0, BitmapExtent32, 0, DataDynamic, MaskOtc,
    914 			0, 0));
    915 		/* dst bitmap access */
    916 		hyperfb_write4(sc, NGLE_REG_11,
    917 		    BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINapp0F8,
    918 			0));
    919 		hyperfb_wait_fifo(sc, 3);
    920 		hyperfb_write4(sc, NGLE_REG_35, 0x00ffffff);	/* fg colour */
    921 		hyperfb_write4(sc, NGLE_REG_6, 0x00000000);	/* dst xy */
    922 		hyperfb_write4(sc, NGLE_REG_9,
    923 		    (sc->sc_width << 16) | sc->sc_height);
    924 
    925 		/* write a linear ramp into CMAP0 */
    926 		hyperfb_wait(sc);
    927 		hyperfb_write4(sc, NGLE_REG_10, 0xbbe0f000);
    928 		hyperfb_write4(sc, NGLE_REG_14, 0x03000300);
    929 		hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    930 
    931 		hyperfb_wait(sc);
    932 		hyperfb_write4(sc, NGLE_REG_3, 0);
    933 		for (i = 0; i < 256; i++) {
    934 			hyperfb_wait(sc);
    935 			hyperfb_write4(sc, NGLE_REG_4,
    936 			    (i << 16) | (i << 8) | i);
    937 		}
    938 		hyperfb_write4(sc, NGLE_REG_2, 0x0);
    939 		hyperfb_write4(sc, NGLE_REG_38,
    940 		    LBC_ENABLE | LBC_TYPE_CMAP | 0x100);
    941 		hyperfb_wait(sc);
    942 	}
    943 
    944 	hyperfb_setup_fb(sc);
    945 
    946 	/* make sure video output is enabled */
    947 	hyperfb_wait(sc);
    948 	hyperfb_write4(sc, NGLE_REG_33,
    949 	    hyperfb_read4(sc, NGLE_REG_33) | 0x0a000000);
    950 
    951 	/* cursor mask */
    952 	hyperfb_wait(sc);
    953 	hyperfb_write4(sc, NGLE_REG_30, 0);
    954 	for (i = 0; i < 64; i++) {
    955 		hyperfb_write4(sc, NGLE_REG_31, 0xffffffff);
    956 		hyperfb_write4(sc, NGLE_REG_31, 0xffffffff);
    957 	}
    958 
    959 	/* cursor image */
    960 	hyperfb_wait(sc);
    961 	hyperfb_write4(sc, NGLE_REG_30, 0x80);
    962 	for (i = 0; i < 64; i++) {
    963 		hyperfb_write4(sc, NGLE_REG_31, 0xff00ff00);
    964 		hyperfb_write4(sc, NGLE_REG_31, 0xff00ff00);
    965 	}
    966 
    967 	/* colour map */
    968 	hyperfb_wait(sc);
    969 	hyperfb_write4(sc, NGLE_REG_10, 0xBBE0F000);
    970 	hyperfb_write4(sc, NGLE_REG_14, 0x03000300);
    971 	hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
    972 	hyperfb_wait(sc);
    973 	hyperfb_write4(sc, NGLE_REG_3, 0);
    974 	hyperfb_write4(sc, NGLE_REG_4, 0x000000ff);	/* BG */
    975 	hyperfb_write4(sc, NGLE_REG_4, 0x00ff0000);	/* FG */
    976 	hyperfb_wait(sc);
    977 	hyperfb_write4(sc, NGLE_REG_2, 0);
    978 	hyperfb_write4(sc, NGLE_REG_38, LBC_ENABLE | LBC_TYPE_CURSOR | 4);
    979 	hyperfb_setup_fb(sc);
    980 
    981 	hyperfb_move_cursor(sc, 100, 100);
    982 }
    983 
    984 static void
    985 hyperfb_set_video(struct hyperfb_softc *sc, int on)
    986 {
    987 	uint32_t reg;
    988 
    989 	if (sc->sc_video_on == on)
    990 		return;
    991 
    992 	sc->sc_video_on = on;
    993 
    994 	hyperfb_wait(sc);
    995 	reg = hyperfb_read4(sc, NGLE_REG_33);
    996 
    997 	if (on) {
    998 		hyperfb_write4(sc, NGLE_REG_33, reg | HCRX_VIDEO_ENABLE);
    999 	} else {
   1000 		hyperfb_write4(sc, NGLE_REG_33, reg & ~HCRX_VIDEO_ENABLE);
   1001 	}
   1002 }
   1003 
   1004 static void
   1005 hyperfb_rectfill(struct hyperfb_softc *sc, int x, int y, int wi, int he,
   1006     uint32_t bg)
   1007 {
   1008 	uint32_t mask = 0xffffffff;
   1009 
   1010 	/*
   1011 	 * XXX
   1012 	 * HCRX and EG both always draw rectangles at least 32 pixels wide
   1013 	 * for anything narrower we need to set a bit mask and enable
   1014 	 * transparency
   1015 	 */
   1016 
   1017 	if (sc->sc_hwmode != HW_FILL) {
   1018 		hyperfb_wait_fifo(sc, 3);
   1019 		/* plane mask */
   1020 		hyperfb_write4(sc, NGLE_REG_13, 0xff);
   1021 		/* bitmap op */
   1022 		hyperfb_write4(sc, NGLE_REG_14,
   1023 		    IBOvals(RopSrc, 0, BitmapExtent08, 0, DataDynamic, MaskOtc,
   1024 			1 /* bg transparent */, 0));
   1025 		/* dst bitmap access */
   1026 		hyperfb_write4(sc, NGLE_REG_11,
   1027 		    BA(IndexedDcd, Otc32, OtsIndirect, AddrLong, 0, BINovly,
   1028 			0));
   1029 		sc->sc_hwmode = HW_FILL;
   1030 	}
   1031 	hyperfb_wait_fifo(sc, 4);
   1032 	if (wi < 32)
   1033 		mask = 0xffffffff << (32 - wi);
   1034 	/*
   1035 	 * XXX - the NGLE code calls this 'transfer data'
   1036 	 * in reality it's a bit mask applied per pixel,
   1037 	 * foreground colour in reg 35, bg in 36
   1038 	 */
   1039 	hyperfb_write4(sc, NGLE_REG_8, mask);
   1040 
   1041 	hyperfb_write4(sc, NGLE_REG_35, bg);
   1042 	/* dst XY */
   1043 	hyperfb_write4(sc, NGLE_REG_6, (x << 16) | y);
   1044 	/* len XY start */
   1045 	hyperfb_write4(sc, NGLE_REG_9, (wi << 16) | he);
   1046 }
   1047 
   1048 static void
   1049 hyperfb_bitblt(void *cookie, int xs, int ys, int xd, int yd, int wi,
   1050     int he, int rop)
   1051 {
   1052 	struct hyperfb_softc *sc = cookie;
   1053 
   1054 	if (sc->sc_hwmode != HW_BLIT) {
   1055 		hyperfb_wait(sc);
   1056 		hyperfb_write4(sc, NGLE_REG_10,
   1057 		    BA(IndexedDcd, Otc04, Ots08, AddrLong, 0, BINovly, 0));
   1058 		hyperfb_write4(sc, NGLE_REG_13, 0xff);
   1059 		sc->sc_hwmode = HW_BLIT;
   1060 	}
   1061 	hyperfb_wait_fifo(sc, 4);
   1062 	hyperfb_write4(sc, NGLE_REG_14, ((rop << 8) & 0xf00) | 0x23000000);
   1063 	/* IBOvals(rop, 0, BitmapExtent08, 1, DataDynamic, MaskOtc, 0, 0) */
   1064 	hyperfb_write4(sc, NGLE_REG_24, (xs << 16) | ys);
   1065 	hyperfb_write4(sc, NGLE_REG_7, (wi << 16) | he);
   1066 	hyperfb_write4(sc, NGLE_REG_25, (xd << 16) | yd);
   1067 }
   1068 
   1069 static void
   1070 hyperfb_nuke_cursor(struct rasops_info *ri)
   1071 {
   1072 	struct vcons_screen *scr = ri->ri_hw;
   1073 	struct hyperfb_softc *sc = scr->scr_cookie;
   1074 	int wi, he, x, y;
   1075 
   1076 	if (ri->ri_flg & RI_CURSOR) {
   1077 		wi = ri->ri_font->fontwidth;
   1078 		he = ri->ri_font->fontheight;
   1079 		x = ri->ri_ccol * wi + ri->ri_xorigin;
   1080 		y = ri->ri_crow * he + ri->ri_yorigin;
   1081 		hyperfb_bitblt(sc, x, y, x, y, wi, he, RopInv);
   1082 		ri->ri_flg &= ~RI_CURSOR;
   1083 	}
   1084 }
   1085 
   1086 static void
   1087 hyperfb_cursor(void *cookie, int on, int row, int col)
   1088 {
   1089 	struct rasops_info *ri = cookie;
   1090 	struct vcons_screen *scr = ri->ri_hw;
   1091 	struct hyperfb_softc *sc = scr->scr_cookie;
   1092 	int x, y, wi, he;
   1093 
   1094 	wi = ri->ri_font->fontwidth;
   1095 	he = ri->ri_font->fontheight;
   1096 
   1097 	if (sc->sc_mode == WSDISPLAYIO_MODE_EMUL) {
   1098 		if (on) {
   1099 			if (ri->ri_flg & RI_CURSOR) {
   1100 				hyperfb_nuke_cursor(ri);
   1101 			}
   1102 			x = col * wi + ri->ri_xorigin;
   1103 			y = row * he + ri->ri_yorigin;
   1104 			hyperfb_bitblt(sc, x, y, x, y, wi, he, RopInv);
   1105 			ri->ri_flg |= RI_CURSOR;
   1106 		}
   1107 		ri->ri_crow = row;
   1108 		ri->ri_ccol = col;
   1109 	} else {
   1110 		ri->ri_crow = row;
   1111 		ri->ri_ccol = col;
   1112 		ri->ri_flg &= ~RI_CURSOR;
   1113 	}
   1114 }
   1115 
   1116 static void
   1117 hyperfb_putchar(void *cookie, int row, int col, u_int c, long attr)
   1118 {
   1119 	struct rasops_info *ri = cookie;
   1120 	struct wsdisplay_font *font = PICK_FONT(ri, c);
   1121 	struct vcons_screen *scr = ri->ri_hw;
   1122 	struct hyperfb_softc *sc = scr->scr_cookie;
   1123 	void *data;
   1124 	int i, x, y, wi, he/*, rv = GC_NOPE*/;
   1125 	uint32_t bg, fg, mask;
   1126 
   1127 	if (sc->sc_mode != WSDISPLAYIO_MODE_EMUL)
   1128 		return;
   1129 
   1130 	if (!CHAR_IN_FONT(c, font))
   1131 		return;
   1132 
   1133 	if (row == ri->ri_crow && col == ri->ri_ccol) {
   1134 		ri->ri_flg &= ~RI_CURSOR;
   1135 	}
   1136 
   1137 	wi = font->fontwidth;
   1138 	he = font->fontheight;
   1139 
   1140 	x = ri->ri_xorigin + col * wi;
   1141 	y = ri->ri_yorigin + row * he;
   1142 
   1143 	bg = ri->ri_devcmap[(attr >> 16) & 0xf];
   1144 	fg = ri->ri_devcmap[(attr >> 24) & 0x0f];
   1145 
   1146 	/* clear the character cell */
   1147 	hyperfb_rectfill(sc, x, y, wi, he, bg);
   1148 
   1149 	/* if we're drawing a space we're done here */
   1150 	if (c == 0x20)
   1151 		return;
   1152 
   1153 #if 0
   1154 	rv = glyphcache_try(&sc->sc_gc, c, x, y, attr);
   1155 	if (rv == GC_OK)
   1156 		return;
   1157 #endif
   1158 
   1159 	data = WSFONT_GLYPH(c, font);
   1160 
   1161 	hyperfb_wait_fifo(sc, 2);
   1162 
   1163 	/* character colour */
   1164 	hyperfb_write4(sc, NGLE_REG_35, fg);
   1165 	/* dst XY */
   1166 	hyperfb_write4(sc, NGLE_REG_6, (x << 16) | y);
   1167 
   1168 	/*
   1169 	 * drawing a rectangle moves the starting coordinates down the
   1170 	 * y-axis so we can just hammer the wi/he register to draw a full
   1171 	 * character
   1172 	 */
   1173 	if (ri->ri_font->stride == 1) {
   1174 		uint8_t *data8 = data;
   1175 		for (i = 0; i < he; i++) {
   1176 			hyperfb_wait_fifo(sc, 2);
   1177 			mask = *data8;
   1178 			hyperfb_write4(sc, NGLE_REG_8, mask << 24);
   1179 			hyperfb_write4(sc, NGLE_REG_9, (wi << 16) | 1);
   1180 			data8++;
   1181 		}
   1182 	} else {
   1183 		uint16_t *data16 = data;
   1184 		for (i = 0; i < he; i++) {
   1185 			hyperfb_wait_fifo(sc, 2);
   1186 			mask = *data16;
   1187 			hyperfb_write4(sc, NGLE_REG_8, mask << 16);
   1188 			hyperfb_write4(sc, NGLE_REG_9, (wi << 16) | 1);
   1189 			data16++;
   1190 		}
   1191 	}
   1192 #if 0
   1193 	if (rv == GC_ADD)
   1194 		glyphcache_add(&sc->sc_gc, c, x, y);
   1195 #endif
   1196 }
   1197 
   1198 static void
   1199 hyperfb_copycols(void *cookie, int row, int srccol, int dstcol, int ncols)
   1200 {
   1201 	struct rasops_info *ri = cookie;
   1202 	struct vcons_screen *scr = ri->ri_hw;
   1203 	struct hyperfb_softc *sc = scr->scr_cookie;
   1204 	int32_t xs, xd, y, width, height;
   1205 
   1206 	if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
   1207 		if (ri->ri_crow == row &&
   1208 		   (ri->ri_ccol >= srccol && ri->ri_ccol < (srccol + ncols)) &&
   1209 		   (ri->ri_flg & RI_CURSOR)) {
   1210 			hyperfb_nuke_cursor(ri);
   1211 		}
   1212 
   1213 		xs = ri->ri_xorigin + ri->ri_font->fontwidth * srccol;
   1214 		xd = ri->ri_xorigin + ri->ri_font->fontwidth * dstcol;
   1215 		y = ri->ri_yorigin + ri->ri_font->fontheight * row;
   1216 		width = ri->ri_font->fontwidth * ncols;
   1217 		height = ri->ri_font->fontheight;
   1218 		hyperfb_bitblt(sc, xs, y, xd, y, width, height, RopSrc);
   1219 		if (ri->ri_crow == row &&
   1220 		   (ri->ri_ccol >= dstcol && ri->ri_ccol < (dstcol + ncols)))
   1221 			ri->ri_flg &= ~RI_CURSOR;
   1222 	}
   1223 }
   1224 
   1225 static void
   1226 hyperfb_erasecols(void *cookie, int row, int startcol, int ncols,
   1227     long fillattr)
   1228 {
   1229 	struct rasops_info *ri = cookie;
   1230 	struct vcons_screen *scr = ri->ri_hw;
   1231 	struct hyperfb_softc *sc = scr->scr_cookie;
   1232 	int32_t x, y, width, height, fg, bg, ul;
   1233 
   1234 	if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
   1235 		x = ri->ri_xorigin + ri->ri_font->fontwidth * startcol;
   1236 		y = ri->ri_yorigin + ri->ri_font->fontheight * row;
   1237 		width = ri->ri_font->fontwidth * ncols;
   1238 		height = ri->ri_font->fontheight;
   1239 		rasops_unpack_attr(fillattr, &fg, &bg, &ul);
   1240 
   1241 		hyperfb_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]);
   1242 		if (ri->ri_crow == row &&
   1243 		    (ri->ri_ccol >= startcol &&
   1244 			ri->ri_ccol < (startcol + ncols)))
   1245 			ri->ri_flg &= ~RI_CURSOR;
   1246 	}
   1247 }
   1248 
   1249 static void
   1250 hyperfb_copyrows(void *cookie, int srcrow, int dstrow, int nrows)
   1251 {
   1252 	struct rasops_info *ri = cookie;
   1253 	struct vcons_screen *scr = ri->ri_hw;
   1254 	struct hyperfb_softc *sc = scr->scr_cookie;
   1255 	int32_t x, ys, yd, width, height;
   1256 
   1257 	if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
   1258 		if ((ri->ri_crow >= srcrow &&
   1259 			ri->ri_crow < (srcrow + nrows)) &&
   1260 		    (ri->ri_flg & RI_CURSOR)) {
   1261 			hyperfb_nuke_cursor(ri);
   1262 		}
   1263 		x = ri->ri_xorigin;
   1264 		ys = ri->ri_yorigin + ri->ri_font->fontheight * srcrow;
   1265 		yd = ri->ri_yorigin + ri->ri_font->fontheight * dstrow;
   1266 		width = ri->ri_emuwidth;
   1267 		height = ri->ri_font->fontheight * nrows;
   1268 		hyperfb_bitblt(sc, x, ys, x, yd, width, height, RopSrc);
   1269 		if (ri->ri_crow >= dstrow && ri->ri_crow < (dstrow + nrows))
   1270 			ri->ri_flg &= ~RI_CURSOR;
   1271 	}
   1272 }
   1273 
   1274 static void
   1275 hyperfb_eraserows(void *cookie, int row, int nrows, long fillattr)
   1276 {
   1277 	struct rasops_info *ri = cookie;
   1278 	struct vcons_screen *scr = ri->ri_hw;
   1279 	struct hyperfb_softc *sc = scr->scr_cookie;
   1280 	int32_t x, y, width, height, fg, bg, ul;
   1281 
   1282 	if ((sc->sc_locked == 0) && (sc->sc_mode == WSDISPLAYIO_MODE_EMUL)) {
   1283 		x = ri->ri_xorigin;
   1284 		y = ri->ri_yorigin + ri->ri_font->fontheight * row;
   1285 		width = ri->ri_emuwidth;
   1286 		height = ri->ri_font->fontheight * nrows;
   1287 		rasops_unpack_attr(fillattr, &fg, &bg, &ul);
   1288 
   1289 		hyperfb_rectfill(sc, x, y, width, height, ri->ri_devcmap[bg]);
   1290 
   1291 		if (ri->ri_crow >= row && ri->ri_crow < (row + nrows))
   1292 			ri->ri_flg &= ~RI_CURSOR;
   1293 	}
   1294 }
   1295 
   1296 static void
   1297 hyperfb_move_cursor(struct hyperfb_softc *sc, int x, int y)
   1298 {
   1299 	uint32_t pos;
   1300 
   1301 	sc->sc_cursor_x = x;
   1302 	x -= sc->sc_hot_x;
   1303 	sc->sc_cursor_y = y;
   1304 	y -= sc->sc_hot_y;
   1305 
   1306 	if (x < 0) x = 0x1000 - x;
   1307 	if (y < 0) y = 0x1000 - y;
   1308 	pos = (x << 16) | y;
   1309 	if (sc->sc_enabled) pos |= HCRX_ENABLE_CURSOR;
   1310 	hyperfb_wait_fifo(sc, 2);
   1311 	hyperfb_write4(sc, NGLE_REG_28, 0);
   1312 	hyperfb_write4(sc, NGLE_REG_29, pos);
   1313 }
   1314 
   1315 static int
   1316 hyperfb_do_cursor(struct hyperfb_softc *sc, struct wsdisplay_cursor *cur)
   1317 {
   1318 
   1319 	if (cur->which & WSDISPLAY_CURSOR_DOCUR) {
   1320 
   1321 		sc->sc_enabled = cur->enable;
   1322 		cur->which |= WSDISPLAY_CURSOR_DOPOS;
   1323 	}
   1324 	if (cur->which & WSDISPLAY_CURSOR_DOHOT) {
   1325 
   1326 		sc->sc_hot_x = cur->hot.x;
   1327 		sc->sc_hot_y = cur->hot.y;
   1328 		cur->which |= WSDISPLAY_CURSOR_DOPOS;
   1329 	}
   1330 	if (cur->which & WSDISPLAY_CURSOR_DOPOS) {
   1331 
   1332 		hyperfb_move_cursor(sc, cur->pos.x, cur->pos.y);
   1333 	}
   1334 	if (cur->which & WSDISPLAY_CURSOR_DOCMAP) {
   1335 		uint32_t rgb;
   1336 		uint8_t r[2], g[2], b[2];
   1337 
   1338 		copyin(cur->cmap.blue, b, 2);
   1339 		copyin(cur->cmap.green, g, 2);
   1340 		copyin(cur->cmap.red, r, 2);
   1341 		mutex_enter(&sc->sc_hwlock);
   1342 		hyperfb_wait(sc);
   1343 		hyperfb_write4(sc, NGLE_REG_10, 0xBBE0F000);
   1344 		hyperfb_write4(sc, NGLE_REG_14, 0x03000300);
   1345 		hyperfb_write4(sc, NGLE_REG_13, 0xffffffff);
   1346 		hyperfb_wait(sc);
   1347 		hyperfb_write4(sc, NGLE_REG_3, 0);
   1348 		rgb = (r[0] << 16) | (g[0] << 8) | b[0];
   1349 		hyperfb_write4(sc, NGLE_REG_4, rgb);	/* BG */
   1350 		rgb = (r[1] << 16) | (g[1] << 8) | b[1];
   1351 		hyperfb_write4(sc, NGLE_REG_4, rgb);	/* FG */
   1352 		hyperfb_write4(sc, NGLE_REG_2, 0);
   1353 		hyperfb_write4(sc, NGLE_REG_38,
   1354 		    LBC_ENABLE | LBC_TYPE_CURSOR | 4);
   1355 
   1356 		hyperfb_setup_fb(sc);
   1357 		mutex_exit(&sc->sc_hwlock);
   1358 
   1359 	}
   1360 	if (cur->which & WSDISPLAY_CURSOR_DOSHAPE) {
   1361 		uint32_t buffer[128], latch, tmp;
   1362 		int i;
   1363 
   1364 		copyin(cur->mask, buffer, 512);
   1365 		hyperfb_wait(sc);
   1366 		hyperfb_write4(sc, NGLE_REG_30, 0);
   1367 		for (i = 0; i < 128; i += 2) {
   1368 			latch = 0;
   1369 			tmp = buffer[i] & 0x80808080;
   1370 			latch |= tmp >> 7;
   1371 			tmp = buffer[i] & 0x40404040;
   1372 			latch |= tmp >> 5;
   1373 			tmp = buffer[i] & 0x20202020;
   1374 			latch |= tmp >> 3;
   1375 			tmp = buffer[i] & 0x10101010;
   1376 			latch |= tmp >> 1;
   1377 			tmp = buffer[i] & 0x08080808;
   1378 			latch |= tmp << 1;
   1379 			tmp = buffer[i] & 0x04040404;
   1380 			latch |= tmp << 3;
   1381 			tmp = buffer[i] & 0x02020202;
   1382 			latch |= tmp << 5;
   1383 			tmp = buffer[i] & 0x01010101;
   1384 			latch |= tmp << 7;
   1385 			hyperfb_write4(sc, NGLE_REG_31, latch);
   1386 			latch = 0;
   1387 			tmp = buffer[i + 1] & 0x80808080;
   1388 			latch |= tmp >> 7;
   1389 			tmp = buffer[i + 1] & 0x40404040;
   1390 			latch |= tmp >> 5;
   1391 			tmp = buffer[i + 1] & 0x20202020;
   1392 			latch |= tmp >> 3;
   1393 			tmp = buffer[i + 1] & 0x10101010;
   1394 			latch |= tmp >> 1;
   1395 			tmp = buffer[i + 1] & 0x08080808;
   1396 			latch |= tmp << 1;
   1397 			tmp = buffer[i + 1] & 0x04040404;
   1398 			latch |= tmp << 3;
   1399 			tmp = buffer[i + 1] & 0x02020202;
   1400 			latch |= tmp << 5;
   1401 			tmp = buffer[i + 1] & 0x01010101;
   1402 			latch |= tmp << 7;
   1403 			hyperfb_write4(sc, NGLE_REG_31, latch);
   1404 		}
   1405 
   1406 		copyin(cur->image, buffer, 512);
   1407 		hyperfb_wait(sc);
   1408 		hyperfb_write4(sc, NGLE_REG_30, 0x80);
   1409 		for (i = 0; i < 128; i += 2) {
   1410 			latch = 0;
   1411 			tmp = buffer[i] & 0x80808080;
   1412 			latch |= tmp >> 7;
   1413 			tmp = buffer[i] & 0x40404040;
   1414 			latch |= tmp >> 5;
   1415 			tmp = buffer[i] & 0x20202020;
   1416 			latch |= tmp >> 3;
   1417 			tmp = buffer[i] & 0x10101010;
   1418 			latch |= tmp >> 1;
   1419 			tmp = buffer[i] & 0x08080808;
   1420 			latch |= tmp << 1;
   1421 			tmp = buffer[i] & 0x04040404;
   1422 			latch |= tmp << 3;
   1423 			tmp = buffer[i] & 0x02020202;
   1424 			latch |= tmp << 5;
   1425 			tmp = buffer[i] & 0x01010101;
   1426 			latch |= tmp << 7;
   1427 			hyperfb_write4(sc, NGLE_REG_31, latch);
   1428 			latch = 0;
   1429 			tmp = buffer[i + 1] & 0x80808080;
   1430 			latch |= tmp >> 7;
   1431 			tmp = buffer[i + 1] & 0x40404040;
   1432 			latch |= tmp >> 5;
   1433 			tmp = buffer[i + 1] & 0x20202020;
   1434 			latch |= tmp >> 3;
   1435 			tmp = buffer[i + 1] & 0x10101010;
   1436 			latch |= tmp >> 1;
   1437 			tmp = buffer[i + 1] & 0x08080808;
   1438 			latch |= tmp << 1;
   1439 			tmp = buffer[i + 1] & 0x04040404;
   1440 			latch |= tmp << 3;
   1441 			tmp = buffer[i + 1] & 0x02020202;
   1442 			latch |= tmp << 5;
   1443 			tmp = buffer[i + 1] & 0x01010101;
   1444 			latch |= tmp << 7;
   1445 			hyperfb_write4(sc, NGLE_REG_31, latch);
   1446 		}
   1447 		hyperfb_setup_fb(sc);
   1448 	}
   1449 
   1450 	return 0;
   1451 }
   1452