Merge branch 'vendor/LIBARCHIVE'
[dragonfly.git] / bin / stty / gfmt.c
1 /*-
2  * Copyright (c) 1991, 1993, 1994
3  *      The Regents of the University of California.  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. All advertising materials mentioning features or use of this software
14  *    must display the following acknowledgement:
15  *      This product includes software developed by the University of
16  *      California, Berkeley and its contributors.
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  * @(#)gfmt.c   8.6 (Berkeley) 4/2/94
34  * $FreeBSD: src/bin/stty/gfmt.c,v 1.10.2.2 2001/08/01 05:26:12 obrien Exp $
35  * $DragonFly: src/bin/stty/gfmt.c,v 1.5 2004/11/07 20:54:52 eirikn Exp $
36  */
37
38 #include <sys/types.h>
39
40 #include <err.h>
41 #include <stdio.h>
42 #include <string.h>
43
44 #include "stty.h"
45 #include "extern.h"
46
47 static void gerr (const char *s);
48
49 static void
50 gerr(const char *s)
51 {
52         if (s)
53                 errx(1, "illegal gfmt1 option -- %s", s);
54         else
55                 errx(1, "illegal gfmt1 option");
56 }
57
58 void
59 gprint(struct termios *tp, struct winsize *wp __unused, int ldisc __unused)
60 {
61         struct cchar *cp;
62
63         printf("gfmt1:cflag=%lx:iflag=%lx:lflag=%lx:oflag=%lx:",
64             (u_long)tp->c_cflag, (u_long)tp->c_iflag, (u_long)tp->c_lflag,
65             (u_long)tp->c_oflag);
66         for (cp = cchars1; cp->name; ++cp)
67                 printf("%s=%x:", cp->name, tp->c_cc[cp->sub]);
68         printf("ispeed=%lu:ospeed=%lu\n",
69             (u_long)cfgetispeed(tp), (u_long)cfgetospeed(tp));
70 }
71
72 void
73 gread(struct termios *tp, char *s)
74 {
75         struct cchar *cp;
76         char *ep, *p;
77         long tmp;
78
79         if ((s = strchr(s, ':')) == NULL)
80                 gerr(NULL);
81         for (++s; s != NULL;) {
82                 p = strsep(&s, ":\0");
83                 if (!p || !*p)
84                         break;
85                 if (!(ep = strchr(p, '=')))
86                         gerr(p);
87                 *ep++ = '\0';
88                 sscanf(ep, "%lx", &tmp);
89
90 #define CHK(s)  (*p == s[0] && !strcmp(p, s))
91                 if (CHK("cflag")) {
92                         tp->c_cflag = tmp;
93                         continue;
94                 }
95                 if (CHK("iflag")) {
96                         tp->c_iflag = tmp;
97                         continue;
98                 }
99                 if (CHK("ispeed")) {
100                         sscanf(ep, "%ld", &tmp);
101                         tp->c_ispeed = tmp;
102                         continue;
103                 }
104                 if (CHK("lflag")) {
105                         tp->c_lflag = tmp;
106                         continue;
107                 }
108                 if (CHK("oflag")) {
109                         tp->c_oflag = tmp;
110                         continue;
111                 }
112                 if (CHK("ospeed")) {
113                         sscanf(ep, "%ld", &tmp);
114                         tp->c_ospeed = tmp;
115                         continue;
116                 }
117                 for (cp = cchars1; cp->name != NULL; ++cp)
118                         if (CHK(cp->name)) {
119                                 if (cp->sub == VMIN || cp->sub == VTIME)
120                                         sscanf(ep, "%ld", &tmp);
121                                 tp->c_cc[cp->sub] = tmp;
122                                 break;
123                         }
124                 if (cp->name == NULL)
125                         gerr(p);
126         }
127 }