Thread: HTTP error 500
View Single Post
  #1  
Old 24th February 2009, 15:47
Floppy91 Floppy91 is offline
Member
 
Join Date: Dec 2008
Default
Posts: 12
Exclamation HTTP error 500
Hi all. I'm using TS 5,1 nulled by mrdecoder and I have a problem with data sending.. I used 5.1 version and everything seemed fine until I decided to change a domain name. I installed this engine on the same server again (with another account) and uploaded decoded benc.php file,as I did in previous site... 'cos ioncube is not installed on server..
PHP Code:
<?php

  
if (!defined ('IN_SCRIPT_TSSEv51'))
  {
    exit (
'<font face=\"verdana\" size=\"2\" color=\"darkred\">Error! Direct initialization of this file is not allowed.</font>');
  }

  @
error_reporting (E_ALL & ~E_NOTICE);
  @
ini_set ("error_reporting"E_ALL & ~E_NOTICE);
  @
ini_set ("display_errors""0");
  @
ini_set ("display_startup_errors""0");
  @
ini_set ("ignore_repeated_errors""1");
  @
ini_set ("log_errors""1");
  
function 
benc($obj) {
    if (!
is_array($obj) || !isset($obj['type']) || !isset($obj['value']))
        return;
    
$c $obj['value'];
    switch (
$obj['type']) {
        case 
'string':
            return 
benc_str($c);
        case 
'integer':
            return 
benc_int($c);
        case 
'list':
            return 
benc_list($c);
        case 
'dictionary':
            return 
benc_dict($c);
        default:
            return;
    }
}
function 
benc_str($s) {
    return 
strlen($s) . ':'.$s;
}
function 
benc_int($i) {
    return 
'i' $i 'e';
}
function 
benc_list($a) {
    
$s 'l';
    foreach (
$a as $e) {
        
$s .= benc($e);
    }
    
$s .= 'e';
    return 
$s;
}
function 
benc_dict($d) {
    
$s 'd';
    
$keys array_keys($d);
    
sort($keys);
    foreach (
$keys as $k) {
        
$v $d[$k];
        
$s .= benc_str($k);
        
$s .= benc($v);
    }
    
$s .= 'e';
    return 
$s;
}
function 
bdec_file($f$ms) {
    
$fp fopen($f'rb');
    if (!
$fp)
        return;
    
$e fread($fp$ms);
    
fclose($fp);
    return 
bdec($e);
}
function 
bdec($s) {
    if (
preg_match('/^(\d+):/'$s$m)) {
        
$l $m[1];
        
$pl strlen($l) + 1;
        
$v substr($s$pl$l);
        
$ss substr($s0$pl $l);
        if (
strlen($v) != $l)
            return;
        return array(
'type' => 'string''value' => $v'strlen' => strlen($ss), 'string' => $ss);
    }
    if (
preg_match('/^i(\d+)e/'$s$m)) {
        
$v $m[1];
        
$ss 'i' $v 'e';
        if (
$v === '-0')
            return;
        if (
$v[0] == '0' && strlen($v) != 1)
            return;
        return array(
'type' => 'integer''value' => $v'strlen' => strlen($ss), 'string' => $ss);
    }
    switch (
$s[0]) {
        case 
'l':
            return 
bdec_list($s);
        case 
'd':
            return 
bdec_dict($s);
        default:
            return;
    }
}
function 
bdec_list($s) {
    if (
$s[0] != 'l')
        return;
    
$sl strlen($s);
    
$i 1;
    
$v = array();
    
$ss 'l';
    for (;;) {
        if (
$i >= $sl)
            return;
        if (
$s[$i] == 'e')
            break;
        
$ret bdec(substr($s$i));
        if (!isset(
$ret) || !is_array($ret))
            return;
        
$v[] = $ret;
        
$i += $ret['strlen'];
        
$ss .= $ret['string'];
    }
    
$ss .= 'e';
    return array(
'type' => 'list''value' => $v'strlen' => strlen($ss), 'string' => $ss);
}
function 
bdec_dict($s) {
    if (
$s[0] != 'd')
        return;
    
$sl strlen($s);
    
$i 1;
    
$v = array();
    
$ss 'd';
    for (;;) {
        if (
$i >= $sl)
            return;
        if (
$s[$i] == 'e')
            break;
        
$ret bdec(substr($s$i));
        if (!isset(
$ret) || !is_array($ret) || $ret['type'] != 'string')
            return;
        
$k $ret['value'];
        
$i += $ret['strlen'];
        
$ss .= $ret['string'];
        if (
$i >= $sl)
            return;
        
$ret bdec(substr($s$i));
        if (!isset(
$ret) || !is_array($ret))
            return;
        
$v[$k] = $ret;
        
$i += $ret['strlen'];
        
$ss .= $ret['string'];
    }
    
$ss .= 'e';
    return array(
'type' => 'dictionary''value' => $v'strlen' => strlen($ss), 'string' => $ss);
}
?>
And now I can't seed files, because uTorrens throws an HTML 500 error.
Double checked banned clients which are turned off....
I don't know where I've made a misstake, because old tracker works perfectly on another account..
PLEASE HELP..:sorry:
Reply With Quote