21106ca7bd
```Lua -- Fixed e:setopt_httppost(curl.form()) e:setopt_httppost(curl.form()) -- `e` store 2 form object and the will alive until `e` is alive. ```
107 lines
1.8 KiB
Lua
107 lines
1.8 KiB
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 function weak_ptr(val)
|
|
return setmetatable({value = val},{__mode = 'v'})
|
|
end
|
|
|
|
local function gc_collect()
|
|
collectgarbage("collect")
|
|
collectgarbage("collect")
|
|
end
|
|
|
|
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
|
|
|
|
local _ENV = TEST_CASE'escape' do
|
|
|
|
local c
|
|
|
|
function teardown()
|
|
if c then c:close() end
|
|
f, c = nil
|
|
end
|
|
|
|
function test()
|
|
local e = "This%2Bis%2Ba%2Bsimple%2B%2526%2Bshort%2Btest."
|
|
local d = "This+is+a+simple+%26+short+test."
|
|
c = assert(curl.easy())
|
|
assert_equal(e, c:escape(d))
|
|
assert_equal(d, c:unescape(e))
|
|
end
|
|
|
|
end
|
|
|
|
local _ENV = TEST_CASE'setopt_form' do
|
|
|
|
local c
|
|
|
|
function teardown()
|
|
if c then c:close() end
|
|
c = nil
|
|
end
|
|
|
|
function test()
|
|
local pfrom, e
|
|
do
|
|
local form = curl.form()
|
|
e = curl.easy{httppost = form}
|
|
pfrom = weak_ptr(form)
|
|
end
|
|
|
|
gc_collect()
|
|
assert(pfrom.value)
|
|
|
|
e:setopt_httppost(curl.form())
|
|
|
|
gc_collect()
|
|
assert(not pfrom.value)
|
|
end
|
|
|
|
end
|
|
|
|
|
|
|
|
if not HAS_RUNNER then lunit.run() end
|