wp/wp-admin/includes/class-ftp-sockets.php
author ymh <ymh.work@gmail.com>
Tue, 27 Sep 2022 16:37:53 +0200
changeset 19 3d72ae0968f4
parent 16 a86126ab1dd4
permissions -rw-r--r--
upgrade wordpress to 6.0.2
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     2
/**
9
177826044cd9 upgrade wordpress to 5.2.3
ymh <ymh.work@gmail.com>
parents: 7
diff changeset
     3
 * PemFTP - An Ftp implementation in pure PHP
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     5
 * @package PemFTP
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
     6
 * @since 2.5.0
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     7
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     8
 * @version 1.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     9
 * @copyright Alexey Dotsenko
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    10
 * @author Alexey Dotsenko
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 9
diff changeset
    11
 * @link https://www.phpclasses.org/package/1743-PHP-FTP-client-in-pure-PHP.html
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 9
diff changeset
    12
 * @license LGPL https://opensource.org/licenses/lgpl-license.html
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    15
/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
 * Socket Based FTP implementation
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    17
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    18
 * @package PemFTP
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    19
 * @subpackage Socket
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
    20
 * @since 2.5.0
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
 * @version 1.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
 * @copyright Alexey Dotsenko
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    24
 * @author Alexey Dotsenko
16
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 9
diff changeset
    25
 * @link https://www.phpclasses.org/package/1743-PHP-FTP-client-in-pure-PHP.html
a86126ab1dd4 update enmi-conf
ymh <ymh.work@gmail.com>
parents: 9
diff changeset
    26
 * @license LGPL https://opensource.org/licenses/lgpl-license.html
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    27
 */
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
    28
