| /* Public Domain Curses */ |
| |
| #include "pdcsdl.h" |
| |
| RCSID("$Id: pdcdisp.c,v 1.35 2008/07/14 04:24:52 wmcbrine Exp $") |
| |
| #include <stdlib.h> |
| #include <string.h> |
| |
| #ifdef CHTYPE_LONG |
| |
| # define A(x) ((chtype)x | A_ALTCHARSET) |
| |
| chtype acs_map[128] = |
| { |
| A(0), A(1), A(2), A(3), A(4), A(5), A(6), A(7), A(8), A(9), |
| A(10), A(11), A(12), A(13), A(14), A(15), A(16), A(17), A(18), |
| A(19), A(20), A(21), A(22), A(23), A(24), A(25), A(26), A(27), |
| A(28), A(29), A(30), A(31), ' ', '!', '"', '#', '$', '%', '&', |
| '\'', '(', ')', '*', |
| |
| A(0x1a), A(0x1b), A(0x18), A(0x19), |
| |
| '/', |
| |
| 0xdb, |
| |
| '1', '2', '3', '4', '5', '6', '7', '8', '9', ':', ';', '<', '=', |
| '>', '?', '@', 'A', 'B', 'C', 'D', 'E', 'F', 'G', 'H', 'I', 'J', |
| 'K', 'L', 'M', 'N', 'O', 'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W', |
| 'X', 'Y', 'Z', '[', '\\', ']', '^', '_', |
| |
| A(0x04), 0xb1, |
| |
| 'b', 'c', 'd', 'e', |
| |
| 0xf8, 0xf1, 0xb0, A(0x0f), 0xd9, 0xbf, 0xda, 0xc0, 0xc5, 0x2d, |
| 0x2d, 0xc4, 0x2d, 0x5f, 0xc3, 0xb4, 0xc1, 0xc2, 0xb3, 0xf3, |
| 0xf2, 0xe3, 0xd8, 0x9c, 0xf9, |
| |
| A(127) |
| }; |
| |
| # undef A |
| |
| #endif |
| |
| Uint32 pdc_lastupdate = 0; |
| |
| #define MAXRECT 200 /* maximum number of rects to queue up before |
| an update is forced; the number was chosen |
| arbitrarily */ |
| |
| static SDL_Rect uprect[MAXRECT]; /* table of rects to update */ |
| static chtype oldch = (chtype)(-1); /* current attribute */ |
| static int rectcount = 0; /* index into uprect */ |
| static short foregr = -2, backgr = -2; /* current foreground, background */ |
| |
| /* do the real updates on a delay */ |
| |
| void PDC_update_rects(void) |
| { |
| if (rectcount) |
| { |
| /* if the maximum number of rects has been reached, we're |
| probably better off doing a full screen update */ |
| |
| if (rectcount == MAXRECT) |
| SDL_Flip(pdc_screen); |
| else |
| SDL_UpdateRects(pdc_screen, rectcount, uprect); |
| |
| pdc_lastupdate = SDL_GetTicks(); |
| rectcount = 0; |
| } |
| } |
| |
| /* set the font colors to match the chtype's attribute */ |
| |
| static void _set_attr(chtype ch) |
| { |
| ch &= (A_COLOR|A_BOLD|A_BLINK|A_REVERSE); |
| |
| if (oldch != ch) |
| { |
| short newfg, newbg; |
| |
| if (SP->mono) |
| return; |
| |
| PDC_pair_content(PAIR_NUMBER(ch), &newfg, &newbg); |
| |
| newfg |= (ch & A_BOLD) ? 8 : 0; |
| newbg |= (ch & A_BLINK) ? 8 : 0; |
| |
| if (ch & A_REVERSE) |
| { |
| short tmp = newfg; |
| newfg = newbg; |
| newbg = tmp; |
| } |
| |
| if (newfg != foregr) |
| { |
| SDL_SetPalette(pdc_font, SDL_LOGPAL, |
| pdc_color + newfg, pdc_flastc, 1); |
| foregr = newfg; |
| } |
| |
| if (newbg != backgr) |
| { |
| if (newbg == -1) |
| SDL_SetColorKey(pdc_font, SDL_SRCCOLORKEY, 0); |
| else |
| { |
| if (backgr == -1) |
| SDL_SetColorKey(pdc_font, 0, 0); |
| |
| SDL_SetPalette(pdc_font, SDL_LOGPAL, |
| pdc_color + newbg, 0, 1); |
| } |
| |
| backgr = newbg; |
| } |
| |
| oldch = ch; |
| } |
| } |
| |
| /* draw a cursor at (y, x) */ |
| |
| void PDC_gotoyx(int row, int col) |
| { |
| SDL_Rect src, dest; |
| chtype ch; |
| int oldrow, oldcol; |
| |
| PDC_LOG(("PDC_gotoyx() - called: row %d col %d from row %d col %d\n", |
| row, col, SP->cursrow, SP->curscol)); |
| |
| if (SP->mono) |
| return; |
| |
| oldrow = SP->cursrow; |
| oldcol = SP->curscol; |
| |
| /* clear the old cursor */ |
| |
| PDC_transform_line(oldrow, oldcol, 1, curscr->_y[oldrow] + oldcol); |
| |
| if (!SP->visibility) |
| return; |
| |
| /* draw a new cursor by overprinting the existing character in |
| reverse, either the full cell (when visibility == 2) or the |
| lowest quarter of it (when visibility == 1) */ |
| |
| ch = curscr->_y[row][col] ^ A_REVERSE; |
| |
| _set_attr(ch); |
| |
| #ifdef CHTYPE_LONG |
| if (ch & A_ALTCHARSET && !(ch & 0xff80)) |
| ch = acs_map[ch & 0x7f]; |
| #endif |
| src.h = (SP->visibility == 1) ? pdc_fheight >> 2 : pdc_fheight; |
| src.w = pdc_fwidth; |
| |
| dest.y = (row + 1) * pdc_fheight - src.h + pdc_yoffset; |
| dest.x = col * pdc_fwidth + pdc_xoffset; |
| |
| src.x = (ch & 0xff) % 32 * pdc_fwidth; |
| src.y = (ch & 0xff) / 32 * pdc_fheight + (pdc_fheight - src.h); |
| |
| SDL_BlitSurface(pdc_font, &src, pdc_screen, &dest); |
| |
| if (oldrow != row || oldcol != col) |
| { |
| if (rectcount == MAXRECT) |
| PDC_update_rects(); |
| |
| uprect[rectcount++] = dest; |
| } |
| } |
| |
| /* handle the A_*LINE attributes */ |
| |
| static void _highlight(SDL_Rect *src, SDL_Rect *dest, chtype ch) |
| { |
| short col = SP->line_color; |
| |
| if (SP->mono) |
| return; |
| |
| if (ch & A_UNDERLINE) |
| { |
| if (col != -1) |
| SDL_SetPalette(pdc_font, SDL_LOGPAL, |
| pdc_color + col, pdc_flastc, 1); |
| |
| src->x = '_' % 32 * pdc_fwidth; |
| src->y = '_' / 32 * pdc_fheight; |
| |
| if (backgr != -1) |
| SDL_SetColorKey(pdc_font, SDL_SRCCOLORKEY, 0); |
| |
| SDL_BlitSurface(pdc_font, src, pdc_screen, dest); |
| |
| if (backgr != -1) |
| SDL_SetColorKey(pdc_font, 0, 0); |
| |
| if (col != -1) |
| SDL_SetPalette(pdc_font, SDL_LOGPAL, |
| pdc_color + foregr, pdc_flastc, 1); |
| } |
| |
| if (ch & (A_LEFTLINE|A_RIGHTLINE)) |
| { |
| if (col == -1) |
| col = foregr; |
| |
| dest->w = 1; |
| |
| if (ch & A_LEFTLINE) |
| SDL_FillRect(pdc_screen, dest, pdc_mapped[col]); |
| |
| if (ch & A_RIGHTLINE) |
| { |
| dest->x += pdc_fwidth - 1; |
| SDL_FillRect(pdc_screen, dest, pdc_mapped[col]); |
| dest->x -= pdc_fwidth - 1; |
| } |
| |
| dest->w = pdc_fwidth; |
| } |
| } |
| |
| /* update the given physical line to look like the corresponding line in |
| curscr */ |
| |
| void PDC_transform_line(int lineno, int x, int len, const chtype *srcp) |
| { |
| SDL_Rect src, dest, lastrect; |
| int j; |
| |
| PDC_LOG(("PDC_transform_line() - called: lineno=%d\n", lineno)); |
| |
| if (rectcount == MAXRECT) |
| PDC_update_rects(); |
| |
| src.h = pdc_fheight; |
| src.w = pdc_fwidth; |
| |
| dest.y = pdc_fheight * lineno + pdc_yoffset; |
| dest.x = pdc_fwidth * x + pdc_xoffset; |
| dest.h = pdc_fheight; |
| dest.w = pdc_fwidth * len; |
| |
| /* if the previous rect was just above this one, with the same width |
| and horizontal position, then merge the new one with it instead |
| of adding a new entry */ |
| |
| if (rectcount) |
| lastrect = uprect[rectcount - 1]; |
| |
| if (rectcount && lastrect.x == dest.x && lastrect.w == dest.w) |
| { |
| if (lastrect.y + lastrect.h == dest.y) |
| uprect[rectcount - 1].h = lastrect.h + pdc_fheight; |
| else |
| if (lastrect.y != dest.y) |
| uprect[rectcount++] = dest; |
| } |
| else |
| uprect[rectcount++] = dest; |
| |
| dest.w = pdc_fwidth; |
| |
| for (j = 0; j < len; j++) |
| { |
| chtype ch = srcp[j]; |
| |
| _set_attr(ch); |
| #ifdef CHTYPE_LONG |
| if (ch & A_ALTCHARSET && !(ch & 0xff80)) |
| ch = (ch & (A_ATTRIBUTES ^ A_ALTCHARSET)) | acs_map[ch & 0x7f]; |
| #endif |
| if (backgr == -1) |
| SDL_LowerBlit(pdc_tileback, &dest, pdc_screen, &dest); |
| |
| src.x = (ch & 0xff) % 32 * pdc_fwidth; |
| src.y = (ch & 0xff) / 32 * pdc_fheight; |
| |
| SDL_LowerBlit(pdc_font, &src, pdc_screen, &dest); |
| |
| if (ch & (A_UNDERLINE|A_LEFTLINE|A_RIGHTLINE)) |
| _highlight(&src, &dest, ch); |
| |
| dest.x += pdc_fwidth; |
| } |
| } |