1 /* $NetBSD: ite_cv3d.c,v 1.2 1997/11/10 12:17:20 is Exp $ */ 2 3 /* 4 * Copyright (c) 1995 Michael Teske 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 3. All advertising materials mentioning features or use of this software 16 * must display the following acknowledgement: 17 * This product includes software developed by Christian E. Hopps, 18 * Ezra Story, Kari Mettinen, Markus Wild, Lutz Vieweg 19 * and Michael Teske. 20 * 4. The name of the author may not be used to endorse or promote products 21 * derived from this software without specific prior written permission 22 * 23 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR 24 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES 25 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. 26 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, 27 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT 28 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, 29 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY 30 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT 31 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF 32 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. 33 */ 34 35 /* 36 * This code is based on ite_cl.c and ite_rh.c by 37 * Ezra Story, Kari Mettinen, Markus Wild, Lutz Vieweg. 38 */ 39 40 #include "grfcv3d.h" 41 #if NGRFCV3D > 0 42 43 #include <sys/param.h> 44 #include <sys/conf.h> 45 #include <sys/proc.h> 46 #include <sys/device.h> 47 #include <sys/ioctl.h> 48 #include <sys/tty.h> 49 #include <sys/systm.h> 50 #include <sys/queue.h> 51 #include <sys/termios.h> 52 #include <sys/malloc.h> 53 #include <dev/cons.h> 54 #include <machine/cpu.h> 55 #include <amiga/dev/itevar.h> 56 #include <amiga/dev/iteioctl.h> 57 #include <amiga/amiga/device.h> 58 #include <amiga/dev/grfioctl.h> 59 #include <amiga/dev/grfvar.h> 60 #include <amiga/dev/grf_cv3dreg.h> 61 62 void cv3d_ite_init __P((struct ite_softc *)); 63 void cv3d_ite_deinit __P((struct ite_softc *)); 64 static void cv3d_cursor __P((struct ite_softc *, int)); 65 static void cv3d_putc __P((struct ite_softc *, int, int, int, int)); 66 static void cv3d_clear __P((struct ite_softc *, int, int, int, int)); 67 static void cv3d_scroll __P((struct ite_softc *, int, int, int, int)); 68 69 /* 70 * called from grf_cv3d to return console priority 71 */ 72 int 73 grfcv3d_cnprobe() 74 { 75 static int done; 76 int rv; 77 78 if (done == 0) 79 #ifdef CV3DCONSOLE 80 rv = CN_INTERNAL; 81 #else 82 rv = CN_DEAD; 83 #endif 84 else 85 #ifdef CV3DCONSOLE 86 rv = CN_NORMAL; 87 #else 88 rv = CN_DEAD; 89 #endif 90 done = 1; 91 return(rv); 92 } 93 94 95 /* 96 * called from grf_cv3d to init ite portion of 97 * grf_softc struct 98 */ 99 void 100 grfcv3d_iteinit(gp) 101 struct grf_softc *gp; 102 { 103 gp->g_itecursor = cv3d_cursor; 104 gp->g_iteputc = cv3d_putc; 105 gp->g_iteclear = cv3d_clear; 106 gp->g_itescroll = cv3d_scroll; 107 gp->g_iteinit = cv3d_ite_init; 108 gp->g_itedeinit = cv3d_ite_deinit; 109 } 110 111 112 void 113 cv3d_ite_deinit(ip) 114 struct ite_softc *ip; 115 { 116 ip->flags &= ~ITE_INITED; 117 } 118 119 120 static unsigned short cv3d_rowc[MAXCOLS*(MAXROWS+1)]; 121 122 /* 123 * Console buffer to avoid the slow reading from gfx mem. 124 */ 125 126 static unsigned short *console_buffer; 127 128 void 129 cv3d_ite_init(ip) 130 register struct ite_softc *ip; 131 { 132 struct grfcv3dtext_mode *md; 133 int i; 134 static char first = 1; 135 volatile unsigned short *fb = (volatile unsigned short *)ip->grf->g_fbkva; 136 unsigned short *buffer; 137 138 139 ip->priv = ip->grf->g_data; 140 md = (struct grfcv3dtext_mode *) ip->grf->g_data; 141 142 ip->cols = md->cols; 143 ip->rows = md->rows; 144 145 /* alloc buffers */ 146 147 #if 0 /* XXX malloc seems not to work in early init :( */ 148 if (cv3d_rowc) 149 free(cv3d_rowc, M_DEVBUF); 150 151 /* alloc all in one */ 152 cv3d_rowc = malloc(sizeof(short) * (ip->rows + 1) * (ip->cols + 2), 153 M_DEVBUF, M_WAITOK); 154 if (!cv3d_rowc) 155 panic("No buffers for ite_cv3d!"); 156 #endif 157 158 console_buffer = cv3d_rowc + ip->rows + 1; 159 160 161 for (i = 0; i < ip->rows; i++) 162 cv3d_rowc[i] = i * ip->cols; 163 164 if (first) { 165 for (i = 0; i < ip->rows * ip->cols; i++) 166 console_buffer[i] = 0x2007; 167 first = 0; 168 } else { /* restore console */ 169 buffer = console_buffer; 170 for (i = 0; i < ip->rows * ip->cols; i++) { 171 *fb++ = *buffer++; 172 *fb++; 173 } 174 } 175 } 176 177 178 void 179 cv3d_cursor(ip, flag) 180 struct ite_softc *ip; 181 int flag; 182 { 183 volatile caddr_t ba = ip->grf->g_regkva; 184 185 switch (flag) { 186 case DRAW_CURSOR: 187 /*WCrt(ba, CRT_ID_CURSOR_START, & ~0x20); */ 188 case MOVE_CURSOR: 189 flag = ip->curx + ip->cury * ip->cols; 190 WCrt(ba, CRT_ID_CURSOR_LOC_LOW, flag & 0xff); 191 WCrt(ba, CRT_ID_CURSOR_LOC_HIGH, flag >> 8); 192 ip->cursorx = ip->curx; 193 ip->cursory = ip->cury; 194 break; 195 case ERASE_CURSOR: 196 /*WCrt(ba, CRT_ID_CURSOR_START, | 0x20); */ 197 case START_CURSOROPT: 198 case END_CURSOROPT: 199 default: 200 break; 201 } 202 } 203 204 205 void 206 cv3d_putc(ip, c, dy, dx, mode) 207 struct ite_softc *ip; 208 int c; 209 int dy; 210 int dx; 211 int mode; 212 { 213 caddr_t fb = ip->grf->g_fbkva; 214 unsigned char attr; 215 unsigned char *cp; 216 217 attr = (unsigned char) ((mode & ATTR_INV) ? (0x70) : (0x07)); 218 if (mode & ATTR_UL) attr = 0x01; 219 if (mode & ATTR_BOLD) attr |= 0x08; 220 if (mode & ATTR_BLINK) attr |= 0x80; 221 222 cp = fb + ((cv3d_rowc[dy] + dx) << 2); /* *4 */ 223 *cp++ = (unsigned char) c; 224 *cp = (unsigned char) attr; 225 226 cp = (unsigned char *) &console_buffer[cv3d_rowc[dy]+dx]; 227 *cp++ = (unsigned char) c; 228 *cp = (unsigned char) attr; 229 } 230 231 232 void 233 cv3d_clear(ip, sy, sx, h, w) 234 struct ite_softc *ip; 235 int sy; 236 int sx; 237 int h; 238 int w; 239 { 240 /* cv3d_clear and cv3d_scroll both rely on ite passing arguments 241 * which describe continuous regions. For a VT200 terminal, 242 * this is safe behavior. 243 */ 244 unsigned short *dst; 245 int len; 246 247 dst = (unsigned short *) (ip->grf->g_fbkva + (((sy * ip->cols) + sx) << 2)); 248 249 for (len = w * h; len > 0 ; len--) { 250 *dst = 0x2007; 251 dst +=2; 252 } 253 254 dst = &console_buffer[(sy * ip->cols) + sx]; 255 for (len = w * h; len > 0 ; len--) { 256 *dst++ = 0x2007; 257 } 258 } 259 260 void 261 cv3d_scroll(ip, sy, sx, count, dir) 262 struct ite_softc *ip; 263 int sy; 264 int sx; 265 int count; 266 int dir; 267 { 268 unsigned short *src, *dst, *dst2; 269 int i; 270 int len; 271 272 src = (unsigned short *)(ip->grf->g_fbkva + (cv3d_rowc[sy] << 2)); 273 274 switch (dir) { 275 case SCROLL_UP: 276 dst = src - ((cv3d_rowc[count])<<1); 277 278 len = cv3d_rowc[(ip->bottom_margin + 1 - sy)]; 279 src = &console_buffer[cv3d_rowc[sy]]; 280 281 if (count > sy) { /* boundary checks */ 282 dst2 = console_buffer; 283 dst = (unsigned short *)(ip->grf->g_fbkva); 284 len -= cv3d_rowc[(count - sy)]; 285 src += cv3d_rowc[(count - sy)]; 286 } else 287 dst2 = &console_buffer[cv3d_rowc[(sy-count)]]; 288 289 bcopy (src, dst2, len << 1); 290 291 for (i = 0; i < len; i++) { 292 *dst++ = *dst2++; 293 dst++; 294 } 295 break; 296 case SCROLL_DOWN: 297 dst = src + ((cv3d_rowc[count]) << 1); 298 299 len = cv3d_rowc[(ip->bottom_margin + 1 - (sy + count))]; 300 src = &console_buffer[cv3d_rowc[sy]]; 301 dst2 = &console_buffer[cv3d_rowc[(sy + count)]]; 302 303 if (len < 0) 304 return; /* do some boundary check */ 305 306 bcopy (src, dst2, len << 1); 307 308 for (i = 0; i < len; i++) { 309 *dst++ = *dst2++; 310 dst++; 311 } 312 break; 313 case SCROLL_RIGHT: 314 dst = src + ((sx+count)<<1); 315 src = &console_buffer[cv3d_rowc[sy] + sx]; 316 len = ip->cols - (sx + count); 317 dst2 = &console_buffer[cv3d_rowc[sy] + sx + count]; 318 bcopy (src, dst2, len << 1); 319 320 for (i = 0; i < len; i++) { 321 *dst++ = *dst2++; 322 dst++; 323 } 324 break; 325 case SCROLL_LEFT: 326 dst = src + ((sx - count)<<1); 327 src = &console_buffer[cv3d_rowc[sy] + sx]; 328 len = ip->cols - sx; 329 dst2 = &console_buffer[cv3d_rowc[sy] + sx - count]; 330 bcopy (src, dst2, len << 1); 331 332 for (i = 0; i < len; i++) { 333 *dst++ = *dst2++; 334 dst++; 335 } 336 } 337 } 338 339 #endif /* NGRFCV3D */ 340