Compare commits

...

5 Commits

Author SHA1 Message Date
John Crisp
1baec827d3 11.0.0-38.sme More formatting 2025-06-13 19:55:48 +02:00
John Crisp
2d6deb9b37 More formatting with PortForwards 2025-06-13 19:54:20 +02:00
John Crisp
f547a5300d More formatting with LocalNetworks 2025-06-13 19:49:28 +02:00
John Crisp
5f90b6573f Finish PortForwarding 11.0.0-37.sme 2025-06-13 18:09:57 +02:00
John Crisp
a2c75d9a29 Finish PortForwarding 11.0.0-37.sme 2025-06-13 18:06:17 +02:00
7 changed files with 202 additions and 165 deletions

View File

@@ -13,24 +13,23 @@
% } % }
% if ($ret{ret} eq "") { % if ($ret{ret} eq "") {
<br> <div>
<%= l "ln_FIRSTPAGE_DESC" %> <%= l "ln_FIRSTPAGE_DESC" %>
<BR> </div>
% } elsif (index($ret{ret},"SUCCESS") != -1) { % } elsif (index($ret{ret},"SUCCESS") != -1) {
<div class=""> <div>
<h2> Operation Status Report</h2> <!-- <h2> Operation Status Report</h2> -->
<%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> <%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
</div> </div>
% } else { % } else {
<div class=""> <div class="text-danger">
<h2> Operation Status Report - Error</h2> <!-- <h2> Operation Status Report - Error</h2> -->
<%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> <%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
</div> </div>
% } % }
<br> <br>
% my $btn = l('ADD');
% my $network_db = esmith::NetworksDB::UTF8->open() || die "Couldn't open NetworksDB db"; % my $network_db = esmith::NetworksDB::UTF8->open() || die "Couldn't open NetworksDB db";
% if (config->{debug} == 1) { % if (config->{debug} == 1) {
@@ -84,11 +83,14 @@
<br><br> <br><br>
% my $btn = l('ADD');
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
<div class="col-md-1"> <div class="col-md-1">
<button type="submit" class="btn btn-primary"><%= $btn %></button> <button type="submit" class="btn btn-primary"><%= $btn %></button>
</div> </div>
</div> </div>
</form> </form>
</div> </div>

View File

@@ -6,12 +6,12 @@
% my $router = $ln_datas->{router}; % my $router = $ln_datas->{router};
% if (config->{debug} == 1) { % if (config->{debug} == 1) {
<div> <pre>
<%= dumper $c->current_route %> <%= dumper $c->current_route %>
<%= dumper $c->stash("ret") %> <%= dumper $c->stash("ret") %>
<%= dumper %$ln_datas %> <%= dumper %$ln_datas %>
<%= dumper $deletehosts %> <%= dumper $deletehosts %>
</div> </pre>
% } % }
<form action="/smanager/localnetworkse" method="POST"> <form action="/smanager/localnetworkse" method="POST">
@@ -62,28 +62,24 @@
% if ($deletehosts) { % if ($deletehosts) {
<br> <br>
<b>tell me if you find this!</b> <div>
<b>Please opoen a bug and tell me</b>
<%= $c->l("ln_REMOVE_HOSTS_DESC") %> <%= $c->l("ln_REMOVE_HOSTS_DESC") %>
</div>
<br> <br>
<span class=""> <div class="text-danger align-bottom">
<%= $c->l("ln_REMOVE_HOSTS_LABEL") %> <%= $c->l("ln_REMOVE_HOSTS_LABEL") %>&nbsp&nbsp<input type="checkbox" name="deletehost">
</span> </div>
<span class="">
<%= check_box deletehost=>1, checked=>1 %>
</span>
<br><br> <br><br>
% } % }
<%= hidden_field localnetwork=>$localnetwork %>
<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>
<%= hidden_field localnetwork=>$localnetwork %>
</form> </form>
</div> </div>

View File

@@ -1,95 +1,122 @@
<div> <div>
% my $retref= $c->stash("ret"); % my $retref = $c->stash("ret");
% my %ret; % my %ret = $retref ? %$retref : (ret => "");
% unless (length($retref)) {%ret = (ret=>"");} % my @vars = split(/,/, $ret{vars} // '');
% else {%ret = %$retref;} % my ($var1, $var2, $var3, $var4, $var5, $var6, $var7) = @vars;
% my @vars = split(",",$ret{vars});
% my $var1 = @vars[0];
% my $var2 = @vars[1];
% my $var3 = @vars[2];
% my $var4 = @vars[3];
% my $var5 = @vars[4];
% my $var6 = @vars[5];
<br> <br>
%if ($ret{'ret'} eq "") {
%} elsif (index($ret{ret},"SUCCESS") != -1) {
<div class="">
<!--<h2> Operation Status Report</h2>-->
%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6);
</div>
%} else {
<div class="">
<!--<h2> Operation Status Report - Error</h2>-->
%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6);
</div>
%}
<br />
% my $btn = l('ADD');
% if (config->{debug} == 1) { % if (config->{debug} == 1) {
<p> <pre>
%= dumper $c->current_route <%= dumper $c->current_route %>
%= dumper $c->stash("ret") <%= dumper $c->stash("ret") %>
</p> </pre>
% } % }
%= form_for '/portforwardingb' => (method => 'POST') => begin % if ($ret{'ret'} eq "") {
<h2> <div>
%=l "pf_CREATE_RULE" <%= $c->render_to_string(inline => l('pf_FIRST_PAGE_DESCRIPTION')); %>
</h2> </div>
<p> % } elsif (index($ret{ret},"SUCCESS") != -1) {
%=l "pf_SUMMARY_ADD_DESC" <div>
</p><br> <!--<h2> Operation Status Report</h2>-->
<span class=""> <%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
%=l "pf_LABEL_PROTOCOL" </div>
</span> % } else {
<span class=""> <div class="text-danger">
%=select_field 'proto'=>["TCP","UDP"] <!--<h2> Operation Status Report - Error</h2>-->
</span><br><br> <%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
<span class=""> </div>
%=l "pf_LABEL_SOURCE_PORT" % }
</span>
<span class="">
%=text_field 'sport'
</span>
<br><br>
<span class="">
%=l "pf_LABEL_DESTINATION_PORT"
</span>
<span class="">
%=text_field 'dport'
</span>
<br><br>
<span class="">
%=l "pf_LABEL_DESTINATION_HOST"
</span>
<span class="">
%=text_field 'dhost'
</span>
<br><br>
<span class="">
%=l "pf_ALLOW_HOSTS"
</span>
<span class="">
%=text_field 'allow'
</span>
<br><br>
<span class="">
%=l "pf_RULE_COMMENT"
</span>
<span class="">
%=text_field 'cmmnt'
</span>
<br><br>
<p>
<br>
%= submit_button "$btn", class => ""
</p>
%end <br>
<h2><%= l "pf_CREATE_RULE" %></h2>
<form action="/smanager/portforwardingb" method="POST">
<br>
<div>
<%= l "pf_SUMMARY_ADD_DESC" %>
</div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-1">
<%= l "pf_LABEL_PROTOCOL" %>
</div>
<div class="col-auto">
<%=select_field 'proto'=>["TCP","UDP"], class => "form-select" %>
</div>
</div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-1">
<label for="inputSourcePort" class="col-form-label"><%= l "pf_LABEL_SOURCE_PORT" %></label>
</div>
<div class="col-auto">
<input type="text" name="sport" id="inputSourcePort" class="form-control" aria-describedby="Source Port">
</div>
</div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-1">
<label for="inputDestinationPort" class="col-form-label"><%= l "pf_LABEL_DESTINATION_PORT" %></label>
</div>
<div class="col-auto">
<input type="text" name="port" id="inputDestinationPort" class="form-control" aria-describedby="Destination Port">
</div>
</div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-1">
<label for="inputDestinationHost" class="col-form-label"><%= l "pf_LABEL_DESTINATION_HOST" %></label>
</div>
<div class="col-auto">
<input type="text" name="dhost" id="inputDestinationHost" class="form-control" aria-describedby="Destination Host">
</div>
</div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-1">
<label for="inputAllowHosts" class="col-form-label"><%= l "pf_ALLOW_HOSTS" %></label>
</div>
<div class="col-auto">
<input type="text" name="allow" id="inputAllowHosts" class="form-control" aria-describedby="Allow Hosts">
</div>
</div>
<br>
<div class="row g-3 align-items-center">
<div class="col-md-1">
<label for="inputRuleComment" class="col-form-label"><%= l "pf_RULE_COMMENT" %></label>
</div>
<div class="col-auto">
<input type="text" name="cmmnt" id="inputRuleComment" class="form-control" aria-describedby="Comment">
</div>
</div>
<br>
% my $btn = l('ADD');
<div class="row g-3 align-items-center">
<div class="col-md-1">
<button type="submit" class="btn btn-primary"><%= $btn %></button>
</div>
</div>
</form>
</div> </div>

View File

@@ -1,6 +1,5 @@
<div> <div>
% my $btn = l('REMOVE');
% my $proto = $pf_datas->{proto}; % my $proto = $pf_datas->{proto};
% my $sport = $pf_datas->{sport}; % my $sport = $pf_datas->{sport};
% my $dport = $pf_datas->{dport}; % my $dport = $pf_datas->{dport};
@@ -8,7 +7,7 @@
% my $cmmnt = $pf_datas->{cmmnt}; % my $cmmnt = $pf_datas->{cmmnt};
% my $allow = $pf_datas->{allow}; % my $allow = $pf_datas->{allow};
% if (config->{debug} == 0) { % if (config->{debug} == 1) {
<pre> <pre>
<%= dumper $c->current_route %> <%= dumper $c->current_route %>
<%= dumper $c->stash("ret") %> <%= dumper $c->stash("ret") %>
@@ -23,11 +22,17 @@
<%= l 'pf_SUMMARY_REMOVE_DESC' %> <%= l 'pf_SUMMARY_REMOVE_DESC' %>
</div> </div>
<br>
<table> <table>
<thead>
<th class="col-md-4">&nbsp</th>
<th class="col-md-4">&nbsp</th>
</thead>
<tbody> <tbody>
<tr> <tr >
<td> <td>
<% l 'pf_LABEL_PROTOCOL' %> <%= l 'pf_LABEL_PROTOCOL' %>
</td> </td>
<td> <td>
<%= $proto %> <%= $proto %>
@@ -35,7 +40,7 @@
</tr> </tr>
<tr> <tr>
<td> <td>
<% l 'pf_LABEL_SOURCE_PORT' %> <%= l 'pf_LABEL_SOURCE_PORT' %>
</td> </td>
<td> <td>
<%= $sport %> <%= $sport %>
@@ -43,7 +48,7 @@
<tr> <tr>
<tr> <tr>
<td> <td>
<% l 'pf_LABEL_DESTINATION_HOST' %> <%= l 'pf_LABEL_DESTINATION_HOST' %>
</td> </td>
<td> <td>
<%= $dport %> <%= $dport %>
@@ -51,7 +56,7 @@
</tr> </tr>
<tr> <tr>
<td> <td>
<% l 'pf_LABEL_DESTINATION_PORT' %> <%= l 'pf_LABEL_DESTINATION_PORT' %>
</td> </td>
<td> <td>
<%= $dhost %> <%= $dhost %>
@@ -59,7 +64,7 @@
</tr> </tr>
<tr> <tr>
<td> <td>
<% l 'pf_RULE_COMMENT' %> <%= l 'pf_RULE_COMMENT' %>
</td> </td>
<td> <td>
<%= $cmmnt %> <%= $cmmnt %>
@@ -67,7 +72,7 @@
</tr> </tr>
<tr> <tr>
<td> <td>
<% l 'pf_ALLOW_HOSTS' %> <%= l 'pf_ALLOW_HOSTS' %>
</td> </td>
<td> <td>
<%= $allow %> <%= $allow %>
@@ -76,9 +81,13 @@
</tbody> </tbody>
</table> </table>
<br>
<%= hidden_field sport=>$sport %> <%= hidden_field sport=>$sport %>
<%= hidden_field proto=>$proto %> <%= hidden_field proto=>$proto %>
% my $btn = l('REMOVE');
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
<div class="col-md-1"> <div class="col-md-1">
<button type="submit" class="btn btn-primary"><%= $btn %></button> <button type="submit" class="btn btn-primary"><%= $btn %></button>

View File

@@ -1,45 +1,41 @@
<div> <div>
% my $retref = $c->stash("ret");
% my %ret = $retref ? %$retref : (ret => "");
<form action="/smanager/portforwardinga" method="POST"> % my @vars = split(/,/, $ret{vars} // '');
% my ($var1, $var2, $var3, $var4, $var5, $var6, $var7) = @vars;
<br>
% my $retref= $c->stash("ret");
% my %ret;
% unless (length($retref)) {%ret = (ret=>"");}
% else {%ret = %$retref;}
% my $numtcpforwards = @$tcpforwards; % my $numtcpforwards = @$tcpforwards;
% my $numudpforwards = @$udpforwards; % my $numudpforwards = @$udpforwards;
% my @vars = split(",",$ret{vars}); % if ($c->app->config->{debug}) {
% my $var1 = @vars[0]; <pre>
% my $var2 = @vars[1]; <%= dumper { ret_data => \%ret } %>
% my $var3 = @vars[2]; </pre>
% my $var4 = @vars[3]; % }
% my $var5 = @vars[4];
% my $var6 = @vars[5];
% if ($ret{ret} eq "") { % if ($ret{ret} eq "") {
<div>
<%= $c->render_to_string(inline => l('pf_FIRST_PAGE_DESCRIPTION')); %> <%= $c->render_to_string(inline => l('pf_FIRST_PAGE_DESCRIPTION')); %>
</div>
% } elsif (index($ret{ret},"SUCCESS") != -1) { % } elsif (index($ret{ret},"SUCCESS") != -1) {
<br>
<div> <div>
<h2> Operation Status Report</h2> <h2> Operation Status Report</h2>
<%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> <%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
</div> </div>
% } else { % } else {
<br> <br>
<div class="text-danger"> <div class="text-danger">
<h2> Operation Status Report - Error</h2> <h2> Operation Status Report - Error</h2>
<%= $c->l($ret{ret},$var1,$var2,$var3,$var4,$var5,$var6); %> <%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
</div> </div>
% } % }
<br> <br>
<form action="/smanager/portforwardinga" method="POST">
% my $btn = l('pf_CREATE_RULE'); % my $btn = l('pf_CREATE_RULE');
<div class="row g-3 align-items-center"> <div class="row g-3 align-items-center">
@@ -50,9 +46,9 @@
</form> </form>
<br>
% if ($empty) {
% if ($empty){
<br> <br>
<%= l 'pf_NO_FORWARDS' %> <%= l 'pf_NO_FORWARDS' %>
% } else { % } else {

View File

@@ -9,7 +9,7 @@
<%= dumper "<pf>".$c->current_route %> <%= dumper "<pf>".$c->current_route %>
<%= dumper $c->stash("ret") %> <%= dumper $c->stash("ret") %>
<%= dumper $c->stash("portforwarding") %> <%= dumper $c->stash("portforwarding") %>
% my $ref = $pf_datas->{portforwarding}; %> % my $ref = $pf_datas->{portforwarding};
<%= dumper $ref->{TCP}->[0]."</pf>" %> <%= dumper $ref->{TCP}->[0]."</pf>" %>
</pre> </pre>
% } % }

View File

@@ -1,6 +1,6 @@
%define name smeserver-manager-AdminLTE %define name smeserver-manager-AdminLTE
%define version 11.0.0 %define version 11.0.0
%define release 36 %define release 38
Summary: AdminLTE is an html framework for admin consoles - this rpm adds it to smeserver manager2 Summary: AdminLTE is an html framework for admin consoles - this rpm adds it to smeserver manager2
Name: %{name} Name: %{name}
Version: %{version} Version: %{version}
@@ -16,7 +16,7 @@ BuildArchitectures: noarch
BuildRoot: /var/tmp/%{name}-%{version}-%{release}-buildroot BuildRoot: /var/tmp/%{name}-%{version}-%{release}-buildroot
BuildRequires: smeserver-devtools BuildRequires: smeserver-devtools
Requires: smeserver-release >= 11.0 Requires: smeserver-release >= 11.0
Requires: smeserver-manager >= 11.0.0 Requires: smeserver-manager >= 11.0.0-91
Requires: smeserver-lib >= 11.0.0-13 Requires: smeserver-lib >= 11.0.0-13
Requires: e-smith-manager >= 2.4.0-22 Requires: e-smith-manager >= 2.4.0-22
@@ -28,6 +28,13 @@ AdminLTE is an html framework for admin consoles
wget https://github.com/ColorlibHQ/AdminLTE/archive/master.zip wget https://github.com/ColorlibHQ/AdminLTE/archive/master.zip
%changelog %changelog
* Fri Jun 13 2025 John Crisp <jcrisp@safeandsoundit.co.uk> 11.0.0-38.sme
- More formatting for LocalNetworks
- More formatting for PortForwards
* Fri Jun 13 2025 John Crisp <jcrisp@safeandsoundit.co.uk> 11.0.0-37.sme
- Finish portforwarding to work with [SME:13043]
* Fri Jun 13 2025 John Crisp <jcrisp@safeandsoundit.co.uk> 11.0.0-36.sme * Fri Jun 13 2025 John Crisp <jcrisp@safeandsoundit.co.uk> 11.0.0-36.sme
- Cosmetic tweaks - Cosmetic tweaks
- Localnetworking fix via [SME: 13041] - Localnetworking fix via [SME: 13041]