1 /* $NetBSD: parse.c,v 1.35 2016/02/17 19:47:49 christos Exp $ */
4 * Copyright (c) 1992, 1993
5 * The Regents of the University of California. All rights reserved.
7 * This code is derived from software contributed to Berkeley by
8 * Christos Zoulas of Cornell University.
10 * Redistribution and use in source and binary forms, with or without
11 * modification, are permitted provided that the following conditions
13 * 1. Redistributions of source code must retain the above copyright
14 * notice, this list of conditions and the following disclaimer.
15 * 2. Redistributions in binary form must reproduce the above copyright
16 * notice, this list of conditions and the following disclaimer in the
17 * documentation and/or other materials provided with the distribution.
18 * 3. Neither the name of the University nor the names of its contributors
19 * may be used to endorse or promote products derived from this software
20 * without specific prior written permission.
22 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
36 #if !defined(lint) && !defined(SCCSID)
38 static char sccsid[] = "@(#)parse.c 8.1 (Berkeley) 6/4/93";
40 __RCSID("$NetBSD: parse.c,v 1.35 2016/02/17 19:47:49 christos Exp $");
42 #endif /* not lint && not SCCSID */
43 #include <sys/cdefs.h>
44 __FBSDID("$FreeBSD$");
47 * parse.c: parse an editline extended command
65 private const struct {
67 int (*func)(EditLine *, int, const Char **);
69 { STR("bind"), map_bind },
70 { STR("echotc"), terminal_echotc },
71 { STR("edit"), el_editmode },
72 { STR("history"), hist_command },
73 { STR("telltc"), terminal_telltc },
74 { STR("settc"), terminal_settc },
75 { STR("setty"), tty_stty },
81 * Parse a line and dispatch it
84 parse_line(EditLine *el, const Char *line)
90 tok = FUN(tok,init)(NULL);
91 FUN(tok,str)(tok, line, &argc, &argv);
92 argc = FUN(el,parse)(el, argc, argv);
102 FUN(el,parse)(EditLine *el, int argc, const Char *argv[])
109 ptr = Strchr(argv[0], ':');
116 l = (size_t)(ptr - argv[0] - 1);
117 tprog = el_malloc((l + 1) * sizeof(*tprog));
120 (void) Strncpy(tprog, argv[0], l);
123 l = (size_t)el_match(el->el_prog, tprog);
130 for (i = 0; cmds[i].name != NULL; i++)
131 if (Strcmp(cmds[i].name, ptr) == 0) {
132 i = (*cmds[i].func) (el, argc, argv);
140 * Parse a string of the form ^<char> \<odigit> \<char> \U+xxxx and return
141 * the appropriate character or -1 if the escape is not valid
144 parse__escape(const Char **ptr)
158 c = '\007'; /* Bell */
161 c = '\010'; /* Backspace */
164 c = '\011'; /* Horizontal Tab */
167 c = '\012'; /* New Line */
170 c = '\013'; /* Vertical Tab */
173 c = '\014'; /* Form Feed */
176 c = '\015'; /* Carriage Return */
179 c = '\033'; /* Escape */
181 case 'U': /* Unicode \U+xxxx or \U+xxxxx format */
184 const Char hex[] = STR("0123456789ABCDEF");
190 for (i = 0; i < 5; ++i) {
191 h = Strchr(hex, *p++);
195 c = (c << 4) | ((int)(h - hex));
199 if (c > 0x10FFFF) /* outside valid character range */
214 for (cnt = 0, c = 0; cnt < 3; cnt++) {
216 if (ch < '0' || ch > '7') {
220 c = (c << 3) | (ch - '0');
222 if ((c & (wint_t)0xffffff00) != (wint_t)0)
231 } else if (*p == '^') {
233 c = (*p == '?') ? '\177' : (*p & 0237);
241 * Parse the escapes from in and put the raw string out
244 parse__string(Char *out, const Char *in)
257 if ((n = parse__escape(&in)) == -1)
263 if (in[1] == '-' && in[2] != '\0') {
278 * Return the command number for the command string given
279 * or -1 if one is not found
282 parse_cmd(EditLine *el, const Char *cmd)
284 el_bindings_t *b = el->el_map.help;
287 for (i = 0; i < el->el_map.nfunc; i++)
288 if (Strcmp(b[i].name, cmd) == 0)