#ifndef _h_sh
#define _h_sh
#include "config.h"
#ifndef EXTERN
# define EXTERN extern
#else /* !EXTERN */
# ifdef WINNT_NATIVE
# define IZERO = 0
# define IZERO_STRUCT = {0}
# endif /* WINNT_NATIVE */
#endif /* EXTERN */
#ifndef IZERO
# define IZERO
#endif /* IZERO */
#ifndef IZERO_STRUCT
# define IZERO_STRUCT
# endif /* IZERO_STRUCT */
#ifndef WINNT_NATIVE
# define INIT_ZERO
# define INIT_ZERO_STRUCT
# define force_read read
#endif /*!WINNT_NATIVE */
#if defined(_POSIX_SOURCE) && !defined(POSIX)
# define POSIX
#endif
#if defined(POSIXJOBS) && !defined(BSDJOBS)
# define BSDJOBS
#endif
#if defined(POSIXSIGS) && !defined(BSDSIGS)
# define BSDSIGS
#endif
#ifdef SHORT_STRINGS
typedef
short
Char;
typedef
unsigned
short
uChar;
# define SAVE(a) (Strsave(str2short(a)))
#else
typedef
char
Char;
typedef
unsigned
char
uChar;
# define SAVE(a) (strsave(a))
#endif
#define USE(a) (void) (a)
#ifdef SIGVOID
# if (defined(vax) || defined(uts) || defined(MULTIFLOW) || defined(PCC)) && !defined(__GNUC__)
# define sigret_t void
# else /* !((vax || uts || MULTIFLOW || PCC) && !__GNUC__) */
typedef
void
sigret_t;
# endif /* (vax || uts || MULTIFLOW || PCC) && !__GNUC__ */
#else /* !SIGVOID */
typedef
int
sigret_t;
#endif /* SIGVOID */
#ifndef WINNT_NATIVE
# define ABSOLUTEP(p) (*(p) == '/')
#else /* WINNT_NATIVE */
# define ABSOLUTEP(p) ((p)[0] == '/' || \
(Isalpha((p)[0]) && (p)[1] ==
':'
&& (p)[2] ==
'/'
))
#endif /* WINNT_NATIVE */
#ifdef BUFSIZE
# if BUFSIZE < 4096
# undef BUFSIZE
# define BUFSIZE 4096 /* buffer size should be no less than this */
# endif
#else
# define BUFSIZE 4096
#endif /* BUFSIZE */
#define FORKSLEEP 10 /* delay loop on non-interactive fork failure */
#define MAILINTVL 600 /* 10 minutes */
#ifndef INBUFSIZE
# define INBUFSIZE 2*BUFSIZE /* Num input characters on the command line */
#endif /* INBUFSIZE */
#define NONE_ECHO 0
#define BSD_ECHO 1
#define SYSV_ECHO 2
#define BOTH_ECHO (BSD_ECHO|SYSV_ECHO)
#ifndef ECHO_STYLE
# if SYSVREL > 0
# define ECHO_STYLE SYSV_ECHO
# else /* SYSVREL == 0 */
# define ECHO_STYLE BSD_ECHO
# endif /* SYSVREL */
#endif /* ECHO_STYLE */
#define FSHTTY 15 /* /dev/tty when manip pgrps */
#define FSHIN 16 /* Preferred desc for shell input */
#define FSHOUT 17 /* ... shell output */
#define FSHDIAG 18 /* ... shell diagnostics */
#define FOLDSTD 19 /* ... old std input */
#ifdef PROF
#define xexit(n) done(n)
#endif
#ifdef cray
# define word word_t /* sys/types.h defines word.. bad move! */
#endif
#include <sys/types.h>
#ifdef cray
# undef word
#endif
#ifndef PATHSEP
# if defined(__EMX__) || defined(WINNT_NATIVE)
# define PATHSEP ';'
# else /* unix */
# define PATHSEP ':'
# endif /* __EMX__ || WINNT_NATIVE */
#endif /* !PATHSEP */
#ifdef __HP_CXD_SPP
# include <sys/cnx_stat.h>
# define stat stat64
# define fstat fstat64
# define lstat lstat64
#endif /* __HP_CXD_SPP */
#ifndef DEV_DEV_COMPARE
# define DEV_DEV_COMPARE(x,y) ((x) == (y))
#endif /* DEV_DEV_COMPARE */
#ifdef _SEQUENT_
# include <sys/procstats.h>
#endif /* _SEQUENT_ */
#if (defined(POSIX) || SYSVREL > 0) && !defined(WINNT_NATIVE)
# include <sys/times.h>
#endif /* (POSIX || SYSVREL > 0) && !WINNT_NATIVE */
#ifdef NLS
# include <locale.h>
#endif /* NLS */
#if !defined(_MINIX) && !defined(_VMS_POSIX) && !defined(WINNT_NATIVE) && !defined(__MVS__)
# include <sys/param.h>
#endif /* !_MINIX && !_VMS_POSIX && !WINNT_NATIVE && !__MVS__ */
#include <sys/stat.h>
#if defined(BSDTIMES) || defined(BSDLIMIT)
# include <sys/time.h>
# if SYSVREL>3 && !defined(SCO) && !defined(sgi) && !defined(SNI) && !defined(sun) && !(defined(__alpha) && defined(__osf__)) && !defined(_SX) && !defined(__MVS__)
# include "/usr/ucbinclude/sys/resource.h"
# else
# ifdef convex
# define sysrusage cvxrusage
# include <sys/sysinfo.h>
# else
# define sysrusage rusage
# include <sys/resource.h>
# endif /* convex */
# endif /* SYSVREL>3 */
#endif /* BSDTIMES */
#ifndef WINNT_NATIVE
# ifndef POSIX
# ifdef TERMIO
# include <termio.h>
# else /* SGTTY */
# include <sgtty.h>
# endif /* TERMIO */
# else /* POSIX */
# ifndef _UWIN
# include <termios.h>
# else
# include <termio.h>
# endif /* _UWIN */
# if SYSVREL > 3
# undef TIOCGLTC /* we don't need those, since POSIX has them */
# undef TIOCSLTC
# undef CSWTCH
# define CSWTCH _POSIX_VDISABLE /* So job control works */
# endif /* SYSVREL > 3 */
# endif /* POSIX */
#endif /* WINNT_NATIVE */
#ifdef sonyrisc
# include <sys/ttold.h>
#endif /* sonyrisc */
#if defined(POSIX) && !defined(WINNT_NATIVE)
# define getpgrp __getpgrp
# define setpgrp __setpgrp
# include <unistd.h>
# undef getpgrp
# undef setpgrp
# if defined(linux) || defined(sgi) || defined(_OSD_POSIX)
# define NO_FIX_MALLOC
# include <stdlib.h>
# else /* linux */
# define _GNU_STDLIB_H
# define malloc __malloc
# define free __free
# define calloc __calloc
# define realloc __realloc
# include <stdlib.h>
# undef malloc
# undef free
# undef calloc
# undef realloc
# endif /* linux || sgi */
# include <limits.h>
#endif /* POSIX && !WINNT_NATIVE */
#if SYSVREL > 0 || defined(_IBMR2) || defined(_MINIX)
# if !defined(pyr) && !defined(stellar)
# include <time.h>
# ifdef _MINIX
# define HZ CLOCKS_PER_SEC
# endif /* _MINIX */
# endif /* !pyr && !stellar */
#endif /* SYSVREL > 0 || _IBMR2 */
#if !((defined(SUNOS4) || defined(_MINIX) /* || defined(DECOSF1) */) && defined(TERMIO))
# if !defined(COHERENT) && !defined(_VMS_POSIX) && !defined(WINNT_NATIVE)
# include <sys/ioctl.h>
# endif
#endif
#if (defined(__DGUX__) && defined(POSIX)) || defined(DGUX)
#undef CSWTCH
#define CSWTCH _POSIX_VDISABLE
#endif
#if (!defined(FIOCLEX) && defined(SUNOS4)) || ((SYSVREL == 4) && !defined(_SEQUENT_) && !defined(SCO) && !defined(_SX)) && !defined(__MVS__)
# include <sys/filio.h>
#endif /* (!FIOCLEX && SUNOS4) || (SYSVREL == 4 && !_SEQUENT_ && !SCO && !_SX ) */
#if !defined(_MINIX) && !defined(COHERENT) && !defined(supermax) && !defined(WINNT_NATIVE) && !defined(IRIS4D)
# include <sys/file.h>
#endif /* !_MINIX && !COHERENT && !supermax && !WINNT_NATIVE && !defined(IRIS4D) */
#if !defined(O_RDONLY) || !defined(O_NDELAY)
# include <fcntl.h>
#endif
#include <errno.h>
#include <setjmp.h>
#if __STDC__ || defined(FUNCPROTO)
# include <stdarg.h>
#else
#ifdef _MINIX
# include "mi.varargs.h"
#else
# include <varargs.h>
#endif /* _MINIX */
#endif
#ifdef DIRENT
# include <dirent.h>
#else
# ifdef hp9000s500
# include <ndir.h>
# else
# include <sys/dir.h>
# endif
# define dirent direct
#endif /* DIRENT */
#if defined(hpux) || defined(sgi) || defined(OREO) || defined(COHERENT)
# include <stdio.h> /* So the fgetpwent() prototypes work */
#endif /* hpux || sgi || OREO || COHERENT */
#ifndef WINNT_NATIVE
#include <pwd.h>
#include <grp.h>
#endif /* WINNT_NATIVE */
#ifdef PW_SHADOW
# include <shadow.h>
#endif /* PW_SHADOW */
#ifdef PW_AUTH
# include <auth.h>
#endif /* PW_AUTH */
#if defined(BSD) && !defined(POSIX)
# include <strings.h>
# define strchr(a, b) index(a, b)
# define strrchr(a, b) rindex(a, b)
#else
# include <string.h>
#endif /* BSD */
#if defined(sgi) && SYSVREL > 3
# include <sys/cdefs.h>
#endif /* sgi && SYSVREL > 3 */
#ifdef REMOTEHOST
# ifdef ISC
# undef MAXHOSTNAMELEN /* Busted headers? */
# endif
# include <netinet/in.h>
# include <arpa/inet.h>
# include <sys/socket.h>
# if defined(_SS_SIZE) || defined(_SS_MAXSIZE)
# define INET6
# endif
# include <sys/uio.h> /* For struct iovec */
#endif /* REMOTEHOST */
#undef __P
#ifndef __P
# if __STDC__ || defined(FUNCPROTO)
# ifndef FUNCPROTO
# define FUNCPROTO
# endif
# define __P(a) a
# else
# define __P(a) ()
# if !__STDC__
# define const
# ifndef apollo
# define volatile /* Apollo 'c' extensions need this */
# endif /* apollo */
# endif
# endif
#endif
#ifdef PURIFY
# define _exit exit
typedef
int
pret_t;
#else /* !PURIFY */
# if (defined(vax) || defined(uts) || defined(MULTIFLOW) || defined(PCC)) && !defined(__GNUC__)
# define pret_t void
# else /* !((vax || uts || MULTIFLOW || PCC) && !__GNUC__) */
typedef
void
pret_t;
# endif /* (vax || uts || MULTIFLOW || PCC) && !__GNUC__ */
#endif /* PURIFY */
typedef
int
bool
;
#if 'Z' - 'A' == 25
# ifndef IS_ASCII
# define IS_ASCII
# endif
#endif
#include "sh.types.h"
#ifndef WINNT_NATIVE
# ifndef POSIX
extern
pid_t getpgrp __P((
int
));
# else /* POSIX */
# if (defined(BSD) && !defined(BSD4_4)) || defined(SUNOS4) || defined(IRIS4D) || defined(DGUX)
extern
pid_t getpgrp __P((
int
));
# else /* !(BSD || SUNOS4 || IRIS4D || DGUX) */
extern
pid_t getpgrp __P((
void
));
# endif /* BSD || SUNOS4 || IRISD || DGUX */
# endif /* POSIX */
extern
pid_t setpgrp __P((pid_t, pid_t));
#endif /* !WINNT_NATIVE */
typedef
sigret_t (*signalfun_t) __P((
int
));
#ifndef lint
typedef
ptr_t memalign_t;
#else
typedef
union
{
char
am_char, *am_char_p;
short
am_short, *am_short_p;
int
am_int, *am_int_p;
long
am_long, *am_long_p;
float
am_float, *am_float_p;
double
am_double, *am_double_p;
} *memalign_t;
# define malloc lint_malloc
# define free lint_free
# define realloc lint_realloc
# define calloc lint_calloc
#endif
#ifdef MDEBUG
extern
memalign_t DebugMalloc __P((unsigned,
char
*,
int
));
extern
memalign_t DebugRealloc __P((ptr_t, unsigned,
char
*,
int
));
extern
memalign_t DebugCalloc __P((unsigned, unsigned,
char
*,
int
));
extern
void
DebugFree __P((ptr_t,
char
*,
int
));
# define xmalloc(i) DebugMalloc(i, __FILE__, __LINE__)
# define xrealloc(p, i)((p) ? DebugRealloc(p, i, __FILE__, __LINE__) : \
DebugMalloc(i, __FILE__, __LINE__))
# define xcalloc(n, s) DebugCalloc(n, s, __FILE__, __LINE__)
# define xfree(p) if (p) DebugFree(p, __FILE__, __LINE__)
#else
# ifdef SYSMALLOC
# define xmalloc(i) smalloc(i)
# define xrealloc(p, i) srealloc(p, i)
# define xcalloc(n, s) scalloc(n, s)
# define xfree(p) sfree(p)
# else
# define xmalloc(i) malloc(i)
# define xrealloc(p, i) realloc(p, i)
# define xcalloc(n, s) calloc(n, s)
# define xfree(p) free(p)
# endif /* SYSMALLOC */
#endif /* MDEBUG */
#include "sh.char.h"
#include "sh.err.h"
#include "sh.dir.h"
#include "sh.proc.h"
#include "pathnames.h"
#if !defined(MAXNAMLEN) && defined(_D_NAME_MAX)
# define MAXNAMLEN _D_NAME_MAX
#endif /* MAXNAMLEN */
#ifdef HESIOD
# include <hesiod.h>
#endif /* HESIOD */
#ifdef REMOTEHOST
# include <netdb.h>
#endif /* REMOTEHOST */
#ifndef MAXHOSTNAMELEN
# if defined(SCO) && (SYSVREL > 3)
# include <sys/socket.h>
# else
# define MAXHOSTNAMELEN 255
# endif
#endif /* MAXHOSTNAMELEN */
#define eq(a, b) (Strcmp(a, b) == 0)
#define G_ERROR 0 /* default action: error if multiple words */
#define G_IGNORE 1 /* ignore the rest of the words */
#define G_APPEND 2 /* make a sentence by cat'ing the words */
EXTERN
bool
chkstop IZERO;
#if (defined(FIOCLEX) && defined(FIONCLEX)) || defined(F_SETFD)
# define CLOSE_ON_EXEC
#else
EXTERN
bool
didcch IZERO;
#endif /* (FIOCLEX && FIONCLEX) || F_SETFD */
EXTERN
bool
didfds IZERO;
EXTERN
bool
doneinp IZERO;
EXTERN
bool
exiterr IZERO;
EXTERN
bool
child IZERO;
EXTERN
bool
haderr IZERO;
EXTERN
bool
intty IZERO;
EXTERN
bool
intact IZERO;
EXTERN
bool
justpr IZERO;
EXTERN
bool
loginsh IZERO;
EXTERN
bool
neednote IZERO;
EXTERN
bool
noexec IZERO;
EXTERN
bool
pjobs IZERO;
EXTERN
bool
setintr IZERO;
EXTERN
bool
timflg IZERO;
EXTERN
bool
havhash IZERO;
EXTERN
bool
editing IZERO;
EXTERN
bool
noediting IZERO;
EXTERN
bool
bslash_quote IZERO;
EXTERN
bool
isoutatty IZERO;
EXTERN
bool
isdiagatty IZERO;
EXTERN
bool
is1atty IZERO;
EXTERN
bool
is2atty IZERO;
EXTERN
bool
arun IZERO;
EXTERN
int
implicit_cd IZERO;
EXTERN
bool
inheredoc IZERO;
EXTERN Char *arginp IZERO;
EXTERN
int
onelflg IZERO;
extern
Char *ffile;
extern
bool
dolzero;
extern
char
*seterr;
#ifndef BSD4_4
extern
int
errno
;
#endif
extern
int
exitset;
EXTERN Char *shtemp IZERO;
#ifdef BSDTIMES
EXTERN
struct
timeval time0;
EXTERN
struct
sysrusage ru0;
#else
# ifdef _SEQUENT_
EXTERN timeval_t time0;
EXTERN
struct
process_stats ru0;
# else /* _SEQUENT_ */
# ifndef POSIX
EXTERN
time_t
time0;
# else /* POSIX */
EXTERN
clock_t
time0;
EXTERN
clock_t
clk_tck;
# endif /* POSIX */
EXTERN
struct
tms shtimes;
# endif /* _SEQUENT_ */
EXTERN
long
seconds0;
#endif /* BSDTIMES */
#ifndef HZ
# define HZ 100 /* for division into seconds */
#endif
EXTERN Char *doldol;
EXTERN
int
backpid;
EXTERN
int
uid, euid,
gid, egid;
EXTERN
int
opgrp,
shpgrp,
tpgrp;
EXTERN Char PromptBuf[INBUFSIZE*2];
EXTERN Char RPromptBuf[INBUFSIZE];
EXTERN
int
SHIN IZERO;
EXTERN
int
SHOUT IZERO;
EXTERN
int
SHDIAG IZERO;
EXTERN
int
OLDSTD IZERO;
#if SYSVREL == 4 && defined(_UTS)
# define SIGSETJMP
#endif
#ifdef NO_STRUCT_ASSIGNMENT
# ifdef SIGSETJMP
typedef
sigjmp_buf jmp_buf_t;
# define setexit() sigsetjmp(reslab)
# define reset() siglongjmp(reslab, 1)
# else
typedef
jmp_buf
jmp_buf_t;
# define setexit() setjmp(reslab)
# define reset() longjmp(reslab, 1)
# endif
# define getexit(a) (void) memmove((ptr_t)&(a), (ptr_t)&reslab, sizeof(reslab))
# define resexit(a) (void) memmove((ptr_t)&reslab, (ptr_t)&(a), sizeof(reslab))
# define cpybin(a, b) (void) memmove((ptr_t)&(a), (ptr_t)&(b), sizeof(Bin))
#else
# ifdef SIGSETJMP
typedef
struct
{ sigjmp_buf j; } jmp_buf_t;
# define setexit() sigsetjmp(reslab.j)
# define reset() siglongjmp(reslab.j, 1)
# else
typedef
struct
{
jmp_buf
j; } jmp_buf_t;
# define setexit() setjmp(reslab.j)
# define reset() longjmp(reslab.j, 1)
# endif
# define getexit(a) (void) ((a) = reslab)
# define resexit(a) (void) (reslab = (a))
# define cpybin(a, b) (void) ((a) = (b))
#endif /* NO_STRUCT_ASSIGNMENT */
extern
jmp_buf_t reslab;
EXTERN Char *gointr;
extern
signalfun_t parintr;
extern
signalfun_t parterm;
#define META 0200
#define ASCII 0177
#ifdef SHORT_STRINGS
# define QUOTE ((Char) 0100000)/* 16nth char bit used for 'ing */
# define TRIM 0077777 /* Mask to strip quote bit */
# define UNDER 0040000 /* Underline flag */
# define BOLD 0020000 /* Bold flag */
# define STANDOUT 0010000 /* Standout flag */
# define LITERAL 0004000 /* Literal character flag */
# define ATTRIBUTES 0074000 /* The bits used for attributes */
# define CHAR 0000377 /* Mask to mask out the character */
#else
# define QUOTE ((Char) 0200) /* Eighth char bit used for 'ing */
# define TRIM 0177 /* Mask to strip quote bit */
# define UNDER 0000000 /* No extra bits to do both */
# define BOLD 0000000 /* Bold flag */
# define STANDOUT META /* Standout flag */
# define LITERAL 0000000 /* Literal character flag */
# define ATTRIBUTES 0200 /* The bits used for attributes */
# define CHAR 0000177 /* Mask to mask out the character */
#endif
EXTERN
int
AsciiOnly;
EXTERN
struct
Bin {
off_t Bfseekp;
off_t Bfbobp;
off_t Bfeobp;
int
Bfblocks;
Char **Bfbuf;
} B;
struct
Ain {
int
type;
#define TCSH_I_SEEK 0 /* Invalid seek */
#define TCSH_A_SEEK 1 /* Alias seek */
#define TCSH_F_SEEK 2 /* File seek */
#define TCSH_E_SEEK 3 /* Eval seek */
union
{
off_t _f_seek;
Char* _c_seek;
} fc;
#define f_seek fc._f_seek
#define c_seek fc._c_seek
Char **a_seek;
} ;
extern
int
aret;
#define SEEKEQ(a, b) ((a)->type == (b)->type && \
(a)->f_seek == (b)->f_seek && \
(a)->a_seek == (b)->a_seek)
#define fseekp B.Bfseekp
#define fbobp B.Bfbobp
#define feobp B.Bfeobp
#define fblocks B.Bfblocks
#define fbuf B.Bfbuf
EXTERN
struct
Ain lineloc;
EXTERN
bool
cantell;
struct
wordent {
Char *word;
struct
wordent *prev;
struct
wordent *next;
};
#define DODOL 1
#define DOEXCL 2
#define DOALL DODOL|DOEXCL
EXTERN Char *lap;
struct
command {
unsigned
char
t_dtyp;
#define NODE_COMMAND 1 /* t_dcom <t_dlef >t_drit */
#define NODE_PAREN 2 /* ( t_dspr ) <t_dlef >t_drit */
#define NODE_PIPE 3 /* t_dlef | t_drit */
#define NODE_LIST 4 /* t_dlef ; t_drit */
#define NODE_OR 5 /* t_dlef || t_drit */
#define NODE_AND 6 /* t_dlef && t_drit */
unsigned
char
t_nice;
#ifdef apollo
unsigned
char
t_systype;
#endif
unsigned
long
t_dflg;
#ifndef apollo
#define F_SAVE (F_NICE|F_TIME|F_NOHUP|F_HUP)
#else
#define F_SAVE (F_NICE|F_TIME|F_NOHUP||F_HUP|F_VER)
#endif
#define F_AMPERSAND (1<<0) /* executes in background */
#define F_APPEND (1<<1) /* output is redirected >> */
#define F_PIPEIN (1<<2) /* input is a pipe */
#define F_PIPEOUT (1<<3) /* output is a pipe */
#define F_NOFORK (1<<4) /* don't fork, last ()ized cmd */
#define F_NOINTERRUPT (1<<5) /* should be immune from intr's */
#define F_STDERR (1<<7) /* redirect unit 2 with unit 1 */
#define F_OVERWRITE (1<<8) /* output was ! */
#define F_READ (1<<9) /* input redirection is << */
#define F_REPEAT (1<<10) /* reexec aft if, repeat,... */
#define F_NICE (1<<11) /* t_nice is meaningful */
#define F_NOHUP (1<<12) /* nohup this command */
#define F_TIME (1<<13) /* time this command */
#define F_BACKQ (1<<14) /* command is in `` */
#define F_HUP (1<<15) /* hup this command */
#ifdef apollo
#define F_VER (1<<16) /* execute command under SYSTYPE */
#endif
union
{
Char *T_dlef;
struct
command *T_dcar;
} L;
union
{
Char *T_drit;
struct
command *T_dcdr;
} R;
#define t_dlef L.T_dlef
#define t_dcar L.T_dcar
#define t_drit R.T_drit
#define t_dcdr R.T_dcdr
Char **t_dcom;
struct
command *t_dspr;
};
#define TC_BREAK 0
#define TC_BRKSW 1
#define TC_CASE 2
#define TC_DEFAULT 3
#define TC_ELSE 4
#define TC_END 5
#define TC_ENDIF 6
#define TC_ENDSW 7
#define TC_EXIT 8
#define TC_FOREACH 9
#define TC_GOTO 10
#define TC_IF 11
#define TC_LABEL 12
#define TC_LET 13
#define TC_SET 14
#define TC_SWITCH 15
#define TC_TEST 16
#define TC_THEN 17
#define TC_WHILE 18
#if defined(hpux) && defined(__STDC__) && !defined(__GNUC__)
typedef
void
(*bfunc_t) ();
#else
typedef
void
(*bfunc_t) __P((Char **,
struct
command *));
#endif /* hpux && __STDC__ && !__GNUC__ */
extern
struct
biltins {
char
*bname;
bfunc_t bfunct;
int
minargs, maxargs;
} bfunc[];
extern
int
nbfunc;
#ifdef WINNT_NATIVE
extern
struct
biltins nt_bfunc[];
extern
int
nt_nbfunc;
#endif /* WINNT_NATIVE*/
extern
struct
srch {
char
*s_name;
int
s_value;
} srchn[];
extern
int
nsrchn;
EXTERN
struct
whyle {
struct
Ain w_start;
struct
Ain w_end;
Char **w_fe, **w_fe0;
Char *w_fename;
struct
whyle *w_next;
} *whyles;
EXTERN
struct
varent {
Char **vec;
Char *v_name;
int
v_flags;
#define VAR_ALL -1
#define VAR_READONLY 1
#define VAR_READWRITE 2
#define VAR_NOGLOB 4
#define VAR_FIRST 32
#define VAR_LAST 64
struct
varent *v_link[3];
int
v_bal;
} shvhed IZERO_STRUCT, aliases IZERO_STRUCT;
#define v_left v_link[0]
#define v_right v_link[1]
#define v_parent v_link[2]
#define adrof(v) adrof1(v, &shvhed)
#define varval(v) value1(v, &shvhed)
EXTERN
struct
wordent *alhistp IZERO_STRUCT;
EXTERN
struct
wordent *alhistt IZERO_STRUCT;
EXTERN Char **alvec IZERO_STRUCT,
*alvecp IZERO_STRUCT;
EXTERN
int
gflag;
#define MAXVARLEN 30 /* Maximum number of char in a variable name */
#ifndef MAXPATHLEN
# define MAXPATHLEN 2048
#endif /* MAXPATHLEN */
#ifndef MAXNAMLEN
# define MAXNAMLEN 512
#endif /* MAXNAMLEN */
#ifndef HAVENOLIMIT
extern
struct
limits {
int
limconst;
char
*limname;
int
limdiv;
char
*limscale;
} limits[];
#endif /* !HAVENOLIMIT */
extern
Char **gargv;
extern
int
gargc;
extern
Char **pargv;
EXTERN Char *pargs;
EXTERN
long
pnleft;
EXTERN Char *pargcp;
EXTERN
struct
Hist {
struct
wordent Hlex;
int
Hnum;
int
Href;
time_t
Htime;
Char *histline;
struct
Hist *Hnext;
} Histlist IZERO_STRUCT;
EXTERN
struct
wordent paraml;
EXTERN
int
eventno;
EXTERN
int
lastev;
EXTERN Char HIST;
EXTERN Char HISTSUB;
EXTERN Char PRCH;
EXTERN Char PRCHROOT;
#ifdef CASE_INSENSITIVE
# define samecase(x) (isupper((unsigned char)(x)) ? \
tolower
((unsigned
char
)(x)) : (x))
#else
# define samecase(x) (x)
#endif /* CASE_INSENSITIVE */
#ifndef SHORT_STRINGS
#define Strchr(a, b) strchr(a, b)
#define Strrchr(a, b) strrchr(a, b)
#define Strcat(a, b) strcat(a, b)
#define Strncat(a, b, c) strncat(a, b, c)
#define Strcpy(a, b) strcpy(a, b)
#define Strncpy(a, b, c) strncpy(a, b, c)
#define Strlen(a) strlen(a)
#define Strcmp(a, b) strcmp(a, b)
#define Strncmp(a, b, c) strncmp(a, b, c)
#define Strspl(a, b) strspl(a, b)
#define Strsave(a) strsave(a)
#define Strend(a) strend(a)
#define Strstr(a, b) strstr(a, b)
#define str2short(a) (a)
#define blk2short(a) saveblk(a)
#define short2blk(a) saveblk(a)
#define short2str(a) strip(a)
#else
#define Strchr(a, b) s_strchr(a, b)
#define Strrchr(a, b) s_strrchr(a, b)
#define Strcat(a, b) s_strcat(a, b)
#define Strncat(a, b, c) s_strncat(a, b, c)
#define Strcpy(a, b) s_strcpy(a, b)
#define Strncpy(a, b, c) s_strncpy(a, b, c)
#define Strlen(a) s_strlen(a)
#define Strcmp(a, b) s_strcmp(a, b)
#define Strncmp(a, b, c) s_strncmp(a, b, c)
#define Strspl(a, b) s_strspl(a, b)
#define Strsave(a) s_strsave(a)
#define Strend(a) s_strend(a)
#define Strstr(a, b) s_strstr(a, b)
#endif
EXTERN
char
*bname;
#define setname(a) (bname = (a))
#ifdef VFORK
EXTERN Char *Vsav;
EXTERN Char *Vdp;
EXTERN Char *Vexpath;
EXTERN
char
**Vt;
#endif /* VFORK */
EXTERN Char **evalvec;
EXTERN Char *evalp;
extern
struct
mesg {
char
*iname;
char
*pname;
} mesg[];
EXTERN Char *word_chars;
#define WORD_CHARS "*?_-.[]~=" /* default chars besides alnums in words */
EXTERN Char *STR_SHELLPATH;
#ifdef _PATH_BSHELL
EXTERN Char *STR_BSHELL;
#endif
EXTERN Char *STR_WORD_CHARS;
EXTERN Char **STR_environ IZERO;
extern
int
dont_free;
extern
Char *INVPTR;
extern
Char **INVPPTR;
extern
char
*progname;
extern
int
tcsh;
#include "tc.h"
#include "sh.decls.h"
#ifdef BSD4_4
# include <errno.h>
#else
# ifndef linux
# ifdef NEEDstrerror
extern
char
*sys_errlist[];
# endif
extern
int
errno
, sys_nerr;
# endif /* !linux */
#endif
#ifndef WINNT_NATIVE
# ifdef NLS_CATALOGS
# ifdef linux
# include <locale.h>
# ifdef notdef
# include <localeinfo.h> /* Has this changed ? */
# endif
# include <features.h>
# endif
# ifdef SUNOS4
typedef
void
*nl_catd;
extern
const
char
* catgets __P((nl_catd,
int
,
int
,
const
char
*));
nl_catd catopen __P((
const
char
*,
int
));
int
catclose __P((nl_catd));
# else
# ifdef __uxps__
# define gettxt gettxt_ds
# endif
# include <nl_types.h>
# ifdef __uxps__
# undef gettxt
# endif
# endif
# ifndef MCLoadBySet
# define MCLoadBySet 0
# endif
EXTERN nl_catd catd;
# define CGETS(b, c, d) catgets(catd, b, c, d)
# define CSAVS(b, c, d) strsave(CGETS(b, c, d))
# else
# define CGETS(b, c, d) d
# define CSAVS(b, c, d) d
# endif
#else /* WINNT_NATIVE */
# define CGETS(b, c, d) nt_cgets( b, c, d)
# define CSAVS(b, c, d) strsave(CGETS(b, c, d))
#endif /* WINNT_NATIVE */
#define SIGN_EXTEND_CHAR(a) (((a) & 0x80) ? ((a) | ~0x7f) : (a))
#endif /* _h_sh */