Finish PortForwarding 11.0.0-37.sme
This commit is contained in:
John Crisp
parent
76cbe17b34
commit
a2c75d9a29
@ -1,95 +1,118 @@
|
||||
<div>
|
||||
|
||||
% my $retref = $c->stash("ret");
|
||||
% my %ret;
|
||||
% unless (length($retref)) {%ret = (ret=>"");}
|
||||
% else {%ret = %$retref;}
|
||||
|
||||
% 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];
|
||||
% my %ret = $retref ? %$retref : (ret => "");
|
||||
% my @vars = split(/,/, $ret{vars} // '');
|
||||
% my ($var1, $var2, $var3, $var4, $var5, $var6, $var7) = @vars;
|
||||
|
||||
<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);
|
||||
<%= $c->render_to_string(inline => l($ret{ret}, @vars[0..6])) %>
|
||||
</div>
|
||||
% } else {
|
||||
<div class="">
|
||||
<!--<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>
|
||||
% }
|
||||
<br />
|
||||
% my $btn = l('ADD');
|
||||
|
||||
% if (config->{debug} == 1) {
|
||||
<p>
|
||||
%= dumper $c->current_route
|
||||
%= dumper $c->stash("ret")
|
||||
</p>
|
||||
<pre>
|
||||
<%= dumper $c->current_route %>
|
||||
<%= dumper $c->stash("ret") %>
|
||||
</pre>
|
||||
% }
|
||||
|
||||
%= form_for '/portforwardingb' => (method => 'POST') => begin
|
||||
<h2>
|
||||
%=l "pf_CREATE_RULE"
|
||||
</h2>
|
||||
<p>
|
||||
%=l "pf_SUMMARY_ADD_DESC"
|
||||
</p><br>
|
||||
<span class="">
|
||||
%=l "pf_LABEL_PROTOCOL"
|
||||
</span>
|
||||
<span class="">
|
||||
%=select_field 'proto'=>["TCP","UDP"]
|
||||
</span><br><br>
|
||||
<span class="">
|
||||
%=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>
|
||||
<h2><%= l "pf_CREATE_RULE" %></h2>
|
||||
|
||||
%end
|
||||
<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>
|
||||
@ -1,6 +1,5 @@
|
||||
<div>
|
||||
|
||||
% my $btn = l('REMOVE');
|
||||
% my $proto = $pf_datas->{proto};
|
||||
% my $sport = $pf_datas->{sport};
|
||||
% my $dport = $pf_datas->{dport};
|
||||
@ -8,7 +7,7 @@
|
||||
% my $cmmnt = $pf_datas->{cmmnt};
|
||||
% my $allow = $pf_datas->{allow};
|
||||
|
||||
% if (config->{debug} == 0) {
|
||||
% if (config->{debug} == 1) {
|
||||
<pre>
|
||||
<%= dumper $c->current_route %>
|
||||
<%= dumper $c->stash("ret") %>
|
||||
@ -23,11 +22,17 @@
|
||||
<%= l 'pf_SUMMARY_REMOVE_DESC' %>
|
||||
</div>
|
||||
|
||||
<br>
|
||||
|
||||
<table>
|
||||
<thead>
|
||||
<th class="col-md-4"> </th>
|
||||
<th class="col-md-4"> </th>
|
||||
</thead>
|
||||
<tbody>
|
||||
<tr >
|
||||
<td>
|
||||
<% l 'pf_LABEL_PROTOCOL' %>
|
||||
<%= l 'pf_LABEL_PROTOCOL' %>
|
||||
</td>
|
||||
<td>
|
||||
<%= $proto %>
|
||||
@ -35,7 +40,7 @@
|
||||
</tr>
|
||||
<tr>
|
||||
<td>
|
||||
<% l 'pf_LABEL_SOURCE_PORT' %>
|
||||
<%= l 'pf_LABEL_SOURCE_PORT' %>
|
||||
</td>
|
||||
<td>
|
||||
<%= $sport %>
|
||||
@ -43,7 +48,7 @@
|
||||
<tr>
|
||||
<tr>
|
||||
<td>
|
||||
<% l 'pf_LABEL_DESTINATION_HOST' %>
|
||||
<%= l 'pf_LABEL_DESTINATION_HOST' %>
|
||||
</td>
|
||||
<td>
|
||||
<%= $dport %>
|
||||
@ -51,7 +56,7 @@
|
||||
</tr>
|
||||
<tr>
|
||||
<td>
|
||||
<% l 'pf_LABEL_DESTINATION_PORT' %>
|
||||
<%= l 'pf_LABEL_DESTINATION_PORT' %>
|
||||
</td>
|
||||
<td>
|
||||
<%= $dhost %>
|
||||
@ -59,7 +64,7 @@
|
||||
</tr>
|
||||
<tr>
|
||||
<td>
|
||||
<% l 'pf_RULE_COMMENT' %>
|
||||
<%= l 'pf_RULE_COMMENT' %>
|
||||
</td>
|
||||
<td>
|
||||
<%= $cmmnt %>
|
||||
@ -67,7 +72,7 @@
|
||||
</tr>
|
||||
<tr>
|
||||
<td>
|
||||
<% l 'pf_ALLOW_HOSTS' %>
|
||||
<%= l 'pf_ALLOW_HOSTS' %>
|
||||
</td>
|
||||
<td>
|
||||
<%= $allow %>
|
||||
@ -76,9 +81,13 @@
|
||||
</tbody>
|
||||
</table>
|
||||
|
||||
<br>
|
||||
|
||||
<%= hidden_field sport=>$sport %>
|
||||
<%= hidden_field proto=>$proto %>
|
||||
|
||||
% my $btn = l('REMOVE');
|
||||
|
||||
<div class="row g-3 align-items-center">
|
||||
<div class="col-md-1">
|
||||
<button type="submit" class="btn btn-primary"><%= $btn %></button>
|
||||
|
||||
@ -7,34 +7,33 @@
|
||||
<br>
|
||||
|
||||
% my $retref = $c->stash("ret");
|
||||
% my %ret;
|
||||
% unless (length($retref)) {%ret = (ret=>"");}
|
||||
% else {%ret = %$retref;}
|
||||
% my %ret = $retref ? %$retref : (ret => "");
|
||||
% my @vars = split(/,/, $ret{vars} // '');
|
||||
% my ($var1, $var2, $var3, $var4, $var5, $var6, $var7) = @vars;
|
||||
|
||||
% my $numtcpforwards = @$tcpforwards;
|
||||
% my $numudpforwards = @$udpforwards;
|
||||
|
||||
% 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];
|
||||
% if ($c->app->config->{debug}) {
|
||||
<pre>
|
||||
%= dumper { ret_data => \%ret }
|
||||
</pre>
|
||||
% }
|
||||
|
||||
% if ($ret{ret} eq "") {
|
||||
<%= $c->render_to_string(inline => l('pf_FIRST_PAGE_DESCRIPTION')); %>
|
||||
|
||||
% } elsif (index($ret{ret},"SUCCESS") != -1) {
|
||||
<br>
|
||||
<div>
|
||||
<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>
|
||||
% } else {
|
||||
<br>
|
||||
<div class="text-danger">
|
||||
<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>
|
||||
% }
|
||||
|
||||
|
||||
@ -9,7 +9,7 @@
|
||||
<%= dumper "<pf>".$c->current_route %>
|
||||
<%= dumper $c->stash("ret") %>
|
||||
<%= dumper $c->stash("portforwarding") %>
|
||||
% my $ref = $pf_datas->{portforwarding}; %>
|
||||
% my $ref = $pf_datas->{portforwarding};
|
||||
<%= dumper $ref->{TCP}->[0]."</pf>" %>
|
||||
</pre>
|
||||
% }
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user