Merge from vendor branch OPENSSL:
[dragonfly.git] / bin / stty / cchar.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  * @(#)cchar.c  8.5 (Berkeley) 4/2/94
34  * $FreeBSD: src/bin/stty/cchar.c,v 1.9.2.2 2001/07/04 22:40:00 kris Exp $
35  * $DragonFly: src/bin/stty/cchar.c,v 1.5 2003/10/13 21:24:26 dillon Exp $
36  */
37
38 #include <sys/types.h>
39
40 #include <err.h>
41 #include <limits.h>
42 #include <stddef.h>
43 #include <stdlib.h>
44 #include <string.h>
45
46 #include "stty.h"
47 #include "extern.h"
48
49 static int c_cchar (const void *, const void *);
50
51 /*
52  * Special control characters.
53  *
54  * Cchars1 are the standard names, cchars2 are the old aliases.
55  * The first are displayed, but both are recognized on the
56  * command line.
57  */
58 struct cchar cchars1[] = {
59         { "ckpt",       VCHECKPT,       CCHECKPT },
60         { "discard",    VDISCARD,       CDISCARD },
61         { "dsusp",      VDSUSP,         CDSUSP },
62         { "eof",        VEOF,           CEOF },
63         { "eol",        VEOL,           CEOL },
64         { "eol2",       VEOL2,          CEOL },
65         { "erase",      VERASE,         CERASE },
66         { "erase2",     VERASE2,        CERASE2 },
67         { "intr",       VINTR,          CINTR },
68         { "kill",       VKILL,          CKILL },
69         { "lnext",      VLNEXT,         CLNEXT },
70         { "min",        VMIN,           CMIN },
71         { "quit",       VQUIT,          CQUIT },
72         { "reprint",    VREPRINT,       CREPRINT },
73         { "start",      VSTART,         CSTART },
74         { "status",     VSTATUS,        CSTATUS },
75         { "stop",       VSTOP,          CSTOP },
76         { "susp",       VSUSP,          CSUSP },
77         { "time",       VTIME,          CTIME },
78         { "werase",     VWERASE,        CWERASE },
79         { NULL,         0,              0},
80 };
81
82 struct cchar cchars2[] = {
83         { "brk",        VEOL,           CEOL },
84         { "flush",      VDISCARD,       CDISCARD },
85         { "rprnt",      VREPRINT,       CREPRINT },
86         { NULL,         0,              0 },
87 };
88
89 static int
90 c_cchar(const void *a, const void *b)
91 {
92
93         return (strcmp(((const struct cchar *)a)->name, ((const struct cchar *)b)->name));
94 }
95
96 int
97 csearch(char ***argvp, struct info *ip)
98 {
99         struct cchar *cp, tmp;
100         long val;
101         char *arg, *ep, *name;
102
103         name = **argvp;
104
105         tmp.name = name;
106         if (!(cp = (struct cchar *)bsearch(&tmp, cchars1,
107             sizeof(cchars1)/sizeof(struct cchar) - 1, sizeof(struct cchar),
108             c_cchar)) && !(cp = (struct cchar *)bsearch(&tmp, cchars2,
109             sizeof(cchars2)/sizeof(struct cchar) - 1, sizeof(struct cchar),
110             c_cchar)))
111                 return (0);
112
113         arg = *++*argvp;
114         if (!arg) {
115                 warnx("option requires an argument -- %s", name);
116                 usage();
117         }
118
119 #define CHK(s)  (*arg == s[0] && !strcmp(arg, s))
120         if (CHK("undef") || CHK("<undef>"))
121                 ip->t.c_cc[cp->sub] = _POSIX_VDISABLE;
122         else if (cp->sub == VMIN || cp->sub == VTIME) {
123                 val = strtol(arg, &ep, 10);
124                 if (val > UCHAR_MAX) {
125                         warnx("maximum option value is %d -- %s",
126                             UCHAR_MAX, name);
127                         usage();
128                 }
129                 if (*ep != '\0') {
130                         warnx("option requires a numeric argument -- %s", name);
131                         usage();
132                 }
133                 ip->t.c_cc[cp->sub] = val;
134         } else if (arg[0] == '^')
135                 ip->t.c_cc[cp->sub] = (arg[1] == '?') ? 0177 :
136                     (arg[1] == '-') ? _POSIX_VDISABLE : arg[1] & 037;
137         else
138                 ip->t.c_cc[cp->sub] = arg[0];
139         ip->set = 1;
140         return (1);
141 }