Subversion Repositories or1k

#include "common.h"

#include "support.h"

#include "screen.h"

#if CRT_ENABLED

unsigned long fg_color = COLOR_WHITE;

unsigned long bg_color = COLOR_BLACK;

int cx = 0;

int cy = 0;

extern unsigned char font[256][12];

static char screen[CHARSY][CHARSX];

void put_char_xy (int x, int y, char c) {

  int i, j;

  screen[y][x] = c;

  x *= CHAR_WIDTH;

  y *= CHAR_HEIGHT;

  for (i = 0; i < CHAR_HEIGHT; i++) {

    int t = font[(unsigned char)c][i];

    for (j = 0; j < CHAR_WIDTH; j++) {

      PUT_PIXEL(x + j, y + i, (t & 1) ? fg_color : bg_color);

      t >>= 1;

    }

  }

}

static void scroll (void) {

  int x,y;

#if 1

  for (y = 1; y < CHARSY; y++)

    for (x = 0; x < CHARSX; x++)

      put_char_xy (x, y-1, screen[y][x]);

#else

  memcpy ( (unsigned char *)FB_BASE_ADDR, ((unsigned char *)FB_BASE_ADDR) + RESX * CHAR_HEIGHT,  (RESY - CHAR_HEIGHT) * RESX);

  memcpy (&screen[0][0], &screen[1][0], (CHARSY - 1) * CHARSX);

#endif

  for (x = 0; x < CHARSX; x++)

    put_char_xy (x, CHARSY-1, ' ');

  cy--;

}

void screen_putc (char c) {

  int t;

  switch (c) {

  case '\n':

    cy++;

    cx = 0;

    if (cy >= CHARSY)

      scroll();

    break;

  case '\r':

    cx = 0;

    break;

  case '\t':

    for (t = 0; t < 8 - (cx & 7); t++)

      screen_putc (' ');

    break;

  case '\b':

    if (cx > 0) cx--;

    put_char_xy(cx, cy, ' ');

    break;

  default:

    put_char_xy(cx, cy, c);

    cx++;

    if(cx >= CHARSX) screen_putc ('\n');

    break;

  }

}

void screen_clear () {

  memset ((unsigned char *)FB_BASE_ADDR, bg_color, RESX * RESY);

  memset (&screen[0][0], ' ', CHARSX * CHARSY);

  cx = cy = 0;

}

void screen_puts (char *s) {

  while (*s) {

    screen_putc (*s);

    s++;

  }

}

void screen_init () {

  screen_clear ();

  SET_PALLETE(COLOR_BLACK, 0, 0, 0);

  SET_PALLETE(COLOR_WHITE, 127, 127, 127);

  /* Set screen offset */

  *((unsigned long *)CRT_BUFFER_REG) = FB_BASE_ADDR;

  /* Turn screen on */

  *((unsigned long *)CRT_REG) = 0x00000001;

}

#endif /* CRT_ENABLED */