Diff for /loncom/interface/domainprefs.pm between versions 1.375 and 1.376

version 1.375, 2021/01/01 14:45:38 version 1.376, 2021/01/05 04:23:45
Line 7203  sub print_wafproxy { Line 7203  sub print_wafproxy {
                     if (ref($settings->{'alias'}) eq 'HASH') {                      if (ref($settings->{'alias'}) eq 'HASH') {
                         $aliases{$dom} = $settings->{'alias'};                          $aliases{$dom} = $settings->{'alias'};
                     }                      }
                     foreach my $item ('ipheader','trusted','exempt') {                      foreach my $item ('ipheader','trusted','vpnint','vpnext') {
                         $values{$dom}{$item} = $settings->{$item};                          $values{$dom}{$item} = $settings->{$item};
                     }                      }
                 }                  }
Line 7218  sub print_wafproxy { Line 7218  sub print_wafproxy {
             if (ref($config{$domain}) eq 'HASH') {              if (ref($config{$domain}) eq 'HASH') {
                 if (ref($config{$domain}{'wafproxy'}) eq 'HASH') {                  if (ref($config{$domain}{'wafproxy'}) eq 'HASH') {
                     $aliases{$domain} = $config{$domain}{'wafproxy'}{'alias'};                      $aliases{$domain} = $config{$domain}{'wafproxy'}{'alias'};
                     foreach my $item ('ipheader','trusted','exempt') {                      foreach my $item ('ipheader','trusted','vpnint','vpnext') {
                         $values{$domain}{$item} = $config{$domain}{'wafproxy'}{$item};                          $values{$domain}{$item} = $config{$domain}{'wafproxy'}{$item};
                     }                      }
                 }                  }
Line 7268  sub print_wafproxy { Line 7268  sub print_wafproxy {
                           &mt('Format for comma separated IP blocks').':<br />'.                            &mt('Format for comma separated IP blocks').':<br />'.
                           &mt('A.B.C.D/N or A.B.C.D - E.F.G.H').'</td>'.                            &mt('A.B.C.D/N or A.B.C.D - E.F.G.H').'</td>'.
                           '<td class="LC_left_item"><table>';                            '<td class="LC_left_item"><table>';
             foreach my $item ('ipheader','trusted','exempt') {              foreach my $item ('ipheader','trusted','vpnint','vpnext') {
                 $datatable .= '<tr>'.                  $datatable .= '<tr>'.
                               '<td valign="top">'.$lt{$item}.':&nbsp;';                                '<td valign="top">'.$lt{$item}.':&nbsp;';
                 if ($item eq 'ipheader') {                  if ($item eq 'ipheader') {
Line 7290  sub print_wafproxy { Line 7290  sub print_wafproxy {
                 $datatable .= '<tr'.$css_class.'>'.                  $datatable .= '<tr'.$css_class.'>'.
                               '<td class="LC_left_item">'.&mt('Domain: [_1]',$domain).'</td>'.                                '<td class="LC_left_item">'.&mt('Domain: [_1]',$domain).'</td>'.
                               '<td class="LC_left_item"><table>';                                '<td class="LC_left_item"><table>';
                 foreach my $item ('ipheader','trusted','exempt') {                  foreach my $item ('ipheader','trusted','vpnint','vpnext') {
                     my $showval = &mt('None');                      my $showval = &mt('None');
                     if ($values{$domain}{$item}) {                      if ($values{$domain}{$item}) {
                         $showval = $values{$domain}{$item};                           $showval = $values{$domain}{$item}; 
Line 7308  sub print_wafproxy { Line 7308  sub print_wafproxy {
   
 sub wafproxy_titles {  sub wafproxy_titles {
     return &Apache::lonlocal::texthash(      return &Apache::lonlocal::texthash(
                exempt => 'Exempt IP range(s)',                 vpnint => 'Internal IP Range(s) for VPN sessions',
                  vpnext => 'IP Range for backend WAF connections',
                trusted => 'Trusted IP range(s)',                 trusted => 'Trusted IP range(s)',
                ipheader => 'Custom request header',                 ipheader => 'Custom request header',
            );             );

Removed from v.1.375  
changed lines
  Added in v.1.376


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>