include_once $pfad . '/navajo.coder.php';
$firsttime = FALSE;
if ($orgtxt == "") {
$orgtxt = JTEXT::_('DEFAULTTEXT');
$firsttime = TRUE;
}
$orgtxt = strtoupper($orgtxt);
$codtxtt = strtoupper($codtxt);
if (isset($_POST['decode'])) {
$orgtxt = dekodieren($codtxt);
}
if (isset($_POST['encode'])) {
$codtxt = kodieren(clean($orgtxt));
}
if (!isset($_POST['decode']) && !isset($_POST['encode']) && $firsttime == TRUE) {
$codtxt = kodieren(clean($orgtxt));
}
# Formulare einlesen
$form = file_get_contents($ks_hilf[pfad] . '/form.template');
# Formularstücke ersetzen
$form = str_replace('{-clean-}', $clean, $form);
$form = str_replace('{-orgtxt-}', $orgtxt, $form);
$form = str_replace('{-codtxt-}', $codtxt, $form);
$form = str_replace('<input type="text" name="key" value="0" size="3" width="3">', '<input type="text" name="key" value="' . $key . '" size="3" width="3">', $form);
$form = str_replace('{-action-}', '', $form);
$form = str_replace('{-orgtext-}', $lang_plaintext, $form);
$form = str_replace('{-codtext-}', $lang_ciphertext, $form);
$form = str_replace('{-encrypt-}', $lang_encode, $form);
$form = str_replace('{-decrypt-}', $lang_decode, $form);
$form = str_replace('MINE SWEEPER', "", $form);
# Ausgabe erzeugen
$orgtxt = strtoupper(normalisiere($orgtxt, $alfa36));
$codtxt = strtoupper(normalisiere($codtxt, $alfa));
$key = strtoupper(normalisiere($key, $alfa));
if ($key == "") {
$key = "CODE";
}
if (isset($_POST['decode'])) {
$sel1 = "SELECTED";
$orgtxt2 = dekodieren($codtxt, $key, $alfa);
$orgtxt = delarrabee($orgtxt2, $alfa, $alfanum[1]);
}
if (isset($_POST['encode']) || !isset($_POST['decode']) && !isset($_POST['encode']) && $firsttime == TRUE) {
$sel2 = "SELECTED";
$orgtxt2 = enlarrabee($orgtxt, $alfa, $alfanum[1]);
$orgtxt2 = strtoupper(normalisiere($orgtxt2, $alfa));
$codtxt = kodieren($orgtxt2, $key, $alfa);
}
if (strlen($key) > 2) {
$spacing = strlen($key);
}
if ($merken) {
$sObj3 = "checked";
} else {
$sObj3 = "";
}
$inhalt .= '
<form name=formular method=post>
<input type=hidden name=action value=yes>
<input type=hidden name=topic value=' . $topic . '>
<table border=0>
<tr><td>{-orgtext-}:<br><textarea name=orgtxt class="ctoformcss-txtinput-style ctoformcss-default-input-size" onKeyUp="this.value=this.value.toUpperCase()">' . spacing(strtoupper($orgtxt), $spacing) . '</textarea></td><td valign=middle>
function simplerotor($text, $alfa, $keys)
{
$a = makereflexive($alfa);
$mul = $keys;
$t = 0;
$n = count($alfa);
foreach (str_split($text) as $var) {
$out = $var;
foreach ($mul as $s) {
$out = kodieren($out, $alfa[$t * $s % $n], $alfa);
}
$l = count($a[1]);
$b[0] = $a[0];
for ($i = 0; $i < $l; $i++) {
$b[1][($t + $i) % $l] = $a[1][$i];
}
$t++;
$out2 .= ukw($out, $b);
}
return $out2;
}
$mkey = array_search($mulv, $mulzahl);
$mulv = $mulzahl[($mkey - 1) % sizeof($mulzahl)];
unset($mult);
}
if ($rott) {
$rotv = findrot($codtxt);
}
if ($mult) {
$mulv = findmul($codtxt);
$alfa2 = createMulAlfa($alfa, $mulv);
$rotv = 0;
}
$alfa2 = createMulAlfa($alfa, $mulv);
$codtxt = substituiere($codtxt, $alfa2, $alfa);
$codtxt = dekodieren($codtxt, buchstabeVonIndex($alfa, $rotv), $alfa);
$codtxt = kodieren($codtxt, buchstabeVonIndex($alfa, $rotv), $alfa);
$codtxt = substituiere($codtxt, $alfa, $alfa2);
}
$lang_multiplier = JTEXT::_('MULTIPLIER');
$lang_frequency = JTEXT::_('FREQUENCYANALYSIS');
$inhalt .= '
<form name=formular method=post>
<table border=0>
<tr>
<td colspan=2>
<table>
<tr>
<td>
<textarea name=codtxt class="ctoformcss-txtinput-style ctoformcss-default-input-size" onClick="this.formular.codtxt.select();this.formular.codtxt.focus()">' . spacing(strtoupper($codtxt), $spacing) . '</textarea>
</td>
<td valign=middle><script type="text/javascript" src=js/ie_copy_codtxt.js></script></td>
