/* $NetBSD: sti.c,v 1.43 2024/12/10 09:13:00 macallan Exp $ */ /* $OpenBSD: sti.c,v 1.61 2009/09/05 14:09:35 miod Exp $ */ /* * Copyright (c) 2000-2003 Michael Shalayeff * All rights reserved. * * 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 OR HIS RELATIVES 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 MIND, 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. */ /* * TODO: * call sti procs asynchronously; * implement console scroll-back; * X11 support on more models. */ #include __KERNEL_RCSID(0, "$NetBSD: sti.c,v 1.43 2024/12/10 09:13:00 macallan Exp $"); #include "wsdisplay.h" #include #include #include #include #include #include #include #include #include #include #include #ifdef STIDEBUG #define DPRINTF(s) do { \ if (stidebug) \ printf s; \ } while(0) int stidebug = 1; #else #define DPRINTF(s) /* */ #endif void sti_cursor(void *, int, int, int); int sti_mapchar(void *, int, u_int *); void sti_putchar(void *, int, int, u_int, long); void sti_copycols(void *, int, int, int, int); void sti_erasecols(void *, int, int, int, long); void sti_copyrows(void *, int, int, int); void sti_eraserows(void *, int, int, long); int sti_alloc_attr(void *, int, int, int, long *); /* pseudo attribute ops for sti ROM putchar function */ #define WSATTR_FG_SHIFT 24 #define WSATTR_BG_SHIFT 16 #define WSATTR_UNPACK_FG(attr) (((attr) >> WSATTR_FG_SHIFT) & 0xff) #define WSATTR_UNPACK_BG(attr) (((attr) >> WSATTR_BG_SHIFT) & 0xff) #define WSATTR_UNPACK_FLAG(attr) ((attr) & WSATTR_USERMASK) #define WSATTR_PACK_FG(fg) ((fg) << WSATTR_FG_SHIFT) #define WSATTR_PACK_BG(bg) ((bg) << WSATTR_BG_SHIFT) #define WSATTR_PACK_FLAG(flag) ((flag)) #define WSATTR_PACK(fg, bg, flag) \ (WSATTR_PACK_FG(fg) | WSATTR_PACK_BG(bg) | WSATTR_PACK_FLAG(flag)) struct wsdisplay_emulops sti_emulops = { .cursor = sti_cursor, .mapchar = sti_mapchar, .putchar = sti_putchar, .copycols = sti_copycols, .erasecols = sti_erasecols, .copyrows = sti_copyrows, .eraserows = sti_eraserows, .allocattr = sti_alloc_attr }; const struct wsdisplay_accessops sti_accessops = { .ioctl = sti_ioctl, .mmap = sti_mmap, .alloc_screen = sti_alloc_screen, .free_screen = sti_free_screen, .show_screen = sti_show_screen, .load_font = sti_load_font }; enum sti_bmove_funcs { bmf_clear, bmf_copy, bmf_invert, bmf_underline }; void sti_bmove(struct sti_screen *, int, int, int, int, int, int, enum sti_bmove_funcs); int sti_inqcfg(struct sti_screen *, struct sti_inqconfout *); int sti_setcment(struct sti_screen *, u_int, u_char, u_char, u_char); struct sti_screen *sti_attach_screen(struct sti_softc *, int); void sti_describe_screen(struct sti_softc *, struct sti_screen *); int sti_fetchfonts(struct sti_screen *, struct sti_inqconfout *, uint32_t, u_int); void sti_region_setup(struct sti_screen *); int sti_rom_setup(struct sti_rom *, bus_space_tag_t, bus_space_tag_t, bus_space_handle_t, bus_addr_t *, u_int); int sti_screen_setup(struct sti_screen *, int); int ngle_default_putcmap(struct sti_screen *, u_int, u_int); #ifndef SMALL_KERNEL void ngle_artist_setupfb(struct sti_screen *); void ngle_elk_setupfb(struct sti_screen *); void ngle_timber_setupfb(struct sti_screen *); void summit_setupfb(struct sti_screen *); int ngle_putcmap(struct sti_screen *, u_int, u_int); int ngle_hcrx_putcmap(struct sti_screen *, u_int, u_int); int summit_putcmap(struct sti_screen *, u_int, u_int); #endif #define STI_ENABLE_ROM(sc) \ do { \ if ((sc) != NULL && (sc)->sc_enable_rom != NULL) \ (*(sc)->sc_enable_rom)(sc); \ } while (0) #define STI_DISABLE_ROM(sc) \ do { \ if ((sc) != NULL && (sc)->sc_disable_rom != NULL) \ (*(sc)->sc_disable_rom)(sc); \ } while (0) /* Macros to read larger than 8 bit values from byte roms */ #define parseshort(o) \ ((bus_space_read_1(memt, romh, (o) + 3) << 8) | \ (bus_space_read_1(memt, romh, (o) + 7))) #define parseword(o) \ ((bus_space_read_1(memt, romh, (o) + 3) << 24) | \ (bus_space_read_1(memt, romh, (o) + 7) << 16) | \ (bus_space_read_1(memt, romh, (o) + 11) << 8) | \ (bus_space_read_1(memt, romh, (o) + 15))) int sti_attach_common(struct sti_softc *sc, bus_space_tag_t iot, bus_space_tag_t memt, bus_space_handle_t romh, u_int codebase) { struct sti_rom *rom; int rc; rom = (struct sti_rom *)malloc(sizeof(*rom), M_DEVBUF, M_WAITOK | M_ZERO); rom->rom_softc = sc; rc = sti_rom_setup(rom, iot, memt, romh, sc->bases, codebase); if (rc != 0) { free(rom, M_DEVBUF); return rc; } sc->sc_rom = rom; sti_describe(sc); sc->sc_scr = sti_attach_screen(sc, sc->sc_flags & STI_CONSOLE ? 0 : STI_CLEARSCR); if (sc->sc_scr == NULL) rc = ENOMEM; return rc; } struct sti_screen * sti_attach_screen(struct sti_softc *sc, int flags) { struct sti_screen *scr; int rc; scr = (struct sti_screen *)malloc(sizeof(*scr), M_DEVBUF, M_WAITOK | M_ZERO); scr->scr_rom = sc->sc_rom; rc = sti_screen_setup(scr, flags); if (rc != 0) { free(scr, M_DEVBUF); return NULL; } sti_describe_screen(sc, scr); return scr; } int sti_rom_setup(struct sti_rom *rom, bus_space_tag_t iot, bus_space_tag_t memt, bus_space_handle_t romh, bus_addr_t *bases, u_int codebase) { struct sti_dd *dd; int error, size, i; KASSERT(rom != NULL); STI_ENABLE_ROM(rom->rom_softc); rom->iot = iot; rom->memt = memt; rom->romh = romh; rom->bases = bases; /* * Get ROM header and code function pointers. */ dd = &rom->rom_dd; rom->rom_devtype = bus_space_read_1(memt, romh, 3); if (rom->rom_devtype == STI_DEVTYPE1) { dd->dd_type = bus_space_read_1(memt, romh, 0x03); dd->dd_nmon = bus_space_read_1(memt, romh, 0x07); dd->dd_grrev = bus_space_read_1(memt, romh, 0x0b); dd->dd_lrrev = bus_space_read_1(memt, romh, 0x0f); dd->dd_grid[0] = parseword(0x10); dd->dd_grid[1] = parseword(0x20); dd->dd_fntaddr = parseword(0x30) & ~3; dd->dd_maxst = parseword(0x40); dd->dd_romend = parseword(0x50) & ~3; dd->dd_reglst = parseword(0x60) & ~3; dd->dd_maxreent = parseshort(0x70); dd->dd_maxtimo = parseshort(0x78); dd->dd_montbl = parseword(0x80) & ~3; dd->dd_udaddr = parseword(0x90) & ~3; dd->dd_stimemreq = parseword(0xa0); dd->dd_udsize = parseword(0xb0); dd->dd_pwruse = parseshort(0xc0); dd->dd_bussup = bus_space_read_1(memt, romh, 0xcb); dd->dd_ebussup = bus_space_read_1(memt, romh, 0xcf); dd->dd_altcodet = bus_space_read_1(memt, romh, 0xd3); dd->dd_eddst[0] = bus_space_read_1(memt, romh, 0xd7); dd->dd_eddst[1] = bus_space_read_1(memt, romh, 0xdb); dd->dd_eddst[2] = bus_space_read_1(memt, romh, 0xdf); dd->dd_cfbaddr = parseword(0xe0) & ~3; codebase <<= 2; dd->dd_pacode[0x0] = parseword(codebase + 0x000) & ~3; dd->dd_pacode[0x1] = parseword(codebase + 0x010) & ~3; dd->dd_pacode[0x2] = parseword(codebase + 0x020) & ~3; dd->dd_pacode[0x3] = parseword(codebase + 0x030) & ~3; dd->dd_pacode[0x4] = parseword(codebase + 0x040) & ~3; dd->dd_pacode[0x5] = parseword(codebase + 0x050) & ~3; dd->dd_pacode[0x6] = parseword(codebase + 0x060) & ~3; dd->dd_pacode[0x7] = parseword(codebase + 0x070) & ~3; dd->dd_pacode[0x8] = parseword(codebase + 0x080) & ~3; dd->dd_pacode[0x9] = parseword(codebase + 0x090) & ~3; dd->dd_pacode[0xa] = parseword(codebase + 0x0a0) & ~3; dd->dd_pacode[0xb] = parseword(codebase + 0x0b0) & ~3; dd->dd_pacode[0xc] = parseword(codebase + 0x0c0) & ~3; dd->dd_pacode[0xd] = parseword(codebase + 0x0d0) & ~3; dd->dd_pacode[0xe] = parseword(codebase + 0x0e0) & ~3; dd->dd_pacode[0xf] = parseword(codebase + 0x0f0) & ~3; } else { /* STI_DEVTYPE4 */ bus_space_read_region_stream_4(memt, romh, 0, (uint32_t *)dd, sizeof(*dd) / 4); /* fix pacode... */ bus_space_read_region_stream_4(memt, romh, codebase, (uint32_t *)dd->dd_pacode, sizeof(dd->dd_pacode) / 4); } STI_DISABLE_ROM(rom->rom_softc); DPRINTF(("dd:\n" "devtype=%x, rev=%x;%d, altt=%x, gid=%08x%08x, font=%x, mss=%x\n" "end=%x, regions=%x, msto=%x, timo=%d, mont=%x, user=%x[%x]\n" "memrq=%x, pwr=%d, bus=%x, ebus=%x, cfb=%x\n" "code=", dd->dd_type & 0xff, dd->dd_grrev, dd->dd_lrrev, dd->dd_altcodet, dd->dd_grid[0], dd->dd_grid[1], dd->dd_fntaddr, dd->dd_maxst, dd->dd_romend, dd->dd_reglst, dd->dd_maxreent, dd->dd_maxtimo, dd->dd_montbl, dd->dd_udaddr, dd->dd_udsize, dd->dd_stimemreq, dd->dd_pwruse, dd->dd_bussup, dd->dd_ebussup, dd->dd_cfbaddr)); DPRINTF(("%x,%x,%x,%x,%x,%x,%x,%x,%x,%x,%x,%x,%x,%x,%x,%x\n", dd->dd_pacode[0x0], dd->dd_pacode[0x1], dd->dd_pacode[0x2], dd->dd_pacode[0x3], dd->dd_pacode[0x4], dd->dd_pacode[0x5], dd->dd_pacode[0x6], dd->dd_pacode[0x7], dd->dd_pacode[0x8], dd->dd_pacode[0x9], dd->dd_pacode[0xa], dd->dd_pacode[0xb], dd->dd_pacode[0xc], dd->dd_pacode[0xd], dd->dd_pacode[0xe], dd->dd_pacode[0xf])); /* * Figure out how many bytes we need for the STI code. * Note there could be fewer than STI_END pointer entries * populated, especially on older devices. */ for (i = STI_END; dd->dd_pacode[i] == 0; i--) ; size = dd->dd_pacode[i] - dd->dd_pacode[STI_BEGIN]; if (rom->rom_devtype == STI_DEVTYPE1) size = (size + 3) / 4; if (size == 0) { aprint_error(": no code for the requested platform\n"); return EINVAL; } if (!(rom->rom_code = uvm_km_alloc(kernel_map, round_page(size), 0, UVM_KMF_WIRED))) { aprint_error(": cannot allocate %u bytes for code\n", size); return ENOMEM; } DPRINTF(("code=0x%lx[%x]\n", rom->rom_code, size)); /* * Copy code into memory and make it executable. */ STI_ENABLE_ROM(rom->rom_softc); if (rom->rom_devtype == STI_DEVTYPE1) { uint8_t *p; uint32_t addr, eaddr; p = (uint8_t *)rom->rom_code; for (addr = dd->dd_pacode[STI_BEGIN], eaddr = addr + size * 4; addr < eaddr; addr += 4 ) { *p++ = bus_space_read_4(memt, romh, addr) & 0xff; } } else { /* STI_DEVTYPE4 */ bus_space_read_region_stream_4(memt, romh, dd->dd_pacode[STI_BEGIN], (uint32_t *)rom->rom_code, size / 4); } STI_DISABLE_ROM(rom->rom_softc); if ((error = uvm_map_protect(kernel_map, rom->rom_code, rom->rom_code + round_page(size), UVM_PROT_RX, FALSE))) { aprint_error(": uvm_map_protect failed (%d)\n", error); uvm_km_free(kernel_map, rom->rom_code, round_page(size), UVM_KMF_WIRED); return error; } /* * Setup code function pointers. */ #define O(i) \ (dd->dd_pacode[(i)] == 0 ? 0 : \ (rom->rom_code + (dd->dd_pacode[(i)] - dd->dd_pacode[0]) / \ (rom->rom_devtype == STI_DEVTYPE1 ? 4 : 1))) rom->init = (sti_init_t)O(STI_INIT_GRAPH); rom->mgmt = (sti_mgmt_t)O(STI_STATE_MGMT); rom->unpmv = (sti_unpmv_t)O(STI_FONT_UNPMV); rom->blkmv = (sti_blkmv_t)O(STI_BLOCK_MOVE); rom->test = (sti_test_t)O(STI_SELF_TEST); rom->exhdl = (sti_exhdl_t)O(STI_EXCEP_HDLR); rom->inqconf = (sti_inqconf_t)O(STI_INQ_CONF); rom->scment = (sti_scment_t)O(STI_SCM_ENT); rom->dmac = (sti_dmac_t)O(STI_DMA_CTRL); rom->flowc = (sti_flowc_t)O(STI_FLOW_CTRL); rom->utiming = (sti_utiming_t)O(STI_UTIMING); rom->pmgr = (sti_pmgr_t)O(STI_PROC_MGR); rom->util = (sti_util_t)O(STI_UTIL); #undef O /* * Set colormap entry is not implemented until 8.04, so force * a NULL pointer here. */ if (dd->dd_grrev < STI_REVISION(8, 4)) { rom->scment = NULL; } return 0; } /* * Map all regions. */ void sti_region_setup(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t romh = rom->romh; bus_addr_t *bases = rom->bases; struct sti_dd *dd = &rom->rom_dd; struct sti_cfg *cc = &scr->scr_cfg; struct sti_region regions[STI_REGION_MAX], *r; u_int regno, regcnt; bus_addr_t addr; DPRINTF(("stiregions @ %x:\n", dd->dd_reglst)); /* * Read the region information. */ STI_ENABLE_ROM(rom->rom_softc); if (rom->rom_devtype == STI_DEVTYPE1) { for (regno = 0; regno < STI_REGION_MAX; regno++) *(u_int *)(regions + regno) = parseword(dd->dd_reglst + regno * 0x10); } else { bus_space_read_region_stream_4(memt, romh, dd->dd_reglst, (uint32_t *)regions, sizeof(regions) / 4); } STI_DISABLE_ROM(rom->rom_softc); /* * Count them. */ for (regcnt = 0, r = regions; regcnt < STI_REGION_MAX; regcnt++, r++) if (r->last) break; regcnt++; /* * Map them. */ for (regno = 0, r = regions; regno < regcnt; regno++, r++) { if (r->length == 0) continue; /* * Assume an existing mapping exists. */ addr = bases[regno] + (r->offset << PGSHIFT); DPRINTF(("%08x @ 0x%08x%s%s%s%s", r->length << PGSHIFT, (int)addr, r->sys_only ? " sys" : "", r->cache ? " cache" : "", r->btlb ? " btlb" : "", r->last ? " last" : "")); /* * Region #0 is always the rom, and it should have been * mapped already. * XXX This expects a 1:1 mapping... */ if (regno == 0 && romh == bases[0]) { cc->regions[0] = addr; DPRINTF(("\n")); continue; } if (bus_space_map(memt, addr, r->length << PGSHIFT, BUS_SPACE_MAP_LINEAR | (r->cache ? BUS_SPACE_MAP_CACHEABLE : 0), &rom->regh[regno]) != 0) { rom->regh[regno] = romh; /* XXX */ DPRINTF((" - already mapped region\n")); } else { addr = (bus_addr_t) bus_space_vaddr(memt, rom->regh[regno]); if (regno == 1) { DPRINTF((" - fb")); scr->fbaddr = addr; scr->fblen = r->length << PGSHIFT; } DPRINTF(("\n")); } cc->regions[regno] = addr; } #ifdef STIDEBUG /* * Make sure we'll trap accessing unmapped regions */ for (regno = 0; regno < STI_REGION_MAX; regno++) if (cc->regions[regno] == 0) cc->regions[regno] = 0x81234567; #endif } int sti_screen_setup(struct sti_screen *scr, int flags) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t romh = rom->romh; struct sti_dd *dd = &rom->rom_dd; struct sti_cfg *cc = &scr->scr_cfg; struct sti_inqconfout cfg; struct sti_einqconfout ecfg; #ifdef STIDEBUG char buf[256]; #endif int error, i; int geometry_kluge = 0; u_int fontindex = 0; KASSERT(scr != NULL); memset(cc, 0, sizeof(*cc)); cc->ext_cfg = &scr->scr_ecfg; memset(cc->ext_cfg, 0, sizeof(*cc->ext_cfg)); if (dd->dd_stimemreq) { scr->scr_ecfg.addr = malloc(dd->dd_stimemreq, M_DEVBUF, M_WAITOK); } sti_region_setup(scr); if ((error = sti_init(scr, 0))) { aprint_error(": cannot initialize (%d)\n", error); goto fail; } memset(&cfg, 0, sizeof(cfg)); memset(&ecfg, 0, sizeof(ecfg)); cfg.ext = &ecfg; if ((error = sti_inqcfg(scr, &cfg))) { aprint_error(": error %d inquiring config\n", error); goto fail; } /* * Older (rev 8.02) boards report wrong offset values, * similar to the displayable area size, at least in m68k mode. * Attempt to detect this and adjust here. */ if (cfg.owidth == cfg.width && cfg.oheight == cfg.height) geometry_kluge = 1; if (geometry_kluge) { scr->scr_cfg.oscr_width = cfg.owidth = cfg.fbwidth - cfg.width; scr->scr_cfg.oscr_height = cfg.oheight = cfg.fbheight - cfg.height; } /* * Save a few fields for sti_describe_screen() later */ scr->fbheight = cfg.fbheight; scr->fbwidth = cfg.fbwidth; scr->oheight = cfg.oheight; scr->owidth = cfg.owidth; memcpy(scr->name, cfg.name, sizeof(scr->name)); if (flags & STI_FBMODE) { /* we're done here */ sti_init(scr, STI_FBMODE); return 0; } if ((error = sti_init(scr, STI_TEXTMODE | flags))) { aprint_error(": cannot initialize (%d)\n", error); goto fail; } #ifdef STIDEBUG snprintb(buf, sizeof(buf), STI_INQCONF_BITS, cfg.attributes); DPRINTF(("conf: bpp=%d planes=%d attr=%s\n" "crt=0x%x:0x%x:0x%x hw=0x%x:0x%x:0x%x\n", cfg.bpp, cfg.planes, buf, ecfg.crt_config[0], ecfg.crt_config[1], ecfg.crt_config[2], ecfg.crt_hw[0], ecfg.crt_hw[1], ecfg.crt_hw[2])); #endif scr->scr_bpp = cfg.bppu; /* * Although scr->scr_ecfg.current_monitor is not filled by * sti_init() as expected, we can nevertheless walk the monitor * list, if there is any, and if we find a mode matching our * resolution, pick its font index. */ if (dd->dd_montbl != 0) { STI_ENABLE_ROM(rom->rom_softc); for (i = 0; i < dd->dd_nmon; i++) { u_int offs = dd->dd_montbl + 8 * i; uint32_t m[2]; sti_mon_t mon = (void *)m; if (rom->rom_devtype == STI_DEVTYPE1) { m[0] = parseword(4 * offs); m[1] = parseword(4 * (offs + 4)); } else { bus_space_read_region_stream_4(memt, romh, offs, (uint32_t *)mon, sizeof(*mon) / 4); } if (mon->width == scr->scr_cfg.scr_width && mon->height == scr->scr_cfg.scr_height) { fontindex = mon->font; break; } } STI_DISABLE_ROM(rom->rom_softc); DPRINTF(("font index: %d\n", fontindex)); } if ((error = sti_fetchfonts(scr, &cfg, dd->dd_fntaddr, fontindex))) { aprint_error(": cannot fetch fonts (%d)\n", error); goto fail; } /* * setup screen descriptions: * figure number of fonts supported; * allocate wscons structures; * calculate dimensions. */ scr->scr_wsd.name = "std"; scr->scr_wsd.ncols = cfg.width / scr->scr_curfont.width; scr->scr_wsd.nrows = cfg.height / scr->scr_curfont.height; scr->scr_wsd.textops = &sti_emulops; scr->scr_wsd.fontwidth = scr->scr_curfont.width; scr->scr_wsd.fontheight = scr->scr_curfont.height; scr->scr_wsd.capabilities = WSSCREEN_REVERSE; scr->scr_scrlist[0] = &scr->scr_wsd; scr->scr_screenlist.nscreens = 1; scr->scr_screenlist.screens = scr->scr_scrlist; #ifndef SMALL_KERNEL /* * Decide which board-specific routines to use. */ switch (dd->dd_grid[0]) { case STI_DD_CRX: scr->setupfb = ngle_elk_setupfb; scr->putcmap = ngle_putcmap; scr->reg10_value = 0x13601000; if (scr->scr_bpp > 8) scr->reg12_value = NGLE_BUFF1_CMAP3; else scr->reg12_value = NGLE_BUFF1_CMAP0; scr->cmap_finish_register = NGLE_REG_1; break; case STI_DD_TIMBER: scr->setupfb = ngle_timber_setupfb; scr->putcmap = ngle_putcmap; scr->reg10_value = 0x13602000; scr->reg12_value = NGLE_BUFF1_CMAP0; scr->cmap_finish_register = NGLE_REG_1; break; case STI_DD_ARTIST: scr->setupfb = ngle_artist_setupfb; scr->putcmap = ngle_putcmap; scr->reg10_value = 0x13601000; scr->reg12_value = NGLE_ARTIST_CMAP0; scr->cmap_finish_register = NGLE_REG_26; break; case STI_DD_EG: scr->setupfb = ngle_artist_setupfb; scr->putcmap = ngle_putcmap; scr->reg10_value = 0x13601000; if (scr->scr_bpp > 8) { scr->reg12_value = NGLE_BUFF1_CMAP3; scr->cmap_finish_register = NGLE_REG_1; } else { scr->reg12_value = NGLE_ARTIST_CMAP0; scr->cmap_finish_register = NGLE_REG_26; } break; case STI_DD_HCRX: scr->setupfb = ngle_elk_setupfb; scr->putcmap = ngle_hcrx_putcmap; if (scr->scr_bpp > 8) { scr->reg12_value = NGLE_BUFF1_CMAP3; scr->reg10_value = 0xBBA0A000; } else { scr->reg12_value = NGLE_BUFF1_CMAP0; scr->reg10_value = 0x13602000; } scr->cmap_finish_register = NGLE_REG_38; break; case STI_DD_SUMMIT: case STI_DD_LEGO: scr->setupfb = summit_setupfb; scr->putcmap = summit_putcmap; scr->scr_bpp = 8; /* for now */ break; case STI_DD_GRX: case STI_DD_CRX24: case STI_DD_EVRX: case STI_DD_3X2V: case STI_DD_DUAL_CRX: case STI_DD_PINNACLE: default: scr->setupfb = NULL; scr->putcmap = rom->scment == NULL ? NULL : ngle_default_putcmap; break; } #endif return 0; fail: /* XXX free resources */ if (scr->scr_ecfg.addr != NULL) { free(scr->scr_ecfg.addr, M_DEVBUF); scr->scr_ecfg.addr = NULL; } return ENXIO; } void sti_describe_screen(struct sti_softc *sc, struct sti_screen *scr) { struct sti_font *fp = &scr->scr_curfont; aprint_normal("%s: %s, %dx%d frame buffer, %dx%dx%d display\n", device_xname(sc->sc_dev), scr->name, scr->fbwidth, scr->fbheight, scr->scr_cfg.scr_width, scr->scr_cfg.scr_height, scr->scr_bpp); aprint_normal("%s: %dx%d font type %d, %d bpc, charset %d-%d\n", device_xname(sc->sc_dev), fp->width, fp->height, fp->type, fp->bpc, fp->first, fp->last); } void sti_describe(struct sti_softc *sc) { struct sti_rom *rom = sc->sc_rom; struct sti_dd *dd = &rom->rom_dd; aprint_normal(": rev %d.%02d;%d, ID 0x%08X%08X\n", dd->dd_grrev >> 4, dd->dd_grrev & 0xf, dd->dd_lrrev, dd->dd_grid[0], dd->dd_grid[1]); if (sc->sc_scr != NULL) sti_describe_screen(sc, sc->sc_scr); } /* * Final part of attachment. On hppa where we use the PDC console * during autoconf, this has to be postponed until autoconf has * completed. */ void sti_end_attach(struct sti_softc *sc) { struct sti_screen *scr = sc->sc_scr; if (scr == NULL) return; #if NWSDISPLAY > 0 else { struct wsemuldisplaydev_attach_args waa; scr->scr_wsmode = WSDISPLAYIO_MODE_EMUL; waa.console = sc->sc_flags & STI_CONSOLE ? 1 : 0; waa.scrdata = &scr->scr_screenlist; waa.accessops = &sti_accessops; waa.accesscookie = scr; /* attach as console if required */ if (waa.console && !ISSET(sc->sc_flags, STI_ATTACHED)) { long defattr; sti_alloc_attr(scr, 0, 0, 0, &defattr); wsdisplay_cnattach(&scr->scr_wsd, scr, 0, scr->scr_wsd.nrows - 1, defattr); sc->sc_flags |= STI_ATTACHED; } config_found(sc->sc_dev, &waa, wsemuldisplaydevprint, CFARGS_NONE); } #endif } u_int sti_rom_size(bus_space_tag_t memt, bus_space_handle_t romh) { int devtype; u_int romend; devtype = bus_space_read_1(memt, romh, 3); if (devtype == STI_DEVTYPE4) { bus_space_read_region_stream_4(memt, romh, STI_DEV4_DD_ROMEND, (uint32_t *)&romend, 1); } else { romend = parseword(STI_DEV1_DD_ROMEND); } DPRINTF(("%s: %08x (%08x)\n", __func__, romend, round_page(romend))); return round_page(romend); } int sti_fetchfonts(struct sti_screen *scr, struct sti_inqconfout *cfg, uint32_t baseaddr, u_int fontindex) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t romh = rom->romh; struct sti_font *fp = &scr->scr_curfont; uint32_t addr; int size; #ifdef notyet int uc; struct { struct sti_unpmvflags flags; struct sti_unpmvin in; struct sti_unpmvout out; } a; #endif /* * Get the first PROM font in memory */ STI_ENABLE_ROM(rom->rom_softc); rescan: addr = baseaddr; do { if (rom->rom_devtype == STI_DEVTYPE1) { fp->first = parseshort(addr + 0x00); fp->last = parseshort(addr + 0x08); fp->width = bus_space_read_1(memt, romh, addr + 0x13); fp->height = bus_space_read_1(memt, romh, addr + 0x17); fp->type = bus_space_read_1(memt, romh, addr + 0x1b); fp->bpc = bus_space_read_1(memt, romh, addr + 0x1f); fp->next = parseword(addr + 0x20); fp->uheight= bus_space_read_1(memt, romh, addr + 0x33); fp->uoffset= bus_space_read_1(memt, romh, addr + 0x37); } else { /* STI_DEVTYPE4 */ bus_space_read_region_stream_4(memt, romh, addr, (uint32_t *)fp, sizeof(struct sti_font) / 4); } #ifdef STIDEBUG STI_DISABLE_ROM(rom->rom_softc); DPRINTF(("%s: %dx%d font type %d, %d bpc, charset %d-%d\n", device_xname(scr->scr_rom->rom_softc->sc_dev), fp->width, fp->height, fp->type, fp->bpc, fp->first, fp->last)); STI_ENABLE_ROM(rom->rom_softc); #endif if (fontindex == 0) { size = sizeof(struct sti_font) + (fp->last - fp->first + 1) * fp->bpc; if (rom->rom_devtype == STI_DEVTYPE1) size *= 4; scr->scr_romfont = malloc(size, M_DEVBUF, M_WAITOK); bus_space_read_region_stream_4(memt, romh, addr, (uint32_t *)scr->scr_romfont, size / 4); break; } addr = baseaddr + fp->next; fontindex--; } while (fp->next != 0); /* * If our font index was bogus, we did not find the expected font. * In this case, pick the first one and be done with it. */ if (fp->next == 0 && scr->scr_romfont == NULL) { fontindex = 0; goto rescan; } STI_DISABLE_ROM(rom->rom_softc); #ifdef notyet /* * If there is enough room in the off-screen framebuffer memory, * display all the characters there in order to display them * faster with blkmv operations rather than unpmv later on. */ if (size <= cfg->fbheight * (cfg->fbwidth - cfg->width - cfg->owidth)) { memset(&a, 0, sizeof(a)); a.flags.flags = STI_UNPMVF_WAIT; a.in.fg_colour = STI_COLOUR_WHITE; a.in.bg_colour = STI_COLOUR_BLACK; a.in.font_addr = scr->scr_romfont; scr->scr_fontmaxcol = cfg->fbheight / fp->height; scr->scr_fontbase = cfg->width + cfg->owidth; for (uc = fp->first; uc <= fp->last; uc++) { a.in.x = ((uc - fp->first) / scr->scr_fontmaxcol) * fp->width + scr->scr_fontbase; a.in.y = ((uc - fp->first) % scr->scr_fontmaxcol) * fp->height; a.in.index = uc; (*scr->unpmv)(&a.flags, &a.in, &a.out, &scr->scr_cfg); if (a.out.errno) { aprint_error_dev(sc->sc_dev, "unpmv %d " "returned %d\n", uc, a.out.errno); return 0; } } free(scr->scr_romfont, M_DEVBUF); scr->scr_romfont = NULL; } #endif return 0; } /* * Wrappers around STI code pointers */ int sti_init(struct sti_screen *scr, int mode) { struct sti_rom *rom = scr->scr_rom; struct { struct sti_initflags flags; struct sti_initin in; struct sti_einitin ein; struct sti_initout out; } a; KASSERT(rom != NULL); memset(&a, 0, sizeof(a)); a.flags.flags = STI_INITF_WAIT | STI_INITF_PBET | STI_INITF_PBETI; if ((mode & STI_TEXTMODE) != 0) { a.flags.flags |= STI_INITF_TEXT | STI_INITF_CMB | STI_INITF_PBET | STI_INITF_PBETI | STI_INITF_ICMT; a.in.text_planes = 1; } else { a.flags.flags |= STI_INITF_TEXT | STI_INITF_NTEXT; /* * Request as many text planes as STI will allow. * The reason to do this - when switching to framebuffer mode * for X we need access to all planes. In theory STI should do * just that when we request access to both text and non-text * planes as above. * In reality though, at least on my PCI Visualize EG, some * planes and/or colour registers remain inaccessible if we * request only one text plane. * Clearly we're missing a register write or two here, but so * far I haven't found it. */ a.in.text_planes = 3; } if ((mode & STI_CLEARSCR) != 0) a.flags.flags |= STI_INITF_CLEAR; a.in.ext_in = &a.ein; DPRINTF(("%s: init,%p(%x, %p, %p, %p)\n", device_xname(rom->rom_softc->sc_dev), rom->init, a.flags.flags, &a.in, &a.out, &scr->scr_cfg)); (*rom->init)(&a.flags, &a.in, &a.out, &scr->scr_cfg); if (a.out.text_planes != a.in.text_planes) return -1; /* not colliding with sti errno values */ return a.out.errno; } int sti_inqcfg(struct sti_screen *scr, struct sti_inqconfout *out) { struct sti_rom *rom = scr->scr_rom; struct { struct sti_inqconfflags flags; struct sti_inqconfin in; } a; memset(&a, 0, sizeof(a)); a.flags.flags = STI_INQCONFF_WAIT; (*rom->inqconf)(&a.flags, &a.in, out, &scr->scr_cfg); return out->errno; } void sti_bmove(struct sti_screen *scr, int x1, int y1, int x2, int y2, int h, int w, enum sti_bmove_funcs f) { struct sti_rom *rom = scr->scr_rom; struct { struct sti_blkmvflags flags; struct sti_blkmvin in; struct sti_blkmvout out; } a; memset(&a, 0, sizeof(a)); a.flags.flags = STI_BLKMVF_WAIT; switch (f) { case bmf_clear: a.flags.flags |= STI_BLKMVF_CLR; a.in.bg_colour = STI_COLOUR_BLACK; break; case bmf_underline: case bmf_copy: a.in.fg_colour = STI_COLOUR_WHITE; a.in.bg_colour = STI_COLOUR_BLACK; break; case bmf_invert: a.flags.flags |= STI_BLKMVF_COLR; a.in.fg_colour = STI_COLOUR_BLACK; a.in.bg_colour = STI_COLOUR_WHITE; break; } a.in.srcx = x1; a.in.srcy = y1; a.in.dstx = x2; a.in.dsty = y2; a.in.height = h; a.in.width = w; (*rom->blkmv)(&a.flags, &a.in, &a.out, &scr->scr_cfg); #ifdef STIDEBUG if (a.out.errno) printf("%s: blkmv returned %d\n", device_xname(rom->rom_softc->sc_dev), a.out.errno); #endif } int sti_setcment(struct sti_screen *scr, u_int i, u_char r, u_char g, u_char b) { struct sti_rom *rom = scr->scr_rom; struct { struct sti_scmentflags flags; struct sti_scmentin in; struct sti_scmentout out; } a; memset(&a, 0, sizeof(a)); a.flags.flags = STI_SCMENTF_WAIT; a.in.entry = i; a.in.value = (r << 16) | (g << 8) | b; (*rom->scment)(&a.flags, &a.in, &a.out, &scr->scr_cfg); return a.out.errno; } /* * wsdisplay accessops */ int sti_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, struct lwp *l) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_rom *rom = scr->scr_rom; struct wsdisplay_fbinfo *wdf; struct wsdisplay_cmap *cmapp; u_int mode, idx, count; int ret; ret = 0; switch (cmd) { case GCID: *(u_int *)data = rom->rom_dd.dd_grid[0]; break; case WSDISPLAYIO_GMODE: *(u_int *)data = scr->scr_wsmode; break; case WSDISPLAYIO_SMODE: mode = *(u_int *)data; switch (mode) { case WSDISPLAYIO_MODE_EMUL: if (scr->scr_wsmode != WSDISPLAYIO_MODE_EMUL) ret = sti_init(scr, STI_TEXTMODE); break; case WSDISPLAYIO_MODE_DUMBFB: if (scr->scr_wsmode != WSDISPLAYIO_MODE_DUMBFB) { ret = sti_init(scr, 0); if (scr->setupfb != NULL) scr->setupfb(scr); else #if 0 ret = sti_init(scr, STI_FBMODE); #else ret = EINVAL; #endif } break; case WSDISPLAYIO_MODE_MAPPED: default: ret = EINVAL; break; } if (ret == 0) scr->scr_wsmode = mode; break; case WSDISPLAYIO_GTYPE: *(u_int *)data = WSDISPLAY_TYPE_STI; break; case WSDISPLAYIO_GINFO: wdf = (struct wsdisplay_fbinfo *)data; wdf->height = scr->scr_cfg.scr_height; wdf->width = scr->scr_cfg.scr_width; wdf->depth = scr->scr_bpp; if (scr->putcmap == NULL || scr->scr_bpp > 8) wdf->cmsize = 0; else wdf->cmsize = STI_NCMAP; break; case WSDISPLAYIO_LINEBYTES: if (scr->scr_bpp > 8) *(u_int *)data = scr->scr_cfg.fb_width * 4; else *(u_int *)data = scr->scr_cfg.fb_width; break; case WSDISPLAYIO_GETCMAP: if (scr->putcmap == NULL || scr->scr_bpp > 8) return ENODEV; cmapp = (struct wsdisplay_cmap *)data; idx = cmapp->index; count = cmapp->count; if (idx >= STI_NCMAP || count > STI_NCMAP - idx) return EINVAL; if ((ret = copyout(&scr->scr_rcmap[idx], cmapp->red, count))) break; if ((ret = copyout(&scr->scr_gcmap[idx], cmapp->green, count))) break; if ((ret = copyout(&scr->scr_bcmap[idx], cmapp->blue, count))) break; break; case WSDISPLAYIO_PUTCMAP: if (scr->putcmap == NULL || scr->scr_bpp > 8) return ENODEV; if (scr->scr_wsmode == WSDISPLAYIO_MODE_EMUL) { /* * The hardware palette settings are handled by * the STI ROM in STI_TEXTMODE and changing cmap * could cause mangled text colors at least on CRX. * Updating CMAP in EMUL mode isn't expected anyway * so just ignore it. */ return 0; } cmapp = (struct wsdisplay_cmap *)data; idx = cmapp->index; count = cmapp->count; if (idx >= STI_NCMAP || count > STI_NCMAP - idx) return EINVAL; if ((ret = copyin(cmapp->red, &scr->scr_rcmap[idx], count))) break; if ((ret = copyin(cmapp->green, &scr->scr_gcmap[idx], count))) break; if ((ret = copyin(cmapp->blue, &scr->scr_bcmap[idx], count))) break; ret = scr->putcmap(scr, idx, count); break; case WSDISPLAYIO_SVIDEO: case WSDISPLAYIO_GVIDEO: case WSDISPLAYIO_GCURPOS: case WSDISPLAYIO_SCURPOS: case WSDISPLAYIO_GCURMAX: case WSDISPLAYIO_GCURSOR: case WSDISPLAYIO_SCURSOR: default: return ENOTTY; /* not supported yet */ } return ret; } paddr_t sti_mmap(void *v, void *vs, off_t offset, int prot) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_rom *rom = scr->scr_rom; paddr_t pa; if ((offset & PAGE_MASK) != 0) return -1; if (offset < 0 || offset >= scr->fblen) return -1; if (scr->scr_wsmode != WSDISPLAYIO_MODE_DUMBFB) return -1; pa = bus_space_mmap(rom->memt, scr->fbaddr, offset, prot, BUS_SPACE_MAP_LINEAR); if (pa == -1) pa = scr->fbaddr + offset; return pa; } int sti_alloc_screen(void *v, const struct wsscreen_descr *type, void **cookiep, int *cxp, int *cyp, long *defattr) { struct sti_screen *scr = (struct sti_screen *)v; if (scr->scr_nscreens > 0) return ENOMEM; *cookiep = scr; *cxp = 0; *cyp = 0; sti_alloc_attr(scr, 0, 0, 0, defattr); scr->scr_nscreens++; return 0; } void sti_free_screen(void *v, void *cookie) { struct sti_screen *scr = (struct sti_screen *)v; scr->scr_nscreens--; } int sti_show_screen(void *v, void *cookie, int waitok, void (*cb)(void *, int, int), void *cbarg) { #if 0 struct sti_screen *scr = (struct sti_screen *)v; #endif return 0; } int sti_load_font(void *v, void *cookie, struct wsdisplay_font *font) { #if 0 struct sti_screen *scr = (struct sti_screen *)v; #endif return -1; } /* * wsdisplay emulops */ void sti_cursor(void *v, int on, int row, int col) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_font *fp = &scr->scr_curfont; sti_bmove(scr, col * fp->width, row * fp->height, col * fp->width, row * fp->height, fp->height, fp->width, bmf_invert); } /* * ISO 8859-1 part of Unicode to HP Roman font index conversion array. */ const uint8_t sti_unitoroman[0x100 - 0xa0] = { 0xa0, 0xb8, 0xbf, 0xbb, 0xba, 0xbc, 0, 0xbd, 0xab, 0, 0xf9, 0xfb, 0, 0xf6, 0, 0xb0, 0xb3, 0xfe, 0, 0, 0xa8, 0xf3, 0xf4, 0xf2, 0, 0, 0xfa, 0xfd, 0xf7, 0xf8, 0, 0xb9, 0xa1, 0xe0, 0xa2, 0xe1, 0xd8, 0xd0, 0xd3, 0xb4, 0xa3, 0xdc, 0xa4, 0xa5, 0xe6, 0xe5, 0xa6, 0xa7, 0xe3, 0xb6, 0xe8, 0xe7, 0xdf, 0xe9, 0xda, 0, 0xd2, 0xad, 0xed, 0xae, 0xdb, 0xb1, 0xf0, 0xde, 0xc8, 0xc4, 0xc0, 0xe2, 0xcc, 0xd4, 0xd7, 0xb5, 0xc9, 0xc5, 0xc1, 0xcd, 0xd9, 0xd5, 0xd1, 0xdd, 0xe4, 0xb7, 0xca, 0xc6, 0xc2, 0xea, 0xce, 0, 0xd6, 0xcb, 0xc7, 0xc3, 0xcf, 0xb2, 0xf1, 0xef }; int sti_mapchar(void *v, int uni, u_int *index) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_font *fp = &scr->scr_curfont; int c; switch (fp->type) { case STI_FONT_HPROMAN8: if (uni >= 0x80 && uni < 0xa0) c = -1; else if (uni >= 0xa0 && uni < 0x100) { c = (int)sti_unitoroman[uni - 0xa0]; if (c == 0) c = -1; } else c = uni; break; default: c = uni; break; } if (c == -1 || c < fp->first || c > fp->last) { *index = ' '; return 0; } *index = c; return 5; } void sti_putchar(void *v, int row, int col, u_int uc, long attr) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_rom *rom = scr->scr_rom; struct sti_font *fp = &scr->scr_curfont; int bg, fg; fg = WSATTR_UNPACK_FG(attr); bg = WSATTR_UNPACK_BG(attr); if (scr->scr_romfont != NULL) { /* * Font is in memory, use unpmv */ struct { struct sti_unpmvflags flags; struct sti_unpmvin in; struct sti_unpmvout out; } a; memset(&a, 0, sizeof(a)); a.flags.flags = STI_UNPMVF_WAIT; a.in.fg_colour = fg; a.in.bg_colour = bg; a.in.x = col * fp->width; a.in.y = row * fp->height; a.in.font_addr = scr->scr_romfont; a.in.index = uc; (*rom->unpmv)(&a.flags, &a.in, &a.out, &scr->scr_cfg); } else { /* * Font is in frame buffer, use blkmv */ struct { struct sti_blkmvflags flags; struct sti_blkmvin in; struct sti_blkmvout out; } a; memset(&a, 0, sizeof(a)); a.flags.flags = STI_BLKMVF_WAIT; a.in.fg_colour = fg; a.in.bg_colour = bg; a.in.srcx = ((uc - fp->first) / scr->scr_fontmaxcol) * fp->width + scr->scr_fontbase; a.in.srcy = ((uc - fp->first) % scr->scr_fontmaxcol) * fp->height; a.in.dstx = col * fp->width; a.in.dsty = row * fp->height; a.in.height = fp->height; a.in.width = fp->width; (*rom->blkmv)(&a.flags, &a.in, &a.out, &scr->scr_cfg); } } void sti_copycols(void *v, int row, int srccol, int dstcol, int ncols) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_font *fp = &scr->scr_curfont; sti_bmove(scr, srccol * fp->width, row * fp->height, dstcol * fp->width, row * fp->height, fp->height, ncols * fp->width, bmf_copy); } void sti_erasecols(void *v, int row, int startcol, int ncols, long attr) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_font *fp = &scr->scr_curfont; sti_bmove(scr, startcol * fp->width, row * fp->height, startcol * fp->width, row * fp->height, fp->height, ncols * fp->width, bmf_clear); } void sti_copyrows(void *v, int srcrow, int dstrow, int nrows) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_font *fp = &scr->scr_curfont; sti_bmove(scr, 0, srcrow * fp->height, 0, dstrow * fp->height, nrows * fp->height, scr->scr_cfg.scr_width, bmf_copy); } void sti_eraserows(void *v, int srcrow, int nrows, long attr) { struct sti_screen *scr = (struct sti_screen *)v; struct sti_font *fp = &scr->scr_curfont; sti_bmove(scr, 0, srcrow * fp->height, 0, srcrow * fp->height, nrows * fp->height, scr->scr_cfg.scr_width, bmf_clear); } int sti_alloc_attr(void *v, int fg, int bg, int flags, long *pattr) { #if 0 struct sti_screen *scr = (struct sti_screen *)v; #endif if ((flags & (WSATTR_HILIT | WSATTR_BLINK | WSATTR_UNDERLINE | WSATTR_WSCOLORS)) != 0) return EINVAL; if ((flags & WSATTR_REVERSE) != 0) { fg = STI_COLOUR_BLACK; bg = STI_COLOUR_WHITE; } else { fg = STI_COLOUR_WHITE; bg = STI_COLOUR_BLACK; } *pattr = WSATTR_PACK(fg, bg, flags); return 0; } /* * Early console support. Only used on hp300, currently */ int sti_cnattach(struct sti_rom *rom, struct sti_screen *scr, bus_space_tag_t memt, bus_addr_t *bases, u_int codebase) { bus_space_handle_t romh; u_int romend; int error; long defattr; if ((error = bus_space_map(memt, bases[0], PAGE_SIZE, 0, &romh)) != 0) return error; /* * Compute real PROM size */ romend = sti_rom_size(memt, romh); bus_space_unmap(memt, romh, PAGE_SIZE); if ((error = bus_space_map(memt, bases[0], romend, 0, &romh)) != 0) return error; bases[0] = romh; if (sti_rom_setup(rom, memt, memt, romh, bases, codebase) != 0) return -1; scr->scr_rom = rom; if (sti_screen_setup(scr, STI_CLEARSCR) != 0) return -1; sti_alloc_attr(scr, 0, 0, 0, &defattr); wsdisplay_cnattach(&scr->scr_wsd, scr, 0, 0, defattr); return 0; } int ngle_default_putcmap(struct sti_screen *scr, u_int idx, u_int count) { int i, ret; for (i = idx + count - 1; i >= (int)idx; i--) if ((ret = sti_setcment(scr, i, scr->scr_rcmap[i], scr->scr_gcmap[i], scr->scr_bcmap[i]))) return EINVAL; return 0; } #ifndef SMALL_KERNEL void ngle_setup_hw(bus_space_tag_t, bus_space_handle_t); void ngle_setup_fb(bus_space_tag_t, bus_space_handle_t, uint32_t); void ngle_setup_attr_planes(struct sti_screen *scr); void ngle_setup_bt458(struct sti_screen *scr); #define ngle_bt458_write(memt, memh, r, v) \ bus_space_write_stream_4(memt, memh, NGLE_REG_RAMDAC + ((r) << 2), (v) << 24) void ngle_artist_setupfb(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; ngle_setup_bt458(scr); ngle_setup_hw(memt, memh); ngle_setup_fb(memt, memh, scr->reg10_value); ngle_setup_attr_planes(scr); ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_21, bus_space_read_stream_4(memt, memh, NGLE_REG_21) | 0x0a000000); bus_space_write_stream_4(memt, memh, NGLE_REG_27, bus_space_read_stream_4(memt, memh, NGLE_REG_27) | 0x00800000); } void ngle_elk_setupfb(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; ngle_setup_bt458(scr); ngle_setup_hw(memt, memh); ngle_setup_fb(memt, memh, scr->reg10_value); ngle_setup_attr_planes(scr); ngle_setup_hw(memt, memh); /* enable overlay planes in Bt458 command register */ ngle_bt458_write(memt, memh, 0x0c, 0x06); ngle_bt458_write(memt, memh, 0x0e, 0x43); } void ngle_timber_setupfb(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; ngle_setup_bt458(scr); ngle_setup_hw(memt, memh); /* enable overlay planes in Bt458 command register */ ngle_bt458_write(memt, memh, 0x0c, 0x06); ngle_bt458_write(memt, memh, 0x0e, 0x43); } static void summit_wait(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[0]; while (bus_space_read_stream_4(memt, memh, VISFX_STATUS) != 0) continue; } void summit_setupfb(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[0]; summit_wait(scr); bus_space_write_stream_4(memt, memh, 0xb08044, 0x1b); bus_space_write_stream_4(memt, memh, 0xb08048, 0x1b); bus_space_write_stream_4(memt, memh, 0x920860, 0xe4); bus_space_write_stream_4(memt, memh, 0xa00818, 0); bus_space_write_stream_4(memt, memh, 0xa00404, 0); bus_space_write_stream_4(memt, memh, 0x921110, 0); bus_space_write_stream_4(memt, memh, 0x9211d8, 0); bus_space_write_stream_4(memt, memh, 0xa0086c, 0); bus_space_write_stream_4(memt, memh, 0x921114, 0); bus_space_write_stream_4(memt, memh, 0xac1050, 0); bus_space_write_stream_4(memt, memh, VISFX_APERTURE_ACCESS, VISFX_DEPTH_8); bus_space_write_stream_4(memt, memh, VISFX_PIXEL_MASK, 0xffffffff); bus_space_write_stream_4(memt, memh, VISFX_PLANE_MASK, 0xffffffff); bus_space_write_stream_4(memt, memh, VISFX_VRAM_WRITE_MODE, VISFX_WRITE_MODE_PLAIN); bus_space_write_stream_4(memt, memh, VISFX_VRAM_READ_MODE, VISFX_READ_MODE_COPY); } void ngle_setup_bt458(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; ngle_setup_hw(memt, memh); /* set Bt458 read mask register to all planes */ ngle_bt458_write(memt, memh, 0x08, 0x04); ngle_bt458_write(memt, memh, 0x0a, 0xff); } void ngle_setup_attr_planes(struct sti_screen *scr) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_11, 0x2ea0d000); bus_space_write_stream_4(memt, memh, NGLE_REG_14, 0x23000302); bus_space_write_stream_4(memt, memh, NGLE_REG_12, scr->reg12_value); bus_space_write_stream_4(memt, memh, NGLE_REG_8, 0xffffffff); bus_space_write_stream_4(memt, memh, NGLE_REG_6, 0x00000000); bus_space_write_stream_4(memt, memh, NGLE_REG_9, (scr->scr_cfg.scr_width << 16) | scr->scr_cfg.scr_height); bus_space_write_stream_4(memt, memh, NGLE_REG_6, 0x05000000); bus_space_write_stream_4(memt, memh, NGLE_REG_9, 0x00040001); ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_12, 0x00000000); ngle_setup_fb(memt, memh, scr->reg10_value); } int ngle_putcmap(struct sti_screen *scr, u_int idx, u_int count) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; uint8_t *r, *g, *b; uint32_t cmap_finish; if (scr->scr_bpp > 8) cmap_finish = 0x83000100; else cmap_finish = 0x80000100; r = scr->scr_rcmap + idx; g = scr->scr_gcmap + idx; b = scr->scr_bcmap + idx; ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_10, 0xbbe0f000); bus_space_write_stream_4(memt, memh, NGLE_REG_14, 0x03000300); bus_space_write_stream_4(memt, memh, NGLE_REG_13, 0xffffffff); while (count-- != 0) { ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_3, 0x400 | (idx << 2)); bus_space_write_stream_4(memt, memh, NGLE_REG_4, (*r << 16) | (*g << 8) | *b); idx++; r++, g++, b++; } bus_space_write_stream_4(memt, memh, NGLE_REG_2, 0x400); bus_space_write_stream_4(memt, memh, scr->cmap_finish_register, cmap_finish); ngle_setup_fb(memt, memh, scr->reg10_value); return 0; } int ngle_hcrx_putcmap(struct sti_screen *scr, u_int idx, u_int count) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[2]; uint8_t *r, *g, *b; uint32_t cmap_finish; if (scr->scr_bpp > 8) cmap_finish = 0x80000100; else cmap_finish = 0x82000100; r = scr->scr_rcmap + idx; g = scr->scr_gcmap + idx; b = scr->scr_bcmap + idx; ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_10, 0xbbe0f000); bus_space_write_stream_4(memt, memh, NGLE_REG_14, 0x03000300); bus_space_write_stream_4(memt, memh, NGLE_REG_13, 0xffffffff); while (count-- != 0) { ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_3, 0x400 | (idx << 2)); bus_space_write_stream_4(memt, memh, NGLE_REG_4, (*r << 16) | (*g << 8) | *b); idx++; r++, g++, b++; } bus_space_write_stream_4(memt, memh, NGLE_REG_2, 0x400); bus_space_write_stream_4(memt, memh, NGLE_REG_38, cmap_finish); ngle_setup_fb(memt, memh, scr->reg10_value); return 0; } int summit_putcmap(struct sti_screen *scr, u_int idx, u_int count) { struct sti_rom *rom = scr->scr_rom; bus_space_tag_t memt = rom->memt; bus_space_handle_t memh = rom->regh[0]; uint8_t *r, *g, *b; r = scr->scr_rcmap + idx; g = scr->scr_gcmap + idx; b = scr->scr_bcmap + idx; if (rom->rom_dd.dd_grid[0] == STI_DD_LEGO) { bus_space_write_stream_4(memt, memh, VISFX_COLOR_INDEX, idx); } else bus_space_write_stream_4(memt, memh, VISFX_COLOR_INDEX, 0xc0005100 + idx); while (count-- != 0) { bus_space_write_stream_4(memt, memh, VISFX_COLOR_VALUE, (*r << 16) | (*g << 8) | *b); r++, g++, b++; } bus_space_write_stream_4(memt, memh, VISFX_COLOR_MASK, 0xff); bus_space_write_stream_4(memt, memh, 0x80004c, 0xc); bus_space_write_stream_4(memt, memh, 0x800000, 0); return 0; } void ngle_setup_hw(bus_space_tag_t memt, bus_space_handle_t memh) { uint8_t stat; do { stat = bus_space_read_1(memt, memh, NGLE_REG_15b0); if (stat == 0) stat = bus_space_read_1(memt, memh, NGLE_REG_15b0); } while (stat != 0); } void ngle_setup_fb(bus_space_tag_t memt, bus_space_handle_t memh, uint32_t reg10) { ngle_setup_hw(memt, memh); bus_space_write_stream_4(memt, memh, NGLE_REG_10, reg10); bus_space_write_stream_4(memt, memh, NGLE_REG_14, 0x83000300); ngle_setup_hw(memt, memh); bus_space_write_1(memt, memh, NGLE_REG_16b1, 1); } #endif /* SMALL_KERNEL */