Initial import from FreeBSD RELENG_4:
[dragonfly.git] / sbin / comcontrol / comcontrol.c
1 /*-
2  * Copyright (c) 1992 Christopher G. Demetriou
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer.
10  * 2. Redistributions in binary form must reproduce the above copyright
11  *    notice, this list of conditions and the following disclaimer in the
12  *    documentation and/or other materials provided with the distribution.
13  * 3. The name of the author may not be used to endorse or promote
14  *    products derived from this software without specific written permission.
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND
17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
26  * SUCH DAMAGE.
27  */
28
29 #ifndef lint
30 static const char rcsid[] =
31   "$FreeBSD: src/sbin/comcontrol/comcontrol.c,v 1.8.2.2 2001/08/01 06:01:51 obrien Exp $";
32 #endif /* not lint */
33
34 #include <ctype.h>
35 #include <err.h>
36 #include <errno.h>
37 #include <fcntl.h>
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41 #include <unistd.h>
42 #include <sys/types.h>
43 #include <sys/ioctl.h>
44
45 static void
46 usage()
47 {
48         fprintf(stderr,
49         "usage: comcontrol <filename> [dtrwait <n>] [drainwait <n>]\n");
50         exit(1);
51 }
52
53 int
54 main(int argc, char *argv[])
55 {
56         int     fd;
57         int     res = 0;
58         int     print_dtrwait = 1, print_drainwait = 1;
59         int     dtrwait = -1, drainwait = -1;
60
61         if (argc < 2)
62                 usage();
63
64         if (strcmp(argv[1], "-") == 0)
65                 fd = STDIN_FILENO;
66         else {
67                 fd = open(argv[1], O_RDONLY|O_NONBLOCK, 0);
68                 if (fd < 0) {
69                         warn("couldn't open file %s", argv[1]);
70                         return 1;
71                 }
72         }
73         if (argc == 2) {
74                 if (ioctl(fd, TIOCMGDTRWAIT, &dtrwait) < 0) {
75                         print_dtrwait = 0;
76                         if (errno != ENOTTY) {
77                                 res = 1;
78                                 warn("TIOCMGDTRWAIT");
79                         }
80                 }
81                 if (ioctl(fd, TIOCGDRAINWAIT, &drainwait) < 0) {
82                         print_drainwait = 0;
83                         if (errno != ENOTTY) {
84                                 res = 1;
85                                 warn("TIOCGDRAINWAIT");
86                         }
87                 }
88                 if (print_dtrwait)
89                         printf("dtrwait %d ", dtrwait);
90                 if (print_drainwait)
91                         printf("drainwait %d ", drainwait);
92                 printf("\n");
93         } else {
94                 while (argv[2] != NULL) {
95                         if (!strcmp(argv[2],"dtrwait")) {
96                                 if (dtrwait >= 0)
97                                         usage();
98                                 if (argv[3] == NULL || !isdigit(argv[3][0]))
99                                         usage();
100                                 dtrwait = atoi(argv[3]);
101                                 argv += 2;
102                         } else if (!strcmp(argv[2],"drainwait")) {
103                                 if (drainwait >= 0)
104                                         usage();
105                                 if (argv[3] == NULL || !isdigit(argv[3][0]))
106                                         usage();
107                                 drainwait = atoi(argv[3]);
108                                 argv += 2;
109                         } else
110                                 usage();
111                 }
112                 if (dtrwait >= 0) {
113                         if (ioctl(fd, TIOCMSDTRWAIT, &dtrwait) < 0) {
114                                 res = 1;
115                                 warn("TIOCMSDTRWAIT");
116                         }
117                 }
118                 if (drainwait >= 0) {
119                         if (ioctl(fd, TIOCSDRAINWAIT, &drainwait) < 0) {
120                                 res = 1;
121                                 warn("TIOCSDRAINWAIT");
122                         }
123                 }
124         }
125
126         close(fd);
127         return res;
128 }