/[smecontribs]/rpms/smeserver-xt_geoip/contribs9/smeserver-xt_geoip-1.0.1-bz10792-add_services.patch
ViewVC logotype

Annotation of /rpms/smeserver-xt_geoip/contribs9/smeserver-xt_geoip-1.0.1-bz10792-add_services.patch

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1 - (hide annotations) (download)
Thu Oct 17 06:23:41 2019 UTC (5 years ago) by michel
Branch: MAIN
CVS Tags: smeserver-xt_geoip-1_0_1-20_el6_sme, smeserver-xt_geoip-1_0_1-24_el6_sme, smeserver-xt_geoip-1_0_1-23_el6_sme, smeserver-xt_geoip-1_0_1-26_el6_sme, smeserver-xt_geoip-1_0_1-25_el6_sme, smeserver-xt_geoip-1_0_1-22_el6_sme, smeserver-xt_geoip-1_0_1-21_el6_sme, HEAD
* Wed Oct 16 2019 Michel Begue <mab974@gmail.com> 1.0.1-20.sme
- panel to add services  [SME: 10792]
- french translation

1 michel 1.1 diff -urN smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/xt_geoip smeserver-xt_geoip-1.0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/xt_geoip
2     --- smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/xt_geoip 2019-10-10 19:05:43.000000000 +0400
3     +++ smeserver-xt_geoip-1.0.1/root/etc/e-smith/locale/en-us/etc/e-smith/web/functions/xt_geoip 2019-10-16 17:59:19.000000000 +0400
4     @@ -254,17 +254,37 @@
5     <trans>Choose if you want to have the general filter to apply to all incoming connections or if you do not want to filter ports already defined with a specific service rule. This would allow you to have a service less restricted than the general rule if you enable this.</trans>
6     </entry>
7    
8     - <field type="literal" id="countries_list_label" value="">
9     - <description>COUNTRIES_LIST_DESCRIPTION</description>
10     - </field>
11     - <subroutine src="print_custom_button('COUNTRIES_LIST', 'Codes')"/>
12     + <entry>
13     + <base>SERVICE_LIST_DESCRIPTION</base>
14     + <trans><![CDATA[<ul>
15     + <li>Click here to select <b>new </b>services among an <b>available services list</b></li>
16     + </ul> ]]>
17     + </trans>
18     + </entry>
19     +
20     + <entry>
21     + <base>LABEL_SERVICE_LIST</base>
22     + <trans>Service codes : </trans>
23     + </entry>
24     +
25     + <entry>
26     + <base>SERV_LIST</base>
27     + <trans>List</trans>
28     + </entry>
29     +
30     + <entry>
31     + <base>DESC_AVAILABLE_SERVICES</base>
32     + <trans><![CDATA[ <h2> New Services selection</h2>
33     + <ul><li>Select here among the other services not yet managed individually.
34     + </li><li>You may select one or more elements. Generally <b>enabled and public</b> ones.
35     + </li></ul> ]]>
36     + </trans>
37     + </entry>
38    
39     + <entry>
40     + <base>LABEL_AVAILABLE_SERVICES</base>
41     + <trans>Available Services</trans>
42     + </entry>
43    
44     - <subroutine src="print_button('NEXT')" />
45     -
46     - <field type="literal" id="service_label" value="">
47     - <description>SERVICE_DESCRIPTION</description>
48     - </field>
49     - <subroutine src="print_custom_button('PER_SERVICE_GEOIP', 'Service', '')"/>
50    
51     </lexicon>
52     diff -urN smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/locale/fr/etc/e-smith/web/functions/xt_geoip smeserver-xt_geoip-1.0.1/root/etc/e-smith/locale/fr/etc/e-smith/web/functions/xt_geoip
53     --- smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/locale/fr/etc/e-smith/web/functions/xt_geoip 2019-10-10 19:05:43.000000000 +0400
54     +++ smeserver-xt_geoip-1.0.1/root/etc/e-smith/locale/fr/etc/e-smith/web/functions/xt_geoip 2019-10-16 18:00:05.000000000 +0400
55     @@ -93,12 +93,12 @@
56    
57     <entry>
58     <base>IPT_LIST</base>
59     - <trans>Stats des connexions évitées à l'aide de XT-geoip</trans>
60     + <trans>Filtrés</trans>
61     </entry>
62    
63     <entry>
64     <base>SSH_LIST</base>
65     - <trans>Stats des erreurs SSH non bloquées par XT-geoip</trans>
66     + <trans>Erreurs SSH</trans>
67     </entry>
68    
69    
70     @@ -119,7 +119,7 @@
71    
72     <entry>
73     <base>STATS_DESCRIPTION</base>
74     - <trans><![CDATA[ <h2>Statistiques pour Xtables GeoIP </h2><ul>
75     + <trans><![CDATA[<HR class="sme-copyrightbar"> <h3>Statistiques pour Xtables GeoIP </h3><ul>
76     <li>Pour 3 périodes : Jour, Semaine et Mois</li>
77     <li>Ips bloqués par pays triés par score</li>
78     <li>Erreurs Ssh par pays triées par score </li>
79     @@ -142,7 +142,7 @@
80    
81     <entry>
82     <base>PER_SERVICE_GEOIP</base>
83     - <trans>-> Services</trans>
84     + <trans>Services</trans>
85     </entry>
86    
87     <entry>
88     @@ -191,8 +191,102 @@
89     </entry>
90    
91     <entry>
92     - <base>ERR_COUNTRY_MAX: {$ctr}</base>
93     - <trans>Code(s) pays inexistant(s) sur le serveur: {$listerr}</trans>
94     + <base>ERROR_COUNTRY_MAX: {$ctr}</base>
95     + <trans>Trop de codes pays saisis : {$ctr}</trans>
96     </entry>
97     -
98     +
99     + <entry>
100     + <base>SSH_LIST_DESCRIPTION</base>
101     + <trans><![CDATA[<ul><li>Cliquer ici pour avoir les statistiques des <b>erreurs SSH </b>pour des accés non bloqués</li></ul> ]]>
102     + </trans>
103     + </entry>
104     +
105     + <entry>
106     + <base>IPT_LIST_DESCRIPTION</base>
107     + <trans><![CDATA[<ul><li>Cliquer ici pour avoir les statistiques des <b>connexions refusées</b></li></ul> ]]>
108     + </trans>
109     + </entry>
110     +
111     + <entry>
112     + <base>COUNTRY_LIST_DESCRIPTION</base>
113     + <trans><![CDATA[<ul><li>Cliquer pour avoir une <b>liste des codes pays disponibles</b></li></ul> ]]>
114     + </trans>
115     + </entry>
116     +
117     + <entry>
118     + <base>LABEL_COUNTRY_LIST</base>
119     + <trans>Codes pays : </trans>
120     + </entry>
121     + <entry>
122     + <base>COUNTRY_LIST</base>
123     + <trans>Codes Pays</trans>
124     + </entry>
125     +
126     + <entry>
127     + <base>CNTRY_LIST</base>
128     + <trans>Liste</trans>
129     + </entry>
130     +
131     + <entry>
132     + <base>END_OF_CODES</base>
133     + <trans>Fin de la liste de codes</trans>
134     + </entry>
135     +
136     + <entry>
137     + <base>LABEL_REVERSE_MATCH</base>
138     + <trans>Rejeté si </trans>
139     + </entry>
140     +
141     + <entry>
142     + <base>DESC_REVERSE_MATCH</base>
143     + <trans>L'option qui suit permet de choisir de rejeter les visiteurs à partir de la liste de pays (==)
144     + ce qui est le comportement par défaut, ou d'autoriser leurs accès (!=).</trans>
145     + </entry>
146     +
147     + <entry>
148     + <base>LABEL_OTHERS</base>
149     + <trans>Filtre général uniquement pour les services sans règles d'accès</trans>
150     + </entry>
151     +
152     + <entry>
153     + <base>DESC_OTHERS</base>
154     + <trans> Choisir d'appliquer le filtre général à tous les accés entrant
155     + ou de ne pas le faire pour les ports faisant déjà l'objet d'un filtrage par service.
156     + Ceci permet, si vous validez ici, d'avoir un service moins restreint qu'avec la règle générale.
157     + </trans>
158     + </entry>
159     +
160     + <entry>
161     + <base>SERVICE_LIST_DESCRIPTION</base>
162     + <trans><![CDATA[<ul>
163     + <li>Cliquer ici pour pouvoir sélectionner de <b>nouveaux</b> services parmi les <b>services disponibles restant</b></li>
164     + </ul> ]]>
165     + </trans>
166     + </entry>
167     +
168     + <entry>
169     + <base>LABEL_SERVICE_LIST</base>
170     + <trans>Codes des Services : </trans>
171     + </entry>
172     +
173     + <entry>
174     + <base>SERV_LIST</base>
175     + <trans>Liste</trans>
176     + </entry>
177     +
178     + <entry>
179     + <base>DESC_AVAILABLE_SERVICES</base>
180     + <trans><![CDATA[ <h2>Sélection de nouveaux services</h2>
181     + <ul><li>Choisir ici parmi les autres services non encore gérés individuellement.
182     + </li><li>Vous pouvez choisir un ou plusieurs éléments. Généralement des services marqués <b>enabled et public</b>.
183     + </li></ul> ]]>
184     + </trans>
185     + </entry>
186     +
187     + <entry>
188     + <base>LABEL_AVAILABLE_SERVICES</base>
189     + <trans>Services disponibles</trans>
190     + </entry>
191     +
192     </lexicon>
193     +
194     diff -urN smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/web/functions/xt_geoip smeserver-xt_geoip-1.0.1/root/etc/e-smith/web/functions/xt_geoip
195     --- smeserver-xt_geoip-1.0.1.old/root/etc/e-smith/web/functions/xt_geoip 2019-10-10 19:05:43.000000000 +0400
196     +++ smeserver-xt_geoip-1.0.1/root/etc/e-smith/web/functions/xt_geoip 2019-10-16 23:49:18.000000000 +0400
197     @@ -103,7 +103,7 @@
198     <field type="literal" id="country_list_label" value="">
199     <description>COUNTRY_LIST_DESCRIPTION</description>
200     </field>
201     - <subroutine src="print_custom_button('CNTRY_LIST', 'Codes')"/>
202     + <subroutine src="print_custom_button('CNTRY_LIST', 'Codes', '')"/>
203    
204    
205     <subroutine src="print_button('NEXT')" />
206     @@ -115,6 +115,13 @@
207     <subroutine src="print_service_table()" />
208    
209    
210     + <field type="literal" id="service_list_label" value="">
211     + <description>SERVICE_LIST_DESCRIPTION</description>
212     + </field>
213     + <subroutine src="print_custom_button('SERV_LIST', 'Services', '')"/>
214     +
215     +
216     +
217     <field type="literal" id="stats_label" value="">
218     <description>STATS_DESCRIPTION</description>
219     </field>
220     @@ -268,6 +275,7 @@
221    
222    
223     <page name="Stats" pre-event="generateStats" post-event="wherenext('First')">
224     + <subroutine src="print_button('NEXT')"/>
225     </page>
226    
227    
228     @@ -275,6 +283,19 @@
229     <subroutine src="print_button('NEXT')"/>
230     </page>
231    
232     + <page name="Services" pre-event="turn_off_buttons()" post-event="do_otherServices()">
233     + <field
234     + type="select" multiple="1"
235     + id="SelectedServices"
236     + value="otherServices('sel')"
237     + options="otherServices('all')">
238     + <label>LABEL_AVAILABLE_SERVICES</label>
239     + <description>DESC_AVAILABLE_SERVICES</description>
240     + </field>
241     +
242     + <subroutine src="print_button('NEXT')"/>
243     + </page>
244     +
245    
246    
247     </form>
248     diff -urN smeserver-xt_geoip-1.0.1.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/xt_geoip.pm smeserver-xt_geoip-1.0.1/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/xt_geoip.pm
249     --- smeserver-xt_geoip-1.0.1.old/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/xt_geoip.pm 2019-10-10 19:05:43.000000000 +0400
250     +++ smeserver-xt_geoip-1.0.1/root/usr/share/perl5/vendor_perl/esmith/FormMagick/Panel/xt_geoip.pm 2019-10-16 23:12:46.000000000 +0400
251     @@ -19,6 +19,8 @@
252     our @ISA = qw(esmith::FormMagick Exporter);
253    
254     our @EXPORT = qw(
255     + otherServices
256     + do_otherServices
257     get_prop
258     get_value
259     get_badcountries
260     @@ -281,6 +283,8 @@
261     my $self = shift;
262     my $q = $self->{cgi};
263    
264     + $self->turn_off_buttons();
265     +
266     # Untaint $name before use in system()
267     my $stats_type = $q->param ('type');
268     $stats_type =~ /(.+)/; $stats_type = $1;
269     @@ -308,7 +312,7 @@
270     print "</pre>\n";
271    
272     print $q->h3($self->localise('END_OF_STATS'));
273     - $self->wherenext('First');
274     + #$self->wherenext('First');
275     return '';
276     }
277     }
278     @@ -496,6 +500,8 @@
279     my $self = shift;
280     my $q = $self->{cgi};
281    
282     + $self->turn_off_buttons();
283     +
284     my $file = "/usr/share/xt_geoip/geoip_countries_list.txt";
285     unless ( -e $file ) {
286     print $q->p($q->b($self->localise('INVALID_CODES_LIST')));
287     @@ -516,10 +522,56 @@
288     print "</pre>\n";
289    
290     print $q->h3($self->localise('END_OF_CODES'));
291     - $self->wherenext('First');
292     return '';
293    
294     }
295    
296    
297     +#Subroutine to list other services codes
298     +sub otherServices
299     +{
300     + my ($self, $choice) = @_;
301     +
302     + my %serv_ok = map { $_ => 1} split(/,/, $db->get_prop("masq", "XtServices"));
303     + # unless $choice eq 'all';
304     +
305     + my @serv_others = ();
306     +
307     + for ($db->get_all_by_prop(type => 'service'))
308     + {
309     + next unless $_->prop('TCPPort');
310     + # if ( $_->prop('TCPPort')) {
311     +
312     + # push @serv_others, $_->key unless exists( $serv_ok{$_->key});
313     + push @serv_others, $_->key unless $choice eq 'sel' and not exists( $serv_ok{$_->key});
314     + # }
315     + }
316     +
317     + return \@serv_others;
318     +
319     +}
320     +
321     +
322     +#Subroutine to update list services codes
323     +sub do_otherServices
324     +{
325     + my $self = shift;
326     +
327     + my $q = $self->{'cgi'};
328     +
329     + my @selected = $q->param('SelectedServices');
330     +
331     + my $serv1 = ($db->get_prop("masq", "XtServices")) || '';
332     + my $serv2 = join( ',', @selected);
333     +
334     + $self->wherenext('First');
335     +
336     + return $self->success("NO_CHANGE") if ( $serv1 eq $serv2);
337     +
338     + $db->set_prop("masq", "XtServices", $serv2);
339     +
340     + return $self->success("SUCCESS");
341     +}
342     +
343     +
344     1;

admin@koozali.org
ViewVC Help
Powered by ViewVC 1.2.1 RSS 2.0 feed