/*********************************************************************** * * * This software is part of the ast package * * Copyright (c) 1982-2007 AT&T Intellectual Property * * and is licensed under the * * Common Public License, Version 1.0 * * by AT&T Intellectual Property * * * * 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 * * * ***********************************************************************/ #pragma prototyped #ifndef _NV_PRIVATE /* * This is the implementation header file for name-value pairs */ #define _NV_PRIVATE \ Namfun_t *nvfun; /* pointer to trap functions */ \ union Value nvalue; /* value field */ \ char *nvenv; /* pointer to environment name */ #include #include #include "shtable.h" /* Nodes can have all kinds of values */ union Value { const char *cp; int *ip; char c; int i; unsigned int u; int32_t *lp; Sflong_t *llp; /* for long long arithmetic */ int16_t s; double *dp; /* for floating point arithmetic */ Sfdouble_t *ldp; /* for long floating point arithmetic */ struct Namarray *array; /* for array node */ struct Namval *np; /* for Namval_t node */ union Value *up; /* for indirect node */ struct Ufunction *rp; /* shell user defined functions */ struct Namfun *funp; /* discipline pointer */ struct Namref *nrp; /* name reference */ int (*bfp)(int,char*[],void*);/* builtin entry point function pointer */ }; #include "nval.h" /* used for arrays */ #define ARRAY_MAX (1L< 255 */ #define BLT_DCL (NV_TAGGED) /* declaration command */ #define BLT_NOSFIO (NV_IMPORT) /* doesn't use sfio */ #define nv_isref(n) (nv_isattr((n),NV_REF)==NV_REF) #define nv_istable(n) (nv_isattr((n),NV_TABLE|NV_LJUST|NV_RJUST)==NV_TABLE) #define is_abuiltin(n) (nv_isattr(n,NV_BLTIN)==NV_BLTIN) #define is_afunction(n) (nv_isattr(n,NV_FUNCTION)==NV_FUNCTION) #define nv_funtree(n) ((n)->nvalue.rp->ptree) #define funptr(n) ((n)->nvalue.bfp) #define NV_SUBQUOTE (NV_ADD<<1) /* used with nv_endsubscript */ /* NAMNOD MACROS */ /* ... for attributes */ #define nv_setattr(n,f) ((n)->nvflag = (f)) #define nv_context(n) ((void*)(n)->nvfun) /* for builtins */ /* The following are for name references */ #define nv_refnode(n) ((n)->nvalue.nrp->np) #define nv_reftree(n) ((n)->nvalue.nrp->root) #define nv_reftable(n) ((n)->nvalue.nrp->table) #define nv_refsub(n) ((n)->nvalue.nrp->sub) /* ... etc */ #define nv_setsize(n,s) ((n)->nvsize = (s)) #undef nv_size #define nv_size(np) ((np)->nvsize) #define nv_isnull(np) (!(np)->nvalue.cp && !(np)->nvfun && !nv_isattr(np,NV_SHORT)) /* ... for arrays */ #define array_elem(ap) ((ap)->nelem&ARRAY_MASK) #define array_assoc(ap) ((ap)->fun) extern int array_maxindex(Namval_t*); extern char *nv_endsubscript(Namval_t*, char*, int); extern Namfun_t *nv_cover(Namval_t*); extern int nv_setnotify(Namval_t*,char **); extern int nv_unsetnotify(Namval_t*,char **); extern void nv_setlist(struct argnod*, int); extern void nv_optimize(Namval_t*); extern void nv_outname(Sfio_t*,char*, int); extern void nv_scope(struct argnod*); extern void nv_unref(Namval_t*); extern void _nv_unset(Namval_t*,int); extern int nv_clone(Namval_t*, Namval_t*, int); extern void *nv_diropen(const char*); extern char *nv_dirnext(void*); extern void nv_dirclose(void*); extern char *nv_getvtree(Namval_t*, Namfun_t*); extern void nv_attribute(Namval_t*, Sfio_t*, char*, int); extern Namval_t *nv_bfsearch(const char*, Dt_t*, Namval_t**, char**); extern Namval_t *nv_mkclone(Namval_t*); extern Namval_t *nv_mktype(Namval_t**, int); extern void nv_addnode(Namval_t*, int); extern Namval_t *nv_parent(Namval_t*); extern char *nv_getbuf(size_t); extern Namval_t *nv_mount(Namval_t*, const char *name, Dt_t*); extern Namval_t *nv_arraychild(Namval_t*, Namval_t*, int); extern int nv_compare(Dt_t*, Void_t*, Void_t*, Dtdisc_t*); extern int nv_isvtree(Namval_t*); extern const Namdisc_t RESTRICTED_disc; extern char nv_local; extern Dtdisc_t _Nvdisc; extern const char e_subscript[]; extern const char e_nullset[]; extern const char e_notset[]; extern const char e_noparent[]; extern const char e_readonly[]; extern const char e_badfield[]; extern const char e_restricted[]; extern const char e_ident[]; extern const char e_varname[]; extern const char e_noalias[]; extern const char e_noarray[]; extern const char e_aliname[]; extern const char e_badexport[]; extern const char e_badref[]; extern const char e_noref[]; extern const char e_selfref[]; extern const char e_envmarker[]; extern const char e_badlocale[]; extern const char e_loop[]; extern const char e_redef[]; #endif /* _NV_PRIVATE */