File: //proc/self/root/scripts.20110531.215904.25158/buildpureftproot
#!/usr/bin/perl
# cpanel - buildpureftproot Copyright(c) 2010 cPanel, Inc.
# All rights Reserved.
# copyright@cpanel.net http://cpanel.net
# This code is subject to the cPanel license. Unauthorized copying is prohibited
BEGIN { unshift @INC, '/usr/local/cpanel'; }
use Cpanel::Config::LoadUserDomains ();
use Cpanel::PwCache ();
use Cpanel::DIp ();
Cpanel::PwCache::init_passwdless_pwcache();
my $ftphome = ( Cpanel::PwCache::getpwnam('ftp') )[7];
if ( !$ftphome ) { $ftphome = '/var/ftp'; }
if ( !-e '/etc/pure-ftpd' ) {
mkdir( '/etc/pure-ftpd', 0755 );
}
my $userdomains_ref = Cpanel::Config::LoadUserDomains::loaduserdomains( {}, 1 );
open( DOMAINIPS, '<', '/etc/domainips' );
while (<DOMAINIPS>) {
chomp();
my ( $ip, $domain ) = split( /:\s*/, $_ );
next if ( $ip !~ /^\d+\.\d+\.\d+/ );
my $user = $userdomains_ref->{$domain};
next if ( !$user );
unlink( '/etc/pure-ftpd/' . $ip );
if ( Cpanel::DIp::isdedicatedip($ip) ) {
my $homedir = ( Cpanel::PwCache::getpwnam($user) )[7];
symlink( $homedir . '/public_ftp', '/etc/pure-ftpd/' . $ip );
}
else {
symlink( $ftphome, '/etc/pure-ftpd/' . $ip );
}
}
close(DOMAINIPS);