← Back
Editing: change_ca.cgi
#!/usr/bin/perl # change_ca.cgi # Update the CA cert manually require './webmin-lib.pl'; &ReadParseMime(); &lock_file($ENV{'MINISERV_CONFIG'}); &get_miniserv_config(\%miniserv); if (!$miniserv{'ca'}) { &setup_ca(\%miniserv); } &lock_file($miniserv{'ca'}); &open_tempfile(CA, ">$miniserv{'ca'}"); $in{'cert'} =~ s/\r//g; $in{'cert'} =~ s/\n*$/\n/; &print_tempfile(CA, $in{'cert'}); &close_tempfile(CA); chmod(0700, $miniserv{'ca'}); &unlock_file($miniserv{'ca'}); unlink("$config_directory/acl/crl.pem"); &put_miniserv_config(\%miniserv); &unlock_file($ENV{'MINISERV_CONFIG'}); &redirect(""); sleep(1); &show_restart_page(); &webmin_log("changeca", undef, undef, \%in);
Save File
Cancel