syntax.h revision 1.10 1 1.10 kre /* $NetBSD: syntax.h,v 1.10 2018/11/18 17:23:37 kre Exp $ */
2 1.1 dsl
3 1.1 dsl /*-
4 1.1 dsl * Copyright (c) 1991, 1993
5 1.1 dsl * The Regents of the University of California. All rights reserved.
6 1.1 dsl *
7 1.1 dsl * This code is derived from software contributed to Berkeley by
8 1.1 dsl * Kenneth Almquist.
9 1.1 dsl *
10 1.1 dsl * Redistribution and use in source and binary forms, with or without
11 1.1 dsl * modification, are permitted provided that the following conditions
12 1.1 dsl * are met:
13 1.1 dsl * 1. Redistributions of source code must retain the above copyright
14 1.1 dsl * notice, this list of conditions and the following disclaimer.
15 1.1 dsl * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 dsl * notice, this list of conditions and the following disclaimer in the
17 1.1 dsl * documentation and/or other materials provided with the distribution.
18 1.1 dsl * 3. Neither the name of the University nor the names of its contributors
19 1.1 dsl * may be used to endorse or promote products derived from this software
20 1.1 dsl * without specific prior written permission.
21 1.1 dsl *
22 1.1 dsl * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
23 1.1 dsl * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
24 1.1 dsl * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
25 1.1 dsl * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
26 1.1 dsl * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
27 1.1 dsl * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
28 1.1 dsl * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
29 1.1 dsl * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
30 1.1 dsl * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
31 1.1 dsl * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
32 1.1 dsl * SUCH DAMAGE.
33 1.1 dsl */
34 1.1 dsl
35 1.1 dsl #include <sys/cdefs.h>
36 1.1 dsl #include <ctype.h>
37 1.1 dsl
38 1.1 dsl /* Syntax classes */
39 1.1 dsl #define CWORD 0 /* character is nothing special */
40 1.1 dsl #define CNL 1 /* newline character */
41 1.1 dsl #define CBACK 2 /* a backslash character */
42 1.1 dsl #define CSQUOTE 3 /* single quote */
43 1.1 dsl #define CDQUOTE 4 /* double quote */
44 1.1 dsl #define CBQUOTE 5 /* backwards single quote */
45 1.1 dsl #define CVAR 6 /* a dollar sign */
46 1.1 dsl #define CENDVAR 7 /* a '}' character */
47 1.1 dsl #define CLP 8 /* a left paren in arithmetic */
48 1.1 dsl #define CRP 9 /* a right paren in arithmetic */
49 1.1 dsl #define CEOF 10 /* end of file */
50 1.10 kre #define CSPCL 11 /* these terminate a word */
51 1.10 kre #define CCTL 12 /* like CWORD, except it must be escaped */
52 1.9 kre #define CSBACK 13 /* a backslash in a single quote syntax */
53 1.10 kre /*
54 1.10 kre * note CSBACK == (CCTL|1)
55 1.10 kre * the code does not rely upon that, but keeping it allows a
56 1.10 kre * smart enough compiler to optimise some tests
57 1.10 kre */
58 1.1 dsl
59 1.1 dsl /* Syntax classes for is_ functions */
60 1.1 dsl #define ISDIGIT 01 /* a digit */
61 1.1 dsl #define ISUPPER 02 /* an upper case letter */
62 1.1 dsl #define ISLOWER 04 /* a lower case letter */
63 1.1 dsl #define ISUNDER 010 /* an underscore */
64 1.1 dsl #define ISSPECL 020 /* the name of a special parameter */
65 1.9 kre #define ISSPACE 040 /* a white space character */
66 1.1 dsl
67 1.1 dsl #define PEOF (CHAR_MIN - 1)
68 1.1 dsl #define SYNBASE (-PEOF)
69 1.1 dsl
70 1.1 dsl
71 1.1 dsl #define BASESYNTAX (basesyntax + SYNBASE)
72 1.1 dsl #define DQSYNTAX (dqsyntax + SYNBASE)
73 1.1 dsl #define SQSYNTAX (sqsyntax + SYNBASE)
74 1.1 dsl #define ARISYNTAX (arisyntax + SYNBASE)
75 1.1 dsl
76 1.3 christos /* These defines assume that the digits are contiguous (which is guaranteed) */
77 1.3 christos #define is_digit(c) ((unsigned)((c) - '0') <= 9)
78 1.9 kre #define sh_ctype(c) (is_type+SYNBASE)[(int)(c)]
79 1.7 kre #define is_upper(c) (sh_ctype(c) & ISUPPER)
80 1.7 kre #define is_lower(c) (sh_ctype(c) & ISLOWER)
81 1.4 christos #define is_alpha(c) (sh_ctype(c) & (ISUPPER|ISLOWER))
82 1.4 christos #define is_name(c) (sh_ctype(c) & (ISUPPER|ISLOWER|ISUNDER))
83 1.4 christos #define is_in_name(c) (sh_ctype(c) & (ISUPPER|ISLOWER|ISUNDER|ISDIGIT))
84 1.9 kre #define is_special(c) (sh_ctype(c) & (ISSPECL|ISDIGIT))
85 1.9 kre #define is_space(c) (sh_ctype(c) & ISSPACE)
86 1.9 kre #define digit_val(c) ((c) - '0')
87 1.1 dsl
88 1.10 kre /* true if the arg char needs CTLESC to protect it */
89 1.10 kre #define NEEDESC(c) (SQSYNTAX[(int)(c)] == CCTL || \
90 1.10 kre SQSYNTAX[(int)(c)] == CSBACK)
91 1.10 kre
92 1.1 dsl extern const char basesyntax[];
93 1.1 dsl extern const char dqsyntax[];
94 1.1 dsl extern const char sqsyntax[];
95 1.1 dsl extern const char arisyntax[];
96 1.1 dsl extern const char is_type[];
97