在 Lua 中访问 table 键的值(右侧)中的键

Accessing the key in the value (right side) of a table key affectation in Lua

目标是将 table 的键与取决于键的值相匹配。

example = { ["dummy"] = this .. " example" }
print example.dummy -- print "dummy example"

其中this是keyword,指的是key。在 Lua 中有什么方法可以做到这一点吗?

无法直接执行此操作。

你可以做一些预处理:

example = { ["dummy"] = "{THIS} example" }
for k,v in pairs(example) do
    example[k]=v:gsub("{THIS}",k)
end
print(example.dummy)

不可能有像这样干净的表达式:

t = { foo = this .. ' bar' }

因为 this 的表达总是与键或 table 无关。也就是说,您不能将表达式捕获为 table 条目的值。

可以使用 metatables 和函数实现某种程度的间接寻址,但这并不完美。在这里,我们进行获取时评估。您也可以重新计算结果。

local function indirect_table ()
    local uptable = {}

    return setmetatable({}, {
        __index = function (self, key)
            local value = uptable[key]

            return type(value) == 'function' and uptable[key](key) or value
        end,
        __newindex = function (self, key, value)
            uptable[key] = value
            --[[precompute, with no need for an uptable, or __index:
                `rawset(self, key, value(key)`]]
        end
    })
end

local tab = indirect_table()

tab.foo = function (key) return key .. 'bar' end

print(tab.foo) --> 'foobar'

注意:此示例使用闭包,但您也可以使用 getmetatable 实现这种模式。


就我个人而言,我会将其抽象为一种间接模式,允许指定任意键和值及其 操作 。我认为这种模式主要以编程方式使用,而不是手动使用,其中键值的结果取决于收到的输入。同样,不漂亮,但更健壮(可选操作)。

local function I (_, value) return value end

local K = setmetatable({
    __call = function (actor, key)
        return actor.action(key, actor.value)
    end
}, {
    __call = function (K, value, action)
        return setmetatable({ value = value, action = action or  I }, K)
    end
})

local T = setmetatable({
    __newindex = function (self, key, value)
        if getmetatable(value) == K then
            value = value(key)
        end

        rawset(self, key, value)
    end
}, { 
    __call = function (T, o)
        return setmetatable(o or {}, T)
    end
})

使用简单:

local function concat (left, right) return left .. right end

local t = T {}

t.foo = K('bar', concat) -- with a common action
t.zar = K({}, unknown_action) -- without action (`nil`)
t.qux = 'qaz' -- standard

print(t.foo, t.zar, t.qux)

这是一种奇怪的元编程。我会仔细检查需要这种方法的原因。也许您掉进了 XY Problem 陷阱?真的感觉像是解决了一个根本不需要存在的问题。