Private

Server IP : 195.201.23.43 / Your IP : 18.223.168.194
Web Server : Apache
System : Linux webserver2.vercom.be 5.4.0-192-generic #212-Ubuntu SMP Fri Jul 5 09:47:39 UTC 2024 x86_64
User : kdecoratie ( 1041)
PHP Version : 7.1.33-63+ubuntu20.04.1+deb.sury.org+1
Disable Function : pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wifcontinued,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_get_handler,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,pcntl_async_signals,
MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON
Directory : /usr/share/usermin/filter/

Upload File :

[ HOME SHELL ]

Current File : /usr/share/usermin/filter/save_forward.cgi

#!/usr/bin/perl
# Create, update or delete a forwarding filter

require './filter-lib.pl';
&ReadParse();
&error_setup($text{'forward_err'});

# Find existing forwarding filter object
&lock_file($procmail::procmailrc);
@filters = &list_filters();
($old) = grep { $_->{'actiontype'} eq '!' && $_->{'nocond'} } @filters;
$filter = $old;

if ($filter && !$in{'enabled'}) {
	# Just delete
	&delete_filter($filter);
	}
elsif ($in{'enabled'}) {
	# Create or update
	if (!$filter) {
		$filter = { 'actiontype' => '!',
			    'body' => 0,
			    'nobounce' => 1 };
		}
	$filter->{'continue'} = $in{'continue'};
	$in{'forward'} =~ /\S/ || &error($text{'save_eforward'});
	$in{'forward'} =~ s/^\s+//;
	$in{'forward'} =~ s/\s+$//;
	$in{'forward'} =~ s/\s+/,/g;
	$filter->{'action'} = $in{'forward'};

	if ($old) {
		&modify_filter($filter);
		}
	else {
		# Forwarding should go last
		&create_filter($filter);
		}
	}

&unlock_file($procmail::procmailrc);
&redirect("");

Private