From cd91e59d897b1359dd91b2b9e5e7e008d2dbd9ed Mon Sep 17 00:00:00 2001
From: ivan <ivan>
Date: Sun, 7 Nov 2010 05:30:12 +0000
Subject: certificates ala communigate, RT#7515

---
 httemplate/misc/svc_cert-generate.html | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 httemplate/misc/svc_cert-generate.html

(limited to 'httemplate/misc')

diff --git a/httemplate/misc/svc_cert-generate.html b/httemplate/misc/svc_cert-generate.html
new file mode 100644
index 000000000..10e8ab4e9
--- /dev/null
+++ b/httemplate/misc/svc_cert-generate.html
@@ -0,0 +1,25 @@
+% if ($error) {
+% errorpage($error);
+%} else {
+<% $cgi->redirect($p."view/svc_cert.cgi?$svcnum") %>
+%}
+<%init>
+
+$cgi->param('svcnum') =~ /^(\d+)$/ or die 'illegal svcnum';
+my $svcnum = $1;
+
+my $svc_cert = qsearchs('svc_cert', { 'svcnum' => $svcnum } )
+  or die 'unknown svcnum';
+
+my $error = '';
+if ( $cgi->param('action') eq 'generate_csr' ) {
+  $svc_cert->generate_csr;
+  $error = $svc_cert->replace;
+} elsif ( $cgi->param('action') eq 'generate_selfsigned' ) {
+  $svc_cert->generate_selfsigned;
+  $error = $svc_cert->replace;
+} else {
+  die 'unknown action';
+}
+
+</%init>
-- 
cgit v1.2.1