module 与 package.seeall

http://blog.codingnow.com/2006/02/lua_51_module.html

使用

module("test")

后,下面不再看的见前面的全局环境。如果在这个模块里想调用 print 输出调试信息怎么办呢?一个简单的方法是

local print=print
module("test")

这样 print 是一个 local 变量,下面也是可见的。或者可以用

local _G=_G
module("test")

那么 _G.print 也是可以用的。

当然还有一种巧妙的方式,lua 5.1 提供了一个 package.seeall 可以作为 module 的option 传入

module("test",package.seeall)

这样就 OK 了。至于它们是如何工作的,还是自己读源码会理解的清楚一些。

源码不太好读, 我们下面找文档和做实验来理解。

为啥使用了 package.seeall, 则此module就可以引用全局环境了呢?

文档:

http://www.lua.org/manual/5.1/manual.html

module (name [, ···])

This function can receive optional options after the module name, where each option is a function to be applied over the module.

package.seeall (module)

Sets a metatable for module with its __index field referring to the global environment, so that this module inherits values from the global environment. To be used as an option to function module.

使用package.seeall后, 会将当前module的环境表, 设置个 metatable( {__index=_G})

含义就是, 当你在module声明之后, 如果使用print函数, 则在当前module环境表中存在, 则会想_G表中搜索。

package.seeall

static int ll_seeall (lua_State *L) {
  luaL_checktype(L, 1, LUA_TTABLE);
  if (!lua_getmetatable(L, 1)) {
    lua_createtable(L, 0, 1); /* create new metatable */
    lua_pushvalue(L, -1);
    lua_setmetatable(L, 1);
  }
  lua_pushvalue(L, LUA_GLOBALSINDEX);
  lua_setfield(L, -2, "__index");  /* mt.__index = _G */
  return 0;
}

测试代码

module_test.lua

module(..., package.seeall)

local print = print
local getfenv = getfenv
local tostring = tostring
local getmetatable = getmetatable

--module("module_test")

local function printTable(tbl)

for k,v in pairs(tbl) do
        print("kay="..tostring(k) .. "  value="..tostring(v))
    end

end

varone = 1

local strkey = "vartwo"

-- 本模块环境
local env = getfenv(1)

env[strkey] = 2

print("vartwo="..vartwo)

print("getfenv(1) ="..tostring( ( getfenv(1) ) ) )

print("getfenv(1) metatable="..tostring( getmetatable( getfenv(1) ) ) )

print("--------------- before getmetatable( getfenv(1) ) -------------")
printTable( getmetatable( getfenv(1) ) )
print("--------------- after getmetatable( getfenv(1) ) -------------")

-- 调用此模块的环境
local env_caller = getfenv(2)

env["env_caller"] = env_caller

print("getfenv(2) ="..tostring(getfenv(2)))

main.lua

local testmodule = require("module_test")

var_caller = 55

print("testmodule.vartwo=" .. testmodule.vartwo)

local function printTable(tbl)

for k,v in pairs(tbl) do
        print("kay="..tostring(k) .. "  value="..tostring(v))
    end

end

print("----------- testmodule ------------------")

printTable(testmodule)

print("-----------  testmodule.env_caller ------------------")

printTable(testmodule.env_caller)

打印结果

>lua -e "io.stdout:setvbuf 'no'" "main.lua"
vartwo=2
getfenv(1) =table: 006F9438
getfenv(1) metatable=table: 006F92D0
--------------- before getmetatable( getfenv(1) ) -------------
kay=__index  value=table: 006F2650
--------------- after getmetatable( getfenv(1) ) -------------
getfenv(2) =table: 006F2650

testmodule.vartwo=2
----------- testmodule ------------------
kay=_NAME  value=module_test
kay=_PACKAGE  value=
kay=varone  value=1
kay=_M  value=table: 006F9438
kay=vartwo  value=2
kay=env_caller  value=table: 006F2650
-----------  testmodule.env_caller ------------------
kay=string  value=table: 006F9730
kay=xpcall  value=function: 006F6788
kay=module_test  value=table: 006F9438
kay=package  value=table: 006F7110
kay=tostring  value=function: 006F6968
kay=print  value=function: 006F6CC8
kay=os  value=table: 006F9848
kay=unpack  value=function: 006F6A08
kay=require  value=function: 006F7C98
kay=getfenv  value=function: 006F6E08
kay=setmetatable  value=function: 006F66A8
kay=next  value=function: 006F6C88
kay=assert  value=function: 006F6D48
kay=tonumber  value=function: 006F6888
kay=io  value=table: 006F96E0
kay=rawequal  value=function: 006F6DC8
kay=collectgarbage  value=function: 006F6D28
kay=arg  value=table: 006F92A8
kay=getmetatable  value=function: 006F6AE8
kay=module  value=function: 006F7B98
kay=rawset  value=function: 006F6AA8
kay=var_caller  value=55
kay=math  value=table: 006F96B8
kay=debug  value=table: 006F91E0
kay=pcall  value=function: 006F6CE8
kay=table  value=table: 006F7160
kay=newproxy  value=function: 006F0568
kay=type  value=function: 006F6A48
kay=coroutine  value=table: 006F7340
kay=_G  value=table: 006F2650
kay=select  value=function: 006F6B48
kay=gcinfo  value=function: 006F6D88
kay=pairs  value=function: 006F0538
kay=rawget  value=function: 006F6A88
kay=loadstring  value=function: 006F6B08
kay=ipairs  value=function: 006F2BD0
kay=_VERSION  value=Lua 5.1
kay=dofile  value=function: 006F6DE8
kay=setfenv  value=function: 006F6A28
kay=load  value=function: 006F6B88
kay=error  value=function: 006F6D68
kay=loadfile  value=function: 006F6DA8
>Exit code: 0

