source: trunk/minix/commands/talk/screen.c@ 10

/* 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;
   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();
}