minix/commands/talk/screen.c
2011-06-09 08:27:49 +02:00

208 lines
3.6 KiB
C

/* screen.c Copyright Michael Temari 08/01/1996 All Rights Reserved */
#include <sys/types.h>
#include <sys/stat.h>
#include <stdio.h>
#include <signal.h>
#include <ctype.h>
#include <string.h>
#include <unistd.h>
#include <curses.h>
#include "screen.h"
_PROTOTYPE(void gotsig, (int sig));
_PROTOTYPE(static char *delword, (WINDOW *w));
struct {
WINDOW *win;
char erase;
char kill;
char werase;
} window[2];
static char line[80+1];
int ScreenDone = 0;
static WINDOW *dwin;
void gotsig(sig)
int sig;
{
ScreenDone = 1;
signal(sig, gotsig);
}
int ScreenInit()
{
int i;
if(initscr() == (WINDOW *)NULL) {
fprintf(stderr, "talk: Could not initscr\n");
return(-1);
}
signal(SIGINT, gotsig);
signal(SIGQUIT, gotsig);
signal(SIGPIPE, gotsig);
signal(SIGHUP, gotsig);
clear();
refresh();
noecho();
cbreak();
/* local window */
window[LOCALWIN].win = newwin(LINES / 2, COLS, 0, 0);
scrollok(window[LOCALWIN].win, TRUE);
wclear(window[LOCALWIN].win);
/* divider between windows */
dwin = newwin(1, COLS, LINES / 2, 0);
i = COLS;
while(i-- > 0)
waddch(dwin, '-');
wrefresh(dwin);
/* remote window */
window[REMOTEWIN].win = newwin(LINES - (LINES / 2) - 1, COLS, LINES / 2 + 1, 0);
scrollok(window[REMOTEWIN].win, TRUE);
wclear(window[REMOTEWIN].win);
return(0);
}
void ScreenMsg(msg)
char *msg;
{
WINDOW *w;
w =window[LOCALWIN].win;
wmove(w, 0, 0);
if(*msg != '\0') {
wprintw(w, "[%s]", msg);
wclrtoeol(w);
} else
werase(w);
wrefresh(w);
}
void ScreenWho(user, host)
char *user;
char *host;
{
if(*host != '\0') {
wmove(dwin, 0, (COLS - (1 + strlen(user) + 1 + strlen(host) + 1)) / 2);
wprintw(dwin, " %s@%s ", user, host);
} else {
wmove(dwin, 0, (COLS - (1 + strlen(user) + 1)) / 2);
wprintw(dwin, " %s ", user);
}
wrefresh(dwin);
}
void ScreenEdit(lcc, rcc)
char lcc[];
char rcc[];
{
window[LOCALWIN].erase = lcc[0];
window[LOCALWIN].kill = lcc[1];
window[LOCALWIN].werase = lcc[2];
window[REMOTEWIN].erase = rcc[0];
window[REMOTEWIN].kill = rcc[1];
window[REMOTEWIN].werase = rcc[2];
}
void ScreenPut(data, len, win)
char *data;
int len;
int win;
{
WINDOW *w;
unsigned char ch;
int r, c;
w = window[win].win;
while(len-- > 0) {
ch = *data++;
/* new line CR, NL */
if(ch == '\r' || ch == '\n') {
waddch(w, '\n');
} else
/* erase a character, BS, DEL */
if(ch == 0x08 || ch == 0x7f || ch == window[win].erase) {
getyx(w, r, c);
if(c > 0)
c--;
wmove(w, r, c);
waddch(w, ' ');
wmove(w, r, c);
} else
/* erase line CTL-U */
if(ch == 0x15 || ch == window[win].kill) {
getyx(w, r, c);
wmove(w, r, 0);
wclrtoeol(w);
} else
/* refresh CTL-L */
if(ch == 0x0c) {
if(win == LOCALWIN) {
touchwin(w);
wrefresh(w);
touchwin(window[REMOTEWIN].win);
wrefresh(window[REMOTEWIN].win);
}
} else
/* bell CTL-G */
if(ch == 0x07) {
putchar(ch);
}
else
/* erase last word CTL-W */
if(ch == 0x17 || ch == window[win].werase) {
(void) delword(w);
} else {
getyx(w, r, c);
if(1 || isprint(ch)) {
if(ch != ' ' && c == (COLS - 1))
wprintw(w, "\n%s", delword(w));
waddch(w, ch);
}
}
}
wrefresh(w);
}
static char *delword(w)
WINDOW *w;
{
int r, c;
int i = 0;
char ch;
char *p = &line[80];
*p-- = '\0';
getyx(w, r, c);
if(c == 0) return NULL;
while(c >= 0) {
c--;
ch = mvwinch(w, r, c);
if(ch == ' ') break;
*p-- = ch;
i = 1;
waddch(w, ' ');
}
c += i;
wmove(w, r, c);
return(++p);
}
void ScreenEnd()
{
move(LINES - 1, 0);
refresh();
endwin();
}