webadmin/bpfire
1
0
Fork 0
mirror of https://github.com/vincentmli/bpfire.git synced 2026-04-25 10:22:59 +02:00
Code Issues Packages Projects Releases Wiki Activity

samba: Refactor service status

Browse Source 
No functional changes

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>
This commit is contained in:
Michael Tremer
2020-10-09 15:37:03 +01:00
parent 8dc8788bee
commit 9e329f75d6
12 changed files with 174 additions and 28 deletions
Download Patch File Download Diff File Expand all files Collapse all files

40
html/cgi-bin/samba.cgi
View File

@@ -56,8 +56,6 @@ my %shares = ();
############################################################################################################################
############################################# Samba Dienste fr Statusberprfung ##########################################
my %servicenames = ('SMB Daemon' => 'smbd', 'NetBIOS Nameserver' => 'nmbd', 'Winbind Daemon' => 'winbindd');
&Header::showhttpheaders();
############################################################################################################################
@@ -227,25 +225,33 @@ $selected{'SECURITY'}{$sambasettings{'SECURITY'}} = "selected='selected'";
################################### Aufbau der HTML Seite fr globale Sambaeinstellungen ###################################
&Header::openbox('100%', 'center', $Lang::tr{'samba'});
print <<END
<br />
<table width='95%' cellspacing='0'>
<tr bgcolor='$color{'color20'}'><td colspan='2' align='left'><b>$Lang::tr{'all services'}</b></td></tr>
</table><table width='95%' cellspacing='0'>
my %servicenames = (
"nmbd" => $Lang::tr{'netbios nameserver daemon'},
"smbd" => $Lang::tr{'smb daemon'},
"winbindd" => $Lang::tr{'winbind daemon'},
);
print <<END;
<table width='95%' cellspacing='0'>
<tr bgcolor='$color{'color20'}'>
<td colspan='2' align='left'><b>$Lang::tr{'all services'}</b></td>
</tr>
END
;
my $key = '';
foreach $key (sort keys %servicenames)
{
print "<tr><td align='left' width='40%'>$key</td>";
my $shortname = $servicenames{$key};
my $status = &isrunning($shortname);
print "$status</tr>";
}
foreach my $service (sort keys %servicenames) {
my $status = &isrunning($service);
print <<END;
<tr>
<td align='left' width='40%'>$servicenames{$service}</td>
$status
</tr>
END
}
print <<END
</table>
</table>
<br />
<table width='95%' cellspacing='0'>
<tr><td align='left' width='40%' />