X7ROOT File Manager
Current Path:
/usr/libexec/usermin/procmail
usr
/
libexec
/
usermin
/
procmail
/
📁
..
📄
CHANGELOG
(195 B)
📄
defaultuconfig
(11 B)
📄
delete_recipes.cgi
(418 B)
📄
down.cgi
(277 B)
📄
edit_env.cgi
(1022 B)
📄
edit_inc.cgi
(864 B)
📄
edit_recipe.cgi
(2.75 KB)
📁
images
📄
index.cgi
(4.79 KB)
📁
lang
📄
manual_form.cgi
(533 B)
📄
manual_save.cgi
(331 B)
📄
module.info
(249 B)
📄
module.info.af
(0 B)
📄
module.info.af.auto
(217 B)
📄
module.info.ar
(0 B)
📄
module.info.ar.auto
(301 B)
📄
module.info.be
(0 B)
📄
module.info.be.auto
(375 B)
📄
module.info.bg
(0 B)
📄
module.info.bg.auto
(371 B)
📄
module.info.ca
(34 B)
📄
module.info.ca.auto
(212 B)
📄
module.info.cs
(32 B)
📄
module.info.cs.auto
(211 B)
📄
module.info.da
(0 B)
📄
module.info.da.auto
(217 B)
📄
module.info.de
(149 B)
📄
module.info.el
(0 B)
📄
module.info.el.auto
(455 B)
📄
module.info.es
(34 B)
📄
module.info.eu
(0 B)
📄
module.info.eu.auto
(254 B)
📄
module.info.fa
(0 B)
📄
module.info.fa.auto
(313 B)
📄
module.info.fi
(0 B)
📄
module.info.fi.auto
(245 B)
📄
module.info.fr
(36 B)
📄
module.info.he
(0 B)
📄
module.info.he.auto
(257 B)
📄
module.info.hr
(0 B)
📄
module.info.hr.auto
(234 B)
📄
module.info.hu
(37 B)
📄
module.info.hu.auto
(217 B)
📄
module.info.it
(0 B)
📄
module.info.it.auto
(240 B)
📄
module.info.ja
(0 B)
📄
module.info.ja.auto
(293 B)
📄
module.info.ko
(0 B)
📄
module.info.ko.auto
(246 B)
📄
module.info.lt
(0 B)
📄
module.info.lt.auto
(253 B)
📄
module.info.lv
(0 B)
📄
module.info.lv.auto
(218 B)
📄
module.info.ms
(0 B)
📄
module.info.ms.auto
(229 B)
📄
module.info.mt
(0 B)
📄
module.info.mt.auto
(245 B)
📄
module.info.nl
(31 B)
📄
module.info.no
(31 B)
📄
module.info.no.auto
(185 B)
📄
module.info.pl
(0 B)
📄
module.info.pl.auto
(251 B)
📄
module.info.pt
(0 B)
📄
module.info.pt.auto
(246 B)
📄
module.info.pt_BR
(0 B)
📄
module.info.pt_BR.auto
(255 B)
📄
module.info.ro
(0 B)
📄
module.info.ro.auto
(253 B)
📄
module.info.ru
(32 B)
📄
module.info.ru.auto
(355 B)
📄
module.info.sk
(0 B)
📄
module.info.sk.auto
(239 B)
📄
module.info.sl
(0 B)
📄
module.info.sl.auto
(219 B)
📄
module.info.sv
(0 B)
📄
module.info.sv.auto
(231 B)
📄
module.info.th
(0 B)
📄
module.info.th.auto
(446 B)
📄
module.info.tr
(0 B)
📄
module.info.tr.auto
(255 B)
📄
module.info.uk
(0 B)
📄
module.info.uk.auto
(395 B)
📄
module.info.ur
(0 B)
📄
module.info.ur.auto
(376 B)
📄
module.info.vi
(0 B)
📄
module.info.vi.auto
(272 B)
📄
module.info.zh
(0 B)
📄
module.info.zh.auto
(185 B)
📄
module.info.zh_TW
(0 B)
📄
module.info.zh_TW.auto
(194 B)
📄
procmail-lib.pl
(9.39 KB)
📄
save_env.cgi
(753 B)
📄
save_inc.cgi
(680 B)
📄
save_recipe.cgi
(2.58 KB)
📄
uconfig.info
(97 B)
📄
uconfig.info.ca
(122 B)
📄
uconfig.info.cs
(119 B)
📄
uconfig.info.de
(132 B)
📄
uconfig.info.nl
(121 B)
📄
uconfig.info.no
(99 B)
📁
ulang
📄
up.cgi
(271 B)
Editing: save_recipe.cgi
#!/usr/bin/perl # save_recipe.cgi # Create, update or delete a procmail recipe require './procmail-lib.pl'; &ReadParse(); &lock_file($procmailrc); @conf = &get_procmailrc(); $rec = $conf[$in{'idx'}] if (!$in{'new'}); if ($in{'delete'}) { # Just delete the recipe &delete_recipe($rec); } else { # Validate inputs &error_setup($text{'save_err'}); if ($in{'block'}) { # Conditional code block $in{'bdata'} =~ s/\r//g; $rec->{'block'} = $in{'bdata'}; } else { # Normal action $in{'action'} =~ /\S/ || &error($text{'save_eaction_'.$in{'amode'}}); delete($rec->{'type'}); if ($in{'amode'} == 0) { $rec->{'action'} = $in{'action'}; } elsif ($in{'amode'} == 1) { $rec->{'action'} = $in{'action'}."/."; } elsif ($in{'amode'} == 2) { $rec->{'action'} = $in{'action'}."/"; } elsif ($in{'amode'} == 3) { $rec->{'type'} = "!"; $rec->{'action'} = $in{'action'}; } elsif ($in{'amode'} == 6) { $rec->{'type'} = "="; $in{'action'} =~ /^(\S+)=(.*)$/ || &error($text{'save_eactionvar'}); $rec->{'action'} = $in{'action'}; } else { $rec->{'type'} = "|"; $rec->{'action'} = $in{'action'}; } } map { $flag{$_}++ } split(/\0/, $in{'flag'}); @flags = @{$rec->{'flags'}}; foreach $f (@known_flags) { if ($flag{$f}) { push(@flags, $f); } else { @flags = grep { $_ ne $f } @flags; } } $rec->{'flags'} = [ &unique(@flags) ]; if ($in{'lockfile_def'} == 1) { delete($rec->{'lockfile'}); } elsif ($in{'lockfile_def'} == 2) { $rec->{'lockfile'} = ""; } else { $in{'lockfile'} =~ /\S/ || &error($text{'save_elockfile'}); $rec->{'lockfile'} = $in{'lockfile'}; } for($i=0; defined($m = $in{"cmode_$i"}); $i++) { next if ($m eq '-'); $c = $in{"cond_$i"}; if ($m eq '<' || $m eq '>') { $c =~ /^\d+$/ || &error(&text('save_esize', $i+1)); } elsif ($m eq '$' || $m eq '?') { $c =~ /\S/ || &error(&text('save_eshell', $i+1)); } else { $c =~ /\S/ || &error(&text('save_ere', $i+1)); } push(@conds, [ $m, $c ]); } $rec->{'conds'} = \@conds; # Save the receipe if ($in{'new'}) { if ($in{'before'} ne '') { $before = $conf[$in{'before'}]; &create_recipe_before($rec, $before); } elsif ($in{'after'} ne '') { if ($in{'after'} == @conf-1) { &create_recipe($rec); } else { $before = $conf[$in{'after'}+1]; &create_recipe_before($rec, $before); } } else { &create_recipe($rec); } } else { &modify_recipe($rec); } } &unlock_file($procmailrc); &webmin_log($in{'delete'} ? "delete" : $in{'new'} ? "create" : "modify", "recipe", undef, $rec); &redirect("");
Upload File
Create Folder