View source
<?php
namespace Drupal\uc_store;
use Drupal\Core\Url;
class MarstonEncryption implements EncryptionInterface {
protected static $scramble1 = '! #$%&()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[]^_`"abcdefghijklmnopqrstuvwxyz{|}~';
protected static $scramble2 = 'f^jAE]okIOzU[2&q1{3`h5w_794p@6s8?BgP>dFV=m" D<TcS%Ze|r:lGK/uCy.Jx)HiQ!#$~(;Lt-R}Ma,NvW+Ynb*0X';
protected $errors = [];
protected $adj = 1.75;
protected $mod = 3;
public function encrypt($key, $plaintext, $sourcelen = 0) {
$this->errors = [];
$fudgefactor = $this
->convertKey($key);
if ($this->errors) {
return;
}
if (empty($plaintext)) {
return;
}
while (strlen($plaintext) < $sourcelen) {
$plaintext .= ' ';
}
$target = NULL;
$factor2 = 0;
for ($i = 0; $i < mb_strlen($plaintext); $i++) {
$char1 = mb_substr($plaintext, $i, 1);
$num1 = strpos(self::$scramble1, $char1);
if ($num1 === FALSE) {
$this->errors[] = t('Source string contains an invalid character (@char)', [
'@char' => $char1,
]);
return;
}
$adj = $this
->applyFudgeFactor($fudgefactor);
$factor1 = $factor2 + $adj;
$num2 = round($factor1) + $num1;
$num2 = $this
->checkRange($num2);
$factor2 = $factor1 + $num2;
$char2 = substr(self::$scramble2, $num2, 1);
$target .= $char2;
}
return $target;
}
public function decrypt($key, $cyphertext) {
$this->errors = [];
$fudgefactor = $this
->convertKey($key);
if ($this->errors) {
return;
}
if (empty($cyphertext)) {
return;
}
$target = NULL;
$factor2 = 0;
for ($i = 0; $i < strlen($cyphertext); $i++) {
$char2 = substr($cyphertext, $i, 1);
$num2 = strpos(self::$scramble2, $char2);
if ($num2 === FALSE) {
$this->errors[] = t('Source string contains an invalid character (@char)', [
'@char' => $char2,
]);
return;
}
$adj = $this
->applyFudgeFactor($fudgefactor);
$factor1 = $factor2 + $adj;
$num1 = $num2 - round($factor1);
$num1 = $this
->checkRange($num1);
$factor2 = $factor1 + $num2;
$char1 = substr(self::$scramble1, $num1, 1);
$target .= $char1;
}
return rtrim($target);
}
public function getErrors() {
return $this->errors;
}
public function setErrors(array $errors) {
$this->errors = $errors;
return $this;
}
public function setCypher($cypher) {
return $this;
}
public function getAdjustment() {
return $this->adj;
}
public function setAdjustment($adj) {
$this->adj = (double) $adj;
return $this;
}
public function getModulus() {
return $this->mod;
}
public function setModulus($mod) {
$this->mod = (int) abs($mod);
return $this;
}
protected function applyFudgeFactor(&$fudgefactor) {
static $alerted = FALSE;
if (!is_array($fudgefactor)) {
$fudge = 0;
if (!$alerted) {
$this->errors[] = t('No encryption key was found.');
\Drupal::messenger()
->addError(t('Ubercart cannot find a necessary encryption key. Refer to the store admin <a href=":url">dashboard</a> to isolate which one.', [
':url' => Url::fromRoute('uc_store.admin')
->toString(),
]));
$alerted = TRUE;
}
}
else {
$fudge = array_shift($fudgefactor);
}
$fudge = $fudge + $this->adj;
$fudgefactor[] = $fudge;
if (!empty($this->mod)) {
if ($fudge % $this->mod == 0) {
$fudge = $fudge * -1;
}
}
return $fudge;
}
protected function checkRange($num) {
$num = round($num);
$limit = strlen(self::$scramble1);
while ($num >= $limit) {
$num = $num - $limit;
}
while ($num < 0) {
$num = $num + $limit;
}
return $num;
}
protected function convertKey($key) {
if (empty($key)) {
return;
}
$array[] = strlen($key);
$tot = 0;
for ($i = 0; $i < strlen($key); $i++) {
$char = substr($key, $i, 1);
$num = strpos(self::$scramble1, $char);
if ($num === FALSE) {
$this->errors[] = t('Key contains an invalid character (@char)', [
'@char' => $char,
]);
return;
}
$array[] = $num;
$tot = $tot + $num;
}
$array[] = $tot;
return $array;
}
}