Eric @ EricBess WebHome

  <? Php 
  'http://www.php.net/manual/en/install.php' ; $ Path_a = 'http://www.php.net/manual/en/install.php'; 
  'http://www.php.net/downloads' ; $ Path_b = 'http://www.php.net/downloads'; 

  Path A:  " . $path_a ; echo "\ n Un chemin:". path_a $; 
  Path B:  " . $path_b ; echo "\ n Path B:". path_b $; 
  A to B:  " .  findRelativePath ( $path_a , $path_b ) ; //  ../../downloads/ echo "\ n A à B:". findRelativePath (path_a $, $ path_b) / / .. / .. / downloads / 
  B to A:  " .  findRelativePath ( $path_b , $path_a ) ; //  ../manual/en/install.php echo "\ n B à A:". findRelativePath (path_b $, $ path_a) / / .. / manual / fr / install.php 
  ?> 

  <? Php 
  $path_1 , $path_2 ) fonction findRelativePath (path_1 $, $ path_2) 
  ( 
      $path_1 == "" || $path_2 == "" ) if ($ path_1 == "" | | $ path_2 == "") 
      ( 
          ; return false; 
      ) 

      "/^(\\/|\w:\\/|https?:\\/\\/[^\\/]+\\/)?(.*)$/i" , $path_1 , $matches_1 ,  PREG_SET_ORDER ) ; preg_match_all ( "/ ^ (\ \ / | \ w: \ \ / | https?: \ \ / \ \ / [^ \ \ /] + \ \ /)?(.*)$/ i", $ path_1, $ matches_1, PREG_SET_ORDER); 
      "/^(\\/|\w:\\/|https?:\\/\\/[^\\/]+\\/)?(.*)$/i" , $path_2 , $matches_2 ,  PREG_SET_ORDER ) ; preg_match_all ( "/ ^ (\ \ / | \ w: \ \ / | https?: \ \ / \ \ / [^ \ \ /] + \ \ /)?(.*)$/ i", $ path_2, $ matches_2, PREG_SET_ORDER); 

      $matches_1 [ 0 ] [ 1 ] != $matches_2 [ 0 ] [ 1 ] ) if ($ matches_1 [0] [1]! = $ matches_2 [0] [1]) 
      ( 
          ; return false; 
      ) 

      explode ( "/" , $matches_1 [ 0 ] [ 2 ] ) ; $ Path_1_parts = explode ( "/", $ matches_1 [0] [2]); 
      explode ( "/" , $matches_2 [ 0 ] [ 2 ] ) ; $ Path_2_parts = explode ( "/", $ matches_2 [0] [2]); 

      isset ( $path_1_parts [ 0 ] ) && isset ( $path_2_parts [ 0 ] ) ) while (isset ($ path_1_parts [0]) & & isset ($ path_2_parts [0])) 
      ( 
          $path_1_parts [ 0 ] != $path_2_parts [ 0 ] ) if ($ path_1_parts [0]! = $ path_2_parts [0]) 
          ( 
              break; 
          ) 

          $path_1_parts ) ; array_shift (path_1_parts $); 
          $path_2_parts ) ; array_shift (path_2_parts $); 
      ) 

      $i = 0 , $path = "" ; $i < count ( $path_1_parts ) - 1 ; $i ++ ) for ($ i = 0, $ path = ""; $ i <count ($ path_1_parts) - 1; $ i + +) 
      ( 
          "../" ; $ Path .= "../"; 
      ) 
      . implode ( "/" , $path_2_parts ) ; return $ path. implode ( "/", $ path_2_parts); 
  ) 
  ?>