#!/usr/bin/php
<?php

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

$c1 = 'XGQIP RGWZY PUFWO MNBMW XBQTF MRGWG EWMXR MYIVE RPTMP IXYFK WRPWS RFIPW MXEJF PSBPF XREYF XTWZI';
$key_c1 = 'BEFGIJKMNOPQRSTUVWXYZ';

$c2 = 'ZWWLJ WLLAY TKKAO JWJUZ YYUJJ QWLLA AQJTX OKDPU JSAOH KSAQO ZAKJQ LWWVU ZLQHK IZOWS EWTSB WZIKA';
$key_c2 = 'ABDEHIJKLOPQSTUVWXYZ';

$c3 = 'YKOLC DHUYL UJRBJ MXXJV JNJVL DDHUY XLCKY NJFUJ EYHUX LYASV BBKMK DDUJJ CKYHB SAAJV JMWBS AJHVY';
$key_c3 = 'ABCDEFHJKLMNORSUVWXY';

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

$c5 = 'UFXFL HLRLJ CRMLG KMRRC FUFXF RRMLD ZLWCO SGXLZ ZXFUX MSOLC DLLRR PLMSO FXQGW TCQSQ SDCQF';
$key_c5 = 'CDFGHJKLMOPQRSTUWXZ';

$chars = "ABCDEFGHIJKLMNOPQRSTUVWXYZ"; 

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

$max = 0; // hier eintragen das letzte ergebnis

$xary = array();

// Mapping an Eng-Wahrscheinlichkeitstabelle
$x1 = 'LDORSYVNPBTMAUCFGEIHW';
$x2 = 'TYPFMUAOISGHDLRWEBCN';
$x3 = 'LHMRGBOEINUWPYCASFDT';
$x4 = 'EXTN-DOPFSAHNELYMRUW'; // TN geraten
$x5 = 'OLTCFPGESDYHANWRMIU';

while (1) {
        $z1 = do_replace($key_c1, $x1, $c1);

        $z2 = do_replace($key_c2, $x2, $c2);

        $z3 = do_replace($key_c3, $x3, $c3);

	$z4 = do_replace($key_c4, $x4, $c4);

        $z5 = do_replace($key_c5, $x5, $c5);

	// ---

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

	$x = "K1=$x1; K2=$x2; K3=$x3; K4=$x4; K5=$x5";

	$z = mix5($z1, $z2, $z3, $z4, $z5);

	$p = p($z, true, true);

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

	// ---

}


?>