6437624 RFE: Add ksh93 (as /usr/bin/ksh93) and libshell.so to OS/Net

6505835 AST tools and library (libpp) required for creating l10n messages for ksh93
PSARC/2006/550 Korn Shell 93 Integration
PSARC/2006/587 /etc/ksh.kshrc for ksh93
PSARC/2007/035 ksh93 Amendments
Contributed by Roland Mainz <roland.mainz@nrubsig.org>

--HG--
rename : usr/src/lib/libcmd/common/mapfile-vers => deleted_files/usr/src/lib/libcmd/common/mapfile-vers
rename : usr/src/lib/libcmd/common/placeholder.c => deleted_files/usr/src/lib/libcmd/common/placeholder.c

3 files changed, 657 insertions, 0 deletions

diff --git a/usr/src/lib/libshell/amd64/include/ast/history.h b/usr/src/lib/libshell/amd64/include/ast/history.h
new file mode 100644
index 0000000000..55ead66f9e
--- /dev/null
+++ b/usr/src/lib/libshell/amd64/include/ast/history.h
@@ -0,0 +1,84 @@
+
+/* : : generated by proto : : */
+/***********************************************************************
+*                                                                      *
+*               This software is part of the ast package               *
+*           Copyright (c) 1982-2007 AT&T Knowledge Ventures            *
+*                      and is licensed under the                       *
+*                  Common Public License, Version 1.0                  *
+*                      by AT&T Knowledge Ventures                      *
+*                                                                      *
+*                A copy of the License is available at                 *
+*            http://www.opensource.org/licenses/cpl1.0.txt             *
+*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
+*                                                                      *
+*              Information and Software Systems Research               *
+*                            AT&T Research                             *
+*                           Florham Park NJ                            *
+*                                                                      *
+*                  David Korn <dgk@research.att.com>                   *
+*                                                                      *
+***********************************************************************/
+                  
+#ifndef HIST_VERSION
+#if !defined(__PROTO__)
+#include <prototyped.h>
+#endif
+#if !defined(__LINKAGE__)
+#define __LINKAGE__		/* 2004-08-11 transition */
+#endif
+
+/*
+ *	Interface for history mechanism
+ *	written by David Korn
+ *
+ */
+
+#include	<ast.h>
+
+#define HIST_CHAR	'!'
+#define HIST_VERSION	1		/* history file format version no. */
+
+typedef struct 
+{
+	Sfdisc_t	histdisc;	/* discipline for history */
+	Sfio_t		*histfp;	/* history file stream pointer */
+	char		*histname;	/* name of history file */
+	int32_t		histind;	/* current command number index */
+	int		histsize;	/* number of accessible history lines */
+#ifdef _HIST_PRIVATE
+	_HIST_PRIVATE
+#endif /* _HIST_PRIVATE */
+} History_t;
+
+typedef struct
+{
+	int hist_command;
+	int hist_line;
+	int hist_char;
+} Histloc_t;
+
+/* the following are readonly */
+extern __MANGLE__ const char	hist_fname[];
+
+extern __MANGLE__ int _Hist;
+#define	hist_min(hp)	((_Hist=((int)((hp)->histind-(hp)->histsize)))>=0?_Hist:0)
+#define	hist_max(hp)	((int)((hp)->histind))
+/* these are the history interface routines */
+extern __MANGLE__ int		sh_histinit __PROTO__((void));
+extern __MANGLE__ void 		hist_cancel __PROTO__((History_t*));
+extern __MANGLE__ void 		hist_close __PROTO__((History_t*));
+extern __MANGLE__ int		hist_copy __PROTO__((char*, int, int, int));
+extern __MANGLE__ void 		hist_eof __PROTO__((History_t*));
+extern __MANGLE__ Histloc_t	hist_find __PROTO__((History_t*,char*,int, int, int));
+extern __MANGLE__ void 		hist_flush __PROTO__((History_t*));
+extern __MANGLE__ void 		hist_list __PROTO__((History_t*,Sfio_t*, off_t, int, char*));
+extern __MANGLE__ int		hist_match __PROTO__((History_t*,off_t, char*, int*));
+extern __MANGLE__ off_t		hist_tell __PROTO__((History_t*,int));
+extern __MANGLE__ off_t		hist_seek __PROTO__((History_t*,int));
+extern __MANGLE__ char 		*hist_word __PROTO__((char*, int, int));
+#if SHOPT_ESH
+    extern __MANGLE__ Histloc_t	hist_locate __PROTO__((History_t*,int, int, int));
+#endif	/* SHOPT_ESH */
+
+#endif /* HIST_VERSION */
diff --git a/usr/src/lib/libshell/amd64/include/ast/nval.h b/usr/src/lib/libshell/amd64/include/ast/nval.h
new file mode 100644
index 0000000000..06b18217b7
--- /dev/null
+++ b/usr/src/lib/libshell/amd64/include/ast/nval.h
@@ -0,0 +1,317 @@
+
+/* : : generated by proto : : */
+/***********************************************************************
+*                                                                      *
+*               This software is part of the ast package               *
+*           Copyright (c) 1982-2007 AT&T Knowledge Ventures            *
+*                      and is licensed under the                       *
+*                  Common Public License, Version 1.0                  *
+*                      by AT&T Knowledge Ventures                      *
+*                                                                      *
+*                A copy of the License is available at                 *
+*            http://www.opensource.org/licenses/cpl1.0.txt             *
+*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
+*                                                                      *
+*              Information and Software Systems Research               *
+*                            AT&T Research                             *
+*                           Florham Park NJ                            *
+*                                                                      *
+*                  David Korn <dgk@research.att.com>                   *
+*                                                                      *
+***********************************************************************/
+                  
+#ifndef NV_DEFAULT
+#if !defined(__PROTO__)
+#include <prototyped.h>
+#endif
+#if !defined(__LINKAGE__)
+#define __LINKAGE__		/* 2004-08-11 transition */
+#endif
+
+/*
+ * David Korn
+ * AT&T Labs
+ *
+ * Interface definitions of structures for name-value pairs
+ * These structures are used for named variables, functions and aliases
+ *
+ */
+
+
+#include	<ast.h>
+#include	<cdt.h>
+
+/* for compatibility with old hash library */
+#define Hashtab_t	Dt_t
+#define HASH_BUCKET	1
+#define HASH_NOSCOPE	2
+#define HASH_SCOPE	4
+#define hashscope(x)	dtvnext(x)
+
+typedef struct Namval Namval_t;
+typedef struct Namfun Namfun_t;
+typedef struct Namdisc Namdisc_t;
+typedef struct Nambfun Nambfun_t;
+typedef struct Namarray Namarr_t;
+typedef struct Nambltin Nambltin_t;
+typedef struct Namtype Namtype_t;
+
+/*
+ * This defines the template for nodes that have their own assignment
+ * and or lookup functions
+ */
+struct Namdisc
+{
+	size_t	dsize;
+	void	(*putval) __PROTO__((Namval_t*, const char*, int, Namfun_t*));
+	char	*(*getval) __PROTO__((Namval_t*, Namfun_t*));
+	Sfdouble_t	(*getnum) __PROTO__((Namval_t*, Namfun_t*));
+	char	*(*setdisc) __PROTO__((Namval_t*, const char*, Namval_t*, Namfun_t*));
+	Namval_t *(*createf) __PROTO__((Namval_t*, const char*, int, Namfun_t*));
+	Namfun_t *(*clonef) __PROTO__((Namval_t*, Namval_t*, int, Namfun_t*));
+	char	*(*namef) __PROTO__((Namval_t*, Namfun_t*));
+	Namval_t *(*nextf) __PROTO__((Namval_t*, Dt_t*, Namfun_t*));
+	Namval_t *(*typef) __PROTO__((Namval_t*, Namfun_t*));
+	int	(*readf) __PROTO__((Namval_t*, Sfio_t*, int, Namfun_t*));
+};
+
+struct Namfun
+{
+	const Namdisc_t	*disc;
+	char		nofree;
+	char		funs;
+	unsigned short	dsize;
+	Namfun_t	*next;
+	char		*last;
+	Namval_t	*type;
+};
+
+struct Nambfun
+{
+	Namfun_t        fun;
+	int		num;
+	const char	**bnames;
+	Namval_t	*bltins[1];
+};
+
+/* This is an array template header */
+struct Namarray
+{
+	Namfun_t	hdr;
+	long		nelem;				/* number of elements */
+	__V_	*(*fun) __PROTO__((Namval_t*,const char*,int));	/* associative arrays */
+	Namval_t	*parent;		/* for multi-dimensional */
+};
+
+/* Passed as third argument to a builtin when  NV_BLTINOPT is set on node */
+struct Nambltin
+{
+        __V_		*shp;
+	Namval_t	*np;
+        __V_	 	*ptr;
+        __V_		*data;
+        int		flags;
+};
+
+struct Namtype
+{
+        __V_		*shp;
+	Namval_t	*np;
+	const char	*optstring;
+	__V_		*optinfof;
+};
+
+/* attributes of name-value node attribute flags */
+
+#define NV_DEFAULT 0
+/* This defines the attributes for an attributed name-value pair node */
+struct Namval
+{
+	Dtlink_t	nvlink;		/* space for cdt links */
+	char		*nvname;	/* pointer to name of the node */
+	unsigned short	nvflag; 	/* attributes */
+	unsigned short 	nvsize;		/* size or base */
+#ifdef _NV_PRIVATE
+	_NV_PRIVATE
+#else
+	Namfun_t	*nvfun;
+	char		*nvalue;
+	char		*nvprivate;
+#endif /* _NV_PRIVATE */
+};
+
+#define NV_CLASS	".sh.type"
+#define NV_MINSZ	(sizeof(struct Namval)-sizeof(Dtlink_t)-sizeof(char*))
+#define nv_namptr(p,n)	((Namval_t*)((char*)(p)+(n)*NV_MINSZ-sizeof(Dtlink_t)))
+
+/* The following attributes are for internal use */
+#define NV_NOFREE	0x200	/* don't free the space when releasing value */
+#define NV_ARRAY	0x400	/* node is an array */
+#define NV_REF		0x4000	/* reference bit */
+#define NV_TABLE	0x800	/* node is a dictionary table */
+#define NV_IMPORT	0x1000	/* value imported from environment */
+#define NV_MINIMAL	NV_IMPORT	/* node does not contain all fields */
+
+#define NV_INTEGER	0x2	/* integer attribute */
+/* The following attributes are valid only when NV_INTEGER is off */
+#define NV_LTOU		0x4	/* convert to uppercase */
+#define NV_UTOL		0x8	/* convert to lowercase */
+#define NV_ZFILL	0x10	/* right justify and fill with leading zeros */
+#define NV_RJUST	0x20	/* right justify and blank fill */
+#define NV_LJUST	0x40	/* left justify and blank fill */
+#define NV_BINARY	0x100	/* fixed size data buffer */
+#define NV_RAW		NV_LJUST	/* used only with NV_BINARY */
+#define NV_HOST		(NV_RJUST|NV_LJUST)	/* map to host filename */
+
+/* The following attributes do not effect the value */
+#define NV_RDONLY	0x1	/* readonly bit */
+#define NV_EXPORT	0x2000	/* export bit */
+#define NV_TAGGED	0x8000	/* user define tag bit */
+
+/* The following are used with NV_INTEGER */
+#define NV_SHORT	(NV_RJUST)	/* when integers are not long */
+#define NV_LONG		(NV_UTOL)	/* for long long and long double */
+#define NV_UNSIGN	(NV_LTOU)	/* for unsigned quantities */
+#define NV_DOUBLE	(NV_ZFILL)	/* for floating point */
+#define NV_EXPNOTE	(NV_LJUST)	/* for scientific notation */
+
+/*  options for nv_open */
+
+#define NV_APPEND	0x10000		/* append value */
+#define NV_MOVE		0x20000		/* for use with nv_clone */
+#define NV_ADD		8
+					/* add node if not found */
+#define NV_ASSIGN	NV_NOFREE	/* assignment is possible */
+#define NV_NOASSIGN	0		/* backward compatibility */
+#define NV_NOARRAY	0x200000	/* array name not possible */
+#define NV_IARRAY	0x400000	/* for indexed array */
+#define NV_NOREF	NV_REF		/* don't follow reference */
+#define NV_IDENT	0x80		/* name must be identifier */
+#define NV_VARNAME	0x20000		/* name must be ?(.)id*(.id) */
+#define NV_NOADD	0x40000		/* do not add node */ 	
+#define NV_NOSCOPE	0x80000		/* look only in current scope */
+#define NV_NOFAIL	0x100000	/* return 0 on failure, no msg */
+#define NV_NODISC	NV_IDENT	/* ignore disciplines */
+
+#define NV_FUNCT	NV_IDENT	/* option for nv_create */
+#define NV_BLTINOPT	NV_ZFILL	/* save state for optimization*/
+
+#define NV_PUBLIC	(~(NV_NOSCOPE|NV_ASSIGN|NV_IDENT|NV_VARNAME|NV_NOADD))
+
+/* numeric types */
+#define NV_INT16	(NV_SHORT|NV_INTEGER)
+#define NV_UINT16	(NV_UNSIGN|NV_SHORT|NV_INTEGER)
+#define NV_INT32	(NV_INTEGER)
+#define NV_UNT32	(NV_UNSIGN|NV_INTEGER)
+#define NV_INT64	(NV_LONG|NV_INTEGER)
+#define NV_UINT64	(NV_UNSIGN|NV_LONG|NV_INTEGER)
+#define NV_FLOAT	(NV_SHORT|NV_DOUBLE|NV_INTEGER)
+#define NV_LDOUBLE	(NV_LONG|NV_DOUBLE|NV_INTEGER)
+
+/* name-value pair macros */
+#define nv_isattr(np,f)		((np)->nvflag & (f))
+#define nv_onattr(n,f)		((n)->nvflag |= (f))
+#define nv_offattr(n,f)		((n)->nvflag &= ~(f))
+#define nv_isarray(np)		(nv_isattr((np),NV_ARRAY))
+
+/* The following are operations for associative arrays */
+#define NV_AINIT	1	/* initialize */
+#define NV_AFREE	2	/* free array */
+#define NV_ANEXT	3	/* advance to next subscript */
+#define NV_ANAME	4	/* return subscript name */
+#define NV_ADELETE	5	/* delete current subscript */
+#define NV_AADD		6	/* add subscript if not found */
+#define NV_ACURRENT	7	/* return current subscript Namval_t* */
+
+/* The following are for nv_disc */
+#define NV_FIRST	1
+#define NV_LAST		2
+#define NV_POP		3
+#define NV_CLONE	4
+
+/* The following are operations for nv_putsub() */
+#define ARRAY_BITS	24
+#define ARRAY_ADD	(1L<<ARRAY_BITS)	/* add subscript if not found */
+#define	ARRAY_SCAN	(2L<<ARRAY_BITS)	/* For ${array[@]} */
+#define ARRAY_UNDEF	(4L<<ARRAY_BITS)	/* For ${array} */
+
+
+/* These  are disciplines provided by the library for use with nv_discfun */
+#define NV_DCADD	0	/* used to add named disciplines */
+#define NV_DCRESTRICT	1	/* variable that are restricted in rsh */
+
+#if defined(__EXPORT__) && defined(_DLL)
+#   ifdef _BLD_shell
+#undef __MANGLE__
+#define __MANGLE__ __LINKAGE__ __EXPORT__
+#   else
+#undef __MANGLE__
+#define __MANGLE__ __LINKAGE__ __IMPORT__
+#   endif /* _BLD_shell */
+#endif /* _DLL */
+/* prototype for array interface*/
+extern __MANGLE__ Namarr_t	*nv_setarray __PROTO__((Namval_t*,__V_*(*)(Namval_t*,const char*,int)));
+extern __MANGLE__ __V_	*nv_associative __PROTO__((Namval_t*,const char*,int));
+extern __MANGLE__ int	nv_aindex __PROTO__((Namval_t*));
+extern __MANGLE__ int	nv_nextsub __PROTO__((Namval_t*));
+extern __MANGLE__ char	*nv_getsub __PROTO__((Namval_t*));
+extern __MANGLE__ Namval_t	*nv_putsub __PROTO__((Namval_t*, char*, long));
+extern __MANGLE__ Namval_t	*nv_opensub __PROTO__((Namval_t*));
+
+/* name-value pair function prototypes */
+extern __MANGLE__ int		nv_adddisc __PROTO__((Namval_t*, const char**, Namval_t**));
+extern __MANGLE__ int		nv_clone __PROTO__((Namval_t*, Namval_t*, int));
+extern __MANGLE__ void 		nv_close __PROTO__((Namval_t*));
+extern __MANGLE__ __V_		*nv_context __PROTO__((Namval_t*));
+extern __MANGLE__ Namval_t		*nv_create __PROTO__((const char*, Dt_t*, int,Namfun_t*));
+extern __MANGLE__ Dt_t		*nv_dict __PROTO__((Namval_t*));
+extern __MANGLE__ Sfdouble_t	nv_getn __PROTO__((Namval_t*, Namfun_t*));
+extern __MANGLE__ Sfdouble_t	nv_getnum __PROTO__((Namval_t*));
+extern __MANGLE__ char 		*nv_getv __PROTO__((Namval_t*, Namfun_t*));
+extern __MANGLE__ char 		*nv_getval __PROTO__((Namval_t*));
+extern __MANGLE__ Namfun_t		*nv_hasdisc __PROTO__((Namval_t*, const Namdisc_t*));
+extern __MANGLE__ int		nv_isnull __PROTO__((Namval_t*));
+extern __MANGLE__ Namval_t		*nv_lastdict __PROTO__((void));
+extern __MANGLE__ void 		nv_newattr __PROTO__((Namval_t*,unsigned,int));
+extern __MANGLE__ Namval_t		*nv_open __PROTO__((const char*,Dt_t*,int));
+extern __MANGLE__ void 		nv_putval __PROTO__((Namval_t*,const char*,int));
+extern __MANGLE__ void 		nv_putv __PROTO__((Namval_t*,const char*,int,Namfun_t*));
+extern __MANGLE__ int		nv_scan __PROTO__((Dt_t*,void(*)(Namval_t*,__V_*),__V_*,int,int));
+extern __MANGLE__ Namval_t		*nv_scoped __PROTO__((Namval_t*));
+extern __MANGLE__ char 		*nv_setdisc __PROTO__((Namval_t*,const char*,Namval_t*,Namfun_t*));
+extern __MANGLE__ void		nv_setref __PROTO__((Namval_t*, Dt_t*,int));
+extern __MANGLE__ int		nv_settype __PROTO__((Namval_t*, Namval_t*, int));
+extern __MANGLE__ void 		nv_setvec __PROTO__((Namval_t*,int,int,char*[]));
+extern __MANGLE__ void		nv_setvtree __PROTO__((Namval_t*));
+extern __MANGLE__ int 		nv_setsize __PROTO__((Namval_t*,int));
+extern __MANGLE__ Namfun_t		*nv_disc __PROTO__((Namval_t*,Namfun_t*,int));
+extern __MANGLE__ void 		nv_unset __PROTO__((Namval_t*));
+extern __MANGLE__ Namval_t		*nv_search __PROTO__((const char *, Dt_t*, int));
+extern __MANGLE__ void		nv_unscope __PROTO__((void));
+extern __MANGLE__ char		*nv_name __PROTO__((Namval_t*));
+extern __MANGLE__ Namval_t		*nv_type __PROTO__((Namval_t*));
+extern __MANGLE__ const Namdisc_t	*nv_discfun __PROTO__((int));
+
+#ifdef _DLL
+#undef __MANGLE__
+#define __MANGLE__ __LINKAGE__
+#endif /* _DLL */
+
+#define nv_size(np)		nv_setsize((np),-1)
+#define nv_stack(np,nf)		nv_disc(np,nf,0)
+
+#if 0
+/*
+ * The names of many functions were changed in early '95
+ * Here is a mapping to the old names
+ */
+#   define nv_istype(np)	nv_isattr(np)
+#   define nv_newtype(np)	nv_newattr(np)
+#   define nv_namset(np,a,b)	nv_open(np,a,b)
+#   define nv_free(np)		nv_unset(np)
+#   define nv_settype(np,a,b,c)	nv_setdisc(np,a,b,c)
+#   define nv_search(np,a,b)	nv_open(np,a,((b)?0:NV_NOADD))
+#   define settype	setdisc
+#endif
+
+#endif /* NV_DEFAULT */
diff --git a/usr/src/lib/libshell/amd64/include/ast/shell.h b/usr/src/lib/libshell/amd64/include/ast/shell.h
new file mode 100644
index 0000000000..37cafa932b
--- /dev/null
+++ b/usr/src/lib/libshell/amd64/include/ast/shell.h
@@ -0,0 +1,256 @@
+
+/* : : generated by proto : : */
+/***********************************************************************
+*                                                                      *
+*               This software is part of the ast package               *
+*           Copyright (c) 1982-2007 AT&T Knowledge Ventures            *
+*                      and is licensed under the                       *
+*                  Common Public License, Version 1.0                  *
+*                      by AT&T Knowledge Ventures                      *
+*                                                                      *
+*                A copy of the License is available at                 *
+*            http://www.opensource.org/licenses/cpl1.0.txt             *
+*         (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9)         *
+*                                                                      *
+*              Information and Software Systems Research               *
+*                            AT&T Research                             *
+*                           Florham Park NJ                            *
+*                                                                      *
+*                  David Korn <dgk@research.att.com>                   *
+*                                                                      *
+***********************************************************************/
+                  
+#ifndef SH_INTERACTIVE
+#if !defined(__PROTO__)
+#include <prototyped.h>
+#endif
+#if !defined(__LINKAGE__)
+#define __LINKAGE__		/* 2004-08-11 transition */
+#endif
+
+/*
+ * David Korn
+ * AT&T Labs
+ *
+ * Interface definitions for shell command language
+ *
+ */
+
+#include	<cmd.h>
+#include	<cdt.h>
+#ifdef _SH_PRIVATE
+#   include	"name.h"
+#else
+#   include	<nval.h>
+#endif /* _SH_PRIVATE */
+
+#define SH_VERSION	20060510
+
+#undef NOT_USED
+#define NOT_USED(x)	(&x,1)
+
+/* options */
+typedef struct
+{
+	unsigned long v[4];
+}
+Shopt_t;
+
+typedef void	(*Shinit_f) __PROTO__((int));
+typedef int     (*Shbltin_f) __PROTO__((int, char*[], __V_*));
+typedef int	(*Shwait_f) __PROTO__((int, long, int));
+
+union Shnode_u;
+typedef union Shnode_u Shnode_t;
+
+#define SH_CFLAG	0
+#define SH_HISTORY	1	/* used also as a state */
+#define	SH_ERREXIT	2	/* used also as a state */
+#define	SH_VERBOSE	3	/* used also as a state */
+#define SH_MONITOR	4	/* used also as a state */
+#define	SH_INTERACTIVE	5	/* used also as a state */
+#define	SH_RESTRICTED	6
+#define	SH_XTRACE	7
+#define	SH_KEYWORD	8
+#define SH_NOUNSET	9
+#define SH_NOGLOB	10
+#define SH_ALLEXPORT	11
+#define SH_PFSH		12
+#define SH_IGNOREEOF	13
+#define SH_NOCLOBBER	14
+#define SH_MARKDIRS	15
+#define SH_BGNICE	16
+#define SH_VI		17
+#define SH_VIRAW	18
+#define	SH_TFLAG	19
+#define SH_TRACKALL	20
+#define	SH_SFLAG	21
+#define	SH_NOEXEC	22
+#define SH_GMACS	24
+#define SH_EMACS	25
+#define SH_PRIVILEGED	26
+#define SH_SUBSHARE	27	/* subshell shares state with parent */
+#define SH_NOLOG	28
+#define SH_NOTIFY	29
+#define SH_DICTIONARY	30
+#define SH_PIPEFAIL	32
+#define SH_GLOBSTARS	33
+#define SH_XARGS	34
+#define SH_RC		35
+#define SH_SHOWME	36
+
+/*
+ * passed as flags to builtins in Nambltin_t struct when BLT_OPTIM is on
+ */
+#define SH_BEGIN_OPTIM	0x1
+#define SH_END_OPTIM	0x2
+
+/* The following type is used for error messages */
+
+/* error messages */
+extern __MANGLE__ const char	e_defpath[];
+extern __MANGLE__ const char	e_found[];
+extern __MANGLE__ const char	e_nospace[];
+extern __MANGLE__ const char	e_format[];
+extern __MANGLE__ const char 	e_number[];
+extern __MANGLE__ const char	e_restricted[];
+extern __MANGLE__ const char	e_recursive[];
+extern __MANGLE__ char		e_version[];
+
+typedef struct sh_scope
+{
+	struct sh_scope	*par_scope;
+	int		argc;
+	char		**argv;
+	char		*cmdname;
+	char		*filename;
+	int		lineno;
+	Dt_t		*var_tree;
+	struct sh_scope	*self;
+} Shscope_t;
+
+/*
+ * Saves the state of the shell
+ */
+
+typedef struct sh_static
+{
+	Shopt_t		options;	/* set -o options */
+	Dt_t		*var_tree;	/* for shell variables */
+	Dt_t		*fun_tree;	/* for shell functions */
+	Dt_t		*alias_tree;	/* for alias names */
+	Dt_t		*bltin_tree;    /* for builtin commands */
+	Shscope_t	*topscope;	/* pointer to top-level scope */
+	int		inlineno;	/* line number of current input file */
+	int		exitval;	/* most recent exit value */
+	unsigned char	trapnote;	/* set when trap/signal is pending */
+	char		subshell;	/* set for virtual subshell */
+#ifdef _SH_PRIVATE
+	_SH_PRIVATE
+#endif /* _SH_PRIVATE */
+} Shell_t;
+
+/* flags for sh_parse */
+#define SH_NL		1	/* Treat new-lines as ; */
+#define SH_EOF		2	/* EOF causes syntax error */
+
+/* symbolic values for sh_iogetiop */
+#define SH_IOCOPROCESS	(-2)
+#define SH_IOHISTFILE	(-3)
+
+/* symbolic value for sh_fdnotify */
+#define SH_FDCLOSE	(-1)
+
+#if defined(__EXPORT__) && defined(_DLL)
+#   ifdef _BLD_shell
+#undef __MANGLE__
+#define __MANGLE__ __LINKAGE__ __EXPORT__
+#   endif /* _BLD_shell */
+#endif /* _DLL */
+
+extern __MANGLE__ Dt_t		*sh_bltin_tree __PROTO__((void));
+extern __MANGLE__ void		sh_subfork __PROTO__((void));
+extern __MANGLE__ Shell_t		*sh_init __PROTO__((int,char*[],Shinit_f));
+extern __MANGLE__ int		sh_reinit __PROTO__((char*[]));
+extern __MANGLE__ int 		sh_eval __PROTO__((Sfio_t*,int));
+extern __MANGLE__ void 		sh_delay __PROTO__((double));
+extern __MANGLE__ __V_		*sh_parse __PROTO__((Shell_t*, Sfio_t*,int));
+extern __MANGLE__ int 		sh_trap __PROTO__((const char*,int));
+extern __MANGLE__ int 		sh_fun __PROTO__((Namval_t*,Namval_t*, char*[]));
+extern __MANGLE__ int 		sh_funscope __PROTO__((int,char*[],int(*)(__V_*),__V_*,int));
+extern __MANGLE__ Sfio_t		*sh_iogetiop __PROTO__((int,int));
+extern __MANGLE__ int		sh_main __PROTO__((int, char*[], void(*)(int)));
+extern __MANGLE__ void		sh_menu __PROTO__((Sfio_t*, int, char*[]));
+extern __MANGLE__ Namval_t		*sh_addbuiltin __PROTO__((const char*, int(*)(int, char*[],__V_*), __V_*));
+extern __MANGLE__ char		*sh_fmtq __PROTO__((const char*));
+extern __MANGLE__ char		*sh_fmtqf __PROTO__((const char*, int, int));
+extern __MANGLE__ Sfdouble_t	sh_strnum __PROTO__((const char*, char**, int));
+extern __MANGLE__ int		sh_access __PROTO__((const char*,int));
+extern __MANGLE__ int 		sh_close __PROTO__((int));
+extern __MANGLE__ int 		sh_dup __PROTO__((int));
+extern __MANGLE__ void 		sh_exit __PROTO__((int));
+extern __MANGLE__ int		sh_fcntl __PROTO__((int, int, ...));
+extern __MANGLE__ Sfio_t		*sh_fd2sfio __PROTO__((int));
+extern __MANGLE__ int		(*sh_fdnotify __PROTO__((int(*)(int,int)))) __PROTO__((int,int));
+extern __MANGLE__ Shell_t		*sh_getinterp __PROTO__((void));
+extern __MANGLE__ int		sh_open __PROTO__((const char*, int, ...));
+extern __MANGLE__ int		sh_openmax __PROTO__((void));
+extern __MANGLE__ Sfio_t		*sh_pathopen __PROTO__((const char*));
+extern __MANGLE__ ssize_t 		sh_read __PROTO__((int, __V_*, size_t));
+extern __MANGLE__ ssize_t 		sh_write __PROTO__((int, const __V_*, size_t));
+extern __MANGLE__ off_t		sh_seek __PROTO__((int, off_t, int));
+extern __MANGLE__ int 		sh_pipe __PROTO__((int[]));
+extern __MANGLE__ mode_t 		sh_umask __PROTO__((mode_t));
+extern __MANGLE__ __V_		*sh_waitnotify __PROTO__((Shwait_f));
+extern __MANGLE__ Shscope_t	*sh_getscope __PROTO__((int,int));
+extern __MANGLE__ Shscope_t	*sh_setscope __PROTO__((Shscope_t*));
+extern __MANGLE__ void		sh_sigcheck __PROTO__((void));
+extern __MANGLE__ unsigned long	sh_isoption __PROTO__((int));
+extern __MANGLE__ unsigned long	sh_onoption __PROTO__((int));
+extern __MANGLE__ unsigned long	sh_offoption __PROTO__((int));
+extern __MANGLE__ int 		sh_waitsafe __PROTO__((void));
+extern __MANGLE__ int		sh_exec __PROTO__((const Shnode_t*,int));
+
+#if SHOPT_DYNAMIC
+    extern __MANGLE__ __V_		**sh_getliblist __PROTO__((void));
+#endif /* SHOPT_DYNAMIC */
+
+/*
+ * direct access to sh is obsolete, use sh_getinterp() instead
+ */
+#if !defined(_SH_PRIVATE) && defined(__IMPORT__) && !defined(_BLD_shell)
+	extern __MANGLE__ __IMPORT__  Shell_t sh;
+#else
+	extern __MANGLE__ Shell_t sh;
+#endif
+
+#ifdef _DLL
+#undef __MANGLE__
+#define __MANGLE__ __LINKAGE__
+#endif /* _DLL */
+
+#ifndef _SH_PRIVATE
+#   define access(a,b)	sh_access(a,b)
+#   define close(a)	sh_close(a)
+#   define exit(a)	sh_exit(a)
+#   define fcntl(a,b,c)	sh_fcntl(a,b,c)
+#   define pipe(a)	sh_pipe(a)
+#   define read(a,b,c)	sh_read(a,b,c)
+#   define write(a,b,c)	sh_write(a,b,c)
+#   define umask(a)	sh_umask(a)
+#   define dup		sh_dup
+#   if _lib_lseek64
+#	define open64	sh_open
+#	define lseek64	sh_seek
+#   else
+#	define open	sh_open
+#	define lseek	sh_seek
+#   endif
+#endif /* !_SH_PRIVATE */
+
+#define SH_SIGSET	4
+#define SH_EXITSIG	0400	/* signal exit bit */
+#define SH_EXITMASK	(SH_EXITSIG-1)	/* normal exit status bits */
+#define SH_RUNPROG	-1022	/* needs to be negative and < 256 */
+
+#endif /* SH_INTERACTIVE */