0

我有这个功能，我想返回多个值，但我不知道如何实现

function GetDiskSpace(_disk)
    require("alien")
    local kernel32 = alien.load("kernel32.dll")
    kernel32.GetDiskFreeSpaceExA:types("int", "pointer", "int", "int", "int")

    if kernel32.GetDiskFreeSpaceExA(_disk, _avail_space, _disk_space, _free_space) ~= 0 then
            return _avail_space, _disk_space, _free_space
            --[[or like this return kernel32.GetDiskFreeSpaceExA(_disk, _avail_space, _disk_space, _free_space)
            GetDiskFreeSpaceExA should retun non zero if function ran properly, 
            and should retun additional values if those are given 
            (btw values are __int64 i'm not sure if I specified them correct, maybe
            I should set them as "long" instead of "int")
            either way it return only function value and nil's.
            --]]
    else
            print("GetDiskSpace returned error.")
    end
end

hdd_a, hdd_b, hdd_c = GetDiskSpace("C:\\")
4

1 回答 1

0

您给出的类型规范是错误的，原因有几个。第一个参数是 type"string"而不是"pointer"。您必须编写"ref int"，而不仅仅是"int"为了引用（或指针）到int. 而且您还必须将 ABI 指定为"stdcall".

当使用"ref int"参数调用函数时，您传递了一个虚拟的 0 值，但获得了一个额外的返回值，因此这里GetDiskFreeSpaceExA有效地返回 4 个结果。

您担心uint64_t结果的值类型是正确的。据我所知，Alien不支持 64 位整数，因此以下代码仅返回磁盘空间的低 32 位：

function GetDiskSpace(_disk)
    require("alien")
    local kernel32 = alien.load("kernel32.dll")
    kernel32.GetDiskFreeSpaceExA:types { ret="int", abi="stdcall", 
        "string", "ref int", "ref int", "ref int" }
    local ok, _avail_space, _disk_space, _free_space = 
        kernel32.GetDiskFreeSpaceExA(_disk, 0, 0, 0)
    assert(ok == 1, "GetDiskSpace returned error.")
    return _avail_space, _disk_space, _free_space
end

hdd_a, hdd_b, hdd_c = GetDiskSpace("C:\\")

要纠正这个问题，您可以通过修改 Alien 的源代码并重新构建它来添加对 64 位整数的支持。

于 2012-12-26T16:24:05.417 回答