Verdana Experiments

/**
 * transform
 *
 * @param mixed $url
 * @access public
 * @return void
 */
function transform($url) {
    if (empty($url) or !preg_match('|^(?:http://)?([^/]+)|i', $url)) {
        return;
    }
 
    $url     = "http://tinyurl.com/create.php?url=$url";
    $content = file_get_contents($url);
    $pattern = '|<blockquote><b>(http://tinyurl\.com/([^<]+))</b><br><small>|i';
    preg_match($pattern, $content, $matches);
    return $matches[1];
}
 
// }}}
 
 
// {{{ revert($tinyurl)
 
/**
 * revert
 *
 * @param mixed $tinyurl
 * @access public
 * @return void
 */
function revert($tinyurl) {
    $url     = explode('.com/', $tinyurl);
    $url     = 'http://preview.tinyurl.com/' . $url[1];
    $preview = file_get_contents($url);
    $pattern = '/redirecturl" href="(.*)">/i';
    preg_match($pattern, $preview, $matches);
    return $matches[1];
}
 
// }}}
 
/* vim: set expandtab tabstop=4 shiftwidth=4: */