root/include/functions_announce.php

<?php

/*</span>
<span class="code-comment">Basic knowledge of how bencoding works is assumed. Details can be found
at <http://bitconjurer.org/BitTorrent/protocol.html>.
*/

function benc($obj) {</span>
<span class="code-keyword">        if ( !is_array($obj) || !isset($obj['type']) || !isset($obj['value']) ) {
                return;
        }
        switch ( $obj['type'] ) {
                case 'string':
                        return benc_str($obj['value']);
                case 'integer':
                        return benc_int($obj['value']);
                case 'list':
                        return benc_list($obj['value']);
                case 'dictionary':
                        return benc_dict($obj['value']);
                default:
                        return;
        }
}

function benc_str($s) {
        return strlen($s) . ':' . $s;
}

function benc_int($i) {
        return 'i' . $i . 'e';
}

function benc_list($a) {
        $s = 'l';
        for ( $i = 0; $i < sizeof($a); ++$i ) {
                $s .= benc($a[$i]);
        }
        $s .= 'e';
        return $s;
}

function benc_dict($d) {
        $s = 'd';
        $keys = array_keys($d);
        sort($keys);
        for ( $i = 0; $i < sizeof($keys); ++$i ) {
                $s .= benc_str($keys[$i]);
                $s .= benc($d[$keys[$i]]);
        }
        $s .= 'e';
        return $s;
}

function benc_resp ( $d ) {
    benc_resp_raw(benc(array('type' => 'dictionary', 'value' => $d)));
}

function err ( $msg ) {
    benc_resp(array(
        'failure reason' => array(
            'type' => 'string',
            'value' => $msg
        )
    ));
}

function benc_resp_raw ( $x ) {
    global $cache, $db;

    if ( $_SERVER['HTTP_ACCEPT_ENCODING'] == 'gzip' ) {
        header('Content-Encoding: gzip');
        $x = gzencode($x, 9, FORCE_GZIP);
    }
    header('Content-Type: text/plain');
    header('Pragma: no-cache');
    header('Cache-Control: no-cache, must-revalidate'); // HTTP/1.1
    header('Expires: Mon, 26 Jul 1997 05:00:00 +0400'); // Date in the past

    echo $x;

    if ( !empty($cache) ) {
        $cache->unload();
    }
    if ( !empty($db) ) {
        $db->sql_close();
    }
    exit();
}

function hash_pad($hash) {
    return str_pad($hash, 20);
}

function hash_where($name, $hash) {
    global $db;

    if ( is_array($hash) ) {
        $new_hash_arr = array();
        for ( $i = 0; $i < sizeof($hash); ++$i ) {
            $new_hash_arr[] = '\'' . $db->sql_escape(urldecode($hash[$i])) . '\'';
        }
        return $name . ' IN (' . implode(', ', $new_hash_arr) . ' )';
    }
    else {
        $shhash = str_replace(' ', '', $hash);
        if ( $shhash != $hash ) {
            return '(' . $name . ' = \'' . $db->sql_escape($hash) . '\' OR ' . $name . ' = \'' . $db->sql_escape($shhash) . '\')';
        }
        else {
            return $name . ' = \'' . $db->sql_escape($hash) . '\'';
        }
    }
}

?>