wsdisplay_vcons.c revision 1.65 1 1.65 macallan /* $NetBSD: wsdisplay_vcons.c,v 1.65 2023/02/14 08:14:02 macallan Exp $ */
2 1.1 macallan
3 1.1 macallan /*-
4 1.1 macallan * Copyright (c) 2005, 2006 Michael Lorenz
5 1.1 macallan * All rights reserved.
6 1.1 macallan *
7 1.1 macallan * Redistribution and use in source and binary forms, with or without
8 1.1 macallan * modification, are permitted provided that the following conditions
9 1.1 macallan * are met:
10 1.1 macallan * 1. Redistributions of source code must retain the above copyright
11 1.1 macallan * notice, this list of conditions and the following disclaimer.
12 1.1 macallan * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 macallan * notice, this list of conditions and the following disclaimer in the
14 1.1 macallan * documentation and/or other materials provided with the distribution.
15 1.1 macallan *
16 1.1 macallan * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
17 1.1 macallan * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
18 1.1 macallan * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
19 1.1 macallan * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
20 1.1 macallan * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
21 1.1 macallan * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
22 1.1 macallan * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
23 1.1 macallan * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
24 1.1 macallan * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
25 1.1 macallan * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
26 1.1 macallan * POSSIBILITY OF SUCH DAMAGE.
27 1.1 macallan */
28 1.1 macallan
29 1.1 macallan #include <sys/cdefs.h>
30 1.65 macallan __KERNEL_RCSID(0, "$NetBSD: wsdisplay_vcons.c,v 1.65 2023/02/14 08:14:02 macallan Exp $");
31 1.1 macallan
32 1.1 macallan #include <sys/param.h>
33 1.1 macallan #include <sys/systm.h>
34 1.1 macallan #include <sys/kernel.h>
35 1.1 macallan #include <sys/buf.h>
36 1.1 macallan #include <sys/device.h>
37 1.1 macallan #include <sys/ioctl.h>
38 1.1 macallan #include <sys/malloc.h>
39 1.1 macallan #include <sys/mman.h>
40 1.1 macallan #include <sys/tty.h>
41 1.1 macallan #include <sys/conf.h>
42 1.1 macallan #include <sys/proc.h>
43 1.1 macallan #include <sys/kthread.h>
44 1.1 macallan #include <sys/tprintf.h>
45 1.19 macallan #include <sys/atomic.h>
46 1.63 riastrad #include <sys/kmem.h>
47 1.1 macallan
48 1.1 macallan #include <dev/wscons/wsdisplayvar.h>
49 1.1 macallan #include <dev/wscons/wsconsio.h>
50 1.1 macallan #include <dev/wsfont/wsfont.h>
51 1.1 macallan #include <dev/rasops/rasops.h>
52 1.1 macallan
53 1.1 macallan #include <dev/wscons/wsdisplay_vconsvar.h>
54 1.1 macallan
55 1.32 riastrad #ifdef _KERNEL_OPT
56 1.14 macallan #include "opt_wsemul.h"
57 1.14 macallan #include "opt_wsdisplay_compat.h"
58 1.14 macallan #include "opt_vcons.h"
59 1.32 riastrad #endif
60 1.14 macallan
61 1.37 macallan #ifdef VCONS_DEBUG
62 1.37 macallan #define DPRINTF printf
63 1.37 macallan #else
64 1.37 macallan #define DPRINTF if (0) printf
65 1.37 macallan #endif
66 1.37 macallan
67 1.63 riastrad struct vcons_data_private {
68 1.63 riastrad /* accessops */
69 1.63 riastrad int (*ioctl)(void *, void *, u_long, void *, int, struct lwp *);
70 1.63 riastrad
71 1.63 riastrad /* rasops */
72 1.63 riastrad void (*copycols)(void *, int, int, int, int);
73 1.63 riastrad void (*erasecols)(void *, int, int, int, long);
74 1.63 riastrad void (*copyrows)(void *, int, int, int);
75 1.63 riastrad void (*eraserows)(void *, int, int, long);
76 1.63 riastrad void (*cursor)(void *, int, int, int);
77 1.63 riastrad
78 1.63 riastrad /* virtual screen management stuff */
79 1.63 riastrad void (*switch_cb)(void *, int, int);
80 1.63 riastrad void *switch_cb_arg;
81 1.63 riastrad struct callout switch_callout;
82 1.63 riastrad uint32_t switch_pending;
83 1.63 riastrad LIST_HEAD(, vcons_screen) screens;
84 1.63 riastrad struct vcons_screen *wanted;
85 1.63 riastrad const struct wsscreen_descr *currenttype;
86 1.63 riastrad struct wsscreen_descr *defaulttype;
87 1.63 riastrad int switch_poll_count;
88 1.63 riastrad
89 1.63 riastrad #ifdef VCONS_DRAW_INTR
90 1.63 riastrad int cells;
91 1.63 riastrad long *attrs;
92 1.63 riastrad uint32_t *chars;
93 1.63 riastrad int cursor_offset;
94 1.63 riastrad callout_t intr;
95 1.63 riastrad int intr_valid;
96 1.63 riastrad void *intr_softint;
97 1.63 riastrad int use_intr; /* use intr drawing when non-zero */
98 1.63 riastrad #endif
99 1.63 riastrad };
100 1.63 riastrad
101 1.55 riastrad static void vcons_dummy_init_screen(void *, struct vcons_screen *, int,
102 1.1 macallan long *);
103 1.1 macallan
104 1.10 christos static int vcons_ioctl(void *, void *, u_long, void *, int, struct lwp *);
105 1.55 riastrad static int vcons_alloc_screen(void *, const struct wsscreen_descr *, void **,
106 1.1 macallan int *, int *, long *);
107 1.1 macallan static void vcons_free_screen(void *, void *);
108 1.1 macallan static int vcons_show_screen(void *, void *, int, void (*)(void *, int, int),
109 1.1 macallan void *);
110 1.37 macallan static int vcons_load_font(void *, void *, struct wsdisplay_font *);
111 1.1 macallan
112 1.14 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
113 1.14 macallan static void vcons_scroll(void *, void *, int);
114 1.14 macallan static void vcons_do_scroll(struct vcons_screen *);
115 1.14 macallan #endif
116 1.14 macallan
117 1.15 joerg static void vcons_do_switch(void *);
118 1.1 macallan
119 1.1 macallan /* methods that work only on text buffers */
120 1.1 macallan static void vcons_copycols_buffer(void *, int, int, int, int);
121 1.1 macallan static void vcons_erasecols_buffer(void *, int, int, int, long);
122 1.1 macallan static void vcons_copyrows_buffer(void *, int, int, int);
123 1.1 macallan static void vcons_eraserows_buffer(void *, int, int, long);
124 1.65 macallan static int vcons_putchar_buffer(void *, int, int, u_int, long);
125 1.1 macallan
126 1.1 macallan /*
127 1.1 macallan * actual wrapper methods which call both the _buffer ones above and the
128 1.1 macallan * driver supplied ones to do the drawing
129 1.1 macallan */
130 1.1 macallan static void vcons_copycols(void *, int, int, int, int);
131 1.1 macallan static void vcons_erasecols(void *, int, int, int, long);
132 1.1 macallan static void vcons_copyrows(void *, int, int, int);
133 1.1 macallan static void vcons_eraserows(void *, int, int, long);
134 1.1 macallan static void vcons_putchar(void *, int, int, u_int, long);
135 1.25 macallan #ifdef VCONS_DRAW_INTR
136 1.30 mlelstv static void vcons_erasecols_cached(void *, int, int, int, long);
137 1.30 mlelstv static void vcons_eraserows_cached(void *, int, int, long);
138 1.25 macallan static void vcons_putchar_cached(void *, int, int, u_int, long);
139 1.25 macallan #endif
140 1.1 macallan static void vcons_cursor(void *, int, int, int);
141 1.48 macallan static void vcons_cursor_noread(void *, int, int, int);
142 1.1 macallan
143 1.17 macallan /*
144 1.17 macallan * methods that avoid framebuffer reads
145 1.17 macallan */
146 1.17 macallan static void vcons_copycols_noread(void *, int, int, int, int);
147 1.17 macallan static void vcons_copyrows_noread(void *, int, int, int);
148 1.17 macallan
149 1.17 macallan
150 1.14 macallan /* support for reading/writing text buffers. For wsmoused */
151 1.6 jmmv static int vcons_putwschar(struct vcons_screen *, struct wsdisplay_char *);
152 1.6 jmmv static int vcons_getwschar(struct vcons_screen *, struct wsdisplay_char *);
153 1.1 macallan
154 1.1 macallan static void vcons_lock(struct vcons_screen *);
155 1.1 macallan static void vcons_unlock(struct vcons_screen *);
156 1.1 macallan
157 1.20 jmcneill #ifdef VCONS_DRAW_INTR
158 1.20 jmcneill static void vcons_intr(void *);
159 1.22 jmcneill static void vcons_softintr(void *);
160 1.47 jmcneill static void vcons_init_thread(void *);
161 1.63 riastrad static void vcons_invalidate_cache(struct vcons_data *);
162 1.20 jmcneill #endif
163 1.1 macallan
164 1.57 riastrad static inline bool
165 1.57 riastrad vcons_use_intr(const struct vcons_screen *scr)
166 1.57 riastrad {
167 1.57 riastrad #ifdef VCONS_DRAW_INTR
168 1.63 riastrad return scr->scr_vd->private->use_intr;
169 1.57 riastrad #else
170 1.57 riastrad return false;
171 1.57 riastrad #endif
172 1.57 riastrad }
173 1.57 riastrad
174 1.58 riastrad static inline void
175 1.58 riastrad vcons_dirty(struct vcons_screen *scr)
176 1.58 riastrad {
177 1.58 riastrad #ifdef VCONS_DRAW_INTR
178 1.59 riastrad membar_release();
179 1.58 riastrad atomic_inc_uint(&scr->scr_dirty);
180 1.58 riastrad #endif
181 1.58 riastrad }
182 1.58 riastrad
183 1.47 jmcneill static int
184 1.47 jmcneill vcons_init_common(struct vcons_data *vd, void *cookie,
185 1.47 jmcneill struct wsscreen_descr *def, struct wsdisplay_accessops *ao,
186 1.47 jmcneill int enable_intr)
187 1.1 macallan {
188 1.63 riastrad struct vcons_data_private *vdp;
189 1.2 macallan
190 1.2 macallan /* zero out everything so we can rely on untouched fields being 0 */
191 1.3 macallan memset(vd, 0, sizeof(struct vcons_data));
192 1.47 jmcneill
193 1.63 riastrad vd->private = vdp = kmem_zalloc(sizeof(*vdp), KM_SLEEP);
194 1.1 macallan vd->cookie = cookie;
195 1.1 macallan
196 1.1 macallan vd->init_screen = vcons_dummy_init_screen;
197 1.1 macallan vd->show_screen_cb = NULL;
198 1.1 macallan
199 1.6 jmmv /* keep a copy of the accessops that we replace below with our
200 1.6 jmmv * own wrappers */
201 1.63 riastrad vdp->ioctl = ao->ioctl;
202 1.6 jmmv
203 1.6 jmmv /* configure the accessops */
204 1.6 jmmv ao->ioctl = vcons_ioctl;
205 1.1 macallan ao->alloc_screen = vcons_alloc_screen;
206 1.1 macallan ao->free_screen = vcons_free_screen;
207 1.1 macallan ao->show_screen = vcons_show_screen;
208 1.37 macallan ao->load_font = vcons_load_font;
209 1.14 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
210 1.14 macallan ao->scroll = vcons_scroll;
211 1.14 macallan #endif
212 1.1 macallan
213 1.63 riastrad LIST_INIT(&vdp->screens);
214 1.1 macallan vd->active = NULL;
215 1.63 riastrad vdp->wanted = NULL;
216 1.63 riastrad vdp->currenttype = def;
217 1.63 riastrad vdp->defaulttype = def;
218 1.63 riastrad callout_init(&vdp->switch_callout, 0);
219 1.63 riastrad callout_setfunc(&vdp->switch_callout, vcons_do_switch, vd);
220 1.63 riastrad #ifdef VCONS_DRAW_INTR
221 1.63 riastrad vdp->cells = 0;
222 1.63 riastrad vdp->attrs = NULL;
223 1.63 riastrad vdp->chars = NULL;
224 1.63 riastrad vdp->cursor_offset = -1;
225 1.25 macallan #endif
226 1.1 macallan
227 1.1 macallan /*
228 1.1 macallan * a lock to serialize access to the framebuffer.
229 1.1 macallan * when switching screens we need to make sure there's no rasops
230 1.1 macallan * operation in progress
231 1.1 macallan */
232 1.1 macallan #ifdef DIAGNOSTIC
233 1.63 riastrad vdp->switch_poll_count = 0;
234 1.1 macallan #endif
235 1.20 jmcneill #ifdef VCONS_DRAW_INTR
236 1.47 jmcneill if (enable_intr) {
237 1.63 riastrad vdp->intr_softint = softint_establish(SOFTINT_SERIAL,
238 1.47 jmcneill vcons_softintr, vd);
239 1.63 riastrad callout_init(&vdp->intr, CALLOUT_MPSAFE);
240 1.63 riastrad callout_setfunc(&vdp->intr, vcons_intr, vd);
241 1.63 riastrad vdp->intr_valid = 1;
242 1.47 jmcneill
243 1.47 jmcneill if (kthread_create(PRI_NONE, 0, NULL, vcons_init_thread, vd,
244 1.47 jmcneill NULL, "vcons_init") != 0) {
245 1.47 jmcneill printf("%s: unable to create thread.\n", __func__);
246 1.47 jmcneill return -1;
247 1.47 jmcneill }
248 1.47 jmcneill }
249 1.20 jmcneill #endif
250 1.1 macallan return 0;
251 1.1 macallan }
252 1.1 macallan
253 1.47 jmcneill int
254 1.47 jmcneill vcons_init(struct vcons_data *vd, void *cookie,
255 1.47 jmcneill struct wsscreen_descr *def, struct wsdisplay_accessops *ao)
256 1.47 jmcneill {
257 1.47 jmcneill return vcons_init_common(vd, cookie, def, ao, 1);
258 1.47 jmcneill }
259 1.47 jmcneill
260 1.47 jmcneill int
261 1.47 jmcneill vcons_earlyinit(struct vcons_data *vd, void *cookie,
262 1.47 jmcneill struct wsscreen_descr *def, struct wsdisplay_accessops *ao)
263 1.47 jmcneill {
264 1.47 jmcneill return vcons_init_common(vd, cookie, def, ao, 0);
265 1.47 jmcneill }
266 1.47 jmcneill
267 1.1 macallan static void
268 1.1 macallan vcons_lock(struct vcons_screen *scr)
269 1.1 macallan {
270 1.1 macallan #ifdef VCONS_PARANOIA
271 1.1 macallan int s;
272 1.1 macallan
273 1.1 macallan s = splhigh();
274 1.1 macallan #endif
275 1.1 macallan SCREEN_BUSY(scr);
276 1.1 macallan #ifdef VCONS_PARANOIA
277 1.1 macallan splx(s);
278 1.1 macallan #endif
279 1.1 macallan }
280 1.1 macallan
281 1.1 macallan static void
282 1.1 macallan vcons_unlock(struct vcons_screen *scr)
283 1.1 macallan {
284 1.1 macallan #ifdef VCONS_PARANOIA
285 1.1 macallan int s;
286 1.1 macallan
287 1.1 macallan s = splhigh();
288 1.1 macallan #endif
289 1.1 macallan SCREEN_IDLE(scr);
290 1.1 macallan #ifdef VCONS_PARANOIA
291 1.1 macallan splx(s);
292 1.1 macallan #endif
293 1.1 macallan }
294 1.1 macallan
295 1.1 macallan static void
296 1.9 christos vcons_dummy_init_screen(void *cookie,
297 1.9 christos struct vcons_screen *scr, int exists,
298 1.9 christos long *defattr)
299 1.1 macallan {
300 1.1 macallan
301 1.1 macallan /*
302 1.1 macallan * default init_screen() method.
303 1.1 macallan * Needs to be overwritten so we bitch and whine in case anyone ends
304 1.1 macallan * up in here.
305 1.1 macallan */
306 1.1 macallan printf("vcons_init_screen: dummy function called. Your driver is "
307 1.1 macallan "supposed to supply a replacement for proper operation\n");
308 1.1 macallan }
309 1.1 macallan
310 1.37 macallan static int
311 1.37 macallan vcons_alloc_buffers(struct vcons_data *vd, struct vcons_screen *scr)
312 1.1 macallan {
313 1.1 macallan struct rasops_info *ri = &scr->scr_ri;
314 1.1 macallan int cnt, i;
315 1.25 macallan #ifdef VCONS_DRAW_INTR
316 1.63 riastrad struct vcons_data_private *vdp = vd->private;
317 1.25 macallan int size;
318 1.25 macallan #endif
319 1.1 macallan
320 1.55 riastrad /*
321 1.55 riastrad * we allocate both chars and attributes in one chunk, attributes first
322 1.55 riastrad * because they have the (potentially) bigger alignment
323 1.37 macallan */
324 1.37 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
325 1.37 macallan cnt = (ri->ri_rows + WSDISPLAY_SCROLLBACK_LINES) * ri->ri_cols;
326 1.37 macallan scr->scr_lines_in_buffer = WSDISPLAY_SCROLLBACK_LINES;
327 1.37 macallan scr->scr_current_line = 0;
328 1.37 macallan scr->scr_line_wanted = 0;
329 1.37 macallan scr->scr_offset_to_zero = ri->ri_cols * WSDISPLAY_SCROLLBACK_LINES;
330 1.37 macallan scr->scr_current_offset = scr->scr_offset_to_zero;
331 1.37 macallan #else
332 1.37 macallan cnt = ri->ri_rows * ri->ri_cols;
333 1.37 macallan #endif
334 1.55 riastrad scr->scr_attrs = malloc(cnt * (sizeof(long) +
335 1.37 macallan sizeof(uint32_t)), M_DEVBUF, M_WAITOK);
336 1.37 macallan if (scr->scr_attrs == NULL)
337 1.37 macallan return ENOMEM;
338 1.37 macallan
339 1.37 macallan scr->scr_chars = (uint32_t *)&scr->scr_attrs[cnt];
340 1.37 macallan
341 1.55 riastrad /*
342 1.55 riastrad * fill the attribute buffer with *defattr, chars with 0x20
343 1.37 macallan * since we don't know if the driver tries to mimic firmware output or
344 1.37 macallan * reset everything we do nothing to VRAM here, any driver that feels
345 1.37 macallan * the need to clear screen or something will have to do it on its own
346 1.37 macallan * Additional screens will start out in the background anyway so
347 1.37 macallan * cleaning or not only really affects the initial console screen
348 1.37 macallan */
349 1.37 macallan for (i = 0; i < cnt; i++) {
350 1.37 macallan scr->scr_attrs[i] = scr->scr_defattr;
351 1.37 macallan scr->scr_chars[i] = 0x20;
352 1.37 macallan }
353 1.37 macallan
354 1.37 macallan #ifdef VCONS_DRAW_INTR
355 1.37 macallan size = ri->ri_cols * ri->ri_rows;
356 1.63 riastrad if (size > vdp->cells) {
357 1.63 riastrad if (vdp->chars != NULL) free(vdp->chars, M_DEVBUF);
358 1.63 riastrad if (vdp->attrs != NULL) free(vdp->attrs, M_DEVBUF);
359 1.63 riastrad vdp->cells = size;
360 1.63 riastrad vdp->chars = malloc(size * sizeof(uint32_t), M_DEVBUF,
361 1.37 macallan M_WAITOK|M_ZERO);
362 1.63 riastrad vdp->attrs = malloc(size * sizeof(long), M_DEVBUF,
363 1.37 macallan M_WAITOK|M_ZERO);
364 1.37 macallan vcons_invalidate_cache(vd);
365 1.37 macallan } else if (SCREEN_IS_VISIBLE(scr))
366 1.37 macallan vcons_invalidate_cache(vd);
367 1.37 macallan #endif
368 1.37 macallan return 0;
369 1.37 macallan }
370 1.37 macallan
371 1.37 macallan int
372 1.37 macallan vcons_init_screen(struct vcons_data *vd, struct vcons_screen *scr,
373 1.37 macallan int existing, long *defattr)
374 1.37 macallan {
375 1.63 riastrad struct vcons_data_private *vdp = vd->private;
376 1.37 macallan struct rasops_info *ri = &scr->scr_ri;
377 1.37 macallan int i;
378 1.37 macallan
379 1.1 macallan scr->scr_cookie = vd->cookie;
380 1.4 jmcneill scr->scr_vd = scr->scr_origvd = vd;
381 1.14 macallan scr->scr_busy = 0;
382 1.50 macallan
383 1.37 macallan if (scr->scr_type == NULL)
384 1.63 riastrad scr->scr_type = vdp->defaulttype;
385 1.55 riastrad
386 1.1 macallan /*
387 1.1 macallan * call the driver-supplied init_screen function which is expected
388 1.1 macallan * to set up rasops_info, override cursor() and probably others
389 1.1 macallan */
390 1.1 macallan vd->init_screen(vd->cookie, scr, existing, defattr);
391 1.1 macallan
392 1.55 riastrad /*
393 1.55 riastrad * save the non virtual console aware rasops and replace them with
394 1.1 macallan * our wrappers
395 1.1 macallan */
396 1.63 riastrad vdp->eraserows = ri->ri_ops.eraserows;
397 1.63 riastrad vdp->erasecols = ri->ri_ops.erasecols;
398 1.37 macallan scr->putchar = ri->ri_ops.putchar;
399 1.1 macallan
400 1.18 macallan if (scr->scr_flags & VCONS_NO_COPYCOLS) {
401 1.63 riastrad vdp->copycols = vcons_copycols_noread;
402 1.18 macallan } else {
403 1.63 riastrad vdp->copycols = ri->ri_ops.copycols;
404 1.18 macallan }
405 1.18 macallan
406 1.18 macallan if (scr->scr_flags & VCONS_NO_COPYROWS) {
407 1.63 riastrad vdp->copyrows = vcons_copyrows_noread;
408 1.17 macallan } else {
409 1.63 riastrad vdp->copyrows = ri->ri_ops.copyrows;
410 1.17 macallan }
411 1.17 macallan
412 1.48 macallan if (scr->scr_flags & VCONS_NO_CURSOR) {
413 1.63 riastrad vdp->cursor = vcons_cursor_noread;
414 1.48 macallan } else {
415 1.63 riastrad vdp->cursor = ri->ri_ops.cursor;
416 1.48 macallan }
417 1.48 macallan
418 1.55 riastrad ri->ri_ops.eraserows = vcons_eraserows;
419 1.55 riastrad ri->ri_ops.erasecols = vcons_erasecols;
420 1.50 macallan ri->ri_ops.putchar = vcons_putchar;
421 1.50 macallan ri->ri_ops.cursor = vcons_cursor;
422 1.19 macallan ri->ri_ops.copycols = vcons_copycols;
423 1.19 macallan ri->ri_ops.copyrows = vcons_copyrows;
424 1.19 macallan
425 1.19 macallan
426 1.1 macallan ri->ri_hw = scr;
427 1.1 macallan
428 1.35 christos i = ri->ri_ops.allocattr(ri, WS_DEFAULT_FG, WS_DEFAULT_BG, 0, defattr);
429 1.35 christos if (i != 0) {
430 1.35 christos #ifdef DIAGNOSTIC
431 1.35 christos printf("vcons: error allocating attribute %d\n", i);
432 1.35 christos #endif
433 1.35 christos scr->scr_defattr = 0;
434 1.35 christos } else
435 1.35 christos scr->scr_defattr = *defattr;
436 1.1 macallan
437 1.37 macallan vcons_alloc_buffers(vd, scr);
438 1.25 macallan
439 1.63 riastrad if (vd->active == NULL) {
440 1.2 macallan vd->active = scr;
441 1.2 macallan SCREEN_VISIBLE(scr);
442 1.2 macallan }
443 1.55 riastrad
444 1.1 macallan if (existing) {
445 1.2 macallan SCREEN_VISIBLE(scr);
446 1.2 macallan vd->active = scr;
447 1.1 macallan } else {
448 1.2 macallan SCREEN_INVISIBLE(scr);
449 1.1 macallan }
450 1.55 riastrad
451 1.63 riastrad LIST_INSERT_HEAD(&vdp->screens, scr, next);
452 1.1 macallan return 0;
453 1.1 macallan }
454 1.1 macallan
455 1.37 macallan static int
456 1.37 macallan vcons_load_font(void *v, void *cookie, struct wsdisplay_font *f)
457 1.37 macallan {
458 1.37 macallan struct vcons_data *vd = v;
459 1.63 riastrad struct vcons_data_private *vdp = vd->private;
460 1.37 macallan struct vcons_screen *scr = cookie;
461 1.37 macallan struct rasops_info *ri;
462 1.37 macallan struct wsdisplay_font *font;
463 1.37 macallan int flags = WSFONT_FIND_BITMAP, fcookie;
464 1.37 macallan
465 1.37 macallan /* see if we're asked to add a font or use it */
466 1.37 macallan if (scr == NULL)
467 1.37 macallan return 0;
468 1.37 macallan
469 1.37 macallan ri = &scr->scr_ri;
470 1.37 macallan
471 1.37 macallan /* see if the driver knows how to handle multiple fonts */
472 1.37 macallan if ((scr->scr_flags & VCONS_LOADFONT) == 0) {
473 1.37 macallan return EOPNOTSUPP;
474 1.37 macallan }
475 1.37 macallan
476 1.37 macallan /* now see what fonts we can use */
477 1.37 macallan if (ri->ri_flg & RI_ENABLE_ALPHA) {
478 1.37 macallan flags |= WSFONT_FIND_ALPHA;
479 1.37 macallan }
480 1.37 macallan
481 1.37 macallan fcookie = wsfont_find(f->name, 0, 0, 0, 0, 0, flags);
482 1.37 macallan if (fcookie == -1)
483 1.37 macallan return EINVAL;
484 1.37 macallan
485 1.37 macallan wsfont_lock(fcookie, &font);
486 1.37 macallan if (font == NULL)
487 1.37 macallan return EINVAL;
488 1.37 macallan
489 1.37 macallan /* ok, we got a font. Now clear the screen with the old parameters */
490 1.37 macallan if (SCREEN_IS_VISIBLE(scr))
491 1.63 riastrad vdp->eraserows(ri, 0, ri->ri_rows, scr->scr_defattr);
492 1.37 macallan
493 1.37 macallan vcons_lock(vd->active);
494 1.37 macallan #ifdef VCONS_DRAW_INTR
495 1.63 riastrad callout_halt(&vdp->intr, NULL);
496 1.37 macallan #endif
497 1.37 macallan /* set the new font and re-initialize things */
498 1.37 macallan ri->ri_font = font;
499 1.37 macallan wsfont_unlock(ri->ri_wsfcookie);
500 1.37 macallan ri->ri_wsfcookie = fcookie;
501 1.37 macallan
502 1.37 macallan vd->init_screen(vd->cookie, scr, 1, &scr->scr_defattr);
503 1.37 macallan DPRINTF("caps %x %x\n", scr->scr_type->capabilities, ri->ri_caps);
504 1.37 macallan if (scr->scr_type->capabilities & WSSCREEN_RESIZE) {
505 1.37 macallan scr->scr_type->nrows = ri->ri_rows;
506 1.37 macallan scr->scr_type->ncols = ri->ri_cols;
507 1.37 macallan DPRINTF("new size %d %d\n", ri->ri_rows, ri->ri_cols);
508 1.37 macallan }
509 1.37 macallan
510 1.37 macallan
511 1.37 macallan /* now, throw the old buffers away */
512 1.37 macallan if (scr->scr_attrs)
513 1.37 macallan free(scr->scr_attrs, M_DEVBUF);
514 1.37 macallan /* allocate new buffers */
515 1.37 macallan vcons_alloc_buffers(vd, scr);
516 1.55 riastrad
517 1.55 riastrad /* save the potentially changed ri_ops */
518 1.63 riastrad vdp->eraserows = ri->ri_ops.eraserows;
519 1.63 riastrad vdp->erasecols = ri->ri_ops.erasecols;
520 1.37 macallan scr->putchar = ri->ri_ops.putchar;
521 1.63 riastrad vdp->cursor = ri->ri_ops.cursor;
522 1.40 rin
523 1.40 rin if (scr->scr_flags & VCONS_NO_COPYCOLS) {
524 1.63 riastrad vdp->copycols = vcons_copycols_noread;
525 1.40 rin } else {
526 1.63 riastrad vdp->copycols = ri->ri_ops.copycols;
527 1.40 rin }
528 1.40 rin
529 1.40 rin if (scr->scr_flags & VCONS_NO_COPYROWS) {
530 1.63 riastrad vdp->copyrows = vcons_copyrows_noread;
531 1.40 rin } else {
532 1.63 riastrad vdp->copyrows = ri->ri_ops.copyrows;
533 1.40 rin }
534 1.37 macallan
535 1.50 macallan if (scr->scr_flags & VCONS_NO_CURSOR) {
536 1.63 riastrad vdp->cursor = vcons_cursor_noread;
537 1.50 macallan } else {
538 1.63 riastrad vdp->cursor = ri->ri_ops.cursor;
539 1.50 macallan }
540 1.50 macallan
541 1.37 macallan /* and put our wrappers back */
542 1.55 riastrad ri->ri_ops.eraserows = vcons_eraserows;
543 1.55 riastrad ri->ri_ops.erasecols = vcons_erasecols;
544 1.37 macallan ri->ri_ops.putchar = vcons_putchar;
545 1.50 macallan ri->ri_ops.cursor = vcons_cursor;
546 1.37 macallan ri->ri_ops.copycols = vcons_copycols;
547 1.37 macallan ri->ri_ops.copyrows = vcons_copyrows;
548 1.37 macallan vcons_unlock(vd->active);
549 1.38 macallan
550 1.38 macallan /* notify things that we're about to redraw */
551 1.38 macallan if (vd->show_screen_cb != NULL)
552 1.38 macallan vd->show_screen_cb(scr, vd->show_screen_cookie);
553 1.55 riastrad
554 1.37 macallan #ifdef VCONS_DRAW_INTR
555 1.37 macallan /*
556 1.37 macallan * XXX
557 1.55 riastrad * Something(tm) craps all over VRAM somewhere up there if we're
558 1.37 macallan * using VCONS_DRAW_INTR. Until I figure out what causes it, just
559 1.37 macallan * redraw the screen for now.
560 1.37 macallan */
561 1.37 macallan vcons_redraw_screen(vd->active);
562 1.63 riastrad callout_schedule(&vdp->intr, mstohz(33));
563 1.37 macallan #endif
564 1.37 macallan /* no need to draw anything, wsdisplay should reset the terminal */
565 1.37 macallan
566 1.37 macallan return 0;
567 1.55 riastrad }
568 1.37 macallan
569 1.1 macallan static void
570 1.15 joerg vcons_do_switch(void *arg)
571 1.1 macallan {
572 1.15 joerg struct vcons_data *vd = arg;
573 1.63 riastrad struct vcons_data_private *vdp = vd->private;
574 1.1 macallan struct vcons_screen *scr, *oldscr;
575 1.1 macallan
576 1.63 riastrad scr = vdp->wanted;
577 1.1 macallan if (!scr) {
578 1.1 macallan printf("vcons_switch_screen: disappeared\n");
579 1.63 riastrad vdp->switch_cb(vdp->switch_cb_arg, EIO, 0);
580 1.1 macallan return;
581 1.1 macallan }
582 1.1 macallan oldscr = vd->active; /* can be NULL! */
583 1.1 macallan
584 1.55 riastrad /*
585 1.1 macallan * if there's an old, visible screen we mark it invisible and wait
586 1.55 riastrad * until it's not busy so we can safely switch
587 1.1 macallan */
588 1.1 macallan if (oldscr != NULL) {
589 1.1 macallan SCREEN_INVISIBLE(oldscr);
590 1.1 macallan if (SCREEN_IS_BUSY(oldscr)) {
591 1.63 riastrad callout_schedule(&vdp->switch_callout, 1);
592 1.1 macallan #ifdef DIAGNOSTIC
593 1.1 macallan /* bitch if we wait too long */
594 1.63 riastrad vdp->switch_poll_count++;
595 1.63 riastrad if (vdp->switch_poll_count > 100) {
596 1.1 macallan panic("vcons: screen still busy");
597 1.1 macallan }
598 1.1 macallan #endif
599 1.1 macallan return;
600 1.1 macallan }
601 1.1 macallan /* invisible screen -> no visible cursor image */
602 1.1 macallan oldscr->scr_ri.ri_flg &= ~RI_CURSOR;
603 1.1 macallan #ifdef DIAGNOSTIC
604 1.63 riastrad vdp->switch_poll_count = 0;
605 1.1 macallan #endif
606 1.1 macallan }
607 1.1 macallan
608 1.1 macallan if (scr == oldscr)
609 1.1 macallan return;
610 1.1 macallan
611 1.1 macallan #ifdef DIAGNOSTIC
612 1.1 macallan if (SCREEN_IS_VISIBLE(scr))
613 1.14 macallan printf("vcons_switch_screen: already active");
614 1.1 macallan #endif
615 1.1 macallan
616 1.1 macallan #ifdef notyet
617 1.63 riastrad if (vdp->currenttype != type) {
618 1.1 macallan vcons_set_screentype(vd, type);
619 1.63 riastrad vdp->currenttype = type;
620 1.1 macallan }
621 1.1 macallan #endif
622 1.1 macallan
623 1.1 macallan SCREEN_VISIBLE(scr);
624 1.1 macallan vd->active = scr;
625 1.63 riastrad vdp->wanted = NULL;
626 1.1 macallan
627 1.37 macallan #ifdef VCONS_DRAW_INTR
628 1.37 macallan vcons_invalidate_cache(vd);
629 1.37 macallan #endif
630 1.37 macallan
631 1.1 macallan if (vd->show_screen_cb != NULL)
632 1.38 macallan vd->show_screen_cb(scr, vd->show_screen_cookie);
633 1.1 macallan
634 1.1 macallan if ((scr->scr_flags & VCONS_NO_REDRAW) == 0)
635 1.1 macallan vcons_redraw_screen(scr);
636 1.1 macallan
637 1.63 riastrad if (vdp->switch_cb)
638 1.63 riastrad vdp->switch_cb(vdp->switch_cb_arg, 0, 0);
639 1.1 macallan }
640 1.1 macallan
641 1.1 macallan void
642 1.1 macallan vcons_redraw_screen(struct vcons_screen *scr)
643 1.1 macallan {
644 1.28 macallan uint32_t *charptr = scr->scr_chars, c;
645 1.28 macallan long *attrptr = scr->scr_attrs, a, last_a = 0, mask, cmp, acmp;
646 1.1 macallan struct rasops_info *ri = &scr->scr_ri;
647 1.25 macallan struct vcons_data *vd = scr->scr_vd;
648 1.63 riastrad struct vcons_data_private *vdp = vd->private;
649 1.28 macallan int i, j, offset, boffset = 0, start = -1;
650 1.1 macallan
651 1.28 macallan mask = 0x00ff00ff; /* background and flags */
652 1.36 macallan cmp = 0xffffffff; /* never match anything */
653 1.1 macallan vcons_lock(scr);
654 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
655 1.1 macallan
656 1.1 macallan /*
657 1.1 macallan * only clear the screen when RI_FULLCLEAR is set since we're
658 1.1 macallan * going to overwrite every single character cell anyway
659 1.1 macallan */
660 1.1 macallan if (ri->ri_flg & RI_FULLCLEAR) {
661 1.63 riastrad vdp->eraserows(ri, 0, ri->ri_rows,
662 1.1 macallan scr->scr_defattr);
663 1.28 macallan cmp = scr->scr_defattr & mask;
664 1.1 macallan }
665 1.1 macallan
666 1.1 macallan /* redraw the screen */
667 1.14 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
668 1.14 macallan offset = scr->scr_current_offset;
669 1.14 macallan #else
670 1.1 macallan offset = 0;
671 1.14 macallan #endif
672 1.1 macallan for (i = 0; i < ri->ri_rows; i++) {
673 1.28 macallan start = -1;
674 1.1 macallan for (j = 0; j < ri->ri_cols; j++) {
675 1.1 macallan /*
676 1.55 riastrad * no need to use the wrapper function - we
677 1.1 macallan * don't change any characters or attributes
678 1.1 macallan * and we already made sure the screen we're
679 1.1 macallan * working on is visible
680 1.1 macallan */
681 1.28 macallan c = charptr[offset];
682 1.28 macallan a = attrptr[offset];
683 1.28 macallan acmp = a & mask;
684 1.28 macallan if (c == ' ') {
685 1.28 macallan /*
686 1.28 macallan * if we already erased the background
687 1.55 riastrad * and if this blank uses the same
688 1.48 macallan * colour and flags we don't need to do
689 1.28 macallan * anything here
690 1.28 macallan */
691 1.45 macallan if (acmp == cmp && start == -1)
692 1.28 macallan goto next;
693 1.28 macallan /*
694 1.28 macallan * see if we can optimize things a
695 1.28 macallan * little bit by drawing stretches of
696 1.28 macallan * blanks using erasecols
697 1.28 macallan */
698 1.55 riastrad
699 1.28 macallan if (start == -1) {
700 1.28 macallan start = j;
701 1.28 macallan last_a = acmp;
702 1.28 macallan } else if (acmp != last_a) {
703 1.28 macallan /*
704 1.28 macallan * different attr, need to
705 1.55 riastrad * flush & restart
706 1.28 macallan */
707 1.63 riastrad vdp->erasecols(ri, i, start,
708 1.28 macallan j - start, last_a);
709 1.36 macallan start = j;
710 1.36 macallan last_a = acmp;
711 1.28 macallan }
712 1.28 macallan } else {
713 1.28 macallan if (start != -1) {
714 1.63 riastrad vdp->erasecols(ri, i, start,
715 1.28 macallan j - start, last_a);
716 1.28 macallan start = -1;
717 1.28 macallan }
718 1.55 riastrad
719 1.37 macallan scr->putchar(ri, i, j, c, a);
720 1.28 macallan }
721 1.28 macallan next:
722 1.25 macallan #ifdef VCONS_DRAW_INTR
723 1.63 riastrad vdp->chars[boffset] = charptr[offset];
724 1.63 riastrad vdp->attrs[boffset] = attrptr[offset];
725 1.25 macallan #endif
726 1.25 macallan offset++;
727 1.25 macallan boffset++;
728 1.25 macallan }
729 1.28 macallan /* end of the line - draw all defered blanks, if any */
730 1.28 macallan if (start != -1) {
731 1.63 riastrad vdp->erasecols(ri, i, start, j - start, last_a);
732 1.55 riastrad }
733 1.25 macallan }
734 1.25 macallan ri->ri_flg &= ~RI_CURSOR;
735 1.63 riastrad scr->scr_vd->private->cursor(ri, 1, ri->ri_crow, ri->ri_ccol);
736 1.25 macallan #ifdef VCONS_DRAW_INTR
737 1.63 riastrad vdp->cursor_offset = ri->ri_crow * ri->ri_cols + ri->ri_ccol;
738 1.25 macallan #endif
739 1.25 macallan }
740 1.25 macallan vcons_unlock(scr);
741 1.25 macallan }
742 1.25 macallan
743 1.25 macallan void
744 1.25 macallan vcons_update_screen(struct vcons_screen *scr)
745 1.25 macallan {
746 1.63 riastrad #ifdef VCONS_DRAW_INTR
747 1.27 macallan uint32_t *charptr = scr->scr_chars;
748 1.25 macallan long *attrptr = scr->scr_attrs;
749 1.25 macallan struct rasops_info *ri = &scr->scr_ri;
750 1.25 macallan struct vcons_data *vd = scr->scr_vd;
751 1.63 riastrad struct vcons_data_private *vdp = vd->private;
752 1.25 macallan int i, j, offset, boffset = 0;
753 1.25 macallan
754 1.25 macallan vcons_lock(scr);
755 1.25 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
756 1.25 macallan
757 1.25 macallan /* redraw the screen */
758 1.25 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
759 1.25 macallan offset = scr->scr_current_offset;
760 1.25 macallan #else
761 1.25 macallan offset = 0;
762 1.25 macallan #endif
763 1.25 macallan /*
764 1.25 macallan * we mark the character cell occupied by the cursor as dirty
765 1.25 macallan * so we don't have to deal with it
766 1.25 macallan * notice that this isn't necessarily the position where rasops
767 1.25 macallan * thinks it is, just where we drew it the last time
768 1.25 macallan */
769 1.63 riastrad if (vdp->cursor_offset >= 0)
770 1.63 riastrad vdp->attrs[vdp->cursor_offset] = 0xffffffff;
771 1.25 macallan
772 1.25 macallan for (i = 0; i < ri->ri_rows; i++) {
773 1.25 macallan for (j = 0; j < ri->ri_cols; j++) {
774 1.25 macallan /*
775 1.55 riastrad * no need to use the wrapper function - we
776 1.25 macallan * don't change any characters or attributes
777 1.25 macallan * and we already made sure the screen we're
778 1.25 macallan * working on is visible
779 1.25 macallan */
780 1.63 riastrad if ((vdp->chars[boffset] != charptr[offset]) ||
781 1.63 riastrad (vdp->attrs[boffset] != attrptr[offset])) {
782 1.55 riastrad scr->putchar(ri, i, j,
783 1.25 macallan charptr[offset], attrptr[offset]);
784 1.63 riastrad vdp->chars[boffset] = charptr[offset];
785 1.63 riastrad vdp->attrs[boffset] = attrptr[offset];
786 1.25 macallan }
787 1.1 macallan offset++;
788 1.25 macallan boffset++;
789 1.1 macallan }
790 1.1 macallan }
791 1.1 macallan ri->ri_flg &= ~RI_CURSOR;
792 1.63 riastrad scr->scr_vd->private->cursor(ri, 1, ri->ri_crow, ri->ri_ccol);
793 1.63 riastrad vdp->cursor_offset = ri->ri_crow * ri->ri_cols + ri->ri_ccol;
794 1.1 macallan }
795 1.1 macallan vcons_unlock(scr);
796 1.63 riastrad #else /* !VCONS_DRAW_INTR */
797 1.63 riastrad vcons_redraw_screen(scr);
798 1.63 riastrad #endif
799 1.1 macallan }
800 1.1 macallan
801 1.1 macallan static int
802 1.10 christos vcons_ioctl(void *v, void *vs, u_long cmd, void *data, int flag,
803 1.6 jmmv struct lwp *l)
804 1.6 jmmv {
805 1.6 jmmv struct vcons_data *vd = v;
806 1.63 riastrad struct vcons_data_private *vdp = vd->private;
807 1.27 macallan int error = 0;
808 1.27 macallan
809 1.6 jmmv
810 1.6 jmmv switch (cmd) {
811 1.6 jmmv case WSDISPLAYIO_GETWSCHAR:
812 1.6 jmmv error = vcons_getwschar((struct vcons_screen *)vs,
813 1.6 jmmv (struct wsdisplay_char *)data);
814 1.6 jmmv break;
815 1.6 jmmv
816 1.6 jmmv case WSDISPLAYIO_PUTWSCHAR:
817 1.6 jmmv error = vcons_putwschar((struct vcons_screen *)vs,
818 1.6 jmmv (struct wsdisplay_char *)data);
819 1.6 jmmv break;
820 1.6 jmmv
821 1.27 macallan case WSDISPLAYIO_SET_POLLING: {
822 1.27 macallan int poll = *(int *)data;
823 1.27 macallan
824 1.27 macallan /* first call the driver's ioctl handler */
825 1.63 riastrad if (vdp->ioctl != NULL)
826 1.63 riastrad error = (*vdp->ioctl)(v, vs, cmd, data, flag, l);
827 1.27 macallan if (poll) {
828 1.27 macallan vcons_enable_polling(vd);
829 1.63 riastrad vcons_hard_switch(LIST_FIRST(&vdp->screens));
830 1.27 macallan } else
831 1.27 macallan vcons_disable_polling(vd);
832 1.27 macallan }
833 1.27 macallan break;
834 1.27 macallan
835 1.6 jmmv default:
836 1.63 riastrad if (vdp->ioctl != NULL)
837 1.63 riastrad error = (*vdp->ioctl)(v, vs, cmd, data, flag, l);
838 1.6 jmmv else
839 1.6 jmmv error = EPASSTHROUGH;
840 1.6 jmmv }
841 1.6 jmmv
842 1.6 jmmv return error;
843 1.6 jmmv }
844 1.6 jmmv
845 1.6 jmmv static int
846 1.1 macallan vcons_alloc_screen(void *v, const struct wsscreen_descr *type, void **cookiep,
847 1.1 macallan int *curxp, int *curyp, long *defattrp)
848 1.1 macallan {
849 1.1 macallan struct vcons_data *vd = v;
850 1.63 riastrad struct vcons_data_private *vdp = vd->private;
851 1.1 macallan struct vcons_screen *scr;
852 1.37 macallan struct wsscreen_descr *t = __UNCONST(type);
853 1.1 macallan int ret;
854 1.1 macallan
855 1.1 macallan scr = malloc(sizeof(struct vcons_screen), M_DEVBUF, M_WAITOK | M_ZERO);
856 1.1 macallan if (scr == NULL)
857 1.1 macallan return ENOMEM;
858 1.1 macallan
859 1.55 riastrad scr->scr_flags = 0;
860 1.2 macallan scr->scr_status = 0;
861 1.2 macallan scr->scr_busy = 0;
862 1.37 macallan scr->scr_type = __UNCONST(type);
863 1.1 macallan
864 1.1 macallan ret = vcons_init_screen(vd, scr, 0, defattrp);
865 1.1 macallan if (ret != 0) {
866 1.1 macallan free(scr, M_DEVBUF);
867 1.1 macallan return ret;
868 1.1 macallan }
869 1.37 macallan if (t->capabilities & WSSCREEN_RESIZE) {
870 1.37 macallan t->nrows = scr->scr_ri.ri_rows;
871 1.37 macallan t->ncols = scr->scr_ri.ri_cols;
872 1.37 macallan }
873 1.1 macallan
874 1.1 macallan if (vd->active == NULL) {
875 1.1 macallan SCREEN_VISIBLE(scr);
876 1.1 macallan vd->active = scr;
877 1.63 riastrad vdp->currenttype = type;
878 1.1 macallan }
879 1.1 macallan
880 1.1 macallan *cookiep = scr;
881 1.1 macallan *curxp = scr->scr_ri.ri_ccol;
882 1.1 macallan *curyp = scr->scr_ri.ri_crow;
883 1.1 macallan return 0;
884 1.1 macallan }
885 1.1 macallan
886 1.1 macallan static void
887 1.1 macallan vcons_free_screen(void *v, void *cookie)
888 1.1 macallan {
889 1.1 macallan struct vcons_data *vd = v;
890 1.1 macallan struct vcons_screen *scr = cookie;
891 1.1 macallan
892 1.1 macallan vcons_lock(scr);
893 1.1 macallan /* there should be no rasops activity here */
894 1.1 macallan
895 1.1 macallan LIST_REMOVE(scr, next);
896 1.1 macallan
897 1.1 macallan if ((scr->scr_flags & VCONS_SCREEN_IS_STATIC) == 0) {
898 1.1 macallan free(scr->scr_attrs, M_DEVBUF);
899 1.1 macallan free(scr, M_DEVBUF);
900 1.1 macallan } else {
901 1.1 macallan /*
902 1.1 macallan * maybe we should just restore the old rasops_info methods
903 1.1 macallan * and free the character/attribute buffer here?
904 1.1 macallan */
905 1.1 macallan #ifdef VCONS_DEBUG
906 1.1 macallan panic("vcons_free_screen: console");
907 1.1 macallan #else
908 1.1 macallan printf("vcons_free_screen: console\n");
909 1.1 macallan #endif
910 1.1 macallan }
911 1.1 macallan
912 1.1 macallan if (vd->active == scr)
913 1.1 macallan vd->active = NULL;
914 1.1 macallan }
915 1.1 macallan
916 1.1 macallan static int
917 1.9 christos vcons_show_screen(void *v, void *cookie, int waitok,
918 1.1 macallan void (*cb)(void *, int, int), void *cb_arg)
919 1.1 macallan {
920 1.1 macallan struct vcons_data *vd = v;
921 1.63 riastrad struct vcons_data_private *vdp = vd->private;
922 1.1 macallan struct vcons_screen *scr;
923 1.1 macallan
924 1.1 macallan scr = cookie;
925 1.1 macallan if (scr == vd->active)
926 1.1 macallan return 0;
927 1.1 macallan
928 1.63 riastrad vdp->wanted = scr;
929 1.63 riastrad vdp->switch_cb = cb;
930 1.63 riastrad vdp->switch_cb_arg = cb_arg;
931 1.1 macallan if (cb) {
932 1.63 riastrad callout_schedule(&vdp->switch_callout, 0);
933 1.1 macallan return EAGAIN;
934 1.1 macallan }
935 1.1 macallan
936 1.1 macallan vcons_do_switch(vd);
937 1.1 macallan return 0;
938 1.1 macallan }
939 1.1 macallan
940 1.1 macallan /* wrappers for rasops_info methods */
941 1.1 macallan
942 1.1 macallan static void
943 1.1 macallan vcons_copycols_buffer(void *cookie, int row, int srccol, int dstcol, int ncols)
944 1.1 macallan {
945 1.1 macallan struct rasops_info *ri = cookie;
946 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
947 1.1 macallan int from = srccol + row * ri->ri_cols;
948 1.1 macallan int to = dstcol + row * ri->ri_cols;
949 1.56 riastrad int offset = vcons_offset_to_zero(scr);
950 1.14 macallan
951 1.14 macallan memmove(&scr->scr_attrs[offset + to], &scr->scr_attrs[offset + from],
952 1.14 macallan ncols * sizeof(long));
953 1.14 macallan memmove(&scr->scr_chars[offset + to], &scr->scr_chars[offset + from],
954 1.27 macallan ncols * sizeof(uint32_t));
955 1.20 jmcneill
956 1.58 riastrad vcons_dirty(scr);
957 1.1 macallan }
958 1.1 macallan
959 1.1 macallan static void
960 1.1 macallan vcons_copycols(void *cookie, int row, int srccol, int dstcol, int ncols)
961 1.1 macallan {
962 1.1 macallan struct rasops_info *ri = cookie;
963 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
964 1.1 macallan
965 1.1 macallan vcons_copycols_buffer(cookie, row, srccol, dstcol, ncols);
966 1.1 macallan
967 1.57 riastrad if (vcons_use_intr(scr))
968 1.21 jmcneill return;
969 1.21 jmcneill
970 1.1 macallan vcons_lock(scr);
971 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
972 1.34 mlelstv #if defined(VCONS_DRAW_INTR)
973 1.34 mlelstv vcons_update_screen(scr);
974 1.34 mlelstv #else
975 1.63 riastrad scr->scr_vd->private->copycols(cookie, row, srccol, dstcol,
976 1.63 riastrad ncols);
977 1.30 mlelstv #endif
978 1.1 macallan }
979 1.1 macallan vcons_unlock(scr);
980 1.1 macallan }
981 1.1 macallan
982 1.1 macallan static void
983 1.17 macallan vcons_copycols_noread(void *cookie, int row, int srccol, int dstcol, int ncols)
984 1.17 macallan {
985 1.17 macallan struct rasops_info *ri = cookie;
986 1.17 macallan struct vcons_screen *scr = ri->ri_hw;
987 1.37 macallan #ifdef VCONS_DRAW_INTR
988 1.25 macallan struct vcons_data *vd = scr->scr_vd;
989 1.63 riastrad struct vcons_data_private *vdp = vd->private;
990 1.37 macallan #endif
991 1.17 macallan
992 1.30 mlelstv vcons_lock(scr);
993 1.17 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
994 1.25 macallan int pos, c, offset, ppos;
995 1.17 macallan
996 1.17 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
997 1.17 macallan offset = scr->scr_current_offset;
998 1.17 macallan #else
999 1.17 macallan offset = 0;
1000 1.17 macallan #endif
1001 1.25 macallan ppos = ri->ri_cols * row + dstcol;
1002 1.25 macallan pos = ppos + offset;
1003 1.17 macallan for (c = dstcol; c < (dstcol + ncols); c++) {
1004 1.25 macallan #ifdef VCONS_DRAW_INTR
1005 1.63 riastrad if ((scr->scr_chars[pos] != vdp->chars[ppos]) ||
1006 1.63 riastrad (scr->scr_attrs[pos] != vdp->attrs[ppos])) {
1007 1.55 riastrad scr->putchar(cookie, row, c,
1008 1.25 macallan scr->scr_chars[pos], scr->scr_attrs[pos]);
1009 1.63 riastrad vdp->chars[ppos] = scr->scr_chars[pos];
1010 1.63 riastrad vdp->attrs[ppos] = scr->scr_attrs[pos];
1011 1.25 macallan }
1012 1.25 macallan #else
1013 1.37 macallan scr->putchar(cookie, row, c, scr->scr_chars[pos],
1014 1.25 macallan scr->scr_attrs[pos]);
1015 1.25 macallan #endif
1016 1.17 macallan pos++;
1017 1.25 macallan ppos++;
1018 1.17 macallan }
1019 1.55 riastrad if (ri->ri_crow == row &&
1020 1.50 macallan (ri->ri_ccol >= dstcol && ri->ri_ccol < (dstcol + ncols )))
1021 1.50 macallan ri->ri_flg &= ~RI_CURSOR;
1022 1.17 macallan }
1023 1.30 mlelstv vcons_unlock(scr);
1024 1.17 macallan }
1025 1.17 macallan
1026 1.17 macallan static void
1027 1.1 macallan vcons_erasecols_buffer(void *cookie, int row, int startcol, int ncols, long fillattr)
1028 1.1 macallan {
1029 1.1 macallan struct rasops_info *ri = cookie;
1030 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1031 1.1 macallan int start = startcol + row * ri->ri_cols;
1032 1.1 macallan int end = start + ncols, i;
1033 1.56 riastrad int offset = vcons_offset_to_zero(scr);
1034 1.14 macallan
1035 1.14 macallan for (i = start; i < end; i++) {
1036 1.14 macallan scr->scr_attrs[offset + i] = fillattr;
1037 1.14 macallan scr->scr_chars[offset + i] = 0x20;
1038 1.14 macallan }
1039 1.20 jmcneill
1040 1.58 riastrad vcons_dirty(scr);
1041 1.1 macallan }
1042 1.1 macallan
1043 1.25 macallan #ifdef VCONS_DRAW_INTR
1044 1.25 macallan static void
1045 1.25 macallan vcons_erasecols_cached(void *cookie, int row, int startcol, int ncols, long fillattr)
1046 1.25 macallan {
1047 1.25 macallan struct rasops_info *ri = cookie;
1048 1.25 macallan struct vcons_screen *scr = ri->ri_hw;
1049 1.25 macallan struct vcons_data *vd = scr->scr_vd;
1050 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1051 1.25 macallan int i, pos = row * ri->ri_cols + startcol;
1052 1.25 macallan
1053 1.63 riastrad vdp->erasecols(cookie, row, startcol, ncols, fillattr);
1054 1.25 macallan for (i = pos; i < ncols; i++) {
1055 1.63 riastrad vdp->chars[i] = scr->scr_chars[i];
1056 1.63 riastrad vdp->attrs[i] = scr->scr_attrs[i];
1057 1.25 macallan }
1058 1.25 macallan }
1059 1.25 macallan #endif
1060 1.25 macallan
1061 1.1 macallan static void
1062 1.1 macallan vcons_erasecols(void *cookie, int row, int startcol, int ncols, long fillattr)
1063 1.1 macallan {
1064 1.1 macallan struct rasops_info *ri = cookie;
1065 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1066 1.1 macallan
1067 1.1 macallan vcons_erasecols_buffer(cookie, row, startcol, ncols, fillattr);
1068 1.1 macallan
1069 1.57 riastrad if (vcons_use_intr(scr))
1070 1.21 jmcneill return;
1071 1.21 jmcneill
1072 1.1 macallan vcons_lock(scr);
1073 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
1074 1.25 macallan #ifdef VCONS_DRAW_INTR
1075 1.55 riastrad vcons_erasecols_cached(cookie, row, startcol, ncols,
1076 1.30 mlelstv fillattr);
1077 1.25 macallan #else
1078 1.63 riastrad scr->scr_vd->private->erasecols(cookie, row, startcol, ncols,
1079 1.63 riastrad fillattr);
1080 1.55 riastrad #endif
1081 1.1 macallan }
1082 1.1 macallan vcons_unlock(scr);
1083 1.1 macallan }
1084 1.1 macallan
1085 1.1 macallan static void
1086 1.1 macallan vcons_copyrows_buffer(void *cookie, int srcrow, int dstrow, int nrows)
1087 1.1 macallan {
1088 1.1 macallan struct rasops_info *ri = cookie;
1089 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1090 1.1 macallan int from, to, len;
1091 1.56 riastrad int offset = vcons_offset_to_zero(scr);
1092 1.14 macallan
1093 1.14 macallan /* do we need to scroll the back buffer? */
1094 1.56 riastrad if (dstrow == 0 && offset != 0) {
1095 1.14 macallan from = ri->ri_cols * srcrow;
1096 1.14 macallan to = ri->ri_cols * dstrow;
1097 1.14 macallan
1098 1.14 macallan memmove(&scr->scr_attrs[to], &scr->scr_attrs[from],
1099 1.56 riastrad offset * sizeof(long));
1100 1.14 macallan memmove(&scr->scr_chars[to], &scr->scr_chars[from],
1101 1.56 riastrad offset * sizeof(uint32_t));
1102 1.14 macallan }
1103 1.14 macallan from = ri->ri_cols * srcrow + offset;
1104 1.14 macallan to = ri->ri_cols * dstrow + offset;
1105 1.55 riastrad len = ri->ri_cols * nrows;
1106 1.55 riastrad
1107 1.1 macallan memmove(&scr->scr_attrs[to], &scr->scr_attrs[from],
1108 1.1 macallan len * sizeof(long));
1109 1.1 macallan memmove(&scr->scr_chars[to], &scr->scr_chars[from],
1110 1.27 macallan len * sizeof(uint32_t));
1111 1.20 jmcneill
1112 1.58 riastrad vcons_dirty(scr);
1113 1.1 macallan }
1114 1.1 macallan
1115 1.1 macallan static void
1116 1.1 macallan vcons_copyrows(void *cookie, int srcrow, int dstrow, int nrows)
1117 1.1 macallan {
1118 1.1 macallan struct rasops_info *ri = cookie;
1119 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1120 1.1 macallan
1121 1.1 macallan vcons_copyrows_buffer(cookie, srcrow, dstrow, nrows);
1122 1.1 macallan
1123 1.57 riastrad if (vcons_use_intr(scr))
1124 1.21 jmcneill return;
1125 1.21 jmcneill
1126 1.1 macallan vcons_lock(scr);
1127 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
1128 1.34 mlelstv #if defined(VCONS_DRAW_INTR)
1129 1.34 mlelstv vcons_update_screen(scr);
1130 1.34 mlelstv #else
1131 1.63 riastrad scr->scr_vd->private->copyrows(cookie, srcrow, dstrow, nrows);
1132 1.30 mlelstv #endif
1133 1.1 macallan }
1134 1.1 macallan vcons_unlock(scr);
1135 1.1 macallan }
1136 1.1 macallan
1137 1.1 macallan static void
1138 1.17 macallan vcons_copyrows_noread(void *cookie, int srcrow, int dstrow, int nrows)
1139 1.17 macallan {
1140 1.17 macallan struct rasops_info *ri = cookie;
1141 1.17 macallan struct vcons_screen *scr = ri->ri_hw;
1142 1.37 macallan #ifdef VCONS_DRAW_INTR
1143 1.25 macallan struct vcons_data *vd = scr->scr_vd;
1144 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1145 1.37 macallan #endif
1146 1.30 mlelstv vcons_lock(scr);
1147 1.17 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
1148 1.25 macallan int pos, l, c, offset, ppos;
1149 1.17 macallan
1150 1.17 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
1151 1.17 macallan offset = scr->scr_current_offset;
1152 1.17 macallan #else
1153 1.17 macallan offset = 0;
1154 1.17 macallan #endif
1155 1.25 macallan ppos = ri->ri_cols * dstrow;
1156 1.25 macallan pos = ppos + offset;
1157 1.17 macallan for (l = dstrow; l < (dstrow + nrows); l++) {
1158 1.17 macallan for (c = 0; c < ri->ri_cols; c++) {
1159 1.25 macallan #ifdef VCONS_DRAW_INTR
1160 1.63 riastrad if ((scr->scr_chars[pos] != vdp->chars[ppos]) ||
1161 1.63 riastrad (scr->scr_attrs[pos] != vdp->attrs[ppos])) {
1162 1.55 riastrad scr->putchar(cookie, l, c,
1163 1.25 macallan scr->scr_chars[pos], scr->scr_attrs[pos]);
1164 1.63 riastrad vdp->chars[ppos] = scr->scr_chars[pos];
1165 1.63 riastrad vdp->attrs[ppos] = scr->scr_attrs[pos];
1166 1.25 macallan }
1167 1.25 macallan #else
1168 1.37 macallan scr->putchar(cookie, l, c, scr->scr_chars[pos],
1169 1.25 macallan scr->scr_attrs[pos]);
1170 1.25 macallan #endif
1171 1.17 macallan pos++;
1172 1.25 macallan ppos++;
1173 1.17 macallan }
1174 1.17 macallan }
1175 1.50 macallan if (ri->ri_crow >= dstrow && ri->ri_crow < (dstrow + nrows))
1176 1.50 macallan ri->ri_flg &= ~RI_CURSOR;
1177 1.17 macallan }
1178 1.30 mlelstv vcons_unlock(scr);
1179 1.17 macallan }
1180 1.17 macallan
1181 1.17 macallan static void
1182 1.1 macallan vcons_eraserows_buffer(void *cookie, int row, int nrows, long fillattr)
1183 1.1 macallan {
1184 1.1 macallan struct rasops_info *ri = cookie;
1185 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1186 1.56 riastrad int offset = vcons_offset_to_zero(scr);
1187 1.1 macallan int start, end, i;
1188 1.1 macallan
1189 1.14 macallan start = ri->ri_cols * row + offset;
1190 1.14 macallan end = ri->ri_cols * (row + nrows) + offset;
1191 1.1 macallan
1192 1.1 macallan for (i = start; i < end; i++) {
1193 1.1 macallan scr->scr_attrs[i] = fillattr;
1194 1.1 macallan scr->scr_chars[i] = 0x20;
1195 1.1 macallan }
1196 1.20 jmcneill
1197 1.58 riastrad vcons_dirty(scr);
1198 1.1 macallan }
1199 1.1 macallan
1200 1.30 mlelstv #ifdef VCONS_DRAW_INTR
1201 1.30 mlelstv static void
1202 1.30 mlelstv vcons_eraserows_cached(void *cookie, int row, int nrows, long fillattr)
1203 1.30 mlelstv {
1204 1.30 mlelstv struct rasops_info *ri = cookie;
1205 1.30 mlelstv struct vcons_screen *scr = ri->ri_hw;
1206 1.30 mlelstv struct vcons_data *vd = scr->scr_vd;
1207 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1208 1.30 mlelstv int i, pos = row * ri->ri_cols, end = (row+nrows) * ri->ri_cols;
1209 1.30 mlelstv
1210 1.30 mlelstv for (i = pos; i < end; i++) {
1211 1.63 riastrad vdp->chars[i] = 0x20;
1212 1.63 riastrad vdp->attrs[i] = fillattr;
1213 1.30 mlelstv }
1214 1.63 riastrad vdp->eraserows(cookie, row, nrows, fillattr);
1215 1.30 mlelstv }
1216 1.30 mlelstv #endif
1217 1.30 mlelstv
1218 1.1 macallan static void
1219 1.1 macallan vcons_eraserows(void *cookie, int row, int nrows, long fillattr)
1220 1.1 macallan {
1221 1.1 macallan struct rasops_info *ri = cookie;
1222 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1223 1.1 macallan
1224 1.1 macallan vcons_eraserows_buffer(cookie, row, nrows, fillattr);
1225 1.1 macallan
1226 1.57 riastrad if (vcons_use_intr(scr))
1227 1.21 jmcneill return;
1228 1.21 jmcneill
1229 1.1 macallan vcons_lock(scr);
1230 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
1231 1.30 mlelstv #ifdef VCONS_DRAW_INTR
1232 1.30 mlelstv vcons_eraserows_cached(cookie, row, nrows, fillattr);
1233 1.30 mlelstv #else
1234 1.63 riastrad scr->scr_vd->private->eraserows(cookie, row, nrows, fillattr);
1235 1.30 mlelstv #endif
1236 1.1 macallan }
1237 1.1 macallan vcons_unlock(scr);
1238 1.1 macallan }
1239 1.1 macallan
1240 1.65 macallan static int
1241 1.1 macallan vcons_putchar_buffer(void *cookie, int row, int col, u_int c, long attr)
1242 1.1 macallan {
1243 1.1 macallan struct rasops_info *ri = cookie;
1244 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1245 1.56 riastrad int offset = vcons_offset_to_zero(scr);
1246 1.65 macallan int pos, ret = 0;
1247 1.55 riastrad
1248 1.55 riastrad if ((row >= 0) && (row < ri->ri_rows) && (col >= 0) &&
1249 1.14 macallan (col < ri->ri_cols)) {
1250 1.14 macallan pos = col + row * ri->ri_cols;
1251 1.65 macallan ret = (scr->scr_attrs[pos + offset] != attr) ||
1252 1.65 macallan (scr->scr_chars[pos + offset] != c);
1253 1.14 macallan scr->scr_attrs[pos + offset] = attr;
1254 1.14 macallan scr->scr_chars[pos + offset] = c;
1255 1.14 macallan }
1256 1.20 jmcneill
1257 1.65 macallan if (ret) vcons_dirty(scr);
1258 1.65 macallan return ret;
1259 1.1 macallan }
1260 1.1 macallan
1261 1.25 macallan #ifdef VCONS_DRAW_INTR
1262 1.25 macallan static void
1263 1.25 macallan vcons_putchar_cached(void *cookie, int row, int col, u_int c, long attr)
1264 1.25 macallan {
1265 1.25 macallan struct rasops_info *ri = cookie;
1266 1.25 macallan struct vcons_screen *scr = ri->ri_hw;
1267 1.25 macallan struct vcons_data *vd = scr->scr_vd;
1268 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1269 1.25 macallan int pos = row * ri->ri_cols + col;
1270 1.25 macallan
1271 1.63 riastrad if ((vdp->chars == NULL) || (vdp->attrs == NULL)) {
1272 1.37 macallan scr->putchar(cookie, row, col, c, attr);
1273 1.25 macallan return;
1274 1.25 macallan }
1275 1.63 riastrad if ((vdp->chars[pos] != c) || (vdp->attrs[pos] != attr)) {
1276 1.63 riastrad vdp->attrs[pos] = attr;
1277 1.63 riastrad vdp->chars[pos] = c;
1278 1.37 macallan scr->putchar(cookie, row, col, c, attr);
1279 1.25 macallan }
1280 1.25 macallan }
1281 1.25 macallan #endif
1282 1.25 macallan
1283 1.1 macallan static void
1284 1.1 macallan vcons_putchar(void *cookie, int row, int col, u_int c, long attr)
1285 1.1 macallan {
1286 1.1 macallan struct rasops_info *ri = cookie;
1287 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1288 1.65 macallan int need_draw;
1289 1.65 macallan
1290 1.65 macallan need_draw = vcons_putchar_buffer(cookie, row, col, c, attr);
1291 1.21 jmcneill
1292 1.57 riastrad if (vcons_use_intr(scr))
1293 1.21 jmcneill return;
1294 1.21 jmcneill
1295 1.1 macallan vcons_lock(scr);
1296 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
1297 1.25 macallan #ifdef VCONS_DRAW_INTR
1298 1.65 macallan if (need_draw) vcons_putchar_cached(cookie, row, col, c, attr);
1299 1.25 macallan #else
1300 1.49 macallan if (row == ri->ri_crow && col == ri->ri_ccol) {
1301 1.49 macallan ri->ri_flg &= ~RI_CURSOR;
1302 1.65 macallan scr->putchar(cookie, row, col, c, attr);
1303 1.65 macallan } else if (need_draw)
1304 1.65 macallan scr->putchar(cookie, row, col, c, attr);
1305 1.25 macallan #endif
1306 1.1 macallan }
1307 1.1 macallan vcons_unlock(scr);
1308 1.1 macallan }
1309 1.1 macallan
1310 1.1 macallan static void
1311 1.1 macallan vcons_cursor(void *cookie, int on, int row, int col)
1312 1.1 macallan {
1313 1.1 macallan struct rasops_info *ri = cookie;
1314 1.1 macallan struct vcons_screen *scr = ri->ri_hw;
1315 1.1 macallan
1316 1.57 riastrad if (vcons_use_intr(scr)) {
1317 1.21 jmcneill vcons_lock(scr);
1318 1.21 jmcneill if (scr->scr_ri.ri_crow != row || scr->scr_ri.ri_ccol != col) {
1319 1.21 jmcneill scr->scr_ri.ri_crow = row;
1320 1.21 jmcneill scr->scr_ri.ri_ccol = col;
1321 1.58 riastrad vcons_dirty(scr);
1322 1.21 jmcneill }
1323 1.21 jmcneill vcons_unlock(scr);
1324 1.21 jmcneill return;
1325 1.20 jmcneill }
1326 1.21 jmcneill
1327 1.21 jmcneill vcons_lock(scr);
1328 1.21 jmcneill
1329 1.5 macallan if (SCREEN_IS_VISIBLE(scr) && SCREEN_CAN_DRAW(scr)) {
1330 1.63 riastrad scr->scr_vd->private->cursor(cookie, on, row, col);
1331 1.1 macallan } else {
1332 1.1 macallan scr->scr_ri.ri_crow = row;
1333 1.1 macallan scr->scr_ri.ri_ccol = col;
1334 1.1 macallan }
1335 1.1 macallan vcons_unlock(scr);
1336 1.1 macallan }
1337 1.1 macallan
1338 1.48 macallan static void
1339 1.48 macallan vcons_cursor_noread(void *cookie, int on, int row, int col)
1340 1.48 macallan {
1341 1.48 macallan struct rasops_info *ri = cookie;
1342 1.48 macallan struct vcons_screen *scr = ri->ri_hw;
1343 1.50 macallan int offset = 0, ofs;
1344 1.48 macallan
1345 1.48 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
1346 1.48 macallan offset = scr->scr_current_offset;
1347 1.48 macallan #endif
1348 1.50 macallan ofs = offset + ri->ri_crow * ri->ri_cols + ri->ri_ccol;
1349 1.55 riastrad if ((ri->ri_flg & RI_CURSOR) &&
1350 1.51 macallan (((scr->scr_flags & VCONS_DONT_READ) != VCONS_DONT_READ) || on)) {
1351 1.50 macallan scr->putchar(cookie, ri->ri_crow, ri->ri_ccol,
1352 1.50 macallan scr->scr_chars[ofs], scr->scr_attrs[ofs]);
1353 1.50 macallan ri->ri_flg &= ~RI_CURSOR;
1354 1.50 macallan }
1355 1.50 macallan ri->ri_crow = row;
1356 1.50 macallan ri->ri_ccol = col;
1357 1.50 macallan ofs = offset + ri->ri_crow * ri->ri_cols + ri->ri_ccol;
1358 1.50 macallan if (on) {
1359 1.50 macallan scr->putchar(cookie, row, col, scr->scr_chars[ofs],
1360 1.48 macallan #ifdef VCONS_DEBUG_CURSOR_NOREAD
1361 1.55 riastrad /* draw a red cursor so we can tell which cursor()
1362 1.50 macallan * implementation is being used */
1363 1.50 macallan ((scr->scr_attrs[ofs] & 0xff00ffff) ^ 0x0f000000) |
1364 1.50 macallan 0x00010000);
1365 1.48 macallan #else
1366 1.50 macallan scr->scr_attrs[ofs] ^ 0x0f0f0000);
1367 1.48 macallan #endif
1368 1.50 macallan ri->ri_flg |= RI_CURSOR;
1369 1.48 macallan }
1370 1.48 macallan }
1371 1.48 macallan
1372 1.1 macallan /* methods to read/write characters via ioctl() */
1373 1.1 macallan
1374 1.1 macallan static int
1375 1.6 jmmv vcons_putwschar(struct vcons_screen *scr, struct wsdisplay_char *wsc)
1376 1.1 macallan {
1377 1.1 macallan long attr;
1378 1.6 jmmv struct rasops_info *ri;
1379 1.35 christos int error;
1380 1.6 jmmv
1381 1.61 riastrad KASSERT(scr != NULL);
1382 1.61 riastrad KASSERT(wsc != NULL);
1383 1.6 jmmv
1384 1.13 rumble ri = &scr->scr_ri;
1385 1.13 rumble
1386 1.44 macallan /* allow col as linear index if row == 0 */
1387 1.44 macallan if (wsc->row == 0) {
1388 1.44 macallan if (wsc->col < 0 || wsc->col > (ri->ri_cols * ri->ri_rows))
1389 1.44 macallan return EINVAL;
1390 1.44 macallan int rem;
1391 1.44 macallan rem = wsc->col % ri->ri_cols;
1392 1.44 macallan wsc->row = wsc->col / ri->ri_cols;
1393 1.44 macallan DPRINTF("off %d -> %d, %d\n", wsc->col, rem, wsc->row);
1394 1.44 macallan wsc->col = rem;
1395 1.44 macallan } else {
1396 1.44 macallan if (__predict_false(wsc->col < 0 || wsc->col >= ri->ri_cols))
1397 1.62 riastrad return EINVAL;
1398 1.55 riastrad
1399 1.44 macallan if (__predict_false(wsc->row < 0 || wsc->row >= ri->ri_rows))
1400 1.62 riastrad return EINVAL;
1401 1.44 macallan }
1402 1.14 macallan
1403 1.44 macallan error = ri->ri_ops.allocattr(ri, wsc->foreground,
1404 1.44 macallan wsc->background, wsc->flags, &attr);
1405 1.44 macallan if (error)
1406 1.44 macallan return error;
1407 1.44 macallan vcons_putchar(ri, wsc->row, wsc->col, wsc->letter, attr);
1408 1.60 riastrad DPRINTF("vcons_putwschar(%d, %d, %x, %lx\n", wsc->row, wsc->col,
1409 1.44 macallan wsc->letter, attr);
1410 1.44 macallan return 0;
1411 1.1 macallan }
1412 1.1 macallan
1413 1.1 macallan static int
1414 1.6 jmmv vcons_getwschar(struct vcons_screen *scr, struct wsdisplay_char *wsc)
1415 1.1 macallan {
1416 1.6 jmmv int offset;
1417 1.1 macallan long attr;
1418 1.6 jmmv struct rasops_info *ri;
1419 1.53 mlelstv int fg, bg, ul;
1420 1.6 jmmv
1421 1.61 riastrad KASSERT(scr != NULL);
1422 1.61 riastrad KASSERT(wsc != NULL);
1423 1.6 jmmv
1424 1.6 jmmv ri = &scr->scr_ri;
1425 1.1 macallan
1426 1.44 macallan /* allow col as linear index if row == 0 */
1427 1.44 macallan if (wsc->row == 0) {
1428 1.44 macallan if (wsc->col < 0 || wsc->col > (ri->ri_cols * ri->ri_rows))
1429 1.44 macallan return EINVAL;
1430 1.44 macallan int rem;
1431 1.44 macallan rem = wsc->col % ri->ri_cols;
1432 1.44 macallan wsc->row = wsc->col / ri->ri_cols;
1433 1.44 macallan DPRINTF("off %d -> %d, %d\n", wsc->col, rem, wsc->row);
1434 1.44 macallan wsc->col = rem;
1435 1.44 macallan } else {
1436 1.44 macallan if (__predict_false(wsc->col < 0 || wsc->col >= ri->ri_cols))
1437 1.62 riastrad return EINVAL;
1438 1.55 riastrad
1439 1.44 macallan if (__predict_false(wsc->row < 0 || wsc->row >= ri->ri_rows))
1440 1.62 riastrad return EINVAL;
1441 1.44 macallan }
1442 1.14 macallan
1443 1.44 macallan offset = ri->ri_cols * wsc->row + wsc->col;
1444 1.56 riastrad offset += vcons_offset_to_zero(scr);
1445 1.44 macallan wsc->letter = scr->scr_chars[offset];
1446 1.44 macallan attr = scr->scr_attrs[offset];
1447 1.14 macallan
1448 1.60 riastrad DPRINTF("vcons_getwschar: %d, %d, %x, %lx\n", wsc->row,
1449 1.53 mlelstv wsc->col, wsc->letter, attr);
1450 1.53 mlelstv
1451 1.55 riastrad /*
1452 1.44 macallan * this is ugly. We need to break up an attribute into colours and
1453 1.44 macallan * flags but there's no rasops method to do that so we must rely on
1454 1.44 macallan * the 'canonical' encoding.
1455 1.44 macallan */
1456 1.53 mlelstv
1457 1.53 mlelstv /* only fetches underline attribute */
1458 1.53 mlelstv /* rasops_unpack_attr(attr, &fg, &bg, &ul); */
1459 1.53 mlelstv fg = (attr >> 24) & 0xf;
1460 1.53 mlelstv bg = (attr >> 16) & 0xf;
1461 1.53 mlelstv ul = (attr & 1);
1462 1.53 mlelstv
1463 1.53 mlelstv wsc->foreground = fg;
1464 1.53 mlelstv wsc->background = bg;
1465 1.53 mlelstv
1466 1.53 mlelstv /* clear trashed bits and restore underline flag */
1467 1.53 mlelstv attr &= ~(WSATTR_HILIT | WSATTR_BLINK | WSATTR_UNDERLINE);
1468 1.53 mlelstv if (ul)
1469 1.53 mlelstv attr |= WSATTR_UNDERLINE;
1470 1.53 mlelstv
1471 1.53 mlelstv /* restore highlight boost */
1472 1.53 mlelstv if (attr & WSATTR_HILIT)
1473 1.53 mlelstv if (wsc->foreground >= 8)
1474 1.53 mlelstv wsc->foreground -= 8;
1475 1.53 mlelstv
1476 1.53 mlelstv /* we always use colors, even when not stored */
1477 1.53 mlelstv attr |= WSATTR_WSCOLORS;
1478 1.44 macallan return 0;
1479 1.14 macallan }
1480 1.14 macallan
1481 1.63 riastrad int
1482 1.63 riastrad vcons_offset_to_zero(const struct vcons_screen *scr)
1483 1.63 riastrad {
1484 1.63 riastrad #ifdef WSDISPLAY_SCROLLSUPPORT
1485 1.63 riastrad return scr->scr_offset_to_zero;
1486 1.63 riastrad #else
1487 1.63 riastrad return 0;
1488 1.63 riastrad #endif
1489 1.63 riastrad }
1490 1.63 riastrad
1491 1.14 macallan #ifdef WSDISPLAY_SCROLLSUPPORT
1492 1.14 macallan
1493 1.14 macallan static void
1494 1.14 macallan vcons_scroll(void *cookie, void *vs, int where)
1495 1.14 macallan {
1496 1.14 macallan struct vcons_screen *scr = vs;
1497 1.14 macallan
1498 1.14 macallan if (where == 0) {
1499 1.14 macallan scr->scr_line_wanted = 0;
1500 1.14 macallan } else {
1501 1.14 macallan scr->scr_line_wanted = scr->scr_line_wanted - where;
1502 1.14 macallan if (scr->scr_line_wanted < 0)
1503 1.14 macallan scr->scr_line_wanted = 0;
1504 1.14 macallan if (scr->scr_line_wanted > scr->scr_lines_in_buffer)
1505 1.14 macallan scr->scr_line_wanted = scr->scr_lines_in_buffer;
1506 1.14 macallan }
1507 1.14 macallan
1508 1.14 macallan if (scr->scr_line_wanted != scr->scr_current_line) {
1509 1.14 macallan
1510 1.14 macallan vcons_do_scroll(scr);
1511 1.14 macallan }
1512 1.14 macallan }
1513 1.14 macallan
1514 1.14 macallan static void
1515 1.14 macallan vcons_do_scroll(struct vcons_screen *scr)
1516 1.14 macallan {
1517 1.14 macallan int dist, from, to, num;
1518 1.14 macallan int r_offset, r_start;
1519 1.14 macallan int i, j;
1520 1.14 macallan
1521 1.14 macallan if (scr->scr_line_wanted == scr->scr_current_line)
1522 1.14 macallan return;
1523 1.14 macallan dist = scr->scr_line_wanted - scr->scr_current_line;
1524 1.14 macallan scr->scr_current_line = scr->scr_line_wanted;
1525 1.14 macallan scr->scr_current_offset = scr->scr_ri.ri_cols *
1526 1.14 macallan (scr->scr_lines_in_buffer - scr->scr_current_line);
1527 1.14 macallan if (abs(dist) >= scr->scr_ri.ri_rows) {
1528 1.14 macallan vcons_redraw_screen(scr);
1529 1.14 macallan return;
1530 1.14 macallan }
1531 1.14 macallan /* scroll and redraw only what we really have to */
1532 1.14 macallan if (dist > 0) {
1533 1.14 macallan /* we scroll down */
1534 1.14 macallan from = 0;
1535 1.14 macallan to = dist;
1536 1.14 macallan num = scr->scr_ri.ri_rows - dist;
1537 1.14 macallan /* now the redraw parameters */
1538 1.14 macallan r_offset = scr->scr_current_offset;
1539 1.14 macallan r_start = 0;
1540 1.14 macallan } else {
1541 1.14 macallan /* scrolling up */
1542 1.14 macallan to = 0;
1543 1.14 macallan from = -dist;
1544 1.14 macallan num = scr->scr_ri.ri_rows + dist;
1545 1.14 macallan r_offset = scr->scr_current_offset + num * scr->scr_ri.ri_cols;
1546 1.14 macallan r_start = num;
1547 1.14 macallan }
1548 1.63 riastrad scr->scr_vd->private->copyrows(scr, from, to, num);
1549 1.14 macallan for (i = 0; i < abs(dist); i++) {
1550 1.14 macallan for (j = 0; j < scr->scr_ri.ri_cols; j++) {
1551 1.25 macallan #ifdef VCONS_DRAW_INTR
1552 1.25 macallan vcons_putchar_cached(scr, i + r_start, j,
1553 1.25 macallan scr->scr_chars[r_offset],
1554 1.25 macallan scr->scr_attrs[r_offset]);
1555 1.25 macallan #else
1556 1.37 macallan scr->putchar(scr, i + r_start, j,
1557 1.14 macallan scr->scr_chars[r_offset],
1558 1.14 macallan scr->scr_attrs[r_offset]);
1559 1.25 macallan #endif
1560 1.14 macallan r_offset++;
1561 1.14 macallan }
1562 1.14 macallan }
1563 1.14 macallan
1564 1.14 macallan if (scr->scr_line_wanted == 0) {
1565 1.14 macallan /* this was a reset - need to draw the cursor */
1566 1.14 macallan scr->scr_ri.ri_flg &= ~RI_CURSOR;
1567 1.63 riastrad scr->scr_vd->private->cursor(scr, 1, scr->scr_ri.ri_crow,
1568 1.14 macallan scr->scr_ri.ri_ccol);
1569 1.14 macallan }
1570 1.14 macallan }
1571 1.14 macallan
1572 1.14 macallan #endif /* WSDISPLAY_SCROLLSUPPORT */
1573 1.14 macallan
1574 1.20 jmcneill #ifdef VCONS_DRAW_INTR
1575 1.20 jmcneill static void
1576 1.20 jmcneill vcons_intr(void *cookie)
1577 1.20 jmcneill {
1578 1.20 jmcneill struct vcons_data *vd = cookie;
1579 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1580 1.20 jmcneill
1581 1.63 riastrad softint_schedule(vdp->intr_softint);
1582 1.20 jmcneill }
1583 1.20 jmcneill
1584 1.20 jmcneill static void
1585 1.22 jmcneill vcons_softintr(void *cookie)
1586 1.20 jmcneill {
1587 1.20 jmcneill struct vcons_data *vd = cookie;
1588 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1589 1.20 jmcneill struct vcons_screen *scr = vd->active;
1590 1.22 jmcneill unsigned int dirty;
1591 1.20 jmcneill
1592 1.63 riastrad if (scr && vdp->use_intr) {
1593 1.22 jmcneill if (!SCREEN_IS_BUSY(scr)) {
1594 1.22 jmcneill dirty = atomic_swap_uint(&scr->scr_dirty, 0);
1595 1.59 riastrad membar_acquire();
1596 1.63 riastrad if (vdp->use_intr == 2) {
1597 1.30 mlelstv if ((scr->scr_flags & VCONS_NO_REDRAW) == 0) {
1598 1.63 riastrad vdp->use_intr = 1;
1599 1.30 mlelstv vcons_redraw_screen(scr);
1600 1.30 mlelstv }
1601 1.30 mlelstv } else if (dirty > 0) {
1602 1.22 jmcneill if ((scr->scr_flags & VCONS_NO_REDRAW) == 0)
1603 1.25 macallan vcons_update_screen(scr);
1604 1.22 jmcneill }
1605 1.20 jmcneill }
1606 1.20 jmcneill }
1607 1.20 jmcneill
1608 1.63 riastrad callout_schedule(&vdp->intr, mstohz(33));
1609 1.20 jmcneill }
1610 1.21 jmcneill
1611 1.47 jmcneill static void
1612 1.47 jmcneill vcons_init_thread(void *cookie)
1613 1.21 jmcneill {
1614 1.47 jmcneill struct vcons_data *vd = (struct vcons_data *)cookie;
1615 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1616 1.39 msaitoh
1617 1.63 riastrad vdp->use_intr = 2;
1618 1.63 riastrad callout_schedule(&vdp->intr, mstohz(33));
1619 1.47 jmcneill kthread_exit(0);
1620 1.21 jmcneill }
1621 1.20 jmcneill #endif /* VCONS_DRAW_INTR */
1622 1.23 jmcneill
1623 1.23 jmcneill void
1624 1.23 jmcneill vcons_enable_polling(struct vcons_data *vd)
1625 1.23 jmcneill {
1626 1.23 jmcneill struct vcons_screen *scr = vd->active;
1627 1.23 jmcneill
1628 1.23 jmcneill #ifdef VCONS_DRAW_INTR
1629 1.64 martin struct vcons_data_private *vdp = vd->private;
1630 1.64 martin
1631 1.63 riastrad vdp->use_intr = 0;
1632 1.23 jmcneill #endif
1633 1.23 jmcneill
1634 1.23 jmcneill if (scr && !SCREEN_IS_BUSY(scr)) {
1635 1.23 jmcneill if ((scr->scr_flags & VCONS_NO_REDRAW) == 0)
1636 1.23 jmcneill vcons_redraw_screen(scr);
1637 1.23 jmcneill }
1638 1.23 jmcneill }
1639 1.23 jmcneill
1640 1.23 jmcneill void
1641 1.23 jmcneill vcons_disable_polling(struct vcons_data *vd)
1642 1.23 jmcneill {
1643 1.23 jmcneill #ifdef VCONS_DRAW_INTR
1644 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1645 1.23 jmcneill struct vcons_screen *scr = vd->active;
1646 1.23 jmcneill
1647 1.63 riastrad if (!vdp->intr_valid)
1648 1.23 jmcneill return;
1649 1.23 jmcneill
1650 1.63 riastrad vdp->use_intr = 2;
1651 1.23 jmcneill if (scr)
1652 1.58 riastrad vcons_dirty(scr);
1653 1.23 jmcneill #endif
1654 1.23 jmcneill }
1655 1.24 jmcneill
1656 1.24 jmcneill void
1657 1.24 jmcneill vcons_hard_switch(struct vcons_screen *scr)
1658 1.24 jmcneill {
1659 1.24 jmcneill struct vcons_data *vd = scr->scr_vd;
1660 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1661 1.24 jmcneill struct vcons_screen *oldscr = vd->active;
1662 1.24 jmcneill
1663 1.24 jmcneill if (oldscr) {
1664 1.24 jmcneill SCREEN_INVISIBLE(oldscr);
1665 1.24 jmcneill oldscr->scr_ri.ri_flg &= ~RI_CURSOR;
1666 1.24 jmcneill }
1667 1.24 jmcneill SCREEN_VISIBLE(scr);
1668 1.24 jmcneill vd->active = scr;
1669 1.63 riastrad vdp->wanted = NULL;
1670 1.24 jmcneill
1671 1.24 jmcneill if (vd->show_screen_cb != NULL)
1672 1.38 macallan vd->show_screen_cb(scr, vd->show_screen_cookie);
1673 1.24 jmcneill }
1674 1.25 macallan
1675 1.25 macallan #ifdef VCONS_DRAW_INTR
1676 1.63 riastrad static void
1677 1.25 macallan vcons_invalidate_cache(struct vcons_data *vd)
1678 1.25 macallan {
1679 1.63 riastrad struct vcons_data_private *vdp = vd->private;
1680 1.25 macallan int i;
1681 1.25 macallan
1682 1.63 riastrad for (i = 0; i < vdp->cells; i++) {
1683 1.63 riastrad vdp->chars[i] = -1;
1684 1.63 riastrad vdp->attrs[i] = -1;
1685 1.25 macallan }
1686 1.25 macallan }
1687 1.25 macallan #endif
1688