lua module package.seeall选项的更多相关文章

  1. lua module环境探秘

    module 作用 module (name [, ···]) Creates a module. If there is a table in package.loaded[name], this ...

  2. python学习笔记之module && package

    个人总结: import module,module就是文件名,导入那个python文件 import package,package就是一个文件夹,导入的文件夹下有一个__init__.py的文件, ...

  3. nginx install lua module

    #install luajit #http://luajit.org/download.html .tar.gz cd LuaJIT- make install PREFIX=/home/allen. ...

  4. Lua知识备忘录

    最近对Lua很感兴趣,以下是本阶段学习的总结,包含三部分,一部分是基础语法,一部分是扩展和解释器嵌入,最后一部分是Lua小练习. 知识涉及:Lua语言编程基础:Lua&C++:Lua扩展.嵌入 ...

  5. Lua标准库- 模块(Modules)

    Lua包库为lua提供简易的加载及创建模块的方法,由require.module方法及package表组成 1.module (name [, ···]) 功能:建立一个模块. module的处理流程 ...

  6. lua 模块与环境

    编写一个模块的最简单方法: -- complex.lua -- 模块实际上是一个表 complex = {} -- 定义模块函数 function complex.add(c1,c2) ... end ...

  7. LUA语言注意点归集

    统计元素个数接口--只计算以整数为下标的 第一段连续元素的数目 #tab 和 table.getn() http://ju.outofmemory.cn/entry/29450 我们修改table: ...

  8. lua 环境揭秘

    什么是环境? http://www.lua.org/manual/5.1/manual.html#2.9 Besides metatables, objects of types thread, fu ...

  9. lua 模块功能

    lua5.1 模块理解 http://www.lua.org/manual/5.1/manual.html#pdf-module 模块 5.3 – Modules The package librar ...

随机推荐

  1. freeswitch 使用mysql替换默认的sqlite

    转自 80000hz.com freeswitch 使用mysql替换默认的sqlite No Reply , Posted in 默认分类 on January 14, 2014 目标使用mysql ...

  2. Python学习笔记——列表

    1.创建列表类型数据并给其赋值 >>> aList = [123,'abc',4.56,['inner','list'],7-9j] >>> aList [123, ...

  3. 基于Libevent的HTTP Server

    简单的Http Server 使用Libevent内置的http相关接口,可以很容易的构建一个Http Server,一个简单的Http Server如下: #include <event2/e ...

  4. 关于AJAX跨域调用ASP.NET MVC或者WebAPI服务的问题及解决方案

      作者:陈希章 时间:2014-7-3 问题描述 当跨域(cross domain)调用ASP.NET MVC或者ASP.NET Web API编写的服务时,会发生无法访问的情况. 重现方式 使用模 ...

  5. arc如何破循环或交叉引用

    IOS两种常见的循环引用: 1,两个类之间互相定义对方的引用 如下: //ARC code @interface A : NSObject @property (nonatomic,strong) B ...

  6. LoadRunner 12.02 安装以及汉化教程

    LoadRunner 12.02 安装 一.下载 首先下载Loadrunner12安装包. 下载后有四个安装包: HP_LoadRunner_12.02_Community_Edition_Addit ...

  7. html5 可以讓使用者輸入url網址 ,去play影片

    <html> <head> <title>Simple Video Example</title> <script> function pl ...

  8. Java序列化中的serialVersionUID有什么用?

    如果一个实现了Serializable的类没有serialVersionUID属性,IDE(比如Eclipse)通常会报这样一个warning: The serializable class Foo ...

  9. VS2010 调试窗口一闪而过解决方法

    若此时进行的操作是编译(F5),可先运行程序(Ctrl+F5),若仍然一闪而过,用下面方法解决. 方法一: 1.要有头文件cstdlib,在程序最后写一句(return之前)添加:system(&qu ...

  10. 使用GIT来管理代码的心得

    使用GIT来管理代码,第一步当然就是下载一个GIT客户端(不知道是不是这么叫,但是觉得和客户端的功能差不多).电脑的操作系统是windows7的,所以下的是对应的GIT. 就是这玩意,安装的时候不停的 ...