From 5099733a041f8b625353c0563e09d092d69d7a57 Mon Sep 17 00:00:00 2001 From: Ted Trask Date: Thu, 22 May 2008 21:04:40 +0000 Subject: Added revoking support to openssl git-svn-id: svn://svn.alpinelinux.org/acf/openssl/trunk@1178 ab2d0c66-481e-0410-8bed-d214d4d58bed --- openssl-controller.lua | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) (limited to 'openssl-controller.lua') diff --git a/openssl-controller.lua b/openssl-controller.lua index 64dd307..59918c1 100644 --- a/openssl-controller.lua +++ b/openssl-controller.lua @@ -26,7 +26,7 @@ readall = function(self) self.sessiondata.cmdresult = nil local pending = self.model.listrequests() local approved = self.model.listcerts() - local revoked = nil + local revoked = self.model.listrevoked() local result = cfe({ type="list", value={cmdresult=cmdresult, pending=pending, approved=approved, revoked=revoked} }) return result end @@ -38,7 +38,7 @@ read = function(self) local user = cfe({ value=self.sessiondata.userinfo.userid, label="User Name" }) local pending = self.model.listrequests(self.sessiondata.userinfo.userid) local approved = self.model.listcerts(self.sessiondata.userinfo.userid) - local revoked = nil + local revoked = self.model.listrevoked() local result = cfe({ type="list", value={cmdresult=cmdresult, user=user, pending=pending, approved=approved, revoked=revoked} }) return result end @@ -117,6 +117,9 @@ end -- Revoke the specified cert revoke = function(self) + local cmdresult = self.model.revokecert(self.clientdata.cert) + self.sessiondata.cmdresult = cmdresult + redirect_to_referrer(self) end -- Delete the specified certificate @@ -128,6 +131,8 @@ end -- Get the revoked list getrevoked = function(self) + self.conf.viewtype="stream" + return self.model.getcrl(self.clientdata.crltype) end -- Put the CA cert -- cgit v1.2.3