<?php

/**

 * WordPress FTP Filesystem.

 *

 * @package WordPress

 * @subpackage Filesystem

 */

/**

 * WordPress Filesystem Class for implementing FTP.

 *

 * @since 2.5.0

 *

 * @see WP_Filesystem_Base

 */

class WP_Filesystem_FTPext extends WP_Filesystem_Base {

	/**

	 * @since 2.5.0

	 * @var resource

	 */

	public $link;

	/**

	 * Constructor.

	 *

	 * @since 2.5.0

	 *

	 * @param array $opt

	 */

	public function __construct( $opt = '' ) {

		$this->method = 'ftpext';

		$this->errors = new WP_Error();

		// Check if possible to use ftp functions.

		if ( ! extension_loaded( 'ftp' ) ) {

			$this->errors->add( 'no_ftp_ext', __( 'The ftp PHP extension is not available' ) );

			return;

		}

		// This class uses the timeout on a per-connection basis, others use it on a per-action basis.

		if ( ! defined( 'FS_TIMEOUT' ) ) {

			define( 'FS_TIMEOUT', 4 * MINUTE_IN_SECONDS );

		}

		if ( empty( $opt['port'] ) ) {

			$this->options['port'] = 21;

		} else {

			$this->options['port'] = $opt['port'];

		}

		if ( empty( $opt['hostname'] ) ) {

			$this->errors->add( 'empty_hostname', __( 'FTP hostname is required' ) );

		} else {

			$this->options['hostname'] = $opt['hostname'];

		}

		// Check if the options provided are OK.

		if ( empty( $opt['username'] ) ) {

			$this->errors->add( 'empty_username', __( 'FTP username is required' ) );

		} else {

			$this->options['username'] = $opt['username'];

		}

		if ( empty( $opt['password'] ) ) {

			$this->errors->add( 'empty_password', __( 'FTP password is required' ) );

		} else {

			$this->options['password'] = $opt['password'];

		}

		$this->options['ssl'] = false;

		if ( isset( $opt['connection_type'] ) && 'ftps' === $opt['connection_type'] ) {

			$this->options['ssl'] = true;

		}

	}

	/**

	 * Connects filesystem.

	 *

	 * @since 2.5.0

	 *

	 * @return bool True on success, false on failure.

	 */

	public function connect() {

		if ( isset( $this->options['ssl'] ) && $this->options['ssl'] && function_exists( 'ftp_ssl_connect' ) ) {

			$this->link = @ftp_ssl_connect( $this->options['hostname'], $this->options['port'], FS_CONNECT_TIMEOUT );

		} else {

			$this->link = @ftp_connect( $this->options['hostname'], $this->options['port'], FS_CONNECT_TIMEOUT );

		}

		if ( ! $this->link ) {

			$this->errors->add(

				'connect',

				sprintf(

					/* translators: %s: hostname:port */

					__( 'Failed to connect to FTP Server %s' ),

					$this->options['hostname'] . ':' . $this->options['port']

				)

			);

			return false;

		}

		if ( ! @ftp_login( $this->link, $this->options['username'], $this->options['password'] ) ) {

			$this->errors->add(

				'auth',

				sprintf(

					/* translators: %s: Username. */

					__( 'Username/Password incorrect for %s' ),

					$this->options['username']

				)

			);

			return false;

		}

		// Set the connection to use Passive FTP.

		ftp_pasv( $this->link, true );

		if ( @ftp_get_option( $this->link, FTP_TIMEOUT_SEC ) < FS_TIMEOUT ) {

			@ftp_set_option( $this->link, FTP_TIMEOUT_SEC, FS_TIMEOUT );

		}

		return true;

	}

	/**

	 * Reads entire file into a string.

	 *

	 * @since 2.5.0

	 *

	 * @param string $file Name of the file to read.

	 * @return string|false Read data on success, false if no temporary file could be opened,

	 *                      or if the file couldn't be retrieved.

	 */

	public function get_contents( $file ) {

		$tempfile   = wp_tempnam( $file );

		$temphandle = fopen( $tempfile, 'w+' );

		if ( ! $temphandle ) {

			unlink( $tempfile );

			return false;

		}

		if ( ! ftp_fget( $this->link, $temphandle, $file, FTP_BINARY ) ) {

			fclose( $temphandle );

			unlink( $tempfile );

			return false;

		}

		fseek( $temphandle, 0 ); // Skip back to the start of the file being written to.

		$contents = '';

		while ( ! feof( $temphandle ) ) {

			$contents .= fread( $temphandle, 8 * KB_IN_BYTES );

		}

		fclose( $temphandle );

		unlink( $tempfile );

		return $contents;

	}

	/**

	 * Reads entire file into an array.

	 *

	 * @since 2.5.0

	 *

	 * @param string $file Path to the file.

	 * @return array|false File contents in an array on success, false on failure.

	 */

	public function get_contents_array( $file ) {

		return explode( "\n", $this->get_contents( $file ) );

	}

	/**

	 * Writes a string to a file.

	 *

	 * @since 2.5.0

	 *

	 * @param string    $file     Remote path to the file where to write the data.

	 * @param string    $contents The data to write.

	 * @param int|false $mode     Optional. The file permissions as octal number, usually 0644.

	 *                            Default false.

	 * @return bool True on success, false on failure.

	 */

