• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1 /*
2  *  Copyright (C) 1991, 1992  Linus Torvalds
3  */
4 
5 /*
6  * Hopefully this will be a rather complete VT102 implementation.
7  *
8  * Beeping thanks to John T Kohl.
9  *
10  * Virtual Consoles, Screen Blanking, Screen Dumping, Color, Graphics
11  *   Chars, and VT100 enhancements by Peter MacDonald.
12  *
13  * Copy and paste function by Andrew Haylett,
14  *   some enhancements by Alessandro Rubini.
15  *
16  * Code to check for different video-cards mostly by Galen Hunt,
17  * <g-hunt@ee.utah.edu>
18  *
19  * Rudimentary ISO 10646/Unicode/UTF-8 character set support by
20  * Markus Kuhn, <mskuhn@immd4.informatik.uni-erlangen.de>.
21  *
22  * Dynamic allocation of consoles, aeb@cwi.nl, May 1994
23  * Resizing of consoles, aeb, 940926
24  *
25  * Code for xterm like mouse click reporting by Peter Orbaek 20-Jul-94
26  * <poe@daimi.aau.dk>
27  *
28  * User-defined bell sound, new setterm control sequences and printk
29  * redirection by Martin Mares <mj@k332.feld.cvut.cz> 19-Nov-95
30  *
31  * APM screenblank bug fixed Takashi Manabe <manabe@roy.dsl.tutics.tut.jp>
32  *
33  * Merge with the abstract console driver by Geert Uytterhoeven
34  * <geert@linux-m68k.org>, Jan 1997.
35  *
36  *   Original m68k console driver modifications by
37  *
38  *     - Arno Griffioen <arno@usn.nl>
39  *     - David Carter <carter@cs.bris.ac.uk>
40  *
41  *   The abstract console driver provides a generic interface for a text
42  *   console. It supports VGA text mode, frame buffer based graphical consoles
43  *   and special graphics processors that are only accessible through some
44  *   registers (e.g. a TMS340x0 GSP).
45  *
46  *   The interface to the hardware is specified using a special structure
47  *   (struct consw) which contains function pointers to console operations
48  *   (see <linux/console.h> for more information).
49  *
50  * Support for changeable cursor shape
51  * by Pavel Machek <pavel@atrey.karlin.mff.cuni.cz>, August 1997
52  *
53  * Ported to i386 and con_scrolldelta fixed
54  * by Emmanuel Marty <core@ggi-project.org>, April 1998
55  *
56  * Resurrected character buffers in videoram plus lots of other trickery
57  * by Martin Mares <mj@atrey.karlin.mff.cuni.cz>, July 1998
58  *
59  * Removed old-style timers, introduced console_timer, made timer
60  * deletion SMP-safe.  17Jun00, Andrew Morton
61  *
62  * Removed console_lock, enabled interrupts across all console operations
63  * 13 March 2001, Andrew Morton
64  *
65  * Fixed UTF-8 mode so alternate charset modes always work according
66  * to control sequences interpreted in do_con_trol function
67  * preserving backward VT100 semigraphics compatibility,
68  * malformed UTF sequences represented as sequences of replacement glyphs,
69  * original codes or '?' as a last resort if replacement glyph is undefined
70  * by Adam Tla/lka <atlka@pg.gda.pl>, Aug 2006
71  */
72 
73 #include <linux/module.h>
74 #include <linux/types.h>
75 #include <linux/sched.h>
76 #include <linux/tty.h>
77 #include <linux/tty_flip.h>
78 #include <linux/kernel.h>
79 #include <linux/string.h>
80 #include <linux/errno.h>
81 #include <linux/kd.h>
82 #include <linux/slab.h>
83 #include <linux/major.h>
84 #include <linux/mm.h>
85 #include <linux/console.h>
86 #include <linux/init.h>
87 #include <linux/mutex.h>
88 #include <linux/vt_kern.h>
89 #include <linux/selection.h>
90 #include <linux/tiocl.h>
91 #include <linux/kbd_kern.h>
92 #include <linux/consolemap.h>
93 #include <linux/timer.h>
94 #include <linux/interrupt.h>
95 #include <linux/workqueue.h>
96 #include <linux/pm.h>
97 #include <linux/font.h>
98 #include <linux/bitops.h>
99 #include <linux/notifier.h>
100 #include <linux/device.h>
101 #include <linux/io.h>
102 #include <linux/uaccess.h>
103 #include <linux/kdb.h>
104 #include <linux/ctype.h>
105 
106 #define MAX_NR_CON_DRIVER 16
107 
108 #define CON_DRIVER_FLAG_MODULE 1
109 #define CON_DRIVER_FLAG_INIT   2
110 #define CON_DRIVER_FLAG_ATTR   4
111 #define CON_DRIVER_FLAG_ZOMBIE 8
112 
113 struct con_driver {
114 	const struct consw *con;
115 	const char *desc;
116 	struct device *dev;
117 	int node;
118 	int first;
119 	int last;
120 	int flag;
121 };
122 
123 static struct con_driver registered_con_driver[MAX_NR_CON_DRIVER];
124 const struct consw *conswitchp;
125 
126 /* A bitmap for codes <32. A bit of 1 indicates that the code
127  * corresponding to that bit number invokes some special action
128  * (such as cursor movement) and should not be displayed as a
129  * glyph unless the disp_ctrl mode is explicitly enabled.
130  */
131 #define CTRL_ACTION 0x0d00ff81
132 #define CTRL_ALWAYS 0x0800f501	/* Cannot be overridden by disp_ctrl */
133 
134 /*
135  * Here is the default bell parameters: 750HZ, 1/8th of a second
136  */
137 #define DEFAULT_BELL_PITCH	750
138 #define DEFAULT_BELL_DURATION	(HZ/8)
139 #define DEFAULT_CURSOR_BLINK_MS	200
140 
141 struct vc vc_cons [MAX_NR_CONSOLES];
142 
143 #ifndef VT_SINGLE_DRIVER
144 static const struct consw *con_driver_map[MAX_NR_CONSOLES];
145 #endif
146 
147 static int con_open(struct tty_struct *, struct file *);
148 static void vc_init(struct vc_data *vc, unsigned int rows,
149 		    unsigned int cols, int do_clear);
150 static void gotoxy(struct vc_data *vc, int new_x, int new_y);
151 static void save_cur(struct vc_data *vc);
152 static void reset_terminal(struct vc_data *vc, int do_clear);
153 static void con_flush_chars(struct tty_struct *tty);
154 static int set_vesa_blanking(char __user *p);
155 static void set_cursor(struct vc_data *vc);
156 static void hide_cursor(struct vc_data *vc);
157 static void console_callback(struct work_struct *ignored);
158 static void con_driver_unregister_callback(struct work_struct *ignored);
159 static void blank_screen_t(unsigned long dummy);
160 static void set_palette(struct vc_data *vc);
161 
162 #define vt_get_kmsg_redirect() vt_kmsg_redirect(-1)
163 
164 static int printable;		/* Is console ready for printing? */
165 int default_utf8 = true;
166 module_param(default_utf8, int, S_IRUGO | S_IWUSR);
167 int global_cursor_default = -1;
168 module_param(global_cursor_default, int, S_IRUGO | S_IWUSR);
169 
170 static int cur_default = CUR_DEFAULT;
171 module_param(cur_default, int, S_IRUGO | S_IWUSR);
172 
173 /*
174  * ignore_poke: don't unblank the screen when things are typed.  This is
175  * mainly for the privacy of braille terminal users.
176  */
177 static int ignore_poke;
178 
179 int do_poke_blanked_console;
180 int console_blanked;
181 
182 static int vesa_blank_mode; /* 0:none 1:suspendV 2:suspendH 3:powerdown */
183 static int vesa_off_interval;
184 static int blankinterval = 10*60;
185 core_param(consoleblank, blankinterval, int, 0444);
186 
187 static DECLARE_WORK(console_work, console_callback);
188 static DECLARE_WORK(con_driver_unregister_work, con_driver_unregister_callback);
189 
190 /*
191  * fg_console is the current virtual console,
192  * last_console is the last used one,
193  * want_console is the console we want to switch to,
194  * saved_* variants are for save/restore around kernel debugger enter/leave
195  */
196 int fg_console;
197 int last_console;
198 int want_console = -1;
199 static int saved_fg_console;
200 static int saved_last_console;
201 static int saved_want_console;
202 static int saved_vc_mode;
203 static int saved_console_blanked;
204 
205 /*
206  * For each existing display, we have a pointer to console currently visible
207  * on that display, allowing consoles other than fg_console to be refreshed
208  * appropriately. Unless the low-level driver supplies its own display_fg
209  * variable, we use this one for the "master display".
210  */
211 static struct vc_data *master_display_fg;
212 
213 /*
214  * Unfortunately, we need to delay tty echo when we're currently writing to the
215  * console since the code is (and always was) not re-entrant, so we schedule
216  * all flip requests to process context with schedule-task() and run it from
217  * console_callback().
218  */
219 
220 /*
221  * For the same reason, we defer scrollback to the console callback.
222  */
223 static int scrollback_delta;
224 
225 /*
226  * Hook so that the power management routines can (un)blank
227  * the console on our behalf.
228  */
229 int (*console_blank_hook)(int);
230 
231 static DEFINE_TIMER(console_timer, blank_screen_t, 0, 0);
232 static int blank_state;
233 static int blank_timer_expired;
234 enum {
235 	blank_off = 0,
236 	blank_normal_wait,
237 	blank_vesa_wait,
238 };
239 
240 /*
241  * /sys/class/tty/tty0/
242  *
243  * the attribute 'active' contains the name of the current vc
244  * console and it supports poll() to detect vc switches
245  */
246 static struct device *tty0dev;
247 
248 /*
249  * Notifier list for console events.
250  */
251 static ATOMIC_NOTIFIER_HEAD(vt_notifier_list);
252 
register_vt_notifier(struct notifier_block * nb)253 int register_vt_notifier(struct notifier_block *nb)
254 {
255 	return atomic_notifier_chain_register(&vt_notifier_list, nb);
256 }
257 EXPORT_SYMBOL_GPL(register_vt_notifier);
258 
unregister_vt_notifier(struct notifier_block * nb)259 int unregister_vt_notifier(struct notifier_block *nb)
260 {
261 	return atomic_notifier_chain_unregister(&vt_notifier_list, nb);
262 }
263 EXPORT_SYMBOL_GPL(unregister_vt_notifier);
264 
notify_write(struct vc_data * vc,unsigned int unicode)265 static void notify_write(struct vc_data *vc, unsigned int unicode)
266 {
267 	struct vt_notifier_param param = { .vc = vc, .c = unicode };
268 	atomic_notifier_call_chain(&vt_notifier_list, VT_WRITE, &param);
269 }
270 
notify_update(struct vc_data * vc)271 static void notify_update(struct vc_data *vc)
272 {
273 	struct vt_notifier_param param = { .vc = vc };
274 	atomic_notifier_call_chain(&vt_notifier_list, VT_UPDATE, &param);
275 }
276 /*
277  *	Low-Level Functions
278  */
279 
280 #define IS_FG(vc)	((vc)->vc_num == fg_console)
281 
282 #ifdef VT_BUF_VRAM_ONLY
283 #define DO_UPDATE(vc)	0
284 #else
285 #define DO_UPDATE(vc)	(CON_IS_VISIBLE(vc) && !console_blanked)
286 #endif
287 
screenpos(struct vc_data * vc,int offset,int viewed)288 static inline unsigned short *screenpos(struct vc_data *vc, int offset, int viewed)
289 {
290 	unsigned short *p;
291 
292 	if (!viewed)
293 		p = (unsigned short *)(vc->vc_origin + offset);
294 	else if (!vc->vc_sw->con_screen_pos)
295 		p = (unsigned short *)(vc->vc_visible_origin + offset);
296 	else
297 		p = vc->vc_sw->con_screen_pos(vc, offset);
298 	return p;
299 }
300 
301 /* Called  from the keyboard irq path.. */
scrolldelta(int lines)302 static inline void scrolldelta(int lines)
303 {
304 	/* FIXME */
305 	/* scrolldelta needs some kind of consistency lock, but the BKL was
306 	   and still is not protecting versus the scheduled back end */
307 	scrollback_delta += lines;
308 	schedule_console_callback();
309 }
310 
schedule_console_callback(void)311 void schedule_console_callback(void)
312 {
313 	schedule_work(&console_work);
314 }
315 
scrup(struct vc_data * vc,unsigned int t,unsigned int b,int nr)316 static void scrup(struct vc_data *vc, unsigned int t, unsigned int b, int nr)
317 {
318 	unsigned short *d, *s;
319 
320 	if (t+nr >= b)
321 		nr = b - t - 1;
322 	if (b > vc->vc_rows || t >= b || nr < 1)
323 		return;
324 	if (CON_IS_VISIBLE(vc) && vc->vc_sw->con_scroll(vc, t, b, SM_UP, nr))
325 		return;
326 	d = (unsigned short *)(vc->vc_origin + vc->vc_size_row * t);
327 	s = (unsigned short *)(vc->vc_origin + vc->vc_size_row * (t + nr));
328 	scr_memmovew(d, s, (b - t - nr) * vc->vc_size_row);
329 	scr_memsetw(d + (b - t - nr) * vc->vc_cols, vc->vc_video_erase_char,
330 		    vc->vc_size_row * nr);
331 }
332 
scrdown(struct vc_data * vc,unsigned int t,unsigned int b,int nr)333 static void scrdown(struct vc_data *vc, unsigned int t, unsigned int b, int nr)
334 {
335 	unsigned short *s;
336 	unsigned int step;
337 
338 	if (t+nr >= b)
339 		nr = b - t - 1;
340 	if (b > vc->vc_rows || t >= b || nr < 1)
341 		return;
342 	if (CON_IS_VISIBLE(vc) && vc->vc_sw->con_scroll(vc, t, b, SM_DOWN, nr))
343 		return;
344 	s = (unsigned short *)(vc->vc_origin + vc->vc_size_row * t);
345 	step = vc->vc_cols * nr;
346 	scr_memmovew(s + step, s, (b - t - nr) * vc->vc_size_row);
347 	scr_memsetw(s, vc->vc_video_erase_char, 2 * step);
348 }
349 
do_update_region(struct vc_data * vc,unsigned long start,int count)350 static void do_update_region(struct vc_data *vc, unsigned long start, int count)
351 {
352 #ifndef VT_BUF_VRAM_ONLY
353 	unsigned int xx, yy, offset;
354 	u16 *p;
355 
356 	p = (u16 *) start;
357 	if (!vc->vc_sw->con_getxy) {
358 		offset = (start - vc->vc_origin) / 2;
359 		xx = offset % vc->vc_cols;
360 		yy = offset / vc->vc_cols;
361 	} else {
362 		int nxx, nyy;
363 		start = vc->vc_sw->con_getxy(vc, start, &nxx, &nyy);
364 		xx = nxx; yy = nyy;
365 	}
366 	for(;;) {
367 		u16 attrib = scr_readw(p) & 0xff00;
368 		int startx = xx;
369 		u16 *q = p;
370 		while (xx < vc->vc_cols && count) {
371 			if (attrib != (scr_readw(p) & 0xff00)) {
372 				if (p > q)
373 					vc->vc_sw->con_putcs(vc, q, p-q, yy, startx);
374 				startx = xx;
375 				q = p;
376 				attrib = scr_readw(p) & 0xff00;
377 			}
378 			p++;
379 			xx++;
380 			count--;
381 		}
382 		if (p > q)
383 			vc->vc_sw->con_putcs(vc, q, p-q, yy, startx);
384 		if (!count)
385 			break;
386 		xx = 0;
387 		yy++;
388 		if (vc->vc_sw->con_getxy) {
389 			p = (u16 *)start;
390 			start = vc->vc_sw->con_getxy(vc, start, NULL, NULL);
391 		}
392 	}
393 #endif
394 }
395 
update_region(struct vc_data * vc,unsigned long start,int count)396 void update_region(struct vc_data *vc, unsigned long start, int count)
397 {
398 	WARN_CONSOLE_UNLOCKED();
399 
400 	if (DO_UPDATE(vc)) {
401 		hide_cursor(vc);
402 		do_update_region(vc, start, count);
403 		set_cursor(vc);
404 	}
405 }
406 
407 /* Structure of attributes is hardware-dependent */
408 
build_attr(struct vc_data * vc,u8 _color,u8 _intensity,u8 _blink,u8 _underline,u8 _reverse,u8 _italic)409 static u8 build_attr(struct vc_data *vc, u8 _color, u8 _intensity, u8 _blink,
410     u8 _underline, u8 _reverse, u8 _italic)
411 {
412 	if (vc->vc_sw->con_build_attr)
413 		return vc->vc_sw->con_build_attr(vc, _color, _intensity,
414 		       _blink, _underline, _reverse, _italic);
415 
416 #ifndef VT_BUF_VRAM_ONLY
417 /*
418  * ++roman: I completely changed the attribute format for monochrome
419  * mode (!can_do_color). The formerly used MDA (monochrome display
420  * adapter) format didn't allow the combination of certain effects.
421  * Now the attribute is just a bit vector:
422  *  Bit 0..1: intensity (0..2)
423  *  Bit 2   : underline
424  *  Bit 3   : reverse
425  *  Bit 7   : blink
426  */
427 	{
428 	u8 a = _color;
429 	if (!vc->vc_can_do_color)
430 		return _intensity |
431 		       (_italic ? 2 : 0) |
432 		       (_underline ? 4 : 0) |
433 		       (_reverse ? 8 : 0) |
434 		       (_blink ? 0x80 : 0);
435 	if (_italic)
436 		a = (a & 0xF0) | vc->vc_itcolor;
437 	else if (_underline)
438 		a = (a & 0xf0) | vc->vc_ulcolor;
439 	else if (_intensity == 0)
440 		a = (a & 0xf0) | vc->vc_ulcolor;
441 	if (_reverse)
442 		a = ((a) & 0x88) | ((((a) >> 4) | ((a) << 4)) & 0x77);
443 	if (_blink)
444 		a ^= 0x80;
445 	if (_intensity == 2)
446 		a ^= 0x08;
447 	if (vc->vc_hi_font_mask == 0x100)
448 		a <<= 1;
449 	return a;
450 	}
451 #else
452 	return 0;
453 #endif
454 }
455 
update_attr(struct vc_data * vc)456 static void update_attr(struct vc_data *vc)
457 {
458 	vc->vc_attr = build_attr(vc, vc->vc_color, vc->vc_intensity,
459 	              vc->vc_blink, vc->vc_underline,
460 	              vc->vc_reverse ^ vc->vc_decscnm, vc->vc_italic);
461 	vc->vc_video_erase_char = (build_attr(vc, vc->vc_color, 1, vc->vc_blink, 0, vc->vc_decscnm, 0) << 8) | ' ';
462 }
463 
464 /* Note: inverting the screen twice should revert to the original state */
invert_screen(struct vc_data * vc,int offset,int count,int viewed)465 void invert_screen(struct vc_data *vc, int offset, int count, int viewed)
466 {
467 	unsigned short *p;
468 
469 	WARN_CONSOLE_UNLOCKED();
470 
471 	count /= 2;
472 	p = screenpos(vc, offset, viewed);
473 	if (vc->vc_sw->con_invert_region)
474 		vc->vc_sw->con_invert_region(vc, p, count);
475 #ifndef VT_BUF_VRAM_ONLY
476 	else {
477 		u16 *q = p;
478 		int cnt = count;
479 		u16 a;
480 
481 		if (!vc->vc_can_do_color) {
482 			while (cnt--) {
483 			    a = scr_readw(q);
484 			    a ^= 0x0800;
485 			    scr_writew(a, q);
486 			    q++;
487 			}
488 		} else if (vc->vc_hi_font_mask == 0x100) {
489 			while (cnt--) {
490 				a = scr_readw(q);
491 				a = ((a) & 0x11ff) | (((a) & 0xe000) >> 4) | (((a) & 0x0e00) << 4);
492 				scr_writew(a, q);
493 				q++;
494 			}
495 		} else {
496 			while (cnt--) {
497 				a = scr_readw(q);
498 				a = ((a) & 0x88ff) | (((a) & 0x7000) >> 4) | (((a) & 0x0700) << 4);
499 				scr_writew(a, q);
500 				q++;
501 			}
502 		}
503 	}
504 #endif
505 	if (DO_UPDATE(vc))
506 		do_update_region(vc, (unsigned long) p, count);
507 	notify_update(vc);
508 }
509 
510 /* used by selection: complement pointer position */
complement_pos(struct vc_data * vc,int offset)511 void complement_pos(struct vc_data *vc, int offset)
512 {
513 	static int old_offset = -1;
514 	static unsigned short old;
515 	static unsigned short oldx, oldy;
516 
517 	WARN_CONSOLE_UNLOCKED();
518 
519 	if (old_offset != -1 && old_offset >= 0 &&
520 	    old_offset < vc->vc_screenbuf_size) {
521 		scr_writew(old, screenpos(vc, old_offset, 1));
522 		if (DO_UPDATE(vc))
523 			vc->vc_sw->con_putc(vc, old, oldy, oldx);
524 		notify_update(vc);
525 	}
526 
527 	old_offset = offset;
528 
529 	if (offset != -1 && offset >= 0 &&
530 	    offset < vc->vc_screenbuf_size) {
531 		unsigned short new;
532 		unsigned short *p;
533 		p = screenpos(vc, offset, 1);
534 		old = scr_readw(p);
535 		new = old ^ vc->vc_complement_mask;
536 		scr_writew(new, p);
537 		if (DO_UPDATE(vc)) {
538 			oldx = (offset >> 1) % vc->vc_cols;
539 			oldy = (offset >> 1) / vc->vc_cols;
540 			vc->vc_sw->con_putc(vc, new, oldy, oldx);
541 		}
542 		notify_update(vc);
543 	}
544 }
545 
insert_char(struct vc_data * vc,unsigned int nr)546 static void insert_char(struct vc_data *vc, unsigned int nr)
547 {
548 	unsigned short *p = (unsigned short *) vc->vc_pos;
549 
550 	scr_memmovew(p + nr, p, (vc->vc_cols - vc->vc_x - nr) * 2);
551 	scr_memsetw(p, vc->vc_video_erase_char, nr * 2);
552 	vc->vc_need_wrap = 0;
553 	if (DO_UPDATE(vc))
554 		do_update_region(vc, (unsigned long) p,
555 			vc->vc_cols - vc->vc_x);
556 }
557 
delete_char(struct vc_data * vc,unsigned int nr)558 static void delete_char(struct vc_data *vc, unsigned int nr)
559 {
560 	unsigned short *p = (unsigned short *) vc->vc_pos;
561 
562 	scr_memcpyw(p, p + nr, (vc->vc_cols - vc->vc_x - nr) * 2);
563 	scr_memsetw(p + vc->vc_cols - vc->vc_x - nr, vc->vc_video_erase_char,
564 			nr * 2);
565 	vc->vc_need_wrap = 0;
566 	if (DO_UPDATE(vc))
567 		do_update_region(vc, (unsigned long) p,
568 			vc->vc_cols - vc->vc_x);
569 }
570 
571 static int softcursor_original;
572 
add_softcursor(struct vc_data * vc)573 static void add_softcursor(struct vc_data *vc)
574 {
575 	int i = scr_readw((u16 *) vc->vc_pos);
576 	u32 type = vc->vc_cursor_type;
577 
578 	if (! (type & 0x10)) return;
579 	if (softcursor_original != -1) return;
580 	softcursor_original = i;
581 	i |= ((type >> 8) & 0xff00 );
582 	i ^= ((type) & 0xff00 );
583 	if ((type & 0x20) && ((softcursor_original & 0x7000) == (i & 0x7000))) i ^= 0x7000;
584 	if ((type & 0x40) && ((i & 0x700) == ((i & 0x7000) >> 4))) i ^= 0x0700;
585 	scr_writew(i, (u16 *) vc->vc_pos);
586 	if (DO_UPDATE(vc))
587 		vc->vc_sw->con_putc(vc, i, vc->vc_y, vc->vc_x);
588 }
589 
hide_softcursor(struct vc_data * vc)590 static void hide_softcursor(struct vc_data *vc)
591 {
592 	if (softcursor_original != -1) {
593 		scr_writew(softcursor_original, (u16 *)vc->vc_pos);
594 		if (DO_UPDATE(vc))
595 			vc->vc_sw->con_putc(vc, softcursor_original,
596 					vc->vc_y, vc->vc_x);
597 		softcursor_original = -1;
598 	}
599 }
600 
hide_cursor(struct vc_data * vc)601 static void hide_cursor(struct vc_data *vc)
602 {
603 	if (vc_is_sel(vc))
604 		clear_selection();
605 
606 	vc->vc_sw->con_cursor(vc, CM_ERASE);
607 	hide_softcursor(vc);
608 }
609 
set_cursor(struct vc_data * vc)610 static void set_cursor(struct vc_data *vc)
611 {
612 	if (!IS_FG(vc) || console_blanked ||
613 	    vc->vc_mode == KD_GRAPHICS)
614 		return;
615 	if (vc->vc_deccm) {
616 		if (vc_is_sel(vc))
617 			clear_selection();
618 		add_softcursor(vc);
619 		if ((vc->vc_cursor_type & 0x0f) != 1)
620 			vc->vc_sw->con_cursor(vc, CM_DRAW);
621 	} else
622 		hide_cursor(vc);
623 }
624 
set_origin(struct vc_data * vc)625 static void set_origin(struct vc_data *vc)
626 {
627 	WARN_CONSOLE_UNLOCKED();
628 
629 	if (!CON_IS_VISIBLE(vc) ||
630 	    !vc->vc_sw->con_set_origin ||
631 	    !vc->vc_sw->con_set_origin(vc))
632 		vc->vc_origin = (unsigned long)vc->vc_screenbuf;
633 	vc->vc_visible_origin = vc->vc_origin;
634 	vc->vc_scr_end = vc->vc_origin + vc->vc_screenbuf_size;
635 	vc->vc_pos = vc->vc_origin + vc->vc_size_row * vc->vc_y + 2 * vc->vc_x;
636 }
637 
save_screen(struct vc_data * vc)638 static inline void save_screen(struct vc_data *vc)
639 {
640 	WARN_CONSOLE_UNLOCKED();
641 
642 	if (vc->vc_sw->con_save_screen)
643 		vc->vc_sw->con_save_screen(vc);
644 }
645 
646 /*
647  *	Redrawing of screen
648  */
649 
clear_buffer_attributes(struct vc_data * vc)650 void clear_buffer_attributes(struct vc_data *vc)
651 {
652 	unsigned short *p = (unsigned short *)vc->vc_origin;
653 	int count = vc->vc_screenbuf_size / 2;
654 	int mask = vc->vc_hi_font_mask | 0xff;
655 
656 	for (; count > 0; count--, p++) {
657 		scr_writew((scr_readw(p)&mask) | (vc->vc_video_erase_char & ~mask), p);
658 	}
659 }
660 
redraw_screen(struct vc_data * vc,int is_switch)661 void redraw_screen(struct vc_data *vc, int is_switch)
662 {
663 	int redraw = 0;
664 
665 	WARN_CONSOLE_UNLOCKED();
666 
667 	if (!vc) {
668 		/* strange ... */
669 		/* printk("redraw_screen: tty %d not allocated ??\n", new_console+1); */
670 		return;
671 	}
672 
673 	if (is_switch) {
674 		struct vc_data *old_vc = vc_cons[fg_console].d;
675 		if (old_vc == vc)
676 			return;
677 		if (!CON_IS_VISIBLE(vc))
678 			redraw = 1;
679 		*vc->vc_display_fg = vc;
680 		fg_console = vc->vc_num;
681 		hide_cursor(old_vc);
682 		if (!CON_IS_VISIBLE(old_vc)) {
683 			save_screen(old_vc);
684 			set_origin(old_vc);
685 		}
686 		if (tty0dev)
687 			sysfs_notify(&tty0dev->kobj, NULL, "active");
688 	} else {
689 		hide_cursor(vc);
690 		redraw = 1;
691 	}
692 
693 	if (redraw) {
694 		int update;
695 		int old_was_color = vc->vc_can_do_color;
696 
697 		set_origin(vc);
698 		update = vc->vc_sw->con_switch(vc);
699 		set_palette(vc);
700 		/*
701 		 * If console changed from mono<->color, the best we can do
702 		 * is to clear the buffer attributes. As it currently stands,
703 		 * rebuilding new attributes from the old buffer is not doable
704 		 * without overly complex code.
705 		 */
706 		if (old_was_color != vc->vc_can_do_color) {
707 			update_attr(vc);
708 			clear_buffer_attributes(vc);
709 		}
710 
711 		/* Forcibly update if we're panicing */
712 		if ((update && vc->vc_mode != KD_GRAPHICS) ||
713 		    vt_force_oops_output(vc))
714 			do_update_region(vc, vc->vc_origin, vc->vc_screenbuf_size / 2);
715 	}
716 	set_cursor(vc);
717 	if (is_switch) {
718 		set_leds();
719 		compute_shiftstate();
720 		notify_update(vc);
721 	}
722 }
723 
724 /*
725  *	Allocation, freeing and resizing of VTs.
726  */
727 
vc_cons_allocated(unsigned int i)728 int vc_cons_allocated(unsigned int i)
729 {
730 	return (i < MAX_NR_CONSOLES && vc_cons[i].d);
731 }
732 
visual_init(struct vc_data * vc,int num,int init)733 static void visual_init(struct vc_data *vc, int num, int init)
734 {
735 	/* ++Geert: vc->vc_sw->con_init determines console size */
736 	if (vc->vc_sw)
737 		module_put(vc->vc_sw->owner);
738 	vc->vc_sw = conswitchp;
739 #ifndef VT_SINGLE_DRIVER
740 	if (con_driver_map[num])
741 		vc->vc_sw = con_driver_map[num];
742 #endif
743 	__module_get(vc->vc_sw->owner);
744 	vc->vc_num = num;
745 	vc->vc_display_fg = &master_display_fg;
746 	if (vc->vc_uni_pagedir_loc)
747 		con_free_unimap(vc);
748 	vc->vc_uni_pagedir_loc = &vc->vc_uni_pagedir;
749 	vc->vc_uni_pagedir = NULL;
750 	vc->vc_hi_font_mask = 0;
751 	vc->vc_complement_mask = 0;
752 	vc->vc_can_do_color = 0;
753 	vc->vc_panic_force_write = false;
754 	vc->vc_cur_blink_ms = DEFAULT_CURSOR_BLINK_MS;
755 	vc->vc_sw->con_init(vc, init);
756 	if (!vc->vc_complement_mask)
757 		vc->vc_complement_mask = vc->vc_can_do_color ? 0x7700 : 0x0800;
758 	vc->vc_s_complement_mask = vc->vc_complement_mask;
759 	vc->vc_size_row = vc->vc_cols << 1;
760 	vc->vc_screenbuf_size = vc->vc_rows * vc->vc_size_row;
761 }
762 
vc_port_destruct(struct tty_port * port)763 static void vc_port_destruct(struct tty_port *port)
764 {
765 	struct vc_data *vc = container_of(port, struct vc_data, port);
766 
767 	kfree(vc);
768 }
769 
770 static const struct tty_port_operations vc_port_ops = {
771 	.destruct = vc_port_destruct,
772 };
773 
vc_allocate(unsigned int currcons)774 int vc_allocate(unsigned int currcons)	/* return 0 on success */
775 {
776 	WARN_CONSOLE_UNLOCKED();
777 
778 	if (currcons >= MAX_NR_CONSOLES)
779 		return -ENXIO;
780 	if (!vc_cons[currcons].d) {
781 	    struct vc_data *vc;
782 	    struct vt_notifier_param param;
783 
784 	    /* prevent users from taking too much memory */
785 	    if (currcons >= MAX_NR_USER_CONSOLES && !capable(CAP_SYS_RESOURCE))
786 	      return -EPERM;
787 
788 	    /* due to the granularity of kmalloc, we waste some memory here */
789 	    /* the alloc is done in two steps, to optimize the common situation
790 	       of a 25x80 console (structsize=216, screenbuf_size=4000) */
791 	    /* although the numbers above are not valid since long ago, the
792 	       point is still up-to-date and the comment still has its value
793 	       even if only as a historical artifact.  --mj, July 1998 */
794 	    param.vc = vc = kzalloc(sizeof(struct vc_data), GFP_KERNEL);
795 	    if (!vc)
796 		return -ENOMEM;
797 	    vc_cons[currcons].d = vc;
798 	    tty_port_init(&vc->port);
799 	    vc->port.ops = &vc_port_ops;
800 	    INIT_WORK(&vc_cons[currcons].SAK_work, vc_SAK);
801 	    visual_init(vc, currcons, 1);
802 	    if (!*vc->vc_uni_pagedir_loc)
803 		con_set_default_unimap(vc);
804 	    vc->vc_screenbuf = kmalloc(vc->vc_screenbuf_size, GFP_KERNEL);
805 	    if (!vc->vc_screenbuf) {
806 		kfree(vc);
807 		vc_cons[currcons].d = NULL;
808 		return -ENOMEM;
809 	    }
810 
811 	    /* If no drivers have overridden us and the user didn't pass a
812 	       boot option, default to displaying the cursor */
813 	    if (global_cursor_default == -1)
814 		    global_cursor_default = 1;
815 
816 	    vc_init(vc, vc->vc_rows, vc->vc_cols, 1);
817 	    vcs_make_sysfs(currcons);
818 	    atomic_notifier_call_chain(&vt_notifier_list, VT_ALLOCATE, &param);
819 	}
820 	return 0;
821 }
822 
resize_screen(struct vc_data * vc,int width,int height,int user)823 static inline int resize_screen(struct vc_data *vc, int width, int height,
824 				int user)
825 {
826 	/* Resizes the resolution of the display adapater */
827 	int err = 0;
828 
829 	if (vc->vc_sw->con_resize)
830 		err = vc->vc_sw->con_resize(vc, width, height, user);
831 
832 	return err;
833 }
834 
835 /*
836  * Change # of rows and columns (0 means unchanged/the size of fg_console)
837  * [this is to be used together with some user program
838  * like resize that changes the hardware videomode]
839  */
840 #define VC_RESIZE_MAXCOL (32767)
841 #define VC_RESIZE_MAXROW (32767)
842 
843 /**
844  *	vc_do_resize	-	resizing method for the tty
845  *	@tty: tty being resized
846  *	@real_tty: real tty (different to tty if a pty/tty pair)
847  *	@vc: virtual console private data
848  *	@cols: columns
849  *	@lines: lines
850  *
851  *	Resize a virtual console, clipping according to the actual constraints.
852  *	If the caller passes a tty structure then update the termios winsize
853  *	information and perform any necessary signal handling.
854  *
855  *	Caller must hold the console semaphore. Takes the termios rwsem and
856  *	ctrl_lock of the tty IFF a tty is passed.
857  */
858 
vc_do_resize(struct tty_struct * tty,struct vc_data * vc,unsigned int cols,unsigned int lines)859 static int vc_do_resize(struct tty_struct *tty, struct vc_data *vc,
860 				unsigned int cols, unsigned int lines)
861 {
862 	unsigned long old_origin, new_origin, new_scr_end, rlth, rrem, err = 0;
863 	unsigned long end;
864 	unsigned int old_rows, old_row_size;
865 	unsigned int new_cols, new_rows, new_row_size, new_screen_size;
866 	unsigned int user;
867 	unsigned short *oldscreen, *newscreen;
868 
869 	WARN_CONSOLE_UNLOCKED();
870 
871 	if (!vc)
872 		return -ENXIO;
873 
874 	user = vc->vc_resize_user;
875 	vc->vc_resize_user = 0;
876 
877 	if (cols > VC_RESIZE_MAXCOL || lines > VC_RESIZE_MAXROW)
878 		return -EINVAL;
879 
880 	new_cols = (cols ? cols : vc->vc_cols);
881 	new_rows = (lines ? lines : vc->vc_rows);
882 	new_row_size = new_cols << 1;
883 	new_screen_size = new_row_size * new_rows;
884 
885 	if (new_cols == vc->vc_cols && new_rows == vc->vc_rows) {
886 		/*
887 		 * This function is being called here to cover the case
888 		 * where the userspace calls the FBIOPUT_VSCREENINFO twice,
889 		 * passing the same fb_var_screeninfo containing the fields
890 		 * yres/xres equal to a number non-multiple of vc_font.height
891 		 * and yres_virtual/xres_virtual equal to number lesser than the
892 		 * vc_font.height and yres/xres.
893 		 * In the second call, the struct fb_var_screeninfo isn't
894 		 * being modified by the underlying driver because of the
895 		 * if above, and this causes the fbcon_display->vrows to become
896 		 * negative and it eventually leads to out-of-bound
897 		 * access by the imageblit function.
898 		 * To give the correct values to the struct and to not have
899 		 * to deal with possible errors from the code below, we call
900 		 * the resize_screen here as well.
901 		 */
902 		return resize_screen(vc, new_cols, new_rows, user);
903 	}
904 
905 	if (new_screen_size > (4 << 20))
906 		return -EINVAL;
907 	newscreen = kmalloc(new_screen_size, GFP_USER);
908 	if (!newscreen)
909 		return -ENOMEM;
910 
911 	if (vc_is_sel(vc))
912 		clear_selection();
913 
914 	old_rows = vc->vc_rows;
915 	old_row_size = vc->vc_size_row;
916 
917 	err = resize_screen(vc, new_cols, new_rows, user);
918 	if (err) {
919 		kfree(newscreen);
920 		return err;
921 	}
922 
923 	vc->vc_rows = new_rows;
924 	vc->vc_cols = new_cols;
925 	vc->vc_size_row = new_row_size;
926 	vc->vc_screenbuf_size = new_screen_size;
927 
928 	rlth = min(old_row_size, new_row_size);
929 	rrem = new_row_size - rlth;
930 	old_origin = vc->vc_origin;
931 	new_origin = (long) newscreen;
932 	new_scr_end = new_origin + new_screen_size;
933 
934 	if (vc->vc_y > new_rows) {
935 		if (old_rows - vc->vc_y < new_rows) {
936 			/*
937 			 * Cursor near the bottom, copy contents from the
938 			 * bottom of buffer
939 			 */
940 			old_origin += (old_rows - new_rows) * old_row_size;
941 		} else {
942 			/*
943 			 * Cursor is in no man's land, copy 1/2 screenful
944 			 * from the top and bottom of cursor position
945 			 */
946 			old_origin += (vc->vc_y - new_rows/2) * old_row_size;
947 		}
948 	}
949 
950 	end = old_origin + old_row_size * min(old_rows, new_rows);
951 
952 	update_attr(vc);
953 
954 	while (old_origin < end) {
955 		scr_memcpyw((unsigned short *) new_origin,
956 			    (unsigned short *) old_origin, rlth);
957 		if (rrem)
958 			scr_memsetw((void *)(new_origin + rlth),
959 				    vc->vc_video_erase_char, rrem);
960 		old_origin += old_row_size;
961 		new_origin += new_row_size;
962 	}
963 	if (new_scr_end > new_origin)
964 		scr_memsetw((void *)new_origin, vc->vc_video_erase_char,
965 			    new_scr_end - new_origin);
966 	oldscreen = vc->vc_screenbuf;
967 	vc->vc_screenbuf = newscreen;
968 	vc->vc_screenbuf_size = new_screen_size;
969 	set_origin(vc);
970 	kfree(oldscreen);
971 
972 	/* do part of a reset_terminal() */
973 	vc->vc_top = 0;
974 	vc->vc_bottom = vc->vc_rows;
975 	gotoxy(vc, vc->vc_x, vc->vc_y);
976 	save_cur(vc);
977 
978 	if (tty) {
979 		/* Rewrite the requested winsize data with the actual
980 		   resulting sizes */
981 		struct winsize ws;
982 		memset(&ws, 0, sizeof(ws));
983 		ws.ws_row = vc->vc_rows;
984 		ws.ws_col = vc->vc_cols;
985 		ws.ws_ypixel = vc->vc_scan_lines;
986 		tty_do_resize(tty, &ws);
987 	}
988 
989 	if (CON_IS_VISIBLE(vc))
990 		update_screen(vc);
991 	vt_event_post(VT_EVENT_RESIZE, vc->vc_num, vc->vc_num);
992 	notify_update(vc);
993 	return err;
994 }
995 
996 /**
997  *	vc_resize		-	resize a VT
998  *	@vc: virtual console
999  *	@cols: columns
1000  *	@rows: rows
1001  *
1002  *	Resize a virtual console as seen from the console end of things. We
1003  *	use the common vc_do_resize methods to update the structures. The
1004  *	caller must hold the console sem to protect console internals and
1005  *	vc->port.tty
1006  */
1007 
vc_resize(struct vc_data * vc,unsigned int cols,unsigned int rows)1008 int vc_resize(struct vc_data *vc, unsigned int cols, unsigned int rows)
1009 {
1010 	return vc_do_resize(vc->port.tty, vc, cols, rows);
1011 }
1012 
1013 /**
1014  *	vt_resize		-	resize a VT
1015  *	@tty: tty to resize
1016  *	@ws: winsize attributes
1017  *
1018  *	Resize a virtual terminal. This is called by the tty layer as we
1019  *	register our own handler for resizing. The mutual helper does all
1020  *	the actual work.
1021  *
1022  *	Takes the console sem and the called methods then take the tty
1023  *	termios_rwsem and the tty ctrl_lock in that order.
1024  */
vt_resize(struct tty_struct * tty,struct winsize * ws)1025 static int vt_resize(struct tty_struct *tty, struct winsize *ws)
1026 {
1027 	struct vc_data *vc = tty->driver_data;
1028 	int ret;
1029 
1030 	console_lock();
1031 	ret = vc_do_resize(tty, vc, ws->ws_col, ws->ws_row);
1032 	console_unlock();
1033 	return ret;
1034 }
1035 
vc_deallocate(unsigned int currcons)1036 struct vc_data *vc_deallocate(unsigned int currcons)
1037 {
1038 	struct vc_data *vc = NULL;
1039 
1040 	WARN_CONSOLE_UNLOCKED();
1041 
1042 	if (vc_cons_allocated(currcons)) {
1043 		struct vt_notifier_param param;
1044 
1045 		param.vc = vc = vc_cons[currcons].d;
1046 		atomic_notifier_call_chain(&vt_notifier_list, VT_DEALLOCATE, &param);
1047 		vcs_remove_sysfs(currcons);
1048 		vc->vc_sw->con_deinit(vc);
1049 		put_pid(vc->vt_pid);
1050 		module_put(vc->vc_sw->owner);
1051 		kfree(vc->vc_screenbuf);
1052 		vc_cons[currcons].d = NULL;
1053 	}
1054 	return vc;
1055 }
1056 
1057 /*
1058  *	VT102 emulator
1059  */
1060 
1061 #define set_kbd(vc, x)	vt_set_kbd_mode_bit((vc)->vc_num, (x))
1062 #define clr_kbd(vc, x)	vt_clr_kbd_mode_bit((vc)->vc_num, (x))
1063 #define is_kbd(vc, x)	vt_get_kbd_mode_bit((vc)->vc_num, (x))
1064 
1065 #define decarm		VC_REPEAT
1066 #define decckm		VC_CKMODE
1067 #define kbdapplic	VC_APPLIC
1068 #define lnm		VC_CRLF
1069 
1070 /*
1071  * this is what the terminal answers to a ESC-Z or csi0c query.
1072  */
1073 #define VT100ID "\033[?1;2c"
1074 #define VT102ID "\033[?6c"
1075 
1076 unsigned char color_table[] = { 0, 4, 2, 6, 1, 5, 3, 7,
1077 				       8,12,10,14, 9,13,11,15 };
1078 
1079 /* the default colour table, for VGA+ colour systems */
1080 int default_red[] = {0x00,0xaa,0x00,0xaa,0x00,0xaa,0x00,0xaa,
1081     0x55,0xff,0x55,0xff,0x55,0xff,0x55,0xff};
1082 int default_grn[] = {0x00,0x00,0xaa,0x55,0x00,0x00,0xaa,0xaa,
1083     0x55,0x55,0xff,0xff,0x55,0x55,0xff,0xff};
1084 int default_blu[] = {0x00,0x00,0x00,0x00,0xaa,0xaa,0xaa,0xaa,
1085     0x55,0x55,0x55,0x55,0xff,0xff,0xff,0xff};
1086 
1087 module_param_array(default_red, int, NULL, S_IRUGO | S_IWUSR);
1088 module_param_array(default_grn, int, NULL, S_IRUGO | S_IWUSR);
1089 module_param_array(default_blu, int, NULL, S_IRUGO | S_IWUSR);
1090 
1091 /*
1092  * gotoxy() must verify all boundaries, because the arguments
1093  * might also be negative. If the given position is out of
1094  * bounds, the cursor is placed at the nearest margin.
1095  */
gotoxy(struct vc_data * vc,int new_x,int new_y)1096 static void gotoxy(struct vc_data *vc, int new_x, int new_y)
1097 {
1098 	int min_y, max_y;
1099 
1100 	if (new_x < 0)
1101 		vc->vc_x = 0;
1102 	else {
1103 		if (new_x >= vc->vc_cols)
1104 			vc->vc_x = vc->vc_cols - 1;
1105 		else
1106 			vc->vc_x = new_x;
1107 	}
1108 
1109  	if (vc->vc_decom) {
1110 		min_y = vc->vc_top;
1111 		max_y = vc->vc_bottom;
1112 	} else {
1113 		min_y = 0;
1114 		max_y = vc->vc_rows;
1115 	}
1116 	if (new_y < min_y)
1117 		vc->vc_y = min_y;
1118 	else if (new_y >= max_y)
1119 		vc->vc_y = max_y - 1;
1120 	else
1121 		vc->vc_y = new_y;
1122 	vc->vc_pos = vc->vc_origin + vc->vc_y * vc->vc_size_row + (vc->vc_x<<1);
1123 	vc->vc_need_wrap = 0;
1124 }
1125 
1126 /* for absolute user moves, when decom is set */
gotoxay(struct vc_data * vc,int new_x,int new_y)1127 static void gotoxay(struct vc_data *vc, int new_x, int new_y)
1128 {
1129 	gotoxy(vc, new_x, vc->vc_decom ? (vc->vc_top + new_y) : new_y);
1130 }
1131 
scrollback(struct vc_data * vc,int lines)1132 void scrollback(struct vc_data *vc, int lines)
1133 {
1134 	if (!lines)
1135 		lines = vc->vc_rows / 2;
1136 	scrolldelta(-lines);
1137 }
1138 
scrollfront(struct vc_data * vc,int lines)1139 void scrollfront(struct vc_data *vc, int lines)
1140 {
1141 	if (!lines)
1142 		lines = vc->vc_rows / 2;
1143 	scrolldelta(lines);
1144 }
1145 
lf(struct vc_data * vc)1146 static void lf(struct vc_data *vc)
1147 {
1148     	/* don't scroll if above bottom of scrolling region, or
1149 	 * if below scrolling region
1150 	 */
1151     	if (vc->vc_y + 1 == vc->vc_bottom)
1152 		scrup(vc, vc->vc_top, vc->vc_bottom, 1);
1153 	else if (vc->vc_y < vc->vc_rows - 1) {
1154 	    	vc->vc_y++;
1155 		vc->vc_pos += vc->vc_size_row;
1156 	}
1157 	vc->vc_need_wrap = 0;
1158 	notify_write(vc, '\n');
1159 }
1160 
ri(struct vc_data * vc)1161 static void ri(struct vc_data *vc)
1162 {
1163     	/* don't scroll if below top of scrolling region, or
1164 	 * if above scrolling region
1165 	 */
1166 	if (vc->vc_y == vc->vc_top)
1167 		scrdown(vc, vc->vc_top, vc->vc_bottom, 1);
1168 	else if (vc->vc_y > 0) {
1169 		vc->vc_y--;
1170 		vc->vc_pos -= vc->vc_size_row;
1171 	}
1172 	vc->vc_need_wrap = 0;
1173 }
1174 
cr(struct vc_data * vc)1175 static inline void cr(struct vc_data *vc)
1176 {
1177 	vc->vc_pos -= vc->vc_x << 1;
1178 	vc->vc_need_wrap = vc->vc_x = 0;
1179 	notify_write(vc, '\r');
1180 }
1181 
bs(struct vc_data * vc)1182 static inline void bs(struct vc_data *vc)
1183 {
1184 	if (vc->vc_x) {
1185 		vc->vc_pos -= 2;
1186 		vc->vc_x--;
1187 		vc->vc_need_wrap = 0;
1188 		notify_write(vc, '\b');
1189 	}
1190 }
1191 
del(struct vc_data * vc)1192 static inline void del(struct vc_data *vc)
1193 {
1194 	/* ignored */
1195 }
1196 
csi_J(struct vc_data * vc,int vpar)1197 static void csi_J(struct vc_data *vc, int vpar)
1198 {
1199 	unsigned int count;
1200 	unsigned short * start;
1201 
1202 	switch (vpar) {
1203 		case 0:	/* erase from cursor to end of display */
1204 			count = (vc->vc_scr_end - vc->vc_pos) >> 1;
1205 			start = (unsigned short *)vc->vc_pos;
1206 			break;
1207 		case 1:	/* erase from start to cursor */
1208 			count = ((vc->vc_pos - vc->vc_origin) >> 1) + 1;
1209 			start = (unsigned short *)vc->vc_origin;
1210 			break;
1211 		case 3: /* erase scroll-back buffer (and whole display) */
1212 			scr_memsetw(vc->vc_screenbuf, vc->vc_video_erase_char,
1213 				    vc->vc_screenbuf_size);
1214 			set_origin(vc);
1215 			if (CON_IS_VISIBLE(vc))
1216 				update_screen(vc);
1217 			/* fall through */
1218 		case 2: /* erase whole display */
1219 			count = vc->vc_cols * vc->vc_rows;
1220 			start = (unsigned short *)vc->vc_origin;
1221 			break;
1222 		default:
1223 			return;
1224 	}
1225 	scr_memsetw(start, vc->vc_video_erase_char, 2 * count);
1226 	if (DO_UPDATE(vc))
1227 		do_update_region(vc, (unsigned long) start, count);
1228 	vc->vc_need_wrap = 0;
1229 }
1230 
csi_K(struct vc_data * vc,int vpar)1231 static void csi_K(struct vc_data *vc, int vpar)
1232 {
1233 	unsigned int count;
1234 	unsigned short * start;
1235 
1236 	switch (vpar) {
1237 		case 0:	/* erase from cursor to end of line */
1238 			count = vc->vc_cols - vc->vc_x;
1239 			start = (unsigned short *)vc->vc_pos;
1240 			break;
1241 		case 1:	/* erase from start of line to cursor */
1242 			start = (unsigned short *)(vc->vc_pos - (vc->vc_x << 1));
1243 			count = vc->vc_x + 1;
1244 			break;
1245 		case 2: /* erase whole line */
1246 			start = (unsigned short *)(vc->vc_pos - (vc->vc_x << 1));
1247 			count = vc->vc_cols;
1248 			break;
1249 		default:
1250 			return;
1251 	}
1252 	scr_memsetw(start, vc->vc_video_erase_char, 2 * count);
1253 	vc->vc_need_wrap = 0;
1254 	if (DO_UPDATE(vc))
1255 		do_update_region(vc, (unsigned long) start, count);
1256 }
1257 
csi_X(struct vc_data * vc,int vpar)1258 static void csi_X(struct vc_data *vc, int vpar) /* erase the following vpar positions */
1259 {					  /* not vt100? */
1260 	int count;
1261 
1262 	if (!vpar)
1263 		vpar++;
1264 	count = (vpar > vc->vc_cols - vc->vc_x) ? (vc->vc_cols - vc->vc_x) : vpar;
1265 
1266 	scr_memsetw((unsigned short *)vc->vc_pos, vc->vc_video_erase_char, 2 * count);
1267 	if (DO_UPDATE(vc))
1268 		vc->vc_sw->con_clear(vc, vc->vc_y, vc->vc_x, 1, count);
1269 	vc->vc_need_wrap = 0;
1270 }
1271 
default_attr(struct vc_data * vc)1272 static void default_attr(struct vc_data *vc)
1273 {
1274 	vc->vc_intensity = 1;
1275 	vc->vc_italic = 0;
1276 	vc->vc_underline = 0;
1277 	vc->vc_reverse = 0;
1278 	vc->vc_blink = 0;
1279 	vc->vc_color = vc->vc_def_color;
1280 }
1281 
1282 struct rgb { u8 r; u8 g; u8 b; };
1283 
rgb_from_256(int i)1284 static struct rgb rgb_from_256(int i)
1285 {
1286 	struct rgb c;
1287 	if (i < 8) {            /* Standard colours. */
1288 		c.r = i&1 ? 0xaa : 0x00;
1289 		c.g = i&2 ? 0xaa : 0x00;
1290 		c.b = i&4 ? 0xaa : 0x00;
1291 	} else if (i < 16) {
1292 		c.r = i&1 ? 0xff : 0x55;
1293 		c.g = i&2 ? 0xff : 0x55;
1294 		c.b = i&4 ? 0xff : 0x55;
1295 	} else if (i < 232) {   /* 6x6x6 colour cube. */
1296 		c.r = (i - 16) / 36 * 85 / 2;
1297 		c.g = (i - 16) / 6 % 6 * 85 / 2;
1298 		c.b = (i - 16) % 6 * 85 / 2;
1299 	} else                  /* Grayscale ramp. */
1300 		c.r = c.g = c.b = i * 10 - 2312;
1301 	return c;
1302 }
1303 
rgb_foreground(struct vc_data * vc,struct rgb c)1304 static void rgb_foreground(struct vc_data *vc, struct rgb c)
1305 {
1306 	u8 hue, max = c.r;
1307 	if (c.g > max)
1308 		max = c.g;
1309 	if (c.b > max)
1310 		max = c.b;
1311 	hue = (c.r > max/2 ? 4 : 0)
1312 	    | (c.g > max/2 ? 2 : 0)
1313 	    | (c.b > max/2 ? 1 : 0);
1314 	if (hue == 7 && max <= 0x55)
1315 		hue = 0, vc->vc_intensity = 2;
1316 	else
1317 		vc->vc_intensity = (max > 0xaa) + 1;
1318 	vc->vc_color = (vc->vc_color & 0xf0) | hue;
1319 }
1320 
rgb_background(struct vc_data * vc,struct rgb c)1321 static void rgb_background(struct vc_data *vc, struct rgb c)
1322 {
1323 	/* For backgrounds, err on the dark side. */
1324 	vc->vc_color = (vc->vc_color & 0x0f)
1325 		| (c.r&0x80) >> 1 | (c.g&0x80) >> 2 | (c.b&0x80) >> 3;
1326 }
1327 
1328 /* console_lock is held */
csi_m(struct vc_data * vc)1329 static void csi_m(struct vc_data *vc)
1330 {
1331 	int i;
1332 
1333 	for (i = 0; i <= vc->vc_npar; i++)
1334 		switch (vc->vc_par[i]) {
1335 			case 0:	/* all attributes off */
1336 				default_attr(vc);
1337 				break;
1338 			case 1:
1339 				vc->vc_intensity = 2;
1340 				break;
1341 			case 2:
1342 				vc->vc_intensity = 0;
1343 				break;
1344 			case 3:
1345 				vc->vc_italic = 1;
1346 				break;
1347 			case 21:
1348 				/*
1349 				 * No console drivers support double underline, so
1350 				 * convert it to a single underline.
1351 				 */
1352 			case 4:
1353 				vc->vc_underline = 1;
1354 				break;
1355 			case 5:
1356 				vc->vc_blink = 1;
1357 				break;
1358 			case 7:
1359 				vc->vc_reverse = 1;
1360 				break;
1361 			case 10: /* ANSI X3.64-1979 (SCO-ish?)
1362 				  * Select primary font, don't display
1363 				  * control chars if defined, don't set
1364 				  * bit 8 on output.
1365 				  */
1366 				vc->vc_translate = set_translate(vc->vc_charset == 0
1367 						? vc->vc_G0_charset
1368 						: vc->vc_G1_charset, vc);
1369 				vc->vc_disp_ctrl = 0;
1370 				vc->vc_toggle_meta = 0;
1371 				break;
1372 			case 11: /* ANSI X3.64-1979 (SCO-ish?)
1373 				  * Select first alternate font, lets
1374 				  * chars < 32 be displayed as ROM chars.
1375 				  */
1376 				vc->vc_translate = set_translate(IBMPC_MAP, vc);
1377 				vc->vc_disp_ctrl = 1;
1378 				vc->vc_toggle_meta = 0;
1379 				break;
1380 			case 12: /* ANSI X3.64-1979 (SCO-ish?)
1381 				  * Select second alternate font, toggle
1382 				  * high bit before displaying as ROM char.
1383 				  */
1384 				vc->vc_translate = set_translate(IBMPC_MAP, vc);
1385 				vc->vc_disp_ctrl = 1;
1386 				vc->vc_toggle_meta = 1;
1387 				break;
1388 			case 22:
1389 				vc->vc_intensity = 1;
1390 				break;
1391 			case 23:
1392 				vc->vc_italic = 0;
1393 				break;
1394 			case 24:
1395 				vc->vc_underline = 0;
1396 				break;
1397 			case 25:
1398 				vc->vc_blink = 0;
1399 				break;
1400 			case 27:
1401 				vc->vc_reverse = 0;
1402 				break;
1403 			case 38: /* ITU T.416
1404 				  * Higher colour modes.
1405 				  * They break the usual properties of SGR codes
1406 				  * and thus need to be detected and ignored by
1407 				  * hand.  Strictly speaking, that standard also
1408 				  * wants : rather than ; as separators, contrary
1409 				  * to ECMA-48, but no one produces such codes
1410 				  * and almost no one accepts them.
1411 				  */
1412 				i++;
1413 				if (i > vc->vc_npar)
1414 					break;
1415 				if (vc->vc_par[i] == 5 &&  /* 256 colours */
1416 				    i < vc->vc_npar) {     /* ubiquitous */
1417 					i++;
1418 					rgb_foreground(vc,
1419 						rgb_from_256(vc->vc_par[i]));
1420 				} else if (vc->vc_par[i] == 2 &&  /* 24 bit */
1421 				           i <= vc->vc_npar + 3) {/* extremely rare */
1422 					struct rgb c = {
1423 						.r = vc->vc_par[i + 1],
1424 						.g = vc->vc_par[i + 2],
1425 						.b = vc->vc_par[i + 3],
1426 					};
1427 					rgb_foreground(vc, c);
1428 					i += 3;
1429 				}
1430 				/* Subcommands 3 (CMY) and 4 (CMYK) are so insane
1431 				 * there's no point in supporting them.
1432 				 */
1433 				break;
1434 			case 48:
1435 				i++;
1436 				if (i > vc->vc_npar)
1437 					break;
1438 				if (vc->vc_par[i] == 5 &&  /* 256 colours */
1439 				    i < vc->vc_npar) {
1440 					i++;
1441 					rgb_background(vc,
1442 						rgb_from_256(vc->vc_par[i]));
1443 				} else if (vc->vc_par[i] == 2 && /* 24 bit */
1444 				           i <= vc->vc_npar + 3) {
1445 					struct rgb c = {
1446 						.r = vc->vc_par[i + 1],
1447 						.g = vc->vc_par[i + 2],
1448 						.b = vc->vc_par[i + 3],
1449 					};
1450 					rgb_background(vc, c);
1451 					i += 3;
1452 				}
1453 				break;
1454 			case 39:
1455 				vc->vc_color = (vc->vc_def_color & 0x0f) | (vc->vc_color & 0xf0);
1456 				break;
1457 			case 49:
1458 				vc->vc_color = (vc->vc_def_color & 0xf0) | (vc->vc_color & 0x0f);
1459 				break;
1460 			default:
1461 				if (vc->vc_par[i] >= 30 && vc->vc_par[i] <= 37)
1462 					vc->vc_color = color_table[vc->vc_par[i] - 30]
1463 						| (vc->vc_color & 0xf0);
1464 				else if (vc->vc_par[i] >= 40 && vc->vc_par[i] <= 47)
1465 					vc->vc_color = (color_table[vc->vc_par[i] - 40] << 4)
1466 						| (vc->vc_color & 0x0f);
1467 				break;
1468 		}
1469 	update_attr(vc);
1470 }
1471 
respond_string(const char * p,struct tty_port * port)1472 static void respond_string(const char *p, struct tty_port *port)
1473 {
1474 	while (*p) {
1475 		tty_insert_flip_char(port, *p, 0);
1476 		p++;
1477 	}
1478 	tty_schedule_flip(port);
1479 }
1480 
cursor_report(struct vc_data * vc,struct tty_struct * tty)1481 static void cursor_report(struct vc_data *vc, struct tty_struct *tty)
1482 {
1483 	char buf[40];
1484 
1485 	sprintf(buf, "\033[%d;%dR", vc->vc_y + (vc->vc_decom ? vc->vc_top + 1 : 1), vc->vc_x + 1);
1486 	respond_string(buf, tty->port);
1487 }
1488 
status_report(struct tty_struct * tty)1489 static inline void status_report(struct tty_struct *tty)
1490 {
1491 	respond_string("\033[0n", tty->port);	/* Terminal ok */
1492 }
1493 
respond_ID(struct tty_struct * tty)1494 static inline void respond_ID(struct tty_struct *tty)
1495 {
1496 	respond_string(VT102ID, tty->port);
1497 }
1498 
mouse_report(struct tty_struct * tty,int butt,int mrx,int mry)1499 void mouse_report(struct tty_struct *tty, int butt, int mrx, int mry)
1500 {
1501 	char buf[8];
1502 
1503 	sprintf(buf, "\033[M%c%c%c", (char)(' ' + butt), (char)('!' + mrx),
1504 		(char)('!' + mry));
1505 	respond_string(buf, tty->port);
1506 }
1507 
1508 /* invoked via ioctl(TIOCLINUX) and through set_selection */
mouse_reporting(void)1509 int mouse_reporting(void)
1510 {
1511 	return vc_cons[fg_console].d->vc_report_mouse;
1512 }
1513 
1514 /* console_lock is held */
set_mode(struct vc_data * vc,int on_off)1515 static void set_mode(struct vc_data *vc, int on_off)
1516 {
1517 	int i;
1518 
1519 	for (i = 0; i <= vc->vc_npar; i++)
1520 		if (vc->vc_ques) {
1521 			switch(vc->vc_par[i]) {	/* DEC private modes set/reset */
1522 			case 1:			/* Cursor keys send ^[Ox/^[[x */
1523 				if (on_off)
1524 					set_kbd(vc, decckm);
1525 				else
1526 					clr_kbd(vc, decckm);
1527 				break;
1528 			case 3:	/* 80/132 mode switch unimplemented */
1529 				vc->vc_deccolm = on_off;
1530 #if 0
1531 				vc_resize(deccolm ? 132 : 80, vc->vc_rows);
1532 				/* this alone does not suffice; some user mode
1533 				   utility has to change the hardware regs */
1534 #endif
1535 				break;
1536 			case 5:			/* Inverted screen on/off */
1537 				if (vc->vc_decscnm != on_off) {
1538 					vc->vc_decscnm = on_off;
1539 					invert_screen(vc, 0, vc->vc_screenbuf_size, 0);
1540 					update_attr(vc);
1541 				}
1542 				break;
1543 			case 6:			/* Origin relative/absolute */
1544 				vc->vc_decom = on_off;
1545 				gotoxay(vc, 0, 0);
1546 				break;
1547 			case 7:			/* Autowrap on/off */
1548 				vc->vc_decawm = on_off;
1549 				break;
1550 			case 8:			/* Autorepeat on/off */
1551 				if (on_off)
1552 					set_kbd(vc, decarm);
1553 				else
1554 					clr_kbd(vc, decarm);
1555 				break;
1556 			case 9:
1557 				vc->vc_report_mouse = on_off ? 1 : 0;
1558 				break;
1559 			case 25:		/* Cursor on/off */
1560 				vc->vc_deccm = on_off;
1561 				break;
1562 			case 1000:
1563 				vc->vc_report_mouse = on_off ? 2 : 0;
1564 				break;
1565 			}
1566 		} else {
1567 			switch(vc->vc_par[i]) {	/* ANSI modes set/reset */
1568 			case 3:			/* Monitor (display ctrls) */
1569 				vc->vc_disp_ctrl = on_off;
1570 				break;
1571 			case 4:			/* Insert Mode on/off */
1572 				vc->vc_decim = on_off;
1573 				break;
1574 			case 20:		/* Lf, Enter == CrLf/Lf */
1575 				if (on_off)
1576 					set_kbd(vc, lnm);
1577 				else
1578 					clr_kbd(vc, lnm);
1579 				break;
1580 			}
1581 		}
1582 }
1583 
1584 /* console_lock is held */
setterm_command(struct vc_data * vc)1585 static void setterm_command(struct vc_data *vc)
1586 {
1587 	switch(vc->vc_par[0]) {
1588 		case 1:	/* set color for underline mode */
1589 			if (vc->vc_can_do_color &&
1590 					vc->vc_par[1] < 16) {
1591 				vc->vc_ulcolor = color_table[vc->vc_par[1]];
1592 				if (vc->vc_underline)
1593 					update_attr(vc);
1594 			}
1595 			break;
1596 		case 2:	/* set color for half intensity mode */
1597 			if (vc->vc_can_do_color &&
1598 					vc->vc_par[1] < 16) {
1599 				vc->vc_halfcolor = color_table[vc->vc_par[1]];
1600 				if (vc->vc_intensity == 0)
1601 					update_attr(vc);
1602 			}
1603 			break;
1604 		case 8:	/* store colors as defaults */
1605 			vc->vc_def_color = vc->vc_attr;
1606 			if (vc->vc_hi_font_mask == 0x100)
1607 				vc->vc_def_color >>= 1;
1608 			default_attr(vc);
1609 			update_attr(vc);
1610 			break;
1611 		case 9:	/* set blanking interval */
1612 			blankinterval = ((vc->vc_par[1] < 60) ? vc->vc_par[1] : 60) * 60;
1613 			poke_blanked_console();
1614 			break;
1615 		case 10: /* set bell frequency in Hz */
1616 			if (vc->vc_npar >= 1)
1617 				vc->vc_bell_pitch = vc->vc_par[1];
1618 			else
1619 				vc->vc_bell_pitch = DEFAULT_BELL_PITCH;
1620 			break;
1621 		case 11: /* set bell duration in msec */
1622 			if (vc->vc_npar >= 1)
1623 				vc->vc_bell_duration = (vc->vc_par[1] < 2000) ?
1624 					msecs_to_jiffies(vc->vc_par[1]) : 0;
1625 			else
1626 				vc->vc_bell_duration = DEFAULT_BELL_DURATION;
1627 			break;
1628 		case 12: /* bring specified console to the front */
1629 			if (vc->vc_par[1] >= 1 && vc_cons_allocated(vc->vc_par[1] - 1))
1630 				set_console(vc->vc_par[1] - 1);
1631 			break;
1632 		case 13: /* unblank the screen */
1633 			poke_blanked_console();
1634 			break;
1635 		case 14: /* set vesa powerdown interval */
1636 			vesa_off_interval = ((vc->vc_par[1] < 60) ? vc->vc_par[1] : 60) * 60 * HZ;
1637 			break;
1638 		case 15: /* activate the previous console */
1639 			set_console(last_console);
1640 			break;
1641 		case 16: /* set cursor blink duration in msec */
1642 			if (vc->vc_npar >= 1 && vc->vc_par[1] >= 50 &&
1643 					vc->vc_par[1] <= USHRT_MAX)
1644 				vc->vc_cur_blink_ms = vc->vc_par[1];
1645 			else
1646 				vc->vc_cur_blink_ms = DEFAULT_CURSOR_BLINK_MS;
1647 			break;
1648 	}
1649 }
1650 
1651 /* console_lock is held */
csi_at(struct vc_data * vc,unsigned int nr)1652 static void csi_at(struct vc_data *vc, unsigned int nr)
1653 {
1654 	if (nr > vc->vc_cols - vc->vc_x)
1655 		nr = vc->vc_cols - vc->vc_x;
1656 	else if (!nr)
1657 		nr = 1;
1658 	insert_char(vc, nr);
1659 }
1660 
1661 /* console_lock is held */
csi_L(struct vc_data * vc,unsigned int nr)1662 static void csi_L(struct vc_data *vc, unsigned int nr)
1663 {
1664 	if (nr > vc->vc_rows - vc->vc_y)
1665 		nr = vc->vc_rows - vc->vc_y;
1666 	else if (!nr)
1667 		nr = 1;
1668 	scrdown(vc, vc->vc_y, vc->vc_bottom, nr);
1669 	vc->vc_need_wrap = 0;
1670 }
1671 
1672 /* console_lock is held */
csi_P(struct vc_data * vc,unsigned int nr)1673 static void csi_P(struct vc_data *vc, unsigned int nr)
1674 {
1675 	if (nr > vc->vc_cols - vc->vc_x)
1676 		nr = vc->vc_cols - vc->vc_x;
1677 	else if (!nr)
1678 		nr = 1;
1679 	delete_char(vc, nr);
1680 }
1681 
1682 /* console_lock is held */
csi_M(struct vc_data * vc,unsigned int nr)1683 static void csi_M(struct vc_data *vc, unsigned int nr)
1684 {
1685 	if (nr > vc->vc_rows - vc->vc_y)
1686 		nr = vc->vc_rows - vc->vc_y;
1687 	else if (!nr)
1688 		nr=1;
1689 	scrup(vc, vc->vc_y, vc->vc_bottom, nr);
1690 	vc->vc_need_wrap = 0;
1691 }
1692 
1693 /* console_lock is held (except via vc_init->reset_terminal */
save_cur(struct vc_data * vc)1694 static void save_cur(struct vc_data *vc)
1695 {
1696 	vc->vc_saved_x		= vc->vc_x;
1697 	vc->vc_saved_y		= vc->vc_y;
1698 	vc->vc_s_intensity	= vc->vc_intensity;
1699 	vc->vc_s_italic         = vc->vc_italic;
1700 	vc->vc_s_underline	= vc->vc_underline;
1701 	vc->vc_s_blink		= vc->vc_blink;
1702 	vc->vc_s_reverse	= vc->vc_reverse;
1703 	vc->vc_s_charset	= vc->vc_charset;
1704 	vc->vc_s_color		= vc->vc_color;
1705 	vc->vc_saved_G0		= vc->vc_G0_charset;
1706 	vc->vc_saved_G1		= vc->vc_G1_charset;
1707 }
1708 
1709 /* console_lock is held */
restore_cur(struct vc_data * vc)1710 static void restore_cur(struct vc_data *vc)
1711 {
1712 	gotoxy(vc, vc->vc_saved_x, vc->vc_saved_y);
1713 	vc->vc_intensity	= vc->vc_s_intensity;
1714 	vc->vc_italic		= vc->vc_s_italic;
1715 	vc->vc_underline	= vc->vc_s_underline;
1716 	vc->vc_blink		= vc->vc_s_blink;
1717 	vc->vc_reverse		= vc->vc_s_reverse;
1718 	vc->vc_charset		= vc->vc_s_charset;
1719 	vc->vc_color		= vc->vc_s_color;
1720 	vc->vc_G0_charset	= vc->vc_saved_G0;
1721 	vc->vc_G1_charset	= vc->vc_saved_G1;
1722 	vc->vc_translate	= set_translate(vc->vc_charset ? vc->vc_G1_charset : vc->vc_G0_charset, vc);
1723 	update_attr(vc);
1724 	vc->vc_need_wrap = 0;
1725 }
1726 
1727 enum { ESnormal, ESesc, ESsquare, ESgetpars, ESfunckey,
1728 	EShash, ESsetG0, ESsetG1, ESpercent, ESignore, ESnonstd,
1729 	ESpalette, ESosc };
1730 
1731 /* console_lock is held (except via vc_init()) */
reset_terminal(struct vc_data * vc,int do_clear)1732 static void reset_terminal(struct vc_data *vc, int do_clear)
1733 {
1734 	vc->vc_top		= 0;
1735 	vc->vc_bottom		= vc->vc_rows;
1736 	vc->vc_state		= ESnormal;
1737 	vc->vc_ques		= 0;
1738 	vc->vc_translate	= set_translate(LAT1_MAP, vc);
1739 	vc->vc_G0_charset	= LAT1_MAP;
1740 	vc->vc_G1_charset	= GRAF_MAP;
1741 	vc->vc_charset		= 0;
1742 	vc->vc_need_wrap	= 0;
1743 	vc->vc_report_mouse	= 0;
1744 	vc->vc_utf              = default_utf8;
1745 	vc->vc_utf_count	= 0;
1746 
1747 	vc->vc_disp_ctrl	= 0;
1748 	vc->vc_toggle_meta	= 0;
1749 
1750 	vc->vc_decscnm		= 0;
1751 	vc->vc_decom		= 0;
1752 	vc->vc_decawm		= 1;
1753 	vc->vc_deccm		= global_cursor_default;
1754 	vc->vc_decim		= 0;
1755 
1756 	vt_reset_keyboard(vc->vc_num);
1757 
1758 	vc->vc_cursor_type = cur_default;
1759 	vc->vc_complement_mask = vc->vc_s_complement_mask;
1760 
1761 	default_attr(vc);
1762 	update_attr(vc);
1763 
1764 	vc->vc_tab_stop[0]	=
1765 	vc->vc_tab_stop[1]	=
1766 	vc->vc_tab_stop[2]	=
1767 	vc->vc_tab_stop[3]	=
1768 	vc->vc_tab_stop[4]	=
1769 	vc->vc_tab_stop[5]	=
1770 	vc->vc_tab_stop[6]	=
1771 	vc->vc_tab_stop[7]	= 0x01010101;
1772 
1773 	vc->vc_bell_pitch = DEFAULT_BELL_PITCH;
1774 	vc->vc_bell_duration = DEFAULT_BELL_DURATION;
1775 	vc->vc_cur_blink_ms = DEFAULT_CURSOR_BLINK_MS;
1776 
1777 	gotoxy(vc, 0, 0);
1778 	save_cur(vc);
1779 	if (do_clear)
1780 	    csi_J(vc, 2);
1781 }
1782 
1783 /* console_lock is held */
do_con_trol(struct tty_struct * tty,struct vc_data * vc,int c)1784 static void do_con_trol(struct tty_struct *tty, struct vc_data *vc, int c)
1785 {
1786 	/*
1787 	 *  Control characters can be used in the _middle_
1788 	 *  of an escape sequence.
1789 	 */
1790 	if (vc->vc_state == ESosc && c>=8 && c<=13) /* ... except for OSC */
1791 		return;
1792 	switch (c) {
1793 	case 0:
1794 		return;
1795 	case 7:
1796 		if (vc->vc_state == ESosc)
1797 			vc->vc_state = ESnormal;
1798 		else if (vc->vc_bell_duration)
1799 			kd_mksound(vc->vc_bell_pitch, vc->vc_bell_duration);
1800 		return;
1801 	case 8:
1802 		bs(vc);
1803 		return;
1804 	case 9:
1805 		vc->vc_pos -= (vc->vc_x << 1);
1806 		while (vc->vc_x < vc->vc_cols - 1) {
1807 			vc->vc_x++;
1808 			if (vc->vc_tab_stop[7 & (vc->vc_x >> 5)] & (1 << (vc->vc_x & 31)))
1809 				break;
1810 		}
1811 		vc->vc_pos += (vc->vc_x << 1);
1812 		notify_write(vc, '\t');
1813 		return;
1814 	case 10: case 11: case 12:
1815 		lf(vc);
1816 		if (!is_kbd(vc, lnm))
1817 			return;
1818 	case 13:
1819 		cr(vc);
1820 		return;
1821 	case 14:
1822 		vc->vc_charset = 1;
1823 		vc->vc_translate = set_translate(vc->vc_G1_charset, vc);
1824 		vc->vc_disp_ctrl = 1;
1825 		return;
1826 	case 15:
1827 		vc->vc_charset = 0;
1828 		vc->vc_translate = set_translate(vc->vc_G0_charset, vc);
1829 		vc->vc_disp_ctrl = 0;
1830 		return;
1831 	case 24: case 26:
1832 		vc->vc_state = ESnormal;
1833 		return;
1834 	case 27:
1835 		vc->vc_state = ESesc;
1836 		return;
1837 	case 127:
1838 		del(vc);
1839 		return;
1840 	case 128+27:
1841 		vc->vc_state = ESsquare;
1842 		return;
1843 	}
1844 	switch(vc->vc_state) {
1845 	case ESesc:
1846 		vc->vc_state = ESnormal;
1847 		switch (c) {
1848 		case '[':
1849 			vc->vc_state = ESsquare;
1850 			return;
1851 		case ']':
1852 			vc->vc_state = ESnonstd;
1853 			return;
1854 		case '%':
1855 			vc->vc_state = ESpercent;
1856 			return;
1857 		case 'E':
1858 			cr(vc);
1859 			lf(vc);
1860 			return;
1861 		case 'M':
1862 			ri(vc);
1863 			return;
1864 		case 'D':
1865 			lf(vc);
1866 			return;
1867 		case 'H':
1868 			vc->vc_tab_stop[7 & (vc->vc_x >> 5)] |= (1 << (vc->vc_x & 31));
1869 			return;
1870 		case 'Z':
1871 			respond_ID(tty);
1872 			return;
1873 		case '7':
1874 			save_cur(vc);
1875 			return;
1876 		case '8':
1877 			restore_cur(vc);
1878 			return;
1879 		case '(':
1880 			vc->vc_state = ESsetG0;
1881 			return;
1882 		case ')':
1883 			vc->vc_state = ESsetG1;
1884 			return;
1885 		case '#':
1886 			vc->vc_state = EShash;
1887 			return;
1888 		case 'c':
1889 			reset_terminal(vc, 1);
1890 			return;
1891 		case '>':  /* Numeric keypad */
1892 			clr_kbd(vc, kbdapplic);
1893 			return;
1894 		case '=':  /* Appl. keypad */
1895 			set_kbd(vc, kbdapplic);
1896 			return;
1897 		}
1898 		return;
1899 	case ESnonstd:
1900 		if (c=='P') {   /* palette escape sequence */
1901 			for (vc->vc_npar = 0; vc->vc_npar < NPAR; vc->vc_npar++)
1902 				vc->vc_par[vc->vc_npar] = 0;
1903 			vc->vc_npar = 0;
1904 			vc->vc_state = ESpalette;
1905 			return;
1906 		} else if (c=='R') {   /* reset palette */
1907 			reset_palette(vc);
1908 			vc->vc_state = ESnormal;
1909 		} else if (c>='0' && c<='9')
1910 			vc->vc_state = ESosc;
1911 		else
1912 			vc->vc_state = ESnormal;
1913 		return;
1914 	case ESpalette:
1915 		if (isxdigit(c)) {
1916 			vc->vc_par[vc->vc_npar++] = hex_to_bin(c);
1917 			if (vc->vc_npar == 7) {
1918 				int i = vc->vc_par[0] * 3, j = 1;
1919 				vc->vc_palette[i] = 16 * vc->vc_par[j++];
1920 				vc->vc_palette[i++] += vc->vc_par[j++];
1921 				vc->vc_palette[i] = 16 * vc->vc_par[j++];
1922 				vc->vc_palette[i++] += vc->vc_par[j++];
1923 				vc->vc_palette[i] = 16 * vc->vc_par[j++];
1924 				vc->vc_palette[i] += vc->vc_par[j];
1925 				set_palette(vc);
1926 				vc->vc_state = ESnormal;
1927 			}
1928 		} else
1929 			vc->vc_state = ESnormal;
1930 		return;
1931 	case ESsquare:
1932 		for (vc->vc_npar = 0; vc->vc_npar < NPAR; vc->vc_npar++)
1933 			vc->vc_par[vc->vc_npar] = 0;
1934 		vc->vc_npar = 0;
1935 		vc->vc_state = ESgetpars;
1936 		if (c == '[') { /* Function key */
1937 			vc->vc_state=ESfunckey;
1938 			return;
1939 		}
1940 		vc->vc_ques = (c == '?');
1941 		if (vc->vc_ques)
1942 			return;
1943 	case ESgetpars:
1944 		if (c == ';' && vc->vc_npar < NPAR - 1) {
1945 			vc->vc_npar++;
1946 			return;
1947 		} else if (c>='0' && c<='9') {
1948 			vc->vc_par[vc->vc_npar] *= 10;
1949 			vc->vc_par[vc->vc_npar] += c - '0';
1950 			return;
1951 		}
1952 		vc->vc_state = ESnormal;
1953 		switch(c) {
1954 		case 'h':
1955 			set_mode(vc, 1);
1956 			return;
1957 		case 'l':
1958 			set_mode(vc, 0);
1959 			return;
1960 		case 'c':
1961 			if (vc->vc_ques) {
1962 				if (vc->vc_par[0])
1963 					vc->vc_cursor_type = vc->vc_par[0] | (vc->vc_par[1] << 8) | (vc->vc_par[2] << 16);
1964 				else
1965 					vc->vc_cursor_type = cur_default;
1966 				return;
1967 			}
1968 			break;
1969 		case 'm':
1970 			if (vc->vc_ques) {
1971 				clear_selection();
1972 				if (vc->vc_par[0])
1973 					vc->vc_complement_mask = vc->vc_par[0] << 8 | vc->vc_par[1];
1974 				else
1975 					vc->vc_complement_mask = vc->vc_s_complement_mask;
1976 				return;
1977 			}
1978 			break;
1979 		case 'n':
1980 			if (!vc->vc_ques) {
1981 				if (vc->vc_par[0] == 5)
1982 					status_report(tty);
1983 				else if (vc->vc_par[0] == 6)
1984 					cursor_report(vc, tty);
1985 			}
1986 			return;
1987 		}
1988 		if (vc->vc_ques) {
1989 			vc->vc_ques = 0;
1990 			return;
1991 		}
1992 		switch(c) {
1993 		case 'G': case '`':
1994 			if (vc->vc_par[0])
1995 				vc->vc_par[0]--;
1996 			gotoxy(vc, vc->vc_par[0], vc->vc_y);
1997 			return;
1998 		case 'A':
1999 			if (!vc->vc_par[0])
2000 				vc->vc_par[0]++;
2001 			gotoxy(vc, vc->vc_x, vc->vc_y - vc->vc_par[0]);
2002 			return;
2003 		case 'B': case 'e':
2004 			if (!vc->vc_par[0])
2005 				vc->vc_par[0]++;
2006 			gotoxy(vc, vc->vc_x, vc->vc_y + vc->vc_par[0]);
2007 			return;
2008 		case 'C': case 'a':
2009 			if (!vc->vc_par[0])
2010 				vc->vc_par[0]++;
2011 			gotoxy(vc, vc->vc_x + vc->vc_par[0], vc->vc_y);
2012 			return;
2013 		case 'D':
2014 			if (!vc->vc_par[0])
2015 				vc->vc_par[0]++;
2016 			gotoxy(vc, vc->vc_x - vc->vc_par[0], vc->vc_y);
2017 			return;
2018 		case 'E':
2019 			if (!vc->vc_par[0])
2020 				vc->vc_par[0]++;
2021 			gotoxy(vc, 0, vc->vc_y + vc->vc_par[0]);
2022 			return;
2023 		case 'F':
2024 			if (!vc->vc_par[0])
2025 				vc->vc_par[0]++;
2026 			gotoxy(vc, 0, vc->vc_y - vc->vc_par[0]);
2027 			return;
2028 		case 'd':
2029 			if (vc->vc_par[0])
2030 				vc->vc_par[0]--;
2031 			gotoxay(vc, vc->vc_x ,vc->vc_par[0]);
2032 			return;
2033 		case 'H': case 'f':
2034 			if (vc->vc_par[0])
2035 				vc->vc_par[0]--;
2036 			if (vc->vc_par[1])
2037 				vc->vc_par[1]--;
2038 			gotoxay(vc, vc->vc_par[1], vc->vc_par[0]);
2039 			return;
2040 		case 'J':
2041 			csi_J(vc, vc->vc_par[0]);
2042 			return;
2043 		case 'K':
2044 			csi_K(vc, vc->vc_par[0]);
2045 			return;
2046 		case 'L':
2047 			csi_L(vc, vc->vc_par[0]);
2048 			return;
2049 		case 'M':
2050 			csi_M(vc, vc->vc_par[0]);
2051 			return;
2052 		case 'P':
2053 			csi_P(vc, vc->vc_par[0]);
2054 			return;
2055 		case 'c':
2056 			if (!vc->vc_par[0])
2057 				respond_ID(tty);
2058 			return;
2059 		case 'g':
2060 			if (!vc->vc_par[0])
2061 				vc->vc_tab_stop[7 & (vc->vc_x >> 5)] &= ~(1 << (vc->vc_x & 31));
2062 			else if (vc->vc_par[0] == 3) {
2063 				vc->vc_tab_stop[0] =
2064 					vc->vc_tab_stop[1] =
2065 					vc->vc_tab_stop[2] =
2066 					vc->vc_tab_stop[3] =
2067 					vc->vc_tab_stop[4] =
2068 					vc->vc_tab_stop[5] =
2069 					vc->vc_tab_stop[6] =
2070 					vc->vc_tab_stop[7] = 0;
2071 			}
2072 			return;
2073 		case 'm':
2074 			csi_m(vc);
2075 			return;
2076 		case 'q': /* DECLL - but only 3 leds */
2077 			/* map 0,1,2,3 to 0,1,2,4 */
2078 			if (vc->vc_par[0] < 4)
2079 				vt_set_led_state(vc->vc_num,
2080 					    (vc->vc_par[0] < 3) ? vc->vc_par[0] : 4);
2081 			return;
2082 		case 'r':
2083 			if (!vc->vc_par[0])
2084 				vc->vc_par[0]++;
2085 			if (!vc->vc_par[1])
2086 				vc->vc_par[1] = vc->vc_rows;
2087 			/* Minimum allowed region is 2 lines */
2088 			if (vc->vc_par[0] < vc->vc_par[1] &&
2089 			    vc->vc_par[1] <= vc->vc_rows) {
2090 				vc->vc_top = vc->vc_par[0] - 1;
2091 				vc->vc_bottom = vc->vc_par[1];
2092 				gotoxay(vc, 0, 0);
2093 			}
2094 			return;
2095 		case 's':
2096 			save_cur(vc);
2097 			return;
2098 		case 'u':
2099 			restore_cur(vc);
2100 			return;
2101 		case 'X':
2102 			csi_X(vc, vc->vc_par[0]);
2103 			return;
2104 		case '@':
2105 			csi_at(vc, vc->vc_par[0]);
2106 			return;
2107 		case ']': /* setterm functions */
2108 			setterm_command(vc);
2109 			return;
2110 		}
2111 		return;
2112 	case ESpercent:
2113 		vc->vc_state = ESnormal;
2114 		switch (c) {
2115 		case '@':  /* defined in ISO 2022 */
2116 			vc->vc_utf = 0;
2117 			return;
2118 		case 'G':  /* prelim official escape code */
2119 		case '8':  /* retained for compatibility */
2120 			vc->vc_utf = 1;
2121 			return;
2122 		}
2123 		return;
2124 	case ESfunckey:
2125 		vc->vc_state = ESnormal;
2126 		return;
2127 	case EShash:
2128 		vc->vc_state = ESnormal;
2129 		if (c == '8') {
2130 			/* DEC screen alignment test. kludge :-) */
2131 			vc->vc_video_erase_char =
2132 				(vc->vc_video_erase_char & 0xff00) | 'E';
2133 			csi_J(vc, 2);
2134 			vc->vc_video_erase_char =
2135 				(vc->vc_video_erase_char & 0xff00) | ' ';
2136 			do_update_region(vc, vc->vc_origin, vc->vc_screenbuf_size / 2);
2137 		}
2138 		return;
2139 	case ESsetG0:
2140 		if (c == '0')
2141 			vc->vc_G0_charset = GRAF_MAP;
2142 		else if (c == 'B')
2143 			vc->vc_G0_charset = LAT1_MAP;
2144 		else if (c == 'U')
2145 			vc->vc_G0_charset = IBMPC_MAP;
2146 		else if (c == 'K')
2147 			vc->vc_G0_charset = USER_MAP;
2148 		if (vc->vc_charset == 0)
2149 			vc->vc_translate = set_translate(vc->vc_G0_charset, vc);
2150 		vc->vc_state = ESnormal;
2151 		return;
2152 	case ESsetG1:
2153 		if (c == '0')
2154 			vc->vc_G1_charset = GRAF_MAP;
2155 		else if (c == 'B')
2156 			vc->vc_G1_charset = LAT1_MAP;
2157 		else if (c == 'U')
2158 			vc->vc_G1_charset = IBMPC_MAP;
2159 		else if (c == 'K')
2160 			vc->vc_G1_charset = USER_MAP;
2161 		if (vc->vc_charset == 1)
2162 			vc->vc_translate = set_translate(vc->vc_G1_charset, vc);
2163 		vc->vc_state = ESnormal;
2164 		return;
2165 	case ESosc:
2166 		return;
2167 	default:
2168 		vc->vc_state = ESnormal;
2169 	}
2170 }
2171 
2172 /* is_double_width() is based on the wcwidth() implementation by
2173  * Markus Kuhn -- 2007-05-26 (Unicode 5.0)
2174  * Latest version: http://www.cl.cam.ac.uk/~mgk25/ucs/wcwidth.c
2175  */
2176 struct interval {
2177 	uint32_t first;
2178 	uint32_t last;
2179 };
2180 
bisearch(uint32_t ucs,const struct interval * table,int max)2181 static int bisearch(uint32_t ucs, const struct interval *table, int max)
2182 {
2183 	int min = 0;
2184 	int mid;
2185 
2186 	if (ucs < table[0].first || ucs > table[max].last)
2187 		return 0;
2188 	while (max >= min) {
2189 		mid = (min + max) / 2;
2190 		if (ucs > table[mid].last)
2191 			min = mid + 1;
2192 		else if (ucs < table[mid].first)
2193 			max = mid - 1;
2194 		else
2195 			return 1;
2196 	}
2197 	return 0;
2198 }
2199 
is_double_width(uint32_t ucs)2200 static int is_double_width(uint32_t ucs)
2201 {
2202 	static const struct interval double_width[] = {
2203 		{ 0x1100, 0x115F }, { 0x2329, 0x232A }, { 0x2E80, 0x303E },
2204 		{ 0x3040, 0xA4CF }, { 0xAC00, 0xD7A3 }, { 0xF900, 0xFAFF },
2205 		{ 0xFE10, 0xFE19 }, { 0xFE30, 0xFE6F }, { 0xFF00, 0xFF60 },
2206 		{ 0xFFE0, 0xFFE6 }, { 0x20000, 0x2FFFD }, { 0x30000, 0x3FFFD }
2207 	};
2208 	return bisearch(ucs, double_width, ARRAY_SIZE(double_width) - 1);
2209 }
2210 
2211 /* acquires console_lock */
do_con_write(struct tty_struct * tty,const unsigned char * buf,int count)2212 static int do_con_write(struct tty_struct *tty, const unsigned char *buf, int count)
2213 {
2214 #ifdef VT_BUF_VRAM_ONLY
2215 #define FLUSH do { } while(0);
2216 #else
2217 #define FLUSH if (draw_x >= 0) { \
2218 	vc->vc_sw->con_putcs(vc, (u16 *)draw_from, (u16 *)draw_to - (u16 *)draw_from, vc->vc_y, draw_x); \
2219 	draw_x = -1; \
2220 	}
2221 #endif
2222 
2223 	int c, tc, ok, n = 0, draw_x = -1;
2224 	unsigned int currcons;
2225 	unsigned long draw_from = 0, draw_to = 0;
2226 	struct vc_data *vc;
2227 	unsigned char vc_attr;
2228 	struct vt_notifier_param param;
2229 	uint8_t rescan;
2230 	uint8_t inverse;
2231 	uint8_t width;
2232 	u16 himask, charmask;
2233 
2234 	if (in_interrupt())
2235 		return count;
2236 
2237 	might_sleep();
2238 
2239 	console_lock();
2240 	vc = tty->driver_data;
2241 	if (vc == NULL) {
2242 		printk(KERN_ERR "vt: argh, driver_data is NULL !\n");
2243 		console_unlock();
2244 		return 0;
2245 	}
2246 
2247 	currcons = vc->vc_num;
2248 	if (!vc_cons_allocated(currcons)) {
2249 		/* could this happen? */
2250 		pr_warn_once("con_write: tty %d not allocated\n", currcons+1);
2251 		console_unlock();
2252 		return 0;
2253 	}
2254 
2255 	himask = vc->vc_hi_font_mask;
2256 	charmask = himask ? 0x1ff : 0xff;
2257 
2258 	/* undraw cursor first */
2259 	if (IS_FG(vc))
2260 		hide_cursor(vc);
2261 
2262 	param.vc = vc;
2263 
2264 	while (!tty->stopped && count) {
2265 		int orig = *buf;
2266 		c = orig;
2267 		buf++;
2268 		n++;
2269 		count--;
2270 		rescan = 0;
2271 		inverse = 0;
2272 		width = 1;
2273 
2274 		/* Do no translation at all in control states */
2275 		if (vc->vc_state != ESnormal) {
2276 			tc = c;
2277 		} else if (vc->vc_utf && !vc->vc_disp_ctrl) {
2278 		    /* Combine UTF-8 into Unicode in vc_utf_char.
2279 		     * vc_utf_count is the number of continuation bytes still
2280 		     * expected to arrive.
2281 		     * vc_npar is the number of continuation bytes arrived so
2282 		     * far
2283 		     */
2284 rescan_last_byte:
2285 		    if ((c & 0xc0) == 0x80) {
2286 			/* Continuation byte received */
2287 			static const uint32_t utf8_length_changes[] = { 0x0000007f, 0x000007ff, 0x0000ffff, 0x001fffff, 0x03ffffff, 0x7fffffff };
2288 			if (vc->vc_utf_count) {
2289 			    vc->vc_utf_char = (vc->vc_utf_char << 6) | (c & 0x3f);
2290 			    vc->vc_npar++;
2291 			    if (--vc->vc_utf_count) {
2292 				/* Still need some bytes */
2293 				continue;
2294 			    }
2295 			    /* Got a whole character */
2296 			    c = vc->vc_utf_char;
2297 			    /* Reject overlong sequences */
2298 			    if (c <= utf8_length_changes[vc->vc_npar - 1] ||
2299 					c > utf8_length_changes[vc->vc_npar])
2300 				c = 0xfffd;
2301 			} else {
2302 			    /* Unexpected continuation byte */
2303 			    vc->vc_utf_count = 0;
2304 			    c = 0xfffd;
2305 			}
2306 		    } else {
2307 			/* Single ASCII byte or first byte of a sequence received */
2308 			if (vc->vc_utf_count) {
2309 			    /* Continuation byte expected */
2310 			    rescan = 1;
2311 			    vc->vc_utf_count = 0;
2312 			    c = 0xfffd;
2313 			} else if (c > 0x7f) {
2314 			    /* First byte of a multibyte sequence received */
2315 			    vc->vc_npar = 0;
2316 			    if ((c & 0xe0) == 0xc0) {
2317 				vc->vc_utf_count = 1;
2318 				vc->vc_utf_char = (c & 0x1f);
2319 			    } else if ((c & 0xf0) == 0xe0) {
2320 				vc->vc_utf_count = 2;
2321 				vc->vc_utf_char = (c & 0x0f);
2322 			    } else if ((c & 0xf8) == 0xf0) {
2323 				vc->vc_utf_count = 3;
2324 				vc->vc_utf_char = (c & 0x07);
2325 			    } else if ((c & 0xfc) == 0xf8) {
2326 				vc->vc_utf_count = 4;
2327 				vc->vc_utf_char = (c & 0x03);
2328 			    } else if ((c & 0xfe) == 0xfc) {
2329 				vc->vc_utf_count = 5;
2330 				vc->vc_utf_char = (c & 0x01);
2331 			    } else {
2332 				/* 254 and 255 are invalid */
2333 				c = 0xfffd;
2334 			    }
2335 			    if (vc->vc_utf_count) {
2336 				/* Still need some bytes */
2337 				continue;
2338 			    }
2339 			}
2340 			/* Nothing to do if an ASCII byte was received */
2341 		    }
2342 		    /* End of UTF-8 decoding. */
2343 		    /* c is the received character, or U+FFFD for invalid sequences. */
2344 		    /* Replace invalid Unicode code points with U+FFFD too */
2345 		    if ((c >= 0xd800 && c <= 0xdfff) || c == 0xfffe || c == 0xffff)
2346 			c = 0xfffd;
2347 		    tc = c;
2348 		} else {	/* no utf or alternate charset mode */
2349 		    tc = vc_translate(vc, c);
2350 		}
2351 
2352 		param.c = tc;
2353 		if (atomic_notifier_call_chain(&vt_notifier_list, VT_PREWRITE,
2354 					&param) == NOTIFY_STOP)
2355 			continue;
2356 
2357                 /* If the original code was a control character we
2358                  * only allow a glyph to be displayed if the code is
2359                  * not normally used (such as for cursor movement) or
2360                  * if the disp_ctrl mode has been explicitly enabled.
2361                  * Certain characters (as given by the CTRL_ALWAYS
2362                  * bitmap) are always displayed as control characters,
2363                  * as the console would be pretty useless without
2364                  * them; to display an arbitrary font position use the
2365                  * direct-to-font zone in UTF-8 mode.
2366                  */
2367                 ok = tc && (c >= 32 ||
2368 			    !(vc->vc_disp_ctrl ? (CTRL_ALWAYS >> c) & 1 :
2369 				  vc->vc_utf || ((CTRL_ACTION >> c) & 1)))
2370 			&& (c != 127 || vc->vc_disp_ctrl)
2371 			&& (c != 128+27);
2372 
2373 		if (vc->vc_state == ESnormal && ok) {
2374 			if (vc->vc_utf && !vc->vc_disp_ctrl) {
2375 				if (is_double_width(c))
2376 					width = 2;
2377 			}
2378 			/* Now try to find out how to display it */
2379 			tc = conv_uni_to_pc(vc, tc);
2380 			if (tc & ~charmask) {
2381 				if (tc == -1 || tc == -2) {
2382 				    continue; /* nothing to display */
2383 				}
2384 				/* Glyph not found */
2385 				if ((!(vc->vc_utf && !vc->vc_disp_ctrl) || c < 128) && !(c & ~charmask)) {
2386 				    /* In legacy mode use the glyph we get by a 1:1 mapping.
2387 				       This would make absolutely no sense with Unicode in mind,
2388 				       but do this for ASCII characters since a font may lack
2389 				       Unicode mapping info and we don't want to end up with
2390 				       having question marks only. */
2391 				    tc = c;
2392 				} else {
2393 				    /* Display U+FFFD. If it's not found, display an inverse question mark. */
2394 				    tc = conv_uni_to_pc(vc, 0xfffd);
2395 				    if (tc < 0) {
2396 					inverse = 1;
2397 					tc = conv_uni_to_pc(vc, '?');
2398 					if (tc < 0) tc = '?';
2399 				    }
2400 				}
2401 			}
2402 
2403 			if (!inverse) {
2404 				vc_attr = vc->vc_attr;
2405 			} else {
2406 				/* invert vc_attr */
2407 				if (!vc->vc_can_do_color) {
2408 					vc_attr = (vc->vc_attr) ^ 0x08;
2409 				} else if (vc->vc_hi_font_mask == 0x100) {
2410 					vc_attr = ((vc->vc_attr) & 0x11) | (((vc->vc_attr) & 0xe0) >> 4) | (((vc->vc_attr) & 0x0e) << 4);
2411 				} else {
2412 					vc_attr = ((vc->vc_attr) & 0x88) | (((vc->vc_attr) & 0x70) >> 4) | (((vc->vc_attr) & 0x07) << 4);
2413 				}
2414 				FLUSH
2415 			}
2416 
2417 			while (1) {
2418 				if (vc->vc_need_wrap || vc->vc_decim)
2419 					FLUSH
2420 				if (vc->vc_need_wrap) {
2421 					cr(vc);
2422 					lf(vc);
2423 				}
2424 				if (vc->vc_decim)
2425 					insert_char(vc, 1);
2426 				scr_writew(himask ?
2427 					     ((vc_attr << 8) & ~himask) + ((tc & 0x100) ? himask : 0) + (tc & 0xff) :
2428 					     (vc_attr << 8) + tc,
2429 					   (u16 *) vc->vc_pos);
2430 				if (DO_UPDATE(vc) && draw_x < 0) {
2431 					draw_x = vc->vc_x;
2432 					draw_from = vc->vc_pos;
2433 				}
2434 				if (vc->vc_x == vc->vc_cols - 1) {
2435 					vc->vc_need_wrap = vc->vc_decawm;
2436 					draw_to = vc->vc_pos + 2;
2437 				} else {
2438 					vc->vc_x++;
2439 					draw_to = (vc->vc_pos += 2);
2440 				}
2441 
2442 				if (!--width) break;
2443 
2444 				tc = conv_uni_to_pc(vc, ' '); /* A space is printed in the second column */
2445 				if (tc < 0) tc = ' ';
2446 			}
2447 			notify_write(vc, c);
2448 
2449 			if (inverse) {
2450 				FLUSH
2451 			}
2452 
2453 			if (rescan) {
2454 				rescan = 0;
2455 				inverse = 0;
2456 				width = 1;
2457 				c = orig;
2458 				goto rescan_last_byte;
2459 			}
2460 			continue;
2461 		}
2462 		FLUSH
2463 		do_con_trol(tty, vc, orig);
2464 	}
2465 	FLUSH
2466 	console_conditional_schedule();
2467 	console_unlock();
2468 	notify_update(vc);
2469 	return n;
2470 #undef FLUSH
2471 }
2472 
2473 /*
2474  * This is the console switching callback.
2475  *
2476  * Doing console switching in a process context allows
2477  * us to do the switches asynchronously (needed when we want
2478  * to switch due to a keyboard interrupt).  Synchronization
2479  * with other console code and prevention of re-entrancy is
2480  * ensured with console_lock.
2481  */
console_callback(struct work_struct * ignored)2482 static void console_callback(struct work_struct *ignored)
2483 {
2484 	console_lock();
2485 
2486 	if (want_console >= 0) {
2487 		if (want_console != fg_console &&
2488 		    vc_cons_allocated(want_console)) {
2489 			hide_cursor(vc_cons[fg_console].d);
2490 			change_console(vc_cons[want_console].d);
2491 			/* we only changed when the console had already
2492 			   been allocated - a new console is not created
2493 			   in an interrupt routine */
2494 		}
2495 		want_console = -1;
2496 	}
2497 	if (do_poke_blanked_console) { /* do not unblank for a LED change */
2498 		do_poke_blanked_console = 0;
2499 		poke_blanked_console();
2500 	}
2501 	if (scrollback_delta) {
2502 		struct vc_data *vc = vc_cons[fg_console].d;
2503 		clear_selection();
2504 		if (vc->vc_mode == KD_TEXT && vc->vc_sw->con_scrolldelta)
2505 			vc->vc_sw->con_scrolldelta(vc, scrollback_delta);
2506 		scrollback_delta = 0;
2507 	}
2508 	if (blank_timer_expired) {
2509 		do_blank_screen(0);
2510 		blank_timer_expired = 0;
2511 	}
2512 	notify_update(vc_cons[fg_console].d);
2513 
2514 	console_unlock();
2515 }
2516 
set_console(int nr)2517 int set_console(int nr)
2518 {
2519 	struct vc_data *vc = vc_cons[fg_console].d;
2520 
2521 	if (!vc_cons_allocated(nr) || vt_dont_switch ||
2522 		(vc->vt_mode.mode == VT_AUTO && vc->vc_mode == KD_GRAPHICS)) {
2523 
2524 		/*
2525 		 * Console switch will fail in console_callback() or
2526 		 * change_console() so there is no point scheduling
2527 		 * the callback
2528 		 *
2529 		 * Existing set_console() users don't check the return
2530 		 * value so this shouldn't break anything
2531 		 */
2532 		return -EINVAL;
2533 	}
2534 
2535 	want_console = nr;
2536 	schedule_console_callback();
2537 
2538 	return 0;
2539 }
2540 
2541 struct tty_driver *console_driver;
2542 
2543 #ifdef CONFIG_VT_CONSOLE
2544 
2545 /**
2546  * vt_kmsg_redirect() - Sets/gets the kernel message console
2547  * @new:	The new virtual terminal number or -1 if the console should stay
2548  * 		unchanged
2549  *
2550  * By default, the kernel messages are always printed on the current virtual
2551  * console. However, the user may modify that default with the
2552  * TIOCL_SETKMSGREDIRECT ioctl call.
2553  *
2554  * This function sets the kernel message console to be @new. It returns the old
2555  * virtual console number. The virtual terminal number 0 (both as parameter and
2556  * return value) means no redirection (i.e. always printed on the currently
2557  * active console).
2558  *
2559  * The parameter -1 means that only the current console is returned, but the
2560  * value is not modified. You may use the macro vt_get_kmsg_redirect() in that
2561  * case to make the code more understandable.
2562  *
2563  * When the kernel is compiled without CONFIG_VT_CONSOLE, this function ignores
2564  * the parameter and always returns 0.
2565  */
vt_kmsg_redirect(int new)2566 int vt_kmsg_redirect(int new)
2567 {
2568 	static int kmsg_con;
2569 
2570 	if (new != -1)
2571 		return xchg(&kmsg_con, new);
2572 	else
2573 		return kmsg_con;
2574 }
2575 
2576 /*
2577  *	Console on virtual terminal
2578  *
2579  * The console must be locked when we get here.
2580  */
2581 
vt_console_print(struct console * co,const char * b,unsigned count)2582 static void vt_console_print(struct console *co, const char *b, unsigned count)
2583 {
2584 	struct vc_data *vc = vc_cons[fg_console].d;
2585 	unsigned char c;
2586 	static DEFINE_SPINLOCK(printing_lock);
2587 	const ushort *start;
2588 	ushort cnt = 0;
2589 	ushort myx;
2590 	int kmsg_console;
2591 
2592 	/* console busy or not yet initialized */
2593 	if (!printable)
2594 		return;
2595 	if (!spin_trylock(&printing_lock))
2596 		return;
2597 
2598 	kmsg_console = vt_get_kmsg_redirect();
2599 	if (kmsg_console && vc_cons_allocated(kmsg_console - 1))
2600 		vc = vc_cons[kmsg_console - 1].d;
2601 
2602 	/* read `x' only after setting currcons properly (otherwise
2603 	   the `x' macro will read the x of the foreground console). */
2604 	myx = vc->vc_x;
2605 
2606 	if (!vc_cons_allocated(fg_console)) {
2607 		/* impossible */
2608 		/* printk("vt_console_print: tty %d not allocated ??\n", currcons+1); */
2609 		goto quit;
2610 	}
2611 
2612 	if (vc->vc_mode != KD_TEXT && !vt_force_oops_output(vc))
2613 		goto quit;
2614 
2615 	/* undraw cursor first */
2616 	if (IS_FG(vc))
2617 		hide_cursor(vc);
2618 
2619 	start = (ushort *)vc->vc_pos;
2620 
2621 	/* Contrived structure to try to emulate original need_wrap behaviour
2622 	 * Problems caused when we have need_wrap set on '\n' character */
2623 	while (count--) {
2624 		c = *b++;
2625 		if (c == 10 || c == 13 || c == 8 || vc->vc_need_wrap) {
2626 			if (cnt > 0) {
2627 				if (CON_IS_VISIBLE(vc))
2628 					vc->vc_sw->con_putcs(vc, start, cnt, vc->vc_y, vc->vc_x);
2629 				vc->vc_x += cnt;
2630 				if (vc->vc_need_wrap)
2631 					vc->vc_x--;
2632 				cnt = 0;
2633 			}
2634 			if (c == 8) {		/* backspace */
2635 				bs(vc);
2636 				start = (ushort *)vc->vc_pos;
2637 				myx = vc->vc_x;
2638 				continue;
2639 			}
2640 			if (c != 13)
2641 				lf(vc);
2642 			cr(vc);
2643 			start = (ushort *)vc->vc_pos;
2644 			myx = vc->vc_x;
2645 			if (c == 10 || c == 13)
2646 				continue;
2647 		}
2648 		scr_writew((vc->vc_attr << 8) + c, (unsigned short *)vc->vc_pos);
2649 		notify_write(vc, c);
2650 		cnt++;
2651 		if (myx == vc->vc_cols - 1) {
2652 			vc->vc_need_wrap = 1;
2653 			continue;
2654 		}
2655 		vc->vc_pos += 2;
2656 		myx++;
2657 	}
2658 	if (cnt > 0) {
2659 		if (CON_IS_VISIBLE(vc))
2660 			vc->vc_sw->con_putcs(vc, start, cnt, vc->vc_y, vc->vc_x);
2661 		vc->vc_x += cnt;
2662 		if (vc->vc_x == vc->vc_cols) {
2663 			vc->vc_x--;
2664 			vc->vc_need_wrap = 1;
2665 		}
2666 	}
2667 	set_cursor(vc);
2668 	notify_update(vc);
2669 
2670 quit:
2671 	spin_unlock(&printing_lock);
2672 }
2673 
vt_console_device(struct console * c,int * index)2674 static struct tty_driver *vt_console_device(struct console *c, int *index)
2675 {
2676 	*index = c->index ? c->index-1 : fg_console;
2677 	return console_driver;
2678 }
2679 
2680 static struct console vt_console_driver = {
2681 	.name		= "tty",
2682 	.write		= vt_console_print,
2683 	.device		= vt_console_device,
2684 	.unblank	= unblank_screen,
2685 	.flags		= CON_PRINTBUFFER,
2686 	.index		= -1,
2687 };
2688 #endif
2689 
2690 /*
2691  *	Handling of Linux-specific VC ioctls
2692  */
2693 
2694 /*
2695  * Generally a bit racy with respect to console_lock();.
2696  *
2697  * There are some functions which don't need it.
2698  *
2699  * There are some functions which can sleep for arbitrary periods
2700  * (paste_selection) but we don't need the lock there anyway.
2701  *
2702  * set_selection has locking, and definitely needs it
2703  */
2704 
tioclinux(struct tty_struct * tty,unsigned long arg)2705 int tioclinux(struct tty_struct *tty, unsigned long arg)
2706 {
2707 	char type, data;
2708 	char __user *p = (char __user *)arg;
2709 	int lines;
2710 	int ret;
2711 
2712 	if (current->signal->tty != tty && !capable(CAP_SYS_ADMIN))
2713 		return -EPERM;
2714 	if (get_user(type, p))
2715 		return -EFAULT;
2716 	ret = 0;
2717 
2718 	switch (type)
2719 	{
2720 		case TIOCL_SETSEL:
2721 			ret = set_selection((struct tiocl_selection __user *)(p+1), tty);
2722 			break;
2723 		case TIOCL_PASTESEL:
2724 			ret = paste_selection(tty);
2725 			break;
2726 		case TIOCL_UNBLANKSCREEN:
2727 			console_lock();
2728 			unblank_screen();
2729 			console_unlock();
2730 			break;
2731 		case TIOCL_SELLOADLUT:
2732 			console_lock();
2733 			ret = sel_loadlut(p);
2734 			console_unlock();
2735 			break;
2736 		case TIOCL_GETSHIFTSTATE:
2737 
2738 	/*
2739 	 * Make it possible to react to Shift+Mousebutton.
2740 	 * Note that 'shift_state' is an undocumented
2741 	 * kernel-internal variable; programs not closely
2742 	 * related to the kernel should not use this.
2743 	 */
2744 			data = vt_get_shift_state();
2745 			ret = put_user(data, p);
2746 			break;
2747 		case TIOCL_GETMOUSEREPORTING:
2748 			console_lock();	/* May be overkill */
2749 			data = mouse_reporting();
2750 			console_unlock();
2751 			ret = put_user(data, p);
2752 			break;
2753 		case TIOCL_SETVESABLANK:
2754 			console_lock();
2755 			ret = set_vesa_blanking(p);
2756 			console_unlock();
2757 			break;
2758 		case TIOCL_GETKMSGREDIRECT:
2759 			data = vt_get_kmsg_redirect();
2760 			ret = put_user(data, p);
2761 			break;
2762 		case TIOCL_SETKMSGREDIRECT:
2763 			if (!capable(CAP_SYS_ADMIN)) {
2764 				ret = -EPERM;
2765 			} else {
2766 				if (get_user(data, p+1))
2767 					ret = -EFAULT;
2768 				else
2769 					vt_kmsg_redirect(data);
2770 			}
2771 			break;
2772 		case TIOCL_GETFGCONSOLE:
2773 			/* No locking needed as this is a transiently
2774 			   correct return anyway if the caller hasn't
2775 			   disabled switching */
2776 			ret = fg_console;
2777 			break;
2778 		case TIOCL_SCROLLCONSOLE:
2779 			if (get_user(lines, (s32 __user *)(p+4))) {
2780 				ret = -EFAULT;
2781 			} else {
2782 				/* Need the console lock here. Note that lots
2783 				   of other calls need fixing before the lock
2784 				   is actually useful ! */
2785 				console_lock();
2786 				scrollfront(vc_cons[fg_console].d, lines);
2787 				console_unlock();
2788 				ret = 0;
2789 			}
2790 			break;
2791 		case TIOCL_BLANKSCREEN:	/* until explicitly unblanked, not only poked */
2792 			console_lock();
2793 			ignore_poke = 1;
2794 			do_blank_screen(0);
2795 			console_unlock();
2796 			break;
2797 		case TIOCL_BLANKEDSCREEN:
2798 			ret = console_blanked;
2799 			break;
2800 		default:
2801 			ret = -EINVAL;
2802 			break;
2803 	}
2804 	return ret;
2805 }
2806 
2807 /*
2808  * /dev/ttyN handling
2809  */
2810 
con_write(struct tty_struct * tty,const unsigned char * buf,int count)2811 static int con_write(struct tty_struct *tty, const unsigned char *buf, int count)
2812 {
2813 	int	retval;
2814 
2815 	retval = do_con_write(tty, buf, count);
2816 	con_flush_chars(tty);
2817 
2818 	return retval;
2819 }
2820 
con_put_char(struct tty_struct * tty,unsigned char ch)2821 static int con_put_char(struct tty_struct *tty, unsigned char ch)
2822 {
2823 	if (in_interrupt())
2824 		return 0;	/* n_r3964 calls put_char() from interrupt context */
2825 	return do_con_write(tty, &ch, 1);
2826 }
2827 
con_write_room(struct tty_struct * tty)2828 static int con_write_room(struct tty_struct *tty)
2829 {
2830 	if (tty->stopped)
2831 		return 0;
2832 	return 32768;		/* No limit, really; we're not buffering */
2833 }
2834 
con_chars_in_buffer(struct tty_struct * tty)2835 static int con_chars_in_buffer(struct tty_struct *tty)
2836 {
2837 	return 0;		/* we're not buffering */
2838 }
2839 
2840 /*
2841  * con_throttle and con_unthrottle are only used for
2842  * paste_selection(), which has to stuff in a large number of
2843  * characters...
2844  */
con_throttle(struct tty_struct * tty)2845 static void con_throttle(struct tty_struct *tty)
2846 {
2847 }
2848 
con_unthrottle(struct tty_struct * tty)2849 static void con_unthrottle(struct tty_struct *tty)
2850 {
2851 	struct vc_data *vc = tty->driver_data;
2852 
2853 	wake_up_interruptible(&vc->paste_wait);
2854 }
2855 
2856 /*
2857  * Turn the Scroll-Lock LED on when the tty is stopped
2858  */
con_stop(struct tty_struct * tty)2859 static void con_stop(struct tty_struct *tty)
2860 {
2861 	int console_num;
2862 	if (!tty)
2863 		return;
2864 	console_num = tty->index;
2865 	if (!vc_cons_allocated(console_num))
2866 		return;
2867 	vt_kbd_con_stop(console_num);
2868 }
2869 
2870 /*
2871  * Turn the Scroll-Lock LED off when the console is started
2872  */
con_start(struct tty_struct * tty)2873 static void con_start(struct tty_struct *tty)
2874 {
2875 	int console_num;
2876 	if (!tty)
2877 		return;
2878 	console_num = tty->index;
2879 	if (!vc_cons_allocated(console_num))
2880 		return;
2881 	vt_kbd_con_start(console_num);
2882 }
2883 
con_flush_chars(struct tty_struct * tty)2884 static void con_flush_chars(struct tty_struct *tty)
2885 {
2886 	struct vc_data *vc;
2887 
2888 	if (in_interrupt())	/* from flush_to_ldisc */
2889 		return;
2890 
2891 	/* if we race with con_close(), vt may be null */
2892 	console_lock();
2893 	vc = tty->driver_data;
2894 	if (vc)
2895 		set_cursor(vc);
2896 	console_unlock();
2897 }
2898 
2899 /*
2900  * Allocate the console screen memory.
2901  */
con_install(struct tty_driver * driver,struct tty_struct * tty)2902 static int con_install(struct tty_driver *driver, struct tty_struct *tty)
2903 {
2904 	unsigned int currcons = tty->index;
2905 	struct vc_data *vc;
2906 	int ret;
2907 
2908 	console_lock();
2909 	ret = vc_allocate(currcons);
2910 	if (ret)
2911 		goto unlock;
2912 
2913 	vc = vc_cons[currcons].d;
2914 
2915 	/* Still being freed */
2916 	if (vc->port.tty) {
2917 		ret = -ERESTARTSYS;
2918 		goto unlock;
2919 	}
2920 
2921 	ret = tty_port_install(&vc->port, driver, tty);
2922 	if (ret)
2923 		goto unlock;
2924 
2925 	tty->driver_data = vc;
2926 	vc->port.tty = tty;
2927 	tty_port_get(&vc->port);
2928 
2929 	if (!tty->winsize.ws_row && !tty->winsize.ws_col) {
2930 		tty->winsize.ws_row = vc_cons[currcons].d->vc_rows;
2931 		tty->winsize.ws_col = vc_cons[currcons].d->vc_cols;
2932 	}
2933 	if (vc->vc_utf)
2934 		tty->termios.c_iflag |= IUTF8;
2935 	else
2936 		tty->termios.c_iflag &= ~IUTF8;
2937 unlock:
2938 	console_unlock();
2939 	return ret;
2940 }
2941 
con_open(struct tty_struct * tty,struct file * filp)2942 static int con_open(struct tty_struct *tty, struct file *filp)
2943 {
2944 	/* everything done in install */
2945 	return 0;
2946 }
2947 
2948 
con_close(struct tty_struct * tty,struct file * filp)2949 static void con_close(struct tty_struct *tty, struct file *filp)
2950 {
2951 	/* Nothing to do - we defer to shutdown */
2952 }
2953 
con_shutdown(struct tty_struct * tty)2954 static void con_shutdown(struct tty_struct *tty)
2955 {
2956 	struct vc_data *vc = tty->driver_data;
2957 	BUG_ON(vc == NULL);
2958 	console_lock();
2959 	vc->port.tty = NULL;
2960 	console_unlock();
2961 }
2962 
con_cleanup(struct tty_struct * tty)2963 static void con_cleanup(struct tty_struct *tty)
2964 {
2965 	struct vc_data *vc = tty->driver_data;
2966 
2967 	tty_port_put(&vc->port);
2968 }
2969 
2970 static int default_color           = 7; /* white */
2971 static int default_italic_color    = 2; // green (ASCII)
2972 static int default_underline_color = 3; // cyan (ASCII)
2973 module_param_named(color, default_color, int, S_IRUGO | S_IWUSR);
2974 module_param_named(italic, default_italic_color, int, S_IRUGO | S_IWUSR);
2975 module_param_named(underline, default_underline_color, int, S_IRUGO | S_IWUSR);
2976 
vc_init(struct vc_data * vc,unsigned int rows,unsigned int cols,int do_clear)2977 static void vc_init(struct vc_data *vc, unsigned int rows,
2978 		    unsigned int cols, int do_clear)
2979 {
2980 	int j, k ;
2981 
2982 	vc->vc_cols = cols;
2983 	vc->vc_rows = rows;
2984 	vc->vc_size_row = cols << 1;
2985 	vc->vc_screenbuf_size = vc->vc_rows * vc->vc_size_row;
2986 
2987 	set_origin(vc);
2988 	vc->vc_pos = vc->vc_origin;
2989 	reset_vc(vc);
2990 	for (j=k=0; j<16; j++) {
2991 		vc->vc_palette[k++] = default_red[j] ;
2992 		vc->vc_palette[k++] = default_grn[j] ;
2993 		vc->vc_palette[k++] = default_blu[j] ;
2994 	}
2995 	vc->vc_def_color       = default_color;
2996 	vc->vc_ulcolor         = default_underline_color;
2997 	vc->vc_itcolor         = default_italic_color;
2998 	vc->vc_halfcolor       = 0x08;   /* grey */
2999 	init_waitqueue_head(&vc->paste_wait);
3000 	reset_terminal(vc, do_clear);
3001 }
3002 
3003 /*
3004  * This routine initializes console interrupts, and does nothing
3005  * else. If you want the screen to clear, call tty_write with
3006  * the appropriate escape-sequence.
3007  */
3008 
con_init(void)3009 static int __init con_init(void)
3010 {
3011 	const char *display_desc = NULL;
3012 	struct vc_data *vc;
3013 	unsigned int currcons = 0, i;
3014 
3015 	console_lock();
3016 
3017 	if (conswitchp)
3018 		display_desc = conswitchp->con_startup();
3019 	if (!display_desc) {
3020 		fg_console = 0;
3021 		console_unlock();
3022 		return 0;
3023 	}
3024 
3025 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3026 		struct con_driver *con_driver = &registered_con_driver[i];
3027 
3028 		if (con_driver->con == NULL) {
3029 			con_driver->con = conswitchp;
3030 			con_driver->desc = display_desc;
3031 			con_driver->flag = CON_DRIVER_FLAG_INIT;
3032 			con_driver->first = 0;
3033 			con_driver->last = MAX_NR_CONSOLES - 1;
3034 			break;
3035 		}
3036 	}
3037 
3038 	for (i = 0; i < MAX_NR_CONSOLES; i++)
3039 		con_driver_map[i] = conswitchp;
3040 
3041 	if (blankinterval) {
3042 		blank_state = blank_normal_wait;
3043 		mod_timer(&console_timer, jiffies + (blankinterval * HZ));
3044 	}
3045 
3046 	for (currcons = 0; currcons < MIN_NR_CONSOLES; currcons++) {
3047 		vc_cons[currcons].d = vc = kzalloc(sizeof(struct vc_data), GFP_NOWAIT);
3048 		INIT_WORK(&vc_cons[currcons].SAK_work, vc_SAK);
3049 		tty_port_init(&vc->port);
3050 		visual_init(vc, currcons, 1);
3051 		vc->vc_screenbuf = kzalloc(vc->vc_screenbuf_size, GFP_NOWAIT);
3052 		vc_init(vc, vc->vc_rows, vc->vc_cols,
3053 			currcons || !vc->vc_sw->con_save_screen);
3054 	}
3055 	currcons = fg_console = 0;
3056 	master_display_fg = vc = vc_cons[currcons].d;
3057 	set_origin(vc);
3058 	save_screen(vc);
3059 	gotoxy(vc, vc->vc_x, vc->vc_y);
3060 	csi_J(vc, 0);
3061 	update_screen(vc);
3062 	pr_info("Console: %s %s %dx%d\n",
3063 		vc->vc_can_do_color ? "colour" : "mono",
3064 		display_desc, vc->vc_cols, vc->vc_rows);
3065 	printable = 1;
3066 
3067 	console_unlock();
3068 
3069 #ifdef CONFIG_VT_CONSOLE
3070 	register_console(&vt_console_driver);
3071 #endif
3072 	return 0;
3073 }
3074 console_initcall(con_init);
3075 
3076 static const struct tty_operations con_ops = {
3077 	.install = con_install,
3078 	.open = con_open,
3079 	.close = con_close,
3080 	.write = con_write,
3081 	.write_room = con_write_room,
3082 	.put_char = con_put_char,
3083 	.flush_chars = con_flush_chars,
3084 	.chars_in_buffer = con_chars_in_buffer,
3085 	.ioctl = vt_ioctl,
3086 #ifdef CONFIG_COMPAT
3087 	.compat_ioctl = vt_compat_ioctl,
3088 #endif
3089 	.stop = con_stop,
3090 	.start = con_start,
3091 	.throttle = con_throttle,
3092 	.unthrottle = con_unthrottle,
3093 	.resize = vt_resize,
3094 	.shutdown = con_shutdown,
3095 	.cleanup = con_cleanup,
3096 };
3097 
3098 static struct cdev vc0_cdev;
3099 
show_tty_active(struct device * dev,struct device_attribute * attr,char * buf)3100 static ssize_t show_tty_active(struct device *dev,
3101 				struct device_attribute *attr, char *buf)
3102 {
3103 	return sprintf(buf, "tty%d\n", fg_console + 1);
3104 }
3105 static DEVICE_ATTR(active, S_IRUGO, show_tty_active, NULL);
3106 
3107 static struct attribute *vt_dev_attrs[] = {
3108 	&dev_attr_active.attr,
3109 	NULL
3110 };
3111 
3112 ATTRIBUTE_GROUPS(vt_dev);
3113 
vty_init(const struct file_operations * console_fops)3114 int __init vty_init(const struct file_operations *console_fops)
3115 {
3116 	cdev_init(&vc0_cdev, console_fops);
3117 	if (cdev_add(&vc0_cdev, MKDEV(TTY_MAJOR, 0), 1) ||
3118 	    register_chrdev_region(MKDEV(TTY_MAJOR, 0), 1, "/dev/vc/0") < 0)
3119 		panic("Couldn't register /dev/tty0 driver\n");
3120 	tty0dev = device_create_with_groups(tty_class, NULL,
3121 					    MKDEV(TTY_MAJOR, 0), NULL,
3122 					    vt_dev_groups, "tty0");
3123 	if (IS_ERR(tty0dev))
3124 		tty0dev = NULL;
3125 
3126 	vcs_init();
3127 
3128 	console_driver = alloc_tty_driver(MAX_NR_CONSOLES);
3129 	if (!console_driver)
3130 		panic("Couldn't allocate console driver\n");
3131 
3132 	console_driver->name = "tty";
3133 	console_driver->name_base = 1;
3134 	console_driver->major = TTY_MAJOR;
3135 	console_driver->minor_start = 1;
3136 	console_driver->type = TTY_DRIVER_TYPE_CONSOLE;
3137 	console_driver->init_termios = tty_std_termios;
3138 	if (default_utf8)
3139 		console_driver->init_termios.c_iflag |= IUTF8;
3140 	console_driver->flags = TTY_DRIVER_REAL_RAW | TTY_DRIVER_RESET_TERMIOS;
3141 	tty_set_operations(console_driver, &con_ops);
3142 	if (tty_register_driver(console_driver))
3143 		panic("Couldn't register console driver\n");
3144 	kbd_init();
3145 	console_map_init();
3146 #ifdef CONFIG_MDA_CONSOLE
3147 	mda_console_init();
3148 #endif
3149 	return 0;
3150 }
3151 
3152 #ifndef VT_SINGLE_DRIVER
3153 
3154 static struct class *vtconsole_class;
3155 
do_bind_con_driver(const struct consw * csw,int first,int last,int deflt)3156 static int do_bind_con_driver(const struct consw *csw, int first, int last,
3157 			   int deflt)
3158 {
3159 	struct module *owner = csw->owner;
3160 	const char *desc = NULL;
3161 	struct con_driver *con_driver;
3162 	int i, j = -1, k = -1, retval = -ENODEV;
3163 
3164 	if (!try_module_get(owner))
3165 		return -ENODEV;
3166 
3167 	WARN_CONSOLE_UNLOCKED();
3168 
3169 	/* check if driver is registered */
3170 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3171 		con_driver = &registered_con_driver[i];
3172 
3173 		if (con_driver->con == csw) {
3174 			desc = con_driver->desc;
3175 			retval = 0;
3176 			break;
3177 		}
3178 	}
3179 
3180 	if (retval)
3181 		goto err;
3182 
3183 	if (!(con_driver->flag & CON_DRIVER_FLAG_INIT)) {
3184 		csw->con_startup();
3185 		con_driver->flag |= CON_DRIVER_FLAG_INIT;
3186 	}
3187 
3188 	if (deflt) {
3189 		if (conswitchp)
3190 			module_put(conswitchp->owner);
3191 
3192 		__module_get(owner);
3193 		conswitchp = csw;
3194 	}
3195 
3196 	first = max(first, con_driver->first);
3197 	last = min(last, con_driver->last);
3198 
3199 	for (i = first; i <= last; i++) {
3200 		int old_was_color;
3201 		struct vc_data *vc = vc_cons[i].d;
3202 
3203 		if (con_driver_map[i])
3204 			module_put(con_driver_map[i]->owner);
3205 		__module_get(owner);
3206 		con_driver_map[i] = csw;
3207 
3208 		if (!vc || !vc->vc_sw)
3209 			continue;
3210 
3211 		j = i;
3212 
3213 		if (CON_IS_VISIBLE(vc)) {
3214 			k = i;
3215 			save_screen(vc);
3216 		}
3217 
3218 		old_was_color = vc->vc_can_do_color;
3219 		vc->vc_sw->con_deinit(vc);
3220 		vc->vc_origin = (unsigned long)vc->vc_screenbuf;
3221 		visual_init(vc, i, 0);
3222 		set_origin(vc);
3223 		update_attr(vc);
3224 
3225 		/* If the console changed between mono <-> color, then
3226 		 * the attributes in the screenbuf will be wrong.  The
3227 		 * following resets all attributes to something sane.
3228 		 */
3229 		if (old_was_color != vc->vc_can_do_color)
3230 			clear_buffer_attributes(vc);
3231 	}
3232 
3233 	pr_info("Console: switching ");
3234 	if (!deflt)
3235 		printk("consoles %d-%d ", first+1, last+1);
3236 	if (j >= 0) {
3237 		struct vc_data *vc = vc_cons[j].d;
3238 
3239 		printk("to %s %s %dx%d\n",
3240 		       vc->vc_can_do_color ? "colour" : "mono",
3241 		       desc, vc->vc_cols, vc->vc_rows);
3242 
3243 		if (k >= 0) {
3244 			vc = vc_cons[k].d;
3245 			update_screen(vc);
3246 		}
3247 	} else
3248 		printk("to %s\n", desc);
3249 
3250 	retval = 0;
3251 err:
3252 	module_put(owner);
3253 	return retval;
3254 };
3255 
3256 
3257 #ifdef CONFIG_VT_HW_CONSOLE_BINDING
3258 /* unlocked version of unbind_con_driver() */
do_unbind_con_driver(const struct consw * csw,int first,int last,int deflt)3259 int do_unbind_con_driver(const struct consw *csw, int first, int last, int deflt)
3260 {
3261 	struct module *owner = csw->owner;
3262 	const struct consw *defcsw = NULL;
3263 	struct con_driver *con_driver = NULL, *con_back = NULL;
3264 	int i, retval = -ENODEV;
3265 
3266 	if (!try_module_get(owner))
3267 		return -ENODEV;
3268 
3269 	WARN_CONSOLE_UNLOCKED();
3270 
3271 	/* check if driver is registered and if it is unbindable */
3272 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3273 		con_driver = &registered_con_driver[i];
3274 
3275 		if (con_driver->con == csw &&
3276 		    con_driver->flag & CON_DRIVER_FLAG_MODULE) {
3277 			retval = 0;
3278 			break;
3279 		}
3280 	}
3281 
3282 	if (retval)
3283 		goto err;
3284 
3285 	retval = -ENODEV;
3286 
3287 	/* check if backup driver exists */
3288 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3289 		con_back = &registered_con_driver[i];
3290 
3291 		if (con_back->con && con_back->con != csw) {
3292 			defcsw = con_back->con;
3293 			retval = 0;
3294 			break;
3295 		}
3296 	}
3297 
3298 	if (retval)
3299 		goto err;
3300 
3301 	if (!con_is_bound(csw))
3302 		goto err;
3303 
3304 	first = max(first, con_driver->first);
3305 	last = min(last, con_driver->last);
3306 
3307 	for (i = first; i <= last; i++) {
3308 		if (con_driver_map[i] == csw) {
3309 			module_put(csw->owner);
3310 			con_driver_map[i] = NULL;
3311 		}
3312 	}
3313 
3314 	if (!con_is_bound(defcsw)) {
3315 		const struct consw *defconsw = conswitchp;
3316 
3317 		defcsw->con_startup();
3318 		con_back->flag |= CON_DRIVER_FLAG_INIT;
3319 		/*
3320 		 * vgacon may change the default driver to point
3321 		 * to dummycon, we restore it here...
3322 		 */
3323 		conswitchp = defconsw;
3324 	}
3325 
3326 	if (!con_is_bound(csw))
3327 		con_driver->flag &= ~CON_DRIVER_FLAG_INIT;
3328 
3329 	/* ignore return value, binding should not fail */
3330 	do_bind_con_driver(defcsw, first, last, deflt);
3331 err:
3332 	module_put(owner);
3333 	return retval;
3334 
3335 }
3336 EXPORT_SYMBOL_GPL(do_unbind_con_driver);
3337 
vt_bind(struct con_driver * con)3338 static int vt_bind(struct con_driver *con)
3339 {
3340 	const struct consw *defcsw = NULL, *csw = NULL;
3341 	int i, more = 1, first = -1, last = -1, deflt = 0;
3342 
3343  	if (!con->con || !(con->flag & CON_DRIVER_FLAG_MODULE))
3344 		goto err;
3345 
3346 	csw = con->con;
3347 
3348 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3349 		struct con_driver *con = &registered_con_driver[i];
3350 
3351 		if (con->con && !(con->flag & CON_DRIVER_FLAG_MODULE)) {
3352 			defcsw = con->con;
3353 			break;
3354 		}
3355 	}
3356 
3357 	if (!defcsw)
3358 		goto err;
3359 
3360 	while (more) {
3361 		more = 0;
3362 
3363 		for (i = con->first; i <= con->last; i++) {
3364 			if (con_driver_map[i] == defcsw) {
3365 				if (first == -1)
3366 					first = i;
3367 				last = i;
3368 				more = 1;
3369 			} else if (first != -1)
3370 				break;
3371 		}
3372 
3373 		if (first == 0 && last == MAX_NR_CONSOLES -1)
3374 			deflt = 1;
3375 
3376 		if (first != -1)
3377 			do_bind_con_driver(csw, first, last, deflt);
3378 
3379 		first = -1;
3380 		last = -1;
3381 		deflt = 0;
3382 	}
3383 
3384 err:
3385 	return 0;
3386 }
3387 
vt_unbind(struct con_driver * con)3388 static int vt_unbind(struct con_driver *con)
3389 {
3390 	const struct consw *csw = NULL;
3391 	int i, more = 1, first = -1, last = -1, deflt = 0;
3392 	int ret;
3393 
3394  	if (!con->con || !(con->flag & CON_DRIVER_FLAG_MODULE))
3395 		goto err;
3396 
3397 	csw = con->con;
3398 
3399 	while (more) {
3400 		more = 0;
3401 
3402 		for (i = con->first; i <= con->last; i++) {
3403 			if (con_driver_map[i] == csw) {
3404 				if (first == -1)
3405 					first = i;
3406 				last = i;
3407 				more = 1;
3408 			} else if (first != -1)
3409 				break;
3410 		}
3411 
3412 		if (first == 0 && last == MAX_NR_CONSOLES -1)
3413 			deflt = 1;
3414 
3415 		if (first != -1) {
3416 			ret = do_unbind_con_driver(csw, first, last, deflt);
3417 			if (ret != 0)
3418 				return ret;
3419 		}
3420 
3421 		first = -1;
3422 		last = -1;
3423 		deflt = 0;
3424 	}
3425 
3426 err:
3427 	return 0;
3428 }
3429 #else
vt_bind(struct con_driver * con)3430 static inline int vt_bind(struct con_driver *con)
3431 {
3432 	return 0;
3433 }
vt_unbind(struct con_driver * con)3434 static inline int vt_unbind(struct con_driver *con)
3435 {
3436 	return 0;
3437 }
3438 #endif /* CONFIG_VT_HW_CONSOLE_BINDING */
3439 
store_bind(struct device * dev,struct device_attribute * attr,const char * buf,size_t count)3440 static ssize_t store_bind(struct device *dev, struct device_attribute *attr,
3441 			  const char *buf, size_t count)
3442 {
3443 	struct con_driver *con = dev_get_drvdata(dev);
3444 	int bind = simple_strtoul(buf, NULL, 0);
3445 
3446 	console_lock();
3447 
3448 	if (bind)
3449 		vt_bind(con);
3450 	else
3451 		vt_unbind(con);
3452 
3453 	console_unlock();
3454 
3455 	return count;
3456 }
3457 
show_bind(struct device * dev,struct device_attribute * attr,char * buf)3458 static ssize_t show_bind(struct device *dev, struct device_attribute *attr,
3459 			 char *buf)
3460 {
3461 	struct con_driver *con = dev_get_drvdata(dev);
3462 	int bind = con_is_bound(con->con);
3463 
3464 	return snprintf(buf, PAGE_SIZE, "%i\n", bind);
3465 }
3466 
show_name(struct device * dev,struct device_attribute * attr,char * buf)3467 static ssize_t show_name(struct device *dev, struct device_attribute *attr,
3468 			 char *buf)
3469 {
3470 	struct con_driver *con = dev_get_drvdata(dev);
3471 
3472 	return snprintf(buf, PAGE_SIZE, "%s %s\n",
3473 			(con->flag & CON_DRIVER_FLAG_MODULE) ? "(M)" : "(S)",
3474 			 con->desc);
3475 
3476 }
3477 
3478 static DEVICE_ATTR(bind, S_IRUGO|S_IWUSR, show_bind, store_bind);
3479 static DEVICE_ATTR(name, S_IRUGO, show_name, NULL);
3480 
3481 static struct attribute *con_dev_attrs[] = {
3482 	&dev_attr_bind.attr,
3483 	&dev_attr_name.attr,
3484 	NULL
3485 };
3486 
3487 ATTRIBUTE_GROUPS(con_dev);
3488 
vtconsole_init_device(struct con_driver * con)3489 static int vtconsole_init_device(struct con_driver *con)
3490 {
3491 	con->flag |= CON_DRIVER_FLAG_ATTR;
3492 	return 0;
3493 }
3494 
vtconsole_deinit_device(struct con_driver * con)3495 static void vtconsole_deinit_device(struct con_driver *con)
3496 {
3497 	con->flag &= ~CON_DRIVER_FLAG_ATTR;
3498 }
3499 
3500 /**
3501  * con_is_bound - checks if driver is bound to the console
3502  * @csw: console driver
3503  *
3504  * RETURNS: zero if unbound, nonzero if bound
3505  *
3506  * Drivers can call this and if zero, they should release
3507  * all resources allocated on con_startup()
3508  */
con_is_bound(const struct consw * csw)3509 int con_is_bound(const struct consw *csw)
3510 {
3511 	int i, bound = 0;
3512 
3513 	for (i = 0; i < MAX_NR_CONSOLES; i++) {
3514 		if (con_driver_map[i] == csw) {
3515 			bound = 1;
3516 			break;
3517 		}
3518 	}
3519 
3520 	return bound;
3521 }
3522 EXPORT_SYMBOL(con_is_bound);
3523 
3524 /**
3525  * con_debug_enter - prepare the console for the kernel debugger
3526  * @sw: console driver
3527  *
3528  * Called when the console is taken over by the kernel debugger, this
3529  * function needs to save the current console state, then put the console
3530  * into a state suitable for the kernel debugger.
3531  *
3532  * RETURNS:
3533  * Zero on success, nonzero if a failure occurred when trying to prepare
3534  * the console for the debugger.
3535  */
con_debug_enter(struct vc_data * vc)3536 int con_debug_enter(struct vc_data *vc)
3537 {
3538 	int ret = 0;
3539 
3540 	saved_fg_console = fg_console;
3541 	saved_last_console = last_console;
3542 	saved_want_console = want_console;
3543 	saved_vc_mode = vc->vc_mode;
3544 	saved_console_blanked = console_blanked;
3545 	vc->vc_mode = KD_TEXT;
3546 	console_blanked = 0;
3547 	if (vc->vc_sw->con_debug_enter)
3548 		ret = vc->vc_sw->con_debug_enter(vc);
3549 #ifdef CONFIG_KGDB_KDB
3550 	/* Set the initial LINES variable if it is not already set */
3551 	if (vc->vc_rows < 999) {
3552 		int linecount;
3553 		char lns[4];
3554 		const char *setargs[3] = {
3555 			"set",
3556 			"LINES",
3557 			lns,
3558 		};
3559 		if (kdbgetintenv(setargs[0], &linecount)) {
3560 			snprintf(lns, 4, "%i", vc->vc_rows);
3561 			kdb_set(2, setargs);
3562 		}
3563 	}
3564 	if (vc->vc_cols < 999) {
3565 		int colcount;
3566 		char cols[4];
3567 		const char *setargs[3] = {
3568 			"set",
3569 			"COLUMNS",
3570 			cols,
3571 		};
3572 		if (kdbgetintenv(setargs[0], &colcount)) {
3573 			snprintf(cols, 4, "%i", vc->vc_cols);
3574 			kdb_set(2, setargs);
3575 		}
3576 	}
3577 #endif /* CONFIG_KGDB_KDB */
3578 	return ret;
3579 }
3580 EXPORT_SYMBOL_GPL(con_debug_enter);
3581 
3582 /**
3583  * con_debug_leave - restore console state
3584  * @sw: console driver
3585  *
3586  * Restore the console state to what it was before the kernel debugger
3587  * was invoked.
3588  *
3589  * RETURNS:
3590  * Zero on success, nonzero if a failure occurred when trying to restore
3591  * the console.
3592  */
con_debug_leave(void)3593 int con_debug_leave(void)
3594 {
3595 	struct vc_data *vc;
3596 	int ret = 0;
3597 
3598 	fg_console = saved_fg_console;
3599 	last_console = saved_last_console;
3600 	want_console = saved_want_console;
3601 	console_blanked = saved_console_blanked;
3602 	vc_cons[fg_console].d->vc_mode = saved_vc_mode;
3603 
3604 	vc = vc_cons[fg_console].d;
3605 	if (vc->vc_sw->con_debug_leave)
3606 		ret = vc->vc_sw->con_debug_leave(vc);
3607 	return ret;
3608 }
3609 EXPORT_SYMBOL_GPL(con_debug_leave);
3610 
do_register_con_driver(const struct consw * csw,int first,int last)3611 static int do_register_con_driver(const struct consw *csw, int first, int last)
3612 {
3613 	struct module *owner = csw->owner;
3614 	struct con_driver *con_driver;
3615 	const char *desc;
3616 	int i, retval = 0;
3617 
3618 	WARN_CONSOLE_UNLOCKED();
3619 
3620 	if (!try_module_get(owner))
3621 		return -ENODEV;
3622 
3623 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3624 		con_driver = &registered_con_driver[i];
3625 
3626 		/* already registered */
3627 		if (con_driver->con == csw)
3628 			retval = -EBUSY;
3629 	}
3630 
3631 	if (retval)
3632 		goto err;
3633 
3634 	desc = csw->con_startup();
3635 	if (!desc) {
3636 		retval = -ENODEV;
3637 		goto err;
3638 	}
3639 
3640 	retval = -EINVAL;
3641 
3642 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3643 		con_driver = &registered_con_driver[i];
3644 
3645 		if (con_driver->con == NULL &&
3646 		    !(con_driver->flag & CON_DRIVER_FLAG_ZOMBIE)) {
3647 			con_driver->con = csw;
3648 			con_driver->desc = desc;
3649 			con_driver->node = i;
3650 			con_driver->flag = CON_DRIVER_FLAG_MODULE |
3651 			                   CON_DRIVER_FLAG_INIT;
3652 			con_driver->first = first;
3653 			con_driver->last = last;
3654 			retval = 0;
3655 			break;
3656 		}
3657 	}
3658 
3659 	if (retval)
3660 		goto err;
3661 
3662 	con_driver->dev =
3663 		device_create_with_groups(vtconsole_class, NULL,
3664 					  MKDEV(0, con_driver->node),
3665 					  con_driver, con_dev_groups,
3666 					  "vtcon%i", con_driver->node);
3667 	if (IS_ERR(con_driver->dev)) {
3668 		printk(KERN_WARNING "Unable to create device for %s; "
3669 		       "errno = %ld\n", con_driver->desc,
3670 		       PTR_ERR(con_driver->dev));
3671 		con_driver->dev = NULL;
3672 	} else {
3673 		vtconsole_init_device(con_driver);
3674 	}
3675 
3676 err:
3677 	module_put(owner);
3678 	return retval;
3679 }
3680 
3681 
3682 /**
3683  * do_unregister_con_driver - unregister console driver from console layer
3684  * @csw: console driver
3685  *
3686  * DESCRIPTION: All drivers that registers to the console layer must
3687  * call this function upon exit, or if the console driver is in a state
3688  * where it won't be able to handle console services, such as the
3689  * framebuffer console without loaded framebuffer drivers.
3690  *
3691  * The driver must unbind first prior to unregistration.
3692  */
do_unregister_con_driver(const struct consw * csw)3693 int do_unregister_con_driver(const struct consw *csw)
3694 {
3695 	int i;
3696 
3697 	/* cannot unregister a bound driver */
3698 	if (con_is_bound(csw))
3699 		return -EBUSY;
3700 
3701 	if (csw == conswitchp)
3702 		return -EINVAL;
3703 
3704 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3705 		struct con_driver *con_driver = &registered_con_driver[i];
3706 
3707 		if (con_driver->con == csw) {
3708 			/*
3709 			 * Defer the removal of the sysfs entries since that
3710 			 * will acquire the kernfs s_active lock and we can't
3711 			 * acquire this lock while holding the console lock:
3712 			 * the unbind sysfs entry imposes already the opposite
3713 			 * order. Reset con already here to prevent any later
3714 			 * lookup to succeed and mark this slot as zombie, so
3715 			 * it won't get reused until we complete the removal
3716 			 * in the deferred work.
3717 			 */
3718 			con_driver->con = NULL;
3719 			con_driver->flag = CON_DRIVER_FLAG_ZOMBIE;
3720 			schedule_work(&con_driver_unregister_work);
3721 
3722 			return 0;
3723 		}
3724 	}
3725 
3726 	return -ENODEV;
3727 }
3728 EXPORT_SYMBOL_GPL(do_unregister_con_driver);
3729 
con_driver_unregister_callback(struct work_struct * ignored)3730 static void con_driver_unregister_callback(struct work_struct *ignored)
3731 {
3732 	int i;
3733 
3734 	console_lock();
3735 
3736 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3737 		struct con_driver *con_driver = &registered_con_driver[i];
3738 
3739 		if (!(con_driver->flag & CON_DRIVER_FLAG_ZOMBIE))
3740 			continue;
3741 
3742 		console_unlock();
3743 
3744 		vtconsole_deinit_device(con_driver);
3745 		device_destroy(vtconsole_class, MKDEV(0, con_driver->node));
3746 
3747 		console_lock();
3748 
3749 		if (WARN_ON_ONCE(con_driver->con))
3750 			con_driver->con = NULL;
3751 		con_driver->desc = NULL;
3752 		con_driver->dev = NULL;
3753 		con_driver->node = 0;
3754 		WARN_ON_ONCE(con_driver->flag != CON_DRIVER_FLAG_ZOMBIE);
3755 		con_driver->flag = 0;
3756 		con_driver->first = 0;
3757 		con_driver->last = 0;
3758 	}
3759 
3760 	console_unlock();
3761 }
3762 
3763 /*
3764  *	If we support more console drivers, this function is used
3765  *	when a driver wants to take over some existing consoles
3766  *	and become default driver for newly opened ones.
3767  *
3768  *	do_take_over_console is basically a register followed by unbind
3769  */
do_take_over_console(const struct consw * csw,int first,int last,int deflt)3770 int do_take_over_console(const struct consw *csw, int first, int last, int deflt)
3771 {
3772 	int err;
3773 
3774 	err = do_register_con_driver(csw, first, last);
3775 	/*
3776 	 * If we get an busy error we still want to bind the console driver
3777 	 * and return success, as we may have unbound the console driver
3778 	 * but not unregistered it.
3779 	 */
3780 	if (err == -EBUSY)
3781 		err = 0;
3782 	if (!err)
3783 		do_bind_con_driver(csw, first, last, deflt);
3784 
3785 	return err;
3786 }
3787 EXPORT_SYMBOL_GPL(do_take_over_console);
3788 
3789 
3790 /*
3791  * give_up_console is a wrapper to unregister_con_driver. It will only
3792  * work if driver is fully unbound.
3793  */
give_up_console(const struct consw * csw)3794 void give_up_console(const struct consw *csw)
3795 {
3796 	console_lock();
3797 	do_unregister_con_driver(csw);
3798 	console_unlock();
3799 }
3800 
vtconsole_class_init(void)3801 static int __init vtconsole_class_init(void)
3802 {
3803 	int i;
3804 
3805 	vtconsole_class = class_create(THIS_MODULE, "vtconsole");
3806 	if (IS_ERR(vtconsole_class)) {
3807 		printk(KERN_WARNING "Unable to create vt console class; "
3808 		       "errno = %ld\n", PTR_ERR(vtconsole_class));
3809 		vtconsole_class = NULL;
3810 	}
3811 
3812 	/* Add system drivers to sysfs */
3813 	for (i = 0; i < MAX_NR_CON_DRIVER; i++) {
3814 		struct con_driver *con = &registered_con_driver[i];
3815 
3816 		if (con->con && !con->dev) {
3817 			con->dev =
3818 				device_create_with_groups(vtconsole_class, NULL,
3819 							  MKDEV(0, con->node),
3820 							  con, con_dev_groups,
3821 							  "vtcon%i", con->node);
3822 
3823 			if (IS_ERR(con->dev)) {
3824 				printk(KERN_WARNING "Unable to create "
3825 				       "device for %s; errno = %ld\n",
3826 				       con->desc, PTR_ERR(con->dev));
3827 				con->dev = NULL;
3828 			} else {
3829 				vtconsole_init_device(con);
3830 			}
3831 		}
3832 	}
3833 
3834 	return 0;
3835 }
3836 postcore_initcall(vtconsole_class_init);
3837 
3838 #endif
3839 
3840 /*
3841  *	Screen blanking
3842  */
3843 
set_vesa_blanking(char __user * p)3844 static int set_vesa_blanking(char __user *p)
3845 {
3846 	unsigned int mode;
3847 
3848 	if (get_user(mode, p + 1))
3849 		return -EFAULT;
3850 
3851 	vesa_blank_mode = (mode < 4) ? mode : 0;
3852 	return 0;
3853 }
3854 
do_blank_screen(int entering_gfx)3855 void do_blank_screen(int entering_gfx)
3856 {
3857 	struct vc_data *vc = vc_cons[fg_console].d;
3858 	int i;
3859 
3860 	WARN_CONSOLE_UNLOCKED();
3861 
3862 	if (console_blanked) {
3863 		if (blank_state == blank_vesa_wait) {
3864 			blank_state = blank_off;
3865 			vc->vc_sw->con_blank(vc, vesa_blank_mode + 1, 0);
3866 		}
3867 		return;
3868 	}
3869 
3870 	/* entering graphics mode? */
3871 	if (entering_gfx) {
3872 		hide_cursor(vc);
3873 		save_screen(vc);
3874 		vc->vc_sw->con_blank(vc, -1, 1);
3875 		console_blanked = fg_console + 1;
3876 		blank_state = blank_off;
3877 		set_origin(vc);
3878 		return;
3879 	}
3880 
3881 	if (blank_state != blank_normal_wait)
3882 		return;
3883 	blank_state = blank_off;
3884 
3885 	/* don't blank graphics */
3886 	if (vc->vc_mode != KD_TEXT) {
3887 		console_blanked = fg_console + 1;
3888 		return;
3889 	}
3890 
3891 	hide_cursor(vc);
3892 	del_timer_sync(&console_timer);
3893 	blank_timer_expired = 0;
3894 
3895 	save_screen(vc);
3896 	/* In case we need to reset origin, blanking hook returns 1 */
3897 	i = vc->vc_sw->con_blank(vc, vesa_off_interval ? 1 : (vesa_blank_mode + 1), 0);
3898 	console_blanked = fg_console + 1;
3899 	if (i)
3900 		set_origin(vc);
3901 
3902 	if (console_blank_hook && console_blank_hook(1))
3903 		return;
3904 
3905 	if (vesa_off_interval && vesa_blank_mode) {
3906 		blank_state = blank_vesa_wait;
3907 		mod_timer(&console_timer, jiffies + vesa_off_interval);
3908 	}
3909 	vt_event_post(VT_EVENT_BLANK, vc->vc_num, vc->vc_num);
3910 }
3911 EXPORT_SYMBOL(do_blank_screen);
3912 
3913 /*
3914  * Called by timer as well as from vt_console_driver
3915  */
do_unblank_screen(int leaving_gfx)3916 void do_unblank_screen(int leaving_gfx)
3917 {
3918 	struct vc_data *vc;
3919 
3920 	/* This should now always be called from a "sane" (read: can schedule)
3921 	 * context for the sake of the low level drivers, except in the special
3922 	 * case of oops_in_progress
3923 	 */
3924 	if (!oops_in_progress)
3925 		might_sleep();
3926 
3927 	WARN_CONSOLE_UNLOCKED();
3928 
3929 	ignore_poke = 0;
3930 	if (!console_blanked)
3931 		return;
3932 	if (!vc_cons_allocated(fg_console)) {
3933 		/* impossible */
3934 		pr_warn("unblank_screen: tty %d not allocated ??\n",
3935 			fg_console + 1);
3936 		return;
3937 	}
3938 	vc = vc_cons[fg_console].d;
3939 	/* Try to unblank in oops case too */
3940 	if (vc->vc_mode != KD_TEXT && !vt_force_oops_output(vc))
3941 		return; /* but leave console_blanked != 0 */
3942 
3943 	if (blankinterval) {
3944 		mod_timer(&console_timer, jiffies + (blankinterval * HZ));
3945 		blank_state = blank_normal_wait;
3946 	}
3947 
3948 	console_blanked = 0;
3949 	if (vc->vc_sw->con_blank(vc, 0, leaving_gfx) || vt_force_oops_output(vc))
3950 		/* Low-level driver cannot restore -> do it ourselves */
3951 		update_screen(vc);
3952 	if (console_blank_hook)
3953 		console_blank_hook(0);
3954 	set_palette(vc);
3955 	set_cursor(vc);
3956 	vt_event_post(VT_EVENT_UNBLANK, vc->vc_num, vc->vc_num);
3957 }
3958 EXPORT_SYMBOL(do_unblank_screen);
3959 
3960 /*
3961  * This is called by the outside world to cause a forced unblank, mostly for
3962  * oopses. Currently, I just call do_unblank_screen(0), but we could eventually
3963  * call it with 1 as an argument and so force a mode restore... that may kill
3964  * X or at least garbage the screen but would also make the Oops visible...
3965  */
unblank_screen(void)3966 void unblank_screen(void)
3967 {
3968 	do_unblank_screen(0);
3969 }
3970 
3971 /*
3972  * We defer the timer blanking to work queue so it can take the console mutex
3973  * (console operations can still happen at irq time, but only from printk which
3974  * has the console mutex. Not perfect yet, but better than no locking
3975  */
blank_screen_t(unsigned long dummy)3976 static void blank_screen_t(unsigned long dummy)
3977 {
3978 	if (unlikely(!keventd_up())) {
3979 		mod_timer(&console_timer, jiffies + (blankinterval * HZ));
3980 		return;
3981 	}
3982 	blank_timer_expired = 1;
3983 	schedule_work(&console_work);
3984 }
3985 
poke_blanked_console(void)3986 void poke_blanked_console(void)
3987 {
3988 	WARN_CONSOLE_UNLOCKED();
3989 
3990 	/* Add this so we quickly catch whoever might call us in a non
3991 	 * safe context. Nowadays, unblank_screen() isn't to be called in
3992 	 * atomic contexts and is allowed to schedule (with the special case
3993 	 * of oops_in_progress, but that isn't of any concern for this
3994 	 * function. --BenH.
3995 	 */
3996 	might_sleep();
3997 
3998 	/* This isn't perfectly race free, but a race here would be mostly harmless,
3999 	 * at worse, we'll do a spurrious blank and it's unlikely
4000 	 */
4001 	del_timer(&console_timer);
4002 	blank_timer_expired = 0;
4003 
4004 	if (ignore_poke || !vc_cons[fg_console].d || vc_cons[fg_console].d->vc_mode == KD_GRAPHICS)
4005 		return;
4006 	if (console_blanked)
4007 		unblank_screen();
4008 	else if (blankinterval) {
4009 		mod_timer(&console_timer, jiffies + (blankinterval * HZ));
4010 		blank_state = blank_normal_wait;
4011 	}
4012 }
4013 
4014 /*
4015  *	Palettes
4016  */
4017 
set_palette(struct vc_data * vc)4018 static void set_palette(struct vc_data *vc)
4019 {
4020 	WARN_CONSOLE_UNLOCKED();
4021 
4022 	if (vc->vc_mode != KD_GRAPHICS)
4023 		vc->vc_sw->con_set_palette(vc, color_table);
4024 }
4025 
4026 /*
4027  * Load palette into the DAC registers. arg points to a colour
4028  * map, 3 bytes per colour, 16 colours, range from 0 to 255.
4029  */
4030 
con_set_cmap(unsigned char __user * arg)4031 int con_set_cmap(unsigned char __user *arg)
4032 {
4033 	int i, j, k;
4034 	unsigned char colormap[3*16];
4035 
4036 	if (copy_from_user(colormap, arg, sizeof(colormap)))
4037 		return -EFAULT;
4038 
4039 	console_lock();
4040 	for (i = k = 0; i < 16; i++) {
4041 		default_red[i] = colormap[k++];
4042 		default_grn[i] = colormap[k++];
4043 		default_blu[i] = colormap[k++];
4044 	}
4045 	for (i = 0; i < MAX_NR_CONSOLES; i++) {
4046 		if (!vc_cons_allocated(i))
4047 			continue;
4048 		for (j = k = 0; j < 16; j++) {
4049 			vc_cons[i].d->vc_palette[k++] = default_red[j];
4050 			vc_cons[i].d->vc_palette[k++] = default_grn[j];
4051 			vc_cons[i].d->vc_palette[k++] = default_blu[j];
4052 		}
4053 		set_palette(vc_cons[i].d);
4054 	}
4055 	console_unlock();
4056 
4057 	return 0;
4058 }
4059 
con_get_cmap(unsigned char __user * arg)4060 int con_get_cmap(unsigned char __user *arg)
4061 {
4062 	int i, k;
4063 	unsigned char colormap[3*16];
4064 
4065 	console_lock();
4066 	for (i = k = 0; i < 16; i++) {
4067 		colormap[k++] = default_red[i];
4068 		colormap[k++] = default_grn[i];
4069 		colormap[k++] = default_blu[i];
4070 	}
4071 	console_unlock();
4072 
4073 	if (copy_to_user(arg, colormap, sizeof(colormap)))
4074 		return -EFAULT;
4075 
4076 	return 0;
4077 }
4078 
reset_palette(struct vc_data * vc)4079 void reset_palette(struct vc_data *vc)
4080 {
4081 	int j, k;
4082 	for (j=k=0; j<16; j++) {
4083 		vc->vc_palette[k++] = default_red[j];
4084 		vc->vc_palette[k++] = default_grn[j];
4085 		vc->vc_palette[k++] = default_blu[j];
4086 	}
4087 	set_palette(vc);
4088 }
4089 
4090 /*
4091  *  Font switching
4092  *
4093  *  Currently we only support fonts up to 32 pixels wide, at a maximum height
4094  *  of 32 pixels. Userspace fontdata is stored with 32 bytes (shorts/ints,
4095  *  depending on width) reserved for each character which is kinda wasty, but
4096  *  this is done in order to maintain compatibility with the EGA/VGA fonts. It
4097  *  is up to the actual low-level console-driver convert data into its favorite
4098  *  format (maybe we should add a `fontoffset' field to the `display'
4099  *  structure so we won't have to convert the fontdata all the time.
4100  *  /Jes
4101  */
4102 
4103 #define max_font_size 65536
4104 
con_font_get(struct vc_data * vc,struct console_font_op * op)4105 static int con_font_get(struct vc_data *vc, struct console_font_op *op)
4106 {
4107 	struct console_font font;
4108 	int rc = -EINVAL;
4109 	int c;
4110 
4111 	if (op->data) {
4112 		font.data = kmalloc(max_font_size, GFP_KERNEL);
4113 		if (!font.data)
4114 			return -ENOMEM;
4115 	} else
4116 		font.data = NULL;
4117 
4118 	console_lock();
4119 	if (vc->vc_mode != KD_TEXT)
4120 		rc = -EINVAL;
4121 	else if (vc->vc_sw->con_font_get)
4122 		rc = vc->vc_sw->con_font_get(vc, &font);
4123 	else
4124 		rc = -ENOSYS;
4125 	console_unlock();
4126 
4127 	if (rc)
4128 		goto out;
4129 
4130 	c = (font.width+7)/8 * 32 * font.charcount;
4131 
4132 	if (op->data && font.charcount > op->charcount)
4133 		rc = -ENOSPC;
4134 	if (!(op->flags & KD_FONT_FLAG_OLD)) {
4135 		if (font.width > op->width || font.height > op->height)
4136 			rc = -ENOSPC;
4137 	} else {
4138 		if (font.width != 8)
4139 			rc = -EIO;
4140 		else if ((op->height && font.height > op->height) ||
4141 			 font.height > 32)
4142 			rc = -ENOSPC;
4143 	}
4144 	if (rc)
4145 		goto out;
4146 
4147 	op->height = font.height;
4148 	op->width = font.width;
4149 	op->charcount = font.charcount;
4150 
4151 	if (op->data && copy_to_user(op->data, font.data, c))
4152 		rc = -EFAULT;
4153 
4154 out:
4155 	kfree(font.data);
4156 	return rc;
4157 }
4158 
con_font_set(struct vc_data * vc,struct console_font_op * op)4159 static int con_font_set(struct vc_data *vc, struct console_font_op *op)
4160 {
4161 	struct console_font font;
4162 	int rc = -EINVAL;
4163 	int size;
4164 
4165 	if (vc->vc_mode != KD_TEXT)
4166 		return -EINVAL;
4167 	if (!op->data)
4168 		return -EINVAL;
4169 	if (op->charcount > 512)
4170 		return -EINVAL;
4171 	if (!op->height) {		/* Need to guess font height [compat] */
4172 		int h, i;
4173 		u8 __user *charmap = op->data;
4174 		u8 tmp;
4175 
4176 		/* If from KDFONTOP ioctl, don't allow things which can be done in userland,
4177 		   so that we can get rid of this soon */
4178 		if (!(op->flags & KD_FONT_FLAG_OLD))
4179 			return -EINVAL;
4180 		for (h = 32; h > 0; h--)
4181 			for (i = 0; i < op->charcount; i++) {
4182 				if (get_user(tmp, &charmap[32*i+h-1]))
4183 					return -EFAULT;
4184 				if (tmp)
4185 					goto nonzero;
4186 			}
4187 		return -EINVAL;
4188 	nonzero:
4189 		op->height = h;
4190 	}
4191 	if (op->width <= 0 || op->width > 32 || op->height > 32)
4192 		return -EINVAL;
4193 	size = (op->width+7)/8 * 32 * op->charcount;
4194 	if (size > max_font_size)
4195 		return -ENOSPC;
4196 	font.charcount = op->charcount;
4197 	font.height = op->height;
4198 	font.width = op->width;
4199 	font.data = memdup_user(op->data, size);
4200 	if (IS_ERR(font.data))
4201 		return PTR_ERR(font.data);
4202 	console_lock();
4203 	if (vc->vc_mode != KD_TEXT)
4204 		rc = -EINVAL;
4205 	else if (vc->vc_sw->con_font_set)
4206 		rc = vc->vc_sw->con_font_set(vc, &font, op->flags);
4207 	else
4208 		rc = -ENOSYS;
4209 	console_unlock();
4210 	kfree(font.data);
4211 	return rc;
4212 }
4213 
con_font_default(struct vc_data * vc,struct console_font_op * op)4214 static int con_font_default(struct vc_data *vc, struct console_font_op *op)
4215 {
4216 	struct console_font font = {.width = op->width, .height = op->height};
4217 	char name[MAX_FONT_NAME];
4218 	char *s = name;
4219 	int rc;
4220 
4221 
4222 	if (!op->data)
4223 		s = NULL;
4224 	else if (strncpy_from_user(name, op->data, MAX_FONT_NAME - 1) < 0)
4225 		return -EFAULT;
4226 	else
4227 		name[MAX_FONT_NAME - 1] = 0;
4228 
4229 	console_lock();
4230 	if (vc->vc_mode != KD_TEXT) {
4231 		console_unlock();
4232 		return -EINVAL;
4233 	}
4234 	if (vc->vc_sw->con_font_default)
4235 		rc = vc->vc_sw->con_font_default(vc, &font, s);
4236 	else
4237 		rc = -ENOSYS;
4238 	console_unlock();
4239 	if (!rc) {
4240 		op->width = font.width;
4241 		op->height = font.height;
4242 	}
4243 	return rc;
4244 }
4245 
con_font_op(struct vc_data * vc,struct console_font_op * op)4246 int con_font_op(struct vc_data *vc, struct console_font_op *op)
4247 {
4248 	switch (op->op) {
4249 	case KD_FONT_OP_SET:
4250 		return con_font_set(vc, op);
4251 	case KD_FONT_OP_GET:
4252 		return con_font_get(vc, op);
4253 	case KD_FONT_OP_SET_DEFAULT:
4254 		return con_font_default(vc, op);
4255 	case KD_FONT_OP_COPY:
4256 		/* was buggy and never really used */
4257 		return -EINVAL;
4258 	}
4259 	return -ENOSYS;
4260 }
4261 
4262 /*
4263  *	Interface exported to selection and vcs.
4264  */
4265 
4266 /* used by selection */
screen_glyph(struct vc_data * vc,int offset)4267 u16 screen_glyph(struct vc_data *vc, int offset)
4268 {
4269 	u16 w = scr_readw(screenpos(vc, offset, 1));
4270 	u16 c = w & 0xff;
4271 
4272 	if (w & vc->vc_hi_font_mask)
4273 		c |= 0x100;
4274 	return c;
4275 }
4276 EXPORT_SYMBOL_GPL(screen_glyph);
4277 
4278 /* used by vcs - note the word offset */
screen_pos(struct vc_data * vc,int w_offset,int viewed)4279 unsigned short *screen_pos(struct vc_data *vc, int w_offset, int viewed)
4280 {
4281 	return screenpos(vc, 2 * w_offset, viewed);
4282 }
4283 
getconsxy(struct vc_data * vc,unsigned char * p)4284 void getconsxy(struct vc_data *vc, unsigned char *p)
4285 {
4286 	p[0] = vc->vc_x;
4287 	p[1] = vc->vc_y;
4288 }
4289 
putconsxy(struct vc_data * vc,unsigned char * p)4290 void putconsxy(struct vc_data *vc, unsigned char *p)
4291 {
4292 	hide_cursor(vc);
4293 	gotoxy(vc, p[0], p[1]);
4294 	set_cursor(vc);
4295 }
4296 
vcs_scr_readw(struct vc_data * vc,const u16 * org)4297 u16 vcs_scr_readw(struct vc_data *vc, const u16 *org)
4298 {
4299 	if ((unsigned long)org == vc->vc_pos && softcursor_original != -1)
4300 		return softcursor_original;
4301 	return scr_readw(org);
4302 }
4303 
vcs_scr_writew(struct vc_data * vc,u16 val,u16 * org)4304 void vcs_scr_writew(struct vc_data *vc, u16 val, u16 *org)
4305 {
4306 	scr_writew(val, org);
4307 	if ((unsigned long)org == vc->vc_pos) {
4308 		softcursor_original = -1;
4309 		add_softcursor(vc);
4310 	}
4311 }
4312 
vcs_scr_updated(struct vc_data * vc)4313 void vcs_scr_updated(struct vc_data *vc)
4314 {
4315 	notify_update(vc);
4316 }
4317 
4318 /*
4319  *	Visible symbols for modules
4320  */
4321 
4322 EXPORT_SYMBOL(color_table);
4323 EXPORT_SYMBOL(default_red);
4324 EXPORT_SYMBOL(default_grn);
4325 EXPORT_SYMBOL(default_blu);
4326 EXPORT_SYMBOL(update_region);
4327 EXPORT_SYMBOL(redraw_screen);
4328 EXPORT_SYMBOL(vc_resize);
4329 EXPORT_SYMBOL(fg_console);
4330 EXPORT_SYMBOL(console_blank_hook);
4331 EXPORT_SYMBOL(console_blanked);
4332 EXPORT_SYMBOL(vc_cons);
4333 EXPORT_SYMBOL(global_cursor_default);
4334 #ifndef VT_SINGLE_DRIVER
4335 EXPORT_SYMBOL(give_up_console);
4336 #endif
4337