Link Shorten Finder by IAL32(PHP Page)

<?php
    $URI = redirected_url();
    if ($URI != '') {
        echo '<a href="' . $URI . '" target="_blank">' . $URI . '</a>';
        echo '<script type="text/javascript">window.location = "' . $URI . '"</script>';
    }
    function redirected_url() {
        $UrlShortener = array('http://0rz.tw', 'http://2.gp', 'http://2tu.us', 'http://qr.net', 'http://7.ly',
                            'http://bit.ly', 'http://tinyurl.com', 'http://is.gd');
        if ($_GET["url"] != "") {
            $url = $_GET["url"];
            if (preg_match("/http:\/\/adf\.ly\/.{5}/", $url)) { // controllo se la url contiene adf.ly, metodo piuttosto brutto, ma per ora va bene
                $html = file_get_contents($url); // Richiamo il source della pagina
                if (preg_match('(\/go/.{32}/.{64})' , $html , $matches)) // Espressione regolare, evidenzio: /go/xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx(32 valori HEX)/xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx(64 valori hex/vari)
                {
                    return 'http://adf.ly' . $matches[0];
                    echo '<a href="http://adf.ly' . $matches[0] . '" target="_blank">http://adf.ly' . $matches[0] . '</a>'; // scrivo la url ottenuta, mettendoci anche un piccolo link :)
                }
            } elseif (preg_match("/(http:\/\/.{8}\.linkbucks\.com\/)/", $url, $m)) { //stessa cosa di adf.ly, ma con linkbucks
                $html = file_get_contents($url); // Richiamo il source della pagina
                if (preg_match("/(?<=TargetUrl = ').+?(?=')/" , $html, $matches)) //evidenzio la url, che si trova tra: "TargetUrl = '" e "'"
                {
                    return $matches[0];
                    echo '<a href="' . $matches[0] . '" target="_blank">' .$matches[0] . '</a>'; // scrivo la url ottenuta, mettendoci anche un piccolo link :)
                }
            } elseif (preg_match('/http:\/\/cli\.gs\/.{5}/', $url, $m)) {
                $html = file_get_contents($url);
                if (preg_match("/(?<=<title>Preview\sPage\s\W\s)(.*?)(?=<\/title>)/", $html, $matches))
                {
                    return $matches[0];
                    echo '<a href="' . $matches[0] . '" target="_blank">' .$matches[0] . '</a>';
                }
            } else { // se l'url non è una di quelle listate, allora scrivo
                echo 'Non è stata inserita una url valida. <br />';
                echo 'Inserire una url accorciata(shorten url) di uno dei seguenti siti: <br />';
                echo 'http://adf.ly/XXXXX <br />';
                echo 'XXXXXXXX.linkbucks.com <br />';
                echo '----- Url Shorten target url finder made by <strong>IAL32</strong> -----';
            }
        } else { // se non è stata inserita alcuna url dopo ?url= allora scrivo
            echo 'Non è stata inserita alcuna url da analizzare. <br />';
            echo 'Inserire la url di destinazione dopo "<strong>?url=</strong>" <br />';
            echo '----- Url Shorten target url finder made by <strong>IAL32</strong> -----';
        }
    }
    /* get_redirect_url()
    * Gets the address that the provided URL redirects to,
    * or FALSE if there's no redirect.
    *
    * @param string $url
    * @return string
    */
    function get_redirect_url($url){
        $redirect_url = null;
        $url_parts = @parse_url($url);
        if (!$url_parts) return false;
        if (!isset($url_parts['host'])) return false; //can't process relative URLs
        if (!isset($url_parts['path'])) $url_parts['path'] = '/';
        $sock = fsockopen($url_parts['host'], (isset($url_parts['port']) ? (int)$url_parts['port'] : 80), $errno, $errstr, 30);
        if (!$sock) return false;
        $request = "HEAD " . $url_parts['path'] . (isset($url_parts['query']) ? '?'.$url_parts['query'] : '') . " HTTP/1.1\r\n";
        $request .= 'Host: ' . $url_parts['host'] . "\r\n";
        $request .= "Connection: Close\r\n\r\n";
        fwrite($sock, $request);
        $response = '';
        while(!feof($sock)) $response .= fread($sock, 8192);
        fclose($sock);
        if (preg_match('/^Location: (.+?)$/m', $response, $matches)){
            if ( substr($matches[1], 0, 1) == "/" )
                return $url_parts['scheme'] . "://" . $url_parts['host'] . trim($matches[1]);
            else
                return trim($matches[1]);

        } else {
            return false;
        }
    }
    /* get_all_redirects()
    * Follows and collects all redirects, in order, for the given URL.
    *
    * @param string $url
    * @return array
    */
    function get_all_redirects($url){
        $redirects = array();
        while ($newurl = get_redirect_url($url)){
            if (in_array($newurl, $redirects)){
                break;
            }
            $redirects[] = $newurl;
            $url = $newurl;
        }
        return $redirects;
    }
    /* get_final_url()
    * Gets the address that the URL ultimately leads to.
    * Returns $url itself if it isn't a redirect.
    *
    * @param string $url
    * @return string
    */
    function get_final_url($url){
        $redirects = get_all_redirects($url);
        if (count($redirects)>0){
            return array_pop($redirects);
        } else {
            return $url;
        }
    }
?>