]>
git.ipfire.org Git - ipfire-2.x.git/blob - src/scripts/ovpn-ccd-convert
2 # Converter script for old openvpn clients
10 require '/var/ipfire/general-functions.pl';
11 unless (-d
"${General::swroot}/ovpn/ccd") { system("mkdir ${General::swroot}/ovpn/ccd"); }
12 system ("chown nobody.nobody ${General::swroot}/ovpn/ccd");
13 if ( -e
"/var/run/openvpn.pid"){
15 system('/usr/local/bin/openvpnctrl', '-k');
18 &General
::readhash
("/var/ipfire/ethernet/settings", \
%net);
19 $greennet=$net{'GREEN_NETADDRESS'};
20 $greensubnet=$net{'GREEN_NETMASK'};
21 open(FILE
,"/var/ipfire/ovpn/server.conf");
24 if ($_ ne "route $greennet $greensubnet"){
25 push (@serverconf,$_."\n");
27 print"\nFound ROUTE >>route $greennet $greensubnet<< in server.conf.. Deleted!";
31 &General
::readhasharray
("/var/ipfire/ovpn/ovpnconfig", \
%ovpnconfig);
32 foreach my $key (keys %ovpnconfig){
33 if($ovpnconfig{$key}[32] eq '' && $ovpnconfig{$key}[3] eq 'host'){
34 $ovpnconfig{$key}[2] =~ s/ /_/gi;
35 open ( CCDRWCONF
,'>',"/var/ipfire/ovpn/ccd/$ovpnconfig{$key}[2]") or die "Unable to create clientconfigfile $!";
36 print CCDRWCONF
"# OpenVPN Clientconfig from CCD extension by Copymaster#\n\n";
37 print CCDRWCONF
"#This client uses the dynamic pool\n\n";
38 print CCDRWCONF
"\n#Client gets routes to these Networks (behind IPFIRE)\n";
39 print CCDRWCONF
"push \"route $greennet $greensubnet\"\n";
41 print"Client $ovpnconfig{$key}[2] converted! \n";
43 print "Client $ovpnconfig{$key}[2] NOT converted!\n";
45 $ovpnconfig{$key}[32] = 'dynamic' if ($ovpnconfig{$key}[32] eq '');
47 &General
::writehasharray
("/var/ipfire/ovpn/ovpnconfig", \
%ovpnconfig);
50 system('/usr/local/bin/openvpnctrl', '-s');
52 system ("chown nobody:nobody /var/ipfire/ovpn/ccd/*");