luasec/samples/verify/server.lua

41 lines
871 B
Lua
Raw Normal View History

2013-03-30 13:21:40 +01:00
--
-- Public domain
--
local socket = require("socket")
local ssl = require("ssl")
local params = {
mode = "server",
2015-11-20 22:12:19 +01:00
protocol = "sslv23",
2013-03-30 13:21:40 +01:00
key = "../certs/serverAkey.pem",
certificate = "../certs/serverA.pem",
cafile = "../certs/rootA.pem",
verify = {"peer", "fail_if_no_peer_cert"},
2014-01-29 20:47:27 +01:00
verifyext = {"lsec_continue", "lsec_ignore_purpose"},
2015-11-20 22:12:19 +01:00
options = "all",
2013-03-30 13:21:40 +01:00
}
local ctx = assert(ssl.newcontext(params))
local server = socket.tcp()
server:setoption('reuseaddr', true)
assert( server:bind("127.0.0.1", 8888) )
server:listen()
local peer = server:accept()
peer = assert( ssl.wrap(peer, ctx) )
assert( peer:dohandshake() )
local succ, errs = peer:getpeerverification()
print(succ, errs)
for i, err in pairs(errs) do
for j, msg in ipairs(err) do
print("depth = " .. i, "error = " .. msg)
end
end
peer:send("oneshot test\n")
peer:close()