[Summary view] [Print] [Text view]

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