Показать сообщение отдельно

  #8  
Старый 02.05.2007, 22:36
DRON-ANARCHY
Отец порядка
Регистрация: 04.03.2005
Сообщений: 1,007
С нами: 11150246

Репутация: 412


По умолчанию

Товарищ Go0o$E модифицировал мой скрипт и добавлял туда шифровку/
смареть здеся
https://forum.antichat.ru/threadnav22898-2-10.html
вот код криптующего файла. Если че - качайте архив и изменяйте сами че вам нада
PHP код:
<?

function _fwk_filter_encrypt($content) 
{ 
  
$table = "0123456789abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ_@"; 
  
$xor = 165; 

  
// Prepare encoding table 
  
$table = array_keys(count_chars($table, 1)); 
  
$i_min = min($table); 
  
$i_max = max($table); 
  for (
$c = count($table); $c > 0; $r = mt_rand(0, $c--)) 
    
array_splice($table, $r, $c - $r, array_reverse(array_slice($table, $r, $c - $r))); 
     
  
// Encode sequence 
  
$len = strlen($content); 
  
$word = $shift = 0; 
  for (
$i = 0; $i < $len; $i++) 
  { 
    
$ch = $xor ^ ord($content[$i]); 
    
$word |= ($ch << $shift); 
    
$shift = ($shift + 2) % 6; 
    
$enc .= chr($table[$word & 0x3F]); 
    
$word >>= 6; 
    if (!
$shift) 
    { 
      
$enc .= chr($table[$word]); 
      
$word >>= 6; 
    } 
  } 
  if (
$shift) 
    
$enc .= chr($table[$word]); 

  
// Decode sequence 
  
$tbl = array_fill($i_min, $i_max - $i_min + 1, 0); 
  while (list(
$k,$v) = each($table)) 
    
$tbl[$v] = $k; 
  
$tbl = implode(",", $tbl); 
   
  
$fi = ",p=0,s=0,w=0,t=Array({$tbl})"; 
  
$f  = "w|=(t[x.charCodeAt(p++)-{$i_min}])<<s;"; 
  
$f .= "if(s){r+=String.fromCharCode({$xor}^w&255);w>>=8;s-=2}else{s=6}"; 
   
  
// Generate page 
  
$r = "<script language=JavaScript>"; 
  
$r.= "function decrypt_p(x){";
  
$r.= "var l=x.length,b=1024,i,j,r{$fi};"; 
  
$r.= "for(j=Math.ceil(l/b);j>0;j--){r='';for(i=Math.min(l,b);i>0;i--,l--){{$f}}document.write(r)}"; 
  
$r.= "}decrypt_p(\"{$enc}\")"; 
  
$r.= "</script>"; 
  return 
$r; 
} 
ob_start("_fwk_filter_encrypt"); 

?>
 
Ответить с цитированием