LuatOS/bsp/win32/module_test/zbuff.lua

local buff = zbuff.create(15,6)
for i=0,14 do
    log.info("read byte",i,buff[i])
    assert(buff[i] == 6,"init error")
end

local writeLen = buff:write("abcde")
log.info("writeLen string",writeLen)
assert(writeLen == 5,"string write length error")
writeLen = buff:write(0x31,0x32,0x33,0x34,0x35)
log.info("writeLen numbers",writeLen)
assert(writeLen == 5,"numbers write length error")

buff:seek(0)
local readData = buff:read(5)
log.info("readData1",readData)
assert(readData == "abcde","read data1 error")
readData = buff:read(5)
log.info("readData2",readData)
assert(readData == "12345","read data2 error")

log.info("write bytes")
for i=0,9 do
    buff[i] = i * 2
end

for i=0,9 do
    log.info("read byte",i,buff[i])
    assert(buff[i] == i * 2,"read byte error")
end

buff:seek(0)
writeLen = buff:pack(">bbbIAIII",1,2,3,4,"abc",666,2,3)
log.info("pack write length",writeLen)
assert(writeLen == 15,"pack write length error")

buff:seek(0)
local len,b1,b2,b3,b4,s,i1 = buff:unpack(">bbbIA3III")
log.info("unpack read",len,b1,b2,b3,b4,s,i1)
assert(len == 14,"pack read length error")
assert(b1 == 1,"pack read b1 error")
assert(b2 == 2,"pack read b2 error")
assert(b3 == 3,"pack read b3 error")
assert(b4 == 4,"pack read b4 error")
assert(s == "abc","pack read s error")
assert(i1 == 666,"pack read I error")