Update clamav. Modify ibayupd,ln list, start remoteaccess

This commit is contained in:
John Crisp 2025-06-10 23:05:00 +02:00
parent b1e896c187
commit f9f799d2ce
4 changed files with 302 additions and 252 deletions

View File

@ -5,39 +5,44 @@
<div class="card-body"> <div class="card-body">
% if (config->{debug} == 1) { % if (config->{debug} == 1) {
<div> <pre>
(DBG)route: <%= $c->current_route %><br> Route: <%= dumper $c->current_route %><br>
(DBG)FsS stat: <%= $clm_datas->{FilesystemScan}%> <br> FsS stat: <%= dumper $clm_datas->{FilesystemScan}%> <br>
(DBG)Quar stat: <%=$clm_datas->{Quarantine} %> Quar stat: <%= dumper $clm_datas->{Quarantine} %>
</div> </pre>
% } % }
<h1><%= $title %></h1> <h1><%= $title %></h1>
<br> <!-- reetp This $module should be split ijto two lines -->
<%= $modul %> <%= $modul %>
<% my $btn = l('SAVE'); %>
<br><br> <br><br>
<form action="/smanager/clamav" method="POST"> <form action="/smanager/clamav" method="POST">
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
<div class="col-auto"> <div class="col-md-2">
<h6><%= l 'clm_LABEL_FILESYSTEM_SCAN_PERIOD' %>:</h6> <%= l 'clm_LABEL_FILESYSTEM_SCAN_PERIOD' %>:
</div>
<div class="col-md-2">
% param 'FilesystemScan' => $clm_datas->{FilesystemScan} unless param 'FilesystemScan'; % param 'FilesystemScan' => $clm_datas->{FilesystemScan} unless param 'FilesystemScan';
<%= select_field 'FilesystemScan' => [[ (l 'clm_DAILY') => 'daily'], [ (l 'clm_NEVER') => 'disabled'], [ (l 'clm_WEEKLY') => 'weekly']], class => "form-select" %> <%= select_field 'FilesystemScan' => [[ (l 'clm_DAILY') => 'daily'], [ (l 'clm_NEVER') => 'disabled'], [ (l 'clm_WEEKLY') => 'weekly']], class => "form-select" %>
</div> </div>
</div> </div>
<br> <br>
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
<br> <div class="col-md-2">
<div class="col-auto"> <%= l 'clm_LABEL_QUARANTINE' %>:
<h6><%= l 'clm_LABEL_QUARANTINE' %>:</h6> </div>
<div class="col-md-2">
% param 'Quarantine' => $clm_datas->{Quarantine} unless param 'Quarantine'; % param 'Quarantine' => $clm_datas->{Quarantine} unless param 'Quarantine';
<%= select_field 'Quarantine' => [[ (l 'ENABLED') => 'enabled'], [ (l 'DISABLED') => 'disabled']], class => "form-select" %> <%= select_field 'Quarantine' => [[ (l 'ENABLED') => 'enabled'], [ (l 'DISABLED') => 'disabled']], class => "form-select" %>
</div>
</div>
<br> <br>
</div>
</div>
<div> <div>
<div> <div>
@ -47,7 +52,11 @@
<%= $clm_datas->{clam_versions} %> <%= $clm_datas->{clam_versions} %>
</div> </div>
</div> </div>
<br> <br>
<% my $btn = l('SAVE'); %>
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
<div class="col-md-2"> <div class="col-md-2">
<button type="submit" class="btn btn-primary"><%= $btn %></button> <button type="submit" class="btn btn-primary"><%= $btn %></button>

View File

