Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Klaida modifikacijoje, siunčiant išmeta lauk

Parašė Lietuvos_pilietis· 2008 Geg. 7 19:05:45
#7

Lietuvos_pilietis parašė:
Galunė lyg .torrent failo.. Čia radau kažkoki torrent failus kad skaitytu bet nzn ar tai tinkamas dalykas ir nzn kur det butent ji reik..

<?php
$input = "http://fdisk.projektas.in/uploads/101.torrent";
//if (!file_exists($input)) { exit("input file $input doesn't exists"); }

$str = file_get_contents($input);

function parse_torrent($s) {
 static $str;
 $str = $s;

// echo $str{0};

 if ($str{0} == 'd') {
 $str = substr($str,1);
 $ret = array();
 while (strlen($str) && $str{0} != 'e') {
 $key = parse_torrent($str);
 if (strlen($str) == strlen($s)) break; // prevent endless cycle if no changes made
 if (!strcmp($key, "info")) {
 $save = $str;
 }
// echo ".",$str{0};
 $value = parse_torrent($str);
 if (!strcmp($key, "info")) {
 $tosha = substr($save, 0, strlen($save) - strlen($str));
 $ret['info_hash'] = sha1($tosha);
 }

 // process hashes - make this stuff an array by piece
 if (!strcmp($key, "pieces")) {
 $value = explode("====",
 substr(
 chunk_split( $value, 20, "===="),
 0, -4
 )
 );
 };
 $ret[$key] = $value;
 }
 $str = substr($str,1);
 return $ret;
 } else if ($str{0} == 'i') {
// echo "_";
 $ret = substr($str, 1, strpos($str, "e")-1);
 $str = substr($str, strpos($str, "e")+1);
 return $ret;
 } else if ($str{0} == 'l') {
// echo "#";
 $ret = array();
 $str = substr($str, 1);
 while (strlen($str) && $str{0} != 'e') {
 $value = parse_torrent($str);
 if (strlen($str) == strlen($s)) break; // prevent endless cycle if no changes made
 $ret[] = $value;
 }
 $str = substr($str,1);
 return $ret;
 } else if (is_numeric($str{0})) {
// echo "@";
 $namelen = substr($str, 0, strpos($str, ":"));
 $name = substr($str, strpos($str, ":")+1, $namelen);
 $str = substr($str, strpos($str, ":")+1+$namelen);
 return $name;
 }
}

$bencode = parse_torrent($str);

print_r( $bencode );
?>




Padėkit žmonės dėl šito

Redagavo bad_user· 2008 Geg. 9 23:05:07