For example in Lua 5.2 file:write method returns `self`. ``` Lua function write(str) return #str - 1 -- this is error (number less than #str) end function write(str) return {} -- this is pass end ```
49 lines
986 B
Lua
49 lines
986 B
Lua
local HAS_RUNNER = not not lunit
|
|
local lunit = require "lunit"
|
|
local TEST_CASE = assert(lunit.TEST_CASE)
|
|
local skip = lunit.skip or function() end
|
|
|
|
local curl = require "lcurl"
|
|
local scurl = require "lcurl.safe"
|
|
local url = "http://example.com"
|
|
local fname = "./test.download"
|
|
|
|
local _ENV = TEST_CASE'write_callback' do
|
|
|
|
local c, f
|
|
|
|
function teardown()
|
|
if f then f:close() end
|
|
os.remove(fname)
|
|
if c then c:close() end
|
|
f, c = nil
|
|
end
|
|
|
|
function test_write_to_file()
|
|
f = assert(io.open(fname, "w+b"))
|
|
c = assert(curl.easy{
|
|
url = url;
|
|
writefunction = f;
|
|
})
|
|
|
|
assert_equal(c, c:perform())
|
|
end
|
|
|
|
function test_write_to_file_abort()
|
|
f = assert(io.open(fname, "w+b"))
|
|
c = assert(scurl.easy{
|
|
url = url;
|
|
writefunction = function(str)
|
|
return #str - 1
|
|
end;
|
|
})
|
|
|
|
local _, e = assert_nil(c:perform())
|
|
assert_equal(e, curl.error(curl.ERROR_EASY, curl.E_WRITE_ERROR))
|
|
|
|
end
|
|
|
|
end
|
|
|
|
if not HAS_RUNNER then lunit.run() end
|