<?
// scecc-file:  html/dynamic/redir.php
//    Updated:  _scecc_timestamp_gmt
//       Site:  _scecc_domain

// html/dynamic/redir.php - http redirection
// © 2004-2005 Misha Yurasov

// read args
$mime64 = (boolean)$_GET['m'];  // is url encoded with MIME base64?
$rot13  = (boolean)$_GET['r'];  // is url encoded with rot13?
$url    = $_GET['url'];

if (!empty($url))
{
	$url = rawurldecode($url);
	
	if ($rot13)
	{
		$url = str_rot13($url);
	}
	elseif ($mime64)
	{
	  $url = base64_decode($url);
	}
	
  $url = url_normalize($url);
}
//
if (empty($url))
{
	$url = isset($_SERVER['HTTP_REFERER']) ? $_SERVER['HTTP_REFERER'] : '/';
}

// do redirection
header('Location: ' . $url);
exit();

// --

// Canonicalizes an url, assuming that "http" is the default protocol
function url_normalize($url)
{  
  if (preg_match('#^([a-z0-9]+)?(://)?(.+)(/)?(.)*(/)?$#i', $url, $m))
  {
    $url = ($m[2] == '' ? 'http://' . $m[1] : $m[1] . '://') .
      $m[3] . $m[5] . $m[6];
    return $url;
  }
  else
  {
    return false;
  }
}

?>