完善DEDECMS中的图片本化功能

function down_image($url, $filename){

    $url = str_ireplace('&', '&', $url);

    if(get_code($url) != '200'){
        preg_match("/:\/\/[^.]+\.(.*?)\//", $url, $preg);
        $ref = 'http://www.'.$preg[1].'/';
        if(get_code($url, $ref) != '200'){
            preg_match("/:\/\/(.*?)\//", $url, $preg);
            $ref = 'http://'.$preg[1].'/';
            if(get_code($url, $ref) != '200'){
                return FALSE;
            }
        }
    }

    $ch = curl_init();
    $fp = fopen($filename, 'w');
    curl_setopt($ch, CURLOPT_URL, $url);
    curl_setopt($ch, CURLOPT_TIMEOUT, 10);
    curl_setopt($ch, CURLOPT_RETURNTRANSFER, TRUE);
    curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
    curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
    curl_setopt($ch, CURLOPT_ENCODING, 'none');
    curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1);
    curl_setopt($ch, CURLOPT_USERAGENT, "Mozilla/4.0 (compatible; MSIE 5.01; Windows NT 5.0)"); 
    if(!empty($ref)){
        curl_setopt($ch, CURLOPT_REFERER, $ref); 
    }
    
    curl_setopt($ch, CURLOPT_FILE, $fp);
    $img = curl_exec($ch);
    if($img){
        return TRUE;
    }else{
        return FALSE;
    }
}

function get_code($url, $ref = ''){ 
    $ch = curl_init();
    curl_setopt($ch, CURLOPT_URL,$url);
    curl_setopt($ch, CURLOPT_HEADER,1);
    curl_setopt($ch, CURLOPT_NOBODY,1);
    curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0);
    curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0);
    curl_setopt($ch, CURLOPT_RETURNTRANSFER,1);
    curl_setopt($ch, CURLOPT_TIMEOUT,10);
    if(!empty($ref)){
        curl_setopt($ch, CURLOPT_REFERER, $ref); 
    }
    curl_exec($ch);

    $code= curl_getinfo($ch,CURLINFO_HTTP_CODE);
    curl_close($ch);

    return $code;
}