/illumos-gate/usr/src/uts/common/fs/zfs/lua/ |
H A D | lapi.c | 48 #define api_checkvalidindex(L, o) api_check(L, isvalid(o), "invalid index") argument 50 #define api_checkstackindex(L, i, o) \ argument 54 static TValue *index2addr (lua_State *L, int idx) { in index2addr() 85 static void growstack (lua_State *L, void *ud) { in growstack() 91 LUA_API int lua_checkstack (lua_State *L, int size) { in lua_checkstack() 126 LUA_API lua_CFunction lua_atpanic (lua_State *L, lua_CFunction panicf) { in lua_atpanic() 136 LUA_API const lua_Number *lua_version (lua_State *L) { in lua_version() 152 LUA_API int lua_absindex (lua_State *L, int idx) { in lua_absindex() 159 LUA_API int lua_gettop (lua_State *L) { in lua_gettop() 164 LUA_API void lua_settop (lua_State *L, int idx) { in lua_settop() [all …]
|
H A D | lbaselib.c | 32 static int luaB_tonumber (lua_State *L) { in luaB_tonumber() 73 static int luaB_error (lua_State *L) { in luaB_error() 85 static int luaB_getmetatable (lua_State *L) { in luaB_getmetatable() 96 static int luaB_setmetatable (lua_State *L) { in luaB_setmetatable() 109 static int luaB_rawequal (lua_State *L) { in luaB_rawequal() 117 static int luaB_rawlen (lua_State *L) { in luaB_rawlen() 126 static int luaB_rawget (lua_State *L) { in luaB_rawget() 134 static int luaB_rawset (lua_State *L) { in luaB_rawset() 144 static int luaB_collectgarbage (lua_State *L) { in luaB_collectgarbage() 173 static int luaB_type (lua_State *L) { in luaB_type() [all …]
|
H A D | lauxlib.c | 38 static int findfield (lua_State *L, int objidx, int level) { in findfield() 62 static int pushglobalfuncname (lua_State *L, lua_Debug *ar) { in pushglobalfuncname() 78 static void pushfuncname (lua_State *L, lua_Debug *ar) { in pushfuncname() 96 static int countlevels (lua_State *L) { in countlevels() 111 LUALIB_API void luaL_traceback (lua_State *L, lua_State *L1, in luaL_traceback() 148 LUALIB_API int luaL_argerror (lua_State *L, int narg, const char *extramsg) { in luaL_argerror() 166 static int typeerror (lua_State *L, int narg, const char *tname) { in typeerror() 173 static void tag_error (lua_State *L, int narg, int tag) { in tag_error() 178 LUALIB_API void luaL_where (lua_State *L, int level) { in luaL_where() 191 LUALIB_API int luaL_error (lua_State *L, const char *fmt, ...) { in luaL_error() [all …]
|
H A D | lbitlib.c | 36 static b_uint andaux (lua_State *L) { in andaux() 45 static int b_and (lua_State *L) { in b_and() 52 static int b_test (lua_State *L) { in b_test() 59 static int b_or (lua_State *L) { in b_or() 69 static int b_xor (lua_State *L) { in b_xor() 79 static int b_not (lua_State *L) { in b_not() 86 static int b_shift (lua_State *L, b_uint r, int i) { in b_shift() 103 static int b_lshift (lua_State *L) { in b_lshift() 108 static int b_rshift (lua_State *L) { in b_rshift() 113 static int b_arshift (lua_State *L) { in b_arshift() [all …]
|
H A D | ldo.c | 50 #define LUAI_THROW(L,c) longjmp(&(c)->b) argument 51 #define LUAI_TRY(L,c,a) if (setjmp(&(c)->b) == 0) { a } argument 56 #define LUAI_THROW(L,c) throw(c) argument 57 #define LUAI_TRY(L,c,a) \ argument 63 #define LUAI_THROW(L,c) _longjmp((c)->b, 1) argument 64 #define LUAI_TRY(L,c,a) if (_setjmp((c)->b) == 0) { a } argument 69 #define LUAI_THROW(L,c) longjmp((c)->b, 1) argument 70 #define LUAI_TRY(L,c,a) if (setjmp((c)->b) == 0) { a } argument 88 static void seterrorobj (lua_State *L, int errcode, StkId oldtop) { in seterrorobj() 107 l_noret luaD_throw (lua_State *L, int errcode) { in luaD_throw() [all …]
|
H A D | ltablib.c | 19 #define aux_getn(L,n) (luaL_checktype(L, n, LUA_TTABLE), luaL_len(L, n)) argument 24 static int maxn (lua_State *L) { in maxn() 41 static int tinsert (lua_State *L) { in tinsert() 68 static int tremove (lua_State *L) { in tremove() 84 static void addfield (lua_State *L, luaL_Buffer *b, int i) { in addfield() 93 static int tconcat (lua_State *L) { in tconcat() 119 static int pack (lua_State *L) { in pack() 136 static int unpack (lua_State *L) { in unpack() 165 static void set2 (lua_State *L, int i, int j) { in set2() 170 static int sort_comp (lua_State *L, int a, int b) { in sort_comp() [all …]
|
H A D | lcorolib.c | 19 static int auxresume (lua_State *L, lua_State *co, int narg) { in auxresume() 48 static int luaB_coresume (lua_State *L) { in luaB_coresume() 66 static int luaB_auxwrap (lua_State *L) { in luaB_auxwrap() 81 static int luaB_cocreate (lua_State *L) { in luaB_cocreate() 91 static int luaB_cowrap (lua_State *L) { in luaB_cowrap() 98 static int luaB_yield (lua_State *L) { in luaB_yield() 103 static int luaB_costatus (lua_State *L) { in luaB_costatus() 131 static int luaB_corunning (lua_State *L) { in luaB_corunning() 150 LUAMOD_API int luaopen_coroutine (lua_State *L) { in luaopen_coroutine()
|
H A D | lstate.c | 75 #define fromstate(L) (cast(LX *, cast(lu_byte *, (L)) - offsetof(LX, l))) argument 87 static unsigned int makeseed (lua_State *L) { in makeseed() 110 CallInfo *luaE_extendCI (lua_State *L) { in luaE_extendCI() 120 void luaE_freeCI (lua_State *L) { in luaE_freeCI() 131 static void stack_init (lua_State *L1, lua_State *L) { in stack_init() 151 static void freestack (lua_State *L) { in freestack() 163 static void init_registry (lua_State *L, global_State *g) { in init_registry() 181 static void f_luaopen (lua_State *L, void *ud) { in f_luaopen() 202 static void preinit_state (lua_State *L, global_State *g) { in preinit_state() 221 static void close_state (lua_State *L) { in close_state() [all …]
|
H A D | lmem.h | 24 #define luaM_reallocv(L,b,on,n,e) \ argument 29 #define luaM_freemem(L, b, s) luaM_realloc_(L, (b), (s), 0) argument 30 #define luaM_free(L, b) luaM_realloc_(L, (b), sizeof(*(b)), 0) argument 31 #define luaM_freearray(L, b, n) luaM_reallocv(L, (b), n, 0, sizeof((b)[0])) argument 33 #define luaM_malloc(L,s) luaM_realloc_(L, NULL, 0, (s)) argument 34 #define luaM_new(L,t) cast(t *, luaM_malloc(L, sizeof(t))) argument 35 #define luaM_newvector(L,n,t) \ argument 38 #define luaM_newobject(L,tag,s) luaM_realloc_(L, NULL, tag, (s)) argument 40 #define luaM_growvector(L,v,nelems,size,t,limit,e) \ argument 44 #define luaM_reallocvector(L, v,oldn,n,t) \ argument
|
H A D | lauxlib.h | 29 #define luaL_checkversion(L) luaL_checkversion_(L, LUA_VERSION_NUM) argument 97 #define luaL_newlibtable(L,l) \ argument 100 #define luaL_newlib(L,l) (luaL_newlibtable(L,l), luaL_setfuncs(L,l,0)) argument 102 #define luaL_argcheck(L, cond,numarg,extramsg) \ argument 104 #define luaL_checkstring(L,n) (luaL_checklstring(L, (n), NULL)) argument 105 #define luaL_optstring(L,n,d) (luaL_optlstring(L, (n), (d), NULL)) argument 106 #define luaL_checkint(L,n) ((int)luaL_checkinteger(L, (n))) argument 107 #define luaL_optint(L,n,d) ((int)luaL_optinteger(L, (n), (d))) argument 108 #define luaL_checklong(L,n) ((long)luaL_checkinteger(L, (n))) argument 109 #define luaL_optlong(L,n,d) ((long)luaL_optinteger(L, (n), (d))) argument [all …]
|
H A D | lfunc.c | 23 Closure *luaF_newCclosure (lua_State *L, int n) { in luaF_newCclosure() 30 Closure *luaF_newLclosure (lua_State *L, int n) { in luaF_newLclosure() 39 UpVal *luaF_newupval (lua_State *L) { in luaF_newupval() 47 UpVal *luaF_findupval (lua_State *L, StkId level) { in luaF_findupval() 82 void luaF_freeupval (lua_State *L, UpVal *uv) { in luaF_freeupval() 89 void luaF_close (lua_State *L, StkId level) { in luaF_close() 110 Proto *luaF_newproto (lua_State *L) { in luaF_newproto() 135 void luaF_freeproto (lua_State *L, Proto *f) { in luaF_freeproto()
|
H A D | ldebug.c | 47 static void swapextra (lua_State *L) { in swapextra() 60 LUA_API int lua_sethook (lua_State *L, lua_Hook func, int mask, int count) { in lua_sethook() 75 LUA_API lua_Hook lua_gethook (lua_State *L) { in lua_gethook() 80 LUA_API int lua_gethookmask (lua_State *L) { in lua_gethookmask() 85 LUA_API int lua_gethookcount (lua_State *L) { in lua_gethookcount() 90 LUA_API int lua_getstack (lua_State *L, int level, lua_Debug *ar) { in lua_getstack() 125 static const char *findlocal (lua_State *L, CallInfo *ci, int n, in findlocal() 151 LUA_API const char *lua_getlocal (lua_State *L, const lua_Debug *ar, int n) { in lua_getlocal() 175 LUA_API const char *lua_setlocal (lua_State *L, const lua_Debug *ar, int n) { in lua_setlocal() 208 static void collectvalidlines (lua_State *L, Closure *f) { in collectvalidlines() [all …]
|
H A D | lvm.c | 47 int luaV_tostring (lua_State *L, StkId obj) { in luaV_tostring() 60 static void traceexec (lua_State *L) { in traceexec() 93 static void callTM (lua_State *L, const TValue *f, const TValue *p1, in callTM() 110 void luaV_gettable (lua_State *L, const TValue *t, TValue *key, StkId val) { in luaV_gettable() 136 void luaV_settable (lua_State *L, const TValue *t, TValue *key, StkId val) { in luaV_settable() 175 static int call_binTM (lua_State *L, const TValue *p1, const TValue *p2, in call_binTM() 186 static const TValue *get_equalTM (lua_State *L, Table *mt1, Table *mt2, in get_equalTM() 200 static int call_orderTM (lua_State *L, const TValue *p1, const TValue *p2, in call_orderTM() 231 int luaV_lessthan (lua_State *L, const TValue *l, const TValue *r) { in luaV_lessthan() 243 int luaV_lessequal (lua_State *L, const TValue *l, const TValue *r) { in luaV_lessequal() [all …]
|
H A D | llimits.h | 76 #define luai_apicheck(L,e) assert(e) argument 78 #define luai_apicheck(L,e) lua_assert(e) argument 157 #define lua_lock(L) ((void) 0) argument 158 #define lua_unlock(L) ((void) 0) argument 162 #define luai_threadyield(L) {lua_unlock(L); lua_lock(L);} argument 172 #define luai_userstateopen(L) ((void)L) argument 176 #define luai_userstateclose(L) ((void)L) argument 180 #define luai_userstatethread(L,L1) ((void)L) argument 184 #define luai_userstatefree(L,L1) ((void)L) argument 188 #define luai_userstateresume(L,n) ((void)L) argument [all …]
|
H A D | lgc.c | 135 void luaC_barrier_ (lua_State *L, GCObject *o, GCObject *v) { in luaC_barrier_() 155 void luaC_barrierback_ (lua_State *L, GCObject *o) { in luaC_barrierback_() 172 LUAI_FUNC void luaC_barrierproto_ (lua_State *L, Proto *p, Closure *c) { in luaC_barrierproto_() 212 GCObject *luaC_newobj (lua_State *L, int tt, size_t sz, GCObject **list, in luaC_newobj() 663 static void freeobj (lua_State *L, GCObject *o) { in freeobj() 690 #define sweepwholelist(L,p) sweeplist(L,p,MAX_LUMEM) argument 698 static void sweepthread (lua_State *L, lua_State *L1) { in sweepthread() 719 static GCObject **sweeplist (lua_State *L, GCObject **p, lu_mem count) { in sweeplist() 758 static GCObject **sweeptolive (lua_State *L, GCObject **p, int *n) { in sweeptolive() 778 static void checkSizes (lua_State *L) { in checkSizes() [all …]
|
H A D | luaconf.h | 263 #define lua_cpcall(L,f,u) \ argument 291 #define lua_strlen(L,i) lua_rawlen(L, (i)) argument 293 #define lua_objlen(L,i) lua_rawlen(L, (i)) argument 295 #define lua_equal(L,idx1,idx2) lua_compare(L,(idx1),(idx2),LUA_OPEQ) argument 296 #define lua_lessthan(L,idx1,idx2) lua_compare(L,(idx1),(idx2),LUA_OPLT) argument 431 #define luai_nummod(L,a,b) ((a) % (b)) argument 432 #define luai_numpow(L,a,b) (lcompat_pow((a),(b))) argument 437 #define luai_numadd(L,a,b) ((a)+(b)) argument 438 #define luai_numsub(L,a,b) ((a)-(b)) argument 439 #define luai_nummul(L,a,b) ((a)*(b)) argument [all …]
|
H A D | ldo.h | 16 #define luaD_checkstack(L,n) if (L->stack_last - L->top <= (n)) \ argument 20 #define incr_top(L) {L->top++; luaD_checkstack(L,0);} argument 22 #define savestack(L,p) ((char *)(p) - (char *)L->stack) argument 23 #define restorestack(L,n) ((TValue *)((char *)L->stack + (n))) argument
|
H A D | lua.h | 252 #define lua_call(L,n,r) lua_callk(L, (n), (r), 0, NULL) argument 258 #define lua_pcall(L,n,r,f) lua_pcallk(L, (n), (r), (f), 0, NULL) argument 272 #define lua_yield(L,n) lua_yieldk(L, (n), 0, NULL) argument 318 #define lua_tonumber(L,i) lua_tonumberx(L,i,NULL) argument 319 #define lua_tointeger(L,i) lua_tointegerx(L,i,NULL) argument 320 #define lua_tounsigned(L,i) lua_tounsignedx(L,i,NULL) argument 322 #define lua_pop(L,n) lua_settop(L, -(n)-1) argument 324 #define lua_newtable(L) lua_createtable(L, 0, 0) argument 326 #define lua_register(L,n,f) (lua_pushcfunction(L, (f)), lua_setglobal(L, (n))) argument 328 #define lua_pushcfunction(L,f) lua_pushcclosure(L, (f), 0) argument [all …]
|
H A D | lstring.c | 64 void luaS_resize (lua_State *L, int newsize) { in luaS_resize() 98 static TString *createstrobj (lua_State *L, const char *str, size_t l, in createstrobj() 116 static TString *newshrstr (lua_State *L, const char *str, size_t l, in newshrstr() 133 static TString *internshrstr (lua_State *L, const char *str, size_t l) { in internshrstr() 156 TString *luaS_newlstr (lua_State *L, const char *str, size_t l) { in luaS_newlstr() 170 TString *luaS_new (lua_State *L, const char *str) { in luaS_new() 175 Udata *luaS_newudata (lua_State *L, size_t s, Table *e) { in luaS_newudata()
|
H A D | lstrlib.c | 60 static int str_len (lua_State *L) { in str_len() 76 static int str_sub (lua_State *L) { in str_sub() 90 static int str_reverse (lua_State *L) { in str_reverse() 102 static int str_lower (lua_State *L) { in str_lower() 115 static int str_upper (lua_State *L) { in str_upper() 131 static int str_rep (lua_State *L) { in str_rep() 156 static int str_byte (lua_State *L) { in str_byte() 175 static int str_char (lua_State *L) { in str_char() 190 static int writer (lua_State *L, const void* b, size_t size, void* B) { in writer() 197 static int str_dump (lua_State *L) { in str_dump() [all …]
|
H A D | lapi.h | 14 #define api_incr_top(L) {L->top++; api_check(L, L->top <= L->ci->top, \ argument 17 #define adjustresults(L,nres) \ argument 20 #define api_checknelems(L,n) api_check(L, (n) < (L->top - L->ci->func), \ argument
|
H A D | ltable.c | 144 static int findindex (lua_State *L, Table *t, StkId key) { in findindex() 169 int luaH_next (lua_State *L, Table *t, StkId key) { in luaH_next() 270 static void setarrayvector (lua_State *L, Table *t, int size) { in setarrayvector() 279 static void setnodevector (lua_State *L, Table *t, int size) { in setnodevector() 304 void luaH_resize (lua_State *L, Table *t, int nasize, int nhsize) { in luaH_resize() 337 void luaH_resizearray (lua_State *L, Table *t, int nasize) { in luaH_resizearray() 343 static void rehash (lua_State *L, Table *t, const TValue *ek) { in rehash() 368 Table *luaH_new (lua_State *L) { in luaH_new() 379 void luaH_free (lua_State *L, Table *t) { in luaH_free() 405 TValue *luaH_newkey (lua_State *L, Table *t, const TValue *key) { in luaH_newkey() [all …]
|
H A D | lgc.h | 122 #define luaC_condGC(L,c) \ argument 124 #define luaC_checkGC(L) luaC_condGC(L, luaC_step(L);) argument 127 #define luaC_barrier(L,p,v) { if (valiswhite(v) && isblack(obj2gco(p))) \ argument 130 #define luaC_barrierback(L,p,v) { if (valiswhite(v) && isblack(obj2gco(p))) \ argument 133 #define luaC_objbarrier(L,p,o) \ argument 137 #define luaC_objbarrierback(L,p,o) \ argument 140 #define luaC_barrierproto(L,p,c) \ argument
|
H A D | lzio.c | 23 lua_State *L = z->L; in luaZ_fill() local 36 void luaZ_init (lua_State *L, ZIO *z, lua_Reader reader, void *data) { in luaZ_init() 68 char *luaZ_openspace (lua_State *L, Mbuffer *buff, size_t n) { in luaZ_openspace()
|
/illumos-gate/usr/src/cmd/sort/ |
H A D | fields.c | 363 field_boundary(field_t *F, line_rec_t *L, int is_end, int is_blanks) in field_boundary() 397 field_delimit(field_t *F, line_rec_t *L, ssize_t *start, ssize_t *end) in field_delimit() 408 field_boundary_wide(field_t *F, line_rec_t *L, int is_end, int is_blanks) in field_boundary_wide() 442 field_delimit_wide(field_t *F, line_rec_t *L, ssize_t *start, ssize_t *end) in field_delimit_wide() 453 field_boundary_tabbed(field_t *F, line_rec_t *L, int is_end, int is_blanks, in field_boundary_tabbed() 504 field_delimit_tabbed(field_t *F, line_rec_t *L, ssize_t *start, ssize_t *end, in field_delimit_tabbed() 516 field_boundary_tabbed_wide(field_t *F, line_rec_t *L, int is_end, int is_blanks, in field_boundary_tabbed_wide() 561 field_delimit_tabbed_wide(field_t *F, line_rec_t *L, ssize_t *start, in field_delimit_tabbed_wide() 574 field_convert_month(field_t *F, line_rec_t *L, vchar_t delimiter, in field_convert_month() 625 field_convert_month_wide(field_t *F, line_rec_t *L, vchar_t delimiter, in field_convert_month_wide() [all …]
|