#!/usr/bin/php
<?php

include __DIR__ . '/func.inc.phps';

define('SCHRITTERHOEHUNG', 0.1);

#error_reporting(E_ALL | E_NOTICE);

// TODO: mutation+selektion (wie bubblesort? nur random?)
// TODO: wahrscheinlichkeit des endbuchstabens

# PROBLEM: 1 permutationsschritt rückgängig reicht nicht aus, um das evolutionsmodell darzustellen!!!
#		... mehrere schritte gehen, wenn man nicht vorankommt
# PROBLEM: + problem bzgl c4 sonderregelung und überschneidungen (siehe unten)

// TODO + ausgangspunkt: englischnormalverteilung

include __DIR__ . '/../../dictanalysis/praxis/points.inc.phps';

$c4 = 'IFLJH IPIQG SLJHA MMKXB TIFLJ MSLSH SCGSH WBQBH MKBJW SELNS SHMMI ANTJM XJBKB AMTJM KMTBL NSK'; // CC
$c_num = 4;
$key_c4 = 'SCGH-ABEFIJKLMNPQTWX'; // ohne GH, da teilbekannt

function do_replace($s,$r,$x) {
        for ($i=0; $i<strlen($x); $i++) {
		for ($n=0; $n<strlen($s); $n++) {
			$nn = $s[$n];
                        if ($x[$i] == $nn) {
                                $x[$i] = $r[$n];
                                break;
                        }
                }
        }
        return $x;
}

$len = strlen($key_c4);

#if ($c_num != 4) {
	$chars = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; 
#} else {
#	$chars = 'aoishrdumwfgybvkjqz';
#	$chars = strtoupper($chars); # Englische verteilung, obere hälfte, ausgeschossen ist EX+TN/PN/PC/CP/CL
#}

srand((double)microtime()*1000000); 

# ---

if (file_exists(__DIR__ . '/2x.sav')) {
	$x = file_get_contents(__DIR__ . '/2x.sav');
	$max = file_get_contents(__DIR__ . '/2max.sav');
} else {
	$x = $key_c4; // TODO: besser englisch normalverteilung!
	$max = 0;
}

$schritte = 1;

while (1) {
	$x_bak = $x;
	$x = randomswap($x, $schritte);

	$z = do_replace($key_c4, $x, $c4);

	// ---

	// $x = key
	// $z = decrypted

	$p = p($z); // Punkte

	if ($p > $max) {
		$max = $p;
		$z = strtolower($z);
		echo date('d.m.Y H:i:s').' - ';
		echo "($x) $z\n";
		echo "\t--> $p\n";

		$h = fopen(__DIR__ . '/2x.sav', 'w+');
		fwrite($h, $x);
		fclose($h);

		// todo: eleganter wäre dynamische berechnung
	        $h = fopen(__DIR__ . '/2max.sav', 'w+');
                fwrite($h, $max);
                fclose($h);

		$schritte = 1;
	} else {
		$x = $x_bak; // Zurück
		$schritte += SCHRITTERHOEHUNG;
	}

	// ---

}