CaffGeek/MBACNationals

<?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
 */

/**
 * FTP implementation using fsockopen to connect.
 *
 * @package PemFTP
 * @subpackage Pure
 * @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
 */
class ftp extends ftp_base {

    function ftp($verb=FALSE, $le=FALSE) {
        $this->__construct($verb, $le);
    }

    function __construct($verb=FALSE, $le=FALSE) {
        parent::__construct(false, $verb, $le);
    }

// <!-- --------------------------------------------------------------------------------------- -->
// <!--       Private functions                                                                 -->
// <!-- --------------------------------------------------------------------------------------- -->

    function _settimeout($sock) {
        if(!@stream_set_timeout($sock, $this->_timeout)) {
            $this->PushError('_settimeout','socket set send timeout');
            $this->_quit();
            return FALSE;
        }
        return TRUE;
    }

    function _connect($host, $port) {
        $this->SendMSG("Creating socket");
        $sock = @fsockopen($host, $port, $errno, $errstr, $this->_timeout);
        if (!$sock) {
            $this->PushError('_connect','socket connect failed', $errstr." (".$errno.")");
            return FALSE;
        }
        $this->_connected=true;
        return $sock;
    }

    function _readmsg($fnction="_readmsg"){
        if(!$this->_connected) {
            $this->PushError($fnction, 'Connect first');
            return FALSE;
        }
        $result=true;
        $this->_message="";
        $this->_code=0;
        $go=true;
        do {
            $tmp=@fgets($this->_ftp_control_sock, 512);
            if($tmp===false) {
                $go=$result=false;
                $this->PushError($fnction,'Read failed');
            } else {
                $this->_message.=$tmp;
                if(preg_match("/^([0-9]{3})(-(.*[".CRLF."]{1,2})+\\1)? [^".CRLF."]+[".CRLF."]{1,2}$/", $this->_message, $regs)) $go=false;
            }
        } while($go);
        if($this->LocalEcho) echo "GET < ".rtrim($this->_message, CRLF).CRLF;
        $this->_code=(int)$regs[1];
        return $result;
    }

    function _exec($cmd, $fnction="_exec") {
        if(!$this->_ready) {
            $this->PushError($fnction,'Connect first');
            return FALSE;
        }
        if($this->LocalEcho) echo "PUT > ",$cmd,CRLF;
        $status=@fputs($this->_ftp_control_sock, $cmd.CRLF);
        if($status===false) {
            $this->PushError($fnction,'socket write failed');
            return FALSE;
        }
        $this->_lastaction=time();
        if(!$this->_readmsg($fnction)) return FALSE;
        return TRUE;
    }

    function _data_prepare($mode=FTP_ASCII) {
        if(!$this->_settype($mode)) return FALSE;
        if($this->_passive) {
            if(!$this->_exec("PASV", "pasv")) {
                $this->_data_close();
                return FALSE;
            }
            if(!$this->_checkCode()) {
                $this->_data_close();
                return FALSE;
            }
            $ip_port = explode(",", ereg_replace("^.+ \\(?([0-9]{1,3},[0-9]{1,3},[0-9]{1,3},[0-9]{1,3},[0-9]+,[0-9]+)\\)?.*".CRLF."$", "\\1", $this->_message));
            $this->_datahost=$ip_port[0].".".$ip_port[1].".".$ip_port[2].".".$ip_port[3];
            $this->_dataport=(((int)$ip_port[4])<<8) + ((int)$ip_port[5]);
            $this->SendMSG("Connecting to ".$this->_datahost.":".$this->_dataport);
            $this->_ftp_data_sock=@fsockopen($this->_datahost, $this->_dataport, $errno, $errstr, $this->_timeout);
            if(!$this->_ftp_data_sock) {
                $this->PushError("_data_prepare","fsockopen fails", $errstr." (".$errno.")");
                $this->_data_close();
                return FALSE;
            }
            else $this->_ftp_data_sock;
        } else {
            $this->SendMSG("Only passive connections available!");
            return FALSE;
        }
        return TRUE;
    }

    function _data_read($mode=FTP_ASCII, $fp=NULL) {
        if(is_resource($fp)) $out=0;
        else $out="";
        if(!$this->_passive) {
            $this->SendMSG("Only passive connections available!");
            return FALSE;
        }
        while (!feof($this->_ftp_data_sock)) {
            $block=fread($this->_ftp_data_sock, $this->_ftp_buff_size);
            if($mode!=FTP_BINARY) $block=preg_replace("/\r\n|\r|\n/", $this->_eol_code[$this->OS_local], $block);
            if(is_resource($fp)) $out+=fwrite($fp, $block, strlen($block));
            else $out.=$block;
        }
        return $out;
    }

    function _data_write($mode=FTP_ASCII, $fp=NULL) {
        if(is_resource($fp)) $out=0;
        else $out="";
        if(!$this->_passive) {
            $this->SendMSG("Only passive connections available!");
            return FALSE;
        }
        if(is_resource($fp)) {
            while(!feof($fp)) {
                $block=fread($fp, $this->_ftp_buff_size);
                if(!$this->_data_write_block($mode, $block)) return false;
            }
        } elseif(!$this->_data_write_block($mode, $fp)) return false;
        return TRUE;
    }

    function _data_write_block($mode, $block) {
        if($mode!=FTP_BINARY) $block=preg_replace("/\r\n|\r|\n/", $this->_eol_code[$this->OS_remote], $block);
        do {
            if(($t=@fwrite($this->_ftp_data_sock, $block))===FALSE) {
                $this->PushError("_data_write","Can't write to socket");
                return FALSE;
            }
            $block=substr($block, $t);
        } while(!empty($block));
        return true;
    }

    function _data_close() {
        @fclose($this->_ftp_data_sock);
        $this->SendMSG("Disconnected data from remote host");
        return TRUE;
    }

    function _quit($force=FALSE) {
        if($this->_connected or $force) {
            @fclose($this->_ftp_control_sock);
            $this->_connected=false;
            $this->SendMSG("Socket closed");
        }
    }
}

?>