[freeside-commits] freeside/httemplate/edit/svc_cert generate_privatekey.html, NONE, 1.1.2.2 import_privatekey.html, NONE, 1.1.2.2

[Ivan,,,]

Update of /home/cvs/cvsroot/freeside/httemplate/edit/svc_cert
In directory wavetail.420.am:/tmp/cvs-serv28702/httemplate/edit/svc_cert

Added Files:
      Tag: FREESIDE_2_1_BRANCH
	generate_privatekey.html import_privatekey.html 
Log Message:
certificates ala communigate, RT#7515

--- NEW FILE: generate_privatekey.html ---
<% include('/elements/header-popup.html', 'Generate private key' ) %>

<FORM NAME="GenerateKeyForm" ACTION="<% $p %>process/svc_cert.cgi" METHOD="POST">

<INPUT TYPE="hidden" NAME="svcnum" VALUE="<% $svcnum %>">
<INPUT TYPE="hidden" NAME="pkgnum" VALUE="<% $pkgnum %>">
<INPUT TYPE="hidden" NAME="svcpart" VALUE="<% $svcpart %>">

<INPUT TYPE="hidden" NAME="privatekey" VALUE="_generate">

Key size: <SELECT NAME="keysize">
  <OPTION VALUE="512">512</OPTION>
  <OPTION VALUE="1024">1024</OPTION>
  <OPTION VALUE="2048" SELECTED>2048</OPTION>
  <OPTION VALUE="4096">4096</OPTION>
</SELECT>

<BR><BR>
<INPUT TYPE="submit" VALUE="Generate">

</FORM>
</BODY>
</HTML>
<%init>

$cgi->param('svcnum') =~ /^(\d*)$/ or die 'illegal svcnum';
my $svcnum = $1;
$cgi->param('pkgnum') =~ /^(\d*)$/ or die 'illegal pkgnum';
my $pkgnum = $1;
$cgi->param('svcpart') =~ /^(\d*)$/ or die 'illegal svcpart';
my $svcpart = $1;

</%init>


--- NEW FILE: import_privatekey.html ---
<% include('/elements/header-popup.html', 'Import private key' ) %>

<% include('/elements/error.html') %>

<FORM NAME="ImportKeyForm" ACTION="<% $p %>process/svc_cert.cgi" METHOD="POST">

<INPUT TYPE="hidden" NAME="svcnum" VALUE="<% $svcnum %>">
<INPUT TYPE="hidden" NAME="pkgnum" VALUE="<% $pkgnum %>">
<INPUT TYPE="hidden" NAME="svcpart" VALUE="<% $svcpart %>">

<TEXTAREA NAME="privatekey" COLS=64 ROWS=15 STYLE="font-family:monospace"></TEXTAREA>

<BR><BR>
<INPUT TYPE="submit" VALUE="Import">

</FORM>
</BODY>
</HTML>
<%init>

$cgi->param('svcnum') =~ /^(\d*)$/ or die 'illegal svcnum';
my $svcnum = $1;
$cgi->param('pkgnum') =~ /^(\d*)$/ or die 'illegal pkgnum';
my $pkgnum = $1;
$cgi->param('svcpart') =~ /^(\d*)$/ or die 'illegal svcpart';
my $svcpart = $1;

</%init>