Imported Upstream version 93u+upstream

1 files changed, 157 insertions, 0 deletions

diff --git a/src/cmd/ksh93/include/lexstates.h b/src/cmd/ksh93/include/lexstates.h
new file mode 100644
index 0000000..a078e35
--- /dev/null
+++ b/src/cmd/ksh93/include/lexstates.h
@@ -0,0 +1,157 @@
+/***********************************************************************
+*                                                                      *
+*               This software is part of the ast package               *
+*          Copyright (c) 1982-2011 AT&T Intellectual Property          *
+*                      and is licensed under the                       *
+*                 Eclipse Public License, Version 1.0                  *
+*                    by AT&T Intellectual Property                     *
+*                                                                      *
+*                A copy of the License is available at                 *
+*          http://www.eclipse.org/org/documents/epl-v10.html           *
+*         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
+*                                                                      *
+*              Information and Software Systems Research               *
+*                            AT&T Research                             *
+*                           Florham Park NJ                            *
+*                                                                      *
+*                  David Korn <dgk@research.att.com>                   *
+*                                                                      *
+***********************************************************************/
+#pragma prototyped
+#ifndef S_BREAK
+#define S_BREAK	1	/* end of token */
+#define S_EOF	2	/* end of buffer */
+#define S_NL	3	/* new-line when not a token */
+#define S_RES	4	/* first character of reserved word */
+#define S_NAME	5	/* other identifier characters */
+#define S_REG	6	/* non-special characters */
+#define S_TILDE	7	/* first char is tilde */
+#define S_PUSH	8
+#define S_POP	9
+#define S_BRACT	10
+#define S_LIT	11	/* literal quote character */
+#define S_NLTOK	12	/* new-line token */
+#define S_OP	13	/* operator character */
+#define S_PAT	14	/* pattern characters * and ? */
+#define S_EPAT	15	/* pattern char when followed by ( */
+#define S_EQ	16	/* assignment character */
+#define S_COM	17	/* comment character */
+#define S_MOD1	18	/* ${...} modifier character - old quoting */
+#define S_MOD2	19	/* ${...} modifier character - new quoting */
+#define S_ERR	20	/* invalid character in ${...} */
+#define S_SPC1	21	/* special prefix characters after $ */
+#define S_SPC2	22	/* special characters after $ */
+#define S_DIG	23	/* digit character after $*/
+#define S_ALP	24	/* alpahbetic character after $ */
+#define S_LBRA	25	/* left brace after $ */
+#define S_RBRA	26	/* right brace after $ */
+#define S_PAR	27	/* set for $( */
+#define S_ENDCH	28	/* macro expansion terminator */
+#define S_SLASH	29	/* / character terminates ~ expansion  */
+#define S_COLON	30	/* for character : */
+#define S_LABEL	31	/* for goto label */
+#define S_EDOL	32	/* ends $identifier */
+#define S_BRACE	33	/* left brace */
+#define S_DOT	34	/* . char */
+#define S_META	35	/* | & ; < > inside ${...} reserved for future use */
+#define S_SPACE	S_BREAK	/* IFS space characters */
+#define S_DELIM	S_RES	/* IFS delimter characters */
+#define S_MBYTE S_NAME	/* IFS first byte of multi-byte char */
+#define S_BLNK	36	/* space or tab */
+/* The following must be the highest numbered states */
+#define S_QUOTE	37	/* double quote character */
+#define S_GRAVE	38	/* old comsub character */
+#define S_ESC	39	/* escape character */
+#define S_DOL	40	/* $ subsitution character */
+#define S_ESC2	41	/* escape character inside '...' */
+
+/* These are the lexical state table names */
+#define ST_BEGIN	0
+#define ST_NAME		1
+#define ST_NORM		2
+#define ST_LIT		3
+#define ST_QUOTE	4
+#define ST_NESTED	5
+#define ST_DOL		6
+#define ST_BRACE	7
+#define ST_DOLNAME	8
+#define ST_MACRO	9
+#define ST_QNEST	10
+#define ST_NONE		11
+
+#include "FEATURE/locale"
+
+#if _hdr_wchar
+#   include <wchar.h>
+#   if _hdr_wctype
+#       include <wctype.h>
+#       undef  isalpha
+#       define isalpha(x)      iswalpha(x)
+#       if defined(iswblank) || _lib_iswblank
+#           undef  isblank
+#           define isblank(x)      iswblank(x)
+#       else
+#           if _lib_wctype && _lib_iswctype
+#               define _lib_iswblank	-1
+#               undef  isblank
+#	        define isblank(x)	local_iswblank(x)
+	        extern int		local_iswblank(wchar_t);
+#           endif
+#       endif
+#   endif
+#endif
+#ifndef isblank
+#   define isblank(x)      ((x)==' '||(x)=='\t')
+#endif
+
+#undef LEN
+#if SHOPT_MULTIBYTE
+#   define LEN		_Fcin.fclen
+#   define isaname(c)	((c)>0x7f?isalpha(c): sh_lexstates[ST_NAME][(c)]==0)
+#   define isaletter(c)	((c)>0x7f?isalpha(c): sh_lexstates[ST_DOL][(c)]==S_ALP && (c)!='.')
+#else
+#   undef mbwide
+#   define mbwide()	(0)
+#   define LEN		1
+#   define isaname(c)	(sh_lexstates[ST_NAME][c]==0)
+#   define isaletter(c)	(sh_lexstates[ST_DOL][c]==S_ALP && (c)!='.')
+#endif
+#define STATE(s,c)	(s[mbwide()?((c=fcmbget(&LEN)),LEN>1?'a':c):(c=fcget())])
+#define isadigit(c)	(sh_lexstates[ST_DOL][c]==S_DIG)
+#define isastchar(c)	((c)=='@' || (c)=='*')
+#define isexp(c)	(sh_lexstates[ST_MACRO][c]==S_PAT||(c)=='$'||(c)=='`')
+#define ismeta(c)	(sh_lexstates[ST_NAME][c]==S_BREAK)
+
+extern char *sh_lexstates[ST_NONE];
+extern const char *sh_lexrstates[ST_NONE];
+extern const char e_lexversion[];
+extern const char e_lexspace[];
+extern const char e_lexslash[];
+extern const char e_lexlabignore[];
+extern const char e_lexlabunknown[];
+extern const char e_lexsyntax1[];
+extern const char e_lexsyntax2[];
+extern const char e_lexsyntax3[];
+extern const char e_lexsyntax4[];
+extern const char e_lexsyntax5[];
+extern const char e_lexwarnvar[];
+extern const char e_lexobsolete1[];
+extern const char e_lexobsolete2[];
+extern const char e_lexobsolete3[];
+extern const char e_lexobsolete4[];
+extern const char e_lexobsolete5[];
+extern const char e_lexobsolete6[];
+extern const char e_lexnonstandard[];
+extern const char e_lexusebrace[];
+extern const char e_lexusequote[];
+extern const char e_lexescape[];
+extern const char e_lexquote[];
+extern const char e_lexnested[];
+extern const char e_lexbadchar[];
+extern const char e_lexlongquote[];
+extern const char e_lexfuture[];
+extern const char e_lexzerobyte[];
+extern const char e_lexemptyfor[];
+extern const char e_lextypeset[];
+extern const char e_lexcharclass[];
+#endif