class ftp_sockets extends ftp_base {
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    29
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    30
	function __construct($verb=FALSE, $le=FALSE) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
		parent::__construct(true, $verb, $le);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    32
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    33
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    34
// <!-- --------------------------------------------------------------------------------------- -->
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    35
// <!--       Private functions                                                                 -->
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    36
// <!-- --------------------------------------------------------------------------------------- -->
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    37
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    38
	function _settimeout($sock) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    39
		if(!@socket_set_option($sock, SOL_SOCKET, SO_RCVTIMEO, array("sec"=>$this->_timeout, "usec"=>0))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    40
			$this->PushError('_connect','socket set receive timeout',socket_strerror(socket_last_error($sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    41
			@socket_close($sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    42
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    43
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
		if(!@socket_set_option($sock, SOL_SOCKET , SO_SNDTIMEO, array("sec"=>$this->_timeout, "usec"=>0))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
			$this->PushError('_connect','socket set send timeout',socket_strerror(socket_last_error($sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
			@socket_close($sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
	function _connect($host, $port) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
		$this->SendMSG("Creating socket");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
		if(!($sock = @socket_create(AF_INET, SOCK_STREAM, SOL_TCP))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    55
			$this->PushError('_connect','socket create failed',socket_strerror(socket_last_error($sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
		if(!$this->_settimeout($sock)) return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    59
		$this->SendMSG("Connecting to \"".$host.":".$port."\"");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    60
		if (!($res = @socket_connect($sock, $host, $port))) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
			$this->PushError('_connect','socket connect failed',socket_strerror(socket_last_error($sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
			@socket_close($sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
		$this->_connected=true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
		return $sock;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
	function _readmsg($fnction="_readmsg"){
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
		if(!$this->_connected) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
			$this->PushError($fnction,'Connect first');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
		$result=true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
		$this->_message="";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
		$this->_code=0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
		$go=true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
		do {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
			$tmp=@socket_read($this->_ftp_control_sock, 4096, PHP_BINARY_READ);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
			if($tmp===false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
				$go=$result=false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
				$this->PushError($fnction,'Read failed', socket_strerror(socket_last_error($this->_ftp_control_sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
			} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
				$this->_message.=$tmp;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
				$go = !preg_match("/^([0-9]{3})(-.+\\1)? [^".CRLF."]+".CRLF."$/Us", $this->_message, $regs);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
		} while($go);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
		if($this->LocalEcho) echo "GET < ".rtrim($this->_message, CRLF).CRLF;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
		$this->_code=(int)$regs[1];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
		return $result;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
	function _exec($cmd, $fnction="_exec") {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
		if(!$this->_ready) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
			$this->PushError($fnction,'Connect first');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
		if($this->LocalEcho) echo "PUT > ",$cmd,CRLF;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
		$status=@socket_write($this->_ftp_control_sock, $cmd.CRLF);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
		if($status===false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
			$this->PushError($fnction,'socket write failed', socket_strerror(socket_last_error($this->stream)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
		$this->_lastaction=time();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
		if(!$this->_readmsg($fnction)) return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
		return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
	function _data_prepare($mode=FTP_ASCII) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
		if(!$this->_settype($mode)) return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
		$this->SendMSG("Creating data socket");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
		$this->_ftp_data_sock = @socket_create(AF_INET, SOCK_STREAM, SOL_TCP);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
		if ($this->_ftp_data_sock < 0) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
			$this->PushError('_data_prepare','socket create failed',socket_strerror(socket_last_error($this->_ftp_data_sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   115
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
		if(!$this->_settimeout($this->_ftp_data_sock)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
			$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
			return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
		if($this->_passive) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
			if(!$this->_exec("PASV", "pasv")) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   123
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
			if(!$this->_checkCode()) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   127
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
			}
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   130
			$ip_port = explode(",", preg_replace("/^.+ \\(?([0-9]{1,3},[0-9]{1,3},[0-9]{1,3},[0-9]{1,3},[0-9]+,[0-9]+)\\)?.*$/s", "\\1", $this->_message));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
			$this->_datahost=$ip_port[0].".".$ip_port[1].".".$ip_port[2].".".$ip_port[3];
7
cf61fcea0001 resynchronize code repo with production
ymh <ymh.work@gmail.com>
parents: 5
diff changeset
   132
			$this->_dataport=(((int)$ip_port[4])<<8) + ((int)$ip_port[5]);
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
			$this->SendMSG("Connecting to ".$this->_datahost.":".$this->_dataport);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
			if(!@socket_connect($this->_ftp_data_sock, $this->_datahost, $this->_dataport)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
				$this->PushError("_data_prepare","socket_connect", socket_strerror(socket_last_error($this->_ftp_data_sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
			else $this->_ftp_temp_sock=$this->_ftp_data_sock;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
		} else {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
			if(!@socket_getsockname($this->_ftp_control_sock, $addr, $port)) {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   142
				$this->PushError("_data_prepare","cannot get control socket information", socket_strerror(socket_last_error($this->_ftp_control_sock)));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
			if(!@socket_bind($this->_ftp_data_sock,$addr)){
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   147
				$this->PushError("_data_prepare","cannot bind data socket", socket_strerror(socket_last_error($this->_ftp_data_sock)));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
			if(!@socket_listen($this->_ftp_data_sock)) {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   152
				$this->PushError("_data_prepare","cannot listen data socket", socket_strerror(socket_last_error($this->_ftp_data_sock)));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   153
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   154
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
			if(!@socket_getsockname($this->_ftp_data_sock, $this->_datahost, $this->_dataport)) {
19
3d72ae0968f4 upgrade wordpress to 6.0.2
ymh <ymh.work@gmail.com>
parents: 16
diff changeset
   157
				$this->PushError("_data_prepare","cannot get data socket information", socket_strerror(socket_last_error($this->_ftp_data_sock)));
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   158
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   160
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
			if(!$this->_exec('PORT '.str_replace('.',',',$this->_datahost.'.'.($this->_dataport>>8).'.'.($this->_dataport&0x00FF)), "_port")) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
			if(!$this->_checkCode()) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
		return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
	function _data_read($mode=FTP_ASCII, $fp=NULL) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
		$NewLine=$this->_eol_code[$this->OS_local];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
		if(is_resource($fp)) $out=0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
		else $out="";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   177
		if(!$this->_passive) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   178
			$this->SendMSG("Connecting to ".$this->_datahost.":".$this->_dataport);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   179
			$this->_ftp_temp_sock=socket_accept($this->_ftp_data_sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   180
			if($this->_ftp_temp_sock===FALSE) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   181
				$this->PushError("_data_read","socket_accept", socket_strerror(socket_last_error($this->_ftp_temp_sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   182
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   183
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   184
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   185
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   186
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   187
		while(($block=@socket_read($this->_ftp_temp_sock, $this->_ftp_buff_size, PHP_BINARY_READ))!==false) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   188
			if($block==="") break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   189
			if($mode!=FTP_BINARY) $block=preg_replace("/\r\n|\r|\n/", $this->_eol_code[$this->OS_local], $block);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   190
			if(is_resource($fp)) $out+=fwrite($fp, $block, strlen($block));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   191
			else $out.=$block;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   192
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   193
		return $out;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   194
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   195
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   196
	function _data_write($mode=FTP_ASCII, $fp=NULL) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   197
		$NewLine=$this->_eol_code[$this->OS_local];
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   198
		if(is_resource($fp)) $out=0;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   199
		else $out="";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   200
		if(!$this->_passive) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   201
			$this->SendMSG("Connecting to ".$this->_datahost.":".$this->_dataport);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   202
			$this->_ftp_temp_sock=socket_accept($this->_ftp_data_sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   203
			if($this->_ftp_temp_sock===FALSE) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   204
				$this->PushError("_data_write","socket_accept", socket_strerror(socket_last_error($this->_ftp_temp_sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   205
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   206
				return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   207
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   208
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   209
		if(is_resource($fp)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   210
			while(!feof($fp)) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   211
				$block=fread($fp, $this->_ftp_buff_size);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   212
				if(!$this->_data_write_block($mode, $block)) return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   213
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
		} elseif(!$this->_data_write_block($mode, $fp)) return false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   218
	function _data_write_block($mode, $block) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
		if($mode!=FTP_BINARY) $block=preg_replace("/\r\n|\r|\n/", $this->_eol_code[$this->OS_remote], $block);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   220
		do {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   221
			if(($t=@socket_write($this->_ftp_temp_sock, $block))===FALSE) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   222
				$this->PushError("_data_write","socket_write", socket_strerror(socket_last_error($this->_ftp_temp_sock)));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   223
				$this->_data_close();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
				return FALSE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
			}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   226
			$block=substr($block, $t);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   227
		} while(!empty($block));
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   228
		return true;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
	function _data_close() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
		@socket_close($this->_ftp_temp_sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
		@socket_close($this->_ftp_data_sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
		$this->SendMSG("Disconnected data from remote host");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
		return TRUE;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
	function _quit() {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
		if($this->_connected) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
			@socket_close($this->_ftp_control_sock);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
			$this->_connected=false;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
			$this->SendMSG("Socket closed");
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
		}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
?>