<?php

/**

 * PemFTP - A Ftp implementation in pure PHP

 *

 * @package PemFTP

 * @since 2.5

 *

 * @version 1.0

 * @copyright Alexey Dotsenko

 * @author Alexey Dotsenko

 * @link http://www.phpclasses.org/browse/package/1743.html Site

 * @license LGPL License http://www.opensource.org/licenses/lgpl-license.html

 */

/**

 * Defines the newline characters, if not defined already.

 *

 * This can be redefined.

 *

 * @since 2.5

 * @var string

 */

if(!defined('CRLF')) define('CRLF',"\r\n");

/**

 * Sets whatever to autodetect ASCII mode.

 *

 * This can be redefined.

 *

 * @since 2.5

 * @var int

 */

if(!defined("FTP_AUTOASCII")) define("FTP_AUTOASCII", -1);

/**

 *

 * This can be redefined.

 * @since 2.5

 * @var int

 */

if(!defined("FTP_BINARY")) define("FTP_BINARY", 1);

/**

 *

 * This can be redefined.

 * @since 2.5

 * @var int

 */

if(!defined("FTP_ASCII")) define("FTP_ASCII", 0);

/**

 * Whether to force FTP.

 *

 * This can be redefined.

 *

 * @since 2.5

 * @var bool

 */

if(!defined('FTP_FORCE')) define('FTP_FORCE', true);

/**

 * @since 2.5

 * @var string

 */

define('FTP_OS_Unix','u');

/**

 * @since 2.5

 * @var string

 */

define('FTP_OS_Windows','w');

/**

 * @since 2.5

 * @var string

 */

define('FTP_OS_Mac','m');

/**

 * PemFTP base class

 *

 */

class ftp_base {

	/* Public variables */

	var $LocalEcho;

	var $Verbose;

	var $OS_local;

	var $OS_remote;

	/* Private variables */

	var $_lastaction;

	var $_errors;

	var $_type;

	var $_umask;

	var $_timeout;

	var $_passive;

	var $_host;

	var $_fullhost;

	var $_port;

	var $_datahost;

	var $_dataport;

	var $_ftp_control_sock;

	var $_ftp_data_sock;

	var $_ftp_temp_sock;

	var $_ftp_buff_size;

	var $_login;

	var $_password;

	var $_connected;

	var $_ready;

	var $_code;

	var $_message;

	var $_can_restore;

	var $_port_available;

	var $_curtype;

	var $_features;

	var $_error_array;

	var $AuthorizedTransferMode;

	var $OS_FullName;

	var $_eol_code;

	var $AutoAsciiExt;

	/* Constructor */

	function ftp_base($port_mode=FALSE) {

		$this->__construct($port_mode);

	}

