bin/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  * 3. 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  * @(#)tty_subs.c       8.2 (Berkeley) 4/18/94
  34  * $FreeBSD: src/bin/pax/tty_subs.c,v 1.11.2.1 2001/08/01 05:03:12 obrien Exp $
  35  * $DragonFly: src/bin/pax/tty_subs.c,v 1.6 2004/11/07 20:54:51 eirikn Exp $
  36  */
  37
  38 #include <sys/types.h>
  39 #include <sys/stat.h>
  40 #include <fcntl.h>
  41 #include <stdio.h>
  42 #include <unistd.h>
  43 #include <stdlib.h>
  44 #include <string.h>
  45 #include "pax.h"
  46 #include "extern.h"
  47 #include <stdarg.h>
  48
  49 /*
  50  * routines that deal with I/O to and from the user
  51  */
  52
  53 #define DEVTTY    "/dev/tty"      /* device for interactive i/o */
  54 static FILE *ttyoutf = NULL;            /* output pointing at control tty */
  55 static FILE *ttyinf = NULL;             /* input pointing at control tty */
  56
  57 /*
  58  * tty_init()
  59  *      try to open the controlling terminal (if any) for this process. if the
  60  *      open fails, future ops that require user input will get an EOF
  61  */
  62
  63 int
  64 tty_init(void)
  65 {
  66         int ttyfd;
  67
  68         if ((ttyfd = open(DEVTTY, O_RDWR)) >= 0) {
  69                 if ((ttyoutf = fdopen(ttyfd, "w")) != NULL) {
  70                         if ((ttyinf = fdopen(ttyfd, "r")) != NULL)
  71                                 return(0);
  72                         fclose(ttyoutf);
  73                 }
  74                 close(ttyfd);
  75         }
  76
  77         if (iflag) {
  78                 paxwarn(1, "Fatal error, cannot open %s", DEVTTY);
  79                 return(-1);
  80         }
  81         return(0);
  82 }
  83
  84 /*
  85  * tty_prnt()
  86  *      print a message using the specified format to the controlling tty
  87  *      if there is no controlling terminal, just return.
  88  */
  89
  90 void
  91 tty_prnt(const char *fmt, ...)
  92 {
  93         va_list ap;
  94         va_start(ap, fmt);
  95         if (ttyoutf == NULL)
  96                 return;
  97         vfprintf(ttyoutf, fmt, ap);
  98         va_end(ap);
  99         fflush(ttyoutf);
 100 }
 101
 102 /*
 103  * tty_read()
 104  *      read a string from the controlling terminal if it is open into the
 105  *      supplied buffer
 106  * Return:
 107  *      0 if data was read, -1 otherwise.
 108  */
 109
 110 int
 111 tty_read(char *str, int len)
 112 {
 113         char *pt;
 114
 115         if ((--len <= 0) || (ttyinf == NULL) || (fgets(str,len,ttyinf) == NULL))
 116                 return(-1);
 117         *(str + len) = '\0';
 118
 119         /*
 120          * strip off that trailing newline
 121          */
 122         if ((pt = strchr(str, '\n')) != NULL)
 123                 *pt = '\0';
 124         return(0);
 125 }
 126
 127 /*
 128  * paxwarn()
 129  *      write a warning message to stderr. if "set" the exit value of pax
 130  *      will be non-zero.
 131  */
 132
 133 void
 134 paxwarn(int set, const char *fmt, ...)
 135 {
 136         va_list ap;
 137         va_start(ap, fmt);
 138         if (set)
 139                 exit_val = 1;
 140         /*
 141          * when vflag we better ship out an extra \n to get this message on a
 142          * line by itself
 143          */
 144         if (vflag && vfpart) {
 145                 fflush(listf);
 146                 fputc('\n', stderr);
 147                 vfpart = 0;
 148         }
 149         fprintf(stderr, "%s: ", argv0);
 150         vfprintf(stderr, fmt, ap);
 151         va_end(ap);
 152         fputc('\n', stderr);
 153 }
 154
 155 /*
 156  * syswarn()
 157  *      write a warning message to stderr. if "set" the exit value of pax
 158  *      will be non-zero.
 159  */
 160
 161 void
 162 syswarn(int set, int errnum, const char *fmt, ...)
 163 {
 164         va_list ap;
 165         va_start(ap, fmt);
 166         if (set)
 167                 exit_val = 1;
 168         /*
 169          * when vflag we better ship out an extra \n to get this message on a
 170          * line by itself
 171          */
 172         if (vflag && vfpart) {
 173                 fflush(listf);
 174                 fputc('\n', stderr);
 175                 vfpart = 0;
 176         }
 177         fprintf(stderr, "%s: ", argv0);
 178         vfprintf(stderr, fmt, ap);
 179         va_end(ap);
 180
 181         /*
 182          * format and print the errno
 183          */
 184         if (errnum > 0)
 185                 fprintf(stderr, " <%s>", strerror(errnum));
 186         fputc('\n', stderr);
 187 }