You are here

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;
}