收获:
define EXTRA_STACK 5
- 参考资料:

windows 7平台 VS 2012 lua 5.3.3源码 debug模式下

上篇lua数据结构讲完了,这篇看lua执行过程中的数据变化
正好元旦放假,在家没什么事,可以坐下来安安静静看lua源码,开启VS,单步调试

extern "C"
{
    #include "lauxlib.h"  
    #include "lualib.h"  
    #include "lua.h"
}
void main()
{
    lua_State *L = luaL_newstate();
    luaL_openlibs(L);
    lua_close(L);
    return;
}

lua_State *L = luaL_newstate();看看这句代码到底发生了什么

LUALIB_API lua_State *luaL_newstate (void) {
  lua_State *L = lua_newstate(l_alloc, NULL);
  if (L) lua_atpanic(L, &panic);
  return L;
}

`/*
** thread state + extra space
*/
typedef struct LX {
  lu_byte extra_[LUA_EXTRASPACE];//这里默认为sizeof(void *)即为4
  lua_State l;
} LX;

/*
** Main thread combines a thread state and the global state
*/
typedef struct LG {
  LX l;
  global_State g;
} LG;

LUA_API lua_State *lua_newstate (lua_Alloc f, void *ud) {
  int i;

  lua_State *L;
  global_State *g;

  LG *l = cast(LG *, (*f)(ud, NULL, LUA_TTHREAD, sizeof(LG)));
  if (l == NULL) return NULL;
  L = &l->l.l;
  g = &l->g;
 ...
  if (luaD_rawrunprotected(L, f_luaopen, NULL) != LUA_OK) {
    /* memory allocation error: free partial state */
    close_state(L);
    L = NULL;
  }
  return L;
}

观察到lua_newstate 接受2个参数,一个类型是lua_Alloc,另一个是void *

其中lua_Alloc是什么类型,我们跟踪看看

typedef void _ (_lua_Alloc) (void _ud, void _ptr, size_t osize, size_t nsize);
定义了一个lua_Alloc的函数指针类型,其返回值为 void *

lua_newstate(l_alloc, NULL);

 static void *l_alloc (void *ud, void *ptr, size_t osize, size_t nsize) {
  (void)ud; (void)osize;  /* not used */
  if (nsize == 0) {
    free(ptr);
    return NULL;
  }
  else
    return realloc(ptr, nsize);
}

lua_newstate(l_alloc, NULL);中其实简单理解就是把l_alloc函数指针传递进去,方便在ua_newstaten内调用l_alloc函数

看看l_alloc这个函数干了啥,居然ud,osize 2个参数都没有使用,不知道为啥还留这么多参数,可能历史原因吧,这样安慰自己

nsize不为0时,就重新分配ptr指向的内存大小为nsize,为0就释放内存

继续看看 lua_newstate函数中luaD_rawrunprotected

 /* type of protected functions, to be ran by 'runprotected' */
typedef void (*Pfunc) (lua_State *L, void *ud);

int luaD_rawrunprotected (lua_State *L, Pfunc f, void *ud)

 if (luaD_rawrunprotected(L, f_luaopen, NULL) != LUA_OK) {
    /* memory allocation error: free partial state */
    close_state(L);
    L = NULL;
  }

luaD_rawrunprotected 中调用 f_luaopen 中调用 stack_init(L, L) 初始化L大小
这里不贴代码了,可以下载lua源码中查看