catboy/ui.c

363 lines
7.8 KiB
C
Raw Normal View History

/* Copyright (C) 2018 Curtis McEnroe <june@causal.agency>
*
* This program is free software: you can redistribute it and/or modify
* it under the terms of the GNU Affero General Public License as published by
* the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* but WITHOUT ANY WARRANTY; without even the implied warranty of
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
* GNU Affero General Public License for more details.
*
* You should have received a copy of the GNU Affero General Public License
* along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
#define _XOPEN_SOURCE_EXTENDED
#include <curses.h>
#include <err.h>
#include <locale.h>
#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <sysexits.h>
#include <wchar.h>
#include <wctype.h>
#include "chat.h"
2018-08-05 18:59:51 +00:00
#define MIN(a, b) ((a) < (b) ? (a) : (b))
#define MAX(a, b) ((a) > (b) ? (a) : (b))
#define CTRL(c) ((c) & 037)
#ifndef A_ITALIC
#define A_ITALIC A_NORMAL
#endif
2018-08-05 18:59:51 +00:00
static void colorInit(void) {
start_color();
use_default_colors();
if (COLORS >= 16) {
for (short pair = 0; pair < 0x100; ++pair) {
2018-08-05 18:59:51 +00:00
if (pair < 0x10) {
init_pair(1 + pair, pair, -1);
} else {
init_pair(1 + pair, pair & 0x0F, (pair & 0xF0) >> 4);
}
}
} else {
for (short pair = 0; pair < 0100; ++pair) {
2018-08-05 18:59:51 +00:00
if (pair < 010) {
init_pair(1 + pair, pair, -1);
} else {
init_pair(1 + pair, pair & 007, (pair & 070) >> 3);
}
}
}
}
2018-08-05 18:59:51 +00:00
static attr_t attr8(short pair) {
if (COLORS >= 16 || pair < 0) return A_NORMAL;
return (pair & 0x08) ? A_BOLD : A_NORMAL;
}
static short pair8(short pair) {
if (COLORS >= 16 || pair < 0) return pair;
return (pair & 0x70) >> 1 | (pair & 0x07);
}
2018-08-04 20:02:43 +00:00
static const int TOPIC_COLS = 512;
static const int INPUT_COLS = 512;
2018-08-04 21:59:43 +00:00
static const int LOG_LINES = 100;
static int lastLine(void) {
return LINES - 1;
}
static int lastCol(void) {
return COLS - 1;
}
static int logHeight(void) {
return LINES - 4;
}
2018-08-05 18:59:51 +00:00
static struct {
WINDOW *topic;
WINDOW *log;
WINDOW *input;
int scroll;
size_t cursor;
} ui;
void uiInit(void) {
setlocale(LC_CTYPE, "");
initscr();
cbreak();
noecho();
2018-08-05 18:59:51 +00:00
colorInit();
ui.topic = newpad(2, TOPIC_COLS);
mvwhline(ui.topic, 1, 0, ACS_HLINE, TOPIC_COLS);
2018-08-04 21:59:43 +00:00
ui.log = newpad(LOG_LINES, COLS);
wsetscrreg(ui.log, 0, LOG_LINES - 1);
scrollok(ui.log, true);
wmove(ui.log, LOG_LINES - logHeight() - 1, 0);
ui.scroll = LOG_LINES;
ui.input = newpad(2, INPUT_COLS);
mvwhline(ui.input, 0, 0, ACS_HLINE, INPUT_COLS);
2018-08-04 20:02:43 +00:00
wmove(ui.input, 1, ui.cursor);
keypad(ui.input, true);
2018-08-04 19:04:48 +00:00
nodelay(ui.input, true);
}
static void uiResize(void) {
2018-08-04 21:59:43 +00:00
wresize(ui.log, LOG_LINES, COLS);
wmove(ui.log, LOG_LINES - 1, COLS - 1);
}
void uiHide(void) {
endwin();
2018-08-05 01:23:28 +00:00
printf(
"This program is AGPLv3 free software!\n"
"The source is available at <" SOURCE_URL ">.\n"
2018-08-05 01:23:28 +00:00
);
}
void uiDraw(void) {
2018-08-04 21:08:15 +00:00
pnoutrefresh(
ui.topic,
0, 0,
0, 0,
1, lastCol()
2018-08-04 21:08:15 +00:00
);
pnoutrefresh(
2018-08-04 21:59:43 +00:00
ui.log,
ui.scroll - logHeight(), 0,
2018-08-04 21:08:15 +00:00
2, 0,
lastLine() - 2, lastCol()
);
pnoutrefresh(
ui.input,
0, MAX(0, ui.cursor - lastCol() + 1),
lastLine() - 1, 0,
lastLine(), lastCol()
);
doupdate();
}
2018-08-05 18:59:51 +00:00
static void uiRedraw(void) {
clearok(curscr, true);
}
static const short IRC_COLORS[16] = {
8 + COLOR_WHITE, // white
0 + COLOR_BLACK, // black
0 + COLOR_BLUE, // blue
0 + COLOR_GREEN, // green
8 + COLOR_RED, // red
0 + COLOR_RED, // brown
0 + COLOR_MAGENTA, // magenta
0 + COLOR_YELLOW, // orange
8 + COLOR_YELLOW, // yellow
8 + COLOR_GREEN, // light green
0 + COLOR_CYAN, // cyan
8 + COLOR_CYAN, // light cyan
8 + COLOR_BLUE, // light blue
8 + COLOR_MAGENTA, // pink
8 + COLOR_BLACK, // gray
0 + COLOR_WHITE, // light gray
};
static const char *parseColor(short *pair, const char *str) {
2018-08-04 20:36:25 +00:00
short fg = 0;
size_t fgLen = MIN(strspn(str, "0123456789"), 2);
if (!fgLen) { *pair = -1; return str; }
2018-08-04 20:36:25 +00:00
for (size_t i = 0; i < fgLen; ++i) {
fg = fg * 10 + (str[i] - '0');
2018-08-04 20:36:25 +00:00
}
str = &str[fgLen];
short bg = 0;
size_t bgLen = (str[0] == ',') ? MIN(strspn(&str[1], "0123456789"), 2) : 0;
2018-08-04 20:36:25 +00:00
for (size_t i = 0; i < bgLen; ++i) {
bg = bg * 10 + (str[1 + i] - '0');
2018-08-04 20:36:25 +00:00
}
if (bgLen) str = &str[1 + bgLen];
if (*pair == -1) *pair = 0;
2018-08-05 18:59:51 +00:00
*pair = (*pair & 0xF0) | IRC_COLORS[fg & 0x0F];
if (bgLen) *pair = (*pair & 0x0F) | (IRC_COLORS[bg & 0x0F] << 4);
2018-08-04 20:36:25 +00:00
return str;
}
2018-08-05 18:59:51 +00:00
static void addIRC(WINDOW *win, const char *str) {
attr_t attr = A_NORMAL;
short pair = -1;
for (;;) {
size_t cc = strcspn(str, "\2\3\35\37");
wattr_set(win, attr | attr8(pair), 1 + pair8(pair), NULL);
waddnstr(win, str, cc);
if (!str[cc]) break;
str = &str[cc];
switch (*str++) {
2018-08-04 20:36:25 +00:00
break; case '\2': attr ^= A_BOLD;
break; case '\3': str = parseColor(&pair, str);
break; case '\35': attr ^= A_ITALIC;
break; case '\37': attr ^= A_UNDERLINE;
}
}
}
void uiTopic(const char *topic) {
wmove(ui.topic, 0, 0);
2018-08-05 18:59:51 +00:00
addIRC(ui.topic, topic);
wclrtoeol(ui.topic);
}
2018-08-04 21:59:43 +00:00
void uiLog(const char *line) {
waddch(ui.log, '\n');
2018-08-05 18:59:51 +00:00
addIRC(ui.log, line);
}
void uiFmt(const char *format, ...) {
char *buf;
va_list ap;
va_start(ap, format);
vasprintf(&buf, format, ap);
va_end(ap);
if (!buf) err(EX_OSERR, "vasprintf");
2018-08-04 21:59:43 +00:00
uiLog(buf);
free(buf);
}
2018-08-06 15:22:45 +00:00
static void logUp(void) {
if (ui.scroll == logHeight()) return;
ui.scroll = MAX(ui.scroll - logHeight() / 2, logHeight());
}
2018-08-06 15:22:45 +00:00
static void logDown(void) {
if (ui.scroll == LOG_LINES) return;
ui.scroll = MIN(ui.scroll + logHeight() / 2, LOG_LINES);
}
static struct {
wchar_t buf[512];
size_t len;
} line;
static const size_t BUF_LEN = sizeof(line.buf) / sizeof(line.buf[0]);
2018-08-06 15:22:45 +00:00
static void left(void) {
if (ui.cursor) ui.cursor--;
}
2018-08-06 15:22:45 +00:00
static void right(void) {
if (ui.cursor < line.len) ui.cursor++;
}
2018-08-06 15:22:45 +00:00
static void home(void) {
ui.cursor = 0;
}
2018-08-06 15:22:45 +00:00
static void end(void) {
ui.cursor = line.len;
}
2018-08-06 15:22:45 +00:00
static void kill(void) {
line.len = ui.cursor;
}
static void insert(wchar_t ch) {
if (!iswprint(ch)) return;
if (line.len == BUF_LEN - 1) return;
if (ui.cursor == line.len) {
line.buf[line.len] = ch;
} else {
wmemmove(
&line.buf[ui.cursor + 1],
&line.buf[ui.cursor],
line.len - ui.cursor
);
line.buf[ui.cursor] = ch;
}
line.len++;
ui.cursor++;
}
static void backspace(void) {
if (!ui.cursor) return;
if (ui.cursor != line.len) {
wmemmove(
&line.buf[ui.cursor - 1],
&line.buf[ui.cursor],
line.len - ui.cursor
);
}
line.len--;
ui.cursor--;
}
static void delete(void) {
if (ui.cursor == line.len) return;
2018-08-06 15:22:45 +00:00
right();
backspace();
}
static void enter(void) {
if (!line.len) return;
line.buf[line.len] = '\0';
input(line.buf);
line.len = 0;
ui.cursor = 0;
}
static void keyChar(wint_t ch) {
switch (ch) {
2018-08-05 18:59:51 +00:00
break; case CTRL('L'): uiRedraw();
2018-08-06 15:22:45 +00:00
break; case CTRL('B'): left();
break; case CTRL('F'): right();
break; case CTRL('A'): home();
break; case CTRL('E'): end();
break; case CTRL('D'): delete();
break; case CTRL('K'): kill();
break; case '\b': backspace();
break; case '\177': backspace();
break; case '\n': enter();
break; default: insert(ch);
}
}
static void keyCode(wint_t ch) {
switch (ch) {
break; case KEY_RESIZE: uiResize();
2018-08-06 15:22:45 +00:00
break; case KEY_PPAGE: logUp();
break; case KEY_NPAGE: logDown();
break; case KEY_LEFT: left();
break; case KEY_RIGHT: right();
break; case KEY_HOME: home();
break; case KEY_END: end();
break; case KEY_BACKSPACE: backspace();
break; case KEY_DC: delete();
break; case KEY_ENTER: enter();
}
}
void uiRead(void) {
int ret;
wint_t ch;
while (ERR != (ret = wget_wch(ui.input, &ch))) {
if (ret == KEY_CODE_YES) {
keyCode(ch);
} else {
keyChar(ch);
}
}
wmove(ui.input, 1, 0);
waddnwstr(ui.input, line.buf, line.len);
wclrtoeol(ui.input);
wmove(ui.input, 1, ui.cursor);
}