scottk/wlan-lanforge-scripts
1
0
Fork 0
mirror of https://github.com/Telecominfraproject/wlan-lanforge-scripts.git synced 2025-11-01 03:07:56 +00:00
Code Issues Packages Projects Releases Wiki Activity

updates apache files on ubuntu

Browse Source
This commit is contained in:
Jed Reynolds
2019-05-23 12:42:28 -07:00
parent 75980515e1
commit dc459bf2b8
1 changed files with 14 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

18
adjust_apache.pl
View File

@@ -75,6 +75,8 @@ print "Updated /etc/hosts\n";
# grab the 0000-default.conf file # grab the 0000-default.conf file
my @places_to_check = ( my @places_to_check = (
"/etc/apache2/apache2.conf",
"/etc/apache2/ports.conf",
"/etc/apache2/sites-available/0000-default.conf", "/etc/apache2/sites-available/0000-default.conf",
"/etc/httpd/conf/http.conf", "/etc/httpd/conf/http.conf",
"/etc/httpd/conf/httpd.conf", "/etc/httpd/conf/httpd.conf",
@@ -84,27 +86,35 @@ foreach my $file (@places_to_check) {
if ( -f $file) { if ( -f $file) {
print "Checking $file...\n"; print "Checking $file...\n";
my @lines = `cat $file`; my @lines = `cat $file`;
chomp @lines;
# we want to match Listen 80$ or Listen 443 https$ # we want to match Listen 80$ or Listen 443 https$
# we want to replace with Listen lanforge-mgr:80$ or Listen lanforge-mgr:443 https$ # we want to replace with Listen lanforge-mgr:80$ or Listen lanforge-mgr:443 https$
@hunks = grep { /^\s*Listen\s+(?:80|443) */ } @lines; @hunks = grep { /^\s*Listen\s+(?:80|443) */ } @lines;
if (@hunks) { if (@hunks) {
my $edited = 0;
my @newlines = (); my @newlines = ();
@hunks = (@hunks, "\n"); @hunks = (@hunks, "\n");
print "Something to change in $file\n"; print "Something to change in $file\n";
print "These lines are interesting:\n"; print "These lines are interesting:\n";
print join("\n", @hunks); print join("\n", @hunks);
foreach my $confline (@lines) { foreach my $confline (@lines) {
if ($confline !~ /^\s*Listen\s+(?:80|443) */) { if ($confline =~ /^\s*Listen\s+(?:80|443) */) {
}
else {
$confline =~ s/Listen /Listen ${MgrHostname}:/; $confline =~ s/Listen /Listen ${MgrHostname}:/;
print "$confline\n"; print "$confline\n";
} }
push @newlines, $confline;
$edited++ if ($confline =~ /# modified by lanforge/);
} }
push(@newlines, "# modified by lanforge\n") if ($edited == 0);
die ($!) unless open($fh, ">", $file);
print $fh join("\n", @newlines);
close $fh;
} }
else { else {
print "Nothing to change in $file\n"; print "Nothing to change in $file\n";
} }
} }
} } # ~for places_to_check
# #