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 "../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 int sticon_set_palette(struct vc_data *c, unsigned char *table) 83 { 84 return -EINVAL; 85 } 86 87 static void sticon_putc(struct vc_data *conp, int c, int ypos, int xpos) 88 { 89 int redraw_cursor = 0; 90 91 if (vga_is_gfx || console_blanked) 92 return; 93 94 if (conp->vc_mode != KD_TEXT) 95 return; 96 #if 0 97 if ((p->cursor_x == xpos) && (p->cursor_y == ypos)) { 98 cursor_undrawn(); 99 redraw_cursor = 1; 100 } 101 #endif 102 103 sti_putc(sticon_sti, c, ypos, xpos); 104 105 if (redraw_cursor) 106 vbl_cursor_cnt = CURSOR_DRAW_DELAY; 107 } 108 109 static void sticon_putcs(struct vc_data *conp, const unsigned short *s, 110 int count, int ypos, int xpos) 111 { 112 int redraw_cursor = 0; 113 114 if (vga_is_gfx || console_blanked) 115 return; 116 117 if (conp->vc_mode != KD_TEXT) 118 return; 119 120 #if 0 121 if ((p->cursor_y == ypos) && (xpos <= p->cursor_x) && 122 (p->cursor_x < (xpos + count))) { 123 cursor_undrawn(); 124 redraw_cursor = 1; 125 } 126 #endif 127 128 while (count--) { 129 sti_putc(sticon_sti, scr_readw(s++), ypos, xpos++); 130 } 131 132 if (redraw_cursor) 133 vbl_cursor_cnt = CURSOR_DRAW_DELAY; 134 } 135 136 static void sticon_cursor(struct vc_data *conp, int mode) 137 { 138 unsigned short car1; 139 140 car1 = conp->vc_screenbuf[conp->vc_x + conp->vc_y * conp->vc_cols]; 141 switch (mode) { 142 case CM_ERASE: 143 sti_putc(sticon_sti, car1, conp->vc_y, conp->vc_x); 144 break; 145 case CM_MOVE: 146 case CM_DRAW: 147 switch (conp->vc_cursor_type & 0x0f) { 148 case CUR_UNDERLINE: 149 case CUR_LOWER_THIRD: 150 case CUR_LOWER_HALF: 151 case CUR_TWO_THIRDS: 152 case CUR_BLOCK: 153 sti_putc(sticon_sti, (car1 & 255) + (0 << 8) + (7 << 11), 154 conp->vc_y, conp->vc_x); 155 break; 156 } 157 break; 158 } 159 } 160 161 static int sticon_scroll(struct vc_data *conp, int t, int b, int dir, int count) 162 { 163 struct sti_struct *sti = sticon_sti; 164 165 if (vga_is_gfx) 166 return 0; 167 168 sticon_cursor(conp, CM_ERASE); 169 170 switch (dir) { 171 case SM_UP: 172 sti_bmove(sti, t + count, 0, t, 0, b - t - count, conp->vc_cols); 173 sti_clear(sti, b - count, 0, count, conp->vc_cols, conp->vc_scrl_erase_char); 174 break; 175 176 case SM_DOWN: 177 sti_bmove(sti, t, 0, t + count, 0, b - t - count, conp->vc_cols); 178 sti_clear(sti, t, 0, count, conp->vc_cols, conp->vc_scrl_erase_char); 179 break; 180 } 181 182 return 0; 183 } 184 185 static void sticon_bmove(struct vc_data *conp, int sy, int sx, 186 int dy, int dx, int height, int width) 187 { 188 if (!width || !height) 189 return; 190 #if 0 191 if (((sy <= p->cursor_y) && (p->cursor_y < sy+height) && 192 (sx <= p->cursor_x) && (p->cursor_x < sx+width)) || 193 ((dy <= p->cursor_y) && (p->cursor_y < dy+height) && 194 (dx <= p->cursor_x) && (p->cursor_x < dx+width))) 195 sticon_cursor(p, CM_ERASE /*|CM_SOFTBACK*/); 196 #endif 197 198 sti_bmove(sticon_sti, sy, sx, dy, dx, height, width); 199 } 200 201 static void sticon_init(struct vc_data *c, int init) 202 { 203 struct sti_struct *sti = sticon_sti; 204 int vc_cols, vc_rows; 205 206 sti_set(sti, 0, 0, sti_onscreen_y(sti), sti_onscreen_x(sti), 0); 207 vc_cols = sti_onscreen_x(sti) / sti->font_width; 208 vc_rows = sti_onscreen_y(sti) / sti->font_height; 209 c->vc_can_do_color = 1; 210 211 if (init) { 212 c->vc_cols = vc_cols; 213 c->vc_rows = vc_rows; 214 } else { 215 /* vc_rows = (c->vc_rows > vc_rows) ? vc_rows : c->vc_rows; */ 216 /* vc_cols = (c->vc_cols > vc_cols) ? vc_cols : c->vc_cols; */ 217 vc_resize(c, vc_cols, vc_rows); 218 /* vc_resize_con(vc_rows, vc_cols, c->vc_num); */ 219 } 220 } 221 222 static void sticon_deinit(struct vc_data *c) 223 { 224 } 225 226 static void sticon_clear(struct vc_data *conp, int sy, int sx, int height, 227 int width) 228 { 229 if (!height || !width) 230 return; 231 232 sti_clear(sticon_sti, sy, sx, height, width, conp->vc_video_erase_char); 233 } 234 235 static int sticon_switch(struct vc_data *conp) 236 { 237 return 1; /* needs refreshing */ 238 } 239 240 static int sticon_set_origin(struct vc_data *conp) 241 { 242 return 0; 243 } 244 245 static int sticon_blank(struct vc_data *c, int blank, int mode_switch) 246 { 247 if (blank == 0) { 248 if (mode_switch) 249 vga_is_gfx = 0; 250 return 1; 251 } 252 sticon_set_origin(c); 253 sti_clear(sticon_sti, 0,0, c->vc_rows, c->vc_cols, BLANK); 254 if (mode_switch) 255 vga_is_gfx = 1; 256 return 1; 257 } 258 259 static int sticon_scrolldelta(struct vc_data *conp, int lines) 260 { 261 return 0; 262 } 263 264 static u16 *sticon_screen_pos(struct vc_data *conp, int offset) 265 { 266 int line; 267 unsigned long p; 268 269 if (conp->vc_num != fg_console || !softback_lines) 270 return (u16 *)(conp->vc_origin + offset); 271 line = offset / conp->vc_size_row; 272 if (line >= softback_lines) 273 return (u16 *)(conp->vc_origin + offset - softback_lines * conp->vc_size_row); 274 p = softback_curr + offset; 275 if (p >= softback_end) 276 p += softback_buf - softback_end; 277 return (u16 *)p; 278 } 279 280 static unsigned long sticon_getxy(struct vc_data *conp, unsigned long pos, 281 int *px, int *py) 282 { 283 int x, y; 284 unsigned long ret; 285 if (pos >= conp->vc_origin && pos < conp->vc_scr_end) { 286 unsigned long offset = (pos - conp->vc_origin) / 2; 287 288 x = offset % conp->vc_cols; 289 y = offset / conp->vc_cols; 290 if (conp->vc_num == fg_console) 291 y += softback_lines; 292 ret = pos + (conp->vc_cols - x) * 2; 293 } else if (conp->vc_num == fg_console && softback_lines) { 294 unsigned long offset = pos - softback_curr; 295 296 if (pos < softback_curr) 297 offset += softback_end - softback_buf; 298 offset /= 2; 299 x = offset % conp->vc_cols; 300 y = offset / conp->vc_cols; 301 ret = pos + (conp->vc_cols - x) * 2; 302 if (ret == softback_end) 303 ret = softback_buf; 304 if (ret == softback_in) 305 ret = conp->vc_origin; 306 } else { 307 /* Should not happen */ 308 x = y = 0; 309 ret = conp->vc_origin; 310 } 311 if (px) *px = x; 312 if (py) *py = y; 313 return ret; 314 } 315 316 static u8 sticon_build_attr(struct vc_data *conp, u8 color, u8 intens, 317 u8 blink, u8 underline, u8 reverse, u8 italic) 318 { 319 u8 attr = ((color & 0x70) >> 1) | ((color & 7)); 320 321 if (reverse) { 322 color = ((color >> 3) & 0x7) | ((color & 0x7) << 3); 323 } 324 325 return attr; 326 } 327 328 static void sticon_invert_region(struct vc_data *conp, u16 *p, int count) 329 { 330 int col = 1; /* vga_can_do_color; */ 331 332 while (count--) { 333 u16 a = scr_readw(p); 334 335 if (col) 336 a = ((a) & 0x88ff) | (((a) & 0x7000) >> 4) | (((a) & 0x0700) << 4); 337 else 338 a = ((a & 0x0700) == 0x0100) ? 0x7000 : 0x7700; 339 340 scr_writew(a, p++); 341 } 342 } 343 344 static void sticon_save_screen(struct vc_data *conp) 345 { 346 } 347 348 static const struct consw sti_con = { 349 .owner = THIS_MODULE, 350 .con_startup = sticon_startup, 351 .con_init = sticon_init, 352 .con_deinit = sticon_deinit, 353 .con_clear = sticon_clear, 354 .con_putc = sticon_putc, 355 .con_putcs = sticon_putcs, 356 .con_cursor = sticon_cursor, 357 .con_scroll = sticon_scroll, 358 .con_bmove = sticon_bmove, 359 .con_switch = sticon_switch, 360 .con_blank = sticon_blank, 361 .con_set_palette = sticon_set_palette, 362 .con_scrolldelta = sticon_scrolldelta, 363 .con_set_origin = sticon_set_origin, 364 .con_save_screen = sticon_save_screen, 365 .con_build_attr = sticon_build_attr, 366 .con_invert_region = sticon_invert_region, 367 .con_screen_pos = sticon_screen_pos, 368 .con_getxy = sticon_getxy, 369 }; 370 371 372 373 static int __init sticonsole_init(void) 374 { 375 /* already initialized ? */ 376 if (sticon_sti) 377 return 0; 378 379 sticon_sti = sti_get_rom(0); 380 if (!sticon_sti) 381 return -ENODEV; 382 383 if (conswitchp == &dummy_con) { 384 printk(KERN_INFO "sticon: Initializing STI text console.\n"); 385 return take_over_console(&sti_con, 0, MAX_NR_CONSOLES - 1, 1); 386 } 387 return 0; 388 } 389 390 module_init(sticonsole_init); 391 MODULE_LICENSE("GPL"); 392