aboutsummaryrefslogtreecommitdiffstats
path: root/util/x509.lua
diff options
context:
space:
mode:
authorKim Alvefur <zash@zash.se>2014-04-24 23:38:47 +0200
committerKim Alvefur <zash@zash.se>2014-04-24 23:38:47 +0200
commitab02eadc12639d351a877dbb2fd1efdd7c8f3cd0 (patch)
treeda5105a006e8e2b3cf53cc96d96e679077987904 /util/x509.lua
parent6316aef5bb993b6d3c6d21d6a4068a540f8c816c (diff)
downloadprosody-ab02eadc12639d351a877dbb2fd1efdd7c8f3cd0.tar.gz
prosody-ab02eadc12639d351a877dbb2fd1efdd7c8f3cd0.zip
util.x509: And functions for converting between DER and PEM
Diffstat (limited to 'util/x509.lua')
-rw-r--r--util/x509.lua20
1 files changed, 20 insertions, 0 deletions
diff --git a/util/x509.lua b/util/x509.lua
index 857f02a4..1a4f5f38 100644
--- a/util/x509.lua
+++ b/util/x509.lua
@@ -20,6 +20,7 @@
local nameprep = require "util.encodings".stringprep.nameprep;
local idna_to_ascii = require "util.encodings".idna.to_ascii;
+local base64 = require "util.encodings".base64;
local log = require "util.logger".init("x509");
local pairs, ipairs = pairs, ipairs;
local s_format = string.format;
@@ -214,4 +215,23 @@ function verify_identity(host, service, cert)
return false
end
+local pat = "%-%-%-%-%-BEGIN ([A-Z ]+)%-%-%-%-%-\r?\n"..
+"([0-9A-Za-z+/=\r\n]*)\r?\n%-%-%-%-%-END %1%-%-%-%-%-";
+
+function pem2der(pem)
+ local typ, data = pem:match(pat);
+ if typ and data then
+ return base64.decode(data), typ;
+ end
+end
+
+local wrap = ('.'):rep(64);
+local envelope = "-----BEGIN %s-----\n%s\n-----END %s-----\n"
+
+function der2pem(data, typ)
+ typ = typ and typ:upper() or "CERTIFICATE";
+ data = base64.encode(data);
+ return s_format(envelope, typ, data:gsub(wrap, '%0\n', (#data-1)/64), typ);
+end
+
return _M;