<?php

    $key = "\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00\x00";
    $s = file_get_contents("cpickle.dump");
    echo "\n";
    
    function decrypt($s, $key) {
        $ret = $s;
        for ($i = 0; $i < strlen($s); $i++) {
            $ch = ord($s[$i]);
            $ch2 = ord($key[$i%20]);
            $ret[$i] = chr($ch ^ $ch2);
        }
        return $ret;
    }
    
    function show($s, $key) {
        echo "-----01234567890123456789\n";
        $mys = decrypt($s, $key);
        for ($i = 0; $i < strlen($mys); $i++) {
            
            $ch = ord($mys[$i]);
            
            # newline
            if ($i % 20 == 0) {
                if ($i) echo "\n";
                $n = ($i/20).": ";
                while (strlen($n)<5) $n=" $n";
                echo $n;
            }
            
            # printable?
            if ($ch >= ord(' ') && $ch <= ord('z') && $key[$i%20] != "\x00") {
                echo chr($ch);
            } else {
                if ($ch == ord("\n")) echo '¬';
                else echo "*";
            }
            
        }
        echo "\n\n> ";
    }
    
    while (1) {
    
        show($s, $key);
        # x y char
        $cmd = trim(fgets(STDIN), "\r\n\t ");
        echo "\n";
        
        if ($cmd == "save") {
            file_put_contents("key.bin", $key);
            file_put_contents("dump.cp", decrypt($s, $key));
            echo "Dump and key saved!\n\n";
            continue;
        }
        
        $parts = explode(" ", $cmd);
        $y = intval($parts[0]);
        $x = intval($parts[1]);
        $pos = $x+$y*20;
        
        $ch = (($parts[2] == "\\n") ? "\n" : $parts[2]);
        
        if ($y < 0 or $y > (strlen($s)/20)+1) {
            echo "bad y\n\n";
            continue;
        }
        if ($x < 0 or $x > 19 or $pos >= strlen($s)) {
            echo "bad x\n\n";
            continue;
        }
        
        $key[$x] = chr(ord($s[$pos])^ord($ch));
        
    }
?>