aboutsummaryrefslogblamecommitdiffstats
path: root/examples/vrfy.sig
blob: 258490a69b425c175b416a572227769a06e33d79 (plain) (tree)
1
2
3
4
5
6
7
8
9




                                             


                                
                                  


                                      












                                                                                       


                                                                            
                             






                                                                     
                                       












                                                                 
#!/usr/local/lua52/bin/lua
--
-- Example public-key signature verification.
--

local keytype = ...

local openssl = require"openssl"
local pkey = require"openssl.pkey"
local digest = require"openssl.digest"

-- generate a public/private key pair
local function genkey(type)
	type = string.upper(type or (not openssl.NO_EC and "EC") or "RSA")

	if type == "RSA" then
		return pkey.new{ type = "RSA", bits = 1024 }, "sha256"
	elseif type == "DSA" then
		return pkey.new{ type = "DSA", bits = 1024 }, "dss1"
	else
		return pkey.new{ type = "EC", curve = "prime192v1" }, "ecdsa-with-SHA1"
	end
end

local key, hash = genkey(keytype)

-- digest our message using an appropriate digest ("ecdsa-with-SHA1" for EC;
-- "dss1" for DSA; and "sha1", "sha256", etc for RSA).
local data = digest.new(hash)
data:update(... or "hello world")

-- generate a signature for our data
local sig = key:sign(data)

-- to prove verification works, instantiate a new object holding just
-- the public key
local pub = pkey.new(key:toPEM"public")

-- a utility routine to output our signature
local function tohex(b)
	local x = ""
	for i = 1, #b do
		x = x .. string.format("%.2x", string.byte(b, i))
	end
	return x
end

print("okay", pub:verify(sig, data))
print("type", pub:type())
print("sig", tohex(sig))