blob: 1e33cb032e073ba40a0c9e5b14ed705f777c9c82 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
2 * linux/drivers/char/vt.c
3 *
4 * Copyright (C) 1991, 1992 Linus Torvalds
5 */
6
7/*
8 * Hopefully this will be a rather complete VT102 implementation.
9 *
10 * Beeping thanks to John T Kohl.
11 *
12 * Virtual Consoles, Screen Blanking, Screen Dumping, Color, Graphics
13 * Chars, and VT100 enhancements by Peter MacDonald.
14 *
15 * Copy and paste function by Andrew Haylett,
16 * some enhancements by Alessandro Rubini.
17 *
18 * Code to check for different video-cards mostly by Galen Hunt,
19 * <g-hunt@ee.utah.edu>
20 *
21 * Rudimentary ISO 10646/Unicode/UTF-8 character set support by
22 * Markus Kuhn, <mskuhn@immd4.informatik.uni-erlangen.de>.
23 *
24 * Dynamic allocation of consoles, aeb@cwi.nl, May 1994
25 * Resizing of consoles, aeb, 940926
26 *
27 * Code for xterm like mouse click reporting by Peter Orbaek 20-Jul-94
28 * <poe@daimi.aau.dk>
29 *
30 * User-defined bell sound, new setterm control sequences and printk
31 * redirection by Martin Mares <mj@k332.feld.cvut.cz> 19-Nov-95
32 *
33 * APM screenblank bug fixed Takashi Manabe <manabe@roy.dsl.tutics.tut.jp>
34 *
35 * Merge with the abstract console driver by Geert Uytterhoeven
36 * <geert@linux-m68k.org>, Jan 1997.
37 *
38 * Original m68k console driver modifications by
39 *
40 * - Arno Griffioen <arno@usn.nl>
41 * - David Carter <carter@cs.bris.ac.uk>
42 *
43 * The abstract console driver provides a generic interface for a text
44 * console. It supports VGA text mode, frame buffer based graphical consoles
45 * and special graphics processors that are only accessible through some
46 * registers (e.g. a TMS340x0 GSP).
47 *
48 * The interface to the hardware is specified using a special structure
49 * (struct consw) which contains function pointers to console operations
50 * (see <linux/console.h> for more information).
51 *
52 * Support for changeable cursor shape
53 * by Pavel Machek <pavel@atrey.karlin.mff.cuni.cz>, August 1997
54 *
55 * Ported to i386 and con_scrolldelta fixed
56 * by Emmanuel Marty <core@ggi-project.org>, April 1998
57 *
58 * Resurrected character buffers in videoram plus lots of other trickery
59 * by Martin Mares <mj@atrey.karlin.mff.cuni.cz>, July 1998
60 *
61 * Removed old-style timers, introduced console_timer, made timer
62 * deletion SMP-safe. 17Jun00, Andrew Morton <andrewm@uow.edu.au>
63 *
64 * Removed console_lock, enabled interrupts across all console operations
65 * 13 March 2001, Andrew Morton
66 */
67
68#include <linux/module.h>
69#include <linux/types.h>
70#include <linux/sched.h>
71#include <linux/tty.h>
72#include <linux/tty_flip.h>
73#include <linux/kernel.h>
74#include <linux/string.h>
75#include <linux/errno.h>
76#include <linux/kd.h>
77#include <linux/slab.h>
78#include <linux/major.h>
79#include <linux/mm.h>
80#include <linux/console.h>
81#include <linux/init.h>
82#include <linux/devfs_fs_kernel.h>
83#include <linux/vt_kern.h>
84#include <linux/selection.h>
85#include <linux/tiocl.h>
86#include <linux/kbd_kern.h>
87#include <linux/consolemap.h>
88#include <linux/timer.h>
89#include <linux/interrupt.h>
90#include <linux/config.h>
91#include <linux/workqueue.h>
92#include <linux/bootmem.h>
93#include <linux/pm.h>
94#include <linux/font.h>
95#include <linux/bitops.h>
96
97#include <asm/io.h>
98#include <asm/system.h>
99#include <asm/uaccess.h>
100
101
102const struct consw *conswitchp;
103
104/* A bitmap for codes <32. A bit of 1 indicates that the code
105 * corresponding to that bit number invokes some special action
106 * (such as cursor movement) and should not be displayed as a
107 * glyph unless the disp_ctrl mode is explicitly enabled.
108 */
109#define CTRL_ACTION 0x0d00ff81
110#define CTRL_ALWAYS 0x0800f501 /* Cannot be overridden by disp_ctrl */
111
112/*
113 * Here is the default bell parameters: 750HZ, 1/8th of a second
114 */
115#define DEFAULT_BELL_PITCH 750
116#define DEFAULT_BELL_DURATION (HZ/8)
117
118extern void vcs_make_devfs(struct tty_struct *tty);
119extern void vcs_remove_devfs(struct tty_struct *tty);
120
121extern void console_map_init(void);
122#ifdef CONFIG_PROM_CONSOLE
123extern void prom_con_init(void);
124#endif
125#ifdef CONFIG_MDA_CONSOLE
126extern int mda_console_init(void);
127#endif
128
129struct vc vc_cons [MAX_NR_CONSOLES];
130
131#ifndef VT_SINGLE_DRIVER
132static const struct consw *con_driver_map[MAX_NR_CONSOLES];
133#endif
134
135static int con_open(struct tty_struct *, struct file *);
136static void vc_init(struct vc_data *vc, unsigned int rows,
137 unsigned int cols, int do_clear);
138static void gotoxy(struct vc_data *vc, int new_x, int new_y);
139static void save_cur(struct vc_data *vc);
140static void reset_terminal(struct vc_data *vc, int do_clear);
141static void con_flush_chars(struct tty_struct *tty);
142static void set_vesa_blanking(char __user *p);
143static void set_cursor(struct vc_data *vc);
144static void hide_cursor(struct vc_data *vc);
145static void console_callback(void *ignored);
146static void blank_screen_t(unsigned long dummy);
147static void set_palette(struct vc_data *vc);
148
149static int printable; /* Is console ready for printing? */
150
151/*
152 * ignore_poke: don't unblank the screen when things are typed. This is
153 * mainly for the privacy of braille terminal users.
154 */
155static int ignore_poke;
156
157int do_poke_blanked_console;
158int console_blanked;
159
160static int vesa_blank_mode; /* 0:none 1:suspendV 2:suspendH 3:powerdown */
161static int blankinterval = 10*60*HZ;
162static int vesa_off_interval;
163
164static DECLARE_WORK(console_work, console_callback, NULL);
165
166/*
167 * fg_console is the current virtual console,
168 * last_console is the last used one,
169 * want_console is the console we want to switch to,
170 * kmsg_redirect is the console for kernel messages,
171 */
172int fg_console;
173int last_console;
174int want_console = -1;
175int kmsg_redirect;
176
177/*
178 * For each existing display, we have a pointer to console currently visible
179 * on that display, allowing consoles other than fg_console to be refreshed
180 * appropriately. Unless the low-level driver supplies its own display_fg
181 * variable, we use this one for the "master display".
182 */
183static struct vc_data *master_display_fg;
184
185/*
186 * Unfortunately, we need to delay tty echo when we're currently writing to the
187 * console since the code is (and always was) not re-entrant, so we schedule
188 * all flip requests to process context with schedule-task() and run it from
189 * console_callback().
190 */
191
192/*
193 * For the same reason, we defer scrollback to the console callback.
194 */
195static int scrollback_delta;
196
197/*
198 * Hook so that the power management routines can (un)blank
199 * the console on our behalf.
200 */
201int (*console_blank_hook)(int);
202
203static struct timer_list console_timer;
204static int blank_state;
205static int blank_timer_expired;
206enum {
207 blank_off = 0,
208 blank_normal_wait,
209 blank_vesa_wait,
210};
211
212/*
213 * Low-Level Functions
214 */
215
216#define IS_FG(vc) ((vc)->vc_num == fg_console)
217
218#ifdef VT_BUF_VRAM_ONLY
219#define DO_UPDATE(vc) 0
220#else
221#define DO_UPDATE(vc) CON_IS_VISIBLE(vc)
222#endif
223
224static inline unsigned short *screenpos(struct vc_data *vc, int offset, int viewed)
225{
226 unsigned short *p;
227
228 if (!viewed)
229 p = (unsigned short *)(vc->vc_origin + offset);
230 else if (!vc->vc_sw->con_screen_pos)
231 p = (unsigned short *)(vc->vc_visible_origin + offset);
232 else
233 p = vc->vc_sw->con_screen_pos(vc, offset);
234 return p;
235}
236
237static inline void scrolldelta(int lines)
238{
239 scrollback_delta += lines;
240 schedule_console_callback();
241}
242
243void schedule_console_callback(void)
244{
245 schedule_work(&console_work);
246}
247
248static void scrup(struct vc_data *vc, unsigned int t, unsigned int b, int nr)
249{
250 unsigned short *d, *s;
251
252 if (t+nr >= b)
253 nr = b - t - 1;
254 if (b > vc->vc_rows || t >= b || nr < 1)
255 return;
256 if (CON_IS_VISIBLE(vc) && vc->vc_sw->con_scroll(vc, t, b, SM_UP, nr))
257 return;
258 d = (unsigned short *)(vc->vc_origin + vc->vc_size_row * t);
259 s = (unsigned short *)(vc->vc_origin + vc->vc_size_row * (t + nr));
260 scr_memmovew(d, s, (b - t - nr) * vc->vc_size_row);
261 scr_memsetw(d + (b - t - nr) * vc->vc_cols, vc->vc_video_erase_char,
262 vc->vc_size_row * nr);
263}
264
265static void scrdown(struct vc_data *vc, unsigned int t, unsigned int b, int nr)
266{
267 unsigned short *s;
268 unsigned int step;
269
270 if (t+nr >= b)
271 nr = b - t - 1;
272 if (b > vc->vc_rows || t >= b || nr < 1)
273 return;
274 if (CON_IS_VISIBLE(vc) && vc->vc_sw->con_scroll(vc, t, b, SM_DOWN, nr))
275 return;
276 s = (unsigned short *)(vc->vc_origin + vc->vc_size_row * t);
277 step = vc->vc_cols * nr;
278 scr_memmovew(s + step, s, (b - t - nr) * vc->vc_size_row);
279 scr_memsetw(s, vc->vc_video_erase_char, 2 * step);
280}
281
282static void do_update_region(struct vc_data *vc, unsigned long start, int count)
283{
284#ifndef VT_BUF_VRAM_ONLY
285 unsigned int xx, yy, offset;
286 u16 *p;
287
288 p = (u16 *) start;
289 if (!vc->vc_sw->con_getxy) {
290 offset = (start - vc->vc_origin) / 2;
291 xx = offset % vc->vc_cols;
292 yy = offset / vc->vc_cols;
293 } else {
294 int nxx, nyy;
295 start = vc->vc_sw->con_getxy(vc, start, &nxx, &nyy);
296 xx = nxx; yy = nyy;
297 }
298 for(;;) {
299 u16 attrib = scr_readw(p) & 0xff00;
300 int startx = xx;
301 u16 *q = p;
302 while (xx < vc->vc_cols && count) {
303 if (attrib != (scr_readw(p) & 0xff00)) {
304 if (p > q)
305 vc->vc_sw->con_putcs(vc, q, p-q, yy, startx);
306 startx = xx;
307 q = p;
308 attrib = scr_readw(p) & 0xff00;
309 }
310 p++;
311 xx++;
312 count--;
313 }
314 if (p > q)
315 vc->vc_sw->con_putcs(vc, q, p-q, yy, startx);
316 if (!count)
317 break;
318 xx = 0;
319 yy++;
320 if (vc->vc_sw->con_getxy) {
321 p = (u16 *)start;
322 start = vc->vc_sw->con_getxy(vc, start, NULL, NULL);
323 }
324 }
325#endif
326}
327
328void update_region(struct vc_data *vc, unsigned long start, int count)
329{
330 WARN_CONSOLE_UNLOCKED();
331
332 if (DO_UPDATE(vc)) {
333 hide_cursor(vc);
334 do_update_region(vc, start, count);
335 set_cursor(vc);
336 }
337}
338
339/* Structure of attributes is hardware-dependent */
340
341static u8 build_attr(struct vc_data *vc, u8 _color, u8 _intensity, u8 _blink, u8 _underline, u8 _reverse)
342{
343 if (vc->vc_sw->con_build_attr)
344 return vc->vc_sw->con_build_attr(vc, _color, _intensity, _blink, _underline, _reverse);
345
346#ifndef VT_BUF_VRAM_ONLY
347/*
348 * ++roman: I completely changed the attribute format for monochrome
349 * mode (!can_do_color). The formerly used MDA (monochrome display
350 * adapter) format didn't allow the combination of certain effects.
351 * Now the attribute is just a bit vector:
352 * Bit 0..1: intensity (0..2)
353 * Bit 2 : underline
354 * Bit 3 : reverse
355 * Bit 7 : blink
356 */
357 {
358 u8 a = vc->vc_color;
359 if (!vc->vc_can_do_color)
360 return _intensity |
361 (_underline ? 4 : 0) |
362 (_reverse ? 8 : 0) |
363 (_blink ? 0x80 : 0);
364 if (_underline)
365 a = (a & 0xf0) | vc->vc_ulcolor;
366 else if (_intensity == 0)
367 a = (a & 0xf0) | vc->vc_ulcolor;
368 if (_reverse)
369 a = ((a) & 0x88) | ((((a) >> 4) | ((a) << 4)) & 0x77);
370 if (_blink)
371 a ^= 0x80;
372 if (_intensity == 2)
373 a ^= 0x08;
374 if (vc->vc_hi_font_mask == 0x100)
375 a <<= 1;
376 return a;
377 }
378#else
379 return 0;
380#endif
381}
382
383static void update_attr(struct vc_data *vc)
384{
385 vc->vc_attr = build_attr(vc, vc->vc_color, vc->vc_intensity, vc->vc_blink, vc->vc_underline, vc->vc_reverse ^ vc->vc_decscnm);
386 vc->vc_video_erase_char = (build_attr(vc, vc->vc_color, 1, vc->vc_blink, 0, vc->vc_decscnm) << 8) | ' ';
387}
388
389/* Note: inverting the screen twice should revert to the original state */
390void invert_screen(struct vc_data *vc, int offset, int count, int viewed)
391{
392 unsigned short *p;
393
394 WARN_CONSOLE_UNLOCKED();
395
396 count /= 2;
397 p = screenpos(vc, offset, viewed);
398 if (vc->vc_sw->con_invert_region)
399 vc->vc_sw->con_invert_region(vc, p, count);
400#ifndef VT_BUF_VRAM_ONLY
401 else {
402 u16 *q = p;
403 int cnt = count;
404 u16 a;
405
406 if (!vc->vc_can_do_color) {
407 while (cnt--) {
408 a = scr_readw(q);
409 a ^= 0x0800;
410 scr_writew(a, q);
411 q++;
412 }
413 } else if (vc->vc_hi_font_mask == 0x100) {
414 while (cnt--) {
415 a = scr_readw(q);
416 a = ((a) & 0x11ff) | (((a) & 0xe000) >> 4) | (((a) & 0x0e00) << 4);
417 scr_writew(a, q);
418 q++;
419 }
420 } else {
421 while (cnt--) {
422 a = scr_readw(q);
423 a = ((a) & 0x88ff) | (((a) & 0x7000) >> 4) | (((a) & 0x0700) << 4);
424 scr_writew(a, q);
425 q++;
426 }
427 }
428 }
429#endif
430 if (DO_UPDATE(vc))
431 do_update_region(vc, (unsigned long) p, count);
432}
433
434/* used by selection: complement pointer position */
435void complement_pos(struct vc_data *vc, int offset)
436{
Antonino A. Daplas414edcd2005-09-06 15:17:52 -0700437 static int old_offset = -1;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700438 static unsigned short old;
439 static unsigned short oldx, oldy;
440
441 WARN_CONSOLE_UNLOCKED();
442
Antonino A. Daplas414edcd2005-09-06 15:17:52 -0700443 if (old_offset != -1 && old_offset >= 0 &&
444 old_offset < vc->vc_screenbuf_size) {
445 scr_writew(old, screenpos(vc, old_offset, 1));
Linus Torvalds1da177e2005-04-16 15:20:36 -0700446 if (DO_UPDATE(vc))
447 vc->vc_sw->con_putc(vc, old, oldy, oldx);
448 }
Antonino A. Daplas414edcd2005-09-06 15:17:52 -0700449
450 old_offset = offset;
451
452 if (offset != -1 && offset >= 0 &&
453 offset < vc->vc_screenbuf_size) {
Linus Torvalds1da177e2005-04-16 15:20:36 -0700454 unsigned short new;
Antonino A. Daplas414edcd2005-09-06 15:17:52 -0700455 unsigned short *p;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700456 p = screenpos(vc, offset, 1);
457 old = scr_readw(p);
458 new = old ^ vc->vc_complement_mask;
459 scr_writew(new, p);
460 if (DO_UPDATE(vc)) {
461 oldx = (offset >> 1) % vc->vc_cols;
462 oldy = (offset >> 1) / vc->vc_cols;
463 vc->vc_sw->con_putc(vc, new, oldy, oldx);
464 }
465 }
Antonino A. Daplas414edcd2005-09-06 15:17:52 -0700466
Linus Torvalds1da177e2005-04-16 15:20:36 -0700467}
468
469static void insert_char(struct vc_data *vc, unsigned int nr)
470{
471 unsigned short *p, *q = (unsigned short *)vc->vc_pos;
472
473 p = q + vc->vc_cols - nr - vc->vc_x;
474 while (--p >= q)
475 scr_writew(scr_readw(p), p + nr);
476 scr_memsetw(q, vc->vc_video_erase_char, nr * 2);
477 vc->vc_need_wrap = 0;
478 if (DO_UPDATE(vc)) {
479 unsigned short oldattr = vc->vc_attr;
480 vc->vc_sw->con_bmove(vc, vc->vc_y, vc->vc_x, vc->vc_y, vc->vc_x + nr, 1,
481 vc->vc_cols - vc->vc_x - nr);
482 vc->vc_attr = vc->vc_video_erase_char >> 8;
483 while (nr--)
484 vc->vc_sw->con_putc(vc, vc->vc_video_erase_char, vc->vc_y, vc->vc_x + nr);
485 vc->vc_attr = oldattr;
486 }
487}
488
489static void delete_char(struct vc_data *vc, unsigned int nr)
490{
491 unsigned int i = vc->vc_x;
492 unsigned short *p = (unsigned short *)vc->vc_pos;
493
494 while (++i <= vc->vc_cols - nr) {
495 scr_writew(scr_readw(p+nr), p);
496 p++;
497 }
498 scr_memsetw(p, vc->vc_video_erase_char, nr * 2);
499 vc->vc_need_wrap = 0;
500 if (DO_UPDATE(vc)) {
501 unsigned short oldattr = vc->vc_attr;
502 vc->vc_sw->con_bmove(vc, vc->vc_y, vc->vc_x + nr, vc->vc_y, vc->vc_x, 1,
503 vc->vc_cols - vc->vc_x - nr);
504 vc->vc_attr = vc->vc_video_erase_char >> 8;
505 while (nr--)
506 vc->vc_sw->con_putc(vc, vc->vc_video_erase_char, vc->vc_y,
507 vc->vc_cols - 1 - nr);
508 vc->vc_attr = oldattr;
509 }
510}
511
512static int softcursor_original;
513
514static void add_softcursor(struct vc_data *vc)
515{
516 int i = scr_readw((u16 *) vc->vc_pos);
517 u32 type = vc->vc_cursor_type;
518
519 if (! (type & 0x10)) return;
520 if (softcursor_original != -1) return;
521 softcursor_original = i;
522 i |= ((type >> 8) & 0xff00 );
523 i ^= ((type) & 0xff00 );
524 if ((type & 0x20) && ((softcursor_original & 0x7000) == (i & 0x7000))) i ^= 0x7000;
525 if ((type & 0x40) && ((i & 0x700) == ((i & 0x7000) >> 4))) i ^= 0x0700;
526 scr_writew(i, (u16 *) vc->vc_pos);
527 if (DO_UPDATE(vc))
528 vc->vc_sw->con_putc(vc, i, vc->vc_y, vc->vc_x);
529}
530
531static void hide_softcursor(struct vc_data *vc)
532{
533 if (softcursor_original != -1) {
534 scr_writew(softcursor_original, (u16 *)vc->vc_pos);
535 if (DO_UPDATE(vc))
536 vc->vc_sw->con_putc(vc, softcursor_original,
537 vc->vc_y, vc->vc_x);
538 softcursor_original = -1;
539 }
540}
541
542static void hide_cursor(struct vc_data *vc)
543{
544 if (vc == sel_cons)
545 clear_selection();
546 vc->vc_sw->con_cursor(vc, CM_ERASE);
547 hide_softcursor(vc);
548}
549
550static void set_cursor(struct vc_data *vc)
551{
552 if (!IS_FG(vc) || console_blanked ||
553 vc->vc_mode == KD_GRAPHICS)
554 return;
555 if (vc->vc_deccm) {
556 if (vc == sel_cons)
557 clear_selection();
558 add_softcursor(vc);
559 if ((vc->vc_cursor_type & 0x0f) != 1)
560 vc->vc_sw->con_cursor(vc, CM_DRAW);
561 } else
562 hide_cursor(vc);
563}
564
565static void set_origin(struct vc_data *vc)
566{
567 WARN_CONSOLE_UNLOCKED();
568
569 if (!CON_IS_VISIBLE(vc) ||
570 !vc->vc_sw->con_set_origin ||
571 !vc->vc_sw->con_set_origin(vc))
572 vc->vc_origin = (unsigned long)vc->vc_screenbuf;
573 vc->vc_visible_origin = vc->vc_origin;
574 vc->vc_scr_end = vc->vc_origin + vc->vc_screenbuf_size;
575 vc->vc_pos = vc->vc_origin + vc->vc_size_row * vc->vc_y + 2 * vc->vc_x;
576}
577
578static inline void save_screen(struct vc_data *vc)
579{
580 WARN_CONSOLE_UNLOCKED();
581
582 if (vc->vc_sw->con_save_screen)
583 vc->vc_sw->con_save_screen(vc);
584}
585
586/*
587 * Redrawing of screen
588 */
589
590static void clear_buffer_attributes(struct vc_data *vc)
591{
592 unsigned short *p = (unsigned short *)vc->vc_origin;
593 int count = vc->vc_screenbuf_size / 2;
594 int mask = vc->vc_hi_font_mask | 0xff;
595
596 for (; count > 0; count--, p++) {
597 scr_writew((scr_readw(p)&mask) | (vc->vc_video_erase_char & ~mask), p);
598 }
599}
600
601void redraw_screen(struct vc_data *vc, int is_switch)
602{
603 int redraw = 0;
604
605 WARN_CONSOLE_UNLOCKED();
606
607 if (!vc) {
608 /* strange ... */
609 /* printk("redraw_screen: tty %d not allocated ??\n", new_console+1); */
610 return;
611 }
612
613 if (is_switch) {
614 struct vc_data *old_vc = vc_cons[fg_console].d;
615 if (old_vc == vc)
616 return;
617 if (!CON_IS_VISIBLE(vc))
618 redraw = 1;
619 *vc->vc_display_fg = vc;
620 fg_console = vc->vc_num;
621 hide_cursor(old_vc);
622 if (!CON_IS_VISIBLE(old_vc)) {
623 save_screen(old_vc);
624 set_origin(old_vc);
625 }
626 } else {
627 hide_cursor(vc);
628 redraw = 1;
629 }
630
631 if (redraw) {
632 int update;
633 int old_was_color = vc->vc_can_do_color;
634
635 set_origin(vc);
636 update = vc->vc_sw->con_switch(vc);
637 set_palette(vc);
638 /*
639 * If console changed from mono<->color, the best we can do
640 * is to clear the buffer attributes. As it currently stands,
641 * rebuilding new attributes from the old buffer is not doable
642 * without overly complex code.
643 */
644 if (old_was_color != vc->vc_can_do_color) {
645 update_attr(vc);
646 clear_buffer_attributes(vc);
647 }
648 if (update && vc->vc_mode != KD_GRAPHICS)
649 do_update_region(vc, vc->vc_origin, vc->vc_screenbuf_size / 2);
650 }
651 set_cursor(vc);
652 if (is_switch) {
653 set_leds();
654 compute_shiftstate();
655 }
656}
657
658/*
659 * Allocation, freeing and resizing of VTs.
660 */
661
662int vc_cons_allocated(unsigned int i)
663{
664 return (i < MAX_NR_CONSOLES && vc_cons[i].d);
665}
666
667static void visual_init(struct vc_data *vc, int num, int init)
668{
669 /* ++Geert: vc->vc_sw->con_init determines console size */
670 if (vc->vc_sw)
671 module_put(vc->vc_sw->owner);
672 vc->vc_sw = conswitchp;
673#ifndef VT_SINGLE_DRIVER
674 if (con_driver_map[num])
675 vc->vc_sw = con_driver_map[num];
676#endif
677 __module_get(vc->vc_sw->owner);
678 vc->vc_num = num;
679 vc->vc_display_fg = &master_display_fg;
680 vc->vc_uni_pagedir_loc = &vc->vc_uni_pagedir;
681 vc->vc_uni_pagedir = 0;
682 vc->vc_hi_font_mask = 0;
683 vc->vc_complement_mask = 0;
684 vc->vc_can_do_color = 0;
685 vc->vc_sw->con_init(vc, init);
686 if (!vc->vc_complement_mask)
687 vc->vc_complement_mask = vc->vc_can_do_color ? 0x7700 : 0x0800;
688 vc->vc_s_complement_mask = vc->vc_complement_mask;
689 vc->vc_size_row = vc->vc_cols << 1;
690 vc->vc_screenbuf_size = vc->vc_rows * vc->vc_size_row;
691}
692
693int vc_allocate(unsigned int currcons) /* return 0 on success */
694{
695 WARN_CONSOLE_UNLOCKED();
696
697 if (currcons >= MAX_NR_CONSOLES)
698 return -ENXIO;
699 if (!vc_cons[currcons].d) {
700 struct vc_data *vc;
701
702 /* prevent users from taking too much memory */
703 if (currcons >= MAX_NR_USER_CONSOLES && !capable(CAP_SYS_RESOURCE))
704 return -EPERM;
705
706 /* due to the granularity of kmalloc, we waste some memory here */
707 /* the alloc is done in two steps, to optimize the common situation
708 of a 25x80 console (structsize=216, screenbuf_size=4000) */
709 /* although the numbers above are not valid since long ago, the
710 point is still up-to-date and the comment still has its value
711 even if only as a historical artifact. --mj, July 1998 */
712 vc = kmalloc(sizeof(struct vc_data), GFP_KERNEL);
713 if (!vc)
714 return -ENOMEM;
715 memset(vc, 0, sizeof(*vc));
716 vc_cons[currcons].d = vc;
717 visual_init(vc, currcons, 1);
718 if (!*vc->vc_uni_pagedir_loc)
719 con_set_default_unimap(vc);
720 vc->vc_screenbuf = kmalloc(vc->vc_screenbuf_size, GFP_KERNEL);
721 if (!vc->vc_screenbuf) {
722 kfree(vc);
723 vc_cons[currcons].d = NULL;
724 return -ENOMEM;
725 }
726 vc->vc_kmalloced = 1;
727 vc_init(vc, vc->vc_rows, vc->vc_cols, 1);
728 }
729 return 0;
730}
731
732static inline int resize_screen(struct vc_data *vc, int width, int height)
733{
734 /* Resizes the resolution of the display adapater */
735 int err = 0;
736
737 if (vc->vc_mode != KD_GRAPHICS && vc->vc_sw->con_resize)
738 err = vc->vc_sw->con_resize(vc, width, height);
739 return err;
740}
741
742/*
743 * Change # of rows and columns (0 means unchanged/the size of fg_console)
744 * [this is to be used together with some user program
745 * like resize that changes the hardware videomode]
746 */
747#define VC_RESIZE_MAXCOL (32767)
748#define VC_RESIZE_MAXROW (32767)
749int vc_resize(struct vc_data *vc, unsigned int cols, unsigned int lines)
750{
751 unsigned long old_origin, new_origin, new_scr_end, rlth, rrem, err = 0;
752 unsigned int old_cols, old_rows, old_row_size, old_screen_size;
753 unsigned int new_cols, new_rows, new_row_size, new_screen_size;
Antonino A. Daplas3b41dc12005-09-09 13:04:39 -0700754 unsigned int end;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700755 unsigned short *newscreen;
756
757 WARN_CONSOLE_UNLOCKED();
758
759 if (!vc)
760 return -ENXIO;
761
762 if (cols > VC_RESIZE_MAXCOL || lines > VC_RESIZE_MAXROW)
763 return -EINVAL;
764
765 new_cols = (cols ? cols : vc->vc_cols);
766 new_rows = (lines ? lines : vc->vc_rows);
767 new_row_size = new_cols << 1;
768 new_screen_size = new_row_size * new_rows;
769
770 if (new_cols == vc->vc_cols && new_rows == vc->vc_rows)
771 return 0;
772
773 newscreen = (unsigned short *) kmalloc(new_screen_size, GFP_USER);
774 if (!newscreen)
775 return -ENOMEM;
776
777 old_rows = vc->vc_rows;
778 old_cols = vc->vc_cols;
779 old_row_size = vc->vc_size_row;
780 old_screen_size = vc->vc_screenbuf_size;
781
782 err = resize_screen(vc, new_cols, new_rows);
783 if (err) {
784 kfree(newscreen);
785 return err;
786 }
787
788 vc->vc_rows = new_rows;
789 vc->vc_cols = new_cols;
790 vc->vc_size_row = new_row_size;
791 vc->vc_screenbuf_size = new_screen_size;
792
793 rlth = min(old_row_size, new_row_size);
794 rrem = new_row_size - rlth;
795 old_origin = vc->vc_origin;
796 new_origin = (long) newscreen;
797 new_scr_end = new_origin + new_screen_size;
Antonino A. Daplas3b41dc12005-09-09 13:04:39 -0700798
799 if (vc->vc_y > new_rows) {
800 if (old_rows - vc->vc_y < new_rows) {
801 /*
802 * Cursor near the bottom, copy contents from the
803 * bottom of buffer
804 */
805 old_origin += (old_rows - new_rows) * old_row_size;
806 end = vc->vc_scr_end;
807 } else {
808 /*
809 * Cursor is in no man's land, copy 1/2 screenful
810 * from the top and bottom of cursor position
811 */
812 old_origin += (vc->vc_y - new_rows/2) * old_row_size;
813 end = old_origin + new_screen_size;
814 }
815 } else
816 /*
817 * Cursor near the top, copy contents from the top of buffer
818 */
819 end = (old_rows > new_rows) ? old_origin + new_screen_size :
820 vc->vc_scr_end;
Linus Torvalds1da177e2005-04-16 15:20:36 -0700821
822 update_attr(vc);
823
Antonino A. Daplas3b41dc12005-09-09 13:04:39 -0700824 while (old_origin < end) {
825 scr_memcpyw((unsigned short *) new_origin,
826 (unsigned short *) old_origin, rlth);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700827 if (rrem)
Antonino A. Daplas3b41dc12005-09-09 13:04:39 -0700828 scr_memsetw((void *)(new_origin + rlth),
829 vc->vc_video_erase_char, rrem);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700830 old_origin += old_row_size;
831 new_origin += new_row_size;
832 }
833 if (new_scr_end > new_origin)
Antonino A. Daplas3b41dc12005-09-09 13:04:39 -0700834 scr_memsetw((void *)new_origin, vc->vc_video_erase_char,
835 new_scr_end - new_origin);
Linus Torvalds1da177e2005-04-16 15:20:36 -0700836 if (vc->vc_kmalloced)
837 kfree(vc->vc_screenbuf);
838 vc->vc_screenbuf = newscreen;
839 vc->vc_kmalloced = 1;
840 vc->vc_screenbuf_size = new_screen_size;
841 set_origin(vc);
842
843 /* do part of a reset_terminal() */
844 vc->vc_top = 0;
845 vc->vc_bottom = vc->vc_rows;
846 gotoxy(vc, vc->vc_x, vc->vc_y);
847 save_cur(vc);
848
849 if (vc->vc_tty) {
850 struct winsize ws, *cws = &vc->vc_tty->winsize;
851
852 memset(&ws, 0, sizeof(ws));
853 ws.ws_row = vc->vc_rows;
854 ws.ws_col = vc->vc_cols;
855 ws.ws_ypixel = vc->vc_scan_lines;
856 if ((ws.ws_row != cws->ws_row || ws.ws_col != cws->ws_col) &&
857 vc->vc_tty->pgrp > 0)
858 kill_pg(vc->vc_tty->pgrp, SIGWINCH, 1);
859 *cws = ws;
860 }
861
862 if (CON_IS_VISIBLE(vc))
863 update_screen(vc);
864 return err;
865}
866
867
868void vc_disallocate(unsigned int currcons)
869{
870 WARN_CONSOLE_UNLOCKED();
871
872 if (vc_cons_allocated(currcons)) {
873 struct vc_data *vc = vc_cons[currcons].d;
874 vc->vc_sw->con_deinit(vc);
875 if (vc->vc_kmalloced)
876 kfree(vc->vc_screenbuf);
877 if (currcons >= MIN_NR_CONSOLES)
878 kfree(vc);
879 vc_cons[currcons].d = NULL;
880 }
881}
882
883/*
884 * VT102 emulator
885 */
886
887#define set_kbd(vc, x) set_vc_kbd_mode(kbd_table + (vc)->vc_num, (x))
888#define clr_kbd(vc, x) clr_vc_kbd_mode(kbd_table + (vc)->vc_num, (x))
889#define is_kbd(vc, x) vc_kbd_mode(kbd_table + (vc)->vc_num, (x))
890
891#define decarm VC_REPEAT
892#define decckm VC_CKMODE
893#define kbdapplic VC_APPLIC
894#define lnm VC_CRLF
895
896/*
897 * this is what the terminal answers to a ESC-Z or csi0c query.
898 */
899#define VT100ID "\033[?1;2c"
900#define VT102ID "\033[?6c"
901
902unsigned char color_table[] = { 0, 4, 2, 6, 1, 5, 3, 7,
903 8,12,10,14, 9,13,11,15 };
904
905/* the default colour table, for VGA+ colour systems */
906int default_red[] = {0x00,0xaa,0x00,0xaa,0x00,0xaa,0x00,0xaa,
907 0x55,0xff,0x55,0xff,0x55,0xff,0x55,0xff};
908int default_grn[] = {0x00,0x00,0xaa,0x55,0x00,0x00,0xaa,0xaa,
909 0x55,0x55,0xff,0xff,0x55,0x55,0xff,0xff};
910int default_blu[] = {0x00,0x00,0x00,0x00,0xaa,0xaa,0xaa,0xaa,
911 0x55,0x55,0x55,0x55,0xff,0xff,0xff,0xff};
912
913/*
914 * gotoxy() must verify all boundaries, because the arguments
915 * might also be negative. If the given position is out of
916 * bounds, the cursor is placed at the nearest margin.
917 */
918static void gotoxy(struct vc_data *vc, int new_x, int new_y)
919{
920 int min_y, max_y;
921
922 if (new_x < 0)
923 vc->vc_x = 0;
924 else {
925 if (new_x >= vc->vc_cols)
926 vc->vc_x = vc->vc_cols - 1;
927 else
928 vc->vc_x = new_x;
929 }
930
931 if (vc->vc_decom) {
932 min_y = vc->vc_top;
933 max_y = vc->vc_bottom;
934 } else {
935 min_y = 0;
936 max_y = vc->vc_rows;
937 }
938 if (new_y < min_y)
939 vc->vc_y = min_y;
940 else if (new_y >= max_y)
941 vc->vc_y = max_y - 1;
942 else
943 vc->vc_y = new_y;
944 vc->vc_pos = vc->vc_origin + vc->vc_y * vc->vc_size_row + (vc->vc_x<<1);
945 vc->vc_need_wrap = 0;
946}
947
948/* for absolute user moves, when decom is set */
949static void gotoxay(struct vc_data *vc, int new_x, int new_y)
950{
951 gotoxy(vc, new_x, vc->vc_decom ? (vc->vc_top + new_y) : new_y);
952}
953
954void scrollback(struct vc_data *vc, int lines)
955{
956 if (!lines)
957 lines = vc->vc_rows / 2;
958 scrolldelta(-lines);
959}
960
961void scrollfront(struct vc_data *vc, int lines)
962{
963 if (!lines)
964 lines = vc->vc_rows / 2;
965 scrolldelta(lines);
966}
967
968static void lf(struct vc_data *vc)
969{
970 /* don't scroll if above bottom of scrolling region, or
971 * if below scrolling region
972 */
973 if (vc->vc_y + 1 == vc->vc_bottom)
974 scrup(vc, vc->vc_top, vc->vc_bottom, 1);
975 else if (vc->vc_y < vc->vc_rows - 1) {
976 vc->vc_y++;
977 vc->vc_pos += vc->vc_size_row;
978 }
979 vc->vc_need_wrap = 0;
980}
981
982static void ri(struct vc_data *vc)
983{
984 /* don't scroll if below top of scrolling region, or
985 * if above scrolling region
986 */
987 if (vc->vc_y == vc->vc_top)
988 scrdown(vc, vc->vc_top, vc->vc_bottom, 1);
989 else if (vc->vc_y > 0) {
990 vc->vc_y--;
991 vc->vc_pos -= vc->vc_size_row;
992 }
993 vc->vc_need_wrap = 0;
994}
995
996static inline void cr(struct vc_data *vc)
997{
998 vc->vc_pos -= vc->vc_x << 1;
999 vc->vc_need_wrap = vc->vc_x = 0;
1000}
1001
1002static inline void bs(struct vc_data *vc)
1003{
1004 if (vc->vc_x) {
1005 vc->vc_pos -= 2;
1006 vc->vc_x--;
1007 vc->vc_need_wrap = 0;
1008 }
1009}
1010
1011static inline void del(struct vc_data *vc)
1012{
1013 /* ignored */
1014}
1015
1016static void csi_J(struct vc_data *vc, int vpar)
1017{
1018 unsigned int count;
1019 unsigned short * start;
1020
1021 switch (vpar) {
1022 case 0: /* erase from cursor to end of display */
1023 count = (vc->vc_scr_end - vc->vc_pos) >> 1;
1024 start = (unsigned short *)vc->vc_pos;
1025 if (DO_UPDATE(vc)) {
1026 /* do in two stages */
1027 vc->vc_sw->con_clear(vc, vc->vc_y, vc->vc_x, 1,
1028 vc->vc_cols - vc->vc_x);
1029 vc->vc_sw->con_clear(vc, vc->vc_y + 1, 0,
1030 vc->vc_rows - vc->vc_y - 1,
1031 vc->vc_cols);
1032 }
1033 break;
1034 case 1: /* erase from start to cursor */
1035 count = ((vc->vc_pos - vc->vc_origin) >> 1) + 1;
1036 start = (unsigned short *)vc->vc_origin;
1037 if (DO_UPDATE(vc)) {
1038 /* do in two stages */
1039 vc->vc_sw->con_clear(vc, 0, 0, vc->vc_y,
1040 vc->vc_cols);
1041 vc->vc_sw->con_clear(vc, vc->vc_y, 0, 1,
1042 vc->vc_x + 1);
1043 }
1044 break;
1045 case 2: /* erase whole display */
1046 count = vc->vc_cols * vc->vc_rows;
1047 start = (unsigned short *)vc->vc_origin;
1048 if (DO_UPDATE(vc))
1049 vc->vc_sw->con_clear(vc, 0, 0,
1050 vc->vc_rows,
1051 vc->vc_cols);
1052 break;
1053 default:
1054 return;
1055 }
1056 scr_memsetw(start, vc->vc_video_erase_char, 2 * count);
1057 vc->vc_need_wrap = 0;
1058}
1059
1060static void csi_K(struct vc_data *vc, int vpar)
1061{
1062 unsigned int count;
1063 unsigned short * start;
1064
1065 switch (vpar) {
1066 case 0: /* erase from cursor to end of line */
1067 count = vc->vc_cols - vc->vc_x;
1068 start = (unsigned short *)vc->vc_pos;
1069 if (DO_UPDATE(vc))
1070 vc->vc_sw->con_clear(vc, vc->vc_y, vc->vc_x, 1,
1071 vc->vc_cols - vc->vc_x);
1072 break;
1073 case 1: /* erase from start of line to cursor */
1074 start = (unsigned short *)(vc->vc_pos - (vc->vc_x << 1));
1075 count = vc->vc_x + 1;
1076 if (DO_UPDATE(vc))
1077 vc->vc_sw->con_clear(vc, vc->vc_y, 0, 1,
1078 vc->vc_x + 1);
1079 break;
1080 case 2: /* erase whole line */
1081 start = (unsigned short *)(vc->vc_pos - (vc->vc_x << 1));
1082 count = vc->vc_cols;
1083 if (DO_UPDATE(vc))
1084 vc->vc_sw->con_clear(vc, vc->vc_y, 0, 1,
1085 vc->vc_cols);
1086 break;
1087 default:
1088 return;
1089 }
1090 scr_memsetw(start, vc->vc_video_erase_char, 2 * count);
1091 vc->vc_need_wrap = 0;
1092}
1093
1094static void csi_X(struct vc_data *vc, int vpar) /* erase the following vpar positions */
1095{ /* not vt100? */
1096 int count;
1097
1098 if (!vpar)
1099 vpar++;
1100 count = (vpar > vc->vc_cols - vc->vc_x) ? (vc->vc_cols - vc->vc_x) : vpar;
1101
1102 scr_memsetw((unsigned short *)vc->vc_pos, vc->vc_video_erase_char, 2 * count);
1103 if (DO_UPDATE(vc))
1104 vc->vc_sw->con_clear(vc, vc->vc_y, vc->vc_x, 1, count);
1105 vc->vc_need_wrap = 0;
1106}
1107
1108static void default_attr(struct vc_data *vc)
1109{
1110 vc->vc_intensity = 1;
1111 vc->vc_underline = 0;
1112 vc->vc_reverse = 0;
1113 vc->vc_blink = 0;
1114 vc->vc_color = vc->vc_def_color;
1115}
1116
1117/* console_sem is held */
1118static void csi_m(struct vc_data *vc)
1119{
1120 int i;
1121
1122 for (i = 0; i <= vc->vc_npar; i++)
1123 switch (vc->vc_par[i]) {
1124 case 0: /* all attributes off */
1125 default_attr(vc);
1126 break;
1127 case 1:
1128 vc->vc_intensity = 2;
1129 break;
1130 case 2:
1131 vc->vc_intensity = 0;
1132 break;
1133 case 4:
1134 vc->vc_underline = 1;
1135 break;
1136 case 5:
1137 vc->vc_blink = 1;
1138 break;
1139 case 7:
1140 vc->vc_reverse = 1;
1141 break;
1142 case 10: /* ANSI X3.64-1979 (SCO-ish?)
1143 * Select primary font, don't display
1144 * control chars if defined, don't set
1145 * bit 8 on output.
1146 */
1147 vc->vc_translate = set_translate(vc->vc_charset == 0
1148 ? vc->vc_G0_charset
1149 : vc->vc_G1_charset, vc);
1150 vc->vc_disp_ctrl = 0;
1151 vc->vc_toggle_meta = 0;
1152 break;
1153 case 11: /* ANSI X3.64-1979 (SCO-ish?)
1154 * Select first alternate font, lets
1155 * chars < 32 be displayed as ROM chars.
1156 */
1157 vc->vc_translate = set_translate(IBMPC_MAP, vc);
1158 vc->vc_disp_ctrl = 1;
1159 vc->vc_toggle_meta = 0;
1160 break;
1161 case 12: /* ANSI X3.64-1979 (SCO-ish?)
1162 * Select second alternate font, toggle
1163 * high bit before displaying as ROM char.
1164 */
1165 vc->vc_translate = set_translate(IBMPC_MAP, vc);
1166 vc->vc_disp_ctrl = 1;
1167 vc->vc_toggle_meta = 1;
1168 break;
1169 case 21:
1170 case 22:
1171 vc->vc_intensity = 1;
1172 break;
1173 case 24:
1174 vc->vc_underline = 0;
1175 break;
1176 case 25:
1177 vc->vc_blink = 0;
1178 break;
1179 case 27:
1180 vc->vc_reverse = 0;
1181 break;
1182 case 38: /* ANSI X3.64-1979 (SCO-ish?)
1183 * Enables underscore, white foreground
1184 * with white underscore (Linux - use
1185 * default foreground).
1186 */
1187 vc->vc_color = (vc->vc_def_color & 0x0f) | (vc->vc_color & 0xf0);
1188 vc->vc_underline = 1;
1189 break;
1190 case 39: /* ANSI X3.64-1979 (SCO-ish?)
1191 * Disable underline option.
1192 * Reset colour to default? It did this
1193 * before...
1194 */
1195 vc->vc_color = (vc->vc_def_color & 0x0f) | (vc->vc_color & 0xf0);
1196 vc->vc_underline = 0;
1197 break;
1198 case 49:
1199 vc->vc_color = (vc->vc_def_color & 0xf0) | (vc->vc_color & 0x0f);
1200 break;
1201 default:
1202 if (vc->vc_par[i] >= 30 && vc->vc_par[i] <= 37)
1203 vc->vc_color = color_table[vc->vc_par[i] - 30]
1204 | (vc->vc_color & 0xf0);
1205 else if (vc->vc_par[i] >= 40 && vc->vc_par[i] <= 47)
1206 vc->vc_color = (color_table[vc->vc_par[i] - 40] << 4)
1207 | (vc->vc_color & 0x0f);
1208 break;
1209 }
1210 update_attr(vc);
1211}
1212
1213static void respond_string(const char *p, struct tty_struct *tty)
1214{
1215 while (*p) {
1216 tty_insert_flip_char(tty, *p, 0);
1217 p++;
1218 }
1219 con_schedule_flip(tty);
1220}
1221
1222static void cursor_report(struct vc_data *vc, struct tty_struct *tty)
1223{
1224 char buf[40];
1225
1226 sprintf(buf, "\033[%d;%dR", vc->vc_y + (vc->vc_decom ? vc->vc_top + 1 : 1), vc->vc_x + 1);
1227 respond_string(buf, tty);
1228}
1229
1230static inline void status_report(struct tty_struct *tty)
1231{
1232 respond_string("\033[0n", tty); /* Terminal ok */
1233}
1234
1235static inline void respond_ID(struct tty_struct * tty)
1236{
1237 respond_string(VT102ID, tty);
1238}
1239
1240void mouse_report(struct tty_struct *tty, int butt, int mrx, int mry)
1241{
1242 char buf[8];
1243
1244 sprintf(buf, "\033[M%c%c%c", (char)(' ' + butt), (char)('!' + mrx),
1245 (char)('!' + mry));
1246 respond_string(buf, tty);
1247}
1248
1249/* invoked via ioctl(TIOCLINUX) and through set_selection */
1250int mouse_reporting(void)
1251{
1252 return vc_cons[fg_console].d->vc_report_mouse;
1253}
1254
1255/* console_sem is held */
1256static void set_mode(struct vc_data *vc, int on_off)
1257{
1258 int i;
1259
1260 for (i = 0; i <= vc->vc_npar; i++)
1261 if (vc->vc_ques) {
1262 switch(vc->vc_par[i]) { /* DEC private modes set/reset */
1263 case 1: /* Cursor keys send ^[Ox/^[[x */
1264 if (on_off)
1265 set_kbd(vc, decckm);
1266 else
1267 clr_kbd(vc, decckm);
1268 break;
1269 case 3: /* 80/132 mode switch unimplemented */
1270 vc->vc_deccolm = on_off;
1271#if 0
1272 vc_resize(deccolm ? 132 : 80, vc->vc_rows);
1273 /* this alone does not suffice; some user mode
1274 utility has to change the hardware regs */
1275#endif
1276 break;
1277 case 5: /* Inverted screen on/off */
1278 if (vc->vc_decscnm != on_off) {
1279 vc->vc_decscnm = on_off;
1280 invert_screen(vc, 0, vc->vc_screenbuf_size, 0);
1281 update_attr(vc);
1282 }
1283 break;
1284 case 6: /* Origin relative/absolute */
1285 vc->vc_decom = on_off;
1286 gotoxay(vc, 0, 0);
1287 break;
1288 case 7: /* Autowrap on/off */
1289 vc->vc_decawm = on_off;
1290 break;
1291 case 8: /* Autorepeat on/off */
1292 if (on_off)
1293 set_kbd(vc, decarm);
1294 else
1295 clr_kbd(vc, decarm);
1296 break;
1297 case 9:
1298 vc->vc_report_mouse = on_off ? 1 : 0;
1299 break;
1300 case 25: /* Cursor on/off */
1301 vc->vc_deccm = on_off;
1302 break;
1303 case 1000:
1304 vc->vc_report_mouse = on_off ? 2 : 0;
1305 break;
1306 }
1307 } else {
1308 switch(vc->vc_par[i]) { /* ANSI modes set/reset */
1309 case 3: /* Monitor (display ctrls) */
1310 vc->vc_disp_ctrl = on_off;
1311 break;
1312 case 4: /* Insert Mode on/off */
1313 vc->vc_decim = on_off;
1314 break;
1315 case 20: /* Lf, Enter == CrLf/Lf */
1316 if (on_off)
1317 set_kbd(vc, lnm);
1318 else
1319 clr_kbd(vc, lnm);
1320 break;
1321 }
1322 }
1323}
1324
1325/* console_sem is held */
1326static void setterm_command(struct vc_data *vc)
1327{
1328 switch(vc->vc_par[0]) {
1329 case 1: /* set color for underline mode */
1330 if (vc->vc_can_do_color &&
1331 vc->vc_par[1] < 16) {
1332 vc->vc_ulcolor = color_table[vc->vc_par[1]];
1333 if (vc->vc_underline)
1334 update_attr(vc);
1335 }
1336 break;
1337 case 2: /* set color for half intensity mode */
1338 if (vc->vc_can_do_color &&
1339 vc->vc_par[1] < 16) {
1340 vc->vc_halfcolor = color_table[vc->vc_par[1]];
1341 if (vc->vc_intensity == 0)
1342 update_attr(vc);
1343 }
1344 break;
1345 case 8: /* store colors as defaults */
1346 vc->vc_def_color = vc->vc_attr;
1347 if (vc->vc_hi_font_mask == 0x100)
1348 vc->vc_def_color >>= 1;
1349 default_attr(vc);
1350 update_attr(vc);
1351 break;
1352 case 9: /* set blanking interval */
1353 blankinterval = ((vc->vc_par[1] < 60) ? vc->vc_par[1] : 60) * 60 * HZ;
1354 poke_blanked_console();
1355 break;
1356 case 10: /* set bell frequency in Hz */
1357 if (vc->vc_npar >= 1)
1358 vc->vc_bell_pitch = vc->vc_par[1];
1359 else
1360 vc->vc_bell_pitch = DEFAULT_BELL_PITCH;
1361 break;
1362 case 11: /* set bell duration in msec */
1363 if (vc->vc_npar >= 1)
1364 vc->vc_bell_duration = (vc->vc_par[1] < 2000) ?
1365 vc->vc_par[1] * HZ / 1000 : 0;
1366 else
1367 vc->vc_bell_duration = DEFAULT_BELL_DURATION;
1368 break;
1369 case 12: /* bring specified console to the front */
1370 if (vc->vc_par[1] >= 1 && vc_cons_allocated(vc->vc_par[1] - 1))
1371 set_console(vc->vc_par[1] - 1);
1372 break;
1373 case 13: /* unblank the screen */
1374 poke_blanked_console();
1375 break;
1376 case 14: /* set vesa powerdown interval */
1377 vesa_off_interval = ((vc->vc_par[1] < 60) ? vc->vc_par[1] : 60) * 60 * HZ;
1378 break;
1379 case 15: /* activate the previous console */
1380 set_console(last_console);
1381 break;
1382 }
1383}
1384
1385/* console_sem is held */
1386static void csi_at(struct vc_data *vc, unsigned int nr)
1387{
1388 if (nr > vc->vc_cols - vc->vc_x)
1389 nr = vc->vc_cols - vc->vc_x;
1390 else if (!nr)
1391 nr = 1;
1392 insert_char(vc, nr);
1393}
1394
1395/* console_sem is held */
1396static void csi_L(struct vc_data *vc, unsigned int nr)
1397{
1398 if (nr > vc->vc_rows - vc->vc_y)
1399 nr = vc->vc_rows - vc->vc_y;
1400 else if (!nr)
1401 nr = 1;
1402 scrdown(vc, vc->vc_y, vc->vc_bottom, nr);
1403 vc->vc_need_wrap = 0;
1404}
1405
1406/* console_sem is held */
1407static void csi_P(struct vc_data *vc, unsigned int nr)
1408{
1409 if (nr > vc->vc_cols - vc->vc_x)
1410 nr = vc->vc_cols - vc->vc_x;
1411 else if (!nr)
1412 nr = 1;
1413 delete_char(vc, nr);
1414}
1415
1416/* console_sem is held */
1417static void csi_M(struct vc_data *vc, unsigned int nr)
1418{
1419 if (nr > vc->vc_rows - vc->vc_y)
1420 nr = vc->vc_rows - vc->vc_y;
1421 else if (!nr)
1422 nr=1;
1423 scrup(vc, vc->vc_y, vc->vc_bottom, nr);
1424 vc->vc_need_wrap = 0;
1425}
1426
1427/* console_sem is held (except via vc_init->reset_terminal */
1428static void save_cur(struct vc_data *vc)
1429{
1430 vc->vc_saved_x = vc->vc_x;
1431 vc->vc_saved_y = vc->vc_y;
1432 vc->vc_s_intensity = vc->vc_intensity;
1433 vc->vc_s_underline = vc->vc_underline;
1434 vc->vc_s_blink = vc->vc_blink;
1435 vc->vc_s_reverse = vc->vc_reverse;
1436 vc->vc_s_charset = vc->vc_charset;
1437 vc->vc_s_color = vc->vc_color;
1438 vc->vc_saved_G0 = vc->vc_G0_charset;
1439 vc->vc_saved_G1 = vc->vc_G1_charset;
1440}
1441
1442/* console_sem is held */
1443static void restore_cur(struct vc_data *vc)
1444{
1445 gotoxy(vc, vc->vc_saved_x, vc->vc_saved_y);
1446 vc->vc_intensity = vc->vc_s_intensity;
1447 vc->vc_underline = vc->vc_s_underline;
1448 vc->vc_blink = vc->vc_s_blink;
1449 vc->vc_reverse = vc->vc_s_reverse;
1450 vc->vc_charset = vc->vc_s_charset;
1451 vc->vc_color = vc->vc_s_color;
1452 vc->vc_G0_charset = vc->vc_saved_G0;
1453 vc->vc_G1_charset = vc->vc_saved_G1;
1454 vc->vc_translate = set_translate(vc->vc_charset ? vc->vc_G1_charset : vc->vc_G0_charset, vc);
1455 update_attr(vc);
1456 vc->vc_need_wrap = 0;
1457}
1458
1459enum { ESnormal, ESesc, ESsquare, ESgetpars, ESgotpars, ESfunckey,
1460 EShash, ESsetG0, ESsetG1, ESpercent, ESignore, ESnonstd,
1461 ESpalette };
1462
1463/* console_sem is held (except via vc_init()) */
1464static void reset_terminal(struct vc_data *vc, int do_clear)
1465{
1466 vc->vc_top = 0;
1467 vc->vc_bottom = vc->vc_rows;
1468 vc->vc_state = ESnormal;
1469 vc->vc_ques = 0;
1470 vc->vc_translate = set_translate(LAT1_MAP, vc);
1471 vc->vc_G0_charset = LAT1_MAP;
1472 vc->vc_G1_charset = GRAF_MAP;
1473 vc->vc_charset = 0;
1474 vc->vc_need_wrap = 0;
1475 vc->vc_report_mouse = 0;
1476 vc->vc_utf = 0;
1477 vc->vc_utf_count = 0;
1478
1479 vc->vc_disp_ctrl = 0;
1480 vc->vc_toggle_meta = 0;
1481
1482 vc->vc_decscnm = 0;
1483 vc->vc_decom = 0;
1484 vc->vc_decawm = 1;
1485 vc->vc_deccm = 1;
1486 vc->vc_decim = 0;
1487
1488 set_kbd(vc, decarm);
1489 clr_kbd(vc, decckm);
1490 clr_kbd(vc, kbdapplic);
1491 clr_kbd(vc, lnm);
1492 kbd_table[vc->vc_num].lockstate = 0;
1493 kbd_table[vc->vc_num].slockstate = 0;
1494 kbd_table[vc->vc_num].ledmode = LED_SHOW_FLAGS;
1495 kbd_table[vc->vc_num].ledflagstate = kbd_table[vc->vc_num].default_ledflagstate;
1496 /* do not do set_leds here because this causes an endless tasklet loop
1497 when the keyboard hasn't been initialized yet */
1498
1499 vc->vc_cursor_type = CUR_DEFAULT;
1500 vc->vc_complement_mask = vc->vc_s_complement_mask;
1501
1502 default_attr(vc);
1503 update_attr(vc);
1504
1505 vc->vc_tab_stop[0] = 0x01010100;
1506 vc->vc_tab_stop[1] =
1507 vc->vc_tab_stop[2] =
1508 vc->vc_tab_stop[3] =
1509 vc->vc_tab_stop[4] = 0x01010101;
1510
1511 vc->vc_bell_pitch = DEFAULT_BELL_PITCH;
1512 vc->vc_bell_duration = DEFAULT_BELL_DURATION;
1513
1514 gotoxy(vc, 0, 0);
1515 save_cur(vc);
1516 if (do_clear)
1517 csi_J(vc, 2);
1518}
1519
1520/* console_sem is held */
1521static void do_con_trol(struct tty_struct *tty, struct vc_data *vc, int c)
1522{
1523 /*
1524 * Control characters can be used in the _middle_
1525 * of an escape sequence.
1526 */
1527 switch (c) {
1528 case 0:
1529 return;
1530 case 7:
1531 if (vc->vc_bell_duration)
1532 kd_mksound(vc->vc_bell_pitch, vc->vc_bell_duration);
1533 return;
1534 case 8:
1535 bs(vc);
1536 return;
1537 case 9:
1538 vc->vc_pos -= (vc->vc_x << 1);
1539 while (vc->vc_x < vc->vc_cols - 1) {
1540 vc->vc_x++;
1541 if (vc->vc_tab_stop[vc->vc_x >> 5] & (1 << (vc->vc_x & 31)))
1542 break;
1543 }
1544 vc->vc_pos += (vc->vc_x << 1);
1545 return;
1546 case 10: case 11: case 12:
1547 lf(vc);
1548 if (!is_kbd(vc, lnm))
1549 return;
1550 case 13:
1551 cr(vc);
1552 return;
1553 case 14:
1554 vc->vc_charset = 1;
1555 vc->vc_translate = set_translate(vc->vc_G1_charset, vc);
1556 vc->vc_disp_ctrl = 1;
1557 return;
1558 case 15:
1559 vc->vc_charset = 0;
1560 vc->vc_translate = set_translate(vc->vc_G0_charset, vc);
1561 vc->vc_disp_ctrl = 0;
1562 return;
1563 case 24: case 26:
1564 vc->vc_state = ESnormal;
1565 return;
1566 case 27:
1567 vc->vc_state = ESesc;
1568 return;
1569 case 127:
1570 del(vc);
1571 return;
1572 case 128+27:
1573 vc->vc_state = ESsquare;
1574 return;
1575 }
1576 switch(vc->vc_state) {
1577 case ESesc:
1578 vc->vc_state = ESnormal;
1579 switch (c) {
1580 case '[':
1581 vc->vc_state = ESsquare;
1582 return;
1583 case ']':
1584 vc->vc_state = ESnonstd;
1585 return;
1586 case '%':
1587 vc->vc_state = ESpercent;
1588 return;
1589 case 'E':
1590 cr(vc);
1591 lf(vc);
1592 return;
1593 case 'M':
1594 ri(vc);
1595 return;
1596 case 'D':
1597 lf(vc);
1598 return;
1599 case 'H':
1600 vc->vc_tab_stop[vc->vc_x >> 5] |= (1 << (vc->vc_x & 31));
1601 return;
1602 case 'Z':
1603 respond_ID(tty);
1604 return;
1605 case '7':
1606 save_cur(vc);
1607 return;
1608 case '8':
1609 restore_cur(vc);
1610 return;
1611 case '(':
1612 vc->vc_state = ESsetG0;
1613 return;
1614 case ')':
1615 vc->vc_state = ESsetG1;
1616 return;
1617 case '#':
1618 vc->vc_state = EShash;
1619 return;
1620 case 'c':
1621 reset_terminal(vc, 1);
1622 return;
1623 case '>': /* Numeric keypad */
1624 clr_kbd(vc, kbdapplic);
1625 return;
1626 case '=': /* Appl. keypad */
1627 set_kbd(vc, kbdapplic);
1628 return;
1629 }
1630 return;
1631 case ESnonstd:
1632 if (c=='P') { /* palette escape sequence */
1633 for (vc->vc_npar = 0; vc->vc_npar < NPAR; vc->vc_npar++)
1634 vc->vc_par[vc->vc_npar] = 0;
1635 vc->vc_npar = 0;
1636 vc->vc_state = ESpalette;
1637 return;
1638 } else if (c=='R') { /* reset palette */
1639 reset_palette(vc);
1640 vc->vc_state = ESnormal;
1641 } else
1642 vc->vc_state = ESnormal;
1643 return;
1644 case ESpalette:
1645 if ( (c>='0'&&c<='9') || (c>='A'&&c<='F') || (c>='a'&&c<='f') ) {
1646 vc->vc_par[vc->vc_npar++] = (c > '9' ? (c & 0xDF) - 'A' + 10 : c - '0');
1647 if (vc->vc_npar == 7) {
1648 int i = vc->vc_par[0] * 3, j = 1;
1649 vc->vc_palette[i] = 16 * vc->vc_par[j++];
1650 vc->vc_palette[i++] += vc->vc_par[j++];
1651 vc->vc_palette[i] = 16 * vc->vc_par[j++];
1652 vc->vc_palette[i++] += vc->vc_par[j++];
1653 vc->vc_palette[i] = 16 * vc->vc_par[j++];
1654 vc->vc_palette[i] += vc->vc_par[j];
1655 set_palette(vc);
1656 vc->vc_state = ESnormal;
1657 }
1658 } else
1659 vc->vc_state = ESnormal;
1660 return;
1661 case ESsquare:
1662 for (vc->vc_npar = 0; vc->vc_npar < NPAR; vc->vc_npar++)
1663 vc->vc_par[vc->vc_npar] = 0;
1664 vc->vc_npar = 0;
1665 vc->vc_state = ESgetpars;
1666 if (c == '[') { /* Function key */
1667 vc->vc_state=ESfunckey;
1668 return;
1669 }
1670 vc->vc_ques = (c == '?');
1671 if (vc->vc_ques)
1672 return;
1673 case ESgetpars:
1674 if (c == ';' && vc->vc_npar < NPAR - 1) {
1675 vc->vc_npar++;
1676 return;
1677 } else if (c>='0' && c<='9') {
1678 vc->vc_par[vc->vc_npar] *= 10;
1679 vc->vc_par[vc->vc_npar] += c - '0';
1680 return;
1681 } else
1682 vc->vc_state = ESgotpars;
1683 case ESgotpars:
1684 vc->vc_state = ESnormal;
1685 switch(c) {
1686 case 'h':
1687 set_mode(vc, 1);
1688 return;
1689 case 'l':
1690 set_mode(vc, 0);
1691 return;
1692 case 'c':
1693 if (vc->vc_ques) {
1694 if (vc->vc_par[0])
1695 vc->vc_cursor_type = vc->vc_par[0] | (vc->vc_par[1] << 8) | (vc->vc_par[2] << 16);
1696 else
1697 vc->vc_cursor_type = CUR_DEFAULT;
1698 return;
1699 }
1700 break;
1701 case 'm':
1702 if (vc->vc_ques) {
1703 clear_selection();
1704 if (vc->vc_par[0])
1705 vc->vc_complement_mask = vc->vc_par[0] << 8 | vc->vc_par[1];
1706 else
1707 vc->vc_complement_mask = vc->vc_s_complement_mask;
1708 return;
1709 }
1710 break;
1711 case 'n':
1712 if (!vc->vc_ques) {
1713 if (vc->vc_par[0] == 5)
1714 status_report(tty);
1715 else if (vc->vc_par[0] == 6)
1716 cursor_report(vc, tty);
1717 }
1718 return;
1719 }
1720 if (vc->vc_ques) {
1721 vc->vc_ques = 0;
1722 return;
1723 }
1724 switch(c) {
1725 case 'G': case '`':
1726 if (vc->vc_par[0])
1727 vc->vc_par[0]--;
1728 gotoxy(vc, vc->vc_par[0], vc->vc_y);
1729 return;
1730 case 'A':
1731 if (!vc->vc_par[0])
1732 vc->vc_par[0]++;
1733 gotoxy(vc, vc->vc_x, vc->vc_y - vc->vc_par[0]);
1734 return;
1735 case 'B': case 'e':
1736 if (!vc->vc_par[0])
1737 vc->vc_par[0]++;
1738 gotoxy(vc, vc->vc_x, vc->vc_y + vc->vc_par[0]);
1739 return;
1740 case 'C': case 'a':
1741 if (!vc->vc_par[0])
1742 vc->vc_par[0]++;
1743 gotoxy(vc, vc->vc_x + vc->vc_par[0], vc->vc_y);
1744 return;
1745 case 'D':
1746 if (!vc->vc_par[0])
1747 vc->vc_par[0]++;
1748 gotoxy(vc, vc->vc_x - vc->vc_par[0], vc->vc_y);
1749 return;
1750 case 'E':
1751 if (!vc->vc_par[0])
1752 vc->vc_par[0]++;
1753 gotoxy(vc, 0, vc->vc_y + vc->vc_par[0]);
1754 return;
1755 case 'F':
1756 if (!vc->vc_par[0])
1757 vc->vc_par[0]++;
1758 gotoxy(vc, 0, vc->vc_y - vc->vc_par[0]);
1759 return;
1760 case 'd':
1761 if (vc->vc_par[0])
1762 vc->vc_par[0]--;
1763 gotoxay(vc, vc->vc_x ,vc->vc_par[0]);
1764 return;
1765 case 'H': case 'f':
1766 if (vc->vc_par[0])
1767 vc->vc_par[0]--;
1768 if (vc->vc_par[1])
1769 vc->vc_par[1]--;
1770 gotoxay(vc, vc->vc_par[1], vc->vc_par[0]);
1771 return;
1772 case 'J':
1773 csi_J(vc, vc->vc_par[0]);
1774 return;
1775 case 'K':
1776 csi_K(vc, vc->vc_par[0]);
1777 return;
1778 case 'L':
1779 csi_L(vc, vc->vc_par[0]);
1780 return;
1781 case 'M':
1782 csi_M(vc, vc->vc_par[0]);
1783 return;
1784 case 'P':
1785 csi_P(vc, vc->vc_par[0]);
1786 return;
1787 case 'c':
1788 if (!vc->vc_par[0])
1789 respond_ID(tty);
1790 return;
1791 case 'g':
1792 if (!vc->vc_par[0])
1793 vc->vc_tab_stop[vc->vc_x >> 5] &= ~(1 << (vc->vc_x & 31));
1794 else if (vc->vc_par[0] == 3) {
1795 vc->vc_tab_stop[0] =
1796 vc->vc_tab_stop[1] =
1797 vc->vc_tab_stop[2] =
1798 vc->vc_tab_stop[3] =
1799 vc->vc_tab_stop[4] = 0;
1800 }
1801 return;
1802 case 'm':
1803 csi_m(vc);
1804 return;
1805 case 'q': /* DECLL - but only 3 leds */
1806 /* map 0,1,2,3 to 0,1,2,4 */
1807 if (vc->vc_par[0] < 4)
1808 setledstate(kbd_table + vc->vc_num,
1809 (vc->vc_par[0] < 3) ? vc->vc_par[0] : 4);
1810 return;
1811 case 'r':
1812 if (!vc->vc_par[0])
1813 vc->vc_par[0]++;
1814 if (!vc->vc_par[1])
1815 vc->vc_par[1] = vc->vc_rows;
1816 /* Minimum allowed region is 2 lines */
1817 if (vc->vc_par[0] < vc->vc_par[1] &&
1818 vc->vc_par[1] <= vc->vc_rows) {
1819 vc->vc_top = vc->vc_par[0] - 1;
1820 vc->vc_bottom = vc->vc_par[1];
1821 gotoxay(vc, 0, 0);
1822 }
1823 return;
1824 case 's':
1825 save_cur(vc);
1826 return;
1827 case 'u':
1828 restore_cur(vc);
1829 return;
1830 case 'X':
1831 csi_X(vc, vc->vc_par[0]);
1832 return;
1833 case '@':
1834 csi_at(vc, vc->vc_par[0]);
1835 return;
1836 case ']': /* setterm functions */
1837 setterm_command(vc);
1838 return;
1839 }
1840 return;
1841 case ESpercent:
1842 vc->vc_state = ESnormal;
1843 switch (c) {
1844 case '@': /* defined in ISO 2022 */
1845 vc->vc_utf = 0;
1846 return;
1847 case 'G': /* prelim official escape code */
1848 case '8': /* retained for compatibility */
1849 vc->vc_utf = 1;
1850 return;
1851 }
1852 return;
1853 case ESfunckey:
1854 vc->vc_state = ESnormal;
1855 return;
1856 case EShash:
1857 vc->vc_state = ESnormal;
1858 if (c == '8') {
1859 /* DEC screen alignment test. kludge :-) */
1860 vc->vc_video_erase_char =
1861 (vc->vc_video_erase_char & 0xff00) | 'E';
1862 csi_J(vc, 2);
1863 vc->vc_video_erase_char =
1864 (vc->vc_video_erase_char & 0xff00) | ' ';
1865 do_update_region(vc, vc->vc_origin, vc->vc_screenbuf_size / 2);
1866 }
1867 return;
1868 case ESsetG0:
1869 if (c == '0')
1870 vc->vc_G0_charset = GRAF_MAP;
1871 else if (c == 'B')
1872 vc->vc_G0_charset = LAT1_MAP;
1873 else if (c == 'U')
1874 vc->vc_G0_charset = IBMPC_MAP;
1875 else if (c == 'K')
1876 vc->vc_G0_charset = USER_MAP;
1877 if (vc->vc_charset == 0)
1878 vc->vc_translate = set_translate(vc->vc_G0_charset, vc);
1879 vc->vc_state = ESnormal;
1880 return;
1881 case ESsetG1:
1882 if (c == '0')
1883 vc->vc_G1_charset = GRAF_MAP;
1884 else if (c == 'B')
1885 vc->vc_G1_charset = LAT1_MAP;
1886 else if (c == 'U')
1887 vc->vc_G1_charset = IBMPC_MAP;
1888 else if (c == 'K')
1889 vc->vc_G1_charset = USER_MAP;
1890 if (vc->vc_charset == 1)
1891 vc->vc_translate = set_translate(vc->vc_G1_charset, vc);
1892 vc->vc_state = ESnormal;
1893 return;
1894 default:
1895 vc->vc_state = ESnormal;
1896 }
1897}
1898
1899/* This is a temporary buffer used to prepare a tty console write
1900 * so that we can easily avoid touching user space while holding the
1901 * console spinlock. It is allocated in con_init and is shared by
1902 * this code and the vc_screen read/write tty calls.
1903 *
1904 * We have to allocate this statically in the kernel data section
1905 * since console_init (and thus con_init) are called before any
1906 * kernel memory allocation is available.
1907 */
1908char con_buf[CON_BUF_SIZE];
1909DECLARE_MUTEX(con_buf_sem);
1910
1911/* acquires console_sem */
1912static int do_con_write(struct tty_struct *tty, const unsigned char *buf, int count)
1913{
1914#ifdef VT_BUF_VRAM_ONLY
1915#define FLUSH do { } while(0);
1916#else
1917#define FLUSH if (draw_x >= 0) { \
1918 vc->vc_sw->con_putcs(vc, (u16 *)draw_from, (u16 *)draw_to - (u16 *)draw_from, vc->vc_y, draw_x); \
1919 draw_x = -1; \
1920 }
1921#endif
1922
1923 int c, tc, ok, n = 0, draw_x = -1;
1924 unsigned int currcons;
1925 unsigned long draw_from = 0, draw_to = 0;
1926 struct vc_data *vc;
1927 u16 himask, charmask;
1928 const unsigned char *orig_buf = NULL;
1929 int orig_count;
1930
1931 if (in_interrupt())
1932 return count;
1933
1934 might_sleep();
1935
1936 acquire_console_sem();
1937 vc = tty->driver_data;
1938 if (vc == NULL) {
1939 printk(KERN_ERR "vt: argh, driver_data is NULL !\n");
1940 release_console_sem();
1941 return 0;
1942 }
1943
1944 currcons = vc->vc_num;
1945 if (!vc_cons_allocated(currcons)) {
1946 /* could this happen? */
1947 static int error = 0;
1948 if (!error) {
1949 error = 1;
1950 printk("con_write: tty %d not allocated\n", currcons+1);
1951 }
1952 release_console_sem();
1953 return 0;
1954 }
1955 release_console_sem();
1956
1957 orig_buf = buf;
1958 orig_count = count;
1959
1960 /* At this point 'buf' is guaranteed to be a kernel buffer
1961 * and therefore no access to userspace (and therefore sleeping)
1962 * will be needed. The con_buf_sem serializes all tty based
1963 * console rendering and vcs write/read operations. We hold
1964 * the console spinlock during the entire write.
1965 */
1966
1967 acquire_console_sem();
1968
1969 vc = tty->driver_data;
1970 if (vc == NULL) {
1971 printk(KERN_ERR "vt: argh, driver_data _became_ NULL !\n");
1972 release_console_sem();
1973 goto out;
1974 }
1975
1976 himask = vc->vc_hi_font_mask;
1977 charmask = himask ? 0x1ff : 0xff;
1978
1979 /* undraw cursor first */
1980 if (IS_FG(vc))
1981 hide_cursor(vc);
1982
1983 while (!tty->stopped && count) {
1984 int orig = *buf;
1985 c = orig;
1986 buf++;
1987 n++;
1988 count--;
1989
1990 /* Do no translation at all in control states */
1991 if (vc->vc_state != ESnormal) {
1992 tc = c;
1993 } else if (vc->vc_utf) {
1994 /* Combine UTF-8 into Unicode */
1995 /* Incomplete characters silently ignored */
1996 if(c > 0x7f) {
1997 if (vc->vc_utf_count > 0 && (c & 0xc0) == 0x80) {
1998 vc->vc_utf_char = (vc->vc_utf_char << 6) | (c & 0x3f);
1999 vc->vc_utf_count--;
2000 if (vc->vc_utf_count == 0)
2001 tc = c = vc->vc_utf_char;
2002 else continue;
2003 } else {
2004 if ((c & 0xe0) == 0xc0) {
2005 vc->vc_utf_count = 1;
2006 vc->vc_utf_char = (c & 0x1f);
2007 } else if ((c & 0xf0) == 0xe0) {
2008 vc->vc_utf_count = 2;
2009 vc->vc_utf_char = (c & 0x0f);
2010 } else if ((c & 0xf8) == 0xf0) {
2011 vc->vc_utf_count = 3;
2012 vc->vc_utf_char = (c & 0x07);
2013 } else if ((c & 0xfc) == 0xf8) {
2014 vc->vc_utf_count = 4;
2015 vc->vc_utf_char = (c & 0x03);
2016 } else if ((c & 0xfe) == 0xfc) {
2017 vc->vc_utf_count = 5;
2018 vc->vc_utf_char = (c & 0x01);
2019 } else
2020 vc->vc_utf_count = 0;
2021 continue;
2022 }
2023 } else {
2024 tc = c;
2025 vc->vc_utf_count = 0;
2026 }
2027 } else { /* no utf */
2028 tc = vc->vc_translate[vc->vc_toggle_meta ? (c | 0x80) : c];
2029 }
2030
2031 /* If the original code was a control character we
2032 * only allow a glyph to be displayed if the code is
2033 * not normally used (such as for cursor movement) or
2034 * if the disp_ctrl mode has been explicitly enabled.
2035 * Certain characters (as given by the CTRL_ALWAYS
2036 * bitmap) are always displayed as control characters,
2037 * as the console would be pretty useless without
2038 * them; to display an arbitrary font position use the
2039 * direct-to-font zone in UTF-8 mode.
2040 */
2041 ok = tc && (c >= 32 ||
2042 (!vc->vc_utf && !(((vc->vc_disp_ctrl ? CTRL_ALWAYS
2043 : CTRL_ACTION) >> c) & 1)))
2044 && (c != 127 || vc->vc_disp_ctrl)
2045 && (c != 128+27);
2046
2047 if (vc->vc_state == ESnormal && ok) {
2048 /* Now try to find out how to display it */
2049 tc = conv_uni_to_pc(vc, tc);
2050 if ( tc == -4 ) {
2051 /* If we got -4 (not found) then see if we have
2052 defined a replacement character (U+FFFD) */
2053 tc = conv_uni_to_pc(vc, 0xfffd);
2054
2055 /* One reason for the -4 can be that we just
2056 did a clear_unimap();
2057 try at least to show something. */
2058 if (tc == -4)
2059 tc = c;
2060 } else if ( tc == -3 ) {
2061 /* Bad hash table -- hope for the best */
2062 tc = c;
2063 }
2064 if (tc & ~charmask)
2065 continue; /* Conversion failed */
2066
2067 if (vc->vc_need_wrap || vc->vc_decim)
2068 FLUSH
2069 if (vc->vc_need_wrap) {
2070 cr(vc);
2071 lf(vc);
2072 }
2073 if (vc->vc_decim)
2074 insert_char(vc, 1);
2075 scr_writew(himask ?
2076 ((vc->vc_attr << 8) & ~himask) + ((tc & 0x100) ? himask : 0) + (tc & 0xff) :
2077 (vc->vc_attr << 8) + tc,
2078 (u16 *) vc->vc_pos);
2079 if (DO_UPDATE(vc) && draw_x < 0) {
2080 draw_x = vc->vc_x;
2081 draw_from = vc->vc_pos;
2082 }
2083 if (vc->vc_x == vc->vc_cols - 1) {
2084 vc->vc_need_wrap = vc->vc_decawm;
2085 draw_to = vc->vc_pos + 2;
2086 } else {
2087 vc->vc_x++;
2088 draw_to = (vc->vc_pos += 2);
2089 }
2090 continue;
2091 }
2092 FLUSH
2093 do_con_trol(tty, vc, orig);
2094 }
2095 FLUSH
2096 console_conditional_schedule();
2097 release_console_sem();
2098
2099out:
2100 return n;
2101#undef FLUSH
2102}
2103
2104/*
2105 * This is the console switching callback.
2106 *
2107 * Doing console switching in a process context allows
2108 * us to do the switches asynchronously (needed when we want
2109 * to switch due to a keyboard interrupt). Synchronization
2110 * with other console code and prevention of re-entrancy is
2111 * ensured with console_sem.
2112 */
2113static void console_callback(void *ignored)
2114{
2115 acquire_console_sem();
2116
2117 if (want_console >= 0) {
2118 if (want_console != fg_console &&
2119 vc_cons_allocated(want_console)) {
2120 hide_cursor(vc_cons[fg_console].d);
2121 change_console(vc_cons[want_console].d);
2122 /* we only changed when the console had already
2123 been allocated - a new console is not created
2124 in an interrupt routine */
2125 }
2126 want_console = -1;
2127 }
2128 if (do_poke_blanked_console) { /* do not unblank for a LED change */
2129 do_poke_blanked_console = 0;
2130 poke_blanked_console();
2131 }
2132 if (scrollback_delta) {
2133 struct vc_data *vc = vc_cons[fg_console].d;
2134 clear_selection();
2135 if (vc->vc_mode == KD_TEXT)
2136 vc->vc_sw->con_scrolldelta(vc, scrollback_delta);
2137 scrollback_delta = 0;
2138 }
2139 if (blank_timer_expired) {
2140 do_blank_screen(0);
2141 blank_timer_expired = 0;
2142 }
2143
2144 release_console_sem();
2145}
2146
2147void set_console(int nr)
2148{
2149 want_console = nr;
2150 schedule_console_callback();
2151}
2152
2153struct tty_driver *console_driver;
2154
2155#ifdef CONFIG_VT_CONSOLE
2156
2157/*
2158 * Console on virtual terminal
2159 *
2160 * The console must be locked when we get here.
2161 */
2162
2163static void vt_console_print(struct console *co, const char *b, unsigned count)
2164{
2165 struct vc_data *vc = vc_cons[fg_console].d;
2166 unsigned char c;
2167 static unsigned long printing;
2168 const ushort *start;
2169 ushort cnt = 0;
2170 ushort myx;
2171
2172 /* console busy or not yet initialized */
2173 if (!printable || test_and_set_bit(0, &printing))
2174 return;
2175
2176 if (kmsg_redirect && vc_cons_allocated(kmsg_redirect - 1))
2177 vc = vc_cons[kmsg_redirect - 1].d;
2178
2179 /* read `x' only after setting currcons properly (otherwise
2180 the `x' macro will read the x of the foreground console). */
2181 myx = vc->vc_x;
2182
2183 if (!vc_cons_allocated(fg_console)) {
2184 /* impossible */
2185 /* printk("vt_console_print: tty %d not allocated ??\n", currcons+1); */
2186 goto quit;
2187 }
2188
2189 if (vc->vc_mode != KD_TEXT)
2190 goto quit;
2191
2192 /* undraw cursor first */
2193 if (IS_FG(vc))
2194 hide_cursor(vc);
2195
2196 start = (ushort *)vc->vc_pos;
2197
2198 /* Contrived structure to try to emulate original need_wrap behaviour
2199 * Problems caused when we have need_wrap set on '\n' character */
2200 while (count--) {
2201 c = *b++;
2202 if (c == 10 || c == 13 || c == 8 || vc->vc_need_wrap) {
2203 if (cnt > 0) {
2204 if (CON_IS_VISIBLE(vc))
2205 vc->vc_sw->con_putcs(vc, start, cnt, vc->vc_y, vc->vc_x);
2206 vc->vc_x += cnt;
2207 if (vc->vc_need_wrap)
2208 vc->vc_x--;
2209 cnt = 0;
2210 }
2211 if (c == 8) { /* backspace */
2212 bs(vc);
2213 start = (ushort *)vc->vc_pos;
2214 myx = vc->vc_x;
2215 continue;
2216 }
2217 if (c != 13)
2218 lf(vc);
2219 cr(vc);
2220 start = (ushort *)vc->vc_pos;
2221 myx = vc->vc_x;
2222 if (c == 10 || c == 13)
2223 continue;
2224 }
2225 scr_writew((vc->vc_attr << 8) + c, (unsigned short *)vc->vc_pos);
2226 cnt++;
2227 if (myx == vc->vc_cols - 1) {
2228 vc->vc_need_wrap = 1;
2229 continue;
2230 }
2231 vc->vc_pos += 2;
2232 myx++;
2233 }
2234 if (cnt > 0) {
2235 if (CON_IS_VISIBLE(vc))
2236 vc->vc_sw->con_putcs(vc, start, cnt, vc->vc_y, vc->vc_x);
2237 vc->vc_x += cnt;
2238 if (vc->vc_x == vc->vc_cols) {
2239 vc->vc_x--;
2240 vc->vc_need_wrap = 1;
2241 }
2242 }
2243 set_cursor(vc);
2244
2245quit:
2246 clear_bit(0, &printing);
2247}
2248
2249static struct tty_driver *vt_console_device(struct console *c, int *index)
2250{
2251 *index = c->index ? c->index-1 : fg_console;
2252 return console_driver;
2253}
2254
2255static struct console vt_console_driver = {
2256 .name = "tty",
2257 .write = vt_console_print,
2258 .device = vt_console_device,
2259 .unblank = unblank_screen,
2260 .flags = CON_PRINTBUFFER,
2261 .index = -1,
2262};
2263#endif
2264
2265/*
2266 * Handling of Linux-specific VC ioctls
2267 */
2268
2269/*
2270 * Generally a bit racy with respect to console_sem().
2271 *
2272 * There are some functions which don't need it.
2273 *
2274 * There are some functions which can sleep for arbitrary periods
2275 * (paste_selection) but we don't need the lock there anyway.
2276 *
2277 * set_selection has locking, and definitely needs it
2278 */
2279
2280int tioclinux(struct tty_struct *tty, unsigned long arg)
2281{
2282 char type, data;
2283 char __user *p = (char __user *)arg;
2284 int lines;
2285 int ret;
2286
2287 if (tty->driver->type != TTY_DRIVER_TYPE_CONSOLE)
2288 return -EINVAL;
2289 if (current->signal->tty != tty && !capable(CAP_SYS_ADMIN))
2290 return -EPERM;
2291 if (get_user(type, p))
2292 return -EFAULT;
2293 ret = 0;
2294 switch (type)
2295 {
2296 case TIOCL_SETSEL:
2297 acquire_console_sem();
2298 ret = set_selection((struct tiocl_selection __user *)(p+1), tty);
2299 release_console_sem();
2300 break;
2301 case TIOCL_PASTESEL:
2302 ret = paste_selection(tty);
2303 break;
2304 case TIOCL_UNBLANKSCREEN:
Stephane Doyon2d237c62005-09-06 15:17:31 -07002305 acquire_console_sem();
Linus Torvalds1da177e2005-04-16 15:20:36 -07002306 unblank_screen();
Stephane Doyon2d237c62005-09-06 15:17:31 -07002307 release_console_sem();
Linus Torvalds1da177e2005-04-16 15:20:36 -07002308 break;
2309 case TIOCL_SELLOADLUT:
2310 ret = sel_loadlut(p);
2311 break;
2312 case TIOCL_GETSHIFTSTATE:
2313
2314 /*
2315 * Make it possible to react to Shift+Mousebutton.
2316 * Note that 'shift_state' is an undocumented
2317 * kernel-internal variable; programs not closely
2318 * related to the kernel should not use this.
2319 */
2320 data = shift_state;
2321 ret = __put_user(data, p);
2322 break;
2323 case TIOCL_GETMOUSEREPORTING:
2324 data = mouse_reporting();
2325 ret = __put_user(data, p);
2326 break;
2327 case TIOCL_SETVESABLANK:
2328 set_vesa_blanking(p);
2329 break;
2330 case TIOCL_SETKMSGREDIRECT:
2331 if (!capable(CAP_SYS_ADMIN)) {
2332 ret = -EPERM;
2333 } else {
2334 if (get_user(data, p+1))
2335 ret = -EFAULT;
2336 else
2337 kmsg_redirect = data;
2338 }
2339 break;
2340 case TIOCL_GETFGCONSOLE:
2341 ret = fg_console;
2342 break;
2343 case TIOCL_SCROLLCONSOLE:
2344 if (get_user(lines, (s32 __user *)(p+4))) {
2345 ret = -EFAULT;
2346 } else {
2347 scrollfront(vc_cons[fg_console].d, lines);
2348 ret = 0;
2349 }
2350 break;
2351 case TIOCL_BLANKSCREEN: /* until explicitly unblanked, not only poked */
Stephane Doyon2d237c62005-09-06 15:17:31 -07002352 acquire_console_sem();
Linus Torvalds1da177e2005-04-16 15:20:36 -07002353 ignore_poke = 1;
2354 do_blank_screen(0);
Stephane Doyon2d237c62005-09-06 15:17:31 -07002355 release_console_sem();
Linus Torvalds1da177e2005-04-16 15:20:36 -07002356 break;
2357 case TIOCL_BLANKEDSCREEN:
2358 ret = console_blanked;
2359 break;
2360 default:
2361 ret = -EINVAL;
2362 break;
2363 }
2364 return ret;
2365}
2366
2367/*
2368 * /dev/ttyN handling
2369 */
2370
2371static int con_write(struct tty_struct *tty, const unsigned char *buf, int count)
2372{
2373 int retval;
2374
2375 retval = do_con_write(tty, buf, count);
2376 con_flush_chars(tty);
2377
2378 return retval;
2379}
2380
2381static void con_put_char(struct tty_struct *tty, unsigned char ch)
2382{
2383 if (in_interrupt())
2384 return; /* n_r3964 calls put_char() from interrupt context */
2385 do_con_write(tty, &ch, 1);
2386}
2387
2388static int con_write_room(struct tty_struct *tty)
2389{
2390 if (tty->stopped)
2391 return 0;
2392 return 4096; /* No limit, really; we're not buffering */
2393}
2394
2395static int con_chars_in_buffer(struct tty_struct *tty)
2396{
2397 return 0; /* we're not buffering */
2398}
2399
2400/*
2401 * con_throttle and con_unthrottle are only used for
2402 * paste_selection(), which has to stuff in a large number of
2403 * characters...
2404 */
2405static void con_throttle(struct tty_struct *tty)
2406{
2407}
2408
2409static void con_unthrottle(struct tty_struct *tty)
2410{
2411 struct vc_data *vc = tty->driver_data;
2412
2413 wake_up_interruptible(&vc->paste_wait);
2414}
2415
2416/*
2417 * Turn the Scroll-Lock LED on when the tty is stopped
2418 */
2419static void con_stop(struct tty_struct *tty)
2420{
2421 int console_num;
2422 if (!tty)
2423 return;
2424 console_num = tty->index;
2425 if (!vc_cons_allocated(console_num))
2426 return;
2427 set_vc_kbd_led(kbd_table + console_num, VC_SCROLLOCK);
2428 set_leds();
2429}
2430
2431/*
2432 * Turn the Scroll-Lock LED off when the console is started
2433 */
2434static void con_start(struct tty_struct *tty)
2435{
2436 int console_num;
2437 if (!tty)
2438 return;
2439 console_num = tty->index;
2440 if (!vc_cons_allocated(console_num))
2441 return;
2442 clr_vc_kbd_led(kbd_table + console_num, VC_SCROLLOCK);
2443 set_leds();
2444}
2445
2446static void con_flush_chars(struct tty_struct *tty)
2447{
2448 struct vc_data *vc;
2449
2450 if (in_interrupt()) /* from flush_to_ldisc */
2451 return;
2452
2453 /* if we race with con_close(), vt may be null */
2454 acquire_console_sem();
2455 vc = tty->driver_data;
2456 if (vc)
2457 set_cursor(vc);
2458 release_console_sem();
2459}
2460
2461/*
2462 * Allocate the console screen memory.
2463 */
2464static int con_open(struct tty_struct *tty, struct file *filp)
2465{
2466 unsigned int currcons = tty->index;
2467 int ret = 0;
2468
2469 acquire_console_sem();
Paul Mackerrasf7866482005-08-28 09:40:01 +10002470 if (tty->driver_data == NULL) {
Linus Torvalds1da177e2005-04-16 15:20:36 -07002471 ret = vc_allocate(currcons);
2472 if (ret == 0) {
2473 struct vc_data *vc = vc_cons[currcons].d;
2474 tty->driver_data = vc;
2475 vc->vc_tty = tty;
2476
2477 if (!tty->winsize.ws_row && !tty->winsize.ws_col) {
2478 tty->winsize.ws_row = vc_cons[currcons].d->vc_rows;
2479 tty->winsize.ws_col = vc_cons[currcons].d->vc_cols;
2480 }
2481 release_console_sem();
2482 vcs_make_devfs(tty);
2483 return ret;
2484 }
2485 }
2486 release_console_sem();
2487 return ret;
2488}
2489
2490/*
2491 * We take tty_sem in here to prevent another thread from coming in via init_dev
2492 * and taking a ref against the tty while we're in the process of forgetting
2493 * about it and cleaning things up.
2494 *
2495 * This is because vcs_remove_devfs() can sleep and will drop the BKL.
2496 */
2497static void con_close(struct tty_struct *tty, struct file *filp)
2498{
2499 down(&tty_sem);
2500 acquire_console_sem();
2501 if (tty && tty->count == 1) {
2502 struct vc_data *vc = tty->driver_data;
2503
2504 if (vc)
2505 vc->vc_tty = NULL;
2506 tty->driver_data = NULL;
2507 release_console_sem();
2508 vcs_remove_devfs(tty);
2509 up(&tty_sem);
2510 /*
2511 * tty_sem is released, but we still hold BKL, so there is
2512 * still exclusion against init_dev()
2513 */
2514 return;
2515 }
2516 release_console_sem();
2517 up(&tty_sem);
2518}
2519
2520static void vc_init(struct vc_data *vc, unsigned int rows,
2521 unsigned int cols, int do_clear)
2522{
2523 int j, k ;
2524
2525 vc->vc_cols = cols;
2526 vc->vc_rows = rows;
2527 vc->vc_size_row = cols << 1;
2528 vc->vc_screenbuf_size = vc->vc_rows * vc->vc_size_row;
2529
2530 set_origin(vc);
2531 vc->vc_pos = vc->vc_origin;
2532 reset_vc(vc);
2533 for (j=k=0; j<16; j++) {
2534 vc->vc_palette[k++] = default_red[j] ;
2535 vc->vc_palette[k++] = default_grn[j] ;
2536 vc->vc_palette[k++] = default_blu[j] ;
2537 }
2538 vc->vc_def_color = 0x07; /* white */
2539 vc->vc_ulcolor = 0x0f; /* bold white */
2540 vc->vc_halfcolor = 0x08; /* grey */
2541 init_waitqueue_head(&vc->paste_wait);
2542 reset_terminal(vc, do_clear);
2543}
2544
2545/*
2546 * This routine initializes console interrupts, and does nothing
2547 * else. If you want the screen to clear, call tty_write with
2548 * the appropriate escape-sequence.
2549 */
2550
2551static int __init con_init(void)
2552{
2553 const char *display_desc = NULL;
2554 struct vc_data *vc;
2555 unsigned int currcons = 0;
2556
2557 acquire_console_sem();
2558
2559 if (conswitchp)
2560 display_desc = conswitchp->con_startup();
2561 if (!display_desc) {
2562 fg_console = 0;
2563 release_console_sem();
2564 return 0;
2565 }
2566
2567 init_timer(&console_timer);
2568 console_timer.function = blank_screen_t;
2569 if (blankinterval) {
2570 blank_state = blank_normal_wait;
2571 mod_timer(&console_timer, jiffies + blankinterval);
2572 }
2573
2574 /*
2575 * kmalloc is not running yet - we use the bootmem allocator.
2576 */
2577 for (currcons = 0; currcons < MIN_NR_CONSOLES; currcons++) {
2578 vc_cons[currcons].d = vc = alloc_bootmem(sizeof(struct vc_data));
2579 visual_init(vc, currcons, 1);
2580 vc->vc_screenbuf = (unsigned short *)alloc_bootmem(vc->vc_screenbuf_size);
2581 vc->vc_kmalloced = 0;
2582 vc_init(vc, vc->vc_rows, vc->vc_cols,
2583 currcons || !vc->vc_sw->con_save_screen);
2584 }
2585 currcons = fg_console = 0;
2586 master_display_fg = vc = vc_cons[currcons].d;
2587 set_origin(vc);
2588 save_screen(vc);
2589 gotoxy(vc, vc->vc_x, vc->vc_y);
2590 csi_J(vc, 0);
2591 update_screen(vc);
2592 printk("Console: %s %s %dx%d",
2593 vc->vc_can_do_color ? "colour" : "mono",
2594 display_desc, vc->vc_cols, vc->vc_rows);
2595 printable = 1;
2596 printk("\n");
2597
2598 release_console_sem();
2599
2600#ifdef CONFIG_VT_CONSOLE
2601 register_console(&vt_console_driver);
2602#endif
2603 return 0;
2604}
2605console_initcall(con_init);
2606
2607static struct tty_operations con_ops = {
2608 .open = con_open,
2609 .close = con_close,
2610 .write = con_write,
2611 .write_room = con_write_room,
2612 .put_char = con_put_char,
2613 .flush_chars = con_flush_chars,
2614 .chars_in_buffer = con_chars_in_buffer,
2615 .ioctl = vt_ioctl,
2616 .stop = con_stop,
2617 .start = con_start,
2618 .throttle = con_throttle,
2619 .unthrottle = con_unthrottle,
2620};
2621
2622int __init vty_init(void)
2623{
2624 vcs_init();
2625
2626 console_driver = alloc_tty_driver(MAX_NR_CONSOLES);
2627 if (!console_driver)
2628 panic("Couldn't allocate console driver\n");
2629 console_driver->owner = THIS_MODULE;
2630 console_driver->devfs_name = "vc/";
2631 console_driver->name = "tty";
2632 console_driver->name_base = 1;
2633 console_driver->major = TTY_MAJOR;
2634 console_driver->minor_start = 1;
2635 console_driver->type = TTY_DRIVER_TYPE_CONSOLE;
2636 console_driver->init_termios = tty_std_termios;
2637 console_driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_RESET_TERMIOS;
2638 tty_set_operations(console_driver, &con_ops);
2639 if (tty_register_driver(console_driver))
2640 panic("Couldn't register console driver\n");
2641
2642 kbd_init();
2643 console_map_init();
2644#ifdef CONFIG_PROM_CONSOLE
2645 prom_con_init();
2646#endif
2647#ifdef CONFIG_MDA_CONSOLE
2648 mda_console_init();
2649#endif
2650 return 0;
2651}
2652
2653#ifndef VT_SINGLE_DRIVER
2654
2655/*
2656 * If we support more console drivers, this function is used
2657 * when a driver wants to take over some existing consoles
2658 * and become default driver for newly opened ones.
2659 */
2660
2661int take_over_console(const struct consw *csw, int first, int last, int deflt)
2662{
2663 int i, j = -1;
2664 const char *desc;
2665 struct module *owner;
2666
2667 owner = csw->owner;
2668 if (!try_module_get(owner))
2669 return -ENODEV;
2670
2671 acquire_console_sem();
2672
2673 desc = csw->con_startup();
2674 if (!desc) {
2675 release_console_sem();
2676 module_put(owner);
2677 return -ENODEV;
2678 }
2679 if (deflt) {
2680 if (conswitchp)
2681 module_put(conswitchp->owner);
2682 __module_get(owner);
2683 conswitchp = csw;
2684 }
2685
2686 for (i = first; i <= last; i++) {
2687 int old_was_color;
2688 struct vc_data *vc = vc_cons[i].d;
2689
2690 if (con_driver_map[i])
2691 module_put(con_driver_map[i]->owner);
2692 __module_get(owner);
2693 con_driver_map[i] = csw;
2694
2695 if (!vc || !vc->vc_sw)
2696 continue;
2697
2698 j = i;
2699 if (CON_IS_VISIBLE(vc))
2700 save_screen(vc);
2701 old_was_color = vc->vc_can_do_color;
2702 vc->vc_sw->con_deinit(vc);
2703 vc->vc_origin = (unsigned long)vc->vc_screenbuf;
2704 vc->vc_visible_origin = vc->vc_origin;
2705 vc->vc_scr_end = vc->vc_origin + vc->vc_screenbuf_size;
2706 vc->vc_pos = vc->vc_origin + vc->vc_size_row * vc->vc_y + 2 * vc->vc_x;
2707 visual_init(vc, i, 0);
2708 update_attr(vc);
2709
2710 /* If the console changed between mono <-> color, then
2711 * the attributes in the screenbuf will be wrong. The
2712 * following resets all attributes to something sane.
2713 */
2714 if (old_was_color != vc->vc_can_do_color)
2715 clear_buffer_attributes(vc);
2716
2717 if (CON_IS_VISIBLE(vc))
2718 update_screen(vc);
2719 }
2720 printk("Console: switching ");
2721 if (!deflt)
2722 printk("consoles %d-%d ", first+1, last+1);
2723 if (j >= 0)
2724 printk("to %s %s %dx%d\n",
2725 vc_cons[j].d->vc_can_do_color ? "colour" : "mono",
2726 desc, vc_cons[j].d->vc_cols, vc_cons[j].d->vc_rows);
2727 else
2728 printk("to %s\n", desc);
2729
2730 release_console_sem();
2731
2732 module_put(owner);
2733 return 0;
2734}
2735
2736void give_up_console(const struct consw *csw)
2737{
2738 int i;
2739
2740 for(i = 0; i < MAX_NR_CONSOLES; i++)
2741 if (con_driver_map[i] == csw) {
2742 module_put(csw->owner);
2743 con_driver_map[i] = NULL;
2744 }
2745}
2746
2747#endif
2748
2749/*
2750 * Screen blanking
2751 */
2752
2753static void set_vesa_blanking(char __user *p)
2754{
2755 unsigned int mode;
2756 get_user(mode, p + 1);
2757 vesa_blank_mode = (mode < 4) ? mode : 0;
2758}
2759
2760/*
2761 * This is called by a timer handler
2762 */
2763static void vesa_powerdown(void)
2764{
2765 struct vc_data *c = vc_cons[fg_console].d;
2766 /*
2767 * Power down if currently suspended (1 or 2),
2768 * suspend if currently blanked (0),
2769 * else do nothing (i.e. already powered down (3)).
2770 * Called only if powerdown features are allowed.
2771 */
2772 switch (vesa_blank_mode) {
2773 case VESA_NO_BLANKING:
2774 c->vc_sw->con_blank(c, VESA_VSYNC_SUSPEND+1, 0);
2775 break;
2776 case VESA_VSYNC_SUSPEND:
2777 case VESA_HSYNC_SUSPEND:
2778 c->vc_sw->con_blank(c, VESA_POWERDOWN+1, 0);
2779 break;
2780 }
2781}
2782
2783void do_blank_screen(int entering_gfx)
2784{
2785 struct vc_data *vc = vc_cons[fg_console].d;
2786 int i;
2787
2788 WARN_CONSOLE_UNLOCKED();
2789
2790 if (console_blanked) {
2791 if (blank_state == blank_vesa_wait) {
2792 blank_state = blank_off;
2793 vesa_powerdown();
2794
2795 }
2796 return;
2797 }
2798 if (blank_state != blank_normal_wait)
2799 return;
2800 blank_state = blank_off;
2801
2802 /* entering graphics mode? */
2803 if (entering_gfx) {
2804 hide_cursor(vc);
2805 save_screen(vc);
2806 vc->vc_sw->con_blank(vc, -1, 1);
2807 console_blanked = fg_console + 1;
2808 set_origin(vc);
2809 return;
2810 }
2811
2812 /* don't blank graphics */
2813 if (vc->vc_mode != KD_TEXT) {
2814 console_blanked = fg_console + 1;
2815 return;
2816 }
2817
2818 hide_cursor(vc);
2819 del_timer_sync(&console_timer);
2820 blank_timer_expired = 0;
2821
2822 save_screen(vc);
2823 /* In case we need to reset origin, blanking hook returns 1 */
2824 i = vc->vc_sw->con_blank(vc, 1, 0);
2825 console_blanked = fg_console + 1;
2826 if (i)
2827 set_origin(vc);
2828
2829 if (console_blank_hook && console_blank_hook(1))
2830 return;
2831
2832 if (vesa_off_interval) {
Nishanth Aravamudan030baba2005-07-15 03:56:25 -07002833 blank_state = blank_vesa_wait;
Linus Torvalds1da177e2005-04-16 15:20:36 -07002834 mod_timer(&console_timer, jiffies + vesa_off_interval);
2835 }
2836
2837 if (vesa_blank_mode)
2838 vc->vc_sw->con_blank(vc, vesa_blank_mode + 1, 0);
2839}
2840EXPORT_SYMBOL(do_blank_screen);
2841
2842/*
2843 * Called by timer as well as from vt_console_driver
2844 */
2845void do_unblank_screen(int leaving_gfx)
2846{
2847 struct vc_data *vc;
2848
2849 /* This should now always be called from a "sane" (read: can schedule)
2850 * context for the sake of the low level drivers, except in the special
2851 * case of oops_in_progress
2852 */
2853 if (!oops_in_progress)
2854 might_sleep();
2855
2856 WARN_CONSOLE_UNLOCKED();
2857
2858 ignore_poke = 0;
2859 if (!console_blanked)
2860 return;
2861 if (!vc_cons_allocated(fg_console)) {
2862 /* impossible */
2863 printk("unblank_screen: tty %d not allocated ??\n", fg_console+1);
2864 return;
2865 }
2866 vc = vc_cons[fg_console].d;
2867 if (vc->vc_mode != KD_TEXT)
2868 return; /* but leave console_blanked != 0 */
2869
2870 if (blankinterval) {
2871 mod_timer(&console_timer, jiffies + blankinterval);
2872 blank_state = blank_normal_wait;
2873 }
2874
2875 console_blanked = 0;
2876 if (vc->vc_sw->con_blank(vc, 0, leaving_gfx))
2877 /* Low-level driver cannot restore -> do it ourselves */
2878 update_screen(vc);
2879 if (console_blank_hook)
2880 console_blank_hook(0);
2881 set_palette(vc);
2882 set_cursor(vc);
2883}
2884EXPORT_SYMBOL(do_unblank_screen);
2885
2886/*
2887 * This is called by the outside world to cause a forced unblank, mostly for
2888 * oopses. Currently, I just call do_unblank_screen(0), but we could eventually
2889 * call it with 1 as an argument and so force a mode restore... that may kill
2890 * X or at least garbage the screen but would also make the Oops visible...
2891 */
2892void unblank_screen(void)
2893{
2894 do_unblank_screen(0);
2895}
2896
2897/*
2898 * We defer the timer blanking to work queue so it can take the console semaphore
2899 * (console operations can still happen at irq time, but only from printk which
2900 * has the console semaphore. Not perfect yet, but better than no locking
2901 */
2902static void blank_screen_t(unsigned long dummy)
2903{
Jan Beulichcc63b1e2005-06-17 13:20:58 -07002904 if (unlikely(!keventd_up())) {
2905 mod_timer(&console_timer, jiffies + blankinterval);
2906 return;
2907 }
Linus Torvalds1da177e2005-04-16 15:20:36 -07002908 blank_timer_expired = 1;
2909 schedule_work(&console_work);
2910}
2911
2912void poke_blanked_console(void)
2913{
2914 WARN_CONSOLE_UNLOCKED();
2915
2916 /* Add this so we quickly catch whoever might call us in a non
2917 * safe context. Nowadays, unblank_screen() isn't to be called in
2918 * atomic contexts and is allowed to schedule (with the special case
2919 * of oops_in_progress, but that isn't of any concern for this
2920 * function. --BenH.
2921 */
2922 might_sleep();
2923
2924 /* This isn't perfectly race free, but a race here would be mostly harmless,
2925 * at worse, we'll do a spurrious blank and it's unlikely
2926 */
2927 del_timer(&console_timer);
2928 blank_timer_expired = 0;
2929
2930 if (ignore_poke || !vc_cons[fg_console].d || vc_cons[fg_console].d->vc_mode == KD_GRAPHICS)
2931 return;
2932 if (console_blanked)
2933 unblank_screen();
2934 else if (blankinterval) {
2935 mod_timer(&console_timer, jiffies + blankinterval);
2936 blank_state = blank_normal_wait;
2937 }
2938}
2939
2940/*
2941 * Palettes
2942 */
2943
2944static void set_palette(struct vc_data *vc)
2945{
2946 WARN_CONSOLE_UNLOCKED();
2947
2948 if (vc->vc_mode != KD_GRAPHICS)
2949 vc->vc_sw->con_set_palette(vc, color_table);
2950}
2951
2952static int set_get_cmap(unsigned char __user *arg, int set)
2953{
2954 int i, j, k;
2955
2956 WARN_CONSOLE_UNLOCKED();
2957
2958 for (i = 0; i < 16; i++)
2959 if (set) {
2960 get_user(default_red[i], arg++);
2961 get_user(default_grn[i], arg++);
2962 get_user(default_blu[i], arg++);
2963 } else {
2964 put_user(default_red[i], arg++);
2965 put_user(default_grn[i], arg++);
2966 put_user(default_blu[i], arg++);
2967 }
2968 if (set) {
2969 for (i = 0; i < MAX_NR_CONSOLES; i++)
2970 if (vc_cons_allocated(i)) {
2971 for (j = k = 0; j < 16; j++) {
2972 vc_cons[i].d->vc_palette[k++] = default_red[j];
2973 vc_cons[i].d->vc_palette[k++] = default_grn[j];
2974 vc_cons[i].d->vc_palette[k++] = default_blu[j];
2975 }
2976 set_palette(vc_cons[i].d);
2977 }
2978 }
2979 return 0;
2980}
2981
2982/*
2983 * Load palette into the DAC registers. arg points to a colour
2984 * map, 3 bytes per colour, 16 colours, range from 0 to 255.
2985 */
2986
2987int con_set_cmap(unsigned char __user *arg)
2988{
2989 int rc;
2990
2991 acquire_console_sem();
2992 rc = set_get_cmap (arg,1);
2993 release_console_sem();
2994
2995 return rc;
2996}
2997
2998int con_get_cmap(unsigned char __user *arg)
2999{
3000 int rc;
3001
3002 acquire_console_sem();
3003 rc = set_get_cmap (arg,0);
3004 release_console_sem();
3005
3006 return rc;
3007}
3008
3009void reset_palette(struct vc_data *vc)
3010{
3011 int j, k;
3012 for (j=k=0; j<16; j++) {
3013 vc->vc_palette[k++] = default_red[j];
3014 vc->vc_palette[k++] = default_grn[j];
3015 vc->vc_palette[k++] = default_blu[j];
3016 }
3017 set_palette(vc);
3018}
3019
3020/*
3021 * Font switching
3022 *
3023 * Currently we only support fonts up to 32 pixels wide, at a maximum height
3024 * of 32 pixels. Userspace fontdata is stored with 32 bytes (shorts/ints,
3025 * depending on width) reserved for each character which is kinda wasty, but
3026 * this is done in order to maintain compatibility with the EGA/VGA fonts. It
3027 * is upto the actual low-level console-driver convert data into its favorite
3028 * format (maybe we should add a `fontoffset' field to the `display'
3029 * structure so we won't have to convert the fontdata all the time.
3030 * /Jes
3031 */
3032
3033#define max_font_size 65536
3034
3035static int con_font_get(struct vc_data *vc, struct console_font_op *op)
3036{
3037 struct console_font font;
3038 int rc = -EINVAL;
3039 int c;
3040
3041 if (vc->vc_mode != KD_TEXT)
3042 return -EINVAL;
3043
3044 if (op->data) {
3045 font.data = kmalloc(max_font_size, GFP_KERNEL);
3046 if (!font.data)
3047 return -ENOMEM;
3048 } else
3049 font.data = NULL;
3050
3051 acquire_console_sem();
3052 if (vc->vc_sw->con_font_get)
3053 rc = vc->vc_sw->con_font_get(vc, &font);
3054 else
3055 rc = -ENOSYS;
3056 release_console_sem();
3057
3058 if (rc)
3059 goto out;
3060
3061 c = (font.width+7)/8 * 32 * font.charcount;
3062
3063 if (op->data && font.charcount > op->charcount)
3064 rc = -ENOSPC;
3065 if (!(op->flags & KD_FONT_FLAG_OLD)) {
3066 if (font.width > op->width || font.height > op->height)
3067 rc = -ENOSPC;
3068 } else {
3069 if (font.width != 8)
3070 rc = -EIO;
3071 else if ((op->height && font.height > op->height) ||
3072 font.height > 32)
3073 rc = -ENOSPC;
3074 }
3075 if (rc)
3076 goto out;
3077
3078 op->height = font.height;
3079 op->width = font.width;
3080 op->charcount = font.charcount;
3081
3082 if (op->data && copy_to_user(op->data, font.data, c))
3083 rc = -EFAULT;
3084
3085out:
3086 kfree(font.data);
3087 return rc;
3088}
3089
3090static int con_font_set(struct vc_data *vc, struct console_font_op *op)
3091{
3092 struct console_font font;
3093 int rc = -EINVAL;
3094 int size;
3095
3096 if (vc->vc_mode != KD_TEXT)
3097 return -EINVAL;
3098 if (!op->data)
3099 return -EINVAL;
3100 if (op->charcount > 512)
3101 return -EINVAL;
3102 if (!op->height) { /* Need to guess font height [compat] */
3103 int h, i;
3104 u8 __user *charmap = op->data;
3105 u8 tmp;
3106
3107 /* If from KDFONTOP ioctl, don't allow things which can be done in userland,
3108 so that we can get rid of this soon */
3109 if (!(op->flags & KD_FONT_FLAG_OLD))
3110 return -EINVAL;
3111 for (h = 32; h > 0; h--)
3112 for (i = 0; i < op->charcount; i++) {
3113 if (get_user(tmp, &charmap[32*i+h-1]))
3114 return -EFAULT;
3115 if (tmp)
3116 goto nonzero;
3117 }
3118 return -EINVAL;
3119 nonzero:
3120 op->height = h;
3121 }
3122 if (op->width <= 0 || op->width > 32 || op->height > 32)
3123 return -EINVAL;
3124 size = (op->width+7)/8 * 32 * op->charcount;
3125 if (size > max_font_size)
3126 return -ENOSPC;
3127 font.charcount = op->charcount;
3128 font.height = op->height;
3129 font.width = op->width;
3130 font.data = kmalloc(size, GFP_KERNEL);
3131 if (!font.data)
3132 return -ENOMEM;
3133 if (copy_from_user(font.data, op->data, size)) {
3134 kfree(font.data);
3135 return -EFAULT;
3136 }
3137 acquire_console_sem();
3138 if (vc->vc_sw->con_font_set)
3139 rc = vc->vc_sw->con_font_set(vc, &font, op->flags);
3140 else
3141 rc = -ENOSYS;
3142 release_console_sem();
3143 kfree(font.data);
3144 return rc;
3145}
3146
3147static int con_font_default(struct vc_data *vc, struct console_font_op *op)
3148{
3149 struct console_font font = {.width = op->width, .height = op->height};
3150 char name[MAX_FONT_NAME];
3151 char *s = name;
3152 int rc;
3153
3154 if (vc->vc_mode != KD_TEXT)
3155 return -EINVAL;
3156
3157 if (!op->data)
3158 s = NULL;
3159 else if (strncpy_from_user(name, op->data, MAX_FONT_NAME - 1) < 0)
3160 return -EFAULT;
3161 else
3162 name[MAX_FONT_NAME - 1] = 0;
3163
3164 acquire_console_sem();
3165 if (vc->vc_sw->con_font_default)
3166 rc = vc->vc_sw->con_font_default(vc, &font, s);
3167 else
3168 rc = -ENOSYS;
3169 release_console_sem();
3170 if (!rc) {
3171 op->width = font.width;
3172 op->height = font.height;
3173 }
3174 return rc;
3175}
3176
3177static int con_font_copy(struct vc_data *vc, struct console_font_op *op)
3178{
3179 int con = op->height;
3180 int rc;
3181
3182 if (vc->vc_mode != KD_TEXT)
3183 return -EINVAL;
3184
3185 acquire_console_sem();
3186 if (!vc->vc_sw->con_font_copy)
3187 rc = -ENOSYS;
3188 else if (con < 0 || !vc_cons_allocated(con))
3189 rc = -ENOTTY;
3190 else if (con == vc->vc_num) /* nothing to do */
3191 rc = 0;
3192 else
3193 rc = vc->vc_sw->con_font_copy(vc, con);
3194 release_console_sem();
3195 return rc;
3196}
3197
3198int con_font_op(struct vc_data *vc, struct console_font_op *op)
3199{
3200 switch (op->op) {
3201 case KD_FONT_OP_SET:
3202 return con_font_set(vc, op);
3203 case KD_FONT_OP_GET:
3204 return con_font_get(vc, op);
3205 case KD_FONT_OP_SET_DEFAULT:
3206 return con_font_default(vc, op);
3207 case KD_FONT_OP_COPY:
3208 return con_font_copy(vc, op);
3209 }
3210 return -ENOSYS;
3211}
3212
3213/*
3214 * Interface exported to selection and vcs.
3215 */
3216
3217/* used by selection */
3218u16 screen_glyph(struct vc_data *vc, int offset)
3219{
3220 u16 w = scr_readw(screenpos(vc, offset, 1));
3221 u16 c = w & 0xff;
3222
3223 if (w & vc->vc_hi_font_mask)
3224 c |= 0x100;
3225 return c;
3226}
3227
3228/* used by vcs - note the word offset */
3229unsigned short *screen_pos(struct vc_data *vc, int w_offset, int viewed)
3230{
3231 return screenpos(vc, 2 * w_offset, viewed);
3232}
3233
3234void getconsxy(struct vc_data *vc, unsigned char *p)
3235{
3236 p[0] = vc->vc_x;
3237 p[1] = vc->vc_y;
3238}
3239
3240void putconsxy(struct vc_data *vc, unsigned char *p)
3241{
3242 gotoxy(vc, p[0], p[1]);
3243 set_cursor(vc);
3244}
3245
3246u16 vcs_scr_readw(struct vc_data *vc, const u16 *org)
3247{
3248 if ((unsigned long)org == vc->vc_pos && softcursor_original != -1)
3249 return softcursor_original;
3250 return scr_readw(org);
3251}
3252
3253void vcs_scr_writew(struct vc_data *vc, u16 val, u16 *org)
3254{
3255 scr_writew(val, org);
3256 if ((unsigned long)org == vc->vc_pos) {
3257 softcursor_original = -1;
3258 add_softcursor(vc);
3259 }
3260}
3261
3262/*
3263 * Visible symbols for modules
3264 */
3265
3266EXPORT_SYMBOL(color_table);
3267EXPORT_SYMBOL(default_red);
3268EXPORT_SYMBOL(default_grn);
3269EXPORT_SYMBOL(default_blu);
3270EXPORT_SYMBOL(update_region);
3271EXPORT_SYMBOL(redraw_screen);
3272EXPORT_SYMBOL(vc_resize);
3273EXPORT_SYMBOL(fg_console);
3274EXPORT_SYMBOL(console_blank_hook);
3275EXPORT_SYMBOL(console_blanked);
3276EXPORT_SYMBOL(vc_cons);
3277#ifndef VT_SINGLE_DRIVER
3278EXPORT_SYMBOL(take_over_console);
3279EXPORT_SYMBOL(give_up_console);
3280#endif