diff options
author | Diego Nehab <diego@tecgraf.puc-rio.br> | 2004-10-12 22:35:20 +0000 |
---|---|---|
committer | Diego Nehab <diego@tecgraf.puc-rio.br> | 2004-10-12 22:35:20 +0000 |
commit | 4964552718b81dba2c36fc08494aefae89a799f4 (patch) | |
tree | 5473a82045a7f66f31c56f4cbd151b16a61e7e90 /test | |
parent | 396946b63a95fc9949b75aed82c7ac1c132ccd40 (diff) | |
download | luasocket-4964552718b81dba2c36fc08494aefae89a799f4.tar.gz luasocket-4964552718b81dba2c36fc08494aefae89a799f4.tar.bz2 luasocket-4964552718b81dba2c36fc08494aefae89a799f4.zip |
My own ltn12.filter.chain is done.
Implemented part of DB's suggestion for ftp.
Mimetest.lua generates the test file for base64 instead of loading from disk.
Diffstat (limited to 'test')
-rw-r--r-- | test/mimetest.lua | 37 |
1 files changed, 25 insertions, 12 deletions
diff --git a/test/mimetest.lua b/test/mimetest.lua index d9bb772..89926d8 100644 --- a/test/mimetest.lua +++ b/test/mimetest.lua | |||
@@ -8,13 +8,10 @@ local qptest = "qptest.bin" | |||
8 | local eqptest = "qptest.bin2" | 8 | local eqptest = "qptest.bin2" |
9 | local dqptest = "qptest.bin3" | 9 | local dqptest = "qptest.bin3" |
10 | 10 | ||
11 | local b64test = "lsocket.2.0.dylib" | 11 | local b64test = "b64test.bin" |
12 | local eb64test = "b64test.bin" | 12 | local eb64test = "b64test.bin2" |
13 | local db64test = "b64test.bin2" | 13 | local db64test = "b64test.bin3" |
14 | 14 | ||
15 | -- make sure test file exists | ||
16 | local f = assert(io.open(b64test, "r")) | ||
17 | f:close() | ||
18 | 15 | ||
19 | -- from Machado de Assis, "A Mão e a Rosa" | 16 | -- from Machado de Assis, "A Mão e a Rosa" |
20 | local mao = [[ | 17 | local mao = [[ |
@@ -86,6 +83,7 @@ local function named(f, name) | |||
86 | end | 83 | end |
87 | end | 84 | end |
88 | ]] | 85 | ]] |
86 | |||
89 | local function named(f) | 87 | local function named(f) |
90 | return f | 88 | return f |
91 | end | 89 | end |
@@ -188,6 +186,19 @@ local function cleanup_qptest() | |||
188 | os.remove(dqptest) | 186 | os.remove(dqptest) |
189 | end | 187 | end |
190 | 188 | ||
189 | -- create test file | ||
190 | function create_b64test() | ||
191 | local f = assert(io.open(b64test, "wb")) | ||
192 | local t = {} | ||
193 | for j = 1, 100 do | ||
194 | for i = 1, 100 do | ||
195 | t[i] = math.random(0, 255) | ||
196 | end | ||
197 | f:write(string.char(unpack(t))) | ||
198 | end | ||
199 | f:close() | ||
200 | end | ||
201 | |||
191 | local function encode_b64test() | 202 | local function encode_b64test() |
192 | local e1 = mime.encode("base64") | 203 | local e1 = mime.encode("base64") |
193 | local e2 = mime.encode("base64") | 204 | local e2 = mime.encode("base64") |
@@ -212,6 +223,7 @@ local function decode_b64test() | |||
212 | end | 223 | end |
213 | 224 | ||
214 | local function cleanup_b64test() | 225 | local function cleanup_b64test() |
226 | os.remove(b64test) | ||
215 | os.remove(eb64test) | 227 | os.remove(eb64test) |
216 | os.remove(db64test) | 228 | os.remove(db64test) |
217 | end | 229 | end |
@@ -221,12 +233,12 @@ local function compare_b64test() | |||
221 | end | 233 | end |
222 | 234 | ||
223 | local function identity_test() | 235 | local function identity_test() |
224 | local chain = ltn12.filter.chain( | 236 | local chain = named(ltn12.filter.chain( |
225 | mime.encode("quoted-printable"), | 237 | named(mime.encode("quoted-printable"), "1 eq"), |
226 | mime.encode("base64"), | 238 | named(mime.encode("base64"), "2 eb"), |
227 | mime.decode("base64"), | 239 | named(mime.decode("base64"), "3 db"), |
228 | mime.decode("quoted-printable") | 240 | named(mime.decode("quoted-printable"), "4 dq") |
229 | ) | 241 | ), "chain") |
230 | transform(b64test, eb64test, chain) | 242 | transform(b64test, eb64test, chain) |
231 | compare(b64test, eb64test) | 243 | compare(b64test, eb64test) |
232 | os.remove(eb64test) | 244 | os.remove(eb64test) |
@@ -271,6 +283,7 @@ end | |||
271 | local t = socket.gettime() | 283 | local t = socket.gettime() |
272 | 284 | ||
273 | identity_test() | 285 | identity_test() |
286 | create_b64test() | ||
274 | encode_b64test() | 287 | encode_b64test() |
275 | decode_b64test() | 288 | decode_b64test() |
276 | compare_b64test() | 289 | compare_b64test() |