/*
** $Id: lundump.h,v 1.45.1.1 2017/04/19 17:20:42 roberto Exp $
** load precompiled Lua chunks
** See Copyright Notice in lua.h
*/

#ifndef lundump_h
#define lundump_h

#include "llimits.h"
#include "lobject.h"
#include "lzio.h"

/* These allow a multi=byte flag:1,type:3,data:4 packing in the tt byte */
#define LUAU_TNIL		    (0<<4)
#define LUAU_TBOOLEAN		(1<<4)
#define LUAU_TNUMFLT		(2<<4)
#define LUAU_TNUMPINT		(3<<4)
#define LUAU_TNUMNINT		(4<<4)
#define LUAU_TSSTRING		(5<<4)
#define LUAU_TLSTRING		(6<<4)
#define LUAU_TMASK      (7<<4)
#define LUAU_DMASK      0x0f


/* data to catch conversion errors */
#define LUAC_DATA	"\x19\x93\r\n\x1a\n"

#define LUAC_INT	0x5678
#define LUAC_NUM	cast_num(370.5)
#define LUAC_FUNC_MARKER 0xFE
#define LUA_TNUMNINT  	(LUA_TNUMBER | (2 << 4))  /* negative integer numbers */

#define MYINT(s)	(s[0]-'0')
#define LUAC_VERSION	(MYINT(LUA_VERSION_MAJOR)*16+MYINT(LUA_VERSION_MINOR))
#define LUAC_FORMAT         	10	     /* this is the NodeMCU format */
#define LUAC_LFS_IMAGE_FORMAT 11
#define LUA_STRING_SIG       "\x19ss"
#define LUA_PROTO_SIG        "\x19pr"
#define LUA_HDR_BYTE         '\x19'
/* load one chunk; from lundump.c */
LUAI_FUNC LClosure* luaU_undump (lua_State* L, ZIO* Z, const char* name);

/* dump one chunk; from ldump.c */
LUAI_FUNC int luaU_dump (lua_State* L, const Proto* f, lua_Writer w,
                         void* data, int strip);
LUAI_FUNC int luaU_DumpAllProtos(lua_State *L, const Proto *m, lua_Writer w,
                         void *data, int strip);

LUAI_FUNC int luaU_undumpLFS(lua_State *L, ZIO *Z, int isabs);
LUAI_FUNC int luaU_stripdebug (lua_State *L, Proto *f, int level, int recv);

typedef struct FlashHeader LFSHeader;
/*
** The LFSHeader uses offsets rather than pointers to avoid 32 vs 64 bit issues
** during host compilation.  The offsets are in units of lu_int32's and NOT
** size_t, though clearly any internal pointers are of the size_t for the
** executing architectures: 4 or 8 byte.  Likewise recources are size_t aligned
** so LFS regions built for 64-bit execution will have 4-byte alignment packing
** between resources.
*/
struct FlashHeader{
  lu_int32 flash_sig;     /* a standard fingerprint identifying an LFS image */
  lu_int32 flash_size;    /* Size of LFS image in bytes */
  lu_int32 seed;          /* random number seed used in LFS */
  lu_int32 timestamp;     /* timestamp of LFS build */
  lu_int32 nROuse;        /* number of elements in ROstrt */
  lu_int32 nROsize;       /* size of ROstrt */
  lu_int32 oROhash;       /* offset of TString ** ROstrt hash */
  lu_int32 protoROTable;  /* offset of master ROTable for proto lookup */
  lu_int32 protoHead;     /* offset of linked list of Protos in LFS */
  lu_int32 shortTShead;   /* offset of linked list of short TStrings in LFS */
  lu_int32 longTShead;    /* offset of linked list of long TStrings in LFS */
  lu_int32 reserved;
};

#ifdef LUA_USE_HOST
extern void *LFSregion;
LUAI_FUNC void luaN_setabsolute(lu_int32 addr);
#endif


#define FLASH_FORMAT_VERSION ( 2 << 8)

#if defined(CONFIG_LUA_NUMBER_INT64)
# define FLASH_SIG_B1 0x01
#else
# define FLASH_SIG_B1 0x00
#endif

#if defined(CONFIG_LUA_NUMBER_DOUBLE)
# define FLASH_SIG_B2 0x02
#else
# define FLASH_SIG_B2 0x00
#endif

#define FLASH_SIG  (0xfafaa050 | FLASH_FORMAT_VERSION | FLASH_SIG_B1 | FLASH_SIG_B2)

#endif
