void gettext(int left, int top, int right, int bottom, unsigned char *dest)
{
int orig_y, orig_x;
getyx(stdscr, orig_y, orig_x);
for (int y = top - 1; y <= bottom - 1; y++)
{
for (int x = left - 1; x <= right - 1; x++)
{
// FIXME make this not crap
// FIXME make it handle attributes too
wchar_t w;
mvinnwstr(y, x, &w, 1);
for (unsigned int i = 0; i < 256; i++)
{
if (cp437[i] == w)
{
*dest++ = w;
}
}
*dest = PAIR_NUMBER(inch() & A_COLOR) - 1;
if (*dest > WHITE)
*dest = MAGENTA;
if (inch() & A_BOLD)
*dest += DARKGRAY;
dest++;
}
}
move(orig_y, orig_x);
}
static int
test_inchs(int level, char **argv, WINDOW *chrwin, WINDOW *strwin)
{
WINDOW *txtbox = 0;
WINDOW *txtwin = 0;
FILE *fp;
int ch;
int txt_x = 0, txt_y = 0;
int base_y;
int limit = getmaxx(strwin) - 5;
wchar_t buffer[MAX_COLS];
if (argv[level] == 0) {
beep();
return FALSE;
}
if (level > 1) {
txtbox = newwin(LINES - BASE_Y, COLS - level, BASE_Y, level);
box(txtbox, 0, 0);
wnoutrefresh(txtbox);
txtwin = derwin(txtbox,
getmaxy(txtbox) - 2,
getmaxx(txtbox) - 2,
1, 1);
base_y = 0;
} else {
txtwin = stdscr;
base_y = BASE_Y;
}
keypad(txtwin, TRUE); /* enable keyboard mapping */
(void) cbreak(); /* take input chars one at a time, no wait for \n */
(void) noecho(); /* don't echo input */
txt_y = base_y;
txt_x = 0;
wmove(txtwin, txt_y, txt_x);
if ((fp = fopen(argv[level], "r")) != 0) {
while ((ch = fgetc(fp)) != EOF) {
if (waddch(txtwin, UChar(ch)) != OK) {
break;
}
}
fclose(fp);
} else {
wprintw(txtwin, "Cannot open:\n%s", argv[1]);
}
while (!Quit(ch = mvwgetch(txtwin, txt_y, txt_x))) {
switch (ch) {
case KEY_DOWN:
case 'j':
if (txt_y < getmaxy(txtwin) - 1)
txt_y++;
else
beep();
break;
case KEY_UP:
case 'k':
if (txt_y > base_y)
txt_y--;
else
beep();
break;
case KEY_LEFT:
case 'h':
if (txt_x > 0)
txt_x--;
else
beep();
break;
case KEY_RIGHT:
case 'l':
if (txt_x < getmaxx(txtwin) - 1)
txt_x++;
else
beep();
break;
case 'w':
test_inchs(level + 1, argv, chrwin, strwin);
if (txtbox != 0) {
touchwin(txtbox);
wnoutrefresh(txtbox);
} else {
touchwin(txtwin);
wnoutrefresh(txtwin);
}
break;
case '-':
if (limit > 0) {
--limit;
} else {
beep();
}
break;
case '+':
++limit;
break;
default:
beep();
break;
}
MvWPrintw(chrwin, 0, 0, "line:");
wclrtoeol(chrwin);
if (txtwin != stdscr) {
wmove(txtwin, txt_y, txt_x);
if (winwstr(txtwin, buffer) != ERR) {
show_1st(chrwin, 0, buffer);
}
if (mvwinwstr(txtwin, txt_y, txt_x, buffer) != ERR) {
showmore(chrwin, 1, buffer);
}
} else {
move(txt_y, txt_x);
if (inwstr(buffer) != ERR) {
show_1st(chrwin, 0, buffer);
}
if (mvinwstr(txt_y, txt_x, buffer) != ERR) {
showmore(chrwin, 1, buffer);
}
}
wnoutrefresh(chrwin);
MvWPrintw(strwin, 0, 0, "%4d:", limit);
wclrtobot(strwin);
if (txtwin != stdscr) {
wmove(txtwin, txt_y, txt_x);
if (winnwstr(txtwin, buffer, limit) != ERR) {
show_1st(strwin, 0, buffer);
}
if (mvwinnwstr(txtwin, txt_y, txt_x, buffer, limit) != ERR) {
showmore(strwin, 1, buffer);
}
} else {
move(txt_y, txt_x);
if (innwstr(buffer, limit) != ERR) {
show_1st(strwin, 0, buffer);
}
if (mvinnwstr(txt_y, txt_x, buffer, limit) != ERR) {
showmore(strwin, 1, buffer);
}
}
wnoutrefresh(strwin);
}
if (level > 1) {
delwin(txtwin);
delwin(txtbox);
}
return TRUE;
}
