{ use esmith::NetworksDB; use esmith::util; use Sys::Hostname; my $status = $squid{status} || 'disabled'; my $host = hostname()|| 'localhost'; $ndb = esmith::NetworksDB->open_ro or warn("Could not open NetworksDB"); my $LocalIP = $ndb->green()->prop('ipaddr') || return ''; my $phost = "PROXY proxy.$DomainName:3128"; my $adJoin = 0; if ( ($smb{'status'} || 'disabled') eq 'enabled' and ($smb{'ServerRole'} || '') eq 'ADS' ) { $adJoin = 1; } if ($status eq 'enabled') { my $target = "PROXY $LocalIP:3128"; $target = "PROXY ".$host.":3128" if ($squid{'WpadFqdn'} eq 'yes'); if ($adJoin) { $target = $phost; } $OUT.= "\n // DEFAULT\n"; $OUT.= ' return "' . $target . '";'; } else { $OUT.= " return \"DIRECT\";\n"; } }