lcg.c revision 1.2.18.2
1 1.2.18.2 jdolecek /* $NetBSD: lcg.c,v 1.2.18.2 2017/12/03 11:36:48 jdolecek Exp $ */ 2 1.2.18.2 jdolecek /* 3 1.2.18.2 jdolecek * LCG accelerated framebuffer driver 4 1.2.18.2 jdolecek * Copyright (c) 2003, 2004 Blaz Antonic 5 1.2.18.2 jdolecek * All rights reserved. 6 1.2.18.2 jdolecek * 7 1.2.18.2 jdolecek * Redistribution and use in source and binary forms, with or without 8 1.2.18.2 jdolecek * modification, are permitted provided that the following conditions 9 1.2.18.2 jdolecek * are met: 10 1.2.18.2 jdolecek * 1. Redistributions of source code must retain the above copyright 11 1.2.18.2 jdolecek * notice, this list of conditions and the following disclaimer. 12 1.2.18.2 jdolecek * 2. Redistributions in binary form must reproduce the above copyright 13 1.2.18.2 jdolecek * notice, this list of conditions and the following disclaimer in the 14 1.2.18.2 jdolecek * documentation and/or other materials provided with the distribution. 15 1.2.18.2 jdolecek * 3. All advertising materials mentioning features or use of this software 16 1.2.18.2 jdolecek * must display the abovementioned copyrights 17 1.2.18.2 jdolecek * 4. The name of the author may not be used to endorse or promote products 18 1.2.18.2 jdolecek * derived from this software without specific prior written permission 19 1.2.18.2 jdolecek * 20 1.2.18.2 jdolecek * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 21 1.2.18.2 jdolecek * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 22 1.2.18.2 jdolecek * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 23 1.2.18.2 jdolecek * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 24 1.2.18.2 jdolecek * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 25 1.2.18.2 jdolecek * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 26 1.2.18.2 jdolecek * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 27 1.2.18.2 jdolecek * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 28 1.2.18.2 jdolecek * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 29 1.2.18.2 jdolecek * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 30 1.2.18.2 jdolecek */ 31 1.2.18.2 jdolecek /* 32 1.2.18.2 jdolecek * Resurrection and dumb framebuffer mode by Bjrn Johannesson 33 1.2.18.2 jdolecek * rherdware (at) yahoo.com in December 2014 34 1.2.18.2 jdolecek */ 35 1.2.18.2 jdolecek 36 1.2.18.2 jdolecek #include <sys/cdefs.h> 37 1.2.18.2 jdolecek __KERNEL_RCSID(0, "$NetBSD: lcg.c,v 1.2.18.2 2017/12/03 11:36:48 jdolecek Exp $"); 38 1.2.18.2 jdolecek 39 1.2.18.2 jdolecek #define LCG_NO_ACCEL 40 1.2.18.2 jdolecek 41 1.2.18.2 jdolecek #include <sys/param.h> 42 1.2.18.2 jdolecek #include <sys/device.h> 43 1.2.18.2 jdolecek #include <sys/systm.h> 44 1.2.18.2 jdolecek #include <sys/callout.h> 45 1.2.18.2 jdolecek #include <sys/time.h> 46 1.2.18.2 jdolecek #include <sys/malloc.h> 47 1.2.18.2 jdolecek #include <sys/conf.h> 48 1.2.18.2 jdolecek #include <sys/kernel.h> 49 1.2.18.2 jdolecek #include <sys/systm.h> 50 1.2.18.2 jdolecek 51 1.2.18.2 jdolecek #include <machine/vsbus.h> 52 1.2.18.2 jdolecek #include <machine/sid.h> 53 1.2.18.2 jdolecek #include <machine/cpu.h> 54 1.2.18.2 jdolecek #include <machine/lcgreg.h> 55 1.2.18.2 jdolecek 56 1.2.18.2 jdolecek #include <dev/cons.h> 57 1.2.18.2 jdolecek 58 1.2.18.2 jdolecek #include <dev/dec/dzreg.h> 59 1.2.18.2 jdolecek #include <dev/dec/dzvar.h> 60 1.2.18.2 jdolecek #include <dev/dec/dzkbdvar.h> 61 1.2.18.2 jdolecek 62 1.2.18.2 jdolecek #include <dev/wscons/wsdisplayvar.h> 63 1.2.18.2 jdolecek #include <dev/wscons/wsconsio.h> 64 1.2.18.2 jdolecek #include <dev/wscons/wscons_callbacks.h> 65 1.2.18.2 jdolecek #include <dev/wsfont/wsfont.h> 66 1.2.18.2 jdolecek 67 1.2.18.2 jdolecek #include "machine/scb.h" 68 1.2.18.2 jdolecek 69 1.2.18.2 jdolecek #include "dzkbd.h" 70 1.2.18.2 jdolecek 71 1.2.18.2 jdolecek /* Screen hardware defs */ 72 1.2.18.2 jdolecek 73 1.2.18.2 jdolecek #define LCG_FB_ADDR 0x21801000 /* Frame buffer */ 74 1.2.18.2 jdolecek 75 1.2.18.2 jdolecek /* FIFO defines */ 76 1.2.18.2 jdolecek #define LCG_FIFO_SIZE 0x10000 /* 64 KB */ 77 1.2.18.2 jdolecek #define LCG_FIFO_WIN_ADDR 0x20180000 78 1.2.18.2 jdolecek #define LCG_FIFO_WIN_SIZE VAX_NBPG 79 1.2.18.2 jdolecek #define LCG_FIFO_ALIGN 0x10000 80 1.2.18.2 jdolecek 81 1.2.18.2 jdolecek /* font rendering defines */ 82 1.2.18.2 jdolecek #define LCG_FONT_ADDR (LCG_FB_ADDR + lcg_fb_size) 83 1.2.18.2 jdolecek #define LCG_FONT_STORAGE_SIZE 0x40000 /* 16 KB, enough to accomodate 16x32 font bitmaps */ 84 1.2.18.2 jdolecek 85 1.2.18.2 jdolecek /* register space defines */ 86 1.2.18.2 jdolecek #define LCG_REG_ADDR 0x20100000 /* LCG registers */ 87 1.2.18.2 jdolecek #define LCG_REG_SIZE 0x4000 /* 16384 bytes */ 88 1.2.18.2 jdolecek #define LCG_REG(reg) regaddr[(reg / 4)] 89 1.2.18.2 jdolecek 90 1.2.18.2 jdolecek /* LUT defines */ 91 1.2.18.2 jdolecek #define LCG_LUT_ADDR 0x21800800 /* LUT right before onscreen FB */ 92 1.2.18.2 jdolecek #define LCG_LUT_OFFSET 0x00000800 93 1.2.18.2 jdolecek #define LCG_LUT_SIZE 0x800 /* 2048 bytes */ 94 1.2.18.2 jdolecek 95 1.2.18.2 jdolecek #define LCG_BG_COLOR WSCOL_BLACK 96 1.2.18.2 jdolecek #define LCG_FG_COLOR WSCOL_WHITE 97 1.2.18.2 jdolecek 98 1.2.18.2 jdolecek #define LCG_CONFIG 0x200f0010 /* LCG model information */ 99 1.2.18.2 jdolecek 100 1.2.18.2 jdolecek /* implement sanity checks at certain points to ensure safer operation */ 101 1.2.18.2 jdolecek #define LCG_SAFE 102 1.2.18.2 jdolecek //#define LCG_DEBUG 103 1.2.18.2 jdolecek 104 1.2.18.2 jdolecek static int lcg_match(struct device *, struct cfdata *, void *); 105 1.2.18.2 jdolecek static void lcg_attach(struct device *, struct device *, void *); 106 1.2.18.2 jdolecek 107 1.2.18.2 jdolecek struct lcg_softc { 108 1.2.18.2 jdolecek struct device ss_dev; 109 1.2.18.2 jdolecek bus_dmamap_t sc_dm; 110 1.2.18.2 jdolecek }; 111 1.2.18.2 jdolecek 112 1.2.18.2 jdolecek CFATTACH_DECL_NEW(lcg, sizeof(struct lcg_softc), 113 1.2.18.2 jdolecek lcg_match, lcg_attach, NULL, NULL); 114 1.2.18.2 jdolecek 115 1.2.18.2 jdolecek static void lcg_cursor(void *, int, int, int); 116 1.2.18.2 jdolecek static int lcg_mapchar(void *, int, unsigned int *); 117 1.2.18.2 jdolecek static void lcg_putchar(void *, int, int, u_int, long); 118 1.2.18.2 jdolecek static void lcg_copycols(void *, int, int, int,int); 119 1.2.18.2 jdolecek static void lcg_erasecols(void *, int, int, int, long); 120 1.2.18.2 jdolecek static void lcg_copyrows(void *, int, int, int); 121 1.2.18.2 jdolecek static void lcg_eraserows(void *, int, int, long); 122 1.2.18.2 jdolecek static int lcg_allocattr(void *, int, int, int, long *); 123 1.2.18.2 jdolecek static int lcg_get_cmap(struct wsdisplay_cmap *); 124 1.2.18.2 jdolecek static int lcg_set_cmap(struct wsdisplay_cmap *); 125 1.2.18.2 jdolecek static void lcg_init_common(struct device *, struct vsbus_attach_args *); 126 1.2.18.2 jdolecek 127 1.2.18.2 jdolecek const struct wsdisplay_emulops lcg_emulops = { 128 1.2.18.2 jdolecek lcg_cursor, 129 1.2.18.2 jdolecek lcg_mapchar, 130 1.2.18.2 jdolecek lcg_putchar, 131 1.2.18.2 jdolecek lcg_copycols, 132 1.2.18.2 jdolecek lcg_erasecols, 133 1.2.18.2 jdolecek lcg_copyrows, 134 1.2.18.2 jdolecek lcg_eraserows, 135 1.2.18.2 jdolecek lcg_allocattr 136 1.2.18.2 jdolecek }; 137 1.2.18.2 jdolecek 138 1.2.18.2 jdolecek static char lcg_stdscreen_name[10] = "160x68"; 139 1.2.18.2 jdolecek struct wsscreen_descr lcg_stdscreen = { 140 1.2.18.2 jdolecek lcg_stdscreen_name, 160, 68, /* dynamically set */ 141 1.2.18.2 jdolecek &lcg_emulops, 142 1.2.18.2 jdolecek 8, 15, /* dynamically set */ 143 1.2.18.2 jdolecek WSSCREEN_UNDERLINE|WSSCREEN_REVERSE|WSSCREEN_WSCOLORS, 144 1.2.18.2 jdolecek }; 145 1.2.18.2 jdolecek 146 1.2.18.2 jdolecek const struct wsscreen_descr *_lcg_scrlist[] = { 147 1.2.18.2 jdolecek &lcg_stdscreen, 148 1.2.18.2 jdolecek }; 149 1.2.18.2 jdolecek 150 1.2.18.2 jdolecek const struct wsscreen_list lcg_screenlist = { 151 1.2.18.2 jdolecek sizeof(_lcg_scrlist) / sizeof(struct wsscreen_descr *), 152 1.2.18.2 jdolecek _lcg_scrlist, 153 1.2.18.2 jdolecek }; 154 1.2.18.2 jdolecek 155 1.2.18.2 jdolecek static char *lcgaddr; 156 1.2.18.2 jdolecek static char *lutaddr; 157 1.2.18.2 jdolecek static volatile long *regaddr; 158 1.2.18.2 jdolecek static volatile long *fifoaddr; 159 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 160 1.2.18.2 jdolecek static char *fontaddr; 161 1.2.18.2 jdolecek #endif 162 1.2.18.2 jdolecek 163 1.2.18.2 jdolecek static int lcg_xsize; 164 1.2.18.2 jdolecek static int lcg_ysize; 165 1.2.18.2 jdolecek static int lcg_depth; 166 1.2.18.2 jdolecek static int lcg_cols; 167 1.2.18.2 jdolecek static int lcg_rows; 168 1.2.18.2 jdolecek static int lcg_onerow; 169 1.2.18.2 jdolecek static int lcg_fb_size; 170 1.2.18.2 jdolecek static int lcg_glyph_size; /* bitmap size in bits */ 171 1.2.18.2 jdolecek 172 1.2.18.2 jdolecek static char *cursor; 173 1.2.18.2 jdolecek 174 1.2.18.2 jdolecek static int cur_on; 175 1.2.18.2 jdolecek 176 1.2.18.2 jdolecek static int cur_fg, cur_bg; 177 1.2.18.2 jdolecek 178 1.2.18.2 jdolecek 179 1.2.18.2 jdolecek /* Our current hardware colormap */ 180 1.2.18.2 jdolecek static struct hwcmap256 { 181 1.2.18.2 jdolecek #define CMAP_SIZE 256 /* 256 R/G/B entries */ 182 1.2.18.2 jdolecek u_int8_t r[CMAP_SIZE]; 183 1.2.18.2 jdolecek u_int8_t g[CMAP_SIZE]; 184 1.2.18.2 jdolecek u_int8_t b[CMAP_SIZE]; 185 1.2.18.2 jdolecek } lcg_cmap; 186 1.2.18.2 jdolecek 187 1.2.18.2 jdolecek /* The default colormap */ 188 1.2.18.2 jdolecek static struct { 189 1.2.18.2 jdolecek u_int8_t r[8]; 190 1.2.18.2 jdolecek u_int8_t g[8]; 191 1.2.18.2 jdolecek u_int8_t b[8]; 192 1.2.18.2 jdolecek } lcg_default_cmap = { 193 1.2.18.2 jdolecek { 0x00, 0xff, 0x00, 0xff, 0x00, 0xff, 0x00, 0xff }, 194 1.2.18.2 jdolecek { 0x00, 0x00, 0xff, 0x7f, 0x00, 0x00, 0xff, 0xff }, 195 1.2.18.2 jdolecek { 0x00, 0x00, 0x00, 0x00, 0xff, 0xff, 0xff, 0xff } 196 1.2.18.2 jdolecek }; 197 1.2.18.2 jdolecek 198 1.2.18.2 jdolecek struct wsdisplay_font lcg_font; 199 1.2.18.2 jdolecek static u_char *qf; 200 1.2.18.2 jdolecek static u_short *qf2; 201 1.2.18.2 jdolecek 202 1.2.18.2 jdolecek #define QCHAR(c) (c < lcg_font.firstchar ? 0 : \ 203 1.2.18.2 jdolecek (c >= (lcg_font.firstchar + lcg_font.numchars) ? 0 : c - lcg_font.firstchar)) 204 1.2.18.2 jdolecek #define QFONT(c,line) ((lcg_font.stride == 2 ? \ 205 1.2.18.2 jdolecek qf2[QCHAR(c) * lcg_font.fontheight + line] : \ 206 1.2.18.2 jdolecek qf[QCHAR(c) * lcg_font.fontheight + line])) 207 1.2.18.2 jdolecek #define LCG_ADDR(row, col, line, dot) \ 208 1.2.18.2 jdolecek lcgaddr[((col) * lcg_font.fontwidth) + ((row) * lcg_font.fontheight * lcg_xsize) + \ 209 1.2.18.2 jdolecek (line) * lcg_xsize + dot] 210 1.2.18.2 jdolecek 211 1.2.18.2 jdolecek 212 1.2.18.2 jdolecek static int lcg_ioctl(void *, void *, u_long, void *, int, struct lwp *); 213 1.2.18.2 jdolecek static paddr_t lcg_mmap(void *, void *, off_t, int); 214 1.2.18.2 jdolecek static int lcg_alloc_screen(void *, const struct wsscreen_descr *, 215 1.2.18.2 jdolecek void **, int *, int *, long *); 216 1.2.18.2 jdolecek static void lcg_free_screen(void *, void *); 217 1.2.18.2 jdolecek static int lcg_show_screen(void *, void *, int, 218 1.2.18.2 jdolecek void (*) (void *, int, int), void *); 219 1.2.18.2 jdolecek static void lcg_crsr_blink(void *); 220 1.2.18.2 jdolecek 221 1.2.18.2 jdolecek /* LCG HW accel functions */ 222 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 223 1.2.18.2 jdolecek static void fifo_put(long data); 224 1.2.18.2 jdolecek static int fifo_fill(int iterations); 225 1.2.18.2 jdolecek static u_char fifo_counter = 0; 226 1.2.18.2 jdolecek 227 1.2.18.2 jdolecek static void blkcpy(long source, long dest, int xdim, int ydim); 228 1.2.18.2 jdolecek static void blkset(long dest, int xdim, int ydim, char color); 229 1.2.18.2 jdolecek static void renderchar(long source, long dest, int xdim, int ydim, char fg, char bg); 230 1.2.18.2 jdolecek #endif /* LCG_NO_ACCEL */ 231 1.2.18.2 jdolecek 232 1.2.18.2 jdolecek const struct wsdisplay_accessops lcg_accessops = { 233 1.2.18.2 jdolecek lcg_ioctl, 234 1.2.18.2 jdolecek lcg_mmap, 235 1.2.18.2 jdolecek lcg_alloc_screen, 236 1.2.18.2 jdolecek lcg_free_screen, 237 1.2.18.2 jdolecek lcg_show_screen, 238 1.2.18.2 jdolecek 0 /* load_font */ 239 1.2.18.2 jdolecek }; 240 1.2.18.2 jdolecek 241 1.2.18.2 jdolecek /* TODO allocate ss_image dynamically for consoles beyond first one */ 242 1.2.18.2 jdolecek struct lcg_screen { 243 1.2.18.2 jdolecek int ss_curx; 244 1.2.18.2 jdolecek int ss_cury; 245 1.2.18.2 jdolecek int ss_cur_fg; 246 1.2.18.2 jdolecek int ss_cur_bg; 247 1.2.18.2 jdolecek struct { 248 1.2.18.2 jdolecek u_char data; /* Image character */ 249 1.2.18.2 jdolecek u_char attr; /* Attribute: 80/70/08/07 */ 250 1.2.18.2 jdolecek } ss_image[160 * 128]; /* allow for maximum possible cell matrix */ 251 1.2.18.2 jdolecek }; 252 1.2.18.2 jdolecek #define LCG_ATTR_UNDERLINE 0x80 253 1.2.18.2 jdolecek #define LCG_BG_MASK 0x70 254 1.2.18.2 jdolecek #define LCG_ATTR_REVERSE 0x08 255 1.2.18.2 jdolecek #define LCG_FG_MASK 0x07 256 1.2.18.2 jdolecek 257 1.2.18.2 jdolecek static struct lcg_screen lcg_conscreen; 258 1.2.18.2 jdolecek static struct lcg_screen *curscr; 259 1.2.18.2 jdolecek static struct lcg_screen *savescr; 260 1.2.18.2 jdolecek 261 1.2.18.2 jdolecek static callout_t lcg_cursor_ch; 262 1.2.18.2 jdolecek 263 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 264 1.2.18.2 jdolecek void fifo_put(long data) 265 1.2.18.2 jdolecek { 266 1.2.18.2 jdolecek fifo_counter &= 0x3; 267 1.2.18.2 jdolecek fifoaddr[fifo_counter] = data; 268 1.2.18.2 jdolecek fifo_counter++; 269 1.2.18.2 jdolecek } 270 1.2.18.2 jdolecek 271 1.2.18.2 jdolecek int fifo_fill(int iterations) 272 1.2.18.2 jdolecek { 273 1.2.18.2 jdolecek long status; 274 1.2.18.2 jdolecek int counter = 0;; 275 1.2.18.2 jdolecek 276 1.2.18.2 jdolecek while (fifo_counter % 4) 277 1.2.18.2 jdolecek fifo_put(0); 278 1.2.18.2 jdolecek 279 1.2.18.2 jdolecek #ifdef LCG_SAFE 280 1.2.18.2 jdolecek status = LCG_REG(LCG_REG_GRAPHICS_SUB_STATUS); 281 1.2.18.2 jdolecek while ((counter < iterations) && ((status & 0x80000000) == 0x80000000)) { 282 1.2.18.2 jdolecek delay(1000); 283 1.2.18.2 jdolecek status = LCG_REG(LCG_REG_GRAPHICS_SUB_STATUS); 284 1.2.18.2 jdolecek counter++; 285 1.2.18.2 jdolecek } 286 1.2.18.2 jdolecek #endif 287 1.2.18.2 jdolecek 288 1.2.18.2 jdolecek if (counter == 0) 289 1.2.18.2 jdolecek return 0; 290 1.2.18.2 jdolecek else 291 1.2.18.2 jdolecek return 1; 292 1.2.18.2 jdolecek } 293 1.2.18.2 jdolecek 294 1.2.18.2 jdolecek void blkcpy(long source, long dest, int xdim, int ydim) 295 1.2.18.2 jdolecek { 296 1.2.18.2 jdolecek int err; 297 1.2.18.2 jdolecek 298 1.2.18.2 jdolecek #ifdef LCG_SAFE 299 1.2.18.2 jdolecek if ((source < LCG_FB_ADDR) || (source > LCG_FB_ADDR + lcg_fb_size)) { 300 1.2.18.2 jdolecek printf("lcg: blkcpy: invalid source 0x%lx\n", source); 301 1.2.18.2 jdolecek return; 302 1.2.18.2 jdolecek } 303 1.2.18.2 jdolecek if ((dest < LCG_FB_ADDR) || (dest > LCG_FB_ADDR + lcg_fb_size)) { 304 1.2.18.2 jdolecek printf("lcg: blkcpy: invalid destination 0x%lx\n", dest); 305 1.2.18.2 jdolecek return; 306 1.2.18.2 jdolecek } 307 1.2.18.2 jdolecek #endif 308 1.2.18.2 jdolecek 309 1.2.18.2 jdolecek #ifdef LCG_SAFE 310 1.2.18.2 jdolecek fifo_put(0x0c010000 | (cur_fg & 0xff)); 311 1.2.18.2 jdolecek #endif 312 1.2.18.2 jdolecek fifo_put(0x01020006); 313 1.2.18.2 jdolecek 314 1.2.18.2 jdolecek fifo_put(0x06800000); 315 1.2.18.2 jdolecek fifo_put(source); 316 1.2.18.2 jdolecek fifo_put(lcg_xsize); 317 1.2.18.2 jdolecek 318 1.2.18.2 jdolecek fifo_put(0x05800000); 319 1.2.18.2 jdolecek fifo_put(dest); 320 1.2.18.2 jdolecek fifo_put(lcg_xsize); 321 1.2.18.2 jdolecek 322 1.2.18.2 jdolecek fifo_put(0x03400000); 323 1.2.18.2 jdolecek fifo_put(0xff); 324 1.2.18.2 jdolecek 325 1.2.18.2 jdolecek fifo_put(0x02000003); 326 1.2.18.2 jdolecek 327 1.2.18.2 jdolecek #ifdef LCG_SAFE 328 1.2.18.2 jdolecek fifo_put(0x04c00000); 329 1.2.18.2 jdolecek fifo_put(0); 330 1.2.18.2 jdolecek fifo_put(lcg_xsize); 331 1.2.18.2 jdolecek fifo_put(lcg_fb_size - (dest - LCG_FB_ADDR)); 332 1.2.18.2 jdolecek #endif 333 1.2.18.2 jdolecek 334 1.2.18.2 jdolecek fifo_put(0x09c00000); 335 1.2.18.2 jdolecek fifo_put(((ydim & 0xffff) << 16) | xdim); 336 1.2.18.2 jdolecek fifo_put(0); 337 1.2.18.2 jdolecek fifo_put(0); 338 1.2.18.2 jdolecek 339 1.2.18.2 jdolecek err = fifo_fill(200); 340 1.2.18.2 jdolecek if (err) 341 1.2.18.2 jdolecek printf("lcg: AG still busy after 200 msec\n"); 342 1.2.18.2 jdolecek } 343 1.2.18.2 jdolecek 344 1.2.18.2 jdolecek void blkset(long dest, int xdim, int ydim, char color) 345 1.2.18.2 jdolecek { 346 1.2.18.2 jdolecek int err; 347 1.2.18.2 jdolecek 348 1.2.18.2 jdolecek #ifdef LCG_SAFE 349 1.2.18.2 jdolecek if ((dest < LCG_FB_ADDR) || (dest > LCG_FB_ADDR + lcg_fb_size)) { 350 1.2.18.2 jdolecek printf("lcg: blkset: invalid destination 0x%lx\n", dest); 351 1.2.18.2 jdolecek return; 352 1.2.18.2 jdolecek } 353 1.2.18.2 jdolecek #endif 354 1.2.18.2 jdolecek 355 1.2.18.2 jdolecek fifo_put(0x0c010000 | (color & 0xff)); 356 1.2.18.2 jdolecek 357 1.2.18.2 jdolecek fifo_put(0x01000000); 358 1.2.18.2 jdolecek 359 1.2.18.2 jdolecek fifo_put(0x05800000); 360 1.2.18.2 jdolecek fifo_put(dest); 361 1.2.18.2 jdolecek fifo_put(lcg_xsize); 362 1.2.18.2 jdolecek 363 1.2.18.2 jdolecek fifo_put(0x03400000); 364 1.2.18.2 jdolecek fifo_put(0xff); 365 1.2.18.2 jdolecek 366 1.2.18.2 jdolecek fifo_put(0x02000003); 367 1.2.18.2 jdolecek 368 1.2.18.2 jdolecek #ifdef LCG_SAFE 369 1.2.18.2 jdolecek fifo_put(0x04c00000); 370 1.2.18.2 jdolecek fifo_put(0); 371 1.2.18.2 jdolecek fifo_put(lcg_xsize); 372 1.2.18.2 jdolecek fifo_put(lcg_fb_size - (dest - LCG_FB_ADDR)); 373 1.2.18.2 jdolecek #endif 374 1.2.18.2 jdolecek 375 1.2.18.2 jdolecek fifo_put(0x09c00000); 376 1.2.18.2 jdolecek fifo_put(((ydim & 0xffff) << 16) | xdim); 377 1.2.18.2 jdolecek fifo_put(0); 378 1.2.18.2 jdolecek fifo_put(0); 379 1.2.18.2 jdolecek 380 1.2.18.2 jdolecek err = fifo_fill(200); 381 1.2.18.2 jdolecek if (err) 382 1.2.18.2 jdolecek printf("lcg: AG still busy after 200 msec\n"); 383 1.2.18.2 jdolecek } 384 1.2.18.2 jdolecek 385 1.2.18.2 jdolecek void renderchar(long source, long dest, int xdim, int ydim, char fg, char bg) 386 1.2.18.2 jdolecek { 387 1.2.18.2 jdolecek int err; 388 1.2.18.2 jdolecek #ifdef LCG_SAFE 389 1.2.18.2 jdolecek if ((dest < LCG_FB_ADDR) || (dest > LCG_FB_ADDR + lcg_fb_size)) { 390 1.2.18.2 jdolecek printf("lcg: blkset: invalid destination 0x%lx\n", dest); 391 1.2.18.2 jdolecek return; 392 1.2.18.2 jdolecek } 393 1.2.18.2 jdolecek #endif 394 1.2.18.2 jdolecek 395 1.2.18.2 jdolecek fifo_put(0x0c050000 | (bg & 0xff)); 396 1.2.18.2 jdolecek fifo_put(0x0c010000 | (fg & 0xff)); 397 1.2.18.2 jdolecek 398 1.2.18.2 jdolecek fifo_put(0x01030008); 399 1.2.18.2 jdolecek 400 1.2.18.2 jdolecek fifo_put(0x06800000); 401 1.2.18.2 jdolecek fifo_put(source); 402 1.2.18.2 jdolecek //fifo_put(lcg_xsize); 403 1.2.18.2 jdolecek fifo_put(lcg_font.stride); 404 1.2.18.2 jdolecek 405 1.2.18.2 jdolecek fifo_put(0x05800000); 406 1.2.18.2 jdolecek fifo_put(dest); 407 1.2.18.2 jdolecek fifo_put(lcg_xsize); 408 1.2.18.2 jdolecek 409 1.2.18.2 jdolecek fifo_put(0x03400000); 410 1.2.18.2 jdolecek fifo_put(0xff); 411 1.2.18.2 jdolecek 412 1.2.18.2 jdolecek fifo_put(0x02000003); 413 1.2.18.2 jdolecek 414 1.2.18.2 jdolecek #ifdef LCG_SAFE 415 1.2.18.2 jdolecek fifo_put(0x04c00000); 416 1.2.18.2 jdolecek fifo_put(0); 417 1.2.18.2 jdolecek fifo_put(lcg_xsize); 418 1.2.18.2 jdolecek fifo_put(lcg_fb_size - (dest - LCG_FB_ADDR)); 419 1.2.18.2 jdolecek #endif 420 1.2.18.2 jdolecek 421 1.2.18.2 jdolecek fifo_put(0x09c00000); 422 1.2.18.2 jdolecek fifo_put(((ydim & 0xffff) << 16) | (xdim & 0xffff)); 423 1.2.18.2 jdolecek fifo_put(0); 424 1.2.18.2 jdolecek fifo_put(0); 425 1.2.18.2 jdolecek 426 1.2.18.2 jdolecek err = fifo_fill(200); 427 1.2.18.2 jdolecek if (err) 428 1.2.18.2 jdolecek printf("lcg: AG still busy after 200 msec\n"); 429 1.2.18.2 jdolecek } 430 1.2.18.2 jdolecek #endif /* LCG_NO_ACCEL */ 431 1.2.18.2 jdolecek 432 1.2.18.2 jdolecek int 433 1.2.18.2 jdolecek lcg_match(struct device *parent, struct cfdata *match, void *aux) 434 1.2.18.2 jdolecek { 435 1.2.18.2 jdolecek struct vsbus_softc *sc = device_private(parent); 436 1.2.18.2 jdolecek struct vsbus_attach_args *va = aux; 437 1.2.18.2 jdolecek char *ch = (char *)va->va_addr; 438 1.2.18.2 jdolecek 439 1.2.18.2 jdolecek if ((vax_boardtype != VAX_BTYP_46) && (vax_boardtype != VAX_BTYP_48)) 440 1.2.18.2 jdolecek return 0; 441 1.2.18.2 jdolecek 442 1.2.18.2 jdolecek *ch = 1; 443 1.2.18.2 jdolecek if ((*ch & 1) == 0) 444 1.2.18.2 jdolecek return 0; 445 1.2.18.2 jdolecek *ch = 0; 446 1.2.18.2 jdolecek if ((*ch & 1) != 0) 447 1.2.18.2 jdolecek return 0; 448 1.2.18.2 jdolecek 449 1.2.18.2 jdolecek /* XXX use vertical interrupt? */ 450 1.2.18.2 jdolecek sc->sc_mask = 0x04; /* XXX - should be generated */ 451 1.2.18.2 jdolecek scb_fake(0x120, 0x15); 452 1.2.18.2 jdolecek return 20; 453 1.2.18.2 jdolecek } 454 1.2.18.2 jdolecek 455 1.2.18.2 jdolecek void 456 1.2.18.2 jdolecek lcg_attach(struct device *parent, struct device *self, void *aux) 457 1.2.18.2 jdolecek { 458 1.2.18.2 jdolecek struct vsbus_attach_args *va = aux; 459 1.2.18.2 jdolecek struct wsemuldisplaydev_attach_args aa; 460 1.2.18.2 jdolecek 461 1.2.18.2 jdolecek printf("\n"); 462 1.2.18.2 jdolecek aa.console = lcgaddr != NULL; 463 1.2.18.2 jdolecek 464 1.2.18.2 jdolecek lcg_init_common(self, va); 465 1.2.18.2 jdolecek 466 1.2.18.2 jdolecek curscr = &lcg_conscreen; 467 1.2.18.2 jdolecek 468 1.2.18.2 jdolecek aa.scrdata = &lcg_screenlist; 469 1.2.18.2 jdolecek aa.accessops = &lcg_accessops; 470 1.2.18.2 jdolecek 471 1.2.18.2 jdolecek /* enable software cursor */ 472 1.2.18.2 jdolecek callout_init(&lcg_cursor_ch, 0); 473 1.2.18.2 jdolecek callout_reset(&lcg_cursor_ch, hz / 2, lcg_crsr_blink, NULL); 474 1.2.18.2 jdolecek 475 1.2.18.2 jdolecek config_found(self, &aa, wsemuldisplaydevprint); 476 1.2.18.2 jdolecek } 477 1.2.18.2 jdolecek 478 1.2.18.2 jdolecek static void 479 1.2.18.2 jdolecek lcg_crsr_blink(void *arg) 480 1.2.18.2 jdolecek { 481 1.2.18.2 jdolecek int dot; 482 1.2.18.2 jdolecek 483 1.2.18.2 jdolecek if (cur_on && curscr != NULL) 484 1.2.18.2 jdolecek for (dot = 0; dot < lcg_font.fontwidth; dot++) 485 1.2.18.2 jdolecek cursor[dot] = ((cursor[dot] & 0x0f) == cur_fg) ? cur_bg : cur_fg; 486 1.2.18.2 jdolecek 487 1.2.18.2 jdolecek callout_reset(&lcg_cursor_ch, hz / 2, lcg_crsr_blink, NULL); 488 1.2.18.2 jdolecek } 489 1.2.18.2 jdolecek 490 1.2.18.2 jdolecek void 491 1.2.18.2 jdolecek lcg_cursor(void *id, int on, int row, int col) 492 1.2.18.2 jdolecek { 493 1.2.18.2 jdolecek struct lcg_screen *ss = id; 494 1.2.18.2 jdolecek int dot, attr; 495 1.2.18.2 jdolecek 496 1.2.18.2 jdolecek attr = ss->ss_image[row * lcg_cols + col].attr; 497 1.2.18.2 jdolecek if (ss == curscr) { 498 1.2.18.2 jdolecek if (cursor != NULL) { 499 1.2.18.2 jdolecek int ch = QFONT(ss->ss_image[ss->ss_cury * lcg_cols + 500 1.2.18.2 jdolecek ss->ss_curx].data, lcg_font.fontheight - 1); 501 1.2.18.2 jdolecek attr = ss->ss_image[ss->ss_cury * lcg_cols + 502 1.2.18.2 jdolecek ss->ss_curx].attr; 503 1.2.18.2 jdolecek 504 1.2.18.2 jdolecek if (attr & LCG_ATTR_REVERSE) { 505 1.2.18.2 jdolecek cur_bg = attr & LCG_FG_MASK; 506 1.2.18.2 jdolecek cur_fg = (attr & LCG_BG_MASK) >> 4; 507 1.2.18.2 jdolecek } else { 508 1.2.18.2 jdolecek cur_fg = attr & LCG_FG_MASK; 509 1.2.18.2 jdolecek cur_bg = (attr & LCG_BG_MASK) >> 4; 510 1.2.18.2 jdolecek } 511 1.2.18.2 jdolecek for (dot = 0; dot < lcg_font.fontwidth; dot++) 512 1.2.18.2 jdolecek cursor[dot] = (ch & (1 << dot)) ? 513 1.2.18.2 jdolecek cur_fg : cur_bg; 514 1.2.18.2 jdolecek } 515 1.2.18.2 jdolecek 516 1.2.18.2 jdolecek cursor = &LCG_ADDR(row, col, lcg_font.fontheight - 1, 0); 517 1.2.18.2 jdolecek cur_on = on; 518 1.2.18.2 jdolecek if (attr & LCG_ATTR_REVERSE) { 519 1.2.18.2 jdolecek cur_bg = attr & LCG_FG_MASK; 520 1.2.18.2 jdolecek cur_fg = (attr & LCG_BG_MASK) >> 4; 521 1.2.18.2 jdolecek } else { 522 1.2.18.2 jdolecek cur_fg = attr & LCG_FG_MASK; 523 1.2.18.2 jdolecek cur_bg = (attr & LCG_BG_MASK) >> 4; 524 1.2.18.2 jdolecek } 525 1.2.18.2 jdolecek } 526 1.2.18.2 jdolecek ss->ss_curx = col; 527 1.2.18.2 jdolecek ss->ss_cury = row; 528 1.2.18.2 jdolecek if (attr & LCG_ATTR_REVERSE) { 529 1.2.18.2 jdolecek ss->ss_cur_bg = attr & LCG_FG_MASK; 530 1.2.18.2 jdolecek ss->ss_cur_fg = (attr & LCG_BG_MASK) >> 4; 531 1.2.18.2 jdolecek } else { 532 1.2.18.2 jdolecek ss->ss_cur_fg = attr & LCG_FG_MASK; 533 1.2.18.2 jdolecek ss->ss_cur_bg = (attr & LCG_BG_MASK) >> 4; 534 1.2.18.2 jdolecek } 535 1.2.18.2 jdolecek } 536 1.2.18.2 jdolecek 537 1.2.18.2 jdolecek int 538 1.2.18.2 jdolecek lcg_mapchar(void *id, int uni, unsigned int *index) 539 1.2.18.2 jdolecek { 540 1.2.18.2 jdolecek if (uni < 256) { 541 1.2.18.2 jdolecek *index = uni; 542 1.2.18.2 jdolecek return (5); 543 1.2.18.2 jdolecek } 544 1.2.18.2 jdolecek *index = ' '; 545 1.2.18.2 jdolecek return (0); 546 1.2.18.2 jdolecek } 547 1.2.18.2 jdolecek 548 1.2.18.2 jdolecek static void 549 1.2.18.2 jdolecek lcg_putchar(void *id, int row, int col, u_int c, long attr) 550 1.2.18.2 jdolecek { 551 1.2.18.2 jdolecek struct lcg_screen *ss = id; 552 1.2.18.2 jdolecek int i; 553 1.2.18.2 jdolecek char dot_fg, dot_bg; 554 1.2.18.2 jdolecek 555 1.2.18.2 jdolecek c &= 0xff; 556 1.2.18.2 jdolecek 557 1.2.18.2 jdolecek ss->ss_image[row * lcg_cols + col].data = c; 558 1.2.18.2 jdolecek ss->ss_image[row * lcg_cols + col].attr = attr; 559 1.2.18.2 jdolecek if (ss != curscr) 560 1.2.18.2 jdolecek return; 561 1.2.18.2 jdolecek 562 1.2.18.2 jdolecek dot_fg = attr & LCG_FG_MASK; 563 1.2.18.2 jdolecek dot_bg = (attr & LCG_BG_MASK) >> 4; 564 1.2.18.2 jdolecek if (attr & LCG_ATTR_REVERSE) { 565 1.2.18.2 jdolecek dot_fg = (attr & LCG_BG_MASK) >> 4; 566 1.2.18.2 jdolecek dot_bg = attr & LCG_FG_MASK; 567 1.2.18.2 jdolecek } 568 1.2.18.2 jdolecek 569 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 570 1.2.18.2 jdolecek renderchar(LCG_FONT_ADDR + (c * lcg_glyph_size), 571 1.2.18.2 jdolecek LCG_FB_ADDR + (row * lcg_onerow) + (col * lcg_font.fontwidth), 572 1.2.18.2 jdolecek lcg_font.fontwidth, lcg_font.fontheight, dot_fg, dot_bg); 573 1.2.18.2 jdolecek #else 574 1.2.18.2 jdolecek for (i = 0; i < lcg_font.fontheight; i++) { 575 1.2.18.2 jdolecek unsigned char ch = QFONT(c,i); 576 1.2.18.2 jdolecek for (int j = 0; j < lcg_font.fontwidth; j++) { 577 1.2.18.2 jdolecek LCG_ADDR(row, col, i, j) = ((ch >> j) & 1) ? dot_fg : dot_bg; 578 1.2.18.2 jdolecek } 579 1.2.18.2 jdolecek } 580 1.2.18.2 jdolecek #endif /* LCG_NO_ACCEL */ 581 1.2.18.2 jdolecek if (attr & LCG_ATTR_UNDERLINE) { 582 1.2.18.2 jdolecek char *p = &LCG_ADDR(row, col, lcg_font.fontheight - 1, 0); 583 1.2.18.2 jdolecek for (i = 0; i < lcg_font.fontwidth; i++) 584 1.2.18.2 jdolecek p[i] = ~p[i]; 585 1.2.18.2 jdolecek } 586 1.2.18.2 jdolecek } 587 1.2.18.2 jdolecek 588 1.2.18.2 jdolecek 589 1.2.18.2 jdolecek 590 1.2.18.2 jdolecek /* 591 1.2.18.2 jdolecek * copies columns inside a row. 592 1.2.18.2 jdolecek */ 593 1.2.18.2 jdolecek static void 594 1.2.18.2 jdolecek lcg_copycols(void *id, int row, int srccol, int dstcol, int ncols) 595 1.2.18.2 jdolecek { 596 1.2.18.2 jdolecek struct lcg_screen *ss = id; 597 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 598 1.2.18.2 jdolecek int i = 0; 599 1.2.18.2 jdolecek #endif 600 1.2.18.2 jdolecek 601 1.2.18.2 jdolecek bcopy(&ss->ss_image[row * lcg_cols + srccol], &ss->ss_image[row * 602 1.2.18.2 jdolecek lcg_cols + dstcol], ncols * sizeof(ss->ss_image[0])); 603 1.2.18.2 jdolecek if (ss != curscr) 604 1.2.18.2 jdolecek return; 605 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 606 1.2.18.2 jdolecek for (i = 0; i < lcg_font.fontheight; i++) 607 1.2.18.2 jdolecek memcpy(&LCG_ADDR(row, dstcol, i, 0), 608 1.2.18.2 jdolecek &LCG_ADDR(row,srccol, i, 0), ncols * lcg_font.fontwidth); 609 1.2.18.2 jdolecek 610 1.2.18.2 jdolecek #else 611 1.2.18.2 jdolecek blkcpy(LCG_FB_ADDR + (row * lcg_onerow) + (srccol * lcg_font.fontwidth), 612 1.2.18.2 jdolecek LCG_FB_ADDR + (row * lcg_onerow) + (dstcol * lcg_font.fontwidth), 613 1.2.18.2 jdolecek (ncols * lcg_font.fontwidth), lcg_font.fontheight); 614 1.2.18.2 jdolecek #endif 615 1.2.18.2 jdolecek } 616 1.2.18.2 jdolecek 617 1.2.18.2 jdolecek /* 618 1.2.18.2 jdolecek * Erases a bunch of chars inside one row. 619 1.2.18.2 jdolecek */ 620 1.2.18.2 jdolecek static void 621 1.2.18.2 jdolecek lcg_erasecols(void *id, int row, int startcol, int ncols, long fillattr) 622 1.2.18.2 jdolecek { 623 1.2.18.2 jdolecek struct lcg_screen *ss = id; 624 1.2.18.2 jdolecek int i; 625 1.2.18.2 jdolecek 626 1.2.18.2 jdolecek bzero(&ss->ss_image[row * lcg_cols + startcol], ncols * sizeof(ss->ss_image[0])); 627 1.2.18.2 jdolecek for (i = row * lcg_cols + startcol; i < row * lcg_cols + startcol + ncols; ++i) 628 1.2.18.2 jdolecek ss->ss_image[i].attr = fillattr; 629 1.2.18.2 jdolecek if (ss != curscr) 630 1.2.18.2 jdolecek return; 631 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 632 1.2.18.2 jdolecek for (i = 0; i < lcg_font.fontheight; i++) 633 1.2.18.2 jdolecek memset(&LCG_ADDR(row, startcol, i, 0), 0, ncols * lcg_font.fontwidth); 634 1.2.18.2 jdolecek #else 635 1.2.18.2 jdolecek blkset(LCG_FB_ADDR + (row * lcg_onerow) + (startcol * lcg_font.fontwidth), 636 1.2.18.2 jdolecek (ncols * lcg_font.fontwidth), lcg_font.fontheight, (fillattr & LCG_BG_MASK) >> 4); 637 1.2.18.2 jdolecek #endif 638 1.2.18.2 jdolecek } 639 1.2.18.2 jdolecek 640 1.2.18.2 jdolecek static void 641 1.2.18.2 jdolecek lcg_copyrows(void *id, int srcrow, int dstrow, int nrows) 642 1.2.18.2 jdolecek { 643 1.2.18.2 jdolecek struct lcg_screen *ss = id; 644 1.2.18.2 jdolecek 645 1.2.18.2 jdolecek bcopy(&ss->ss_image[srcrow * lcg_cols], &ss->ss_image[dstrow * lcg_cols], 646 1.2.18.2 jdolecek nrows * lcg_cols * sizeof(ss->ss_image[0])); 647 1.2.18.2 jdolecek if (ss != curscr) 648 1.2.18.2 jdolecek return; 649 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 650 1.2.18.2 jdolecek memcpy(&lcgaddr[dstrow * lcg_onerow], 651 1.2.18.2 jdolecek &lcgaddr[srcrow * lcg_onerow], nrows * lcg_onerow); 652 1.2.18.2 jdolecek #else 653 1.2.18.2 jdolecek blkcpy(LCG_FB_ADDR + (srcrow * lcg_onerow), LCG_FB_ADDR + (dstrow * lcg_onerow), 654 1.2.18.2 jdolecek (lcg_cols * lcg_font.fontwidth), (nrows * lcg_font.fontheight)); 655 1.2.18.2 jdolecek #endif 656 1.2.18.2 jdolecek } 657 1.2.18.2 jdolecek 658 1.2.18.2 jdolecek static void 659 1.2.18.2 jdolecek lcg_eraserows(void *id, int startrow, int nrows, long fillattr) 660 1.2.18.2 jdolecek { 661 1.2.18.2 jdolecek struct lcg_screen *ss = id; 662 1.2.18.2 jdolecek int i; 663 1.2.18.2 jdolecek 664 1.2.18.2 jdolecek bzero(&ss->ss_image[startrow * lcg_cols], nrows * lcg_cols * 665 1.2.18.2 jdolecek sizeof(ss->ss_image[0])); 666 1.2.18.2 jdolecek for (i = startrow * lcg_cols; i < (startrow + nrows) * lcg_cols; ++i) 667 1.2.18.2 jdolecek ss->ss_image[i].attr = fillattr; 668 1.2.18.2 jdolecek if (ss != curscr) 669 1.2.18.2 jdolecek return; 670 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 671 1.2.18.2 jdolecek memset(&lcgaddr[startrow * lcg_onerow], 0, nrows * lcg_onerow); 672 1.2.18.2 jdolecek #else 673 1.2.18.2 jdolecek blkset(LCG_FB_ADDR + (startrow * lcg_onerow), (lcg_cols * lcg_font.fontwidth), 674 1.2.18.2 jdolecek (nrows * lcg_font.fontheight), (fillattr & LCG_BG_MASK) >> 4); 675 1.2.18.2 jdolecek #endif 676 1.2.18.2 jdolecek } 677 1.2.18.2 jdolecek 678 1.2.18.2 jdolecek static int 679 1.2.18.2 jdolecek lcg_allocattr(void *id, int fg, int bg, int flags, long *attrp) 680 1.2.18.2 jdolecek { 681 1.2.18.2 jdolecek long myattr; 682 1.2.18.2 jdolecek 683 1.2.18.2 jdolecek if (flags & WSATTR_WSCOLORS) 684 1.2.18.2 jdolecek myattr = (fg & LCG_FG_MASK) | ((bg << 4) & LCG_BG_MASK); 685 1.2.18.2 jdolecek else 686 1.2.18.2 jdolecek myattr = WSCOL_WHITE << 4; /* XXXX */ 687 1.2.18.2 jdolecek if (flags & WSATTR_REVERSE) 688 1.2.18.2 jdolecek myattr |= LCG_ATTR_REVERSE; 689 1.2.18.2 jdolecek if (flags & WSATTR_UNDERLINE) 690 1.2.18.2 jdolecek myattr |= LCG_ATTR_UNDERLINE; 691 1.2.18.2 jdolecek *attrp = myattr; 692 1.2.18.2 jdolecek return 0; 693 1.2.18.2 jdolecek } 694 1.2.18.2 jdolecek 695 1.2.18.2 jdolecek static int 696 1.2.18.2 jdolecek lcg_ioctl(void *v, void *vs, u_long cmd, void *data, int flag, struct lwp *l) 697 1.2.18.2 jdolecek { 698 1.2.18.2 jdolecek struct wsdisplay_fbinfo *fb = (void *)data; 699 1.2.18.2 jdolecek int i; 700 1.2.18.2 jdolecek 701 1.2.18.2 jdolecek switch (cmd) { 702 1.2.18.2 jdolecek case WSDISPLAYIO_GTYPE: 703 1.2.18.2 jdolecek *(u_int *)data = WSDISPLAY_TYPE_LCG; 704 1.2.18.2 jdolecek break; 705 1.2.18.2 jdolecek 706 1.2.18.2 jdolecek case WSDISPLAYIO_GINFO: 707 1.2.18.2 jdolecek fb->height = lcg_ysize; 708 1.2.18.2 jdolecek fb->width = lcg_xsize; 709 1.2.18.2 jdolecek fb->depth = lcg_depth; 710 1.2.18.2 jdolecek fb->cmsize = 1 << lcg_depth; 711 1.2.18.2 jdolecek break; 712 1.2.18.2 jdolecek 713 1.2.18.2 jdolecek case WSDISPLAYIO_LINEBYTES: 714 1.2.18.2 jdolecek *(u_int *)data = lcg_xsize; 715 1.2.18.2 jdolecek break; 716 1.2.18.2 jdolecek 717 1.2.18.2 jdolecek case WSDISPLAYIO_GETCMAP: 718 1.2.18.2 jdolecek return lcg_get_cmap((struct wsdisplay_cmap *)data); 719 1.2.18.2 jdolecek 720 1.2.18.2 jdolecek case WSDISPLAYIO_PUTCMAP: 721 1.2.18.2 jdolecek return lcg_set_cmap((struct wsdisplay_cmap *)data); 722 1.2.18.2 jdolecek 723 1.2.18.2 jdolecek case WSDISPLAYIO_GMODE: 724 1.2.18.2 jdolecek return EPASSTHROUGH; 725 1.2.18.2 jdolecek 726 1.2.18.2 jdolecek case WSDISPLAYIO_SMODE: 727 1.2.18.2 jdolecek /* if setting WSDISPLAYIO_MODE_EMUL, restore console cmap, current screen */ 728 1.2.18.2 jdolecek if (*(u_int *)data == WSDISPLAYIO_MODE_EMUL) { 729 1.2.18.2 jdolecek /* FIXME: if this is meant to reset palette LUT reload has to be triggered too */ 730 1.2.18.2 jdolecek bzero(lutaddr, LCG_LUT_SIZE); 731 1.2.18.2 jdolecek for (i = 0; i < 8; ++i) { 732 1.2.18.2 jdolecek lcg_cmap.r[i] = lcg_default_cmap.r[i]; 733 1.2.18.2 jdolecek lcg_cmap.g[i] = lcg_default_cmap.g[i]; 734 1.2.18.2 jdolecek lcg_cmap.b[i] = lcg_default_cmap.b[i]; 735 1.2.18.2 jdolecek lutaddr[i * 8 + 1] = i; 736 1.2.18.2 jdolecek lutaddr[i * 8 + 2] = 1; 737 1.2.18.2 jdolecek lutaddr[i * 8 + 3] = lcg_cmap.r[i] >> (lcg_depth & 7); 738 1.2.18.2 jdolecek lutaddr[i * 8 + 4] = 1; 739 1.2.18.2 jdolecek lutaddr[i * 8 + 5] = lcg_cmap.g[i] >> (lcg_depth & 7); 740 1.2.18.2 jdolecek lutaddr[i * 8 + 6] = 1; 741 1.2.18.2 jdolecek lutaddr[i * 8 + 7] = lcg_cmap.b[i] >> (lcg_depth & 7); 742 1.2.18.2 jdolecek } 743 1.2.18.2 jdolecek if (savescr != NULL) 744 1.2.18.2 jdolecek lcg_show_screen(NULL, savescr, 0, NULL, NULL); 745 1.2.18.2 jdolecek savescr = NULL; 746 1.2.18.2 jdolecek } else { /* WSDISPLAYIO_MODE_MAPPED */ 747 1.2.18.2 jdolecek savescr = curscr; 748 1.2.18.2 jdolecek curscr = NULL; 749 1.2.18.2 jdolecek /* clear screen? */ 750 1.2.18.2 jdolecek } 751 1.2.18.2 jdolecek 752 1.2.18.2 jdolecek return EPASSTHROUGH; 753 1.2.18.2 jdolecek #if 0 754 1.2.18.2 jdolecek case WSDISPLAYIO_SVIDEO: 755 1.2.18.2 jdolecek if (*(u_int *)data == WSDISPLAYIO_VIDEO_ON) { 756 1.2.18.2 jdolecek curcmd = curc; 757 1.2.18.2 jdolecek } else { 758 1.2.18.2 jdolecek curc = curcmd; 759 1.2.18.2 jdolecek curcmd &= ~(CUR_CMD_FOPA|CUR_CMD_ENPA); 760 1.2.18.2 jdolecek curcmd |= CUR_CMD_FOPB; 761 1.2.18.2 jdolecek } 762 1.2.18.2 jdolecek WRITECUR(CUR_CMD, curcmd); 763 1.2.18.2 jdolecek break; 764 1.2.18.2 jdolecek 765 1.2.18.2 jdolecek case WSDISPLAYIO_GVIDEO: 766 1.2.18.2 jdolecek *(u_int *)data = (curcmd & CUR_CMD_FOPB ? 767 1.2.18.2 jdolecek WSDISPLAYIO_VIDEO_OFF : WSDISPLAYIO_VIDEO_ON); 768 1.2.18.2 jdolecek break; 769 1.2.18.2 jdolecek 770 1.2.18.2 jdolecek #endif 771 1.2.18.2 jdolecek default: 772 1.2.18.2 jdolecek return EPASSTHROUGH; 773 1.2.18.2 jdolecek } 774 1.2.18.2 jdolecek return 0; 775 1.2.18.2 jdolecek } 776 1.2.18.2 jdolecek 777 1.2.18.2 jdolecek static paddr_t 778 1.2.18.2 jdolecek lcg_mmap(void *v, void *vs, off_t offset, int prot) 779 1.2.18.2 jdolecek { 780 1.2.18.2 jdolecek if (offset >= lcg_fb_size || offset < 0) 781 1.2.18.2 jdolecek return -1; 782 1.2.18.2 jdolecek return (LCG_FB_ADDR + offset) >> PGSHIFT; 783 1.2.18.2 jdolecek } 784 1.2.18.2 jdolecek 785 1.2.18.2 jdolecek int 786 1.2.18.2 jdolecek lcg_alloc_screen(void *v, const struct wsscreen_descr *type, void **cookiep, 787 1.2.18.2 jdolecek int *curxp, int *curyp, long *defattrp) 788 1.2.18.2 jdolecek { 789 1.2.18.2 jdolecek int i; 790 1.2.18.2 jdolecek struct lcg_screen *ss; 791 1.2.18.2 jdolecek 792 1.2.18.2 jdolecek *cookiep = malloc(sizeof(struct lcg_screen), M_DEVBUF, M_WAITOK); 793 1.2.18.2 jdolecek bzero(*cookiep, sizeof(struct lcg_screen)); 794 1.2.18.2 jdolecek *curxp = *curyp = 0; 795 1.2.18.2 jdolecek *defattrp = (LCG_BG_COLOR << 4) | LCG_FG_COLOR; 796 1.2.18.2 jdolecek ss = *cookiep; 797 1.2.18.2 jdolecek for (i = 0; i < lcg_cols * lcg_rows; ++i) 798 1.2.18.2 jdolecek ss->ss_image[i].attr = (LCG_BG_COLOR << 4) | LCG_FG_COLOR; 799 1.2.18.2 jdolecek return 0; 800 1.2.18.2 jdolecek } 801 1.2.18.2 jdolecek 802 1.2.18.2 jdolecek void 803 1.2.18.2 jdolecek lcg_free_screen(void *v, void *cookie) 804 1.2.18.2 jdolecek { 805 1.2.18.2 jdolecek } 806 1.2.18.2 jdolecek 807 1.2.18.2 jdolecek int 808 1.2.18.2 jdolecek lcg_show_screen(void *v, void *cookie, int waitok, 809 1.2.18.2 jdolecek void (*cb)(void *, int, int), void *cbarg) 810 1.2.18.2 jdolecek { 811 1.2.18.2 jdolecek struct lcg_screen *ss = cookie; 812 1.2.18.2 jdolecek int row, col, dot_fg, dot_bg, j, attr; 813 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 814 1.2.18.2 jdolecek int iter, jter; 815 1.2.18.2 jdolecek unsigned char ch; 816 1.2.18.2 jdolecek #endif 817 1.2.18.2 jdolecek 818 1.2.18.2 jdolecek if (ss == curscr) 819 1.2.18.2 jdolecek return (0); 820 1.2.18.2 jdolecek #ifdef LCG_NO_ACCEL 821 1.2.18.2 jdolecek memset(lcgaddr, LCG_BG_COLOR, lcg_xsize * lcg_ysize); 822 1.2.18.2 jdolecek #endif 823 1.2.18.2 jdolecek 824 1.2.18.2 jdolecek for (row = 0; row < lcg_rows; row++) 825 1.2.18.2 jdolecek for (col = 0; col < lcg_cols; col++) { 826 1.2.18.2 jdolecek attr = ss->ss_image[row * lcg_cols + col].attr; 827 1.2.18.2 jdolecek if (attr & LCG_ATTR_REVERSE) { 828 1.2.18.2 jdolecek dot_fg = (attr & LCG_BG_MASK) >> 4; 829 1.2.18.2 jdolecek dot_bg = attr & LCG_FG_MASK; 830 1.2.18.2 jdolecek } else { 831 1.2.18.2 jdolecek dot_fg = attr & LCG_FG_MASK; 832 1.2.18.2 jdolecek dot_bg = (attr & LCG_BG_MASK) >> 4; 833 1.2.18.2 jdolecek } 834 1.2.18.2 jdolecek u_char c = ss->ss_image[row * lcg_cols + col].data; 835 1.2.18.2 jdolecek 836 1.2.18.2 jdolecek if (c < 32) 837 1.2.18.2 jdolecek c = 32; 838 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 839 1.2.18.2 jdolecek renderchar(LCG_FONT_ADDR + (c * lcg_glyph_size), 840 1.2.18.2 jdolecek LCG_FB_ADDR + (row * lcg_onerow) + (col * lcg_font.fontwidth), 841 1.2.18.2 jdolecek lcg_font.fontwidth, lcg_font.fontheight, dot_fg, dot_bg); 842 1.2.18.2 jdolecek #else 843 1.2.18.2 jdolecek for (iter = 0; iter < lcg_font.fontheight; iter++) { 844 1.2.18.2 jdolecek ch = QFONT(c,iter); 845 1.2.18.2 jdolecek for (jter = 0; jter < lcg_font.fontwidth; jter++) { 846 1.2.18.2 jdolecek LCG_ADDR(row, col, iter, jter) = ((ch >> jter) & 1) ? dot_fg : dot_bg; 847 1.2.18.2 jdolecek } 848 1.2.18.2 jdolecek } 849 1.2.18.2 jdolecek #endif 850 1.2.18.2 jdolecek if (attr & LCG_ATTR_UNDERLINE) 851 1.2.18.2 jdolecek for (j = 0; j < lcg_font.fontwidth; j++) 852 1.2.18.2 jdolecek LCG_ADDR(row, col, 853 1.2.18.2 jdolecek lcg_font.fontheight - 1, j) = dot_fg; 854 1.2.18.2 jdolecek } 855 1.2.18.2 jdolecek 856 1.2.18.2 jdolecek cursor = &lcgaddr[(ss->ss_cury * lcg_onerow) + 857 1.2.18.2 jdolecek ((lcg_font.fontheight - 1) * lcg_xsize) + 858 1.2.18.2 jdolecek (ss->ss_curx * lcg_font.fontwidth)]; 859 1.2.18.2 jdolecek cur_fg = ss->ss_cur_fg; 860 1.2.18.2 jdolecek cur_bg = ss->ss_cur_bg; 861 1.2.18.2 jdolecek 862 1.2.18.2 jdolecek curscr = ss; 863 1.2.18.2 jdolecek return (0); 864 1.2.18.2 jdolecek } 865 1.2.18.2 jdolecek 866 1.2.18.2 jdolecek static int 867 1.2.18.2 jdolecek lcg_get_cmap(struct wsdisplay_cmap *p) 868 1.2.18.2 jdolecek { 869 1.2.18.2 jdolecek u_int index = p->index, count = p->count; 870 1.2.18.2 jdolecek int error; 871 1.2.18.2 jdolecek 872 1.2.18.2 jdolecek if (index >= (1 << lcg_depth) || count > (1 << lcg_depth) - index) 873 1.2.18.2 jdolecek return (EINVAL); 874 1.2.18.2 jdolecek 875 1.2.18.2 jdolecek error = copyout(&lcg_cmap.r[index], p->red, count); 876 1.2.18.2 jdolecek if (error) 877 1.2.18.2 jdolecek return error; 878 1.2.18.2 jdolecek error = copyout(&lcg_cmap.g[index], p->green, count); 879 1.2.18.2 jdolecek if (error) 880 1.2.18.2 jdolecek return error; 881 1.2.18.2 jdolecek error = copyout(&lcg_cmap.b[index], p->blue, count); 882 1.2.18.2 jdolecek return error; 883 1.2.18.2 jdolecek } 884 1.2.18.2 jdolecek 885 1.2.18.2 jdolecek static int 886 1.2.18.2 jdolecek lcg_set_cmap(struct wsdisplay_cmap *p) 887 1.2.18.2 jdolecek { 888 1.2.18.2 jdolecek u_int index = p->index, count = p->count; 889 1.2.18.2 jdolecek int error, s; 890 1.2.18.2 jdolecek 891 1.2.18.2 jdolecek if (index >= (1 << lcg_depth) || count > (1 << lcg_depth) - index) 892 1.2.18.2 jdolecek return (EINVAL); 893 1.2.18.2 jdolecek 894 1.2.18.2 jdolecek error = copyin(p->red, &lcg_cmap.r[index], count); 895 1.2.18.2 jdolecek if (error) 896 1.2.18.2 jdolecek return error; 897 1.2.18.2 jdolecek error = copyin(p->green, &lcg_cmap.g[index], count); 898 1.2.18.2 jdolecek if (error) 899 1.2.18.2 jdolecek return error; 900 1.2.18.2 jdolecek error = copyin(p->blue, &lcg_cmap.b[index], count); 901 1.2.18.2 jdolecek if (error) 902 1.2.18.2 jdolecek return error; 903 1.2.18.2 jdolecek 904 1.2.18.2 jdolecek s = spltty(); 905 1.2.18.2 jdolecek /* FIXME: if this is meant to set palette LUT reload has to be triggered too */ 906 1.2.18.2 jdolecek while (count-- > 0) { 907 1.2.18.2 jdolecek lutaddr[index * 8 + 0] = 0; 908 1.2.18.2 jdolecek lutaddr[index * 8 + 1] = index; 909 1.2.18.2 jdolecek lutaddr[index * 8 + 2] = 1; 910 1.2.18.2 jdolecek lutaddr[index * 8 + 3] = lcg_cmap.r[index] >> (lcg_depth & 7); 911 1.2.18.2 jdolecek lutaddr[index * 8 + 4] = 1; 912 1.2.18.2 jdolecek lutaddr[index * 8 + 5] = lcg_cmap.g[index] >> (lcg_depth & 7); 913 1.2.18.2 jdolecek lutaddr[index * 8 + 6] = 1; 914 1.2.18.2 jdolecek lutaddr[index * 8 + 7] = lcg_cmap.b[index] >> (lcg_depth & 7); 915 1.2.18.2 jdolecek ++index; 916 1.2.18.2 jdolecek } 917 1.2.18.2 jdolecek splx(s); 918 1.2.18.2 jdolecek return (0); 919 1.2.18.2 jdolecek } 920 1.2.18.2 jdolecek 921 1.2.18.2 jdolecek cons_decl(lcg); 922 1.2.18.2 jdolecek 923 1.2.18.2 jdolecek void 924 1.2.18.2 jdolecek lcgcninit(struct consdev *cndev) 925 1.2.18.2 jdolecek { 926 1.2.18.2 jdolecek int i; 927 1.2.18.2 jdolecek /* Clear screen */ 928 1.2.18.2 jdolecek memset(lcgaddr, LCG_BG_COLOR, lcg_xsize * lcg_ysize); 929 1.2.18.2 jdolecek 930 1.2.18.2 jdolecek curscr = &lcg_conscreen; 931 1.2.18.2 jdolecek for (i = 0; i < lcg_cols * lcg_rows; ++i) 932 1.2.18.2 jdolecek lcg_conscreen.ss_image[i].attr = 933 1.2.18.2 jdolecek (LCG_BG_COLOR << 4) | LCG_FG_COLOR; 934 1.2.18.2 jdolecek wsdisplay_cnattach(&lcg_stdscreen, &lcg_conscreen, 0, 0, 935 1.2.18.2 jdolecek (LCG_BG_COLOR << 4) | LCG_FG_COLOR); 936 1.2.18.2 jdolecek cn_tab->cn_pri = CN_INTERNAL; 937 1.2.18.2 jdolecek 938 1.2.18.2 jdolecek 939 1.2.18.2 jdolecek #if NDZKBD > 0 940 1.2.18.2 jdolecek dzkbd_cnattach(0); /* Connect keyboard and screen together */ 941 1.2.18.2 jdolecek #endif 942 1.2.18.2 jdolecek } 943 1.2.18.2 jdolecek 944 1.2.18.2 jdolecek /* 945 1.2.18.2 jdolecek * Called very early to setup the glass tty as console. 946 1.2.18.2 jdolecek * Because it's called before the VM system is inited, virtual memory 947 1.2.18.2 jdolecek * for the framebuffer can be stolen directly without disturbing anything. 948 1.2.18.2 jdolecek */ 949 1.2.18.2 jdolecek void 950 1.2.18.2 jdolecek lcgcnprobe(struct consdev *cndev) 951 1.2.18.2 jdolecek { 952 1.2.18.2 jdolecek extern const struct cdevsw wsdisplay_cdevsw; 953 1.2.18.2 jdolecek 954 1.2.18.2 jdolecek if ((vax_boardtype != VAX_BTYP_46) && (vax_boardtype != VAX_BTYP_48)) 955 1.2.18.2 jdolecek return; /* Only for VS 4000/60 and VLC */ 956 1.2.18.2 jdolecek 957 1.2.18.2 jdolecek if (vax_confdata & 0x100) 958 1.2.18.2 jdolecek return; /* Diagnostic console */ 959 1.2.18.2 jdolecek 960 1.2.18.2 jdolecek lcg_init_common(NULL, NULL); 961 1.2.18.2 jdolecek 962 1.2.18.2 jdolecek /* Set up default LUT */ 963 1.2.18.2 jdolecek 964 1.2.18.2 jdolecek cndev->cn_pri = CN_INTERNAL; 965 1.2.18.2 jdolecek cndev->cn_dev = makedev(cdevsw_lookup_major(&wsdisplay_cdevsw), 0); 966 1.2.18.2 jdolecek } 967 1.2.18.2 jdolecek 968 1.2.18.2 jdolecek void 969 1.2.18.2 jdolecek lcg_init_common(struct device *self, struct vsbus_attach_args *va) 970 1.2.18.2 jdolecek { 971 1.2.18.2 jdolecek u_int magic, *lcg_config; 972 1.2.18.2 jdolecek int i; 973 1.2.18.2 jdolecek extern vaddr_t virtual_avail; 974 1.2.18.2 jdolecek long video_conf; 975 1.2.18.2 jdolecek int cookie; 976 1.2.18.2 jdolecek struct wsdisplay_font *wf; 977 1.2.18.2 jdolecek 978 1.2.18.2 jdolecek struct lcg_softc *sc = (void *)self; 979 1.2.18.2 jdolecek bus_dma_segment_t seg; 980 1.2.18.2 jdolecek int rseg, err; 981 1.2.18.2 jdolecek void *fifo_mem_vaddr; 982 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 983 1.2.18.2 jdolecek u_char line; 984 1.2.18.2 jdolecek u_int ch, temp; 985 1.2.18.2 jdolecek #endif 986 1.2.18.2 jdolecek 987 1.2.18.2 jdolecek if (regaddr != NULL) 988 1.2.18.2 jdolecek return; 989 1.2.18.2 jdolecek 990 1.2.18.2 jdolecek /* map LCG registers first */ 991 1.2.18.2 jdolecek if (self != NULL) { 992 1.2.18.2 jdolecek regaddr = (long*)vax_map_physmem(LCG_REG_ADDR, (LCG_REG_SIZE/VAX_NBPG)); 993 1.2.18.2 jdolecek if (regaddr == 0) { 994 1.2.18.2 jdolecek printf("%s: Couldn't allocate register memory.\n", self->dv_xname); 995 1.2.18.2 jdolecek return; 996 1.2.18.2 jdolecek } 997 1.2.18.2 jdolecek } else { 998 1.2.18.2 jdolecek regaddr = (long*)virtual_avail; 999 1.2.18.2 jdolecek virtual_avail += LCG_REG_SIZE; 1000 1.2.18.2 jdolecek ioaccess((vaddr_t)regaddr, LCG_REG_ADDR, (LCG_REG_SIZE/VAX_NBPG)); 1001 1.2.18.2 jdolecek } 1002 1.2.18.2 jdolecek 1003 1.2.18.2 jdolecek /* 1004 1.2.18.2 jdolecek * v = *0x200f0010 & VLC ? 0x07 : 0xf0; 1005 1.2.18.2 jdolecek * switch(v) { 1006 1.2.18.2 jdolecek * 0x05: 1280x1024 1007 1.2.18.2 jdolecek * 0x06: conf & 0x80 ? 1024x768 : 640x480 1008 1.2.18.2 jdolecek * 0x07: conf & 0x80 ? 1024x768 ? 1024x864 1009 1.2.18.2 jdolecek * 0x20: 1024x864 1010 1.2.18.2 jdolecek * 0x40: 1024x768 1011 1.2.18.2 jdolecek * 0x60: 1024x864 1012 1.2.18.2 jdolecek * 0x80: 1280x1024 4BPN 1013 1.2.18.2 jdolecek * 0x90: 1280x1024 8BPN 1014 1.2.18.2 jdolecek * 0xb0: 1280x1024 8BPN 2HD 1015 1.2.18.2 jdolecek */ 1016 1.2.18.2 jdolecek if (self != NULL) { 1017 1.2.18.2 jdolecek lcg_config = (u_int *)vax_map_physmem(LCG_CONFIG, 1); 1018 1.2.18.2 jdolecek } else { 1019 1.2.18.2 jdolecek lcg_config = (u_int *)virtual_avail; 1020 1.2.18.2 jdolecek ioaccess((vaddr_t)lcg_config, LCG_CONFIG, 1); 1021 1.2.18.2 jdolecek } 1022 1.2.18.2 jdolecek magic = *lcg_config & (vax_boardtype == VAX_BTYP_46 ? 0xf0 : 0x07); 1023 1.2.18.2 jdolecek if (self != NULL) { 1024 1.2.18.2 jdolecek vax_unmap_physmem((vaddr_t)lcg_config, 1); 1025 1.2.18.2 jdolecek } else { 1026 1.2.18.2 jdolecek iounaccess((vaddr_t)lcg_config, 1); 1027 1.2.18.2 jdolecek } 1028 1.2.18.2 jdolecek lcg_depth = 8; 1029 1.2.18.2 jdolecek switch(magic) { 1030 1.2.18.2 jdolecek case 0x80: /* KA46 HR 1280x1024 4BPLN */ 1031 1.2.18.2 jdolecek lcg_depth = 4; 1032 1.2.18.2 jdolecek case 0x05: /* KA48 HR 1280x1024 8BPLN */ 1033 1.2.18.2 jdolecek case 0x90: /* KA46 HR 1280x1024 8BPLN */ 1034 1.2.18.2 jdolecek case 0xb0: /* KA46 HR 1280x1024 8BPLN 2HD */ 1035 1.2.18.2 jdolecek lcg_xsize = 1280; 1036 1.2.18.2 jdolecek lcg_ysize = 1024; 1037 1.2.18.2 jdolecek break; 1038 1.2.18.2 jdolecek case 0x06: /* KA48 1024x768 or 640x480 */ 1039 1.2.18.2 jdolecek if (vax_confdata & 0x80) { 1040 1.2.18.2 jdolecek lcg_xsize = 1024; 1041 1.2.18.2 jdolecek lcg_ysize = 768; 1042 1.2.18.2 jdolecek } else { 1043 1.2.18.2 jdolecek lcg_xsize = 640; 1044 1.2.18.2 jdolecek lcg_ysize = 480; 1045 1.2.18.2 jdolecek } 1046 1.2.18.2 jdolecek break; 1047 1.2.18.2 jdolecek case 0x07: /* KA48 1024x768 or 1024x864 */ 1048 1.2.18.2 jdolecek lcg_xsize = 1024; 1049 1.2.18.2 jdolecek lcg_ysize = (vax_confdata & 0x80) ? 768 : 864; 1050 1.2.18.2 jdolecek break; 1051 1.2.18.2 jdolecek case 0x20: /* KA46 1024x864 */ 1052 1.2.18.2 jdolecek case 0x60: /* KA46 1024x864 */ 1053 1.2.18.2 jdolecek lcg_xsize = 1024; 1054 1.2.18.2 jdolecek lcg_ysize = 864; 1055 1.2.18.2 jdolecek break; 1056 1.2.18.2 jdolecek case 0x40: /* KA46 1024x768 */ 1057 1.2.18.2 jdolecek lcg_xsize = 1024; 1058 1.2.18.2 jdolecek lcg_ysize = 768; 1059 1.2.18.2 jdolecek break; 1060 1.2.18.2 jdolecek default: 1061 1.2.18.2 jdolecek panic("LCG model not supported"); 1062 1.2.18.2 jdolecek } 1063 1.2.18.2 jdolecek if (self != NULL) 1064 1.2.18.2 jdolecek aprint_normal("%s: framebuffer size %dx%d, depth %d (magic 0x%x)\n", 1065 1.2.18.2 jdolecek self->dv_xname, lcg_xsize, lcg_ysize, lcg_depth, magic); 1066 1.2.18.2 jdolecek 1067 1.2.18.2 jdolecek wsfont_init(); 1068 1.2.18.2 jdolecek cookie = wsfont_find(NULL, 12, 22, 0, WSDISPLAY_FONTORDER_R2L, 1069 1.2.18.2 jdolecek WSDISPLAY_FONTORDER_L2R, WSFONT_FIND_BITMAP); 1070 1.2.18.2 jdolecek if (cookie == -1) 1071 1.2.18.2 jdolecek cookie = wsfont_find(NULL, 8, 0, 0, WSDISPLAY_FONTORDER_R2L, 0, 1072 1.2.18.2 jdolecek WSFONT_FIND_BITMAP); 1073 1.2.18.2 jdolecek if (cookie == -1) 1074 1.2.18.2 jdolecek cookie = wsfont_find(NULL, 0, 0, 0, WSDISPLAY_FONTORDER_R2L, 1075 1.2.18.2 jdolecek WSDISPLAY_FONTORDER_L2R, WSFONT_FIND_BITMAP); 1076 1.2.18.2 jdolecek if (cookie == -1 || wsfont_lock(cookie, &wf)) 1077 1.2.18.2 jdolecek panic("lcg_common_init: can't load console font"); 1078 1.2.18.2 jdolecek lcg_font = *wf; 1079 1.2.18.2 jdolecek lcg_cols = lcg_xsize / lcg_font.fontwidth; 1080 1.2.18.2 jdolecek lcg_rows = lcg_ysize / lcg_font.fontheight; 1081 1.2.18.2 jdolecek if (self != NULL) { 1082 1.2.18.2 jdolecek aprint_normal("%s: using font %s (%dx%d), ", self->dv_xname, lcg_font.name, 1083 1.2.18.2 jdolecek lcg_font.fontwidth, lcg_font.fontheight); 1084 1.2.18.2 jdolecek aprint_normal("console size: %dx%d\n", lcg_cols, lcg_rows); 1085 1.2.18.2 jdolecek } 1086 1.2.18.2 jdolecek lcg_onerow = lcg_xsize * lcg_font.fontheight; 1087 1.2.18.2 jdolecek lcg_fb_size = lcg_xsize * lcg_ysize; 1088 1.2.18.2 jdolecek lcg_stdscreen.ncols = lcg_cols; 1089 1.2.18.2 jdolecek lcg_stdscreen.nrows = lcg_rows; 1090 1.2.18.2 jdolecek lcg_stdscreen.fontwidth = lcg_font.fontwidth; 1091 1.2.18.2 jdolecek lcg_stdscreen.fontheight = lcg_font.fontheight; 1092 1.2.18.2 jdolecek lcg_glyph_size = lcg_font.stride * lcg_font.fontheight; 1093 1.2.18.2 jdolecek snprintf(lcg_stdscreen_name, sizeof(lcg_stdscreen_name), "%dx%d", lcg_cols, lcg_rows); 1094 1.2.18.2 jdolecek qf = lcg_font.data; 1095 1.2.18.2 jdolecek qf2 = (u_short *)lcg_font.data; 1096 1.2.18.2 jdolecek 1097 1.2.18.2 jdolecek if (self != NULL) { 1098 1.2.18.2 jdolecek lcgaddr = (void *)vax_map_physmem(va->va_paddr, 1099 1.2.18.2 jdolecek ((lcg_fb_size + LCG_FONT_STORAGE_SIZE)/VAX_NBPG)); 1100 1.2.18.2 jdolecek if (lcgaddr == 0) { 1101 1.2.18.2 jdolecek printf("%s: unable to allocate framebuffer memory.\n", self->dv_xname); 1102 1.2.18.2 jdolecek return; 1103 1.2.18.2 jdolecek } 1104 1.2.18.2 jdolecek #ifndef LCG_NO_ACCEL 1105 1.2.18.2 jdolecek fontaddr = lcgaddr + lcg_fb_size; 1106 1.2.18.2 jdolecek 1107 1.2.18.2 jdolecek /* copy font bitmaps */ 1108 1.2.18.2 jdolecek for (ch = 0; ch < 256; ch++) 1109 1.2.18.2 jdolecek for (line = 0; line < lcg_font.fontheight; line++) { 1110 1.2.18.2 jdolecek temp = QFONT(ch, line); 1111 1.2.18.2 jdolecek if (lcg_font.stride == 1) 1112 1.2.18.2 jdolecek fontaddr[(ch * lcg_font.fontheight) + line] = temp; 1113 1.2.18.2 jdolecek else { 1114 1.2.18.2 jdolecek /* stride == 2 */ 1115 1.2.18.2 jdolecek fontaddr[(ch * lcg_font.stride * lcg_font.fontheight) + line] = temp & 0xff; 1116 1.2.18.2 jdolecek fontaddr[(ch * lcg_font.stride * lcg_font.fontheight) + line + 1] = (temp >> 16) & 0xff; 1117 1.2.18.2 jdolecek } 1118 1.2.18.2 jdolecek } 1119 1.2.18.2 jdolecek #endif 1120 1.2.18.2 jdolecek 1121 1.2.18.2 jdolecek lutaddr = (void *)vax_map_physmem(LCG_LUT_ADDR, (LCG_LUT_SIZE/VAX_NBPG)); 1122 1.2.18.2 jdolecek if (lutaddr == 0) { 1123 1.2.18.2 jdolecek printf("%s: unable to allocate LUT memory.\n", self->dv_xname); 1124 1.2.18.2 jdolecek return; 1125 1.2.18.2 jdolecek } 1126 1.2.18.2 jdolecek fifoaddr = (long*)vax_map_physmem(LCG_FIFO_WIN_ADDR, (LCG_FIFO_WIN_SIZE/VAX_NBPG)); 1127 1.2.18.2 jdolecek if (regaddr == 0) { 1128 1.2.18.2 jdolecek printf("%s: unable to map FIFO window\n", self->dv_xname); 1129 1.2.18.2 jdolecek return; 1130 1.2.18.2 jdolecek } 1131 1.2.18.2 jdolecek 1132 1.2.18.2 jdolecek /* allocate contiguous physical memory block for FIFO */ 1133 1.2.18.2 jdolecek err = bus_dmamem_alloc(va->va_dmat, LCG_FIFO_SIZE, 1134 1.2.18.2 jdolecek LCG_FIFO_ALIGN, 0, &seg, 1, &rseg, BUS_DMA_NOWAIT); 1135 1.2.18.2 jdolecek if (err) { 1136 1.2.18.2 jdolecek printf("%s: unable to allocate FIFO memory block, err = %d\n", 1137 1.2.18.2 jdolecek self->dv_xname, err); 1138 1.2.18.2 jdolecek return; 1139 1.2.18.2 jdolecek } 1140 1.2.18.2 jdolecek 1141 1.2.18.2 jdolecek err = bus_dmamem_map(va->va_dmat, &seg, rseg, LCG_FIFO_SIZE, 1142 1.2.18.2 jdolecek &fifo_mem_vaddr, BUS_DMA_NOWAIT); 1143 1.2.18.2 jdolecek if (err) { 1144 1.2.18.2 jdolecek printf("%s: unable to map FIFO memory block, err = %d\n", 1145 1.2.18.2 jdolecek self->dv_xname, err); 1146 1.2.18.2 jdolecek bus_dmamem_free(va->va_dmat, &seg, rseg); 1147 1.2.18.2 jdolecek return; 1148 1.2.18.2 jdolecek } 1149 1.2.18.2 jdolecek 1150 1.2.18.2 jdolecek err = bus_dmamap_create(va->va_dmat, LCG_FIFO_SIZE, rseg, 1151 1.2.18.2 jdolecek LCG_FIFO_SIZE, 0, BUS_DMA_NOWAIT, &sc->sc_dm); 1152 1.2.18.2 jdolecek if (err) { 1153 1.2.18.2 jdolecek printf("%s: unable to create DMA map, err = %d\n", self->dv_xname, err); 1154 1.2.18.2 jdolecek bus_dmamem_unmap(va->va_dmat, fifo_mem_vaddr, LCG_FIFO_SIZE); 1155 1.2.18.2 jdolecek bus_dmamem_free(va->va_dmat, &seg, rseg); 1156 1.2.18.2 jdolecek return; 1157 1.2.18.2 jdolecek } 1158 1.2.18.2 jdolecek 1159 1.2.18.2 jdolecek err = bus_dmamap_load(va->va_dmat, sc->sc_dm, fifo_mem_vaddr, 1160 1.2.18.2 jdolecek LCG_FIFO_SIZE, NULL, BUS_DMA_NOWAIT); 1161 1.2.18.2 jdolecek if (err) { 1162 1.2.18.2 jdolecek printf("%s: unable to load DMA map, err = %d\n", self->dv_xname, err); 1163 1.2.18.2 jdolecek bus_dmamap_destroy(va->va_dmat, sc->sc_dm); 1164 1.2.18.2 jdolecek bus_dmamem_unmap(va->va_dmat, fifo_mem_vaddr, LCG_FIFO_SIZE); 1165 1.2.18.2 jdolecek bus_dmamem_free(va->va_dmat, &seg, rseg); 1166 1.2.18.2 jdolecek return; 1167 1.2.18.2 jdolecek } 1168 1.2.18.2 jdolecek 1169 1.2.18.2 jdolecek /* initialize LCG hardware */ 1170 1.2.18.2 jdolecek LCG_REG(LCG_REG_GRAPHICS_CONTROL) = 0xd8000000; /* gfx reset, FIFO and AG enable */ 1171 1.2.18.2 jdolecek // LCG_REG(LCG_REG_WRITE_PROTECT_LOW_HIGH) = (((LCG_FB_ADDR + lcg_fb_size) & 0xffff0000) | (LCG_FB_ADDR >> 16)); 1172 1.2.18.2 jdolecek LCG_REG(LCG_REG_WRITE_PROTECT_LOW_HIGH) = 0xffff0000; 1173 1.2.18.2 jdolecek LCG_REG(LCG_REG_FIFO_BASE) = sc->sc_dm->dm_segs[0].ds_addr; 1174 1.2.18.2 jdolecek LCG_REG(LCG_REG_FIFO_BASE2) = sc->sc_dm->dm_segs[0].ds_addr; 1175 1.2.18.2 jdolecek LCG_REG(LCG_REG_FIFO_MASKS) = 0xffff; 1176 1.2.18.2 jdolecek LCG_REG(LCG_REG_FIFO_SAVE_HEAD_OFFSET) = sc->sc_dm->dm_segs[0].ds_addr; 1177 1.2.18.2 jdolecek // LCG_REG(LCG_REG_GRAPHICS_INT_STATUS) = 0; 1178 1.2.18.2 jdolecek // LCG_REG(LCG_REG_GRAPHICS_CONTROL) = 0x50000000; /* FIFO and AG enable */ 1179 1.2.18.2 jdolecek LCG_REG(LCG_REG_GRAPHICS_INT_STATUS) = 0xffffffff; 1180 1.2.18.2 jdolecek LCG_REG(LCG_REG_GRAPHICS_INT_SET_ENABLE) = 0; 1181 1.2.18.2 jdolecek LCG_REG(LCG_REG_GRAPHICS_INT_CLR_ENABLE) = 0xffffffff; 1182 1.2.18.2 jdolecek LCG_REG(LCG_REG_LCG_GO) = 3; /* FIFO and AG go */ 1183 1.2.18.2 jdolecek // LCG_REG(LCG_REG_BREAKPT_ADDRESS) = 0x2fffffff; 1184 1.2.18.2 jdolecek 1185 1.2.18.2 jdolecek } else { 1186 1.2.18.2 jdolecek lcgaddr = (void *)virtual_avail; 1187 1.2.18.2 jdolecek virtual_avail += lcg_fb_size + LCG_FONT_STORAGE_SIZE; 1188 1.2.18.2 jdolecek ioaccess((vaddr_t)lcgaddr, LCG_FB_ADDR, (lcg_fb_size/VAX_NBPG)); 1189 1.2.18.2 jdolecek 1190 1.2.18.2 jdolecek lutaddr = (void *)virtual_avail; 1191 1.2.18.2 jdolecek virtual_avail += LCG_LUT_SIZE; 1192 1.2.18.2 jdolecek ioaccess((vaddr_t)lutaddr, LCG_LUT_ADDR, (LCG_LUT_SIZE/VAX_NBPG)); 1193 1.2.18.2 jdolecek 1194 1.2.18.2 jdolecek fifoaddr = (long*)virtual_avail; 1195 1.2.18.2 jdolecek virtual_avail += LCG_FIFO_WIN_SIZE; 1196 1.2.18.2 jdolecek ioaccess((vaddr_t)fifoaddr, LCG_FIFO_WIN_ADDR, (LCG_FIFO_WIN_SIZE/VAX_NBPG)); 1197 1.2.18.2 jdolecek } 1198 1.2.18.2 jdolecek 1199 1.2.18.2 jdolecek bzero(lutaddr, LCG_LUT_SIZE); 1200 1.2.18.2 jdolecek for (i = 0; i < 8; ++i) { 1201 1.2.18.2 jdolecek lcg_cmap.r[i] = lcg_default_cmap.r[i]; 1202 1.2.18.2 jdolecek lcg_cmap.g[i] = lcg_default_cmap.g[i]; 1203 1.2.18.2 jdolecek lcg_cmap.b[i] = lcg_default_cmap.b[i]; 1204 1.2.18.2 jdolecek lutaddr[i * 8 + 1] = i; 1205 1.2.18.2 jdolecek lutaddr[i * 8 + 2] = 1; 1206 1.2.18.2 jdolecek lutaddr[i * 8 + 3] = lcg_cmap.r[i] >> (lcg_depth & 7); 1207 1.2.18.2 jdolecek lutaddr[i * 8 + 4] = 1; 1208 1.2.18.2 jdolecek lutaddr[i * 8 + 5] = lcg_cmap.g[i] >> (lcg_depth & 7); 1209 1.2.18.2 jdolecek lutaddr[i * 8 + 6] = 1; 1210 1.2.18.2 jdolecek lutaddr[i * 8 + 7] = lcg_cmap.b[i] >> (lcg_depth & 7); 1211 1.2.18.2 jdolecek } 1212 1.2.18.2 jdolecek 1213 1.2.18.2 jdolecek /* 1214 1.2.18.2 jdolecek * 0xf100165b 4000/60 1215 1.2.18.2 jdolecek * 1111 0001 0000 0000 0001 0110 0101 1011 1216 1.2.18.2 jdolecek * vvvv vvvv vvvv vvvv vvvv vvvv vvvv vvvv 1217 1.2.18.2 jdolecek * 3322 2222 2222 1111 1111 11 1218 1.2.18.2 jdolecek * 1098 7654 3210 9876 5432 1098 7654 3210 1219 1.2.18.2 jdolecek * 1220 1.2.18.2 jdolecek * 0xf1001d7b 4000/VLC 1221 1.2.18.2 jdolecek * 1111 0001 0000 0000 0001 1101 0111 1011 1222 1.2.18.2 jdolecek * vvvv vvvv vvvv vvvv vvvv vvvv vvvv vvvv 1223 1.2.18.2 jdolecek * 3322 2222 2222 1111 1111 11 1224 1.2.18.2 jdolecek * 1098 7654 3210 9876 5432 1098 7654 3210 1225 1.2.18.2 jdolecek * 1226 1.2.18.2 jdolecek * 31-30 11 Vertical state 1227 1.2.18.2 jdolecek * 29-38 11 Horizontal state 1228 1.2.18.2 jdolecek * 27-26 00 1229 1.2.18.2 jdolecek * 25 0 console LUT select 1230 1.2.18.2 jdolecek * 24 1 control LUT select 1231 1.2.18.2 jdolecek * 23 0 1232 1.2.18.2 jdolecek * 22 0 cursor active 1233 1.2.18.2 jdolecek * 21-16 000000 1234 1.2.18.2 jdolecek * 15 0 video subsystem reset 1235 1.2.18.2 jdolecek * 14 0 1236 1.2.18.2 jdolecek * 13 0 LUT load size 2KB 1237 1.2.18.2 jdolecek * 12 1 enable H sync 1238 1.2.18.2 jdolecek * 11 0 Full LUT load 1 1239 1.2.18.2 jdolecek * 10 1 video clock select 1240 1.2.18.2 jdolecek * 9- 8 10 memory refresh rate 01 1241 1.2.18.2 jdolecek * 7- 6 01 video refresh rate 1242 1.2.18.2 jdolecek * 5 0 load select 1 1243 1.2.18.2 jdolecek * 4 1 read cursor output 1244 1.2.18.2 jdolecek * 3 1 LUT load enable 1245 1.2.18.2 jdolecek * 2 0 cursor enable 1246 1.2.18.2 jdolecek * 1 1 video enable 1247 1.2.18.2 jdolecek * 0 1 refresh clock enable 1248 1.2.18.2 jdolecek */ 1249 1.2.18.2 jdolecek /* prepare video_config reg for LUT relaod */ 1250 1.2.18.2 jdolecek video_conf 1251 1.2.18.2 jdolecek = (3 << 30) /* vertical state */ 1252 1.2.18.2 jdolecek | (3 << 28) /* horizontal state */ 1253 1.2.18.2 jdolecek | (0 << 26) /* unused */ 1254 1.2.18.2 jdolecek | (0 << 25) /* console LUT select */ 1255 1.2.18.2 jdolecek | (0 << 24) /* control LUT select */ 1256 1.2.18.2 jdolecek | (0 << 23) /* unused */ 1257 1.2.18.2 jdolecek | (0 << 22) /* cursor active */ 1258 1.2.18.2 jdolecek | (0 << 16) /* current cursor scanline showing */ 1259 1.2.18.2 jdolecek | (0 << 15) /* video subsystem reset */ 1260 1.2.18.2 jdolecek | (0 << 14) /* unused */ 1261 1.2.18.2 jdolecek | (1 << 13) /* LUT load size 2 KB */ 1262 1.2.18.2 jdolecek | (1 << 12) /* enable horizontal sync */ 1263 1.2.18.2 jdolecek | (1 << 10) /* video clock select */ 1264 1.2.18.2 jdolecek | (1 << 6) /* video refresh select */ 1265 1.2.18.2 jdolecek | (1 << 4) /* read curosr output */ 1266 1.2.18.2 jdolecek | (1 << 3) /* LUT load enable */ 1267 1.2.18.2 jdolecek | (0 << 2) /* cursor enable */ 1268 1.2.18.2 jdolecek | (1 << 1) /* video enable */ 1269 1.2.18.2 jdolecek | (1 << 0); /* refresh clock enable */ 1270 1.2.18.2 jdolecek /* FIXME needs updating for all supported models */ 1271 1.2.18.2 jdolecek if (lcg_xsize == 1280) { /* 4000/60 HR 4PLN */ 1272 1.2.18.2 jdolecek video_conf |= (0 << 11); /* split LUT load */ 1273 1.2.18.2 jdolecek video_conf |= (2 << 8); /* memory refresh select */ 1274 1.2.18.2 jdolecek video_conf |= (0 << 5); /* split shift register load */ 1275 1.2.18.2 jdolecek } else { /* 4000/VLC LR 8PLN */ 1276 1.2.18.2 jdolecek video_conf |= (1 << 11); /* Full LUT load */ 1277 1.2.18.2 jdolecek video_conf |= (1 << 8); /* memory refresh select */ 1278 1.2.18.2 jdolecek video_conf |= (1 << 5); /* split shift register load */ 1279 1.2.18.2 jdolecek } 1280 1.2.18.2 jdolecek 1281 1.2.18.2 jdolecek LCG_REG(LCG_REG_VIDEO_CONFIG) = video_conf; 1282 1.2.18.2 jdolecek /* vital !!! */ 1283 1.2.18.2 jdolecek LCG_REG(LCG_REG_LUT_CONSOLE_SEL) = 1; 1284 1.2.18.2 jdolecek LCG_REG(LCG_REG_LUT_COLOR_BASE_W) = LCG_LUT_OFFSET; 1285 1.2.18.2 jdolecek 1286 1.2.18.2 jdolecek delay(1000); 1287 1.2.18.2 jdolecek LCG_REG(LCG_REG_LUT_CONSOLE_SEL) = 0; 1288 1.2.18.2 jdolecek 1289 1.2.18.2 jdolecek #ifdef LCG_DEBUG 1290 1.2.18.2 jdolecek if (self != NULL) 1291 1.2.18.2 jdolecek printf("%s: video config register set 0x%08lx\n", video_conf, self->dv_xname); 1292 1.2.18.2 jdolecek #endif 1293 1.2.18.2 jdolecek } 1294
Indexes created Thu Oct 02 14:10:14 GMT 2025