test/ditto.c

   1 /****************************************************************************
   2  * Copyright (c) 1998-2007,2008 Free Software Foundation, Inc.              *
   3  *                                                                          *
   4  * Permission is hereby granted, free of charge, to any person obtaining a  *
   5  * copy of this software and associated documentation files (the            *
   6  * "Software"), to deal in the Software without restriction, including      *
   7  * without limitation the rights to use, copy, modify, merge, publish,      *
   8  * distribute, distribute with modifications, sublicense, and/or sell       *
   9  * copies of the Software, and to permit persons to whom the Software is    *
  10  * furnished to do so, subject to the following conditions:                 *
  11  *                                                                          *
  12  * The above copyright notice and this permission notice shall be included  *
  13  * in all copies or substantial portions of the Software.                   *
  14  *                                                                          *
  15  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS  *
  16  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF               *
  17  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.   *
  18  * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,   *
  19  * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR    *
  20  * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR    *
  21  * THE USE OR OTHER DEALINGS IN THE SOFTWARE.                               *
  22  *                                                                          *
  23  * Except as contained in this notice, the name(s) of the above copyright   *
  24  * holders shall not be used in advertising or otherwise to promote the     *
  25  * sale, use or other dealings in this Software without prior written       *
  26  * authorization.                                                           *
  27  ****************************************************************************/
  28
  29 /*
  30  * Author: Thomas E. Dickey <dickey@clark.net> 1998
  31  *
  32  * $Id: ditto.c,v 1.11 2008/03/22 20:26:31 tom Exp $
  33  *
  34  * The program illustrates how to set up multiple screens from a single
  35  * program.  Invoke the program by specifying another terminal on the same
  36  * machine by specifying its device, e.g.,
  37  *      ditto /dev/ttyp1
  38  */
  39 #include <test.priv.h>
  40 #include <sys/stat.h>
  41 #include <errno.h>
  42
  43 typedef struct {
  44     FILE *input;
  45     FILE *output;
  46     SCREEN *screen;
  47 } DITTO;
  48
  49 static void
  50 failed(const char *s)
  51 {
  52     perror(s);
  53     ExitProgram(EXIT_FAILURE);
  54 }
  55
  56 static void
  57 usage(void)
  58 {
  59     fprintf(stderr, "usage: ditto [terminal1 ...]\n");
  60     ExitProgram(EXIT_FAILURE);
  61 }
  62
  63 static FILE *
  64 open_tty(char *path)
  65 {
  66     FILE *fp;
  67     struct stat sb;
  68
  69     if (stat(path, &sb) < 0)
  70         failed(path);
  71     if ((sb.st_mode & S_IFMT) != S_IFCHR) {
  72         errno = ENOTTY;
  73         failed(path);
  74     }
  75     fp = fopen(path, "r+");
  76     if (fp == 0)
  77         failed(path);
  78     printf("opened %s\n", path);
  79     return fp;
  80 }
  81
  82 static int
  83 close_screen(void *arg)
  84 {
  85     (void) arg;
  86     return endwin();
  87 }
  88
  89 static int
  90 read_screen(void *arg)
  91 {
  92     (void) arg;
  93     return getch();
  94 }
  95
  96 static int
  97 write_screen(WINDOW *win, void *arg)
  98 {
  99     (void) win;
 100     addstr((char *) arg);
 101     refresh();
 102     return OK;
 103 }
 104
 105 static void
 106 show_ditto(DITTO * data, int count, char *msg)
 107 {
 108     int n;
 109
 110     for (n = 0; n < count; n++) {
 111         USING_SCREEN(data[n].screen, write_screen, (void *) msg);
 112     }
 113 }
 114
 115 int
 116 main(int argc GCC_UNUSED,
 117      char *argv[]GCC_UNUSED)
 118 {
 119     int j;
 120     int count;
 121     DITTO *data;
 122
 123     if (argc <= 1)
 124         usage();
 125
 126     if ((data = (DITTO *) calloc((unsigned) argc, sizeof(DITTO))) == 0)
 127         failed("calloc data");
 128
 129     data[0].input = stdin;
 130     data[0].output = stdout;
 131     for (j = 1; j < argc; j++) {
 132         data[j].input =
 133             data[j].output = open_tty(argv[j]);
 134     }
 135
 136     /*
 137      * If we got this far, we have open connection(s) to the terminal(s).
 138      * Set up the screens.
 139      */
 140     for (j = 0; j < argc; j++) {
 141         data[j].screen = newterm((char *) 0,    /* assume $TERM is the same */
 142                                  data[j].output,
 143                                  data[j].input);
 144         if (data[j].screen == 0)
 145             failed("newterm");
 146         cbreak();
 147         noecho();
 148         scrollok(stdscr, TRUE);
 149         nodelay(stdscr, TRUE);
 150     }
 151
 152     /*
 153      * Loop, reading characters from any of the inputs and writing to all
 154      * of the screens.
 155      */
 156     for (count = 0;; ++count) {
 157         char message[80];
 158         int ch;
 159         int which = (count % argc);
 160
 161         napms(20);
 162         ch = USING_SCREEN(data[which].screen, read_screen, 0);
 163         if (ch == ERR) {
 164             /* echochar('.'); */
 165             continue;
 166         }
 167         if (ch == CTRL('D'))
 168             break;
 169         sprintf(message, "from[%d:%d] '%c' (%#x)\n", count, which, ch, ch);
 170         show_ditto(data, argc, message);
 171     }
 172
 173     /*
 174      * Cleanup and exit
 175      */
 176     for (j = argc - 1; j >= 0; j--) {
 177         USING_SCREEN(data[j].screen, close_screen, 0);
 178     }
 179     ExitProgram(EXIT_SUCCESS);
 180 }