芝麻web文件管理V1.00
编辑当前文件:/home/strato/chroot/opt/RZphp80/includes/doc/File_Bittorrent2/torrentinfo.php
| // +----------------------------------------------------------------------+ // | This library is free software; you can redistribute it and/or | // | modify it under the terms of the GNU Lesser General Public | // | License as published by the Free Software Foundation; either | // | version 2.1 of the License, or (at your option) any later version. | // | | // | This library is distributed in the hope that it will be useful, | // | but WITHOUT ANY WARRANTY; without even the implied warranty of | // | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | // | Lesser General Public License for more details. | // | | // | You should have received a copy of the GNU Lesser General Public | // | License along with this library; if not, write to the | // | Free Software Foundation, Inc. | // | 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA | // +----------------------------------------------------------------------+ /** * File_Bittorrent2 Example * Get Info from a .torrent file * * Usage: * # php torrentinfo.php -t file.torrent * * @author Markus Tacker
* @version $Id: torrentinfo.php 77 2007-08-26 09:42:22Z m $ */ // Includes require_once 'File/Bittorrent2/Decode.php'; require_once 'Console/Getargs.php'; // Get filename from command line $args_config = array( 'torrent' => array( 'short' => 't', 'min' => 1, 'max' => 1, 'desc' => 'Filename of the torrent' ), ); $args =& Console_Getargs::factory($args_config); if (PEAR::isError($args) or !($torrent = $args->getValue('torrent'))) { echo Console_Getargs::getHelp($args_config)."\n"; exit; } if (!is_readable($torrent)) { echo 'ERROR: "' . $torrent . "\" is not readable.\n"; exit; } $File_Bittorrent2_Decode = new File_Bittorrent2_Decode; $info = $File_Bittorrent2_Decode->decodeFile($torrent); foreach ($info as $key => $val) { echo str_pad($key . ': ', 20, ' ', STR_PAD_LEFT); switch($key) { case 'files': $n = 1; $files_n = count($val); $n_length = strlen($files_n); echo '(' . $files_n . ")\n"; foreach ($val as $file) { echo str_repeat(' ', 20) . '' . str_pad($n, $n_length, ' ', PAD_LEFT) . ': ' . $file['filename'] . "\n"; $n++; } break; case 'announce_list': echo "\n"; foreach ($val as $list) { echo str_repeat(' ', 20) . '- ' . join(', ', $list) . "\n"; } break; default: echo $val . "\n"; } } echo "\n"; ?>