ite_rt.c revision 1.9
1 1.5 chopps /* 2 1.9 chopps * $Id: ite_rt.c,v 1.9 1994/05/08 05:53:20 chopps Exp $ 3 1.5 chopps */ 4 1.5 chopps 5 1.6 chopps #include <sys/param.h> 6 1.6 chopps #include <sys/conf.h> 7 1.6 chopps #include <sys/proc.h> 8 1.9 chopps #include <sys/device.h> 9 1.6 chopps #include <sys/ioctl.h> 10 1.6 chopps #include <sys/tty.h> 11 1.6 chopps #include <sys/systm.h> 12 1.7 chopps #include <dev/cons.h> 13 1.9 chopps #include <machine/cpu.h> 14 1.9 chopps #include <amiga/amiga/device.h> 15 1.6 chopps #include <amiga/dev/itevar.h> 16 1.6 chopps #include <amiga/dev/grfioctl.h> 17 1.6 chopps #include <amiga/dev/grfvar.h> 18 1.6 chopps #include <amiga/dev/grf_rtreg.h> 19 1.7 chopps 20 1.8 chopps int retina_console = 1; 21 1.7 chopps 22 1.9 chopps void retina_cursor __P((struct ite_softc *,int)); 23 1.9 chopps void retina_scroll __P((struct ite_softc *,int,int,int,int)); 24 1.9 chopps void retina_deinit __P((struct ite_softc *)); 25 1.9 chopps void retina_clear __P((struct ite_softc *,int,int,int,int)); 26 1.9 chopps void retina_putc __P((struct ite_softc *,int,int,int,int)); 27 1.9 chopps void retina_init __P((struct ite_softc *)); 28 1.9 chopps 29 1.7 chopps /* 30 1.9 chopps * this function is called from grf_rt to init the grf_softc->g_conpri 31 1.9 chopps * field each time a retina is attached. 32 1.7 chopps */ 33 1.7 chopps int 34 1.9 chopps grfrt_cnprobe() 35 1.7 chopps { 36 1.9 chopps static int done; 37 1.9 chopps int rv; 38 1.9 chopps 39 1.9 chopps if (retina_console && done == 0) 40 1.9 chopps rv = CN_INTERNAL; 41 1.9 chopps else 42 1.9 chopps rv = CN_NORMAL; 43 1.9 chopps done = 1; 44 1.9 chopps return(rv); 45 1.7 chopps } 46 1.1 mw 47 1.9 chopps /* 48 1.9 chopps * init the required fields in the grf_softc struct for a 49 1.9 chopps * grf to function as an ite. 50 1.9 chopps */ 51 1.9 chopps void 52 1.9 chopps grfrt_iteinit(gp) 53 1.9 chopps struct grf_softc *gp; 54 1.1 mw { 55 1.9 chopps gp->g_iteinit = retina_init; 56 1.9 chopps gp->g_itedeinit = retina_deinit; 57 1.9 chopps gp->g_iteclear = retina_clear; 58 1.9 chopps gp->g_iteputc = retina_putc; 59 1.9 chopps gp->g_itescroll = retina_scroll; 60 1.9 chopps gp->g_itecursor = retina_cursor; 61 1.9 chopps } 62 1.1 mw 63 1.9 chopps void 64 1.9 chopps retina_init(ip) 65 1.9 chopps struct ite_softc *ip; 66 1.9 chopps { 67 1.9 chopps struct MonDef *md; 68 1.1 mw 69 1.9 chopps ip->priv = ip->grf->g_data; 70 1.9 chopps md = (struct MonDef *) ip->priv; 71 1.1 mw 72 1.9 chopps ip->cols = md->TX; 73 1.9 chopps ip->rows = md->TY; 74 1.1 mw } 75 1.1 mw 76 1.1 mw 77 1.1 mw void retina_cursor(struct ite_softc *ip, int flag) 78 1.1 mw { 79 1.1 mw volatile u_char *ba = ip->grf->g_regkva; 80 1.1 mw 81 1.1 mw if (flag == ERASE_CURSOR) 82 1.1 mw { 83 1.1 mw /* disable cursor */ 84 1.1 mw WCrt (ba, CRT_ID_CURSOR_START, RCrt (ba, CRT_ID_CURSOR_START) | 0x20); 85 1.1 mw } 86 1.1 mw else 87 1.1 mw { 88 1.1 mw int pos = ip->curx + ip->cury * ip->cols; 89 1.1 mw 90 1.1 mw /* make sure to enable cursor */ 91 1.1 mw WCrt (ba, CRT_ID_CURSOR_START, RCrt (ba, CRT_ID_CURSOR_START) & ~0x20); 92 1.1 mw 93 1.1 mw /* and position it */ 94 1.1 mw WCrt (ba, CRT_ID_CURSOR_LOC_HIGH, (u_char) (pos >> 8)); 95 1.1 mw WCrt (ba, CRT_ID_CURSOR_LOC_LOW, (u_char) pos); 96 1.1 mw 97 1.1 mw ip->cursorx = ip->curx; 98 1.1 mw ip->cursory = ip->cury; 99 1.1 mw } 100 1.1 mw } 101 1.1 mw 102 1.1 mw 103 1.1 mw 104 1.1 mw static void screen_up (struct ite_softc *ip, int top, int bottom, int lines) 105 1.1 mw { 106 1.1 mw volatile u_char * ba = ip->grf->g_regkva; 107 1.1 mw volatile u_char * fb = ip->grf->g_fbkva; 108 1.1 mw const struct MonDef * md = (struct MonDef *) ip->priv; 109 1.3 mw #ifdef BANKEDDEVPAGER 110 1.3 mw int bank; 111 1.3 mw #endif 112 1.1 mw 113 1.1 mw /* do some bounds-checking here.. */ 114 1.1 mw if (top >= bottom) 115 1.1 mw return; 116 1.1 mw 117 1.1 mw if (top + lines >= bottom) 118 1.1 mw { 119 1.1 mw retina_clear (ip, top, 0, bottom - top, ip->cols); 120 1.1 mw return; 121 1.1 mw } 122 1.1 mw 123 1.1 mw 124 1.3 mw #ifdef BANKEDDEVPAGER 125 1.3 mw /* make sure to save/restore active bank (and if it's only 126 1.3 mw for tests of the feature in text-mode..) */ 127 1.3 mw bank = (RSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO) 128 1.3 mw | (RSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI) << 8)); 129 1.3 mw #endif 130 1.3 mw 131 1.1 mw /* the trick here is to use a feature of the NCR chip. It can 132 1.1 mw optimize data access in various read/write modes. One of 133 1.1 mw the modes is able to read/write from/to different zones. 134 1.1 mw 135 1.1 mw Thus, by setting the read-offset to lineN, and the write-offset 136 1.1 mw to line0, we just cause read/write cycles for all characters 137 1.1 mw up to the last line, and have the chip transfer the data. The 138 1.1 mw `addqb' are the cheapest way to cause read/write cycles (DONT 139 1.1 mw use `tas' on the Amiga!), their results are completely ignored 140 1.1 mw by the NCR chip, it just replicates what it just read. */ 141 1.1 mw 142 1.1 mw /* write to primary, read from secondary */ 143 1.1 mw WSeq (ba, SEQ_ID_EXTENDED_MEM_ENA, (RSeq(ba, SEQ_ID_EXTENDED_MEM_ENA) & 0x1f) | 0 ); 144 1.1 mw /* clear extended chain4 mode */ 145 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR, RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) & ~0x02); 146 1.1 mw 147 1.1 mw /* set write mode 1, "[...] data in the read latches is written 148 1.1 mw to memory during CPU memory write cycles. [...]" */ 149 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 1); 150 1.1 mw 151 1.1 mw { 152 1.1 mw /* write to line TOP */ 153 1.1 mw long toploc = top * (md->TX / 16); 154 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO, ((unsigned char)toploc)); 155 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI, ((unsigned char)(toploc >> 8))); 156 1.1 mw } 157 1.1 mw { 158 1.1 mw /* read from line TOP + LINES */ 159 1.1 mw long fromloc = (top+lines) * (md->TX / 16); 160 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_LO, ((unsigned char)fromloc)) ; 161 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_HI, ((unsigned char)(fromloc >> 8))) ; 162 1.1 mw } 163 1.1 mw { 164 1.1 mw unsigned char * p = (unsigned char *) fb; 165 1.1 mw /* transfer all characters but LINES lines, unroll by 16 */ 166 1.1 mw short x = (1 + bottom - (top + lines)) * (md->TX / 16) - 1; 167 1.1 mw do { 168 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 169 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 170 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 171 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 172 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 173 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 174 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 175 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 176 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 177 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 178 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 179 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 180 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 181 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 182 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 183 1.1 mw asm volatile("addqb #1,%0@+" : "=a" (p) : "0" (p)); 184 1.1 mw } while (x--); 185 1.1 mw } 186 1.1 mw 187 1.1 mw /* reset to default values */ 188 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_HI, 0); 189 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_LO, 0); 190 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI, 0); 191 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO, 0); 192 1.1 mw /* write mode 0 */ 193 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 0); 194 1.1 mw /* extended chain4 enable */ 195 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR , RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) | 0x02); 196 1.1 mw /* read/write to primary on A0, secondary on B0 */ 197 1.1 mw WSeq (ba, SEQ_ID_EXTENDED_MEM_ENA, (RSeq(ba, SEQ_ID_EXTENDED_MEM_ENA) & 0x1f) | 0x40 ); 198 1.1 mw 199 1.1 mw 200 1.1 mw /* fill the free lines with spaces */ 201 1.1 mw 202 1.1 mw { /* feed latches with value */ 203 1.1 mw unsigned short * f = (unsigned short *) fb; 204 1.1 mw 205 1.1 mw f += (1 + bottom - lines) * md->TX * 2; 206 1.1 mw *f = 0x2010; 207 1.1 mw { 208 1.1 mw volatile unsigned short dummy = *((volatile unsigned short *)f); 209 1.1 mw } 210 1.1 mw } 211 1.1 mw 212 1.1 mw /* clear extended chain4 mode */ 213 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR, RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) & ~0x02); 214 1.1 mw /* set write mode 1, "[...] data in the read latches is written 215 1.1 mw to memory during CPU memory write cycles. [...]" */ 216 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 1); 217 1.1 mw 218 1.1 mw { 219 1.1 mw unsigned long * p = (unsigned long *) fb; 220 1.1 mw short x = (lines * (md->TX/16)) - 1; 221 1.1 mw const unsigned long dummyval = 0; 222 1.1 mw 223 1.1 mw p += (1 + bottom - lines) * (md->TX/4); 224 1.1 mw 225 1.1 mw do { 226 1.1 mw *p++ = dummyval; 227 1.1 mw *p++ = dummyval; 228 1.1 mw *p++ = dummyval; 229 1.1 mw *p++ = dummyval; 230 1.1 mw } while (x--); 231 1.1 mw } 232 1.1 mw 233 1.1 mw /* write mode 0 */ 234 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 0); 235 1.1 mw /* extended chain4 enable */ 236 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR , RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) | 0x02); 237 1.3 mw 238 1.3 mw #ifdef BANKEDDEVPAGER 239 1.3 mw /* restore former bank */ 240 1.3 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO, (unsigned char) bank); 241 1.3 mw bank >>= 8; 242 1.3 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI, (unsigned char) bank); 243 1.3 mw #endif 244 1.1 mw }; 245 1.1 mw 246 1.1 mw static void screen_down (struct ite_softc *ip, int top, int bottom, int lines) 247 1.1 mw { 248 1.1 mw volatile u_char * ba = ip->grf->g_regkva; 249 1.1 mw volatile u_char * fb = ip->grf->g_fbkva; 250 1.1 mw const struct MonDef * md = (struct MonDef *) ip->priv; 251 1.3 mw #ifdef BANKEDDEVPAGER 252 1.3 mw int bank; 253 1.3 mw #endif 254 1.1 mw 255 1.1 mw /* do some bounds-checking here.. */ 256 1.1 mw if (top >= bottom) 257 1.1 mw return; 258 1.1 mw 259 1.1 mw if (top + lines >= bottom) 260 1.1 mw { 261 1.1 mw retina_clear (ip, top, 0, bottom - top, ip->cols); 262 1.1 mw return; 263 1.1 mw } 264 1.1 mw 265 1.3 mw #ifdef BANKEDDEVPAGER 266 1.3 mw /* make sure to save/restore active bank (and if it's only 267 1.3 mw for tests of the feature in text-mode..) */ 268 1.3 mw bank = (RSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO) 269 1.3 mw | (RSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI) << 8)); 270 1.3 mw #endif 271 1.1 mw /* see screen_up() for explanation of chip-tricks */ 272 1.1 mw 273 1.1 mw /* write to primary, read from secondary */ 274 1.1 mw WSeq (ba, SEQ_ID_EXTENDED_MEM_ENA, (RSeq(ba, SEQ_ID_EXTENDED_MEM_ENA) & 0x1f) | 0 ); 275 1.1 mw /* clear extended chain4 mode */ 276 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR, RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) & ~0x02); 277 1.1 mw 278 1.1 mw /* set write mode 1, "[...] data in the read latches is written 279 1.1 mw to memory during CPU memory write cycles. [...]" */ 280 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 1); 281 1.1 mw 282 1.1 mw { 283 1.1 mw /* write to line TOP + LINES */ 284 1.1 mw long toloc = (top + lines) * (md->TX / 16); 285 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO, ((unsigned char)toloc)); 286 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI, ((unsigned char)(toloc >> 8))); 287 1.1 mw } 288 1.1 mw { 289 1.1 mw /* read from line TOP */ 290 1.1 mw long fromloc = top * (md->TX / 16); 291 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_LO, ((unsigned char)fromloc)); 292 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_HI, ((unsigned char)(fromloc >> 8))) ; 293 1.1 mw } 294 1.1 mw 295 1.1 mw { 296 1.1 mw unsigned char * p = (unsigned char *) fb; 297 1.1 mw short x = (1 + bottom - (top + lines)) * (md->TX / 16) - 1; 298 1.1 mw p += (1 + bottom - (top + lines)) * md->TX; 299 1.1 mw do { 300 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 301 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 302 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 303 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 304 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 305 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 306 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 307 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 308 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 309 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 310 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 311 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 312 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 313 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 314 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 315 1.1 mw asm volatile("addqb #1,%0@-" : "=a" (p) : "0" (p)); 316 1.1 mw } while (x--); 317 1.1 mw } 318 1.1 mw 319 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI, 0); 320 1.1 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO, 0); 321 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_HI, 0); 322 1.1 mw WSeq (ba, SEQ_ID_SEC_HOST_OFF_LO, 0); 323 1.1 mw 324 1.1 mw /* write mode 0 */ 325 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 0); 326 1.1 mw /* extended chain4 enable */ 327 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR , RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) | 0x02); 328 1.1 mw /* read/write to primary on A0, secondary on B0 */ 329 1.1 mw WSeq (ba, SEQ_ID_EXTENDED_MEM_ENA, (RSeq(ba, SEQ_ID_EXTENDED_MEM_ENA) & 0x1f) | 0x40 ); 330 1.1 mw 331 1.1 mw /* fill the free lines with spaces */ 332 1.1 mw 333 1.1 mw { /* feed latches with value */ 334 1.1 mw unsigned short * f = (unsigned short *) fb; 335 1.1 mw 336 1.1 mw f += top * md->TX * 2; 337 1.1 mw *f = 0x2010; 338 1.1 mw { 339 1.1 mw volatile unsigned short dummy = *((volatile unsigned short *)f); 340 1.1 mw } 341 1.1 mw } 342 1.1 mw 343 1.1 mw /* clear extended chain4 mode */ 344 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR, RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) & ~0x02); 345 1.1 mw /* set write mode 1, "[...] data in the read latches is written 346 1.1 mw to memory during CPU memory write cycles. [...]" */ 347 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 1); 348 1.1 mw 349 1.1 mw { 350 1.1 mw unsigned long * p = (unsigned long *) fb; 351 1.1 mw short x = (lines * (md->TX/16)) - 1; 352 1.1 mw const unsigned long dummyval = 0; 353 1.1 mw 354 1.1 mw p += top * (md->TX/4); 355 1.1 mw 356 1.1 mw do { 357 1.1 mw *p++ = dummyval; 358 1.1 mw *p++ = dummyval; 359 1.1 mw *p++ = dummyval; 360 1.1 mw *p++ = dummyval; 361 1.1 mw } while (x--); 362 1.1 mw } 363 1.1 mw 364 1.1 mw /* write mode 0 */ 365 1.1 mw WGfx (ba, GCT_ID_GRAPHICS_MODE, (RGfx(ba, GCT_ID_GRAPHICS_MODE) & 0xfc) | 0); 366 1.1 mw /* extended chain4 enable */ 367 1.1 mw WSeq (ba, SEQ_ID_EXT_VIDEO_ADDR , RSeq(ba, SEQ_ID_EXT_VIDEO_ADDR) | 0x02); 368 1.1 mw 369 1.3 mw #ifdef BANKEDDEVPAGER 370 1.3 mw /* restore former bank */ 371 1.3 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_LO, (unsigned char) bank); 372 1.3 mw bank >>= 8; 373 1.3 mw WSeq (ba, SEQ_ID_PRIM_HOST_OFF_HI, (unsigned char) bank); 374 1.3 mw #endif 375 1.1 mw }; 376 1.1 mw 377 1.1 mw void retina_deinit(struct ite_softc *ip) 378 1.1 mw { 379 1.1 mw ip->flags &= ~ITE_INITED; 380 1.1 mw } 381 1.1 mw 382 1.1 mw 383 1.1 mw void retina_putc(struct ite_softc *ip, int c, int dy, int dx, int mode) 384 1.1 mw { 385 1.1 mw volatile u_char * ba = ip->grf->g_regkva; 386 1.1 mw volatile u_char * fb = ip->grf->g_fbkva; 387 1.1 mw register u_char attr; 388 1.1 mw 389 1.1 mw attr = (mode & ATTR_INV) ? 0x21 : 0x10; 390 1.1 mw if (mode & ATTR_UL) attr = 0x01; /* ???????? */ 391 1.1 mw if (mode & ATTR_BOLD) attr |= 0x08; 392 1.1 mw if (mode & ATTR_BLINK) attr |= 0x80; 393 1.1 mw 394 1.1 mw fb += 4 * (dy * ip->cols + dx); 395 1.1 mw *fb++ = c; *fb = attr; 396 1.1 mw } 397 1.1 mw 398 1.1 mw void retina_clear(struct ite_softc *ip, int sy, int sx, int h, int w) 399 1.1 mw { 400 1.1 mw volatile u_char * ba = ip->grf->g_regkva; 401 1.1 mw u_short * fb = (u_short *) ip->grf->g_fbkva; 402 1.1 mw short x; 403 1.1 mw const u_short fillval = 0x2010; 404 1.1 mw /* could probably be optimized just like the scrolling functions !! */ 405 1.1 mw fb += 2 * (sy * ip->cols + sx); 406 1.1 mw while (h--) 407 1.1 mw { 408 1.1 mw for (x = 2 * (w - 1); x >= 0; x -= 2) 409 1.1 mw fb[x] = fillval; 410 1.1 mw fb += 2 * ip->cols; 411 1.1 mw } 412 1.1 mw } 413 1.1 mw 414 1.1 mw void retina_scroll(struct ite_softc *ip, int sy, int sx, int count, int dir) 415 1.1 mw { 416 1.1 mw volatile u_char * ba = ip->grf->g_regkva; 417 1.4 chopps u_long * fb = (u_long *) ip->grf->g_fbkva; 418 1.1 mw register int height, dy, i; 419 1.1 mw 420 1.1 mw retina_cursor(ip, ERASE_CURSOR); 421 1.1 mw 422 1.1 mw if (dir == SCROLL_UP) 423 1.1 mw { 424 1.1 mw screen_up (ip, sy - count, ip->bottom_margin, count); 425 1.1 mw /* bcopy (fb + sy * ip->cols, fb + (sy - count) * ip->cols, 4 * (ip->bottom_margin - sy + 1) * ip->cols); */ 426 1.1 mw /* retina_clear (ip, ip->bottom_margin + 1 - count, 0, count, ip->cols); */ 427 1.1 mw } 428 1.1 mw else if (dir == SCROLL_DOWN) 429 1.1 mw { 430 1.1 mw screen_down (ip, sy, ip->bottom_margin, count); 431 1.1 mw /* bcopy (fb + sy * ip->cols, fb + (sy + count) * ip->cols, 4 * (ip->bottom_margin - sy - count + 1) * ip->cols); */ 432 1.1 mw /* retina_clear (ip, sy, 0, count, ip->cols); */ 433 1.1 mw } 434 1.1 mw else if (dir == SCROLL_RIGHT) 435 1.1 mw { 436 1.1 mw bcopy (fb + sx + sy * ip->cols, fb + sx + sy * ip->cols + count, 4 * (ip->cols - (sx + count))); 437 1.1 mw retina_clear (ip, sy, sx, 1, count); 438 1.1 mw } 439 1.1 mw else 440 1.1 mw { 441 1.1 mw bcopy (fb + sx + sy * ip->cols, fb + sx - count + sy * ip->cols, 4 * (ip->cols - sx)); 442 1.1 mw retina_clear (ip, sy, ip->cols - count, 1, count); 443 1.1 mw } 444 1.1 mw } 445
Indexes created Fri Sep 26 08:10:20 GMT 2025