| ----------------------------------------------------------------------------- |
| -- Little program to convert to and from Base64 |
| -- LuaSocket sample files |
| -- Author: Diego Nehab |
| -- RCS ID: $Id: b64.lua,v 1.8 2004/06/16 04:28:21 diego Exp $ |
| ----------------------------------------------------------------------------- |
| local ltn12 = require("ltn12") |
| local mime = require("mime") |
| 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 |
| sink = ltn12.sink.chain(convert, sink) |
| ltn12.pump.all(source, sink) |