@ -5,7 +5,6 @@
<form action="/smanager/ibaysd" method="POST"> <form action="/smanager/ibaysd" method="POST">
<div> <div>
<h2><%=l 'iba_ADD_TITLE' %></h2> <h2><%=l 'iba_ADD_TITLE' %></h2>
</div> </div>
@ -50,7 +49,6 @@
<div class="col-md-2"> <div class="col-md-2">
<%= l 'GROUP' %> <%= l 'GROUP' %>
</div> </div>
<div class="col-auto"> <div class="col-auto">
% param 'group' => $iba_datas->{group} unless param 'group'; % param 'group' => $iba_datas->{group} unless param 'group';
%= select_field 'group' => $c->group_list_m(), class => "form-select" %= select_field 'group' => $c->group_list_m(), class => "form-select"
@ -63,7 +61,6 @@
<div class="col-md-2"> <div class="col-md-2">
<%= l 'iba_USER_ACCESS' %> <%= l 'iba_USER_ACCESS' %>
</div> </div>
<div class="col-auto"> <div class="col-auto">
% param 'userAccess' => $iba_datas->{userAccess} unless param 'userAccess'; % param 'userAccess' => $iba_datas->{userAccess} unless param 'userAccess';
%= select_field 'userAccess' => $c->userAccess_list_m(), class => "form-select" %= select_field 'userAccess' => $c->userAccess_list_m(), class => "form-select"
@ -76,7 +73,6 @@
<div class="col-md-2"> <div class="col-md-2">
%=l 'iba_PUBLIC_ACCESS' %=l 'iba_PUBLIC_ACCESS'
</div> </div>
<div class="col-auto"> <div class="col-auto">
% param 'publicAccess' => $iba_datas->{publicAccess} unless param 'publicAccess'; % param 'publicAccess' => $iba_datas->{publicAccess} unless param 'publicAccess';
%= select_field 'publicAccess' => $c->publicAccess_list_m(), class => "form-select" %= select_field 'publicAccess' => $c->publicAccess_list_m(), class => "form-select"
@ -89,7 +85,6 @@
<div class="col-md-2"> <div class="col-md-2">
<%=l 'iba_ALLOW_DYNAMIC_CONTENT' %> <%=l 'iba_ALLOW_DYNAMIC_CONTENT' %>
</div> </div>
<div class="col-auto"> <div class="col-auto">
% param 'CgiBin' => $iba_datas->{CgiBin} unless param 'CgiBin'; % param 'CgiBin' => $iba_datas->{CgiBin} unless param 'CgiBin';
%= select_field 'CgiBin' => [[ (l 'DISABLED') => 'disabled'], [ (l 'ENABLED') => 'enabled']], class => "form-select" %= select_field 'CgiBin' => [[ (l 'DISABLED') => 'disabled'], [ (l 'ENABLED') => 'enabled']], class => "form-select"
@ -102,7 +97,6 @@
<div class="col-md-2"> <div class="col-md-2">
<%=l 'iba_HTTPS_Only' %> <%=l 'iba_HTTPS_Only' %>
</div> </div>
<div class="col-auto"> <div class="col-auto">
% param 'SSL' => $iba_datas->{SSL} unless param 'SSL'; % param 'SSL' => $iba_datas->{SSL} unless param 'SSL';
%= select_field 'SSL' => [[ (l 'DISABLED') => 'disabled'], [ (l 'ENABLED') => 'enabled']], class => "form-select" %= select_field 'SSL' => [[ (l 'DISABLED') => 'disabled'], [ (l 'ENABLED') => 'enabled']], class => "form-select"

View File

