aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
authorLibravatarLibravatar william <william+macosx@25thandclement.com> 2015-06-04 12:01:29 -0700
committerLibravatarLibravatar william <william+macosx@25thandclement.com> 2015-06-04 12:01:29 -0700
commit86c88410aab446a9e385080b95fbd1825223cade (patch)
tree0c79a6727e02cf8a6e4f4e1cd99d96cb3bf6251e /src
parentfde13cd3149f1e5d040a5e248bea820492b7cece (diff)
parent5b33312d64d8cf001c0063d876e6e80f367b9173 (diff)
downloadluaossl-86c88410aab446a9e385080b95fbd1825223cade.tar.gz
luaossl-86c88410aab446a9e385080b95fbd1825223cade.tar.bz2
luaossl-86c88410aab446a9e385080b95fbd1825223cade.zip
Merge branch 'kunkku-key-id'
Diffstat (limited to 'src')
-rw-r--r--src/openssl.c16
1 files changed, 16 insertions, 0 deletions
diff --git a/src/openssl.c b/src/openssl.c
index a93c96c..8e95622 100644
--- a/src/openssl.c
+++ b/src/openssl.c
@@ -3721,6 +3721,21 @@ static int xc_setPublicKey(lua_State *L) {
} /* xc_setPublicKey() */
+static int xc_getPublicKeyDigest(lua_State *L) {
+ ASN1_BIT_STRING *pk = ((X509 *) checksimple(L, 1, X509_CERT_CLASS))->cert_info->key->public_key;
+
+ unsigned char digest[EVP_MAX_MD_SIZE];
+ unsigned int len;
+
+ if (!EVP_Digest(pk->data, pk->length, digest, &len, EVP_sha1(), NULL))
+ return auxL_error(L, auxL_EOPENSSL, "x509.cert:getPublicKeyDigest");
+
+ lua_pushlstring(L, (char *) digest, len);
+
+ return 1;
+} /* xc_setPublicKeyDigest() */
+
+
static const EVP_MD *xc_signature(lua_State *L, int index, EVP_PKEY *key) {
const char *id;
const EVP_MD *md;
@@ -3881,6 +3896,7 @@ static const luaL_Reg xc_methods[] = {
{ "isIssuedBy", &xc_isIssuedBy },
{ "getPublicKey", &xc_getPublicKey },
{ "setPublicKey", &xc_setPublicKey },
+ { "getPublicKeyDigest", &xc_getPublicKeyDigest },
{ "sign", &xc_sign },
{ "text", &xc_text },
{ "tostring", &xc__tostring },