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