@ -1,5 +1,4 @@
<div> <div>
% my $btn = l('ln_LOCALNETWORK_ADD');
<form action="/smanager/localnetworksa" method="POST"> <form action="/smanager/localnetworksa" method="POST">
@ -10,20 +9,20 @@
% unless (length($retref)) {%ret = (ret=>"");} % unless (length($retref)) {%ret = (ret=>"");}
% else {%ret = %$retref;} % else {%ret = %$retref;}
% if (config->{debug} == 1) { <!-- So at this point the next section is only relevant it ret is not defined -->
<div>
%= dumper "Ret:".$ret{ret};
</div>
% }
%# my $element_count = scalar(@ret);
%# if (length $element_count == 0) {
% my @vars = split(",",$ret{vars}); % my @vars = split(",",$ret{vars});
% my $var1 = @vars[0]; % my $var1 = $vars[0];
% my $var2 = @vars[1]; % my $var2 = $vars[1];
% my $var3 = @vars[2]; % my $var3 = $vars[2];
% my $var4 = @vars[3]; % my $var4 = $vars[3];
% my $var5 = @vars[4]; % my $var5 = $vars[4];
% my $var6 = @vars[5]; % my $var6 = $vars[5];
% my $var7 = @vars[6]; % my $var7 = $vars[6];
%# }
%if ($ret{ret} eq "") { %if ($ret{ret} eq "") {
<%= l "ln_FIRSTPAGE_DESC" %> <%= l "ln_FIRSTPAGE_DESC" %>
@ -42,15 +41,16 @@
<br><br> <br><br>
% my $btn = l('ln_LOCALNETWORK_ADD');
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
<div class="col-md-2"> <div class="col-md-2">
<button type="submit" class="btn btn-primary"><%= $btn %></button> <button type="submit" class="btn btn-primary"><%= $btn %></button>
</div> </div>
</div> </div>
</form>
<br> <br>
% my $numlocalnetworks = @$localnetworks; % my $numlocalnetworks = @$localnetworks;
% if ($numlocalnetworks == 0) { % if ($numlocalnetworks == 0) {
<%= l 'ln_LOCAL_NETWORK_NONE' %> <%= l 'ln_LOCAL_NETWORK_NONE' %>
@ -97,4 +97,6 @@
</table> </table>
<%= hidden_field 'trt' => $ln_datas->{trt} %> <%= hidden_field 'trt' => $ln_datas->{trt} %>
% } % }
</form>
</div> </div>

View File

@ -5,64 +5,69 @@
<div class="card-body"> <div class="card-body">
% if (config->{debug} == 1) { % if (config->{debug} == 1) {
<p> <pre>
%= dumper $c->current_route <%= dumper $c->current_route %>
%= dumper $rma_datas <%= dumper $rma_datas %>
</p> </pre>
% } % }
<h1><%= $title%></h1> <h1><%= $title%></h1>
% if ( $notif ) { % if ( $notif ) {
<br> <br>
<span class=""> <div>
<%= $c->render_to_string(inline => $notif) %> <%= $c->render_to_string(inline => $notif) %>
</span> </div>
%} %}
<!--<hr class="" />--> <!--<hr class="" />-->
<% my $btn = l('SAVE'); %> <% my $btn = l('SAVE'); %>
%= form_for 'remoteaccess' => (method => 'POST') => begin
<form action="/smanager/remoteaccess" method="POST">
% my $ipsec = $c->get_ipsecrw_status(); % my $ipsec = $c->get_ipsecrw_status();
% if ( $ipsec ) { % if ( $ipsec ) {
<p>
<h2>
%=l 'rma_TITLE_IPSECRW'
</h2><br>
%=l 'rma_DESC_IPSECRW' <h2><%= l 'rma_TITLE_IPSECRW' %></h2>
<br> <div>
<%= l 'rma_DESC_IPSECRW' %>
<span class=""> </div>
%=l 'rma_LABEL_IPSECRW_SESS' <div>
</span> <%= l 'rma_LABEL_IPSECRW_SESS' %>
<span class=""> </div>
<div>
% param 'IpsecrwSess' => $c->get_ipsecrw_sessions unless param 'IpsecrwSess'; % param 'IpsecrwSess' => $c->get_ipsecrw_sessions unless param 'IpsecrwSess';
%= text_field 'IpsecrwSess', class => "" <%= text_field 'IpsecrwSess', class => "" %>
</span> </div>
<br> <br>
%= $c->render_to_string(inline => $c->l('rma_DESC_IPSECRW_RESET')); <div>
<%= $c->render_to_string(inline => $c->l('rma_DESC_IPSECRW_RESET')); %>
</div>
<br> <br>
<span class=""> <div>
%=l 'rma_LABEL_IPSECRW_RESET' <%= l 'rma_LABEL_IPSECRW_RESET' %>
</span> </div>
<span class=""> <div>
%= check_box 'IpsecrwReset',class => "" <%= check_box 'IpsecrwReset',class => "" %>
</span> </div>
<br><br> <br><br>
<!--<hr class="" />--> <!--<hr class="" />-->
%} %}
<!-- percequ include 'partials/_rma_pptp' --> <!-- percequ include 'partials/_rma_pptp' -->
<h2> <h2><%= $c->l('rma_VALIDFROM_TITLE', $c->l('rma_REMOTE_MANAGEMENT')); %></h2>
%= $c->l('rma_VALIDFROM_TITLE', $c->l('rma_REMOTE_MANAGEMENT'));
</h2><br> <br>
%=l 'rma_VALIDFROM_DESC'
<div>
<%= l 'rma_VALIDFROM_DESC' %>
</div>
<br><br> <br><br>
% my @vals = $self->_get_valid_from(); % my @vals = $self->_get_valid_from();
@ -70,29 +75,23 @@
<table class="table table-bordered"> <table class="table table-bordered">
<thead> <thead>
<tr> <tr>
<th class=""> <th><%= l 'NETWORK' %></th>
%=l 'NETWORK' <th><%= l 'rma_SUBNET_MASK' %></th>
</th><th class=""> <th><%= l 'rma_NUM_OF_HOSTS' %></th>
%=l 'SUBNET_MASK' <th><%= l 'REMOVE' %></th>
</th><th class="">
%=l 'NUM_OF_HOSTS'
</th><th class="">
%=l 'REMOVE'
</th>
</tr> </tr>
</thead> </thead>
</tbody> <tbody>
% foreach my $val ( @vals ) % foreach my $val ( @vals ) {
% {
% my ($net, $mask) = split '/', $val; % my ($net, $mask) = split '/', $val;
% $mask = '255.255.255.255' unless ($mask); % $mask = '255.255.255.255' unless ($mask);
% my ($numhosts,$a,$b) = esmith::util::computeHostRange($net,$mask); % my ($numhosts,$a,$b) = esmith::util::computeHostRange($net,$mask);
<tr> <tr>
%= t td => (class => "") => $net <td><%= $net %></td>
%= t td => (class => "") => $mask <td><%= $mask %></td>
%= t td => (class => "") => $numhosts <td><%= $numhosts %></td>
<td class=""> <td>
<input type='checkbox' name='Remove_nets' value='<%= $net.'/'.$mask %>'> <input type='checkbox' name='Remove_nets' value='<%= $net.'/'.$mask %>'>
</td> </td>
</tr> </tr>
@ -106,126 +105,172 @@
foreach my $val (@vals) foreach my $val (@vals)
{ esmith::cgi::genSmallCell($q, shift(@cbGroup), } --> { esmith::cgi::genSmallCell($q, shift(@cbGroup), } -->
% } else { % } else {
<br><b> <br>
%= l('rma_NO_ENTRIES_YET'); <b><%= l('rma_NO_ENTRIES_YET'); %></b>
</b>
% } % }
%=l 'rma_DESC_VALID_FROM_ENTRIES'
<%= l 'rma_DESC_VALID_FROM_ENTRIES' %>
<br><br> <br><br>
<span class="">
%=l 'NETWORK' <div class="row g-3 align-items-center">
</span> <div class="col-md-2">
<span class=""> <%= l 'NETWORK' %>
%= text_field 'ValidFromNetwork', class => "" </div>
</span> <div class="col-auto">
<%= text_field 'ValidFromNetwork', class => "" %>
</div>
</div>
<br> <br>
<span class="">
%=l 'rma_SUBNET_MASK' <div class="row g-3 align-items-center">
</span> <div class="col-md-2">
<span class=""> <%= l 'rma_SUBNET_MASK' %>
%= text_field 'ValidFromMask', class => "" </div>
</span> <div class="col-auto">
<%= text_field 'ValidFromMask', class => "" %>
</div>
</div>
<!--<hr class="" />--> <!--<hr class="" />-->
<h2> <h2><%= l 'rma_TITLE_SSH' %></h2>
%=l 'rma_TITLE_SSH'
</h2><br> <br>
%=l 'rma_DESC_SSH'
<div>
<%= l 'rma_DESC_SSH' %>
</div>
<br><br> <br><br>
<span class="">
%=l 'rma_LABEL_SSH' <div class="row g-3 align-items-center">
</span> <div class="col-md-2">
<span class=""> <%= l 'rma_LABEL_SSH' %>
</div>
<div class="col-md-2">
% param 'SshAccess' => $c->get_ssh_access() unless param 'SshAccess'; % param 'SshAccess' => $c->get_ssh_access() unless param 'SshAccess';
%= select_field 'SshAccess' => $c->networkAccess_list(), class => "" <%= select_field 'SshAccess' => $c->networkAccess_list(), class => "form-select" %>
</span> </div>
</div>
<br> <br>
<span class=""> <div class="row g-3 align-items-center">
%=l 'rma_LABEL_SSH_ADMIN' <div class="col-md-2">
</span> <%= l 'rma_LABEL_SSH_ADMIN' %>
<span class=""> </div>
<div class="col-auto">
% param 'SshPermitRootLogin' => $rma_datas->{sshPermitRootLogin} unless param 'SshPermitRootLogin'; % param 'SshPermitRootLogin' => $rma_datas->{sshPermitRootLogin} unless param 'SshPermitRootLogin';
%= select_field 'SshPermitRootLogin' => [[(l 'NO'), 'no'], [(l 'YES'), 'yes']], class => "" <%= select_field 'SshPermitRootLogin' => [[(l 'NO'), 'no'], [(l 'YES'), 'yes']], class => "form-select" %>
</span> </div>
</div>
<br> <br>
<span class=""> <div class="row g-3 align-items-center">
%=l 'rma_LABEL_SSH_PASSWORD_ACCESS' <div class="col-md-2">
</span> <%= l 'rma_LABEL_SSH_PASSWORD_ACCESS' %>
<span class=""> </div>
<div class="col-auto">
% param 'SshPasswordAuthentication' => $c->get_ssh_password_auth() unless param 'SshPasswordAuthentication'; % param 'SshPasswordAuthentication' => $c->get_ssh_password_auth() unless param 'SshPasswordAuthentication';
%= select_field 'SshPasswordAuthentication' => [[(l 'NO'), 'no'], [(l 'YES'), 'yes']], class => "" <%= select_field 'SshPasswordAuthentication' => [[(l 'NO'), 'no'], [(l 'YES'), 'yes']], class => "form-select" %>
</span> </div>
</div>
<br> <br>
<span class=""> <div class="row g-3 align-items-center">
%=l 'rma_LABEL_SSH_PORT' <div class="col-md-2">
</span> <%= l 'rma_LABEL_SSH_PORT' %>
<span class=""> </div>
<div class="col-auto">
% param 'SshTCPPort' => $c->get_ssh_port() unless param 'SshTCPPort'; % param 'SshTCPPort' => $c->get_ssh_port() unless param 'SshTCPPort';
%= text_field 'SshTCPPort', class => "" <%= text_field 'SshTCPPort' %>
</span> </div>
</div>
<br> <br>
<!--<hr class="" />--> <!--<hr class="" />-->
<h2> <h2><%= l 'rma_TITLE_FTP_ACCESS' %></h2>
%=l 'rma_TITLE_FTP_ACCESS' <br>
</h2><br> <div>
%= $c->render_to_string(inline => $c->l('rma_DESC_FTP_ACCESS')); <%= $c->render_to_string(inline => $c->l('rma_DESC_FTP_ACCESS')); %>
</div>
<br> <br>
<span class="">
%=l 'rma_LABEL_FTP_ACCESS' <div class="row g-3 align-items-center">
</span> <div class="col-md-2">
<span class=""> <%= l 'rma_LABEL_FTP_ACCESS' %>
</div>
<div class="col-auto">
% param 'FtpAccess' => $c->get_ftp_access() unless param 'FtpAccess'; % param 'FtpAccess' => $c->get_ftp_access() unless param 'FtpAccess';
%= select_field 'FtpAccess' => $c->networkAccess_list(), class => "" <%= select_field 'FtpAccess' => $c->networkAccess_list(), class => "form-select" %>
</span> </div>
<br> </div>
<br> <br>
%= $c->render_to_string(inline => $c->l('rma_DESC_FTP_LOGIN'));
<br> <br>
<span class="">
%=l 'rma_LABEL_FTP_LOGIN' <div>
</span> <%= $c->render_to_string(inline => $c->l('rma_DESC_FTP_LOGIN')); %>
<span class=""> </div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-2">
<%= l 'rma_LABEL_FTP_LOGIN' %>
</div>
<div class="col-auto">
% param 'FtpPasswordAccess' => $c->get_ftp_password_login_access() unless param 'FtpPasswordAccess'; % param 'FtpPasswordAccess' => $c->get_ftp_password_login_access() unless param 'FtpPasswordAccess';
%= select_field 'FtpPasswordAccess' => $c->passwordLogin_list(), class => "" <%= select_field 'FtpPasswordAccess' => $c->passwordLogin_list(), class => "form-select" %>
</span> </div>
<div>
<br> <br>
% my $mode = $c->get_telnet_mode(); % my $mode = $c->get_telnet_mode();
% if ( $mode ne 'off') { % if ( $mode ne 'off') {
<!--<hr class="" />--> <!--<hr class="" />-->
<h2> <h2><%= l 'rma_TITLE_TELNET_ACCESS' %></h2>
%=l 'rma_TITLE_TELNET_ACCESS'
</h2><br> <br>
<div class="row g-3 align-items-center">
<div class="col-md-2">
<%= l 'rma_DESC_TELNET_ACCESS' %>
</div>
<div>
<span class="">
%=l 'rma_DESC_TELNET_ACCESS'
</span>
<br><br> <br><br>
<span class=""> <div class="row g-3 align-items-center">
%=l 'rma_LABEL_TELNET_ACCESS' <div class="col-md-2">
</span> <%= l 'rma_LABEL_TELNET_ACCESS' %>
<span class=""> </div>
<div class="col-auto">
% param 'TelnetAccess' => $mode unless param 'TelnetAccess'; % param 'TelnetAccess' => $mode unless param 'TelnetAccess';
%= select_field 'TelnetAccess' => $c->networkAccess_list(), class => "" <%= select_field 'TelnetAccess' => $c->networkAccess_list(), class => "form-select" %>
</span> </div>
</div>
<br> <br>
% } % }
<br> <br>
%= submit_button "$btn", class => ""
% end <div class="row g-3 align-items-center">
<div class="col-md-2">
<button type="submit" class="btn btn-primary"><%= $btn %></button>
</div>
</div>
</div> </div>