Chinaunix首页 | 论坛 | 博客
  • 博客访问: 18924438
  • 博文数量: 7460
  • 博客积分: 10434
  • 博客等级: 上将
  • 技术积分: 78178
  • 用 户 组: 普通用户
  • 注册时间: 2008-03-02 22:54
文章分类

全部博文(7460)

文章存档

2011年(1)

2009年(669)

2008年(6790)

分类:

2008-04-15 16:59:54

为了获取远端文件,编写了下面的一个小函数,基本各方面都考虑了,大家看看吧:
function getpic($url,$dir,$name){
    //获取url文件,然后存放到dir目录中,以name为文件名。
    //如果缺省文件名,则保留原文件名。
    $tmp=split("/",$url);
    $fname=$tmp[count($tmp)-1];//获取文件名
    if(empty($name)) {
        $name=$fname;//设定好文件名
    }else{//判断是否更改了文件的扩展名,如果更改的话,则改为文件本身的扩展名。
        $tmp1=split("\.",$fname);
        $tmp2=split("\.",$name);
        if(strcmp($tmp1[1],$tmp2[1])!=0) $name=$tmp2[0].".".$tmp1[1];
    }
    if(strstr($dir,"\\")){//说明是Windows环境下的目录
        if(substr($dir,-2)=="\\") $file=$dir.$name;else $file=$dir."\\".$name;
    }else{        
        if(substr($dir,"/")){//说明是环境下的目录
            if(substr($dir,-1)=="/") $file=$dir.$name;else $file=$dir."/".$fname;
        }
        else{ //给了一个非法的目录,函数退出
            echo "error directory!";
            return ;
        }
    }
    if(!(file_exists("$dir") && is_dir("$dir"))) {//如果目录不存在,则创建目录
        mkdir($dir,0777);
    }
    if(file_exists($file)) return;//如果文件存在,则放弃操作
    $fpo=fopen($file,"wb");
    if(!$fpo){
        echo "Sorry,create file:$file failure!Check your right!";
        return ;
    }
    $num=0;
    do{
        $num++;
        $fpi=fopen($url,"r");
        if(!$fpi) echo "open remote file falure...Retry!\r\n";
    }while(!$fpi && $num<3); //文件最多尝试打开三次,超过则退出。
    if(!fpi){
        echo "The network is buzy or Bad URL!";
        return ;
    }else echo "Open file OK!Now transfer....";
    while(!feof($fpi)){
        $cont=fread($fpi,128);
        fwrite($fpo,$cont,128);
    }
    fclose($fpi);
    fclose($fpo);
    echo "Success!";
}

阅读(227) | 评论(0) | 转发(0) |
给主人留下些什么吧!~~