function _simplenews_statistics_rc4Encrypt in Simplenews Statistics 6.3
Encrypt given plain text using the key with RC4 algorithm. All parameters and return value are in binary format.
3 calls to _simplenews_statistics_rc4Encrypt()
- _simplenews_statistics_image_tag in ./
simplenews_statistics.module - Add hidden image for view statistics.
- _simplenews_statistics_rc4Decrypt in includes/
rc4.inc - Decrypt given cipher text using the key with RC4 algorithm. All parameters and return value are in binary format.
- _simplenews_statistics_replace_url in ./
simplenews_statistics.module - Alter link to go through statistics.
File
- includes/
rc4.inc, line 18 - RC4 symmetric cipher encryption/decryption Copyright (c) 2006 by Ali Farhadi. released under the terms of the Gnu Public License. see the GPL for details.
Code
function _simplenews_statistics_rc4Encrypt($key, $pt) {
$s = array();
for ($i = 0; $i < 256; $i++) {
$s[$i] = $i;
}
$j = 0;
$x;
for ($i = 0; $i < 256; $i++) {
$j = ($j + $s[$i] + ord($key[$i % strlen($key)])) % 256;
$x = $s[$i];
$s[$i] = $s[$j];
$s[$j] = $x;
}
$i = 0;
$j = 0;
$ct = '';
$y;
for ($y = 0; $y < strlen($pt); $y++) {
$i = ($i + 1) % 256;
$j = ($j + $s[$i]) % 256;
$x = $s[$i];
$s[$i] = $s[$j];
$s[$j] = $x;
$ct .= $pt[$y] ^ chr($s[($s[$i] + $s[$j]) % 256]);
}
return $ct;
}