forked from izaya/OC-PsychOS2
added a simple wget program for internet cards
This commit is contained in:
parent
0aba709fb1
commit
bc1f7d7c6c
20
exec/wget.lua
Normal file
20
exec/wget.lua
Normal file
@ -0,0 +1,20 @@
|
||||
local tA = {...}
|
||||
local url = tA[1]
|
||||
local path = tA[2]
|
||||
local R=component.invoke(component.list("internet")(),"request",url)
|
||||
if not R then return false end
|
||||
local f=io.open(path,"wb")
|
||||
if not f then return false end
|
||||
repeat
|
||||
coroutine.yield()
|
||||
until R.finishConnect()
|
||||
local code, message, headers = R.response()
|
||||
if code > 299 or code < 200 then
|
||||
return false, code, message
|
||||
end
|
||||
repeat
|
||||
coroutine.yield()
|
||||
ns = R.read(2048)
|
||||
f:write(ns or "")
|
||||
until not ns
|
||||
f:close()
|
Loading…
Reference in New Issue
Block a user