1 | <?php
|
---|
2 | /**
|
---|
3 | * PemFTP - A Ftp implementation in pure PHP
|
---|
4 | *
|
---|
5 | * @package PemFTP
|
---|
6 | * @since 2.5
|
---|
7 | *
|
---|
8 | * @version 1.0
|
---|
9 | * @copyright Alexey Dotsenko
|
---|
10 | * @author Alexey Dotsenko
|
---|
11 | * @link http://www.phpclasses.org/browse/package/1743.html Site
|
---|
12 | * @license LGPL License http://www.opensource.org/licenses/lgpl-license.html
|
---|
13 | */
|
---|
14 |
|
---|
15 | /**
|
---|
16 | * Defines the newline characters, if not defined already.
|
---|
17 | *
|
---|
18 | * This can be redefined.
|
---|
19 | *
|
---|
20 | * @since 2.5
|
---|
21 | * @var string
|
---|
22 | */
|
---|
23 | if(!defined('CRLF')) define('CRLF',"\r\n");
|
---|
24 |
|
---|
25 | /**
|
---|
26 | * Sets whatever to autodetect ASCII mode.
|
---|
27 | *
|
---|
28 | * This can be redefined.
|
---|
29 | *
|
---|
30 | * @since 2.5
|
---|
31 | * @var int
|
---|
32 | */
|
---|
33 | if(!defined("FTP_AUTOASCII")) define("FTP_AUTOASCII", -1);
|
---|
34 |
|
---|
35 | /**
|
---|
36 | *
|
---|
37 | * This can be redefined.
|
---|
38 | * @since 2.5
|
---|
39 | * @var int
|
---|
40 | */
|
---|
41 | if(!defined("FTP_BINARY")) define("FTP_BINARY", 1);
|
---|
42 |
|
---|
43 | /**
|
---|
44 | *
|
---|
45 | * This can be redefined.
|
---|
46 | * @since 2.5
|
---|
47 | * @var int
|
---|
48 | */
|
---|
49 | if(!defined("FTP_ASCII")) define("FTP_ASCII", 0);
|
---|
50 |
|
---|
51 | /**
|
---|
52 | * Whether to force FTP.
|
---|
53 | *
|
---|
54 | * This can be redefined.
|
---|
55 | *
|
---|
56 | * @since 2.5
|
---|
57 | * @var bool
|
---|
58 | */
|
---|
59 | if(!defined('FTP_FORCE')) define('FTP_FORCE', true);
|
---|
60 |
|
---|
61 | /**
|
---|
62 | * @since 2.5
|
---|
63 | * @var string
|
---|
64 | */
|
---|
65 | define('FTP_OS_Unix','u');
|
---|
66 |
|
---|
67 | /**
|
---|
68 | * @since 2.5
|
---|
69 | * @var string
|
---|
70 | */
|
---|
71 | define('FTP_OS_Windows','w');
|
---|
72 |
|
---|
73 | /**
|
---|
74 | * @since 2.5
|
---|
75 | * @var string
|
---|
76 | */
|
---|
77 | define('FTP_OS_Mac','m');
|
---|
78 |
|
---|
79 | /**
|
---|
80 | * PemFTP base class
|
---|
81 | *
|
---|
82 | */
|
---|
83 | class ftp_base {
|
---|
84 | /* Public variables */
|
---|
85 | var $LocalEcho;
|
---|
86 | var $Verbose;
|
---|
87 | var $OS_local;
|
---|
88 | var $OS_remote;
|
---|
89 |
|
---|
90 | /* Private variables */
|
---|
91 | var $_lastaction;
|
---|
92 | var $_errors;
|
---|
93 | var $_type;
|
---|
94 | var $_umask;
|
---|
95 | var $_timeout;
|
---|
96 | var $_passive;
|
---|
97 | var $_host;
|
---|
98 | var $_fullhost;
|
---|
99 | var $_port;
|
---|
100 | var $_datahost;
|
---|
101 | var $_dataport;
|
---|
102 | var $_ftp_control_sock;
|
---|
103 | var $_ftp_data_sock;
|
---|
104 | var $_ftp_temp_sock;
|
---|
105 | var $_ftp_buff_size;
|
---|
106 | var $_login;
|
---|
107 | var $_password;
|
---|
108 | var $_connected;
|
---|
109 | var $_ready;
|
---|
110 | var $_code;
|
---|
111 | var $_message;
|
---|
112 | var $_can_restore;
|
---|
113 | var $_port_available;
|
---|
114 | var $_curtype;
|
---|
115 | var $_features;
|
---|
116 |
|
---|
117 | var $_error_array;
|
---|
118 | var $AuthorizedTransferMode;
|
---|
119 | var $OS_FullName;
|
---|
120 | var $_eol_code;
|
---|
121 | var $AutoAsciiExt;
|
---|
122 |
|
---|
123 | /* Constructor */
|
---|
124 | function ftp_base($port_mode=FALSE) {
|
---|
125 | $this->__construct($port_mode);
|
---|
126 | }
|
---|
127 |
|
---|
128 | function __construct($port_mode=FALSE, $verb=FALSE, $le=FALSE) {
|
---|
129 | $this->LocalEcho=$le;
|
---|
130 | $this->Verbose=$verb;
|
---|
131 | $this->_lastaction=NULL;
|
---|
132 | $this->_error_array=array();
|
---|
133 | $this->_eol_code=array(FTP_OS_Unix=>"\n", FTP_OS_Mac=>"\r", FTP_OS_Windows=>"\r\n");
|
---|
134 | $this->AuthorizedTransferMode=array(FTP_AUTOASCII, FTP_ASCII, FTP_BINARY);
|
---|
135 | $this->OS_FullName=array(FTP_OS_Unix => 'UNIX', FTP_OS_Windows => 'WINDOWS', FTP_OS_Mac => 'MACOS');
|
---|
136 | $this->AutoAsciiExt=array("ASP","BAT","C","CPP","CSS","CSV","JS","H","HTM","HTML","SHTML","INI","LOG","PHP3","PHTML","PL","PERL","SH","SQL","TXT");
|
---|
137 | $this->_port_available=($port_mode==TRUE);
|
---|
138 | $this->SendMSG("Staring FTP client class".($this->_port_available?"":" without PORT mode support"));
|
---|
139 | $this->_connected=FALSE;
|
---|
140 | $this->_ready=FALSE;
|
---|
141 | $this->_can_restore=FALSE;
|
---|
142 | $this->_code=0;
|
---|
143 | $this->_message="";
|
---|
144 | $this->_ftp_buff_size=4096;
|
---|
145 | $this->_curtype=NULL;
|
---|
146 | $this->SetUmask(0022);
|
---|
147 | $this->SetType(FTP_AUTOASCII);
|
---|
148 | $this->SetTimeout(30);
|
---|
149 | $this->Passive(!$this->_port_available);
|
---|
150 | $this->_login="anonymous";
|
---|
151 | $this->_password="anon@ftp.com";
|
---|
152 | $this->_features=array();
|
---|
153 | $this->OS_local=FTP_OS_Unix;
|
---|
154 | $this->OS_remote=FTP_OS_Unix;
|
---|
155 | $this->features=array();
|
---|
156 | if(strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') $this->OS_local=FTP_OS_Windows;
|
---|
157 | elseif(strtoupper(substr(PHP_OS, 0, 3)) === 'MAC') $this->OS_local=FTP_OS_Mac;
|
---|
158 | }
|
---|
159 |
|
---|
160 | // <!-- --------------------------------------------------------------------------------------- -->
|
---|
161 | // <!-- Public functions -->
|
---|
162 | // <!-- --------------------------------------------------------------------------------------- -->
|
---|
163 |
|
---|
164 | function parselisting($line) {
|
---|
165 | $is_windows = ($this->OS_remote == FTP_OS_Windows);
|
---|
166 | 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)) {
|
---|
167 | $b = array();
|
---|
168 | if ($lucifer[3]<70) { $lucifer[3]+=2000; } else { $lucifer[3]+=1900; } // 4digit year fix
|
---|
169 | $b['isdir'] = ($lucifer[7]=="<DIR>");
|
---|
170 | if ( $b['isdir'] )
|
---|
171 | $b['type'] = 'd';
|
---|
172 | else
|
---|
173 | $b['type'] = 'f';
|
---|
174 | $b['size'] = $lucifer[7];
|
---|
175 | $b['month'] = $lucifer[1];
|
---|
176 | $b['day'] = $lucifer[2];
|
---|
177 | $b['year'] = $lucifer[3];
|
---|
178 | $b['hour'] = $lucifer[4];
|
---|
179 | $b['minute'] = $lucifer[5];
|
---|
180 | $b['time'] = @mktime($lucifer[4]+(strcasecmp($lucifer[6],"PM")==0?12:0),$lucifer[5],0,$lucifer[1],$lucifer[2],$lucifer[3]);
|
---|
181 | $b['am/pm'] = $lucifer[6];
|
---|
182 | $b['name'] = $lucifer[8];
|
---|
183 | } else if (!$is_windows && $lucifer=preg_split("/[ ]/",$line,9,PREG_SPLIT_NO_EMPTY)) {
|
---|
184 | //echo $line."\n";
|
---|
185 | $lcount=count($lucifer);
|
---|
186 | if ($lcount<8) return '';
|
---|
187 | $b = array();
|
---|
188 | $b['isdir'] = $lucifer[0]{0} === "d";
|
---|
189 | $b['islink'] = $lucifer[0]{0} === "l";
|
---|
190 | if ( $b['isdir'] )
|
---|
191 | $b['type'] = 'd';
|
---|
192 | elseif ( $b['islink'] )
|
---|
193 | $b['type'] = 'l';
|
---|
194 | else
|
---|
195 | $b['type'] = 'f';
|
---|
196 | $b['perms'] = $lucifer[0];
|
---|
197 | $b['number'] = $lucifer[1];
|
---|
198 | $b['owner'] = $lucifer[2];
|
---|
199 | $b['group'] = $lucifer[3];
|
---|
200 | $b['size'] = $lucifer[4];
|
---|
201 | if ($lcount==8) {
|
---|
202 | sscanf($lucifer[5],"%d-%d-%d",$b['year'],$b['month'],$b['day']);
|
---|
203 | sscanf($lucifer[6],"%d:%d",$b['hour'],$b['minute']);
|
---|
204 | $b['time'] = @mktime($b['hour'],$b['minute'],0,$b['month'],$b['day'],$b['year']);
|
---|
205 | $b['name'] = $lucifer[7];
|
---|
206 | } else {
|
---|
207 | $b['month'] = $lucifer[5];
|
---|
208 | $b['day'] = $lucifer[6];
|
---|
209 | if (preg_match("/([0-9]{2}):([0-9]{2})/",$lucifer[7],$l2)) {
|
---|
210 | $b['year'] = date("Y");
|
---|
211 | $b['hour'] = $l2[1];
|
---|
212 | $b['minute'] = $l2[2];
|
---|
213 | } else {
|
---|
214 | $b['year'] = $lucifer[7];
|
---|
215 | $b['hour'] = 0;
|
---|
216 | $b['minute'] = 0;
|
---|
217 | }
|
---|
218 | $b['time'] = strtotime(sprintf("%d %s %d %02d:%02d",$b['day'],$b['month'],$b['year'],$b['hour'],$b['minute']));
|
---|
219 | $b['name'] = $lucifer[8];
|
---|
220 | }
|
---|
221 | }
|
---|
222 |
|
---|
223 | return $b;
|
---|
224 | }
|
---|
225 |
|
---|
226 | function SendMSG($message = "", $crlf=true) {
|
---|
227 | if ($this->Verbose) {
|
---|
228 | echo $message.($crlf?CRLF:"");
|
---|
229 | flush();
|
---|
230 | }
|
---|
231 | return TRUE;
|
---|
232 | }
|
---|
233 |
|
---|
234 | function SetType($mode=FTP_AUTOASCII) {
|
---|
235 | if(!in_array($mode, $this->AuthorizedTransferMode)) {
|
---|
236 | $this->SendMSG("Wrong type");
|
---|
237 | return FALSE;
|
---|
238 | }
|
---|
239 | $this->_type=$mode;
|
---|
240 | $this->SendMSG("Transfer type: ".($this->_type==FTP_BINARY?"binary":($this->_type==FTP_ASCII?"ASCII":"auto ASCII") ) );
|
---|
241 | return TRUE;
|
---|
242 | }
|
---|
243 |
|
---|
244 | function _settype($mode=FTP_ASCII) {
|
---|
245 | if($this->_ready) {
|
---|
246 | if($mode==FTP_BINARY) {
|
---|
247 | if($this->_curtype!=FTP_BINARY) {
|
---|
248 | if(!$this->_exec("TYPE I", "SetType")) return FALSE;
|
---|
249 | $this->_curtype=FTP_BINARY;
|
---|
250 | }
|
---|
251 | } elseif($this->_curtype!=FTP_ASCII) {
|
---|
252 | if(!$this->_exec("TYPE A", "SetType")) return FALSE;
|
---|
253 | $this->_curtype=FTP_ASCII;
|
---|
254 | }
|
---|
255 | } else return FALSE;
|
---|
256 | return TRUE;
|
---|
257 | }
|
---|
258 |
|
---|
259 | function Passive($pasv=NULL) {
|
---|
260 | if(is_null($pasv)) $this->_passive=!$this->_passive;
|
---|
261 | else $this->_passive=$pasv;
|
---|
262 | if(!$this->_port_available and !$this->_passive) {
|
---|
263 | $this->SendMSG("Only passive connections available!");
|
---|
264 | $this->_passive=TRUE;
|
---|
265 | return FALSE;
|
---|
266 | }
|
---|
267 | $this->SendMSG("Passive mode ".($this->_passive?"on":"off"));
|
---|
268 | return TRUE;
|
---|
269 | }
|
---|
270 |
|
---|
271 | function SetServer($host, $port=21, $reconnect=true) {
|
---|
272 | if(!is_long($port)) {
|
---|
273 | $this->verbose=true;
|
---|
274 | $this->SendMSG("Incorrect port syntax");
|
---|
275 | return FALSE;
|
---|
276 | } else {
|
---|
277 | $ip=@gethostbyname($host);
|
---|
278 | $dns=@gethostbyaddr($host);
|
---|
279 | if(!$ip) $ip=$host;
|
---|
280 | if(!$dns) $dns=$host;
|
---|
281 | if(ip2long($ip) === -1) {
|
---|
282 | $this->SendMSG("Wrong host name/address \"".$host."\"");
|
---|
283 | return FALSE;
|
---|
284 | }
|
---|
285 | $this->_host=$ip;
|
---|
286 | $this->_fullhost=$dns;
|
---|
287 | $this->_port=$port;
|
---|
288 | $this->_dataport=$port-1;
|
---|
289 | }
|
---|
290 | $this->SendMSG("Host \"".$this->_fullhost."(".$this->_host."):".$this->_port."\"");
|
---|
291 | if($reconnect){
|
---|
292 | if($this->_connected) {
|
---|
293 | $this->SendMSG("Reconnecting");
|
---|
294 | if(!$this->quit(FTP_FORCE)) return FALSE;
|
---|
295 | if(!$this->connect()) return FALSE;
|
---|
296 | }
|
---|
297 | }
|
---|
298 | return TRUE;
|
---|
299 | }
|
---|
300 |
|
---|
301 | function SetUmask($umask=0022) {
|
---|
302 | $this->_umask=$umask;
|
---|
303 | umask($this->_umask);
|
---|
304 | $this->SendMSG("UMASK 0".decoct($this->_umask));
|
---|
305 | return TRUE;
|
---|
306 | }
|
---|
307 |
|
---|
308 | function SetTimeout($timeout=30) {
|
---|
309 | $this->_timeout=$timeout;
|
---|
310 | $this->SendMSG("Timeout ".$this->_timeout);
|
---|
311 | if($this->_connected)
|
---|
312 | if(!$this->_settimeout($this->_ftp_control_sock)) return FALSE;
|
---|
313 | return TRUE;
|
---|
314 | }
|
---|
315 |
|
---|
316 | function connect($server=NULL) {
|
---|
317 | if(!empty($server)) {
|
---|
318 | if(!$this->SetServer($server)) return false;
|
---|
319 | }
|
---|
320 | if($this->_ready) return true;
|
---|
321 | $this->SendMsg('Local OS : '.$this->OS_FullName[$this->OS_local]);
|
---|
322 | if(!($this->_ftp_control_sock = $this->_connect($this->_host, $this->_port))) {
|
---|
323 | $this->SendMSG("Error : Cannot connect to remote host \"".$this->_fullhost." :".$this->_port."\"");
|
---|
324 | return FALSE;
|
---|
325 | }
|
---|
326 | $this->SendMSG("Connected to remote host \"".$this->_fullhost.":".$this->_port."\". Waiting for greeting.");
|
---|
327 | do {
|
---|
328 | if(!$this->_readmsg()) return FALSE;
|
---|
329 | if(!$this->_checkCode()) return FALSE;
|
---|
330 | $this->_lastaction=time();
|
---|
331 | } while($this->_code<200);
|
---|
332 | $this->_ready=true;
|
---|
333 | $syst=$this->systype();
|
---|
334 | if(!$syst) $this->SendMSG("Can't detect remote OS");
|
---|
335 | else {
|
---|
336 | if(preg_match("/win|dos|novell/i", $syst[0])) $this->OS_remote=FTP_OS_Windows;
|
---|
337 | elseif(preg_match("/os/i", $syst[0])) $this->OS_remote=FTP_OS_Mac;
|
---|
338 | elseif(preg_match("/(li|u)nix/i", $syst[0])) $this->OS_remote=FTP_OS_Unix;
|
---|
339 | else $this->OS_remote=FTP_OS_Mac;
|
---|
340 | $this->SendMSG("Remote OS: ".$this->OS_FullName[$this->OS_remote]);
|
---|
341 | }
|
---|
342 | if(!$this->features()) $this->SendMSG("Can't get features list. All supported - disabled");
|
---|
343 | else $this->SendMSG("Supported features: ".implode(", ", array_keys($this->_features)));
|
---|
344 | return TRUE;
|
---|
345 | }
|
---|
346 |
|
---|
347 | function quit($force=false) {
|
---|
348 | if($this->_ready) {
|
---|
349 | if(!$this->_exec("QUIT") and !$force) return FALSE;
|
---|
350 | if(!$this->_checkCode() and !$force) return FALSE;
|
---|
351 | $this->_ready=false;
|
---|
352 | $this->SendMSG("Session finished");
|
---|
353 | }
|
---|
354 | $this->_quit();
|
---|
355 | return TRUE;
|
---|
356 | }
|
---|
357 |
|
---|
358 | function login($user=NULL, $pass=NULL) {
|
---|
359 | if(!is_null($user)) $this->_login=$user;
|
---|
360 | else $this->_login="anonymous";
|
---|
361 | if(!is_null($pass)) $this->_password=$pass;
|
---|
362 | else $this->_password="anon@anon.com";
|
---|
363 | if(!$this->_exec("USER ".$this->_login, "login")) return FALSE;
|
---|
364 | if(!$this->_checkCode()) return FALSE;
|
---|
365 | if($this->_code!=230) {
|
---|
366 | if(!$this->_exec((($this->_code==331)?"PASS ":"ACCT ").$this->_password, "login")) return FALSE;
|
---|
367 | if(!$this->_checkCode()) return FALSE;
|
---|
368 | }
|
---|
369 | $this->SendMSG("Authentication succeeded");
|
---|
370 | if(empty($this->_features)) {
|
---|
371 | if(!$this->features()) $this->SendMSG("Can't get features list. All supported - disabled");
|
---|
372 | else $this->SendMSG("Supported features: ".implode(", ", array_keys($this->_features)));
|
---|
373 | }
|
---|
374 | return TRUE;
|
---|
375 | }
|
---|
376 |
|
---|
377 | function pwd() {
|
---|
378 | if(!$this->_exec("PWD", "pwd")) return FALSE;
|
---|
379 | if(!$this->_checkCode()) return FALSE;
|
---|
380 | return ereg_replace("^[0-9]{3} \"(.+)\".+", "\\1", $this->_message);
|
---|
381 | }
|
---|
382 |
|
---|
383 | function cdup() {
|
---|
384 | if(!$this->_exec("CDUP", "cdup")) return FALSE;
|
---|
385 | if(!$this->_checkCode()) return FALSE;
|
---|
386 | return true;
|
---|
387 | }
|
---|
388 |
|
---|
389 | function chdir($pathname) {
|
---|
390 | if(!$this->_exec("CWD ".$pathname, "chdir")) return FALSE;
|
---|
391 | if(!$this->_checkCode()) return FALSE;
|
---|
392 | return TRUE;
|
---|
393 | }
|
---|
394 |
|
---|
395 | function rmdir($pathname) {
|
---|
396 | if(!$this->_exec("RMD ".$pathname, "rmdir")) return FALSE;
|
---|
397 | if(!$this->_checkCode()) return FALSE;
|
---|
398 | return TRUE;
|
---|
399 | }
|
---|
400 |
|
---|
401 | function mkdir($pathname) {
|
---|
402 | if(!$this->_exec("MKD ".$pathname, "mkdir")) return FALSE;
|
---|
403 | if(!$this->_checkCode()) return FALSE;
|
---|
404 | return TRUE;
|
---|
405 | }
|
---|
406 |
|
---|
407 | function rename($from, $to) {
|
---|
408 | if(!$this->_exec("RNFR ".$from, "rename")) return FALSE;
|
---|
409 | if(!$this->_checkCode()) return FALSE;
|
---|
410 | if($this->_code==350) {
|
---|
411 | if(!$this->_exec("RNTO ".$to, "rename")) return FALSE;
|
---|
412 | if(!$this->_checkCode()) return FALSE;
|
---|
413 | } else return FALSE;
|
---|
414 | return TRUE;
|
---|
415 | }
|
---|
416 |
|
---|
417 | function filesize($pathname) {
|
---|
418 | if(!isset($this->_features["SIZE"])) {
|
---|
419 | $this->PushError("filesize", "not supported by server");
|
---|
420 | return FALSE;
|
---|
421 | }
|
---|
422 | if(!$this->_exec("SIZE ".$pathname, "filesize")) return FALSE;
|
---|
423 | if(!$this->_checkCode()) return FALSE;
|
---|
424 | return ereg_replace("^[0-9]{3} ([0-9]+)".CRLF, "\\1", $this->_message);
|
---|
425 | }
|
---|
426 |
|
---|
427 | function abort() {
|
---|
428 | if(!$this->_exec("ABOR", "abort")) return FALSE;
|
---|
429 | if(!$this->_checkCode()) {
|
---|
430 | if($this->_code!=426) return FALSE;
|
---|
431 | if(!$this->_readmsg("abort")) return FALSE;
|
---|
432 | if(!$this->_checkCode()) return FALSE;
|
---|
433 | }
|
---|
434 | return true;
|
---|
435 | }
|
---|
436 |
|
---|
437 | function mdtm($pathname) {
|
---|
438 | if(!isset($this->_features["MDTM"])) {
|
---|
439 | $this->PushError("mdtm", "not supported by server");
|
---|
440 | return FALSE;
|
---|
441 | }
|
---|
442 | if(!$this->_exec("MDTM ".$pathname, "mdtm")) return FALSE;
|
---|
443 | if(!$this->_checkCode()) return FALSE;
|
---|
444 | $mdtm = ereg_replace("^[0-9]{3} ([0-9]+)".CRLF, "\\1", $this->_message);
|
---|
445 | $date = sscanf($mdtm, "%4d%2d%2d%2d%2d%2d");
|
---|
446 | $timestamp = mktime($date[3], $date[4], $date[5], $date[1], $date[2], $date[0]);
|
---|
447 | return $timestamp;
|
---|
448 | }
|
---|
449 |
|
---|
450 | function systype() {
|
---|
451 | if(!$this->_exec("SYST", "systype")) return FALSE;
|
---|
452 | if(!$this->_checkCode()) return FALSE;
|
---|
453 | $DATA = explode(" ", $this->_message);
|
---|
454 | return array($DATA[1], $DATA[3]);
|
---|
455 | }
|
---|
456 |
|
---|
457 | function delete($pathname) {
|
---|
458 | if(!$this->_exec("DELE ".$pathname, "delete")) return FALSE;
|
---|
459 | if(!$this->_checkCode()) return FALSE;
|
---|
460 | return TRUE;
|
---|
461 | }
|
---|
462 |
|
---|
463 | function site($command, $fnction="site") {
|
---|
464 | if(!$this->_exec("SITE ".$command, $fnction)) return FALSE;
|
---|
465 | if(!$this->_checkCode()) return FALSE;
|
---|
466 | return TRUE;
|
---|
467 | }
|
---|
468 |
|
---|
469 | function chmod($pathname, $mode) {
|
---|
470 | if(!$this->site( sprintf('CHMOD %o %s', $mode, $pathname), "chmod")) return FALSE;
|
---|
471 | return TRUE;
|
---|
472 | }
|
---|
473 |
|
---|
474 | function restore($from) {
|
---|
475 | if(!isset($this->_features["REST"])) {
|
---|
476 | $this->PushError("restore", "not supported by server");
|
---|
477 | return FALSE;
|
---|
478 | }
|
---|
479 | if($this->_curtype!=FTP_BINARY) {
|
---|
480 | $this->PushError("restore", "can't restore in ASCII mode");
|
---|
481 | return FALSE;
|
---|
482 | }
|
---|
483 | if(!$this->_exec("REST ".$from, "resore")) return FALSE;
|
---|
484 | if(!$this->_checkCode()) return FALSE;
|
---|
485 | return TRUE;
|
---|
486 | }
|
---|
487 |
|
---|
488 | function features() {
|
---|
489 | if(!$this->_exec("FEAT", "features")) return FALSE;
|
---|
490 | if(!$this->_checkCode()) return FALSE;
|
---|
491 | $f=preg_split("/[".CRLF."]+/", preg_replace("/[0-9]{3}[ -].*[".CRLF."]+/", "", $this->_message), -1, PREG_SPLIT_NO_EMPTY);
|
---|
492 | $this->_features=array();
|
---|
493 | foreach($f as $k=>$v) {
|
---|
494 | $v=explode(" ", trim($v));
|
---|
495 | $this->_features[array_shift($v)]=$v;;
|
---|
496 | }
|
---|
497 | return true;
|
---|
498 | }
|
---|
499 |
|
---|
500 | function rawlist($pathname="", $arg="") {
|
---|
501 | return $this->_list(($arg?" ".$arg:"").($pathname?" ".$pathname:""), "LIST", "rawlist");
|
---|
502 | }
|
---|
503 |
|
---|
504 | function nlist($pathname="") {
|
---|
505 | return $this->_list(($arg?" ".$arg:"").($pathname?" ".$pathname:""), "NLST", "nlist");
|
---|
506 | }
|
---|
507 |
|
---|
508 | function is_exists($pathname) {
|
---|
509 | return $this->file_exists($pathname);
|
---|
510 | }
|
---|
511 |
|
---|
512 | function file_exists($pathname) {
|
---|
513 | $exists=true;
|
---|
514 | if(!$this->_exec("RNFR ".$pathname, "rename")) $exists=FALSE;
|
---|
515 | else {
|
---|
516 | if(!$this->_checkCode()) $exists=FALSE;
|
---|
517 | $this->abort();
|
---|
518 | }
|
---|
519 | if($exists) $this->SendMSG("Remote file ".$pathname." exists");
|
---|
520 | else $this->SendMSG("Remote file ".$pathname." does not exist");
|
---|
521 | return $exists;
|
---|
522 | }
|
---|
523 |
|
---|
524 | function fget($fp, $remotefile,$rest=0) {
|
---|
525 | if($this->_can_restore and $rest!=0) fseek($fp, $rest);
|
---|
526 | $pi=pathinfo($remotefile);
|
---|
527 | if($this->_type==FTP_ASCII or ($this->_type==FTP_AUTOASCII and in_array(strtoupper($pi["extension"]), $this->AutoAsciiExt))) $mode=FTP_ASCII;
|
---|
528 | else $mode=FTP_BINARY;
|
---|
529 | if(!$this->_data_prepare($mode)) {
|
---|
530 | return FALSE;
|
---|
531 | }
|
---|
532 | if($this->_can_restore and $rest!=0) $this->restore($rest);
|
---|
533 | if(!$this->_exec("RETR ".$remotefile, "get")) {
|
---|
534 | $this->_data_close();
|
---|
535 | return FALSE;
|
---|
536 | }
|
---|
537 | if(!$this->_checkCode()) {
|
---|
538 | $this->_data_close();
|
---|
539 | return FALSE;
|
---|
540 | }
|
---|
541 | $out=$this->_data_read($mode, $fp);
|
---|
542 | $this->_data_close();
|
---|
543 | if(!$this->_readmsg()) return FALSE;
|
---|
544 | if(!$this->_checkCode()) return FALSE;
|
---|
545 | return $out;
|
---|
546 | }
|
---|
547 |
|
---|
548 | function get($remotefile, $localfile=NULL, $rest=0) {
|
---|
549 | if(is_null($localfile)) $localfile=$remotefile;
|
---|
550 | if (@file_exists($localfile)) $this->SendMSG("Warning : local file will be overwritten");
|
---|
551 | $fp = @fopen($localfile, "w");
|
---|
552 | if (!$fp) {
|
---|
553 | $this->PushError("get","can't open local file", "Cannot create \"".$localfile."\"");
|
---|
554 | return FALSE;
|
---|
555 | }
|
---|
556 | if($this->_can_restore and $rest!=0) fseek($fp, $rest);
|
---|
557 | $pi=pathinfo($remotefile);
|
---|
558 | if($this->_type==FTP_ASCII or ($this->_type==FTP_AUTOASCII and in_array(strtoupper($pi["extension"]), $this->AutoAsciiExt))) $mode=FTP_ASCII;
|
---|
559 | else $mode=FTP_BINARY;
|
---|
560 | if(!$this->_data_prepare($mode)) {
|
---|
561 | fclose($fp);
|
---|
562 | return FALSE;
|
---|
563 | }
|
---|
564 | if($this->_can_restore and $rest!=0) $this->restore($rest);
|
---|
565 | if(!$this->_exec("RETR ".$remotefile, "get")) {
|
---|
566 | $this->_data_close();
|
---|
567 | fclose($fp);
|
---|
568 | return FALSE;
|
---|
569 | }
|
---|
570 | if(!$this->_checkCode()) {
|
---|
571 | $this->_data_close();
|
---|
572 | fclose($fp);
|
---|
573 | return FALSE;
|
---|
574 | }
|
---|
575 | $out=$this->_data_read($mode, $fp);
|
---|
576 | fclose($fp);
|
---|
577 | $this->_data_close();
|
---|
578 | if(!$this->_readmsg()) return FALSE;
|
---|
579 | if(!$this->_checkCode()) return FALSE;
|
---|
580 | return $out;
|
---|
581 | }
|
---|
582 |
|
---|
583 | function fput($remotefile, $fp) {
|
---|
584 | if($this->_can_restore and $rest!=0) fseek($fp, $rest);
|
---|
585 | $pi=pathinfo($remotefile);
|
---|
586 | if($this->_type==FTP_ASCII or ($this->_type==FTP_AUTOASCII and in_array(strtoupper($pi["extension"]), $this->AutoAsciiExt))) $mode=FTP_ASCII;
|
---|
587 | else $mode=FTP_BINARY;
|
---|
588 | if(!$this->_data_prepare($mode)) {
|
---|
589 | return FALSE;
|
---|
590 | }
|
---|
591 | if($this->_can_restore and $rest!=0) $this->restore($rest);
|
---|
592 | if(!$this->_exec("STOR ".$remotefile, "put")) {
|
---|
593 | $this->_data_close();
|
---|
594 | return FALSE;
|
---|
595 | }
|
---|
596 | if(!$this->_checkCode()) {
|
---|
597 | $this->_data_close();
|
---|
598 | return FALSE;
|
---|
599 | }
|
---|
600 | $ret=$this->_data_write($mode, $fp);
|
---|
601 | $this->_data_close();
|
---|
602 | if(!$this->_readmsg()) return FALSE;
|
---|
603 | if(!$this->_checkCode()) return FALSE;
|
---|
604 | return $ret;
|
---|
605 | }
|
---|
606 |
|
---|
607 | function put($localfile, $remotefile=NULL, $rest=0) {
|
---|
608 | if(is_null($remotefile)) $remotefile=$localfile;
|
---|
609 | if (!file_exists($localfile)) {
|
---|
610 | $this->PushError("put","can't open local file", "No such file or directory \"".$localfile."\"");
|
---|
611 | return FALSE;
|
---|
612 | }
|
---|
613 | $fp = @fopen($localfile, "r");
|
---|
614 |
|
---|
615 | if (!$fp) {
|
---|
616 | $this->PushError("put","can't open local file", "Cannot read file \"".$localfile."\"");
|
---|
617 | return FALSE;
|
---|
618 | }
|
---|
619 | if($this->_can_restore and $rest!=0) fseek($fp, $rest);
|
---|
620 | $pi=pathinfo($localfile);
|
---|
621 | if($this->_type==FTP_ASCII or ($this->_type==FTP_AUTOASCII and in_array(strtoupper($pi["extension"]), $this->AutoAsciiExt))) $mode=FTP_ASCII;
|
---|
622 | else $mode=FTP_BINARY;
|
---|
623 | if(!$this->_data_prepare($mode)) {
|
---|
624 | fclose($fp);
|
---|
625 | return FALSE;
|
---|
626 | }
|
---|
627 | if($this->_can_restore and $rest!=0) $this->restore($rest);
|
---|
628 | if(!$this->_exec("STOR ".$remotefile, "put")) {
|
---|
629 | $this->_data_close();
|
---|
630 | fclose($fp);
|
---|
631 | return FALSE;
|
---|
632 | }
|
---|
633 | if(!$this->_checkCode()) {
|
---|
634 | $this->_data_close();
|
---|
635 | fclose($fp);
|
---|
636 | return FALSE;
|
---|
637 | }
|
---|
638 | $ret=$this->_data_write($mode, $fp);
|
---|
639 | fclose($fp);
|
---|
640 | $this->_data_close();
|
---|
641 | if(!$this->_readmsg()) return FALSE;
|
---|
642 | if(!$this->_checkCode()) return FALSE;
|
---|
643 | return $ret;
|
---|
644 | }
|
---|
645 |
|
---|
646 | function mput($local=".", $remote=NULL, $continious=false) {
|
---|
647 | $local=realpath($local);
|
---|
648 | if(!@file_exists($local)) {
|
---|
649 | $this->PushError("mput","can't open local folder", "Cannot stat folder \"".$local."\"");
|
---|
650 | return FALSE;
|
---|
651 | }
|
---|
652 | if(!is_dir($local)) return $this->put($local, $remote);
|
---|
653 | if(empty($remote)) $remote=".";
|
---|
654 | elseif(!$this->file_exists($remote) and !$this->mkdir($remote)) return FALSE;
|
---|
655 | if($handle = opendir($local)) {
|
---|
656 | $list=array();
|
---|
657 | while (false !== ($file = readdir($handle))) {
|
---|
658 | if ($file != "." && $file != "..") $list[]=$file;
|
---|
659 | }
|
---|
660 | closedir($handle);
|
---|
661 | } else {
|
---|
662 | $this->PushError("mput","can't open local folder", "Cannot read folder \"".$local."\"");
|
---|
663 | return FALSE;
|
---|
664 | }
|
---|
665 | if(empty($list)) return TRUE;
|
---|
666 | $ret=true;
|
---|
667 | foreach($list as $el) {
|
---|
668 | if(is_dir($local."/".$el)) $t=$this->mput($local."/".$el, $remote."/".$el);
|
---|
669 | else $t=$this->put($local."/".$el, $remote."/".$el);
|
---|
670 | if(!$t) {
|
---|
671 | $ret=FALSE;
|
---|
672 | if(!$continious) break;
|
---|
673 | }
|
---|
674 | }
|
---|
675 | return $ret;
|
---|
676 |
|
---|
677 | }
|
---|
678 |
|
---|
679 | function mget($remote, $local=".", $continious=false) {
|
---|
680 | $list=$this->rawlist($remote, "-lA");
|
---|
681 | if($list===false) {
|
---|
682 | $this->PushError("mget","can't read remote folder list", "Can't read remote folder \"".$remote."\" contents");
|
---|
683 | return FALSE;
|
---|
684 | }
|
---|
685 | if(empty($list)) return true;
|
---|
686 | if(!@file_exists($local)) {
|
---|
687 | if(!@mkdir($local)) {
|
---|
688 | $this->PushError("mget","can't create local folder", "Cannot create folder \"".$local."\"");
|
---|
689 | return FALSE;
|
---|
690 | }
|
---|
691 | }
|
---|
692 | foreach($list as $k=>$v) {
|
---|
693 | $list[$k]=$this->parselisting($v);
|
---|
694 | if($list[$k]["name"]=="." or $list[$k]["name"]=="..") unset($list[$k]);
|
---|
695 | }
|
---|
696 | $ret=true;
|
---|
697 | foreach($list as $el) {
|
---|
698 | if($el["type"]=="d") {
|
---|
699 | if(!$this->mget($remote."/".$el["name"], $local."/".$el["name"], $continious)) {
|
---|
700 | $this->PushError("mget", "can't copy folder", "Can't copy remote folder \"".$remote."/".$el["name"]."\" to local \"".$local."/".$el["name"]."\"");
|
---|
701 | $ret=false;
|
---|
702 | if(!$continious) break;
|
---|
703 | }
|
---|
704 | } else {
|
---|
705 | if(!$this->get($remote."/".$el["name"], $local."/".$el["name"])) {
|
---|
706 | $this->PushError("mget", "can't copy file", "Can't copy remote file \"".$remote."/".$el["name"]."\" to local \"".$local."/".$el["name"]."\"");
|
---|
707 | $ret=false;
|
---|
708 | if(!$continious) break;
|
---|
709 | }
|
---|
710 | }
|
---|
711 | @chmod($local."/".$el["name"], $el["perms"]);
|
---|
712 | $t=strtotime($el["date"]);
|
---|
713 | if($t!==-1 and $t!==false) @touch($local."/".$el["name"], $t);
|
---|
714 | }
|
---|
715 | return $ret;
|
---|
716 | }
|
---|
717 |
|
---|
718 | function mdel($remote, $continious=false) {
|
---|
719 | $list=$this->rawlist($remote, "-la");
|
---|
720 | if($list===false) {
|
---|
721 | $this->PushError("mdel","can't read remote folder list", "Can't read remote folder \"".$remote."\" contents");
|
---|
722 | return false;
|
---|
723 | }
|
---|
724 |
|
---|
725 | foreach($list as $k=>$v) {
|
---|
726 | $list[$k]=$this->parselisting($v);
|
---|
727 | if($list[$k]["name"]=="." or $list[$k]["name"]=="..") unset($list[$k]);
|
---|
728 | }
|
---|
729 | $ret=true;
|
---|
730 |
|
---|
731 | foreach($list as $el) {
|
---|
732 | if ( empty($el) )
|
---|
733 | continue;
|
---|
734 |
|
---|
735 | if($el["type"]=="d") {
|
---|
736 | if(!$this->mdel($remote."/".$el["name"], $continious)) {
|
---|
737 | $ret=false;
|
---|
738 | if(!$continious) break;
|
---|
739 | }
|
---|
740 | } else {
|
---|
741 | if (!$this->delete($remote."/".$el["name"])) {
|
---|
742 | $this->PushError("mdel", "can't delete file", "Can't delete remote file \"".$remote."/".$el["name"]."\"");
|
---|
743 | $ret=false;
|
---|
744 | if(!$continious) break;
|
---|
745 | }
|
---|
746 | }
|
---|
747 | }
|
---|
748 |
|
---|
749 | if(!$this->rmdir($remote)) {
|
---|
750 | $this->PushError("mdel", "can't delete folder", "Can't delete remote folder \"".$remote."/".$el["name"]."\"");
|
---|
751 | $ret=false;
|
---|
752 | }
|
---|
753 | return $ret;
|
---|
754 | }
|
---|
755 |
|
---|
756 | function mmkdir($dir, $mode = 0777) {
|
---|
757 | if(empty($dir)) return FALSE;
|
---|
758 | if($this->is_exists($dir) or $dir == "/" ) return TRUE;
|
---|
759 | if(!$this->mmkdir(dirname($dir), $mode)) return false;
|
---|
760 | $r=$this->mkdir($dir, $mode);
|
---|
761 | $this->chmod($dir,$mode);
|
---|
762 | return $r;
|
---|
763 | }
|
---|
764 |
|
---|
765 | function glob($pattern, $handle=NULL) {
|
---|
766 | $path=$output=null;
|
---|
767 | if(PHP_OS=='WIN32') $slash='\\';
|
---|
768 | else $slash='/';
|
---|
769 | $lastpos=strrpos($pattern,$slash);
|
---|
770 | if(!($lastpos===false)) {
|
---|
771 | $path=substr($pattern,0,-$lastpos-1);
|
---|
772 | $pattern=substr($pattern,$lastpos);
|
---|
773 | } else $path=getcwd();
|
---|
774 | if(is_array($handle) and !empty($handle)) {
|
---|
775 | while($dir=each($handle)) {
|
---|
776 | if($this->glob_pattern_match($pattern,$dir))
|
---|
777 | $output[]=$dir;
|
---|
778 | }
|
---|
779 | } else {
|
---|
780 | $handle=@opendir($path);
|
---|
781 | if($handle===false) return false;
|
---|
782 | while($dir=readdir($handle)) {
|
---|
783 | if($this->glob_pattern_match($pattern,$dir))
|
---|
784 | $output[]=$dir;
|
---|
785 | }
|
---|
786 | closedir($handle);
|
---|
787 | }
|
---|
788 | if(is_array($output)) return $output;
|
---|
789 | return false;
|
---|
790 | }
|
---|
791 |
|
---|
792 | function glob_pattern_match($pattern,$string) {
|
---|
793 | $out=null;
|
---|
794 | $chunks=explode(';',$pattern);
|
---|
795 | foreach($chunks as $pattern) {
|
---|
796 | $escape=array('$','^','.','{','}','(',')','[',']','|');
|
---|
797 | while(strpos($pattern,'**')!==false)
|
---|
798 | $pattern=str_replace('**','*',$pattern);
|
---|
799 | foreach($escape as $probe)
|
---|
800 | $pattern=str_replace($probe,"\\$probe",$pattern);
|
---|
801 | $pattern=str_replace('?*','*',
|
---|
802 | str_replace('*?','*',
|
---|
803 | str_replace('*',".*",
|
---|
804 | str_replace('?','.{1,1}',$pattern))));
|
---|
805 | $out[]=$pattern;
|
---|
806 | }
|
---|
807 | if(count($out)==1) return($this->glob_regexp("^$out[0]$",$string));
|
---|
808 | else {
|
---|
809 | foreach($out as $tester)
|
---|
810 | if($this->my_regexp("^$tester$",$string)) return true;
|
---|
811 | }
|
---|
812 | return false;
|
---|
813 | }
|
---|
814 |
|
---|
815 | function glob_regexp($pattern,$probe) {
|
---|
816 | $sensitive=(PHP_OS!='WIN32');
|
---|
817 | return ($sensitive?
|
---|
818 | ereg($pattern,$probe):
|
---|
819 | eregi($pattern,$probe)
|
---|
820 | );
|
---|
821 | }
|
---|
822 |
|
---|
823 | function dirlist($remote) {
|
---|
824 | $list=$this->rawlist($remote, "-la");
|
---|
825 | if($list===false) {
|
---|
826 | $this->PushError("dirlist","can't read remote folder list", "Can't read remote folder \"".$remote."\" contents");
|
---|
827 | return false;
|
---|
828 | }
|
---|
829 |
|
---|
830 | $dirlist = array();
|
---|
831 | foreach($list as $k=>$v) {
|
---|
832 | $entry=$this->parselisting($v);
|
---|
833 | if ( empty($entry) )
|
---|
834 | continue;
|
---|
835 |
|
---|
836 | if($entry["name"]=="." or $entry["name"]=="..")
|
---|
837 | continue;
|
---|
838 |
|
---|
839 | $dirlist[$entry['name']] = $entry;
|
---|
840 | }
|
---|
841 |
|
---|
842 | return $dirlist;
|
---|
843 | }
|
---|
844 | // <!-- --------------------------------------------------------------------------------------- -->
|
---|
845 | // <!-- Private functions -->
|
---|
846 | // <!-- --------------------------------------------------------------------------------------- -->
|
---|
847 | function _checkCode() {
|
---|
848 | return ($this->_code<400 and $this->_code>0);
|
---|
849 | }
|
---|
850 |
|
---|
851 | function _list($arg="", $cmd="LIST", $fnction="_list") {
|
---|
852 | if(!$this->_data_prepare()) return false;
|
---|
853 | if(!$this->_exec($cmd.$arg, $fnction)) {
|
---|
854 | $this->_data_close();
|
---|
855 | return FALSE;
|
---|
856 | }
|
---|
857 | if(!$this->_checkCode()) {
|
---|
858 | $this->_data_close();
|
---|
859 | return FALSE;
|
---|
860 | }
|
---|
861 | $out="";
|
---|
862 | if($this->_code<200) {
|
---|
863 | $out=$this->_data_read();
|
---|
864 | $this->_data_close();
|
---|
865 | if(!$this->_readmsg()) return FALSE;
|
---|
866 | if(!$this->_checkCode()) return FALSE;
|
---|
867 | if($out === FALSE ) return FALSE;
|
---|
868 | $out=preg_split("/[".CRLF."]+/", $out, -1, PREG_SPLIT_NO_EMPTY);
|
---|
869 | // $this->SendMSG(implode($this->_eol_code[$this->OS_local], $out));
|
---|
870 | }
|
---|
871 | return $out;
|
---|
872 | }
|
---|
873 |
|
---|
874 | // <!-- --------------------------------------------------------------------------------------- -->
|
---|
875 | // <!-- Partie : gestion des erreurs -->
|
---|
876 | // <!-- --------------------------------------------------------------------------------------- -->
|
---|
877 | // Gnre une erreur pour traitement externe la classe
|
---|
878 | function PushError($fctname,$msg,$desc=false){
|
---|
879 | $error=array();
|
---|
880 | $error['time']=time();
|
---|
881 | $error['fctname']=$fctname;
|
---|
882 | $error['msg']=$msg;
|
---|
883 | $error['desc']=$desc;
|
---|
884 | if($desc) $tmp=' ('.$desc.')'; else $tmp='';
|
---|
885 | $this->SendMSG($fctname.': '.$msg.$tmp);
|
---|
886 | return(array_push($this->_error_array,$error));
|
---|
887 | }
|
---|
888 |
|
---|
889 | // Rcupre une erreur externe
|
---|
890 | function PopError(){
|
---|
891 | if(count($this->_error_array)) return(array_pop($this->_error_array));
|
---|
892 | else return(false);
|
---|
893 | }
|
---|
894 | }
|
---|
895 |
|
---|
896 | $mod_sockets=TRUE;
|
---|
897 | if (!extension_loaded('sockets')) {
|
---|
898 | $prefix = (PHP_SHLIB_SUFFIX == 'dll') ? 'php_' : '';
|
---|
899 | if(!@dl($prefix . 'sockets.' . PHP_SHLIB_SUFFIX)) $mod_sockets=FALSE;
|
---|
900 | }
|
---|
901 |
|
---|
902 | require_once "class-ftp-".($mod_sockets?"sockets":"pure").".php";
|
---|
903 | ?>
|
---|