Temos pavadinimas: WordPress, Shopify ir PHPFusion programuotojų bendruomenė :: Kas galetu perkuoduoti

Parašė gakse· 2010 Rugp. 29 21:08:31
#1

Sveiki tai gi kas galetu perkuodoti šita scripta, jis dabar koduotas ant win-1251 o yra gal mokančiu kuris galetu perkuodoti ant UTF-8

Tai gi pridedu scripta, ačiū kas perkuodos.


<?
// Page <span style="border-bottom: 1px dotted black;">HTML</span>-source encrypter
// (c) Sergey Kozub, <a href="mailto:skiv@softhome.net"><span style="color:005C5B">skiv@softhome.net</span></a>, <a href='http://cleverscripts.com' target='_blank'><span style='color:005C5B'>http://cleverscripts.com</span></a>
//
// Usage notes: 
//
// of your script. The <span style="border-bottom: 1px dotted black;">HTML</span> content will be automatically
// encrypted via Base64 algorithm so nobody can view it.
 
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"); 
 
?>

Redagavo ozzWANTED· 2010 Rugp. 30 15:08:59

Parašė gakse· 2010 Rugp. 29 22:08:34
#2

na matau kad niekas.

Parašė Žmogus· 2010 Rugp. 30 09:08:57
#3

Nu tai pabandyk su notepad++ padaryt converto to UTF8

Parašė ĄČĘĖĮŠŲ· 2010 Rugp. 30 10:08:59
#4

Notepade paprastam eina į utf išssaugot. :[

Parašė mariux7· 2010 Rugp. 30 10:08:54
#5

<?
// Page HTML-source encrypter
// (c) Sergey Kozub, kiv@softhome.net\">skiv@softhome.net, http://cleverscripts.com
//
// Usage notes:
//
// of your script. The HTML content will be automatically
// encrypted via Base64 algorithm so nobody can view it.

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");

?>





Parašė mariux7· 2010 Rugp. 30 10:08:28
#6

pabandyk šita: http://www.motobit.com/util/char...ersion.asp

Parašė viva· 2010 Rugp. 30 11:08:43
#7

Tingi notepada isijungti tu gal.
http://failai.in/show/F/9CD6EB55...riptas.php

Parašė gakse· 2010 Rugp. 31 09:08:02
#8

Jai su notepad eitu tai neprasyciau kad perkuoduoti, o cia sitas scriptas nerodo lt raidziu.
sorry, sitas scriptas neapsaugo fusiono... rakinkit tema.

Redagavo gakse· 2010 Rugp. 31 09:08:49