123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190 |
- /*
- * emulateur de terminal
- */
-
- #include <stdio.h>
- #include <string.h>
- #include <unistd.h>
- #include <stdlib.h>
- #include <errno.h>
- #include <time.h>
- #include <sys/time.h>
- #include <sys/select.h>
-
- #include <ncurses.h>
-
- #include "../serial/serial.h"
- #include "terminal.h"
-
- extern int verbosity;
-
- int special_dumper(FILE *fp, unsigned char octet);
-
- /* ---------------------------------------------------------------- */
- static void bordure(WINDOW * w, char *texte, int type)
- {
- if (type)
- box(w, 0, 0);
- else
- wborder(w, '|', '|', '-', '-', '+', '+', '+', '+');
- wstandout(w); mvwaddstr(w, 0, 3, texte); wstandend(w);
- wrefresh(w);
- }
- /* ---------------------------------------------------------------- */
- static int interactive(WINDOW *glass, int fd_local, int fd_remote)
- {
- int flag_exit = 0;
- long tstart, tcur;
- char ligne[100];
- int received;
-
- /* --- variables for select */
- struct timeval tv;
- fd_set rfds;
- int retval,mfd;
-
- #if DEBUG_LEVEL
- fprintf(stderr, ">>> %s ( %p %d %d )\n", __func__,
- glass, fd_local, fd_remote);
- #endif
-
- tstart = time(NULL);
-
- wclear(glass); wrefresh(glass);
-
- mfd = (fd_local>fd_remote ? fd_local : fd_remote) + 1; /* XXX */
-
- #if DEBUG_LEVEL
- sprintf(ligne, "%s : mfd is %d\n", __func__, mfd);
- waddstr(glass, ligne); wrefresh(glass);
- #endif
-
- do {
- tcur = time(NULL);
-
- FD_ZERO(&rfds);
- FD_SET(fd_local, &rfds); /* stdin */
- FD_SET(fd_remote, &rfds); /* teletype */
- tv.tv_sec = tv.tv_usec = 0; /* no timeout */
-
- retval = select(mfd, &rfds, NULL, NULL, &tv);
- if (-1 == retval) {
- sprintf(ligne, "err select %s\n", strerror(errno));
- waddstr(glass, ligne); wrefresh(glass);
- continue;
- }
-
- /*** est-ce la liaison serie ? */
- if (FD_ISSET(fd_remote, &rfds)) {
- /* get the incoming byte */
- received = getbyte(fd_remote);
- if (verbosity) {
- special_dumper(stderr, received);
- fflush(stderr);
- }
-
- if ('\r' != received) waddch(glass, received);
- }
-
- /*** est-ce le yuser avec son clavier ? */
- if (FD_ISSET(fd_local, &rfds)) {
- received = getch();
-
- #if DEBUG_LEVEL
- sprintf(ligne, " got $%X\n", received);
- waddstr(glass, ligne); wrefresh(glass);
- #endif
-
- /* que doit-on faire avec ce qu'on
- vient de recevoir ? */
- if (0x04 == received) { /* EOT (end of transmission) */
- waddstr(glass, "--- EOT ---\n"); wrefresh(glass);
- flag_exit = 1;
- }
-
- putbyte(fd_remote, received);
- }
-
- wrefresh(glass);
-
- } while (! flag_exit);
-
- sleep(1);
-
- return -1;
- }
- /* ---------------------------------------------------------------- */
- int run_the_terminal(int fd_serial, char *title, WINDOW *win)
- {
- WINDOW *terminal, *ecran;
- int wid_term, hei_term, lin_term, col_term;
- int foo;
- // char ligne[100];
- // unsigned char byte;
- int fd_stdin;
-
- lin_term = col_term = 4; /* position */
- wid_term = 60;
- hei_term = 25;
-
- fd_stdin = fileno(stdin); /* for select or pool */
-
- terminal = newwin(hei_term, wid_term, lin_term, col_term);
- if ( NULL==terminal ) return -1;
- bordure(terminal, title, 1);
-
- ecran = subwin(terminal, hei_term-2, wid_term-2, lin_term+1, col_term+1);
- if ( NULL==ecran ) return -2;
- scrollok(ecran, 1);
-
- if (verbosity) {
- foo = mvwaddstr(ecran, 2, 14, "SCREEN READY\n");
- #if DEBUG_LEVEL > 1
- fprintf(stderr, "in '%s', mvwaddstr -> %d\n", __func__, foo);
- #endif
- wrefresh(ecran); sleep(1);
- }
-
- foo = interactive(ecran, fd_stdin, fd_serial);
- if (foo) {
- fprintf(stderr, "interactive -> %d\n", foo);
- sleep(1);
- }
-
- delwin(terminal);
- touchwin(stdscr); wrefresh(stdscr);
-
- return 0;
- }
- /* ---------------------------------------------------------------- */
- int essai_terminal(int fd, char *txt, int k)
- {
- int lig, col;
- int foo, retv;
-
- #if DEBUG_LEVEL
- fprintf(stderr, ">>> %s ( %d '%s' %d )\n", __func__,
- fd, txt, k );
- #endif
-
- /*** initialisation de curses */
- initscr();
- nonl(); cbreak(); noecho();
-
- for (lig=0; lig<LINES; lig++) {
- for (col=0; col<COLS; col++) {
- mvaddch(lig, col, "o+OX"[rand()%4]);
- }
- }
- wrefresh(stdscr);
-
- /*** passons a la partie active */
- retv = run_the_terminal(fd, txt, stdscr);
-
- /*** terminaison de curses */
- endwin();
- fprintf(stderr, "terminal return %d\n", retv);
-
- return 0;
- }
- /* ---------------------------------------------------------------- */
|