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