2 * Copyright (c) 1999 FreeBSD(98) Porting Team.
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer as
10 * the first lines of this file unmodified.
11 * 2. Redistributions in binary form must reproduce the above copyright
12 * notice, this list of conditions and the following disclaimer in the
13 * documentation and/or other materials provided with the distribution.
15 * THIS SOFTWARE IS PROVIDED BY THE AUTHORS ``AS IS'' AND ANY EXPRESS OR
16 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
17 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
18 * IN NO EVENT SHALL THE AUTHORS BE LIABLE FOR ANY DIRECT, INDIRECT,
19 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
20 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
21 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
22 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
23 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
24 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
29 #include "opt_syscons.h"
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/malloc.h>
34 #include <sys/consio.h>
37 #include <machine/md_var.h>
39 #include <dev/fb/fbreg.h>
40 #include <dev/syscons/syscons.h>
42 #define ATTR_OFFSET_FB 0x2000
43 #define attr_offset(vtb) ((vtb)->vtb_size*sizeof(u_int16_t))
45 #define vtb_pointer(vtb, at) \
46 ((vtb)->vtb_buffer + sizeof(u_int16_t)*(at))
48 #define vtb_wrap(vtb, at, offset) \
49 (((at) + (offset) + (vtb)->vtb_size)%(vtb)->vtb_size)
51 static u_int8_t ibmpc_to_pc98[256] = {
52 0x01, 0x21, 0x81, 0xa1, 0x41, 0x61, 0xc1, 0xe1,
53 0x09, 0x29, 0x89, 0xa9, 0x49, 0x69, 0xc9, 0xe9,
54 0x25, 0x25, 0x25, 0x25, 0x25, 0x25, 0x25, 0x25,
55 0x25, 0x25, 0x25, 0x25, 0x25, 0x25, 0x25, 0x25,
56 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85,
57 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85, 0x85,
58 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
59 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5, 0xa5,
60 0x45, 0x45, 0x45, 0x45, 0x45, 0x45, 0x45, 0x45,
61 0x45, 0x45, 0x45, 0x45, 0x45, 0x45, 0x45, 0x45,
62 0x65, 0x65, 0x65, 0x65, 0x65, 0x65, 0x65, 0x65,
63 0x65, 0x65, 0x65, 0x65, 0x65, 0x65, 0x65, 0x65,
64 0xc5, 0xc5, 0xc5, 0xc5, 0xc5, 0xc5, 0xc5, 0xc5,
65 0xc5, 0xc5, 0xc5, 0xc5, 0xc5, 0xc5, 0xc5, 0xc5,
66 0xe5, 0xe5, 0xe5, 0xe5, 0xe5, 0xe5, 0xe5, 0xe5,
67 0xe5, 0xe5, 0xe5, 0xe5, 0xe5, 0xe5, 0xe5, 0xe5,
69 0x03, 0x23, 0x83, 0xa3, 0x43, 0x63, 0xc3, 0xe3,
70 0x0b, 0x2b, 0x8b, 0xab, 0x4b, 0x6b, 0xcb, 0xeb,
71 0x2f, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f,
72 0x2f, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f, 0x2f,
73 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f,
74 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f, 0x8f,
75 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
76 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf, 0xaf,
77 0x4f, 0x4f, 0x4f, 0x4f, 0x4f, 0x4f, 0x4f, 0x4f,
78 0x4f, 0x4f, 0x4f, 0x4f, 0x4f, 0x4f, 0x4f, 0x4f,
79 0x6f, 0x6f, 0x6f, 0x6f, 0x6f, 0x6f, 0x6f, 0x6f,
80 0x6f, 0x6f, 0x6f, 0x6f, 0x6f, 0x6f, 0x6f, 0x6f,
81 0xcf, 0xcf, 0xcf, 0xcf, 0xcf, 0xcf, 0xcf, 0xcf,
82 0xcf, 0xcf, 0xcf, 0xcf, 0xcf, 0xcf, 0xcf, 0xcf,
83 0xef, 0xef, 0xef, 0xef, 0xef, 0xef, 0xef, 0xef,
84 0xef, 0xef, 0xef, 0xef, 0xef, 0xef, 0xef, 0xef,
86 #define at2pc98(attr) ((attr) | ibmpc_to_pc98[(unsigned)(attr) >> 8])
89 sc_vtb_init(sc_vtb_t *vtb, int type, int cols, int rows, void *buf, int wait)
95 vtb->vtb_size = cols*rows;
102 if ((buf == NULL) && (cols*rows != 0)) {
104 (vm_offset_t)malloc(cols*rows*sizeof(u_int16_t)*2,
106 ((wait) ? M_WAITOK : M_NOWAIT) | M_ZERO);
107 if (vtb->vtb_buffer != 0) {
108 vtb->vtb_flags |= VTB_ALLOCED;
111 vtb->vtb_buffer = (vm_offset_t)buf;
113 vtb->vtb_flags |= VTB_VALID;
115 case VTB_FRAMEBUFFER:
116 vtb->vtb_buffer = (vm_offset_t)buf;
117 vtb->vtb_flags |= VTB_VALID;
125 sc_vtb_destroy(sc_vtb_t *vtb)
136 switch (vtb->vtb_type) {
139 if ((vtb->vtb_flags & VTB_ALLOCED) && (p != 0))
140 free((void *)p, M_DEVBUF);
146 vtb->vtb_type = VTB_INVALID;
150 sc_vtb_size(int cols, int rows)
152 return (size_t)(cols*rows*sizeof(u_int16_t)*2);
156 sc_vtb_getc(sc_vtb_t *vtb, int at)
158 vm_offset_t p = vtb_pointer(vtb, at);
160 if (vtb->vtb_type == VTB_FRAMEBUFFER)
161 return (readw(p) & 0x00ff);
163 return (*(u_int16_t *)p & 0x00ff);
167 sc_vtb_geta(sc_vtb_t *vtb, int at)
169 vm_offset_t p = vtb_pointer(vtb, at);
171 if (vtb->vtb_type == VTB_FRAMEBUFFER)
172 return (readw(p + ATTR_OFFSET_FB) & 0xff00);
174 return (*(u_int16_t *)(p + attr_offset(vtb)) & 0xff00);
178 vtb_putc(sc_vtb_t *vtb, vm_offset_t p, int c, int a)
180 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
182 writew(p + ATTR_OFFSET_FB, at2pc98(a));
185 *(u_int16_t *)(p + attr_offset(vtb)) = at2pc98(a);
190 sc_vtb_putc(sc_vtb_t *vtb, int at, int c, int a)
192 vtb_putc(vtb, vtb_pointer(vtb, at), c, a);
196 sc_vtb_putchar(sc_vtb_t *vtb, vm_offset_t p, int c, int a)
198 vtb_putc(vtb, p, c, a);
199 return (p + sizeof(u_int16_t));
203 sc_vtb_pointer(sc_vtb_t *vtb, int at)
205 return (vtb_pointer(vtb, at));
209 sc_vtb_pos(sc_vtb_t *vtb, int pos, int offset)
211 return ((pos + offset + vtb->vtb_size)%vtb->vtb_size);
215 sc_vtb_clear(sc_vtb_t *vtb, int c, int attr)
217 vm_offset_t p = vtb_pointer(vtb, 0);
219 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
220 fillw_io(c, p, vtb->vtb_size);
221 fillw_io(at2pc98(attr), p + ATTR_OFFSET_FB, vtb->vtb_size);
223 fillw(c, (void *)p, vtb->vtb_size);
224 fillw(at2pc98(attr), (void *)(p + attr_offset(vtb)),
230 sc_vtb_copy(sc_vtb_t *vtb1, int from, sc_vtb_t *vtb2, int to, int count)
234 p1 = vtb_pointer(vtb1, from);
235 p2 = vtb_pointer(vtb2, to);
236 if (vtb2->vtb_type == VTB_FRAMEBUFFER) {
237 bcopy_toio(p1, p2, count*sizeof(u_int16_t));
238 bcopy_toio(p1 + attr_offset(vtb1),
240 count*sizeof(u_int16_t));
241 } else if (vtb1->vtb_type == VTB_FRAMEBUFFER) {
242 bcopy_fromio(p1, p2, count*sizeof(u_int16_t));
243 bcopy_fromio(p1 + ATTR_OFFSET_FB,
244 p2 + attr_offset(vtb2),
245 count*sizeof(u_int16_t));
247 bcopy((void *)p1, (void *)p2, count*sizeof(u_int16_t));
248 bcopy((void *)(p1 + attr_offset(vtb1)),
249 (void *)(p2 + attr_offset(vtb2)),
250 count*sizeof(u_int16_t));
255 sc_vtb_append(sc_vtb_t *vtb1, int from, sc_vtb_t *vtb2, int count)
260 if (vtb2->vtb_type != VTB_RINGBUFFER)
264 p1 = vtb_pointer(vtb1, from);
265 p2 = vtb_pointer(vtb2, vtb2->vtb_tail);
266 len = imin(count, vtb2->vtb_size - vtb2->vtb_tail);
267 if (vtb1->vtb_type == VTB_FRAMEBUFFER) {
268 bcopy_fromio(p1, p2, len*sizeof(u_int16_t));
269 bcopy_fromio(p1 + ATTR_OFFSET_FB,
270 p2 + attr_offset(vtb2),
271 len*sizeof(u_int16_t));
273 bcopy((void *)p1, (void *)p2, len*sizeof(u_int16_t));
274 bcopy((void *)(p1 + attr_offset(vtb1)),
275 (void *)(p2 + attr_offset(vtb2)),
276 len*sizeof(u_int16_t));
280 vtb2->vtb_tail = vtb_wrap(vtb2, vtb2->vtb_tail, len);
285 sc_vtb_seek(sc_vtb_t *vtb, int pos)
287 vtb->vtb_tail = pos%vtb->vtb_size;
291 sc_vtb_erase(sc_vtb_t *vtb, int at, int count, int c, int attr)
295 if (at + count > vtb->vtb_size)
296 count = vtb->vtb_size - at;
297 p = vtb_pointer(vtb, at);
298 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
299 fillw_io(c, p, count);
300 fillw_io(at2pc98(attr), p + ATTR_OFFSET_FB, count);
302 fillw(c, (void *)p, count);
303 fillw(at2pc98(attr), (void *)(p + attr_offset(vtb)), count);
308 sc_vtb_move(sc_vtb_t *vtb, int from, int to, int count)
312 if (from + count > vtb->vtb_size)
313 count = vtb->vtb_size - from;
314 if (to + count > vtb->vtb_size)
315 count = vtb->vtb_size - to;
319 p1 = vtb_pointer(vtb, from);
320 p2 = vtb_pointer(vtb, to);
321 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
322 bcopy_io(p1, p2, count*sizeof(u_int16_t));
323 bcopy_io(p1 + ATTR_OFFSET_FB,
324 p2 + ATTR_OFFSET_FB, count*sizeof(u_int16_t));
326 bcopy((void *)p1, (void *)p2, count*sizeof(u_int16_t));
327 bcopy((void *)(p1 + attr_offset(vtb)),
328 (void *)(p2 + attr_offset(vtb)), count*sizeof(u_int16_t));
333 sc_vtb_delete(sc_vtb_t *vtb, int at, int count, int c, int attr)
338 if (at + count > vtb->vtb_size)
339 count = vtb->vtb_size - at;
340 len = vtb->vtb_size - at - count;
342 p1 = vtb_pointer(vtb, at + count);
343 p2 = vtb_pointer(vtb, at);
344 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
345 bcopy_io(p1, p2, len*sizeof(u_int16_t));
346 bcopy_io(p1 + ATTR_OFFSET_FB,
348 len*sizeof(u_int16_t));
350 bcopy((void *)p1, (void *)p2, len*sizeof(u_int16_t));
351 bcopy((void *)(p1 + attr_offset(vtb)),
352 (void *)(p2 + attr_offset(vtb)),
353 len*sizeof(u_int16_t));
356 p1 = vtb_pointer(vtb, at + len);
357 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
358 fillw_io(c, p1, vtb->vtb_size - at - len);
359 fillw_io(at2pc98(attr), p1 + ATTR_OFFSET_FB,
360 vtb->vtb_size - at - len);
362 fillw(c, (void *)p1, vtb->vtb_size - at - len);
363 fillw(at2pc98(attr), (void *)(p1 + attr_offset(vtb)),
364 vtb->vtb_size - at - len);
369 sc_vtb_ins(sc_vtb_t *vtb, int at, int count, int c, int attr)
373 p1 = vtb_pointer(vtb, at);
374 if (at + count > vtb->vtb_size) {
375 count = vtb->vtb_size - at;
377 p2 = vtb_pointer(vtb, at + count);
378 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
380 (vtb->vtb_size - at - count)*sizeof(u_int16_t));
381 bcopy_io(p1 + ATTR_OFFSET_FB,
383 (vtb->vtb_size - at - count)*sizeof(u_int16_t));
385 bcopy((void *)p1, (void *)p2,
386 (vtb->vtb_size - at - count)*sizeof(u_int16_t));
387 bcopy((void *)(p1 + attr_offset(vtb)),
388 (void *)(p2 + attr_offset(vtb)),
389 (vtb->vtb_size - at - count)*sizeof(u_int16_t));
392 if (vtb->vtb_type == VTB_FRAMEBUFFER) {
393 fillw_io(c, p1, count);
394 fillw_io(at2pc98(attr), p1 + ATTR_OFFSET_FB, count);
396 fillw(c, (void *)p1, count);
397 fillw(at2pc98(attr), (void *)(p1 + attr_offset(vtb)), count);