From: Alexander Marx Date: Thu, 9 Jan 2014 13:59:10 +0000 (+0100) Subject: Layout changes vpnmain.cgi X-Git-Tag: v2.15-beta1~39 X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=0afd84931ea1a0712fafb85aac8976069b465c90;p=people%2Fms%2Fipfire-2.x.git Layout changes vpnmain.cgi --- diff --git a/html/cgi-bin/vpnmain.cgi b/html/cgi-bin/vpnmain.cgi index 052b3e3092..3e92d4b8ed 100644 --- a/html/cgi-bin/vpnmain.cgi +++ b/html/cgi-bin/vpnmain.cgi @@ -1099,7 +1099,7 @@ END $Lang::tr{'capswarning'}: $Lang::tr{'generating the root and host certificates may take a long time. it can take up to several minutes on older hardware. please be patient'} -
+
$Lang::tr{'upload p12 file'}: $Lang::tr{'pkcs12 file password'}: * @@ -2632,17 +2632,18 @@ print <$Lang::tr{'host to net vpn'}: * - + +

- + - +
*$Lang::tr{'this field may be blank'}$Lang::tr{'this field may be blank'}
**  $Lang::tr{'vpn delayed start help'}
END @@ -2685,21 +2686,24 @@ END print " "; } print "$confighash{$key}[25]"; + my $col1="bgcolor='${Header::colourred}'"; # get real state - my $active = "
$Lang::tr{'capsclosed'}
"; + my $active = "$Lang::tr{'capsclosed'}"; foreach my $line (@status) { if (($line =~ /\"$confighash{$key}[1]\".*IPsec SA established/) || ($line =~ /$confighash{$key}[1]\{.*INSTALLED/)) { - $active = "
$Lang::tr{'capsopen'}
"; + $col1="bgcolor='${Header::colourgreen}'"; + $active = "$Lang::tr{'capsopen'}"; } } # move to blueif really down - if ($confighash{$key}[0] eq 'off' && $active =~ /${Header::colourred}/ ) { - $active = "
$Lang::tr{'capsclosed'}
"; + if ($confighash{$key}[0] eq 'off' && $col1 =~ /${Header::colourred}/ ) { + $col1="bgcolor='${Header::colourblue}'"; + $active = "$Lang::tr{'capsclosed'}"; } print <$active + $active
@@ -2806,7 +2810,7 @@ END print < - + @@ -2816,7 +2820,7 @@ END ; &Header::closebox(); - &Header::openbox('100%', 'left', "$Lang::tr{'certificate authorities'}:"); + &Header::openbox('100%', 'left', "$Lang::tr{'certificate authorities'}"); print < @@ -2949,6 +2953,7 @@ END } my $createCA = -f "${General::swroot}/ca/cacert.pem" ? '' : ""; print <
@@ -2961,7 +2966,7 @@ END - +
$Lang::tr{'resetting the vpn configuration will remove the root ca, the host certificate and all certificate based connections'}: