/* Public Domain Curses */ #include "pdcsdl.h" RCSID("$Id: pdcdisp.c,v 1.35 2008/07/14 04:24:52 wmcbrine Exp $") #include #include #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; } }