commands/pax/tty_subs.c

   1 /*-
   2  * Copyright (c) 1992 Keith Muller.
   3  * Copyright (c) 1992, 1993
   4  *      The Regents of the University of California.  All rights reserved.
   5  *
   6  * This code is derived from software contributed to Berkeley by
   7  * Keith Muller of the University of California, San Diego.
   8  *
   9  * Redistribution and use in source and binary forms, with or without
  10  * modification, are permitted provided that the following conditions
  11  * are met:
  12  * 1. Redistributions of source code must retain the above copyright
  13  *    notice, this list of conditions and the following disclaimer.
  14  * 2. Redistributions in binary form must reproduce the above copyright
  15  *    notice, this list of conditions and the following disclaimer in the
  16  *    documentation and/or other materials provided with the distribution.
  17  * 4. Neither the name of the University nor the names of its contributors
  18  *    may be used to endorse or promote products derived from this software
  19  *    without specific prior written permission.
  20  *
  21  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  22  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  23  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  24  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  25  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  26  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  27  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  28  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  29  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  30  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  31  * SUCH DAMAGE.
  32  */
  33
  34 #ifndef lint
  35 #if 0
  36 static char sccsid[] = "@(#)tty_subs.c  8.2 (Berkeley) 4/18/94";
  37 #endif
  38 #endif /* not lint */
  39
  40 #include <sys/types.h>
  41 #include <sys/stat.h>
  42 #include <fcntl.h>
  43 #include <stdio.h>
  44 #include <unistd.h>
  45 #include <stdlib.h>
  46 #include <string.h>
  47 #include "pax.h"
  48 #include "extern.h"
  49 #include <stdarg.h>
  50
  51 /*
  52  * routines that deal with I/O to and from the user
  53  */
  54
  55 #define DEVTTY    "/dev/tty"      /* device for interactive i/o */
  56 static FILE *ttyoutf = NULL;            /* output pointing at control tty */
  57 static FILE *ttyinf = NULL;             /* input pointing at control tty */
  58
  59 /*
  60  * tty_init()
  61  *      try to open the controlling terminal (if any) for this process. if the
  62  *      open fails, future ops that require user input will get an EOF
  63  */
  64
  65 int
  66 tty_init(void)
  67 {
  68         int ttyfd;
  69
  70         if ((ttyfd = open(DEVTTY, O_RDWR)) >= 0) {
  71                 if ((ttyoutf = fdopen(ttyfd, "w")) != NULL) {
  72                         if ((ttyinf = fdopen(ttyfd, "r")) != NULL)
  73                                 return(0);
  74                         (void)fclose(ttyoutf);
  75                 }
  76                 (void)close(ttyfd);
  77         }
  78
  79         if (iflag) {
  80                 paxwarn(1, "Fatal error, cannot open %s", DEVTTY);
  81                 return(-1);
  82         }
  83         return(0);
  84 }
  85
  86 /*
  87  * tty_prnt()
  88  *      print a message using the specified format to the controlling tty
  89  *      if there is no controlling terminal, just return.
  90  */
  91
  92 void
  93 tty_prnt(const char *fmt, ...)
  94 {
  95         va_list ap;
  96         if (ttyoutf == NULL)
  97                 return;
  98         va_start(ap, fmt);
  99         (void)vfprintf(ttyoutf, fmt, ap);
 100         va_end(ap);
 101         (void)fflush(ttyoutf);
 102 }
 103
 104 /*
 105  * tty_read()
 106  *      read a string from the controlling terminal if it is open into the
 107  *      supplied buffer
 108  * Return:
 109  *      0 if data was read, -1 otherwise.
 110  */
 111
 112 int
 113 tty_read(char *str, int len)
 114 {
 115         char *pt;
 116
 117         if ((--len <= 0) || (ttyinf == NULL) || (fgets(str,len,ttyinf) == NULL))
 118                 return(-1);
 119         *(str + len) = '\0';
 120
 121         /*
 122          * strip off that trailing newline
 123          */
 124         if ((pt = strchr(str, '\n')) != NULL)
 125                 *pt = '\0';
 126         return(0);
 127 }
 128
 129 /*
 130  * paxwarn()
 131  *      write a warning message to stderr. if "set" the exit value of pax
 132  *      will be non-zero.
 133  */
 134
 135 void
 136 paxwarn(int set, const char *fmt, ...)
 137 {
 138         va_list ap;
 139         va_start(ap, fmt);
 140         if (set)
 141                 exit_val = 1;
 142         /*
 143          * when vflag we better ship out an extra \n to get this message on a
 144          * line by itself
 145          */
 146         if (vflag && vfpart) {
 147                 (void)fflush(listf);
 148                 (void)fputc('\n', stderr);
 149                 vfpart = 0;
 150         }
 151         (void)fprintf(stderr, "%s: ", argv0);
 152         (void)vfprintf(stderr, fmt, ap);
 153         va_end(ap);
 154         (void)fputc('\n', stderr);
 155 }
 156
 157 /*
 158  * syswarn()
 159  *      write a warning message to stderr. if "set" the exit value of pax
 160  *      will be non-zero.
 161  */
 162
 163 void
 164 syswarn(int set, int errnum, const char *fmt, ...)
 165 {
 166         va_list ap;
 167         va_start(ap, fmt);
 168         if (set)
 169                 exit_val = 1;
 170         /*
 171          * when vflag we better ship out an extra \n to get this message on a
 172          * line by itself
 173          */
 174         if (vflag && vfpart) {
 175                 (void)fflush(listf);
 176                 (void)fputc('\n', stderr);
 177                 vfpart = 0;
 178         }
 179         (void)fprintf(stderr, "%s: ", argv0);
 180         (void)vfprintf(stderr, fmt, ap);
 181         va_end(ap);
 182
 183         /*
 184          * format and print the errno
 185          */
 186         if (errnum > 0)
 187                 (void)fprintf(stderr, " <%s>", strerror(errnum));
 188         (void)fputc('\n', stderr);
 189 }