initial commit of file from CVS for smeserver-wbl on Sat Sep 7 21:14:56 AEST 2024

This commit is contained in:
Trevor Batley
2024-09-07 21:14:56 +10:00
parent d087a82a37
commit 9cbf3c07cd
54 changed files with 6756 additions and 2 deletions

View File

@@ -0,0 +1,50 @@
<div>
% my $btn = l 'SAVE';
%= form_for '/wbl2' => (method => 'POST') => begin
%= hidden_field 'trt' => $wbl_datas->{trt}
<h3>
%=l 'wbl_BLACK_LIST_DESCRIPTION'
</h3>
%=l 'wbl_BLACK_TITLE'
<p>
%=l 'wbl_BADHELO_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_BADHELO_LABEL'
</span><span class=data2>
%= text_area 'Badhelo' => (cols => 40) => begin
% for (@{ $c->get_badhelo() }) {
%= $_
%}
%end
</span></p><br>
<p>
%=l 'wbl_BADMAILFROM_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_BADMAILFROM_LABEL'
</span><span class=data2>
%= text_area 'Badmailfrom' => (cols => 40) => begin
% for (@{ $c->get_badmailfrom() }) {
%= $_
% }
%end
</span></p><br>
<p>
%=l 'wbl_BLACKLISTFROM_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_BLACKLISTFROM_LABEL'
</span><span class=data2>
%= text_area 'Blacklistfrom' => (cols => 40) => begin
% for (@{ $c->get_blacklistfrom() }) {
%= $_
% }
%end
</span></p><br>
%= submit_button "$btn", class => 'action'
%end
</div>

View File

@@ -0,0 +1,24 @@
<div id='wbl_choice'>
% my $btn = l 'NEXT';
%= form_for '/wbl' => (method => 'POST') => begin
<p><span class=label>
%=l 'wbl_RBL_LIST_DESCRIPTION'
</span><br>
<span class=label>
%=l 'wbl_BLACK_LIST_DESCRIPTION'
</span><span class=data>
% param 'list' => $wbl_datas->{list} unless param 'list';
%= select_field 'list' => $c->get_wbllist(), class => 'input'
</span><br>
<span class=label>
%=l 'wbl_WHITE_LIST_DESCRIPTION'
</span></p>
<p><br>
%= submit_button "$btn", class => 'action'
</p>
%end
</div>

View File

@@ -0,0 +1,62 @@
<div>
% my $btn = l 'SAVE';
%= form_for '/wbl2' => (method => 'POST') => begin
%= hidden_field 'trt' => $wbl_datas->{trt}
<!-- # For URLList List
# my @ubllist = get_ubllist();
# $c->stash( ubllist => \@ubllist ); -->
<h3>
%=l 'wbl_RBL_LIST_DESCRIPTION'
</h3><br>
%=l 'wbl_RBL_TITLE'
<p>
%=l 'wbl_DNSBL_DESCRIPTION'
<br><span class=label>
%=l 'wbl_DNSBL_LABEL'
</span><span class=data2>
% param 'Dnsbl' => $wbl_datas->{dnsbl} unless param 'Dnsbl';
%= select_field 'Dnsbl' => [[(l 'ENABLED') => 'enabled'], [(l 'DISABLED') => 'disabled']], class => 'input'
</span></p>
<p>
%=l 'wbl_RBLLIST_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_RBLLIST_LABEL'
</span><span class=data2>
%= text_area 'Rbllist' => (cols => 40) => begin
% for ( @{$c->get_rbllist()} ) {
%= $_
%}
%end
</span></p><br>
<p>
%=l 'wbl_RHSBL_DESCRIPTION'
<br><span class=label>
%=l 'wbl_RHSBL_LABEL'
</span><span class=data2>
% param 'Rhsbl' => $wbl_datas->{rhsbl} unless param 'Rhsbl';
%= select_field 'Rhsbl' => [[(l 'ENABLED') => 'enabled'], [(l 'DISABLED') => 'disabled']], class => 'input'
</span></p>
<p>
%=l 'wbl_SBLLIST_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_SBLLIST_LABEL'
</span><span class=data2>
%= text_area 'Sbllist' => (cols => 40) => begin
% for ( @{$c->get_sbllist()} ) {
%= $_
% }
%end
</span></p><br>
%= submit_button "$btn", class => 'action'
%end
</div>

View File

@@ -0,0 +1,65 @@
<div>
% my $btn = l 'SAVE';
%= form_for '/wbl2' => (method => 'POST') => begin
%= hidden_field 'trt' => $wbl_datas->{trt}
<h3>
%=l 'wbl_WHITE_LIST_DESCRIPTION'
</h3>
%=l 'wbl_WHITE_TITLE'
<p>
%=l 'wbl_WHITELISTHOSTS_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_WHITELISTHOSTS_LABEL'
</span><span class=data2>
%= text_area 'Whitelisthosts' => (cols => 40) => begin
% for (@{ $c->get_whitelisthosts() }) {
%= $_
%}
%end
</span></p><br>
<p>
%=l 'wbl_WHITELISTHELO_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_WHITELISTHELO_LABEL'
</span><span class=data2>
%= text_area 'Whitelisthelo' => (cols => 40) => begin
% for (@{ $c->get_whitelisthelo() }) {
%= $_
% }
%end
</span></p><br>
<p>
%=l 'wbl_WHITELISTSENDERS_DESCRIPTION'
<br><br><span class=label>
%=l 'wbl_WHITELISTSENDERS_LABEL'
</span><span class=data2>
%= text_area 'Whitelistsenders' => (cols => 40) => begin
% for (@{ $c->get_whitelistsenders() }) {
%= $_
% }
%end
</span>
</p>
<br>
<p>
%=l 'wbl_WHITELISTFROM_DESCRIPTION'
<br><br>
<span class=label>
%=l 'wbl_WHITELISTFROM_LABEL'
</span><span class=data2>
%= text_area 'Whitelistfrom' => (cols => 40) => begin
% for (@{ $c->get_whitelistfrom() }) {
%= $_
% }
%end
</span>
</p>
<br>
%= submit_button "$btn", class => 'action'
%end
</div>

View File

@@ -0,0 +1,33 @@
% layout 'default', title => "Sme server 2 - wbl", share_dir => '';
% content_for 'module' => begin
<div id="module" class="module wbl-panel">
%if ($config->{debug} == 1) {
<p>
%= dumper $c->current_route
%= dumper $wbl_datas
</p>
%}
<h1><%= $title %></h1>
<br>
%= l('wbl_WBL_DESCRIPTION')
<br>
% if ($wbl_datas->{trt} eq 'RBL') {
%= include 'partials/_wbl_rbl'
%} elsif ($wbl_datas->{trt} eq 'BLACK') {
%= include 'partials/_wbl_black'
%} elsif ($wbl_datas->{trt} eq 'WHITE') {
%= include 'partials/_wbl_white'
%} else {
%= include 'partials/_wbl_choice'
%}
</div>
%end