|
|
| System | : | Linux MiraNet 3.0.0-14-generic-pae #23-Ubuntu SMP Mon Nov 21 22:07:10 UTC 2011 i686 |
|---|
| Software | : | Apache. PHP/5.3.6-13ubuntu3.10 |
|---|
| ID | : | uid=65534(nobody) gid=65534(nogroup) groups=65534(nogroup)
|
|---|
|
| Safe Mode | : | OFF |
|---|
| Open_Basedir | : | OFF |
|---|
| Freespace | : | 20.58 GB of 70.42 GB (29.23%) |
|---|
|
|
MySQL: ON MSSQL: OFF Oracle: OFF PostgreSQL: OFF Curl: OFF Sockets: ON Fetch: OFF Wget: ON Perl: ON |
|
Disabled Functions: pcntl_alarm,pcntl_fork,pcntl_waitpid,pcntl_wait,pcntl_wifexited,pcntl_wifstopped,pcntl_wifsignaled,pcntl_wexitstatus,pcntl_wtermsig,pcntl_wstopsig,pcntl_signal,pcntl_signal_dispatch,pcntl_get_last_error,pcntl_strerror,pcntl_sigprocmask,pcntl_sigwaitinfo,pcntl_sigtimedwait,pcntl_exec,pcntl_getpriority,pcntl_setpriority,
|
[ System Info ]
[ Processes ]
[ SQL Manager ]
[ Eval ]
[ Encoder ]
[ Mailer ]
[ Back Connection ]
[ Backdoor Server ]
[ Kernel Exploit Search ]
[ MD5 Decrypter ]
[ Reverse IP ]
[ Kill Shell ]
[ FTP Brute-Force ]
|
|
/
usr/
src/
courier-0.66.1/
courier/
webadmin/
- drwxrwxrwx
|
Viewing file:  admin-15ldapa.pl (1.76 KB) -rw-rw-rw-Select action/file-type:  ( +) |  ( +) |  ( +) | Code ( +) | Session ( +) |  ( +) | SDB ( +) |  ( +) |  ( +) |  ( +) |  ( +) |  ( +) |
#! perl
#
# TITLE: LDAP-based aliasing/routing
#
#
# Copyright 2001-2004 Double Precision, Inc. See COPYING for
# distribution information.
use webadmin;
my $errstr="";
display_form("notsupp.html")
unless -f "$authldaprc";
if ($cgi->param("Save"))
{
my $ldap=ReadKWConfigFile("ldapaliasrc");
my $newkw={
"LDAP_ALIAS" => "LDAP_ALIAS\t" . (param('ENABLED') ? "1":"0"),
"LDAP_LOCATION" => "LDAP_URI\t" . param('URI'),
"LDAP_NUMPROCS" => "LDAP_NUMPROCS\t" . param('NUMPROCS'),
"LDAP_BASEDN" => "LDAP_BASEDN\t" . param('BASEDN'),
"LDAP_BINDINFO" => "LDAP_BINDDN\t" . param('BINDDN') . "\nLDAP_BINDPW\t" . $$ldap{'LDAP_BINDPW'},
"LDAP_TIMEOUT" => "LDAP_TIMEOUT\t" . param('TIMEOUT'),
"LDAP_MAIL" => "LDAP_MAIL\t" . param('MAIL'),
"LDAP_MAILDROP" => "LDAP_MAILDROP\t" . param('MAILDROP'),
"LDAP_SOURCE" => "LDAP_SOURCE\t" . param('SOURCE'),
"LDAP_VIRTUALMAP" => "LDAP_VDOMAIN\t" . param('VDOMAIN') . "\nLDAP_VUSER\t" . param('VUSER'),
} ;
$errstr="\@SAVED\@";
SaveKWConfigFile("ldapaliasrc", $newkw);
changed("test -x $sbindir/courierldapaliasd || exit 0; $sbindir/courierldapaliasd start; $sbindir/courierldapaliasd restart");
}
my $ldap=ReadKWConfigFile("ldapaliasrc");
display_form("admin-15ldapa.html",
{
"ERROR" => $errstr,
"ENABLED" => ("<input type=\"checkbox\" name=\"ENABLED\"" . ($$ldap{'LDAP_ALIAS'} ? " checked=\"checked\"":"")) . " />",
"URI" => $$ldap{'LDAP_URI'},
"BASEDN" => $$ldap{'LDAP_BASEDN'},
"BINDDN" => $$ldap{'LDAP_BINDDN'},
"TIMEOUT" => $$ldap{'LDAP_TIMEOUT'},
"NUMPROCS" => $$ldap{'LDAP_NUMPROCS'},
"MAIL" => $$ldap{'LDAP_MAIL'},
"MAILDROP" => $$ldap{'LDAP_MAILDROP'},
"SOURCE" => $$ldap{'LDAP_SOURCE'},
"VDOMAIN" => $$ldap{'LDAP_VDOMAIN'},
"VUSER" => $$ldap{'LDAP_VUSER'},
}
);
|
