mirror of
https://github.com/tnodir/fort
synced 2024-11-15 09:45:44 +00:00
28 lines
527 B
Lua
28 lines
527 B
Lua
-- WIPF Log Tests
|
|
|
|
local sys = require"sys"
|
|
local wipf = require"wipflua"
|
|
|
|
local mem, win32 = sys.mem, sys.win32
|
|
|
|
|
|
print"-- Log Write"
|
|
do
|
|
local path = "/test"
|
|
local outlen = 12 + #path + 3
|
|
local bufsize = outlen + 4
|
|
local buf = assert(mem.pointer(bufsize))
|
|
|
|
buf:memset(0, bufsize)
|
|
buf[outlen] = 127
|
|
assert(wipf.log_write(buf:getptr(), 1, 2, path) == outlen)
|
|
assert(buf[outlen] == 127)
|
|
|
|
local inlen, ip, pid = wipf.log_read(buf:getptr())
|
|
assert(inlen == outlen and ip == 1 and pid == 2)
|
|
|
|
print("OK")
|
|
end
|
|
|
|
|