/**
* Finds the relative path, from one location to another.
*
* @package optimizeMember\Utilities
* @since 110815
*
* @param str $from The full directory path to calculate a relative path `from`.
* @param str $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 str 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 (!($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__optimizemember_utils_dirs::n_dir_seps($from);
/* Normalize directory separators now. */
$to = c_ws_plugin__optimizemember_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) {
/**/
if (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 ($_from_drive !== $_to_drive) {
$_from_drive_jctn = $_from_drive . ":/s2-" . $_to_drive . "-jctn";
$_sys_temp_dir_jctn = c_ws_plugin__optimizemember_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__optimizemember_utils_dirs::create_win_jctn($_jctn, $_to_drive . ":/")) {
array_shift($to);
foreach (array_reverse(preg_split("/\\//", $_from_drive_jctn_exists ? $_from_drive_jctn : $_jctn)) as $_jctn_dir) {
array_unshift($to, $_jctn_dir);
}
} else {
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) {
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 {
$rel_path[0] = "./" . $rel_path[0];
break;
/* Stop now. */
}
}
}
}
/**/
return implode("/", $rel_path);
}
