2004-06-16 06:28:21 +02:00
|
|
|
-----------------------------------------------------------------------------
|
|
|
|
|
-- Little program to convert to and from Base64
|
|
|
|
|
-- LuaSocket sample files
|
|
|
|
|
-- Author: Diego Nehab
|
|
|
|
|
-----------------------------------------------------------------------------
|
2004-06-04 17:15:45 +02:00
|
|
|
local ltn12 = require("ltn12")
|
|
|
|
|
local mime = require("mime")
|
2004-03-16 07:42:53 +01:00
|
|
|
local source = ltn12.source.file(io.stdin)
|
|
|
|
|
local sink = ltn12.sink.file(io.stdout)
|
2004-01-24 03:47:24 +01:00
|
|
|
local convert
|
|
|
|
|
if arg and arg[1] == '-d' then
|
2004-03-16 07:42:53 +01:00
|
|
|
convert = mime.decode("base64")
|
2004-01-24 03:47:24 +01:00
|
|
|
else
|
2004-03-16 07:42:53 +01:00
|
|
|
local base64 = mime.encode("base64")
|
|
|
|
|
local wrap = mime.wrap()
|
|
|
|
|
convert = ltn12.filter.chain(base64, wrap)
|
2004-01-20 23:21:50 +01:00
|
|
|
end
|
2004-05-28 09:24:43 +02:00
|
|
|
sink = ltn12.sink.chain(convert, sink)
|
|
|
|
|
ltn12.pump.all(source, sink)
|
