xref: /linux/drivers/video/console/sticon.c (revision 96ac6d435100450f0565708d9b885ea2a7400e0a)
1 /*
2  *  linux/drivers/video/console/sticon.c - console driver using HP's STI firmware
3  *
4  *	Copyright (C) 2000 Philipp Rumpf <prumpf@tux.org>
5  *	Copyright (C) 2002 Helge Deller <deller@gmx.de>
6  *
7  *  Based on linux/drivers/video/vgacon.c and linux/drivers/video/fbcon.c,
8  *  which were
9  *
10  *	Created 28 Sep 1997 by Geert Uytterhoeven
11  *	Rewritten by Martin Mares <mj@ucw.cz>, July 1998
12  *	Copyright (C) 1991, 1992  Linus Torvalds
13  *			    1995  Jay Estabrook
14  *	Copyright (C) 1995 Geert Uytterhoeven
15  *	Copyright (C) 1993 Bjoern Brauel
16  *			   Roman Hodek
17  *	Copyright (C) 1993 Hamish Macdonald
18  *			   Greg Harp
19  *	Copyright (C) 1994 David Carter [carter@compsci.bristol.ac.uk]
20  *
21  *	      with work by William Rucklidge (wjr@cs.cornell.edu)
22  *			   Geert Uytterhoeven
23  *			   Jes Sorensen (jds@kom.auc.dk)
24  *			   Martin Apel
25  *	      with work by Guenther Kelleter
26  *			   Martin Schaller
27  *			   Andreas Schwab
28  *			   Emmanuel Marty (core@ggi-project.org)
29  *			   Jakub Jelinek (jj@ultra.linux.cz)
30  *			   Martin Mares <mj@ucw.cz>
31  *
32  *  This file is subject to the terms and conditions of the GNU General Public
33  *  License.  See the file COPYING in the main directory of this archive for
34  *  more details.
35  *
36  */
37 
38 #include <linux/init.h>
39 #include <linux/kernel.h>
40 #include <linux/console.h>
41 #include <linux/errno.h>
42 #include <linux/vt_kern.h>
43 #include <linux/kd.h>
44 #include <linux/selection.h>
45 #include <linux/module.h>
46 
47 #include <asm/io.h>
48 
49 #include "../fbdev/sticore.h"
50 
51 /* switching to graphics mode */
52 #define BLANK 0
53 static int vga_is_gfx;
54 
55 /* this is the sti_struct used for this console */
56 static struct sti_struct *sticon_sti;
57 
58 /* Software scrollback */
59 static unsigned long softback_buf, softback_curr;
60 static unsigned long softback_in;
61 static unsigned long /* softback_top, */ softback_end;
62 static int softback_lines;
63 
64 /* software cursor */
65 static int cursor_drawn;
66 #define CURSOR_DRAW_DELAY		(1)
67 #define DEFAULT_CURSOR_BLINK_RATE	(20)
68 
69 static int vbl_cursor_cnt;
70 
71 static inline void cursor_undrawn(void)
72 {
73     vbl_cursor_cnt = 0;
74     cursor_drawn = 0;
75 }
76 
77 static const char *sticon_startup(void)
78 {
79     return "STI console";
80 }
81 
82 static void sticon_putc(struct vc_data *conp, int c, int ypos, int xpos)
83 {
84     int redraw_cursor = 0;
85 
86     if (vga_is_gfx || console_blanked)
87 	    return;
88 
89     if (conp->vc_mode != KD_TEXT)
90     	    return;
91 #if 0
92     if ((p->cursor_x == xpos) && (p->cursor_y == ypos)) {
93 	    cursor_undrawn();
94 	    redraw_cursor = 1;
95     }
96 #endif
97 
98     sti_putc(sticon_sti, c, ypos, xpos);
99 
100     if (redraw_cursor)
101 	    vbl_cursor_cnt = CURSOR_DRAW_DELAY;
102 }
103 
104 static void sticon_putcs(struct vc_data *conp, const unsigned short *s,
105 			 int count, int ypos, int xpos)
106 {
107     int redraw_cursor = 0;
108 
109     if (vga_is_gfx || console_blanked)
110 	    return;
111 
112     if (conp->vc_mode != KD_TEXT)
113     	    return;
114 
115 #if 0
116     if ((p->cursor_y == ypos) && (xpos <= p->cursor_x) &&
117 	(p->cursor_x < (xpos + count))) {
118 	    cursor_undrawn();
119 	    redraw_cursor = 1;
120     }
121 #endif
122 
123     while (count--) {
124 	sti_putc(sticon_sti, scr_readw(s++), ypos, xpos++);
125     }
126 
127     if (redraw_cursor)
128 	    vbl_cursor_cnt = CURSOR_DRAW_DELAY;
129 }
130 
131 static void sticon_cursor(struct vc_data *conp, int mode)
132 {
133     unsigned short car1;
134 
135     car1 = conp->vc_screenbuf[conp->vc_x + conp->vc_y * conp->vc_cols];
136     switch (mode) {
137     case CM_ERASE:
138 	sti_putc(sticon_sti, car1, conp->vc_y, conp->vc_x);
139 	break;
140     case CM_MOVE:
141     case CM_DRAW:
142 	switch (conp->vc_cursor_type & 0x0f) {
143 	case CUR_UNDERLINE:
144 	case CUR_LOWER_THIRD:
145 	case CUR_LOWER_HALF:
146 	case CUR_TWO_THIRDS:
147 	case CUR_BLOCK:
148 	    sti_putc(sticon_sti, (car1 & 255) + (0 << 8) + (7 << 11),
149 		     conp->vc_y, conp->vc_x);
150 	    break;
151 	}
152 	break;
153     }
154 }
155 
156 static bool sticon_scroll(struct vc_data *conp, unsigned int t,
157 		unsigned int b, enum con_scroll dir, unsigned int count)
158 {
159     struct sti_struct *sti = sticon_sti;
160 
161     if (vga_is_gfx)
162         return false;
163 
164     sticon_cursor(conp, CM_ERASE);
165 
166     switch (dir) {
167     case SM_UP:
168 	sti_bmove(sti, t + count, 0, t, 0, b - t - count, conp->vc_cols);
169 	sti_clear(sti, b - count, 0, count, conp->vc_cols, conp->vc_video_erase_char);
170 	break;
171 
172     case SM_DOWN:
173 	sti_bmove(sti, t, 0, t + count, 0, b - t - count, conp->vc_cols);
174 	sti_clear(sti, t, 0, count, conp->vc_cols, conp->vc_video_erase_char);
175 	break;
176     }
177 
178     return false;
179 }
180 
181 static void sticon_init(struct vc_data *c, int init)
182 {
183     struct sti_struct *sti = sticon_sti;
184     int vc_cols, vc_rows;
185 
186     sti_set(sti, 0, 0, sti_onscreen_y(sti), sti_onscreen_x(sti), 0);
187     vc_cols = sti_onscreen_x(sti) / sti->font_width;
188     vc_rows = sti_onscreen_y(sti) / sti->font_height;
189     c->vc_can_do_color = 1;
190 
191     if (init) {
192 	c->vc_cols = vc_cols;
193 	c->vc_rows = vc_rows;
194     } else {
195 	/* vc_rows = (c->vc_rows > vc_rows) ? vc_rows : c->vc_rows; */
196 	/* vc_cols = (c->vc_cols > vc_cols) ? vc_cols : c->vc_cols; */
197 	vc_resize(c, vc_cols, vc_rows);
198 /*	vc_resize_con(vc_rows, vc_cols, c->vc_num); */
199     }
200 }
201 
202 static void sticon_deinit(struct vc_data *c)
203 {
204 }
205 
206 static void sticon_clear(struct vc_data *conp, int sy, int sx, int height,
207 			 int width)
208 {
209     if (!height || !width)
210 	return;
211 
212     sti_clear(sticon_sti, sy, sx, height, width, conp->vc_video_erase_char);
213 }
214 
215 static int sticon_switch(struct vc_data *conp)
216 {
217     return 1;	/* needs refreshing */
218 }
219 
220 static int sticon_set_origin(struct vc_data *conp)
221 {
222     return 0;
223 }
224 
225 static int sticon_blank(struct vc_data *c, int blank, int mode_switch)
226 {
227     if (blank == 0) {
228 	if (mode_switch)
229 	    vga_is_gfx = 0;
230 	return 1;
231     }
232     sticon_set_origin(c);
233     sti_clear(sticon_sti, 0,0, c->vc_rows, c->vc_cols, BLANK);
234     if (mode_switch)
235 	vga_is_gfx = 1;
236     return 1;
237 }
238 
239 static u16 *sticon_screen_pos(struct vc_data *conp, int offset)
240 {
241     int line;
242     unsigned long p;
243 
244     if (conp->vc_num != fg_console || !softback_lines)
245     	return (u16 *)(conp->vc_origin + offset);
246     line = offset / conp->vc_size_row;
247     if (line >= softback_lines)
248     	return (u16 *)(conp->vc_origin + offset - softback_lines * conp->vc_size_row);
249     p = softback_curr + offset;
250     if (p >= softback_end)
251     	p += softback_buf - softback_end;
252     return (u16 *)p;
253 }
254 
255 static unsigned long sticon_getxy(struct vc_data *conp, unsigned long pos,
256 				  int *px, int *py)
257 {
258     int x, y;
259     unsigned long ret;
260     if (pos >= conp->vc_origin && pos < conp->vc_scr_end) {
261     	unsigned long offset = (pos - conp->vc_origin) / 2;
262 
263     	x = offset % conp->vc_cols;
264     	y = offset / conp->vc_cols;
265     	if (conp->vc_num == fg_console)
266     	    y += softback_lines;
267     	ret = pos + (conp->vc_cols - x) * 2;
268     } else if (conp->vc_num == fg_console && softback_lines) {
269     	unsigned long offset = pos - softback_curr;
270 
271     	if (pos < softback_curr)
272     	    offset += softback_end - softback_buf;
273     	offset /= 2;
274     	x = offset % conp->vc_cols;
275     	y = offset / conp->vc_cols;
276 	ret = pos + (conp->vc_cols - x) * 2;
277 	if (ret == softback_end)
278 	    ret = softback_buf;
279 	if (ret == softback_in)
280 	    ret = conp->vc_origin;
281     } else {
282     	/* Should not happen */
283     	x = y = 0;
284     	ret = conp->vc_origin;
285     }
286     if (px) *px = x;
287     if (py) *py = y;
288     return ret;
289 }
290 
291 static u8 sticon_build_attr(struct vc_data *conp, u8 color, u8 intens,
292 			    u8 blink, u8 underline, u8 reverse, u8 italic)
293 {
294     u8 attr = ((color & 0x70) >> 1) | ((color & 7));
295 
296     if (reverse) {
297 	color = ((color >> 3) & 0x7) | ((color & 0x7) << 3);
298     }
299 
300     return attr;
301 }
302 
303 static void sticon_invert_region(struct vc_data *conp, u16 *p, int count)
304 {
305     int col = 1; /* vga_can_do_color; */
306 
307     while (count--) {
308 	u16 a = scr_readw(p);
309 
310 	if (col)
311 		a = ((a) & 0x88ff) | (((a) & 0x7000) >> 4) | (((a) & 0x0700) << 4);
312 	else
313 		a = ((a & 0x0700) == 0x0100) ? 0x7000 : 0x7700;
314 
315 	scr_writew(a, p++);
316     }
317 }
318 
319 static void sticon_save_screen(struct vc_data *conp)
320 {
321 }
322 
323 static const struct consw sti_con = {
324 	.owner			= THIS_MODULE,
325 	.con_startup		= sticon_startup,
326 	.con_init		= sticon_init,
327 	.con_deinit		= sticon_deinit,
328 	.con_clear		= sticon_clear,
329 	.con_putc		= sticon_putc,
330 	.con_putcs		= sticon_putcs,
331 	.con_cursor		= sticon_cursor,
332 	.con_scroll		= sticon_scroll,
333 	.con_switch		= sticon_switch,
334 	.con_blank		= sticon_blank,
335 	.con_set_origin		= sticon_set_origin,
336 	.con_save_screen	= sticon_save_screen,
337 	.con_build_attr		= sticon_build_attr,
338 	.con_invert_region	= sticon_invert_region,
339 	.con_screen_pos		= sticon_screen_pos,
340 	.con_getxy		= sticon_getxy,
341 };
342 
343 
344 
345 static int __init sticonsole_init(void)
346 {
347     int err;
348     /* already initialized ? */
349     if (sticon_sti)
350 	 return 0;
351 
352     sticon_sti = sti_get_rom(0);
353     if (!sticon_sti)
354 	return -ENODEV;
355 
356     if (conswitchp == &dummy_con) {
357 	printk(KERN_INFO "sticon: Initializing STI text console.\n");
358 	console_lock();
359 	err = do_take_over_console(&sti_con, 0, MAX_NR_CONSOLES - 1, 1);
360 	console_unlock();
361 	return err;
362     }
363     return 0;
364 }
365 
366 module_init(sticonsole_init);
367 MODULE_LICENSE("GPL");
368