Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   PHP, PERL, MySQL, JavaScript (https://forum.antichat.xyz/forumdisplay.php?f=37)
-   -   Php криптор (https://forum.antichat.xyz/showthread.php?t=78843)

BlackSun 29.07.2008 10:10

Php криптор
 
Навалял сабж, правда баги окончательно выловить немогу, убиваю один - появляется 2 новых .. вообшем если кому надо, можете доработать) моск уже не варит, /me свалил спать, проснусь, доделаю

PHP код:

<?
    
function gen_rnd($len)
    {
        
$rnd_text null;
        for (
$i 0$i $len$i++)
        {
            
$temp rand(13);
            if (
$i == 0)
            {
                
$temp2 rand(12);
                if (
$temp2 == 1)
                {
                    
$rnd_text .= chr(rand(6590));
                } else 
                {
                    
$rnd_text .= chr(rand(97122));
                }
            } else 
            {
                if (
$temp == 1)
                {
                    
$rnd_text .= chr(rand(6590));
                } elseif (
$temp == 2
                {
                    
$rnd_text .= chr(rand(97122));
                } else 
                {
                    
$rnd_text .= chr(rand(4857));
                }
            }
        }
        return 
$rnd_text;
    }

    function 
rnd_trash()
    {
        
$len rand(110);
        
$words rand(13);
        
$tmp null;
        for (
$i 0$i $words$i++)
        {
            
$tmp .= gen_rnd($len);
            if (
rand(01) == 1)
            { 
$tmp .= ' '; }
        }
        return 
$tmp;
    }

    function 
gen_trash()
    {
        
$svar gen_rnd(10);
        
$tmp '$'.$svar.'=';
        
$trash_type rand(032);
        if (
rand(0,3) == 1)
        {
            
$tmp .= '"'.gen_rnd(24).'";$'.$svar.'=';
        }
        switch (
$trash_type)
        {
            case 
0$tmp .= rand(0,999).';/* '.rnd_trash().' */'; break;
            case 
1$tmp .= rand(0,999).';'; break;
            case 
2$tmp .= '"'.gen_rnd(10).'";'; break;
            case 
3$tmp .= 'substr($'.$svar.','.rand(0,10).');'; break;
            case 
4$tmp .= 'strpos($'.$svar.',"'.rnd_trash().'");'; break;
            case 
5$tmp .= '"'.rnd_trash().'";$'.$svar.'=base64_encode($'.$svar.');'; break;
            case 
6$tmp .= 'addslashes("'.rnd_trash().'");'; break;
            case 
7$tmp .= 'addslashes($'.$svar.');'; break;
            case 
8$tmp .= 'chr(rand(65,90));'; break;
            case 
9$tmp .= 'crc32("'.gen_rnd(rand(0,24)).'");'; break;
            case 
10$tmp .= 'htmlentities($'.$svar.');'; break;
            case 
11$tmp .= 'htmlspecialchars($'.$svar.');'; break;
            case 
12$tmp .= 'html_entity_decode($'.$svar.');'; break;
            case 
13$tmp .= 'array();'; break;
            case 
14$tmp .= 'ltrim($'.$svar.');'; break;
            case 
15$tmp .= 'quotemeta($'.$svar.');'; break;
            case 
16$tmp .= 'rtrim($'.$svar.');'; break;
            case 
17$tmp .= 'strcmp("'.gen_rnd(rand(1,10)).'","'.gen_rnd(rand(1,10)).'");'; break;
            case 
18$tmp .= 'strlen($'.$svar.');'; break;
            case 
19$tmp .= 'strlen($'.$svar.'."'.gen_rnd(8).'");'; break;
            case 
20$tmp .= 'stripcslashes($'.$svar.');'; break;
            case 
21$tmp .= 'stripos($'.$svar.',"'.rnd_trash().'");'; break;
            case 
22$tmp .= 'strip_tags($'.$svar.');'; break;
            case 
23$tmp .= 'strip_tags("'.gen_rnd(8).'");'; break;
            case 
24$tmp .= 'strstr($'.$svar.',$'.$svar.');'; break;
            case 
25$tmp .= 'stristr($'.$svar.',$'.$svar.');'; break;
            case 
26$tmp .= 'strstr("'.gen_rnd(rand(1,9)).'",$'.$svar.');'; break;
            case 
27$tmp .= 'strrev($'.$svar.');'; break;
            case 
28$tmp .= 'strrev("'.gen_rnd(rand(1,9)).'");'; break;
            case 
29$tmp .= 'str_rot13($'.$svar.');'; break;
            case 
30$tmp .= '"'.gen_rnd(rand(3,9)).'";';
                
$x '$'.gen_rnd(10);
                
$tmp .= 'for('.$x.'=0;'.$x.'<'.rand(0,3).';'.$x.'++){$'.$svar.'['.$x.']=$'.$svar.'['.$x.']^'.rand(2,9).';}';
                break;
            case 
31$tmp .= 'time();'; break;
            case 
32$tmp .= 'null;'; break;
        }
        return 
$tmp;
    }
    
    function 
trash()
    {
        
$rnd rand(13);
        
$tmp null;
        for (
$i 0$i $rnd$i++)
        {
            
$tmp .= gen_trash(False);
        }
        return 
$tmp;
    }
    
    function 
pcrypt($code)
    {
        
$start_pos strpos($code"<?php");
          if (
$start_pos === false)
        {
            
$start_pos strpos($code"<?");
            if (
$start_pos !== false)
            { 
$code substr($code$start_pos 2strlen($code)); }
          } else
          { 
$code substr($code$start_pos 5strlen($code)); }
          
$start_pos strrpos($code"?>");
          if (
is_int($start_pos)) { $code substr($code0$start_pos); }
        
          
$codelen strlen($code);
          
$blocks rand(0,10);
          
$names_arr = array();
          
$pos 0;
          
$crypted null;        
          
$loader null;
          for (
$i 0$i $blocks$i++)
          {        
              
$pwd rand(10,99);
              
$tmp substr($code$pos$codelen $blocks);
              
$tmp_len strlen($tmp);
              
$tmp gzdeflate($tmp);
              for (
$j 0$j $tmp_len$j ++)
              {
                  
$tmp[$j] = chr(ord($tmp[$j]) ^ $pwd);
              }
              
$tmp base64_encode($tmp);
              
$pos $pos + ($codelen $blocks);
              
$var_crypted '$'.gen_rnd(10);
              
$var_key '$'.gen_rnd(10);
              
$names_arr[] = array($var_crypted$var_key);
              
$crypted .= $var_crypted.'="'.$tmp.'";'.trash();
              
$crypted .= $var_key.'='.$pwd.';'.trash();
          }
          
$var_unpack '$'.gen_rnd(10);
          for (
$i 0$i $blocks$i++)
          {
              
$var_tmp '$'.gen_rnd(10);
              
$var_i '$'.gen_rnd(10);
              
$var_len '$'.gen_rnd(10);
              
$loader .= $var_tmp.'=base64_decode('.$names_arr[$i][0].');'.trash();
              
$loader .= $var_i.'=0;'.trash();
              
$loader .= $var_len.'=strlen('.$var_tmp.');'.trash();
              
$loader .= 'for('.$var_i.'=0;'.$var_i.'<'.$var_len.';'.$var_i.'++){';
              
$loader .= $var_tmp.'['.$var_i.']=chr(ord('.$var_tmp.'['.$var_i.'])^'.$names_arr[$i][1].');}'.trash();
              
$loader .= $var_unpack.'.=gzinflate('.$var_tmp.');'.trash();
              
$loader .= $var_tmp.'=null;'.trash();
          }
          
$loader base64_encode(gzdeflate($crypted.$loader.'eval('.$var_unpack.');'.$var_unpack.'=null;'.trash().trash()));
          
$loader "<?php\r\n eval(gzinflate(base64_decode('".$loader."'))); \r\n?>";
          return 
$loader;
    }
    
    
/* **************** */
    
if (isset($_POST['data']))
    {
        echo 
htmlspecialchars(pcrypt(stripslashes($_POST['data'])));
        die();
    }
?>
<html>
<head>
    <title>Simple PHP cryptor</title>
</head>
<body>
    <center>[PHPCrypt] by BlackSun [S.T.A.R.S. Team]</center><br>
    <form method="POST">
        <textarea name="data" style="width:70%;height:120px"></textarea><br>
        <input type="submit" value="Crypt php"><br><br>
        <font color="red">* После криптовки обязательно проверяйте работоспособность!</font>
    </form>
</body>
</html>


oneline 23.01.2009 08:07

мне нужно криптонуть шелл чем можно ещё кроме этого скрипта криптонуть ?

MaTpOc 23.01.2009 08:53

Цитата:

Сообщение от oneline
мне нужно криптонуть шелл чем можно ещё кроме этого скрипта криптонуть ?

ищи антивирем адовитую строку кода, потом шифруешь в базе64 и антивирь теперь будет другом твоего шела))

