cURL
cURL是 URL命令行工具， 即 command URL， 可以通过命令行模拟各种应用协议的发包， 包括FTP HTTP HTTPS，
官方网站 http://curl.haxx.se/
luacurl
lua curl是基于curl的库libcurl（http://curl.haxx.se/libcurl/），
针对libcurl开放的API(http://curl.haxx.se/libcurl/c/), 定义lua API对curl基本功能进行封装。
luauser中列出来3中绑定libcurl的lua封装库（http://lua-users.org/wiki/LuaCurl），
其中freepops-luacurl（http://www.freepops.org/en/）实现了libcurl所有的easy 接口 （http://curl.haxx.se/libcurl/c/libcurl-easy.html）
luaforge上提供一个 windows 上可运行luacurl的压缩包（http://files.luaforge.net/releases/luacurl/freepops-luacurl/0.3.0）：
freepops-lua-curl-binary-win32-openssl
本文示例就采用这个windows可运行包。
解压后， cmd命令行cd到解压目录，使用 luaxx.exe yy.lua 接口运行示例脚本。
示例
例子，实现https方式，登录网站，访问某个网页，修改其中参数的功能。其中xx应用时候需要修改。
require("curl")local ipList = { "192.168.1.1", "192.168.1.1",
}--登陆function loginWeb(ip) c = curl.easy_init() c:setopt(curl.OPT_SSL_VERIFYHOST, 0); c:setopt(curl.OPT_SSL_VERIFYPEER, 0); c:setopt(curl.OPT_URL, "https://"..ip.."/") c:setopt(curl.OPT_POSTFIELDS, "Username=admin&Password=admin&Frm_Logintoken=&action=login")
c:setopt(curl.OPT_WRITEFUNCTION, function(buffer)
--print(buffer) --print("\r\n---------------------------\r\n"); return #buffer end) c:perform()end--访问页面function accessPage(ip) c = curl.easy_init() c:setopt(curl.OPT_SSL_VERIFYHOST, 0); c:setopt(curl.OPT_SSL_VERIFYPEER, 0); c:setopt(curl.OPT_URL, "https://"..ip.."/xxpage.html")
c:setopt(curl.OPT_WRITEFUNCTION, function(buffer)
--print(buffer) --print("\r\n---------------------------\r\n"); return #buffer end) c:perform()end--设置参数function setParameter(ip, file) c = curl.easy_init() c:setopt(curl.OPT_SSL_VERIFYHOST, 0); c:setopt(curl.OPT_SSL_VERIFYPEER, 0); c:setopt(curl.OPT_URL, "https://"..ip.."/xx.php") c:setopt(curl.OPT_POSTFIELDS, "DaylightSavingsUsed=1&Dscp=-1") local htmlTable = {} c:setopt(curl.OPT_WRITEFUNCTION, function(buffer) --print(buffer) --print("\r\n---------------------------\r\n"); table.insert(htmlTable, buffer) return #buffer end) c:perform() local htmlStr = table.concat(htmlTable); local resultBuff = ""; if string.match(htmlStr, "SUCC ") ~= nil then resultBuff = ip.." config OK\r\n"; print(resultBuff) file:write(resultBuff);
else
resultBuff = ip.." config NOK\r\n"; print(resultBuff)
file:write(resultBuff); end
end local file = io.open(".\\result.txt", "w+");for key,ip in ipairs(ipList) do loginWeb(ip); accessPage(ip); openLightSave(ip, file); endfile:close(); print("Done")