fort/test/log_read.lua
Nodir Temirkhodjaev 846d358276 Fix utility names.
2015-01-20 19:48:43 +05:00

46 lines
886 B
Lua

-- WIPF Log Reader
local sys = require"sys"
local sock = require"sys.sock"
local wipf = require"wipflua"
local util_fs = require"wipf/util/fs"
function print_logs(buf)
local size = buf:seek()
local ptr = buf:getptr()
local off = 0
while off < size do
local len, ip, pid, dos_path = wipf.log_read(ptr, off)
local ip_str = sock.inet_ntop(ip)
if not dos_path then
dos_path = util_fs.pid_dospath(pid)
end
local path = util_fs.dospath_to_path(dos_path)
print(ip_str, pid, path)
off = off + len
end
buf:seek(0)
end
local device = assert(sys.handle():open(wipf.device_name(), "rw"))
local BUFSIZ = wipf.buffer_size()
local buf = assert(sys.mem.pointer(BUFSIZ))
assert(buf:write("test config"))
assert(device:ioctl(wipf.ioctl_setconf(), buf))
while true do
assert(device:ioctl(wipf.ioctl_getlog(), nil, buf))
print_logs(buf)
end