drivers/video/console/sticon.c

   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/tty.h>
  41 #include <linux/console.h>
  42 #include <linux/errno.h>
  43 #include <linux/vt_kern.h>
  44 #include <linux/kd.h>
  45 #include <linux/selection.h>
  46 #include <linux/module.h>
  47
  48 #include <asm/io.h>
  49
  50 #include "../sticore.h"
  51
  52 /* switching to graphics mode */
  53 #define BLANK 0
  54 static int vga_is_gfx;
  55
  56 /* this is the sti_struct used for this console */
  57 static struct sti_struct *sticon_sti;
  58
  59 /* Software scrollback */
  60 static unsigned long softback_buf, softback_curr;
  61 static unsigned long softback_in;
  62 static unsigned long /* softback_top, */ softback_end;
  63 static int softback_lines;
  64
  65 /* software cursor */
  66 static int cursor_drawn;
  67 #define CURSOR_DRAW_DELAY               (1)
  68 #define DEFAULT_CURSOR_BLINK_RATE       (20)
  69
  70 static int vbl_cursor_cnt;
  71
  72 static inline void cursor_undrawn(void)
  73 {
  74     vbl_cursor_cnt = 0;
  75     cursor_drawn = 0;
  76 }
  77
  78 static const char *__init sticon_startup(void)
  79 {
  80     return "STI console";
  81 }
  82
  83 static int sticon_set_palette(struct vc_data *c, unsigned char *table)
  84 {
  85     return -EINVAL;
  86 }
  87
  88 static int sticon_font_op(struct vc_data *c, struct console_font_op *op)
  89 {
  90     return -ENOSYS;
  91 }
  92
  93 static void sticon_putc(struct vc_data *conp, int c, int ypos, int xpos)
  94 {
  95     int unit = conp->vc_num;
  96     int redraw_cursor = 0;
  97
  98     if (vga_is_gfx || console_blanked)
  99             return;
 100
 101     if (vt_cons[unit]->vc_mode != KD_TEXT)
 102             return;
 103 #if 0
 104     if ((p->cursor_x == xpos) && (p->cursor_y == ypos)) {
 105             cursor_undrawn();
 106             redraw_cursor = 1;
 107     }
 108 #endif
 109
 110     sti_putc(sticon_sti, c, ypos, xpos);
 111
 112     if (redraw_cursor)
 113             vbl_cursor_cnt = CURSOR_DRAW_DELAY;
 114 }
 115
 116 static void sticon_putcs(struct vc_data *conp, const unsigned short *s,
 117                          int count, int ypos, int xpos)
 118 {
 119     int unit = conp->vc_num;
 120     int redraw_cursor = 0;
 121
 122     if (vga_is_gfx || console_blanked)
 123             return;
 124
 125     if (vt_cons[unit]->vc_mode != KD_TEXT)
 126             return;
 127
 128 #if 0
 129     if ((p->cursor_y == ypos) && (xpos <= p->cursor_x) &&
 130         (p->cursor_x < (xpos + count))) {
 131             cursor_undrawn();
 132             redraw_cursor = 1;
 133     }
 134 #endif
 135
 136     while (count--) {
 137         sti_putc(sticon_sti, scr_readw(s++), ypos, xpos++);
 138     }
 139
 140     if (redraw_cursor)
 141             vbl_cursor_cnt = CURSOR_DRAW_DELAY;
 142 }
 143
 144 static void sticon_cursor(struct vc_data *conp, int mode)
 145 {
 146     unsigned short car1;
 147
 148     car1 = conp->vc_screenbuf[conp->vc_x + conp->vc_y * conp->vc_cols];
 149     switch (mode) {
 150     case CM_ERASE:
 151         sti_putc(sticon_sti, car1, conp->vc_y, conp->vc_x);
 152         break;
 153     case CM_MOVE:
 154     case CM_DRAW:
 155         switch (conp->vc_cursor_type & 0x0f) {
 156         case CUR_UNDERLINE:
 157         case CUR_LOWER_THIRD:
 158         case CUR_LOWER_HALF:
 159         case CUR_TWO_THIRDS:
 160         case CUR_BLOCK:
 161             sti_putc(sticon_sti, (car1 & 255) + (0 << 8) + (7 << 11),
 162                      conp->vc_y, conp->vc_x);
 163             break;
 164         }
 165         break;
 166     }
 167 }
 168
 169 static int sticon_scroll(struct vc_data *conp, int t, int b, int dir, int count)
 170 {
 171     struct sti_struct *sti = sticon_sti;
 172
 173     if (vga_is_gfx)
 174         return 0;
 175
 176     sticon_cursor(conp, CM_ERASE);
 177
 178     switch (dir) {
 179     case SM_UP:
 180         sti_bmove(sti, t + count, 0, t, 0, b - t - count, conp->vc_cols);
 181         sti_clear(sti, b - count, 0, count, conp->vc_cols, conp->vc_video_erase_char);
 182         break;
 183
 184     case SM_DOWN:
 185         sti_bmove(sti, t, 0, t + count, 0, b - t - count, conp->vc_cols);
 186         sti_clear(sti, t, 0, count, conp->vc_cols, conp->vc_video_erase_char);
 187         break;
 188     }
 189
 190     return 0;
 191 }
 192
 193 static void sticon_bmove(struct vc_data *conp, int sy, int sx,
 194         int dy, int dx, int height, int width)
 195 {
 196     if (!width || !height)
 197             return;
 198 #if 0
 199     if (((sy <= p->cursor_y) && (p->cursor_y < sy+height) &&
 200         (sx <= p->cursor_x) && (p->cursor_x < sx+width)) ||
 201         ((dy <= p->cursor_y) && (p->cursor_y < dy+height) &&
 202         (dx <= p->cursor_x) && (p->cursor_x < dx+width)))
 203                 sticon_cursor(p, CM_ERASE /*|CM_SOFTBACK*/);
 204 #endif
 205
 206     sti_bmove(sticon_sti, sy, sx, dy, dx, height, width);
 207 }
 208
 209 static void sticon_init(struct vc_data *c, int init)
 210 {
 211     struct sti_struct *sti = sticon_sti;
 212     int vc_cols, vc_rows;
 213
 214     sti_set(sti, 0, 0, sti_onscreen_y(sti), sti_onscreen_x(sti), 0);
 215     vc_cols = sti_onscreen_x(sti) / sti->font_width;
 216     vc_rows = sti_onscreen_y(sti) / sti->font_height;
 217     c->vc_can_do_color = 1;
 218
 219     if (init) {
 220         c->vc_cols = vc_cols;
 221         c->vc_rows = vc_rows;
 222     } else {
 223         /* vc_rows = (c->vc_rows > vc_rows) ? vc_rows : c->vc_rows; */
 224         /* vc_cols = (c->vc_cols > vc_cols) ? vc_cols : c->vc_cols; */
 225         vc_resize(c->vc_num, vc_cols, vc_rows);
 226 /*      vc_resize_con(vc_rows, vc_cols, c->vc_num); */
 227     }
 228 }
 229
 230 static void sticon_deinit(struct vc_data *c)
 231 {
 232 }
 233
 234 static void sticon_clear(struct vc_data *conp, int sy, int sx, int height,
 235                          int width)
 236 {
 237     if (!height || !width)
 238         return;
 239
 240     sti_clear(sticon_sti, sy, sx, height, width, conp->vc_video_erase_char);
 241 }
 242
 243 static int sticon_switch(struct vc_data *conp)
 244 {
 245     return 1;   /* needs refreshing */
 246 }
 247
 248 static int sticon_set_origin(struct vc_data *conp)
 249 {
 250     return 0;
 251 }
 252
 253 static int sticon_blank(struct vc_data *c, int blank)
 254 {
 255     switch (blank) {
 256     case 0:             /* unblank */
 257         vga_is_gfx = 0;
 258         /* Tell console.c that it has to restore the screen itself */
 259         return 1;
 260     case 1:             /* normal blanking */
 261     default:            /* VESA blanking */
 262         if (vga_is_gfx)
 263                 return 0;
 264         sticon_set_origin(c);
 265         sti_clear(sticon_sti, 0,0, c->vc_rows, c->vc_cols, BLANK);
 266         return 1;
 267     case -1:            /* Entering graphic mode */
 268         sti_clear(sticon_sti, 0,0, c->vc_rows, c->vc_cols, BLANK);
 269         vga_is_gfx = 1;
 270         return 1;
 271     }
 272     return 1;           /* console needs to restore screen itself */
 273 }
 274
 275 static int sticon_scrolldelta(struct vc_data *conp, int lines)
 276 {
 277     return 0;
 278 }
 279
 280 static u16 *sticon_screen_pos(struct vc_data *conp, int offset)
 281 {
 282     int line;
 283     unsigned long p;
 284
 285     if (conp->vc_num != fg_console || !softback_lines)
 286         return (u16 *)(conp->vc_origin + offset);
 287     line = offset / conp->vc_size_row;
 288     if (line >= softback_lines)
 289         return (u16 *)(conp->vc_origin + offset - softback_lines * conp->vc_size_row);
 290     p = softback_curr + offset;
 291     if (p >= softback_end)
 292         p += softback_buf - softback_end;
 293     return (u16 *)p;
 294 }
 295
 296 static unsigned long sticon_getxy(struct vc_data *conp, unsigned long pos,
 297                                   int *px, int *py)
 298 {
 299     int x, y;
 300     unsigned long ret;
 301     if (pos >= conp->vc_origin && pos < conp->vc_scr_end) {
 302         unsigned long offset = (pos - conp->vc_origin) / 2;
 303
 304         x = offset % conp->vc_cols;
 305         y = offset / conp->vc_cols;
 306         if (conp->vc_num == fg_console)
 307             y += softback_lines;
 308         ret = pos + (conp->vc_cols - x) * 2;
 309     } else if (conp->vc_num == fg_console && softback_lines) {
 310         unsigned long offset = pos - softback_curr;
 311
 312         if (pos < softback_curr)
 313             offset += softback_end - softback_buf;
 314         offset /= 2;
 315         x = offset % conp->vc_cols;
 316         y = offset / conp->vc_cols;
 317         ret = pos + (conp->vc_cols - x) * 2;
 318         if (ret == softback_end)
 319             ret = softback_buf;
 320         if (ret == softback_in)
 321             ret = conp->vc_origin;
 322     } else {
 323         /* Should not happen */
 324         x = y = 0;
 325         ret = conp->vc_origin;
 326     }
 327     if (px) *px = x;
 328     if (py) *py = y;
 329     return ret;
 330 }
 331
 332 static u8 sticon_build_attr(struct vc_data *conp, u8 color, u8 intens,
 333                             u8 blink, u8 underline, u8 reverse)
 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
 344 static void sticon_invert_region(struct vc_data *conp, u16 *p, int count)
 345 {
 346     int col = 1; /* vga_can_do_color; */
 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
 360 static void sticon_save_screen(struct vc_data *conp)
 361 {
 362 }
 363
 364 static struct consw sti_con = {
 365         .con_startup            = sticon_startup,
 366         .con_init               = sticon_init,
 367         .con_deinit             = sticon_deinit,
 368         .con_clear              = sticon_clear,
 369         .con_putc               = sticon_putc,
 370         .con_putcs              = sticon_putcs,
 371         .con_cursor             = sticon_cursor,
 372         .con_scroll             = sticon_scroll,
 373         .con_bmove              = sticon_bmove,
 374         .con_switch             = sticon_switch,
 375         .con_blank              = sticon_blank,
 376         .con_font_op            = sticon_font_op,
 377         .con_set_palette        = sticon_set_palette,
 378         .con_scrolldelta        = sticon_scrolldelta,
 379         .con_set_origin         = sticon_set_origin,
 380         .con_save_screen        = sticon_save_screen,
 381         .con_build_attr         = sticon_build_attr,
 382         .con_invert_region      = sticon_invert_region,
 383         .con_screen_pos         = sticon_screen_pos,
 384         .con_getxy              = sticon_getxy,
 385 };
 386
 387
 388
 389 int __init sticonsole_init(void)
 390 {
 391     /* already initialized ? */
 392     if (sticon_sti)
 393          return 0;
 394
 395     sticon_sti = sti_get_rom(0);
 396     if (!sticon_sti)
 397         return -ENODEV;
 398
 399     if (conswitchp == &dummy_con) {
 400         printk(KERN_INFO "sticon: Initializing STI text console.\n");
 401         take_over_console(&sti_con, 0, MAX_NR_CONSOLES - 1, 1);
 402     }
 403     return 0;
 404 }
 405
 406 module_init(sticonsole_init);
 407 MODULE_LICENSE("GPL");