minetest.git - modified minetest for gpcfs purposes

about summary refs log tree commit diff

path: root/src/script/lua_api/l_settings.cpp

	Commit message (Expand)	Author	Age
*	script: Replace calls to depreated luaL_openlib	sfan5	2021-05-30
*	Protect mg_name and mg_flags from being set by Lua (#11010)	sfan5	2021-03-04
*	Settings: Push groups in to_table as well	SmallJoker	2021-03-01
*	Settings: Proper priority hierarchy	SmallJoker	2021-01-29
*	Settings: Add get_flags API for mapgen flags (mg_flags, mgv6_spflags, ...) (#...	SmallJoker	2020-01-25
*	Modernize lua read (part 2 & 3): C++ templating assurance (#7410)	Loïc Blot	2018-06-30
*	Allow 'default' parameter in 'settings:get_bool' function	Jordan Irwin	2017-12-17
*	Improvements/fixes for noise parameter input in advanced settings	Muhammad Rifqi Priyo Susanto	2017-10-23
*	Code modernization: subfolders (#6283)	Loïc Blot	2017-08-19
*	C++11 cleanup on constructors (#6000)	Vincent Glize	2017-06-19
*	Use a settings object for the main settings	ShadowNinja	2017-05-06
*	Replace luaL_reg with luaL_Reg as recent LuaJIT dropped the Lua 5.0 compat (#...	Loïc Blot	2017-04-08
*	Fix warning reported by clang (possible bug in Settings lua api)	sfan5	2016-12-21
*	Mod security: Allow read-only access to all mod paths	ShadowNinja	2016-12-20
*	Add mod security	ShadowNinja	2015-05-16
*	Settings: Fail on invalid sequence and throw exception for LuaSettings	kwolekr	2014-12-12
*	Settings: Sanitize setting name everywhere, not just LuaSettings	kwolekr	2014-12-09
*	LuaSettings: Sanitize setting name strings	kwolekr	2014-11-30
*	Add Settings interface for Lua	PilzAdam	2013-09-10

="hl kwb">void* data; int strip; int status; } DumpState; #define DumpMem(b,n,size,D) DumpBlock(b,(n)*(size),D) #define DumpVar(x,D) DumpMem(&x,1,sizeof(x),D) static void DumpBlock(const void* b, size_t size, DumpState* D) { if (D->status==0) { lua_unlock(D->L); D->status=(*D->writer)(D->L,b,size,D->data); lua_lock(D->L); } } static void DumpChar(int y, DumpState* D) { char x=(char)y; DumpVar(x,D); } static void DumpInt(int x, DumpState* D) { DumpVar(x,D); } static void DumpNumber(lua_Number x, DumpState* D) { DumpVar(x,D); } static void DumpVector(const void* b, int n, size_t size, DumpState* D) { DumpInt(n,D); DumpMem(b,n,size,D); } static void DumpString(const TString* s, DumpState* D) { if (s==NULL || getstr(s)==NULL) { size_t size=0; DumpVar(size,D); } else { size_t size=s->tsv.len+1; /* include trailing '\0' */ DumpVar(size,D); DumpBlock(getstr(s),size,D); } } #define DumpCode(f,D) DumpVector(f->code,f->sizecode,sizeof(Instruction),D) static void DumpFunction(const Proto* f, const TString* p, DumpState* D); static void DumpConstants(const Proto* f, DumpState* D) { int i,n=f->sizek; DumpInt(n,D); for (i=0; i<n; i++) { const TValue* o=&f->k[i]; DumpChar(ttype(o),D); switch (ttype(o)) { case LUA_TNIL: break; case LUA_TBOOLEAN: DumpChar(bvalue(o),D); break; case LUA_TNUMBER: DumpNumber(nvalue(o),D); break; case LUA_TSTRING: DumpString(rawtsvalue(o),D); break; default: lua_assert(0); /* cannot happen */ break; } } n=f->sizep; DumpInt(n,D); for (i=0; i<n; i++) DumpFunction(f->p[i],f->source,D); } static void DumpDebug(const Proto* f, DumpState* D) { int i,n; n= (D->strip) ? 0 : f->sizelineinfo; DumpVector(f->lineinfo,n,sizeof(int),D); n= (D->strip) ? 0 : f->sizelocvars; DumpInt(n,D); for (i=0; i<n; i++) { DumpString(f->locvars[i].varname,D); DumpInt(f->locvars[i].startpc,D); DumpInt(f->locvars[i].endpc,D); } n= (D->strip) ? 0 : f->sizeupvalues; DumpInt(n,D); for (i=0; i<n; i++) DumpString(f->upvalues[i],D); } static void DumpFunction(const Proto* f, const TString* p, DumpState* D) { DumpString((f->source==p || D->strip) ? NULL : f->source,D); DumpInt(f->linedefined,D); DumpInt(f->lastlinedefined,D); DumpChar(f->nups,D); DumpChar(f->numparams,D); DumpChar(f->is_vararg,D); DumpChar(f->maxstacksize,D); DumpCode(f,D); DumpConstants(f,D); DumpDebug(f,D); } static void DumpHeader(DumpState* D) { char h[LUAC_HEADERSIZE]; luaU_header(h); DumpBlock(h,LUAC_HEADERSIZE,D); } /* ** dump Lua function as precompiled chunk */ int luaU_dump (lua_State* L, const Proto* f, lua_Writer w, void* data, int strip) { DumpState D; D.L=L; D.writer=w; D.data=data; D.strip=strip; D.status=0; DumpHeader(&D); DumpFunction(f,NULL,&D); return D.status; }