php 读取种子文件,php读取torrent种子的内容

/*** Class xBEncoder* Author: Angus.Fenying* Version: 0.1* Date: 2014-06-03** This class helps stringify or parse BENC* codes.** All Copyrights 2007 - 2014 Fenying Studio Reserved.*/classxBEncoder{

constREADY=0;constREAD_STR=1;constREAD_DICT=2;constREAD_LIST=3;constREAD_INT=4;constREAD_KEY=5;

public$y;protected$z,$m,$n;protected$stat;protected$stack;

/*** This method saves the status of current* encode/decode work.*/protected functionpush($newY,$newStat){array_push($this->stack,array($this->y,$this->z,$this->m,$this->n,$this->stat));list($this->y,$this->z,$this->m,$this->n,$this->stat) =array($newY,0,0,0,$newStat);}

/*** This method restore the saved status of current* encode/decode work.*/protected functionpop(){$t=array_pop($this->stack);if($t) {if($t[4] ==self::READ_DICT) {$t[0]->{$t[1]} =$this->y;$t[1] =0;}elseif($t[4] ==self::READ_LIST)$t[0][] =$this->y;list($this->y,$this->z,$this->m,$this->n,$this->stat) =$t;}}

/*** This method initializes the status of work.* YOU SHOULD CALL THIS METHOD BEFORE EVERYTHING.*/public functioninit(){$this->stat=self::READY;$this->stack=array();$this->z=$this->m=$this->n=0;}

/*** This method decode $s($l as length).* You can get $obj->y as the result.*/public functiondecode($s,$l){$this->y=0;for($i=0;$istat) {case self::READY:if($s[$i] =='d') {$this->y=newxBDict();$this->stat=self::READ_DICT;}elseif($s[$i] =='l') {$this->y=array();$this->stat=self::READ_LIST;}break;case self::READ_INT:if($s[$i] =='e') {$this->y->val=substr($s,$this->m,$i-$this->m);$this->pop();}break;case self::READ_STR:if(xBInt::isNum($s[$i]))continue;if($s[$i] =':') {$this->z=substr($s,$this->m,$i-$this->m);$this->y=substr($s,$i+1,$this->z+0);$i+=$this->z;$this->pop();}break;case self::READ_KEY:if(xBInt::isNum($s[$i]))continue;if($s[$i] =':') {$this->n=substr($s,$this->m,$i-$this->m);$this->z=substr($s,$i+1,$this->n+0);$i+=$this->n;$this->stat=self::READ_DICT;}break;case self::READ_DICT:if($s[$i] =='e') {$this->pop();break;}elseif(!$this->z) {$this->m=$i;$this->stat=self::READ_KEY;break;}case self::READ_LIST:switch($s[$i]) {case'e':$this->pop();break;case'd':$this->push(newxBDict(),self::READ_DICT);break;case'i':$this->push(newxBInt(),self::READ_INT);$this->m=$i+1;break;case'l':$this->push(array(),self::READ_LIST);break;default:if(xBInt::isNum($s[$i])) {$this->push('',self::READ_STR);$this->m=$i;}}break;}}$rtn=empty($this->stack);$this->init();return$rtn;}

/*** This method encode $obj->y into BEncode.*/public functionencode(){return$this->_encDo($this->y);}

protected function_encStr($str){returnstrlen($str) .':'.$str;}

protected function_encDo($o){if(is_string($o))return$this->_encStr($o);if($oinstanceofxBInt)return'i'.$o->val.'e';if($oinstanceofxBDict) {$r='d';foreach($oas$k=>$c)$r.=$this->_encStr($k) .$this->_encDo($c);return$r.'e';}if(is_array($o)) {$r='l';foreach($oas$c)$r.=$this->_encDo($c);return$r.'e';}}}

classxBDict{}

classxBInt{public$val;

public function__construct($val=0){$this->val=$val;}

public static functionisNum($chr){$chr=ord($chr);if($chr<=57&&$chr>=48)return true;return false;}}

//使用实例

$s=file_get_contents("test.torrent");$bc=newxBEncoder();$bc->init();$bc->decode($s,strlen($s));var_dump($bc->y);