вот сылка http://www.motobit.com/util/base64-decoder-encoder.asp

ReduKToR 23.01.2009 09:25

Цитата:

вот сылка http://www.motobit.com/util/base64-decoder-encoder.asp
или www.base64.ru

ща затестим криптор

AkyHa_MaTaTa 23.01.2009 16:59

избыточнасть данных нихилая,
например код <?php echo "Crypt" ?> :
PHP код:

<?php eval(gzinflate(base64_decode('dVZrj6JIFP0rnYof6Gxnw6OoouLwAd+2iKLYopOZCQIqykMe4mOz/32L6R6BznbSH5pzTt2qe0/dWzYijvQHMBFzVwan0VBrR8G027LbiiLLoNlIdnC8WsUkHsv7LPDTk2t7lm/vrSRlKuRzs+Ec79xB63GsJ6dZ4rshU4EoHw+vt5SXVpkt24kt8AwYixMxUXHCAkrPe3ggaLaCBBlzzcZkGAhoO7mZnByefb/ZOCOe151pPtoX4e3gxIBLrgrYVxFegRdgLIoorwIUs67oju8yeDUPkhvCgagqvY9swjd4WLFjrqfJluOkvpXuXZpHCdMQaX/WCs7b3k585FFCxUEFMwqhN8ZSLUYJU00eL/2xQPa8Ikuo2diNxgIyZzi3HiFLiMrfvMg4KjO2pRY8/WOAdtCEMEol8FJhiwQ5tFg4e2GzlTdW6iL4y3HtyHGZRmkkla1NqHlCayJKMnCOiqHnQ2PNLs3r22HlSic9XPYxqMs2Az5URN172mPY2fcwfjLzIwmnhKsLP7Z1w/dtS6aoHY8Up7WMb0hmmw2by7as0U10Xrb3CZNYocMg8YWwz1RqXG/nXF9iBRc5nyJawhJ6AWv2TJ5OlxR7PDELZ0dzzr+k1tTHMphL7oKX8CFTbUiOyjkUt/YgGLugJqNhvdOvzNrR0CVMQ3mpKNkTPptLDzvKslJ+E81HCq/xbUcGi46OFlfEklQxpT26CofduYcnAqjJrCSxbgxdavanPWk6iBds7XKUcOHNakmM1ZocZjLo3oSNMdoFLG90590onypq7+DbDqjL9KMGj1ee7YgL9qnOfbbjwTw3t1HCfLKk/PpWKUMV/+uv538q5fheoX78tjFKHOYrwfPPSh8/N/9t2Od+Slo5i1+LUiduzgDbL+yMoaobG28Qjf6Wd3cv3PpW5n7yoStxdojYTuv47qX9qGfJUFnki+zMD01u8GewFBu8IUgOvqJHvJx5gcvUe+d9pnSIxF34VNMutctSwnTRkfeE5bYFhZEMrJi9djKjW1hQwT9ZUDJ0ef+tDXmJGNPT534tR1WRKrlshdnSXbZlYIppl5g4uYMa/mmXkqHLs3MuHvf8SFw+bnQJUb4N74Rn4zZH+9ze+tKRXmS1s5rdekKYZmYC4XAJajIa5lcSZZzAVNAin5kE5wd1OVwV16lzkG4qhhzXl0G/lRgZb5tSJGrH5CK0DshGECFQk8XnKHMDN7OYCkrjhjbJ0sgjreWHN9cbQv3r4EawnFBvAqaCUP2kx09iPKaRHhmXpS7stzERJWIT/WF/joaLm3gSzzta43YmXtldh215g909m3Onftc/TY6gLvNhvt4hpIgBeO+mevrl17fKgar4724qD/a9QlW66QsB7abyISm6Sbey9kTj++GCljtE3Y9DxdfXzXJL7qxaHKr8+sZVv34fpYzwvUL9kL8ifhK67Re9Wqv3yiP+HuW+pMjADXaq4Bii3UJpd73AA/0S8FjUQE32mJmVFnm33jVQILJ4OHulj5eqbLQ1vDh45M722LiJ3GvCHw1Qk1VuVYk+N93c8pnK8Wtz52MzpaeLqSB12PjP21uBXir/F08/J6GQy06sTd+gFWxxBtSzjMyHdLDHXRxATotBTfZIUptCbb2+G4T9n99RJUmVHSjpHjdb7OfVoQRiLMD2FWM62/4D'))); ?>


scrat 23.01.2009 20:52

1. это называется обфуксатор.
2. а не проще взять base64 всего кода,засунуть его в переменную,ну и дальше делать уже всё(можно даже писать это в файл,потом reuquir-ить его,а потом удалять).

Звeрь 24.01.2009 20:26

прикольно работает крипт?

DiFor 16.05.2009 00:00

ох какая до боли знакомая первая функция, ммм

bug1z 16.05.2009 00:16

Цитата:

Сообщение от oneline
мне нужно криптонуть шелл чем можно ещё кроме этого скрипта криптонуть ?

php криптор от KALISTO в помощ

Ru}{eeZ 16.05.2009 12:50

Цитата:

Сообщение от oneline
мне нужно криптонуть шелл чем можно ещё кроме этого скрипта криптонуть ?

ты автора обижаешь этим вопросом


Время: 21:37