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 <[email protected]>
   5  *      Copyright (C) 2002 Helge Deller <[email protected]>
   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 <[email protected]>, 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 [[email protected]]
  20  *
  21  *            with work by William Rucklidge ([email protected])
  22  *                         Geert Uytterhoeven
  23  *                         Jes Sorensen ([email protected])
  24  *                         Martin Apel
  25  *            with work by Guenther Kelleter
  26  *                         Martin Schaller
  27  *                         Andreas Schwab
  28  *                         Emmanuel Marty ([email protected])
  29  *                         Jakub Jelinek ([email protected])
  30  *                         Martin Mares <[email protected]>
  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");