1 /* $NetBSD: parse.c,v 1.26 2011/08/16 16:25:15 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.26 2011/08/16 16:25:15 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
)
281 for (b
= el
->el_map
.help
; b
->name
!= NULL
; b
++)
282 if (Strcmp(b
->name
, cmd
) == 0)