1 /* $NetBSD: parse.c,v 1.27 2014/07/06 18:15:34 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.27 2014/07/06 18:15:34 christos Exp $");
42 #endif /* not lint && not SCCSID */
45 * parse.c: parse an editline extended command
60 private const struct {
62 int (*func)(EditLine *, int, const Char **);
64 { STR("bind"), map_bind },
65 { STR("echotc"), terminal_echotc },
66 { STR("edit"), el_editmode },
67 { STR("history"), hist_command },
68 { STR("telltc"), terminal_telltc },
69 { STR("settc"), terminal_settc },
70 { STR("setty"), tty_stty },
76 * Parse a line and dispatch it
79 parse_line(EditLine *el, const Char *line)
85 tok = FUN(tok,init)(NULL);
86 FUN(tok,str)(tok, line, &argc, &argv);
87 argc = FUN(el,parse)(el, argc, argv);
97 FUN(el,parse)(EditLine *el, int argc, const Char *argv[])
104 ptr = Strchr(argv[0], ':');
111 l = (size_t)(ptr - argv[0] - 1);
112 tprog = el_malloc((l + 1) * sizeof(*tprog));
115 (void) Strncpy(tprog, argv[0], l);
118 l = (size_t)el_match(el->el_prog, tprog);
125 for (i = 0; cmds[i].name != NULL; i++)
126 if (Strcmp(cmds[i].name, ptr) == 0) {
127 i = (*cmds[i].func) (el, argc, argv);
135 * Parse a string of the form ^<char> \<odigit> \<char> \U+xxxx and return
136 * the appropriate character or -1 if the escape is not valid
139 parse__escape(const Char **ptr)
153 c = '\007'; /* Bell */
156 c = '\010'; /* Backspace */
159 c = '\011'; /* Horizontal Tab */
162 c = '\012'; /* New Line */
165 c = '\013'; /* Vertical Tab */
168 c = '\014'; /* Form Feed */
171 c = '\015'; /* Carriage Return */
174 c = '\033'; /* Escape */
176 case 'U': /* Unicode \U+xxxx or \U+xxxxx format */
179 const Char hex[] = STR("0123456789ABCDEF");
185 for (i = 0; i < 5; ++i) {
186 h = Strchr(hex, *p++);
190 c = (c << 4) | ((int)(h - hex));
194 if (c > 0x10FFFF) /* outside valid character range */
209 for (cnt = 0, c = 0; cnt < 3; cnt++) {
211 if (ch < '0' || ch > '7') {
215 c = (c << 3) | (ch - '0');
217 if ((c & (wint_t)0xffffff00) != (wint_t)0)
226 } else if (*p == '^') {
228 c = (*p == '?') ? '\177' : (*p & 0237);
236 * Parse the escapes from in and put the raw string out
239 parse__string(Char *out, const Char *in)
252 if ((n = parse__escape(&in)) == -1)
258 if (in[1] == '-' && in[2] != '\0') {
273 * Return the command number for the command string given
274 * or -1 if one is not found
277 parse_cmd(EditLine *el, const Char *cmd)
279 el_bindings_t *b = el->el_map.help;
282 for (i = 0; i < el->el_map.nfunc; i++)
283 if (Strcmp(b[i].name, cmd) == 0)