NetBSD/sys/arch/amiga/dev/zz9k_fb.c

933 lines
28 KiB
C

/* $NetBSD: zz9k_fb.c,v 1.1 2023/05/03 13:49:30 phx Exp $ */
/*
* Copyright (c) 2020 The NetBSD Foundation, Inc.
* All rights reserved.
*
* This code is derived from software contributed to The NetBSD Foundation
* by Alain Runa.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
* IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
* OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
* IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
* INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
* NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
* DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
* THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
* (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
* THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
*/
#include <sys/cdefs.h>
__KERNEL_RCSID(0, "$NetBSD: zz9k_fb.c,v 1.1 2023/05/03 13:49:30 phx Exp $");
/* miscellaneous */
#include <sys/errno.h> /* EPASSTHROUGH */
#include <sys/types.h> /* size_t */
#include <sys/stdint.h> /* uintXX_t */
#include <sys/stdbool.h> /* bool */
/* driver(9) */
#include <sys/param.h> /* NODEV */
#include <sys/device.h> /* CFATTACH_DECL_NEW(), device_priv() */
#include <sys/errno.h> /* EINVAL, ENODEV, EPASSTHROUGH */
/* bus_space(9) and zorro bus */
#include <sys/bus.h> /* bus_space_xxx(), bus_space_xxx_t */
#include <sys/cpu.h> /* kvtop() */
#include <sys/systm.h> /* aprint_xxx() */
/* wsdisplay(9) */
#include <dev/wscons/wsconsio.h> /* WSDISPLAYIO_XXX, wsdisplayio_xxx */
#include <dev/wscons/wsdisplayvar.h> /* wsscreen_xxx, wsdisplay_xxx */
#include <dev/wscons/wsemulvar.h> /* ? */
#include <dev/wscons/wsemul_vt100var.h> /* ? */
/* rasops(9) */
/* #include <dev/wscons/wsdisplayvar.h> */
#include <dev/rasops/rasops.h> /* rasops_unpack_attr(), rasops_info */
/* wsfont(9) */
/* #include <dev/wscons/wsconsio.h> */ /* WSDISPLAYIO_XXX, wsdisplayio_xxx */
#include <dev/wsfont/wsfont.h> /* wsfont_init() */
/* vcons(9) */
#include <dev/wscons/wsdisplay_vconsvar.h> /* vcons_xxx(), vcons_data,
vcons_screen */
/* cons(9) */
#include <dev/cons.h> /* consdev, CN_INTERNAL */
/* zz9k and amiga related */
#include <amiga/dev/kbdvar.h> /* kbd_cnattach() */
#include <amiga/dev/zz9kvar.h> /* zz9kbus_attach_args */
#include <amiga/dev/zz9kreg.h> /* ZZ9000 registers */
#include "opt_zz9k_fb.h" /* ZZFB_CONSOLE */
#include "zz9k_fb.h" /* NZZ9K_FB */
#include "kbd.h" /* NKBD */
/*
* One can choose different graphics modes and color depths for the different
* wsdisplay modes emul (console), mapped (raw) and dumbfb (e.g. X11) here.
* Please consult zz9kreg.h for available graphics modes and color depths
* supported by the ZZ9000.
*/
#define ZZFB_SET_CON_MODE ZZ9K_MODE_1280x720 /* Console */
#define ZZFB_SET_CON_BPP ZZ9K_COLOR_8BIT
#define ZZFB_SET_GFX_MODE ZZ9K_MODE_1280x720 /* raw FB */
#define ZZFB_SET_GFX_BPP ZZ9K_COLOR_16BIT
#define ZZFB_SET_DFB_MODE ZZ9K_MODE_1280x720 /* X11 */
#define ZZFB_SET_DFB_BPP ZZ9K_COLOR_16BIT
/*
* This defines ZZ9000 scandoubler's capture mode and it is used only in case
* the ZZ9000 does not have the early console, but also in X11 video off mode.
* NetBSD defaults to NTSC amiga screen, so the scandoubler default is NTSC too.
* On a custom configured kernel for a PAL screen, one should consider to change
* the capture mode to PAL to get the best result. If the attached monitor does
* not support a scandoubled PAL signal in 50Hz, consider using the VGA 800x600
* capture mode which is compatible with most monitors and works fine with NTSC
* and PAL captures at 60Hz.
* Valid values for ZZFB_CAP_MODE: 0: NTSC, 1: PAL, 2:VGA (PAL60)
*/
#define ZZFB_CAP_MODE 0
#if ZZFB_CAP_MODE == 0
#define ZZFB_CAPTURE_MODE ZZ9K_MODE_720x480
#define ZZFB_DISPLAY_MODE ZZ9K_MODE_720x480
#elif ZZFB_CAP_MODE == 1
#define ZZFB_CAPTURE_MODE ZZ9K_MODE_720x576p50
#define ZZFB_DISPLAY_MODE ZZ9K_MODE_720x576p50
#elif ZZFB_CAP_MODE == 2
#define ZZFB_CAPTURE_MODE ZZ9K_MODE_800x600
#define ZZFB_DISPLAY_MODE ZZ9K_MODE_800x600
#endif
/* The allmighty softc structure */
struct zzfb_softc {
device_t sc_dev;
struct bus_space_tag sc_bst;
bus_space_tag_t sc_iot;
bus_space_handle_t sc_regh;
bus_space_handle_t sc_fbh;
size_t sc_fbsize;
struct vcons_screen sc_console_screen;
struct vcons_data sc_vd;
struct wsscreen_descr sc_defaultscreen;
struct wsscreen_list sc_screenlist;
const struct wsscreen_descr *sc_screens[1];
u_int sc_wsmode;
uint16_t sc_displaymode;
uint16_t sc_colormode;
uint16_t sc_width;
uint16_t sc_height;
uint16_t sc_bpp;
uint16_t sc_stride;
u_char red[ZZ9K_PALETTE_SIZE];
u_char green[ZZ9K_PALETTE_SIZE];
u_char blue[ZZ9K_PALETTE_SIZE];
bool sc_isconsole;
bool sc_isrtg;
};
static const struct {
const char* name;
uint16_t width;
uint16_t height;
uint16_t scale;
} zzfb_modes[] = { /* Hardcoded in firmware */
{ "1280x720p60", 1280, 720, ZZ9K_MODE_SCALE_0},
{ "800x600p60", 800, 600, ZZ9K_MODE_SCALE_0},
{ "640x480p60", 640, 480, ZZ9K_MODE_SCALE_0},
{ "1024x768p60", 1024, 768, ZZ9K_MODE_SCALE_0},
{ "1280x1024p60", 1280, 1024, ZZ9K_MODE_SCALE_0},
{ "1920x1080p60", 1920, 1080, ZZ9K_MODE_SCALE_0},
{ "720x576p50", 720, 576, ZZ9K_MODE_SCALE_0}, /* 50 Hz */
{ "1920x1080p50", 1920, 1080, ZZ9K_MODE_SCALE_0}, /* 50 Hz */
{ "720x480p60", 720, 480, ZZ9K_MODE_SCALE_0},
{ "640x512p60", 640, 512, ZZ9K_MODE_SCALE_0},
{ "1600x1200p60", 1600, 1200, ZZ9K_MODE_SCALE_0},
{ "2560x1444p30", 2560, 1444, ZZ9K_MODE_SCALE_0}, /* 30 Hz */
{ "720x576p50-NS-PAL", 720, 576, ZZ9K_MODE_SCALE_0}, /* 50 Hz */
{ "720x480p60-NS-PAL", 720, 480, ZZ9K_MODE_SCALE_0},
{"720x576p50-NS-NTSC", 720, 576, ZZ9K_MODE_SCALE_0}, /* 50 Hz */
{"720x480p60-NS-NTSC", 720, 480, ZZ9K_MODE_SCALE_0},
{ "640x400p60", 640, 400, ZZ9K_MODE_SCALE_0},
{ "1920x800p60", 640, 400, ZZ9K_MODE_SCALE_0}
};
static const struct {
const char* name;
uint16_t bpp;
uint16_t mode;
uint16_t stride;
} zzfb_colors[] = { /* Hardcoded in firmware */
{ "8-bit LUT", 8, ZZ9K_MODE_COLOR_8BIT , 1},
{ "16-bit RGB565", 16, ZZ9K_MODE_COLOR_16BIT, 2},
{"32-bit BGRA8888", 32, ZZ9K_MODE_COLOR_32BIT, 4},
{"16-bit ARGB1555", 15, ZZ9K_MODE_COLOR_15BIT, 2}
};
#define ZZFB_MODES_SIZE (sizeof zzfb_modes / sizeof zzfb_modes[0])
#define ZZFB_COLORS_SIZE (sizeof zzfb_colors / sizeof zzfb_colors[0])
/* functions to set gfx mode, palette and misc stuff to make life easier. */
static void zzfb_set_capture(struct zzfb_softc *sc, uint16_t display_mode,
uint16_t capture_mode);
static void zzfb_set_mode(struct zzfb_softc *sc, uint16_t display_mode,
uint16_t color_mode);
static void zzfb_wait_vblank(struct zzfb_softc *sc);
static void zzfb_init_palette(struct zzfb_softc *sc);
static void zzfb_set_palette(struct zzfb_softc *sc);
static void zzfb_clearbg(struct zzfb_softc *sc, uint8_t color_index);
static int zzfb_get_fbinfo(struct zzfb_softc *sc,
struct wsdisplayio_fbinfo *fbi);
/* vcons_data init_screen function */
static void zzfb_init_screen(void *cookie, struct vcons_screen *scr,
int existing, long *defattr);
/* accelerated raster ops functions */
static void zzfb_eraserows(void *cookie, int row, int nrows, long fillattr);
static void zzfb_copyrows(void *cookie, int srcrow, int dstrow, int nrows);
static void zzfb_copycols(void *cookie, int row, int srccol, int dstcol,
int ncols);
static void zzfb_erasecols(void *cookie, int row, int startcol, int ncols,
long fillattr);
/* blitter support functions*/
static void zzfb_rectfill(struct zzfb_softc *sc, uint16_t x, uint16_t y,
uint16_t w, uint16_t h, uint32_t color);
static void zzfb_bitblt(struct zzfb_softc *sc, uint16_t x, uint16_t y,
uint16_t w, uint16_t h, uint16_t xs, uint16_t ys);
/* wsdisplay_accessops stuff */
static paddr_t zzfb_mmap(void *v, void *vs, off_t offset, int prot);
static int zzfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
struct lwp *l);
static int zzfb_getcmap(struct zzfb_softc *sc, struct wsdisplay_cmap *cm);
static int zzfb_putcmap(struct zzfb_softc *sc, struct wsdisplay_cmap *cm);
struct wsdisplay_accessops zzfb_accessops =
{zzfb_ioctl, zzfb_mmap, NULL, NULL, NULL, NULL, NULL, NULL};
/* driver(9) essentials */
static int zzfb_match(device_t parent, cfdata_t match, void *aux);
static void zzfb_attach(device_t parent, device_t self, void *aux);
CFATTACH_DECL_NEW(
zz9k_fb, sizeof(struct zzfb_softc), zzfb_match, zzfb_attach, NULL, NULL );
#ifdef ZZFB_CONSOLE
extern bool zz9k_exists;
#endif /* ZZFB_CONSOLE */
/* If you build it, they will come... */
static int
zzfb_match(device_t parent, cfdata_t match, void *aux)
{
struct zz9kbus_attach_args *bap = aux;
if (strcmp(bap->zzaa_name, "zz9k_fb") != 0) {
return 0;
}
return 1;
}
static void
zzfb_attach(device_t parent, device_t self, void *aux)
{
struct zz9kbus_attach_args *bap = aux;
struct zzfb_softc *sc = device_private(self);
struct zz9k_softc *psc = device_private(parent);
struct rasops_info *ri;
struct wsemuldisplaydev_attach_args ws_aa;
long defattr;
sc->sc_dev = self;
sc->sc_bst.base = bap->zzaa_base;
sc->sc_bst.absm = &amiga_bus_stride_1;
sc->sc_iot = &sc->sc_bst;
sc->sc_regh = psc->sc_regh;
if (psc->sc_zsize >= (ZZ9K_FB_BASE + ZZ9K_FB_SIZE)) {
sc->sc_fbsize = ZZ9K_FB_SIZE;
} else {
sc->sc_fbsize = psc->sc_zsize - ZZ9K_FB_BASE;
}
if (bus_space_map(sc->sc_iot, ZZ9K_FB_BASE, sc->sc_fbsize,
BUS_SPACE_MAP_LINEAR, &sc->sc_fbh)) {
aprint_error(": Failed to map MNT ZZ9000 framebuffer.\n");
return;
}
zzfb_set_mode(sc, ZZFB_SET_CON_MODE, ZZFB_SET_CON_BPP);
zzfb_init_palette(sc);
zzfb_clearbg(sc, WS_DEFAULT_BG);
aprint_normal(": Framebuffer resolution: %s, "
"depth: %i bpp (%s)\n", zzfb_modes[sc->sc_displaymode].name,
sc->sc_bpp, zzfb_colors[sc->sc_colormode].name);
aprint_debug_dev(sc->sc_dev, "[DEBUG] registers at %p/%p (pa/va), "
"framebuffer at %p/%p (pa/va) with %i MB\n",
(void *)kvtop((void *)sc->sc_regh),
bus_space_vaddr(sc->sc_iot, sc->sc_regh),
(void *)kvtop((void *)sc->sc_fbh),
bus_space_vaddr(sc->sc_iot, sc->sc_fbh),
sc->sc_fbsize / (1024 * 1024));
sc->sc_defaultscreen = (struct wsscreen_descr) {"default", 0, 0, NULL,
8, 16, WSSCREEN_WSCOLORS | WSSCREEN_HILIT, NULL};
sc->sc_screens[0] = &sc->sc_defaultscreen;
sc->sc_screenlist = (struct wsscreen_list){1, sc->sc_screens};
sc->sc_wsmode = WSDISPLAYIO_MODE_EMUL;
vcons_init(&sc->sc_vd, sc, &sc->sc_defaultscreen, &zzfb_accessops);
sc->sc_vd.init_screen = zzfb_init_screen;
ri = &sc->sc_console_screen.scr_ri;
#ifdef ZZFB_CONSOLE
sc->sc_isconsole = true;
vcons_init_screen(&sc->sc_vd, &sc->sc_console_screen, 1,
&defattr);
sc->sc_console_screen.scr_flags = VCONS_SCREEN_IS_STATIC;
vcons_redraw_screen(&sc->sc_console_screen);
sc->sc_defaultscreen.textops = &ri->ri_ops;
sc->sc_defaultscreen.capabilities = ri->ri_caps;
sc->sc_defaultscreen.nrows = ri->ri_rows;
sc->sc_defaultscreen.ncols = ri->ri_cols;
wsdisplay_cnattach(&sc->sc_defaultscreen, ri, 0, 0, defattr);
vcons_replay_msgbuf(&sc->sc_console_screen);
#else
sc->sc_isconsole = false;
if (sc->sc_console_screen.scr_ri.ri_rows == 0) {
vcons_init_screen(&sc->sc_vd, &sc->sc_console_screen, 1,
&defattr);
} else {
(*ri->ri_ops.allocattr)(ri, 0, 0, 0, &defattr);
}
zzfb_set_capture(sc, ZZFB_DISPLAY_MODE, ZZFB_CAPTURE_MODE);
aprint_normal_dev (sc->sc_dev, "Scandoubler capture: %s, "
"display: %s in %s.\n",
zzfb_modes[ZZFB_CAPTURE_MODE].name,
zzfb_modes[ZZFB_DISPLAY_MODE].name,
zzfb_colors[ZZ9K_COLOR_32BIT].name);
#endif /* ZZFB_CONSOLE */
ws_aa.console = sc->sc_isconsole;
ws_aa.scrdata = &sc->sc_screenlist;
ws_aa.accessops = &zzfb_accessops;
ws_aa.accesscookie = &sc->sc_vd;
config_found(sc->sc_dev, &ws_aa, wsemuldisplaydevprint, CFARGS_NONE);
}
static void
zzfb_init_palette(struct zzfb_softc *sc)
{
for (int index = 0; index < ZZ9K_PALETTE_SIZE; index++) {
sc->red[index] = rasops_cmap[index * 3 + 0];
sc->green[index] = rasops_cmap[index * 3 + 1];
sc->blue[index] = rasops_cmap[index * 3 + 2];
}
zzfb_set_palette(sc);
}
static void
zzfb_set_palette(struct zzfb_softc *sc)
{
uint32_t palette;
uint8_t rVal;
uint8_t gVal;
uint8_t bVal;
for (int index = 0; index < ZZ9K_PALETTE_SIZE; index++) {
rVal = sc->red[index];
gVal = sc->green[index];
bVal = sc->blue[index];
palette = ((index << 24) | (rVal << 16) | (gVal << 8) | bVal);
ZZREG_W(ZZ9K_VIDEO_CTRL_DATA_HI, palette >> 16);
ZZREG_W(ZZ9K_VIDEO_CTRL_DATA_LO, palette & 0xFFFF);
ZZREG_W(ZZ9K_VIDEO_CTRL_OP, ZZ9K_OP_PALETTE);
ZZREG_W(ZZ9K_VIDEO_CTRL_OP, ZZ9K_OP_NOP);
}
}
static void
zzfb_init_screen(void *cookie, struct vcons_screen *scr, int existing,
long *defattr)
{
struct zzfb_softc *sc = cookie;
struct rasops_info *ri = &scr->scr_ri;
scr->scr_flags = VCONS_SCREEN_IS_STATIC;
wsfont_init();
ri->ri_bits = (u_char *)bus_space_vaddr(sc->sc_iot, sc->sc_fbh);
ri->ri_depth = sc->sc_bpp;
ri->ri_width = sc->sc_width;
ri->ri_height = sc->sc_height;
ri->ri_stride = sc->sc_stride;
ri->ri_flg = 0;
if (ri->ri_depth == 32) { /* adjust for BGRA8888 */
ri->ri_rnum = 8; /* for other depths default is OK */
ri->ri_gnum = 8;
ri->ri_bnum = 8;
ri->ri_rpos = 8; /* skip over alpha channel */
ri->ri_gpos = 8 + ri->ri_rnum;
ri->ri_bpos = 8 + ri->ri_rnum + ri->ri_gnum;
}
rasops_init(ri, 0, 0);
ri->ri_caps = WSSCREEN_WSCOLORS;
rasops_reconfig(ri, ri->ri_height / ri->ri_font->fontheight,
ri->ri_width / ri->ri_font->fontwidth);
ri->ri_hw = scr;
ri->ri_ops.eraserows = zzfb_eraserows;
ri->ri_ops.copyrows = zzfb_copyrows;
ri->ri_ops.erasecols = zzfb_erasecols;
ri->ri_ops.copycols = zzfb_copycols;
}
static void
zzfb_set_capture(struct zzfb_softc *sc, uint16_t display_mode,
uint16_t capture_mode)
{
uint16_t panPtrHi;
uint16_t panPtrLo;
uint16_t new_mode;
switch (display_mode) {
case ZZ9K_MODE_720x480: /* NTSC */
panPtrHi = ZZ9K_CAPTURE_PAN_NTSC >> 16;
panPtrLo = ZZ9K_CAPTURE_PAN_NTSC & 0xFFFF;
break;
case ZZ9K_MODE_720x576p50: /* PAL */
panPtrHi = ZZ9K_CAPTURE_PAN_PAL >> 16;
panPtrLo = ZZ9K_CAPTURE_PAN_PAL & 0xFFFF;
break;
case ZZ9K_MODE_800x600: /* VGA */
panPtrHi = ZZ9K_CAPTURE_PAN_VGA >> 16;
panPtrLo = ZZ9K_CAPTURE_PAN_VGA & 0xFFFF;
break;
default:
aprint_error_dev(sc->sc_dev, "Unsupported scandoubler "
"capture and display mode combination.\n");
return;
}
new_mode = ZZ9K_MODE_SCALE_2 | ZZ9K_MODE_COLOR_32BIT | display_mode;
zzfb_wait_vblank(sc);
ZZREG_W(ZZ9K_VIDEOCAP_VMODE, capture_mode);
ZZREG_W(ZZ9K_BLITTER_USER1, ZZ9K_FEATURE_NONSTANDARD_VSYNC);
ZZREG_W(ZZ9K_SET_FEATURE, 0x0000);
ZZREG_W(ZZ9K_VIDEO_CAPTURE_MODE, ZZ9K_CAPTURE_ON);
ZZREG_W(ZZ9K_BLITTER_X1, 0x0000);
ZZREG_W(ZZ9K_BLITTER_Y1, 0x0000);
ZZREG_W(ZZ9K_BLITTER_X2, 0x0000);
ZZREG_W(ZZ9K_BLITTER_COLORMODE, ZZ9K_COLOR_32BIT);
ZZREG_W(ZZ9K_PAN_PTR_HI, panPtrHi);
ZZREG_W(ZZ9K_PAN_PTR_LO, panPtrLo);
ZZREG_W(ZZ9K_MODE, new_mode);
sc->sc_isrtg = false;
}
void
zzfb_set_mode(struct zzfb_softc *sc, uint16_t display_mode,
uint16_t color_mode)
{
uint16_t new_mode;
if ((display_mode < 0) || (display_mode >= ZZFB_MODES_SIZE))
display_mode = ZZ9K_MODE_1280x720;
sc->sc_width = zzfb_modes[display_mode].width;
sc->sc_height = zzfb_modes[display_mode].height;
new_mode = zzfb_modes[display_mode].scale;
if ((color_mode < 0) || (color_mode >= ZZFB_COLORS_SIZE))
color_mode = ZZ9K_COLOR_8BIT;
if ((color_mode == ZZ9K_COLOR_32BIT) && (sc->sc_width > 1920))
color_mode = ZZ9K_COLOR_16BIT;
sc->sc_bpp = zzfb_colors[color_mode].bpp;
sc->sc_stride = sc->sc_width * zzfb_colors[color_mode].stride;
new_mode = new_mode | zzfb_colors[color_mode].mode | display_mode;
sc->sc_displaymode = display_mode;
sc->sc_colormode = color_mode;
zzfb_wait_vblank(sc);
ZZREG_W(ZZ9K_VIDEO_CAPTURE_MODE, ZZ9K_CAPTURE_OFF);
ZZREG_W(ZZ9K_BLITTER_X1, 0x0000);
ZZREG_W(ZZ9K_BLITTER_Y1, 0x0000);
ZZREG_W(ZZ9K_BLITTER_X2, 0x0000);
ZZREG_W(ZZ9K_BLITTER_COLORMODE, color_mode);
ZZREG_W(ZZ9K_BLITTER_SRC_HI, 0x0000);
ZZREG_W(ZZ9K_BLITTER_SRC_LO, 0x0000);
ZZREG_W(ZZ9K_BLITTER_DST_HI, 0x0000);
ZZREG_W(ZZ9K_BLITTER_DST_LO, 0x0000);
ZZREG_W(ZZ9K_BLITTER_SPLIT_POS, 0x0000);
ZZREG_W(ZZ9K_PAN_PTR_HI, 0x0000);
ZZREG_W(ZZ9K_PAN_PTR_LO, 0x0000);
ZZREG_W(ZZ9K_MODE, new_mode);
sc->sc_isrtg = true;
}
static void
zzfb_wait_vblank(struct zzfb_softc *sc)
{
uint16_t vb_status = ZZREG_R(ZZ9K_VIDEO_BLANK_STATUS);
while (vb_status != 0)
vb_status = ZZREG_R(ZZ9K_VIDEO_BLANK_STATUS);
while (vb_status == 0)
vb_status = ZZREG_R(ZZ9K_VIDEO_BLANK_STATUS);
}
static void
zzfb_clearbg(struct zzfb_softc *sc, uint8_t color_index)
{
if (color_index >= ZZ9K_PALETTE_SIZE)
color_index = 0;
uint32_t palette = 0;
uint8_t rVal = rasops_cmap[color_index * 3 + 0];
uint8_t gVal = rasops_cmap[color_index * 3 + 1];
uint8_t bVal = rasops_cmap[color_index * 3 + 2];
switch (sc->sc_colormode) {
case ZZ9K_COLOR_32BIT: /* BGRA8888 */
palette = ((bVal << 24) | (gVal << 16) | (rVal << 8) | 0xFF);
break;
case ZZ9K_COLOR_16BIT: /* RGB565 at high word, don't ask why. */
palette = (((rVal & 0xF8) << 8) |
((gVal & 0xFC) << 3) |
((bVal >> 3) & 0x1F) ) << 16;
break;
case ZZ9K_COLOR_15BIT: /* ARGB1555 at high word, don't ask why. */
palette = ((0x8000) |
((rVal & 0xF8) << 7) |
((gVal & 0xF8) << 2) |
((bVal >> 3) & 0x1F) ) << 16;
break;
case ZZ9K_COLOR_8BIT: /* 256 LUT */
default:
palette = color_index;
break;
}
zzfb_rectfill(sc, 0, 0, sc->sc_width, sc->sc_height, palette);
}
static void
zzfb_rectfill(struct zzfb_softc *sc, uint16_t x, uint16_t y,
uint16_t w, uint16_t h, uint32_t color)
{
ZZREG_W(ZZ9K_BLITTER_X1, x);
ZZREG_W(ZZ9K_BLITTER_Y1, y);
ZZREG_W(ZZ9K_BLITTER_X2, w);
ZZREG_W(ZZ9K_BLITTER_Y2, h);
ZZREG_W(ZZ9K_BLITTER_ROW_PITCH, sc->sc_stride >> 2);
ZZREG_W(ZZ9K_BLITTER_COLORMODE, sc->sc_colormode);
ZZREG_W(ZZ9K_BLITTER_RGB_HI, color >> 16);
ZZREG_W(ZZ9K_BLITTER_RGB_LO, color & 0xFFFF);
ZZREG_W(ZZ9K_BLITTER_OP_FILLRECT, 0x00FF);
}
static void
zzfb_bitblt(struct zzfb_softc *sc, uint16_t x, uint16_t y, uint16_t w,
uint16_t h, uint16_t xs, uint16_t ys)
{
ZZREG_W(ZZ9K_BLITTER_X1, x);
ZZREG_W(ZZ9K_BLITTER_Y1, y);
ZZREG_W(ZZ9K_BLITTER_X2, w);
ZZREG_W(ZZ9K_BLITTER_Y2, h);
ZZREG_W(ZZ9K_BLITTER_X3, xs);
ZZREG_W(ZZ9K_BLITTER_Y3, ys);
ZZREG_W(ZZ9K_BLITTER_ROW_PITCH, sc->sc_stride >> 2);
ZZREG_W(ZZ9K_BLITTER_COLORMODE, (0xFF << 8) | sc->sc_colormode);
ZZREG_W(ZZ9K_BLITTER_OP_COPYRECT, ZZ9K_OPT_REGULAR);
}
static void
zzfb_copyrows(void *cookie, int srcrow, int dstrow, int nrows)
{
struct rasops_info *ri = cookie;
struct vcons_screen *scr = ri->ri_hw;
struct zzfb_softc *sc = scr->scr_cookie;
int x, y, w, h, ys;
if (sc->sc_wsmode == WSDISPLAYIO_MODE_EMUL) {
x = ri->ri_xorigin;
ys = ri->ri_yorigin + ri->ri_font->fontheight * srcrow;
y = ri->ri_yorigin + ri->ri_font->fontheight * dstrow;
w = ri->ri_emuwidth;
h = ri->ri_font->fontheight * nrows;
zzfb_bitblt(sc, x, y, w, h, x, ys);
}
}
static void
zzfb_eraserows(void *cookie, int row, int nrows, long fillattr)
{
struct rasops_info *ri = cookie;
struct vcons_screen *scr = ri->ri_hw;
struct zzfb_softc *sc = scr->scr_cookie;
int x, y, w, h, fg, bg, ul;
if (sc->sc_wsmode == WSDISPLAYIO_MODE_EMUL) {
x = ri->ri_xorigin;
y = ri->ri_yorigin + ri->ri_font->fontheight * row;
w = ri->ri_emuwidth;
h = ri->ri_font->fontheight * nrows;
rasops_unpack_attr(fillattr, &fg, &bg, &ul);
zzfb_rectfill(sc, x, y, w, h, ri->ri_devcmap[bg]);
}
}
static void
zzfb_copycols(void *cookie, int row, int srccol, int dstcol, int ncols)
{
struct rasops_info *ri = cookie;
struct vcons_screen *scr = ri->ri_hw;
struct zzfb_softc *sc = scr->scr_cookie;
int x, y, w, h, xs;
if (sc->sc_wsmode == WSDISPLAYIO_MODE_EMUL) {
xs = ri->ri_xorigin + ri->ri_font->fontwidth * srccol;
x = ri->ri_xorigin + ri->ri_font->fontwidth * dstcol;
y = ri->ri_yorigin + ri->ri_font->fontheight * row;
w = ri->ri_font->fontwidth * ncols;
h = ri->ri_font->fontheight;
zzfb_bitblt(sc, x, y, w, h, xs, y);
}
}
static void
zzfb_erasecols(void *cookie, int row, int startcol, int ncols, long fillattr)
{
struct rasops_info *ri = cookie;
struct vcons_screen *scr = ri->ri_hw;
struct zzfb_softc *sc = scr->scr_cookie;
int x, y, w, h, fg, bg, ul;
if (sc->sc_wsmode == WSDISPLAYIO_MODE_EMUL) {
x = ri->ri_xorigin + ri->ri_font->fontwidth * startcol;
y = ri->ri_yorigin + ri->ri_font->fontheight * row;
w = ri->ri_font->fontwidth * ncols;
h = ri->ri_font->fontheight;
rasops_unpack_attr(fillattr, &fg, &bg, &ul);
zzfb_rectfill(sc, x, y, w, h, ri->ri_devcmap[bg & 0xf]);
}
}
static int
zzfb_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, struct lwp *l)
{
int retval = 0;
u_int new_wsmode;
struct vcons_data *vd = v;
struct zzfb_softc *sc = vd->cookie;
struct vcons_screen *scr = vd->active;
struct wsdisplayio_bus_id *busid;
switch (cmd) {
case WSDISPLAYIO_GTYPE:
*(u_int *)data = WSDISPLAY_TYPE_UNKNOWN;
break;
case WSDISPLAYIO_GET_FBINFO:
retval = zzfb_get_fbinfo(sc, (struct wsdisplayio_fbinfo *)data);
break;
case WSDISPLAYIO_GINFO:
((struct wsdisplay_fbinfo *)data)->width = sc->sc_width;
((struct wsdisplay_fbinfo *)data)->height = sc->sc_height;
((struct wsdisplay_fbinfo *)data)->depth = sc->sc_bpp;
((struct wsdisplay_fbinfo *)data)->cmsize = ZZ9K_PALETTE_SIZE;
break;
case WSDISPLAYIO_GETCMAP:
retval = zzfb_getcmap(sc, (struct wsdisplay_cmap *)data);
break;
case WSDISPLAYIO_PUTCMAP:
retval = zzfb_putcmap(sc, (struct wsdisplay_cmap *)data);
break;
case WSDISPLAYIO_GVIDEO:
*(int *)data = (sc->sc_isrtg == true) ?
WSDISPLAYIO_VIDEO_ON : WSDISPLAYIO_VIDEO_OFF;
break;
case WSDISPLAYIO_SVIDEO:
if (*(int *)data == WSDISPLAYIO_VIDEO_ON) {
zzfb_set_mode(sc, sc->sc_displaymode, sc->sc_colormode);
} else {
zzfb_set_capture(sc, ZZFB_DISPLAY_MODE,
ZZFB_CAPTURE_MODE);
}
break;
case WSDISPLAYIO_GET_BUSID:
busid = data;
busid->bus_type = WSDISPLAYIO_BUS_SOC;
break;
case WSDISPLAYIO_GCURPOS:
case WSDISPLAYIO_SCURPOS:
case WSDISPLAYIO_GCURMAX:
case WSDISPLAYIO_GCURSOR:
case WSDISPLAYIO_SCURSOR:
retval = EPASSTHROUGH;
break;
case WSDISPLAYIO_GMODE:
*(u_int *)data = sc->sc_wsmode;
break;
case WSDISPLAYIO_SMODE:
new_wsmode = *(u_int *)data;
if (new_wsmode != sc->sc_wsmode) {
switch (new_wsmode) {
case WSDISPLAYIO_MODE_EMUL:
zzfb_set_mode(sc,
ZZFB_SET_CON_MODE, ZZFB_SET_CON_BPP);
zzfb_init_palette(sc);
zzfb_clearbg(sc, WS_DEFAULT_BG);
vcons_redraw_screen(scr);
sc->sc_wsmode = new_wsmode;
break;
case WSDISPLAYIO_MODE_MAPPED:
zzfb_set_mode(sc,
ZZFB_SET_GFX_MODE, ZZFB_SET_GFX_BPP);
zzfb_clearbg(sc, WSCOL_BLACK);
sc->sc_wsmode = new_wsmode;
break;
case WSDISPLAYIO_MODE_DUMBFB:
zzfb_set_mode(sc,
ZZFB_SET_DFB_MODE, ZZFB_SET_DFB_BPP);
zzfb_clearbg(sc, WSCOL_BLACK);
sc->sc_wsmode = new_wsmode;
break;
default:
retval = EINVAL;
break;
}
} else {
retval = EINVAL;
}
break;
case WSDISPLAYIO_LINEBYTES:
*(u_int *)data = sc->sc_stride;
break;
case WSDISPLAYIO_GMSGATTRS:
case WSDISPLAYIO_SMSGATTRS:
case WSDISPLAYIO_GBORDER:
case WSDISPLAYIO_SBORDER:
case WSDISPLAYIO_GETWSCHAR:
case WSDISPLAYIO_PUTWSCHAR:
case WSDISPLAYIO_SSPLASH:
case WSDISPLAYIO_GET_EDID:
case WSDISPLAYIO_SETVERSION:
default:
retval = EPASSTHROUGH;
break;
}
return retval;
}
static paddr_t
zzfb_mmap(void *v, void *vs, off_t offset, int prot)
{
struct vcons_data *vd = v;
struct zzfb_softc *sc = vd->cookie;
if ( (offset >= 0) && (offset < sc->sc_fbsize) ) {
return bus_space_mmap( sc->sc_iot,
(bus_addr_t)kvtop((void *)sc->sc_fbh), offset, prot,
BUS_SPACE_MAP_LINEAR);
} else {
return -1;
}
}
static int
zzfb_get_fbinfo(struct zzfb_softc *sc, struct wsdisplayio_fbinfo *fbi)
{
uint32_t bpA, bpR, bpG, bpB;
switch (sc->sc_bpp) {
case 8:
bpA = 0; bpR = 0; bpG = 0; bpB = 0;
break;
case 15:
bpA = 1; bpR = 5; bpG = 5; bpB = 5;
break;
case 16:
bpA = 0; bpR = 5; bpG = 6; bpB = 5;
break;
case 32:
bpA = 8; bpR = 8; bpG = 8; bpB = 8;
break;
default:
return EINVAL;
}
fbi->fbi_flags = 0;
fbi->fbi_fboffset = 0;
fbi->fbi_fbsize = sc->sc_stride * sc->sc_height;
fbi->fbi_width = sc->sc_width;
fbi->fbi_height = sc->sc_height;
fbi->fbi_stride = sc->sc_stride;
fbi->fbi_bitsperpixel = (sc->sc_bpp == 15) ? 16 : sc->sc_bpp;
switch (sc->sc_bpp) {
case 8:
fbi->fbi_pixeltype = WSFB_CI;
fbi->fbi_subtype.fbi_cmapinfo.cmap_entries = ZZ9K_PALETTE_SIZE;
return 0;
case 15: /* ZZ9000 uses ARGB1555 format for 15 bpp */
case 16: /* ZZ9000 uses RGB565 format for 16 bpp */
fbi->fbi_subtype.fbi_rgbmasks.alpha_offset = bpB+bpG+bpR;
fbi->fbi_subtype.fbi_rgbmasks.red_offset = bpB+bpG;
fbi->fbi_subtype.fbi_rgbmasks.green_offset = bpB;
fbi->fbi_subtype.fbi_rgbmasks.blue_offset = 0;
break;
case 32: /* ZZ9000 uses BGRA8888 format for 32 bpp */
fbi->fbi_subtype.fbi_rgbmasks.alpha_offset = 0;
fbi->fbi_subtype.fbi_rgbmasks.red_offset = bpA;
fbi->fbi_subtype.fbi_rgbmasks.green_offset = bpA+bpR;
fbi->fbi_subtype.fbi_rgbmasks.blue_offset = bpA+bpR+bpG;
break;
default:
return EINVAL;
}
fbi->fbi_pixeltype = WSFB_RGB;
fbi->fbi_subtype.fbi_rgbmasks.alpha_size = bpA;
fbi->fbi_subtype.fbi_rgbmasks.red_size = bpR;
fbi->fbi_subtype.fbi_rgbmasks.green_size = bpG;
fbi->fbi_subtype.fbi_rgbmasks.blue_size = bpB;
return 0;
}
static int
zzfb_getcmap(struct zzfb_softc *sc, struct wsdisplay_cmap *cm)
{
int retval = 0;
u_int index = cm->index;
u_int count = cm->count;
if (index >= ZZ9K_PALETTE_SIZE || index + count > ZZ9K_PALETTE_SIZE)
return EINVAL;
retval = copyout(&sc->red[index], cm->red, count);
if (retval != 0)
return retval;
retval = copyout(&sc->green[index], cm->green, count);
if (retval != 0)
return retval;
retval = copyout(&sc->blue[index], cm->blue, count);
if (retval != 0)
return retval;
return retval;
}
static int
zzfb_putcmap(struct zzfb_softc *sc, struct wsdisplay_cmap *cm)
{
int retval = 0;
u_int index = cm->index;
u_int count = cm->count;
if (index >= ZZ9K_PALETTE_SIZE || index + count > ZZ9K_PALETTE_SIZE)
return EINVAL;
retval = copyin(cm->red, &sc->red[index], count);
if (retval != 0)
return retval;
retval = copyin(cm->green, &sc->green[index], count);
if (retval != 0)
return retval;
retval = copyin(cm->blue, &sc->blue[index], count);
if (retval != 0)
return retval;
zzfb_set_palette(sc);
return retval;
}
/*
* Early console handling, associated with amiga/conf.c file which holds a
* table of all console devices. The below functions ensures that ZZ9000 becomes
* wsdisplay0 and wskbd0 gets attached to it.
*/
/* early console handling */
void zzfb_cnprobe(struct consdev *cd);
void zzfb_cninit(struct consdev *cd);
void zzfb_cnpollc(dev_t cd, int on);
void zzfb_cnputc(dev_t cd, int ch);
int zzfb_cngetc(dev_t cd);
void
zzfb_cnprobe(struct consdev *cd)
{
#ifdef ZZFB_CONSOLE
if (zz9k_exists == true) {
cd->cn_pri = CN_INTERNAL;
} else {
cd->cn_pri = CN_DEAD;
}
cd->cn_dev = NODEV;
#endif /* ZZFB_CONSOLE */
}
void
zzfb_cninit(struct consdev *cd)
{
#if defined ZZFB_CONSOLE && NKBD > 0
/* tell kbd device it is used as console keyboard */
if (zz9k_exists == true)
kbd_cnattach();
#endif /* ZZFB_CONSOLE && NKBD > 0 */
}
void
zzfb_cnpollc(dev_t cd, int on)
{
}
void
zzfb_cnputc(dev_t cd, int ch)
{
}
int
zzfb_cngetc(dev_t cd)
{
return 0;
}