1 files changed, 0 insertions, 87 deletions
diff --git a/httemplate/edit/process/svc_cert.cgi b/httemplate/edit/process/svc_cert.cgi
deleted file mode 100644
index 0e6037e..0000000
--- a/httemplate/edit/process/svc_cert.cgi
+++ /dev/null
@@ -1,87 +0,0 @@
-%if ( $popup ) {
-%  if ( $error ) { #should redirect back to the posting page?
-<% include("/elements/header-popup.html", "Error") %>
-<P><FONT SIZE="+1" COLOR="#ff0000"><% $error |h %></FONT>
-<BR><BR>
-<P ALIGN="center">
-<BUTTON TYPE="button" onClick="parent.cClick();">Close</BUTTON>
-</BODY></HTML>
-%  } else {
-<% include('/elements/header-popup.html', $title ) %>
-    <SCRIPT TYPE="text/javascript">
-      window.top.location = '<% popurl(3). "$popup/svc_cert.cgi?$svcnum" %>';
-    </SCRIPT>
-    </BODY></HTML>
-%  }
-%} elsif ( $error ) {
-%  $cgi->param('error', $error);
-<% $cgi->redirect(popurl(2). "svc_cert.cgi?". $cgi->query_string ) %>
-%} else {
-<% $cgi->redirect(popurl(3). "view/svc_cert.cgi?$svcnum") %>
-% }
-<%init>
-
-die "access denied"
-  unless $FS::CurrentUser::CurrentUser->access_right('Provision customer service'); #something else more specific?
-
-$cgi->param('svcnum') =~ /^(\d*)$/ or die "Illegal svcnum!";
-my $svcnum = $1;
-
-my $new = new FS::svc_cert ( {
-  map {
-    $_, scalar($cgi->param($_));
-  } ( fields('svc_cert'), qw( pkgnum svcpart ) )
-} );
-
-my $old = '';
-if ( $svcnum ) {
-  $old = qsearchs('svc_cert', { 'svcnum' => $svcnum } ) #agent virt;
-    or die 'unknown svcnum';
-  $new->$_( $old->$_ ) for grep $old->$_, qw( privatekey csr certificate cacert );
-}
-
-my $popup = '';
-my $title = '';
-if ( $cgi->param('privatekey') eq '_generate' ) { #generate
-  $popup = 'edit';
-  $title = 'Key generated';
-
-  $cgi->param('keysize') =~ /^(\d+)$/ or die 'illegal keysize';
-  my $keysize = $1;
-  $new->generate_privatekey($keysize);
-
-} elsif ( $cgi->param('privatekey') =~ /\S/ ) { #import
-  $popup = 'edit';
-  $title = 'Key imported';
-
-  $new->privatekey( $cgi->param('privatekey') );
-
-#} #elsif ( $cgi->param('privatekey') eq '_clear' ) { #clear
-
-} elsif ( $cgi->param('certificate') ) {
-
-  $popup = 'view';
-  $title = 'Certificate imported';
-
-  $new->certificate( $cgi->param('certificate') );
-  $new->$_( $old->$_ ) for grep $old->$_, qw( recnum common_name organization organization_unit city state country cert_contact );
-
-} elsif ( $cgi->param('cacert') ) {
-
-  $popup = 'view';
-  $title = 'Certificate authority chain imported';
-
-  $new->cacert( $cgi->param('cacert') );
-  $new->$_( $old->$_ ) for grep $old->$_, qw( recnum common_name organization organization_unit city state country cert_contact );
-
-}
-
-my $error = '';
-if ($cgi->param('svcnum')) {
-  $error  = $new->replace();
-} else {
-  $error  = $new->insert;
-  $svcnum = $new->svcnum;
-}
-
-</%init>