2013-01-24 38 views
5

我试图序列化和反序列化一个Lua封闭Lua和系列化关闭

我的基本认识是,下面的工厂应该产生倒闭(这Lua中没有太多的功能和关闭区分 - 即有是没有类型“闭合”)

> function ffactory(x) return function() return x end end 
> f1 = ffactory(5) 
> print(f1()) 
5      <-- so far so good 
> s = string.dump(f1) 
> f2 = load(s) 
> print(f2()) 
table: 00000000002F7BA0 <-- expected the integer 5 
> print(f2()==_ENV) 
true      <-- definitely didn't expect this! 

我预期整数5与f1被序列化。或者,如果string.dump无法处理关闭,我预计会发生错误。

我得到了完全不同的结果(但我期望的结果)有轻微的变化。它看起来像f2确实是一个闭包,但string.dump并没有试图在序列化时序列化x的值。

docs对我帮助不大。 (它们是什么意思“... with new upvalues”?)

> function ffactory(x) return function() return x+1 end end 
> f1 = ffactory(5) 
> print(f1()) 
6      <-- good 
> s = string.dump(f1) 
> f2 = load(s) 
> print(f2()) 
stdin:1: attempt to perform arithmetic on upvalue 'x' (a table value) 
stack traceback: 
     stdin:1: in function 'f2' 
     stdin:1: in main chunk 
     [C]: in ? 

回答

1

该文档非常清晰。 string.dump不处理使用upvalues的闭包。这是因为upvalues可能是任何东西(包括用户数据,以及Lua如何序列化它)?

upvalues是由于作用域/关闭而对函数局部的外部变量。因为在你的例子中x是ffactory返回的函数的一个升序,所以它不会被序列化。

,如果你想以某种方式支持这一点,你就必须自己保存upvalues和重新设置你的反序列化功能之后,就像这样:

function ffactory(x) 
    return function() return x+1 end 
end 

local f1 = ffactory(5) 
print(f1()) 

local s = string.dump(f1) 
f2 = loadstring(s) 
debug.setupvalue(f2, 1, 5) 
print(f2()) 
+1

谢谢。我不知道debug.setupvalue。你可以告诉我在文档中的位置,它解释了string.dump对upvalues的处理(不在这里:http://www.lua.org/manual/5.2/manual.html#pdf-string.dump)。另外,在我的第一个例子中,_ENV是否会返回预期行为? – Paul

+0

您可以阅读关于debug.getupvalue [here](http://www.lua.org/manual/5.2/manual.html#pdf-debug.setupvalue)的文章。我不确定你的第一个例子中的交易是什么,因为它甚至不应该编译。你正在使用load(),但实际上应该使用loadstring()。加载需要一个func和一个字符串。 –

+0

不再。 Lua 5.2已经弃用'loadstring'并且只对字符串和函数使用'load':然而,http://www.lua.org/manual/5.2/manual.html#8.2'loadstring'仍然可用,并且给出了与'load'相同的结果。再次感谢! – Paul

6

你可以做这样的事情,以节省/恢复那些upvalues(注意它不处理不同的功能之间共享upvalues):

local function capture(func) 
    local vars = {} 
    local i = 1 
    while true do 
    local name, value = debug.getupvalue(func, i) 
    if not name then break end 
    vars[i] = value 
    i = i + 1 
    end 
    return vars 
end 

local function restore(func, vars) 
    for i, value in ipairs(vars) do 
    debug.setupvalue(func, i, value) 
    end 
end 

function ffactory(x) return function() return x end end 
local f1 = ffactory(5) 
local f2 = (loadstring or load)(string.dump(f1)) 
restore(f2, capture(f1)) --<-- this restored upvalues from f1 for f2 

print(f1(), f2()) 

这适用的Lua 5.1和Lua 5.2下。

注意一个有趣的结果,如果你改变ffactory略(添加math.abs(0);任何使用全局表以任何方式都行):如果你恢复你得到同样的结果upvalues

function ffactory(x) return function() math.abs(0) return x end end 

现在,但如果你不恢复upvalues你得到一个运行时错误Lua 5.2下:

lua.exe: upvalues.lua:19: attempt to index upvalue '_ENV' (a nil value) 
stack traceback: 
upvalues.lua:19: in function 'f2' 
upvalues.lua:24: in main chunk 
[C]: in ?