/wp-content/plugins/s2member/src/includes/classes/utils-dirs.inc.php
PHP | 207 lines | 100 code | 18 blank | 89 comment | 39 complexity | 8a798c9f07e303bb35a9eb75a9e60edd MD5 | raw file
- <?php
- // @codingStandardsIgnoreFile
- /**
- * Directory utilities.
- *
- * Copyright: © 2009-2011
- * {@link http://websharks-inc.com/ WebSharks, Inc.}
- * (coded in the USA)
- *
- * Released under the terms of the GNU General Public License.
- * You should have received a copy of the GNU General Public License,
- * along with this software. In the main directory, see: /licensing/
- * If not, see: {@link http://www.gnu.org/licenses/}.
- *
- * @package s2Member\Utilities
- * @since 3.5
- */
- if(!defined('WPINC')) // MUST have WordPress.
- exit ("Do not access this file directly.");
- if (!class_exists ("c_ws_plugin__s2member_utils_dirs"))
- {
- /**
- * Directory utilities.
- *
- * @package s2Member\Utilities
- * @since 3.5
- */
- class c_ws_plugin__s2member_utils_dirs
- {
- /**
- * Normalizes directory separators in dir/file paths.
- *
- * @package s2Member\Utilities
- * @since 111017
- *
- * @param string $path Directory or file path.
- * @return string Directory or file path, after having been normalized by this routine.
- */
- public static function n_dir_seps ($path = FALSE)
- {
- return rtrim (preg_replace ("/\/+/", "/", str_replace (array(DIRECTORY_SEPARATOR, "\\", "/"), "/", (string)$path)), "/");
- }
- /**
- * Strips a trailing `/app_data/` sub-directory.
- *
- * @package s2Member\Utilities
- * @since 3.5
- *
- * @param string $path Directory or file path.
- * @return string Directory or file path without `/app_data/`.
- */
- public static function strip_dir_app_data ($path = FALSE)
- {
- return preg_replace ("/\/app_data$/", "", c_ws_plugin__s2member_utils_dirs::n_dir_seps ((string)$path));
- }
- /**
- * Basename from a full directory or file path.
- *
- * @package s2Member\Utilities
- * @since 110815
- *
- * @param string $path Directory or file path.
- * @return string Basename; including a possible `/app_data/` directory.
- */
- public static function basename_dir_app_data ($path = FALSE)
- {
- $path = preg_replace ("/\/app_data$/", "", c_ws_plugin__s2member_utils_dirs::n_dir_seps ((string)$path), 1, $app_data);
- return basename ($path) . (($app_data) ? "/app_data" : "");
- }
- /**
- * Shortens to a directory or file path, from document root.
- *
- * @package s2Member\Utilities
- * @since 110815
- *
- * @param string $path Directory or file path.
- * @return string Shorther path, from document root.
- */
- public static function doc_root_path ($path = FALSE)
- {
- $doc_root = c_ws_plugin__s2member_utils_dirs::n_dir_seps ($_SERVER["DOCUMENT_ROOT"]);
- return preg_replace ("/^" . preg_quote ($doc_root, "/") . "/", "", c_ws_plugin__s2member_utils_dirs::n_dir_seps ((string)$path));
- }
- /**
- * Finds the relative path, from one location to another.
- *
- * @package s2Member\Utilities
- * @since 110815
- *
- * @param string $from The full directory path to calculate a relative path `from`.
- * @param string $to The full directory or file path, which this routine will build a relative path `to`.
- * @param bool $try_realpaths Defaults to true. When true, try to acquire ``realpath()``, thereby resolving all relative paths and/or symlinks in ``$from`` and ``$to`` args.
- * @param bool $use_win_diff_drive_jctn Defaults to true. When true, we'll work around issues with different drives on Windows by trying to create a directory junction.
- * @return string String with the relative path to: ``$to``.
- */
- public static function rel_path ($from = FALSE, $to = FALSE, $try_realpaths = TRUE, $use_win_diff_drive_jctn = TRUE)
- {
- if ( /* Initialize/validate. */!($rel_path = array()) && is_string ($from) && strlen ($from) && is_string ($to) && strlen ($to))
- {
- $from = ($try_realpaths && ($_real_from = realpath ($from))) ? $_real_from : $from; // Try this?
- $to = ($try_realpaths && ($_real_to = realpath ($to))) ? $_real_to : $to; // Try to find realpath?
- $from = (is_file ($from)) ? dirname ($from) . "/" : $from . "/"; // A (directory) with trailing `/`.
- $from = c_ws_plugin__s2member_utils_dirs::n_dir_seps ($from); // Normalize directory separators now.
- $to = c_ws_plugin__s2member_utils_dirs::n_dir_seps ($to); // Normalize directory separators here too.
- $from = preg_split ("/\//", $from); // Convert ``$from``, to an array. Split on each directory separator.
- $to = preg_split ("/\//", $to); // Also convert ``$to``, to an array. Split this on each directory separator.
- if ($use_win_diff_drive_jctn && stripos (PHP_OS, "win") === 0 /* Test for different drives on Windows servers? */)
- if (/*Drive? */preg_match ("/^([A-Z])\:$/i", $from[0], $_m) && ($_from_drive = $_m[1]) && preg_match ("/^([A-Z])\:$/i", $to[0], $_m) && ($_to_drive = $_m[1]))
- if ( /* Are these locations on completely different drives? */$_from_drive !== $_to_drive)
- {
- $_from_drive_jctn = $_from_drive . ":/s2-" . $_to_drive . "-jctn";
- $_sys_temp_dir_jctn = c_ws_plugin__s2member_utils_dirs::get_temp_dir (false) . "/s2-" . $_to_drive . "-jctn";
- $_jctn = ($_sys_temp_dir_jctn && strpos ($_sys_temp_dir_jctn, $_from_drive) === 0) ? $_sys_temp_dir_jctn : $_from_drive_jctn;
- if (($_from_drive_jctn_exists = (is_dir ($_from_drive_jctn)) ? true : false) || c_ws_plugin__s2member_utils_dirs::create_win_jctn ($_jctn, $_to_drive . ":/"))
- {
- array_shift /* Shift drive off and use junction now. */ ($to);
- foreach (array_reverse (preg_split ("/\//", (($_from_drive_jctn_exists) ? $_from_drive_jctn : $_jctn))) as $_jctn_dir)
- array_unshift ($to, $_jctn_dir);
- }
- else // Else, we should trigger an error in this case. It's NOT possible to generate this.
- {
- trigger_error ("Unable to generate a relative path across different Windows drives." .
- " Please create a Directory Junction here: " . $_from_drive_jctn . ", pointing to: " . $_to_drive . ":/", E_USER_ERROR);
- }
- }
- unset($_real_from, $_real_to, $_from_drive, $_to_drive, $_from_drive_jctn, $_sys_temp_dir_jctn, $_jctn, $_from_drive_jctn_exists, $_jctn_dir, $_m);
- $rel_path = $to; // Re-initialize. Start ``$rel_path`` as the value of the ``$to`` array.
- foreach (array_keys ($from) as $_depth) // Each ``$from`` directory ``$_depth``.
- {
- if (isset ($from[$_depth], $to[$_depth]) && $from[$_depth] === $to[$_depth])
- array_shift ($rel_path);
- else if (($_remaining = count ($from) - $_depth) > 1)
- {
- $_left_p = -1 * (count ($rel_path) + ($_remaining - 1));
- $rel_path = array_pad ($rel_path, $_left_p, "..");
- break; // Stop now, no need to go any further.
- }
- else // Else, set as the same directory `./[0]`.
- {
- $rel_path[0] = "./" . $rel_path[0];
- break; // Stop now.
- }
- }
- }
- return implode ("/", $rel_path);
- }
- /**
- * Creates a directory Junction in Windows.
- *
- * @package s2Member\Utilities
- * @since 111013
- *
- * @param string $jctn Directory location of the Junction (i.e., the link).
- * @param string $target Target directory that this Junction will connect to.
- * @return bool True if created successfully, or already exists, else false.
- */
- public static function create_win_jctn ($jctn = FALSE, $target = FALSE)
- {
- if ($jctn && is_string ($jctn) && $target && is_string ($target) && stripos (PHP_OS, "win") === 0)
- {
- if (is_dir ($jctn)) // Does it already exist? If so return now.
- return true; // Return now to save extra processing time below.
- else if ( /* Possible? */function_exists ("shell_exec") && ($esa = "escapeshellarg"))
- {
- @shell_exec ("mklink /J " . $esa ($jctn) . " " . $esa ($target));
- clearstatcache (); // Clear ``stat()`` cache now.
- if (is_dir ($jctn)) // Created successfully?
- return true;
- }
- }
- return false; // Else return false.
- }
- /**
- * Get the system's temporary directory.
- *
- * @package s2Member\Utilities
- * @since 111017
- *
- * @param string $fallback Defaults to true. If true, fallback on WordPress routine if not available, or if not writable.
- * @return str|bool Full string path to a writable temp directory, else false on failure.
- */
- public static function get_temp_dir ($fallback = TRUE)
- {
- $temp_dir = (($temp_dir = realpath (sys_get_temp_dir ())) && is_writable ($temp_dir)) ? $temp_dir : false;
- $temp_dir = (!$temp_dir && $fallback && ($wp_temp_dir = realpath (get_temp_dir ())) && is_writable ($wp_temp_dir)) ? $wp_temp_dir : $temp_dir;
- return ($temp_dir) ? c_ws_plugin__s2member_utils_dirs::n_dir_seps ($temp_dir) : false;
- }
- }
- }