	function __construct($port_mode=FALSE, $verb=FALSE, $le=FALSE) {

		$this->LocalEcho=$le;

		$this->Verbose=$verb;

		$this->_lastaction=NULL;

		$this->_error_array=array();

		$this->_eol_code=array(FTP_OS_Unix=>"\n", FTP_OS_Mac=>"\r", FTP_OS_Windows=>"\r\n");

		$this->AuthorizedTransferMode=array(FTP_AUTOASCII, FTP_ASCII, FTP_BINARY);

		$this->OS_FullName=array(FTP_OS_Unix => 'UNIX', FTP_OS_Windows => 'WINDOWS', FTP_OS_Mac => 'MACOS');

		$this->AutoAsciiExt=array("ASP","BAT","C","CPP","CSS","CSV","JS","H","HTM","HTML","SHTML","INI","LOG","PHP3","PHTML","PL","PERL","SH","SQL","TXT");

		$this->_port_available=($port_mode==TRUE);

		$this->SendMSG("Staring FTP client class".($this->_port_available?"":" without PORT mode support"));

		$this->_connected=FALSE;

		$this->_ready=FALSE;

		$this->_can_restore=FALSE;

		$this->_code=0;

		$this->_message="";

		$this->_ftp_buff_size=4096;

		$this->_curtype=NULL;

		$this->SetUmask(0022);

		$this->SetType(FTP_AUTOASCII);

		$this->SetTimeout(30);

		$this->Passive(!$this->_port_available);

		$this->_login="anonymous";

		$this->_password="anon@ftp.com";

		$this->_features=array();

	    $this->OS_local=FTP_OS_Unix;

		$this->OS_remote=FTP_OS_Unix;

		$this->features=array();

		if(strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') $this->OS_local=FTP_OS_Windows;

		elseif(strtoupper(substr(PHP_OS, 0, 3)) === 'MAC') $this->OS_local=FTP_OS_Mac;

	}

// <!-- --------------------------------------------------------------------------------------- -->

// <!--       Public functions                                                                  -->

// <!-- --------------------------------------------------------------------------------------- -->

	function parselisting($line) {

		$is_windows = ($this->OS_remote == FTP_OS_Windows);

		if ($is_windows && preg_match("/([0-9]{2})-([0-9]{2})-([0-9]{2}) +([0-9]{2}):([0-9]{2})(AM|PM) +([0-9]+|<DIR>) +(.+)/",$line,$lucifer)) {

			$b = array();

			if ($lucifer[3]<70) { $lucifer[3]+=2000; } else { $lucifer[3]+=1900; } // 4digit year fix

			$b['isdir'] = ($lucifer[7]=="<DIR>");

			if ( $b['isdir'] )

				$b['type'] = 'd';

			else

				$b['type'] = 'f';

			$b['size'] = $lucifer[7];

			$b['month'] = $lucifer[1];

			$b['day'] = $lucifer[2];

			$b['year'] = $lucifer[3];

			$b['hour'] = $lucifer[4];

			$b['minute'] = $lucifer[5];

			$b['time'] = @mktime($lucifer[4]+(strcasecmp($lucifer[6],"PM")==0?12:0),$lucifer[5],0,$lucifer[1],$lucifer[2],$lucifer[3]);

			$b['am/pm'] = $lucifer[6];

			$b['name'] = $lucifer[8];

		} else if (!$is_windows && $lucifer=preg_split("/[ ]/",$line,9,PREG_SPLIT_NO_EMPTY)) {

			//echo $line."\n";

			$lcount=count($lucifer);

			if ($lcount<8) return '';

			$b = array();

			$b['isdir'] = $lucifer[0]{0} === "d";

			$b['islink'] = $lucifer[0]{0} === "l";

			if ( $b['isdir'] )

				$b['type'] = 'd';

			elseif ( $b['islink'] )

				$b['type'] = 'l';

			else

				$b['type'] = 'f';

			$b['perms'] = $lucifer[0];

			$b['number'] = $lucifer[1];

			$b['owner'] = $lucifer[2];

			$b['group'] = $lucifer[3];

			$b['size'] = $lucifer[4];

			if ($lcount==8) {

				sscanf($lucifer[5],"%d-%d-%d",$b['year'],$b['month'],$b['day']);

				sscanf($lucifer[6],"%d:%d",$b['hour'],$b['minute']);

				$b['time'] = @mktime($b['hour'],$b['minute'],0,$b['month'],$b['day'],$b['year']);

				$b['name'] = $lucifer[7];

			} else {

				$b['month'] = $lucifer[5];

				$b['day'] = $lucifer[6];

				if (preg_match("/([0-9]{2}):([0-9]{2})/",$lucifer[7],$l2)) {

					$b['year'] = date("Y");

					$b['hour'] = $l2[1];

					$b['minute'] = $l2[2];

				} else {

					$b['year'] = $lucifer[7];

					$b['hour'] = 0;

					$b['minute'] = 0;

				}

				$b['time'] = strtotime(sprintf("%d %s %d %02d:%02d",$b['day'],$b['month'],$b['year'],$b['hour'],$b['minute']));

				$b['name'] = $lucifer[8];

			}

		}

		return $b;

	}

	function SendMSG($message = "", $crlf=true) {

		if ($this->Verbose) {

			echo $message.($crlf?CRLF:"");

			flush();

		}

		return TRUE;

	}

	function SetType($mode=FTP_AUTOASCII) {

		if(!in_array($mode, $this->AuthorizedTransferMode)) {

			$this->SendMSG("Wrong type");

			return FALSE;

		}

		$this->_type=$mode;

		$this->SendMSG("Transfer type: ".($this->_type==FTP_BINARY?"binary":($this->_type==FTP_ASCII?"ASCII":"auto ASCII") ) );

		return TRUE;

	}

	function _settype($mode=FTP_ASCII) {

		if($this->_ready) {

			if($mode==FTP_BINARY) {

				if($this->_curtype!=FTP_BINARY) {

					if(!$this->_exec("TYPE I", "SetType")) return FALSE;

					$this->_curtype=FTP_BINARY;

				}

			} elseif($this->_curtype!=FTP_ASCII) {

				if(!$this->_exec("TYPE A", "SetType")) return FALSE;

				$this->_curtype=FTP_ASCII;

			}

		} else return FALSE;

		return TRUE;

	}

	function Passive($pasv=NULL) {

		if(is_null($pasv)) $this->_passive=!$this->_passive;

		else $this->_passive=$pasv;

		if(!$this->_port_available and !$this->_passive) {

			$this->SendMSG("Only passive connections available!");

			$this->_passive=TRUE;

			return FALSE;

		}

		$this->SendMSG("Passive mode ".($this->_passive?"on":"off"));

		return TRUE;

	}

	function SetServer($host, $port=21, $reconnect=true) {

		if(!is_long($port)) {

	        $this->verbose=true;

    	    $this->SendMSG("Incorrect port syntax");

			return FALSE;

		} else {

			$ip=@gethostbyname($host);

	        $dns=@gethostbyaddr($host);

	        if(!$ip) $ip=$host;

	        if(!$dns) $dns=$host;

			if(ip2long($ip) === -1) {

				$this->SendMSG("Wrong host name/address \"".$host."\"");

				return FALSE;

			}

	        $this->_host=$ip;

	        $this->_fullhost=$dns;

	        $this->_port=$port;

	        $this->_dataport=$port-1;

		}

		$this->SendMSG("Host \"".$this->_fullhost."(".$this->_host."):".$this->_port."\"");

		if($reconnect){

			if($this->_connected) {

				$this->SendMSG("Reconnecting");

				if(!$this->quit(FTP_FORCE)) return FALSE;

				if(!$this->connect()) return FALSE;

			}

		}

		return TRUE;

	}

	function SetUmask($umask=0022) {

		$this->_umask=$umask;

		umask($this->_umask);

		$this->SendMSG("UMASK 0".decoct($this->_umask));

		return TRUE;

	}

	function SetTimeout($timeout=30) {

		$this->_timeout=$timeout;

		$this->SendMSG("Timeout ".$this->_timeout);

		if($this->_connected)

			if(!$this->_settimeout($this->_ftp_control_sock)) return FALSE;

		return TRUE;

	}

	function connect($server=NULL) {

		if(!empty($server)) {

			if(!$this->SetServer($server)) return false;

		}

		if($this->_ready) return true;

	    $this->SendMsg('Local OS : '.$this->OS_FullName[$this->OS_local]);

		if(!($this->_ftp_control_sock = $this->_connect($this->_host, $this->_port))) {

			$this->SendMSG("Error : Cannot connect to remote host \"".$this->_fullhost." :".$this->_port."\"");

			return FALSE;

		}

		$this->SendMSG("Connected to remote host \"".$this->_fullhost.":".$this->_port."\". Waiting for greeting.");

		do {

			if(!$this->_readmsg()) return FALSE;

			if(!$this->_checkCode()) return FALSE;

			$this->_lastaction=time();

		} while($this->_code<200);

		$this->_ready=true;

		$syst=$this->systype();

		if(!$syst) $this->SendMSG("Can't detect remote OS");

		else {

			if(preg_match("/win|dos|novell/i", $syst[0])) $this->OS_remote=FTP_OS_Windows;

			elseif(preg_match("/os/i", $syst[0])) $this->OS_remote=FTP_OS_Mac;

			elseif(preg_match("/(li|u)nix/i", $syst[0])) $this->OS_remote=FTP_OS_Unix;

			else $this->OS_remote=FTP_OS_Mac;

			$this->SendMSG("Remote OS: ".$this->OS_FullName[$this->OS_remote]);

		}

		if(!$this->features()) $this->SendMSG("Can't get features list. All supported - disabled");

		else $this->SendMSG("Supported features: ".implode(", ", array_keys($this->_features)));

		return TRUE;

	}

	function quit($force=false) {

		if($this->_ready) {

			if(!$this->_exec("QUIT") and !$force) return FALSE;

			if(!$this->_checkCode() and !$force) return FALSE;

			$this->_ready=false;

			$this->SendMSG("Session finished");

		}

		$this->_quit();

		return TRUE;

	}

	function login($user=NULL, $pass=NULL) {

		if(!is_null($user)) $this->_login=$user;

		else $this->_login="anonymous";

		if(!is_null($pass)) $this->_password=$pass;

		else $this->_password="anon@anon.com";

		if(!$this->_exec("USER ".$this->_login, "login")) return FALSE;

		if(!$this->_checkCode()) return FALSE;

		if($this->_code!=230) {

			if(!$this->_exec((($this->_code==331)?"PASS ":"ACCT ").$this->_password, "login")) return FALSE;

			if(!$this->_checkCode()) return FALSE;

		}

		$this->SendMSG("Authentication succeeded");

		if(empty($this->_features)) {

			if(!$this->features()) $this->SendMSG("Can't get features list. All supported - disabled");

			else $this->SendMSG("Supported features: ".implode(", ", array_keys($this->_features)));

		}

		return TRUE;

	}

	function pwd() {

		if(!$this->_exec("PWD", "pwd")) return FALSE;