1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
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#include <linux/slab.h>
47#include <linux/font.h>
48#include <linux/crc32.h>
49
50#include <asm/io.h>
51
52#include "../fbdev/sticore.h"
53
54
55#define BLANK 0
56static int vga_is_gfx;
57
58#define STI_DEF_FONT sticon_sti->font
59
60
61#define FNTREFCOUNT(fd) (fd->refcount)
62#define FNTCRC(fd) (fd->crc)
63static struct sti_cooked_font *font_data[MAX_NR_CONSOLES];
64
65
66static struct sti_struct *sticon_sti;
67
68static const char *sticon_startup(void)
69{
70 return "STI console";
71}
72
73static void sticon_putc(struct vc_data *conp, int c, int ypos, int xpos)
74{
75 if (vga_is_gfx || console_blanked)
76 return;
77
78 if (conp->vc_mode != KD_TEXT)
79 return;
80
81 sti_putc(sticon_sti, c, ypos, xpos, font_data[conp->vc_num]);
82}
83
84static void sticon_putcs(struct vc_data *conp, const unsigned short *s,
85 int count, int ypos, int xpos)
86{
87 if (vga_is_gfx || console_blanked)
88 return;
89
90 if (conp->vc_mode != KD_TEXT)
91 return;
92
93 while (count--) {
94 sti_putc(sticon_sti, scr_readw(s++), ypos, xpos++,
95 font_data[conp->vc_num]);
96 }
97}
98
99static void sticon_cursor(struct vc_data *conp, int mode)
100{
101 unsigned short car1;
102
103
104 if (vga_is_gfx || console_blanked)
105 return;
106
107 car1 = conp->vc_screenbuf[conp->state.x + conp->state.y * conp->vc_cols];
108 switch (mode) {
109 case CM_ERASE:
110 sti_putc(sticon_sti, car1, conp->state.y, conp->state.x,
111 font_data[conp->vc_num]);
112 break;
113 case CM_MOVE:
114 case CM_DRAW:
115 switch (CUR_SIZE(conp->vc_cursor_type)) {
116 case CUR_UNDERLINE:
117 case CUR_LOWER_THIRD:
118 case CUR_LOWER_HALF:
119 case CUR_TWO_THIRDS:
120 case CUR_BLOCK:
121 sti_putc(sticon_sti, (car1 & 255) + (0 << 8) + (7 << 11),
122 conp->state.y, conp->state.x, font_data[conp->vc_num]);
123 break;
124 }
125 break;
126 }
127}
128
129static bool sticon_scroll(struct vc_data *conp, unsigned int t,
130 unsigned int b, enum con_scroll dir, unsigned int count)
131{
132 struct sti_struct *sti = sticon_sti;
133
134 if (vga_is_gfx)
135 return false;
136
137 sticon_cursor(conp, CM_ERASE);
138
139 switch (dir) {
140 case SM_UP:
141 sti_bmove(sti, t + count, 0, t, 0, b - t - count, conp->vc_cols,
142 font_data[conp->vc_num]);
143 sti_clear(sti, b - count, 0, count, conp->vc_cols,
144 conp->vc_video_erase_char, font_data[conp->vc_num]);
145 break;
146
147 case SM_DOWN:
148 sti_bmove(sti, t, 0, t + count, 0, b - t - count, conp->vc_cols,
149 font_data[conp->vc_num]);
150 sti_clear(sti, t, 0, count, conp->vc_cols,
151 conp->vc_video_erase_char, font_data[conp->vc_num]);
152 break;
153 }
154
155 return false;
156}
157
158static int sticon_set_def_font(int unit, struct console_font *op)
159{
160 if (font_data[unit] != STI_DEF_FONT) {
161 if (--FNTREFCOUNT(font_data[unit]) == 0) {
162 kfree(font_data[unit]->raw_ptr);
163 kfree(font_data[unit]);
164 }
165 font_data[unit] = STI_DEF_FONT;
166 }
167
168 return 0;
169}
170
171static int sticon_set_font(struct vc_data *vc, struct console_font *op)
172{
173 struct sti_struct *sti = sticon_sti;
174 int vc_cols, vc_rows, vc_old_cols, vc_old_rows;
175 int unit = vc->vc_num;
176 int w = op->width;
177 int h = op->height;
178 int size, i, bpc, pitch;
179 struct sti_rom_font *new_font;
180 struct sti_cooked_font *cooked_font;
181 unsigned char *data = op->data, *p;
182
183 if ((w < 6) || (h < 6) || (w > 32) || (h > 32)
184 || (op->charcount != 256 && op->charcount != 512))
185 return -EINVAL;
186 pitch = ALIGN(w, 8) / 8;
187 bpc = pitch * h;
188 size = bpc * op->charcount;
189
190 new_font = kmalloc(sizeof(*new_font) + size, STI_LOWMEM);
191 if (!new_font)
192 return -ENOMEM;
193
194 new_font->first_char = 0;
195 new_font->last_char = op->charcount - 1;
196 new_font->width = w;
197 new_font->height = h;
198 new_font->font_type = STI_FONT_HPROMAN8;
199 new_font->bytes_per_char = bpc;
200 new_font->underline_height = 0;
201 new_font->underline_pos = 0;
202
203 cooked_font = kzalloc(sizeof(*cooked_font), GFP_KERNEL);
204 if (!cooked_font) {
205 kfree(new_font);
206 return -ENOMEM;
207 }
208 cooked_font->raw = new_font;
209 cooked_font->raw_ptr = new_font;
210 cooked_font->width = w;
211 cooked_font->height = h;
212 FNTREFCOUNT(cooked_font) = 0;
213
214 p = (unsigned char *) new_font;
215 p += sizeof(*new_font);
216 for (i = 0; i < op->charcount; i++) {
217 memcpy(p, data, bpc);
218 data += pitch*32;
219 p += bpc;
220 }
221 FNTCRC(cooked_font) = crc32(0, new_font, size + sizeof(*new_font));
222 sti_font_convert_bytemode(sti, cooked_font);
223 new_font = cooked_font->raw_ptr;
224
225
226 for (i = 0; i < MAX_NR_CONSOLES; i++) {
227 if (font_data[i] != STI_DEF_FONT
228 && (FNTCRC(font_data[i]) == FNTCRC(cooked_font))) {
229 kfree(new_font);
230 kfree(cooked_font);
231
232 if (i == unit)
233 return 0;
234 cooked_font = font_data[i];
235 new_font = cooked_font->raw_ptr;
236 break;
237 }
238 }
239
240
241 vc_old_rows = vc->vc_rows;
242 vc_old_cols = vc->vc_cols;
243 sti_clear(sticon_sti, 0, 0, vc_old_rows, vc_old_cols,
244 vc->vc_video_erase_char, font_data[vc->vc_num]);
245
246
247 sticon_set_def_font(unit, NULL);
248
249 FNTREFCOUNT(cooked_font)++;
250 font_data[unit] = cooked_font;
251
252 vc_cols = sti_onscreen_x(sti) / cooked_font->width;
253 vc_rows = sti_onscreen_y(sti) / cooked_font->height;
254 vc_resize(vc, vc_cols, vc_rows);
255
256
257 if (vc_cols == vc_old_cols && vc_rows == vc_old_rows)
258 update_screen(vc);
259
260 return 0;
261}
262
263static int sticon_font_default(struct vc_data *vc, struct console_font *op, char *name)
264{
265 return sticon_set_def_font(vc->vc_num, op);
266}
267
268static int sticon_font_set(struct vc_data *vc, struct console_font *font,
269 unsigned int flags)
270{
271 return sticon_set_font(vc, font);
272}
273
274static void sticon_init(struct vc_data *c, int init)
275{
276 struct sti_struct *sti = sticon_sti;
277 int vc_cols, vc_rows;
278
279 sti_set(sti, 0, 0, sti_onscreen_y(sti), sti_onscreen_x(sti), 0);
280 vc_cols = sti_onscreen_x(sti) / sti->font->width;
281 vc_rows = sti_onscreen_y(sti) / sti->font->height;
282 c->vc_can_do_color = 1;
283
284 if (init) {
285 c->vc_cols = vc_cols;
286 c->vc_rows = vc_rows;
287 } else {
288 vc_resize(c, vc_cols, vc_rows);
289 }
290}
291
292static void sticon_deinit(struct vc_data *c)
293{
294 int i;
295
296
297 for (i = 0; i < MAX_NR_CONSOLES; i++)
298 sticon_set_def_font(i, NULL);
299}
300
301static void sticon_clear(struct vc_data *conp, int sy, int sx, int height,
302 int width)
303{
304 if (!height || !width)
305 return;
306
307 sti_clear(sticon_sti, sy, sx, height, width,
308 conp->vc_video_erase_char, font_data[conp->vc_num]);
309}
310
311static int sticon_switch(struct vc_data *conp)
312{
313 return 1;
314}
315
316static int sticon_blank(struct vc_data *c, int blank, int mode_switch)
317{
318 if (blank == 0) {
319 if (mode_switch)
320 vga_is_gfx = 0;
321 return 1;
322 }
323 sti_clear(sticon_sti, 0, 0, c->vc_rows, c->vc_cols, BLANK,
324 font_data[c->vc_num]);
325 if (mode_switch)
326 vga_is_gfx = 1;
327 return 1;
328}
329
330static u8 sticon_build_attr(struct vc_data *conp, u8 color,
331 enum vc_intensity intens,
332 bool blink, bool underline, bool reverse,
333 bool italic)
334{
335 u8 attr = ((color & 0x70) >> 1) | ((color & 7));
336
337 if (reverse) {
338 color = ((color >> 3) & 0x7) | ((color & 0x7) << 3);
339 }
340
341 return attr;
342}
343
344static void sticon_invert_region(struct vc_data *conp, u16 *p, int count)
345{
346 int col = 1;
347
348 while (count--) {
349 u16 a = scr_readw(p);
350
351 if (col)
352 a = ((a) & 0x88ff) | (((a) & 0x7000) >> 4) | (((a) & 0x0700) << 4);
353 else
354 a = ((a & 0x0700) == 0x0100) ? 0x7000 : 0x7700;
355
356 scr_writew(a, p++);
357 }
358}
359
360static const struct consw sti_con = {
361 .owner = THIS_MODULE,
362 .con_startup = sticon_startup,
363 .con_init = sticon_init,
364 .con_deinit = sticon_deinit,
365 .con_clear = sticon_clear,
366 .con_putc = sticon_putc,
367 .con_putcs = sticon_putcs,
368 .con_cursor = sticon_cursor,
369 .con_scroll = sticon_scroll,
370 .con_switch = sticon_switch,
371 .con_blank = sticon_blank,
372 .con_font_set = sticon_font_set,
373 .con_font_default = sticon_font_default,
374 .con_build_attr = sticon_build_attr,
375 .con_invert_region = sticon_invert_region,
376};
377
378
379
380static int __init sticonsole_init(void)
381{
382 int err, i;
383
384
385 if (sticon_sti)
386 return 0;
387
388 sticon_sti = sti_get_rom(0);
389 if (!sticon_sti)
390 return -ENODEV;
391
392 for (i = 0; i < MAX_NR_CONSOLES; i++)
393 font_data[i] = STI_DEF_FONT;
394
395 pr_info("sticon: Initializing STI text console.\n");
396 console_lock();
397 err = do_take_over_console(&sti_con, 0, MAX_NR_CONSOLES - 1,
398 PAGE0->mem_cons.cl_class != CL_DUPLEX);
399 console_unlock();
400
401 return err;
402}
403
404module_init(sticonsole_init);
405MODULE_LICENSE("GPL");
406
