Sat, 02 Jan 2010 05:57:36 +0000
Add demo.lua to demonstrate usage
1
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
1 | require "lahttp" |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
2 | require "multihttp" |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
3 | |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
4 | local function mycallback(url, status, data) |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
5 | print("---------------"); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
6 | if status == 200 then -- HTTP OK |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
7 | print("Received the data from "..url..":"); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
8 | print(data) |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
9 | else |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
10 | print("Received HTTP error "..status.." while downloading from "..url); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
11 | end |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
12 | print("---------------"); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
13 | end |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
14 | |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
15 | local function progresscallback(batch) |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
16 | for url,progress in pairs(batch:progress()) do |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
17 | print(url..":"); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
18 | for statistic, value in pairs(progress) do |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
19 | print("", k..": "..v); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
20 | end |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
21 | end |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
22 | print(""); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
23 | end |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
24 | |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
25 | batch_download = multihttp.new(mycallback, { "http://www.google.com/", "http://example.com/" }); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
26 | |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
27 | batch_download:set_progress_callback(progresscallback); |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
28 | |
7ef4b95f77b5
Add demo.lua to demonstrate usage
Matthew Wild <mwild1@gmail.com>
parents:
diff
changeset
|
29 | batch_download:download(true); -- true means "don't return until all downloads are finished" |