Changeset 4377 for lang/php

Timestamp:

01/10/08 22:53:17 (5 years ago)

Author:

tasuku

Message:

lang/php/mumu: added MuUtil::absolute_uri

Files:

• lang/php/mumu/trunk/mumu.php (modified) (1 diff)

lang/php/mumu/trunk/mumu.php

@@ -95 +95 @@
     }
     return true;
+  }
+  public static function absolute_uri($base, $ref) {
+    $b = parse_url($base);
+    $uri = $b['scheme'].'://';
+    if (isset($b['user'])) {
+      $uri .= $b['user'];
+      if (isset($b['pass'])) {
+        $uri .= ':'. $b['pass'];
+      }
+      $uri .= '@';
+    }
+    $uri .= $b['host'];
+    if (isset($b['port'])) {
+      $uri .= ':'. $b['port'];
+    }
+    $paths = explode('/', $b['path']);
+    if ($ref[0] == '/') {
+      return $uri. $ref;
+    }
+    $refs = explode('/', $ref);
+    foreach ($refs as $r) {
+      switch ($r) {
+        case '':
+        case '.':
+          break;
+        case '..':
+          array_pop($paths);
+          break;
+        default:
+          $paths[] = $r;
+      }
+    }
+    $uri .= implode('/', $paths);
+    return $uri;
   }
 }