Bernhard.Linz/openvpn-install
1
0
Fork 0
mirror of https://github.com/angristan/openvpn-install.git synced 2025-01-09 16:20:04 +01:00
Code Issues Projects Releases Wiki Activity

Update revoke-cleaner.pl

Browse Source
This commit is contained in:
nu11secur1ty 2023-01-17 15:47:17 +02:00 committed by GitHub
parent 6becf7caa9
commit 1f6fd150a0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 8 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
revoke-cleaner.pl
View File

@ -26,24 +26,28 @@ print "If you do not see lines with (R) in the beginning, you will have nothing
print color('RESET');
my $ENV = `cat /etc/openvpn/easy-rsa/pki/index.txt | grep R`;
print "$ENV";
print "$ENV";
print color('Yellow');
print "This is your issued crt's\n";
print color('RESET');
my $issued = `ls -all /etc/openvpn/easy-rsa/pki/issued/`;
print "$issued";
print "$issued";
## Cleaning
my $ENVPKI = "/etc/openvpn/easy-rsa/pki/index.txt";
print "Preparing for cleaning...\n";
print "Preparing for cleaning...\n";
print color('RED');
print "Please, choose the username, or if you are not really sure, just press Enter to exit the cleaner...\n";
print color('RESET');
chomp (my $username = <STDIN>);
my $cleaner = `sed -i '/$username/d' $ENVPKI`;
my $cleaner = `sed -i '/$username/d' $ENVPKI`;
print color('YELLOW')
print"You clint configurations are...\n";
my $configs = `ls -all /etc/openvpn/client/`;
print"$configs";
exit 0;