luasocket/etc/b64.lua

local source = ltn12.source.file(io.stdin)
local sink = ltn12.sink.file(io.stdout)
local convert
if arg and arg[1] == '-d' then
    convert = mime.decode("base64")
else
    local base64 = mime.encode("base64")
    local wrap = mime.wrap()
    convert = ltn12.filter.chain(base64, wrap)
end
source = ltn12.source.chain(source, convert)
ltn12.pump(source, sink)
New filter scheme. ltn12 and mime updated. smtp/ftp broken. 2004-03-16 07:42:53 +01:00			`local source = ltn12.source.file(io.stdin)`
			`local sink = ltn12.sink.file(io.stdout)`
Working on the manual... Making better tests for error messages. Changed a few names. Moved gethostname to inet.c. 2004-01-24 03:47:24 +01:00			`local convert`
			`if arg and arg[1] == '-d' then`
New filter scheme. ltn12 and mime updated. smtp/ftp broken. 2004-03-16 07:42:53 +01:00			`convert = mime.decode("base64")`
Working on the manual... Making better tests for error messages. Changed a few names. Moved gethostname to inet.c. 2004-01-24 03:47:24 +01:00			`else`
New filter scheme. ltn12 and mime updated. smtp/ftp broken. 2004-03-16 07:42:53 +01:00			`local base64 = mime.encode("base64")`
			`local wrap = mime.wrap()`
			`convert = ltn12.filter.chain(base64, wrap)`
Just performs b64 encoding of stdin to stdout. 2004-01-20 23:21:50 +01:00			`end`
New filter scheme. ltn12 and mime updated. smtp/ftp broken. 2004-03-16 07:42:53 +01:00			`source = ltn12.source.chain(source, convert)`
			`ltn12.pump(source, sink)`