	public function put_contents( $file, $contents, $mode = false ) {

		$tempfile   = wp_tempnam( $file );

		$temphandle = fopen( $tempfile, 'wb+' );

		if ( ! $temphandle ) {

			unlink( $tempfile );

			return false;

		}

		mbstring_binary_safe_encoding();

		$data_length   = strlen( $contents );

		$bytes_written = fwrite( $temphandle, $contents );

		reset_mbstring_encoding();

		if ( $data_length !== $bytes_written ) {

			fclose( $temphandle );

			unlink( $tempfile );

			return false;

		}

		fseek( $temphandle, 0 ); // Skip back to the start of the file being written to.

		$ret = ftp_fput( $this->link, $file, $temphandle, FTP_BINARY );

		fclose( $temphandle );

		unlink( $tempfile );

		$this->chmod( $file, $mode );

		return $ret;

	}

	/**

	 * Gets the current working directory.

	 *

	 * @since 2.5.0

	 *

	 * @return string|false The current working directory on success, false on failure.

	 */

	public function cwd() {

		$cwd = ftp_pwd( $this->link );

		if ( $cwd ) {

			$cwd = trailingslashit( $cwd );

		}

		return $cwd;

	}

	/**

	 * Changes current directory.

	 *

	 * @since 2.5.0

	 *

	 * @param string $dir The new current directory.

	 * @return bool True on success, false on failure.

	 */

	public function chdir( $dir ) {

		return @ftp_chdir( $this->link, $dir );

	}

	/**

	 * Changes filesystem permissions.

	 *

	 * @since 2.5.0

	 *

	 * @param string    $file      Path to the file.

	 * @param int|false $mode      Optional. The permissions as octal number, usually 0644 for files,

	 *                             0755 for directories. Default false.

	 * @param bool      $recursive Optional. If set to true, changes file permissions recursively.

	 *                             Default false.

	 * @return bool True on success, false on failure.

	 */

	public function chmod( $file, $mode = false, $recursive = false ) {

		if ( ! $mode ) {

			if ( $this->is_file( $file ) ) {

				$mode = FS_CHMOD_FILE;

			} elseif ( $this->is_dir( $file ) ) {

				$mode = FS_CHMOD_DIR;

			} else {

				return false;

			}

		}

		// chmod any sub-objects if recursive.

		if ( $recursive && $this->is_dir( $file ) ) {

			$filelist = $this->dirlist( $file );

			foreach ( (array) $filelist as $filename => $filemeta ) {

				$this->chmod( $file . '/' . $filename, $mode, $recursive );

			}

		}

		// chmod the file or directory.

		if ( ! function_exists( 'ftp_chmod' ) ) {

			return (bool) ftp_site( $this->link, sprintf( 'CHMOD %o %s', $mode, $file ) );

		}

		return (bool) ftp_chmod( $this->link, $mode, $file );

	}

	/**

	 * Gets the file owner.

	 *

	 * @since 2.5.0

	 *

	 * @param string $file Path to the file.

	 * @return string|false Username of the owner on success, false on failure.

	 */

	public function owner( $file ) {

		$dir = $this->dirlist( $file );

		return $dir[ $file ]['owner'];

	}

	/**

	 * Gets the permissions of the specified file or filepath in their octal format.

	 *

	 * @since 2.5.0

	 *

	 * @param string $file Path to the file.

	 * @return string Mode of the file (the last 3 digits).

	 */

	public function getchmod( $file ) {

		$dir = $this->dirlist( $file );

		return $dir[ $file ]['permsn'];

	}

	/**

	 * Gets the file's group.

	 *

	 * @since 2.5.0

	 *

	 * @param string $file Path to the file.

	 * @return string|false The group on success, false on failure.

	 */

	public function group( $file ) {

		$dir = $this->dirlist( $file );

		return $dir[ $file ]['group'];

	}

	/**

	 * Copies a file.

	 *

	 * @since 2.5.0

	 *

	 * @param string    $source      Path to the source file.

	 * @param string    $destination Path to the destination file.

	 * @param bool      $overwrite   Optional. Whether to overwrite the destination file if it exists.

	 *                               Default false.

	 * @param int|false $mode        Optional. The permissions as octal number, usually 0644 for files,

	 *                               0755 for dirs. Default false.

	 * @return bool True on success, false on failure.

	 */

	public function copy( $source, $destination, $overwrite = false, $mode = false ) {

		if ( ! $overwrite && $this->exists( $destination ) ) {

			return false;

		}

		$content = $this->get_contents( $source );

		if ( false === $content ) {

			return false;

		}

		return $this->put_contents( $destination, $content, $mode );

	}

	/**

	 * Moves a file or directory.

	 *

	 * After moving files or directories, OPcache will need to be invalidated.

	 *

	 * If moving a directory fails, `copy_dir()` can be used for a recursive copy.

	 *

	 * Use `move_dir()` for moving directories with OPcache invalidation and a

	 * fallback to `copy_dir()`.

	 *

	 * @since 2.5.0

	 *

	 * @param string $source      Path to the source file or directory.

	 * @param string $destination Path to the destination file or directory.

	 * @param bool   $overwrite   Optional. Whether to overwrite the destination if it exists.

	 *                            Default false.

	 * @return bool True on success, false on failure.

	 */

	public function move( $source, $destination, $overwrite = false ) {

		return ftp_rename( $this->link, $source, $destination );

	}

	/**

	 * Deletes a file or directory.

	 *

	 * @since 2.5.0

	 *

	 * @param string       $file      Path to the file or directory.

	 * @param bool         $recursive Optional. If set to true, deletes files and folders recursively.

	 *                                Default false.

	 * @param string|false $type      Type of resource. 'f' for file, 'd' for directory.

	 *                                Default false.

	 * @return bool True on success, false on failure.

	 */

	public function delete( $file, $recursive = false, $type = false ) {

		if ( empty( $file ) ) {

			return false;

		}

		if ( 'f' === $type || $this->is_file( $file ) ) {

			return ftp_delete( $this->link, $file );

		}

		if ( ! $recursive ) {

			return ftp_rmdir( $this->link, $file );

		}