Pasted

<?php
$img = imagecreatefrompng("dogee.png");
 
 
 
function getScaled($img, $scale) {
    $width = imagesx($img);
    $height = imagesy($img);
 
    $newwidth = $width*$scale;
    $newheight = $height*$scale;
 
    $destination = imagecreatetruecolor($newwidth, $newheight);
    imagecopyresampled($destination, $img, 0, 0, 0, 0, $newwidth, $newheight, $width, $height);
    imagedestroy($img);
    $img = $destination;
    return $img;
}
 
function encode($img) {
    $width = imagesx($img);
    $height = imagesy($img);
    $out = array();
    $stream = 0;
    $streamIndex = 0;
    $outer = array();
    for($y = 0; $y < $height; $y++) {
        for($x = 0; $x < $width; $x++) {
            $rgb = imagecolorat($img, $x, $y);
            $colorIndex = imagecolorat($img, $x, $y);
            $colorInfo = imagecolorsforindex($img, $colorIndex);
            $r = $colorInfo["red"];
            $g = $colorInfo["green"];
            $b = $colorInfo["blue"];
            $val = ($r+$g+$b) / 3;
            $val = $val < 127 ? 1 : 0;
            $stream |= $val;
            if($streamIndex == 31) {
                $out[] = $stream;
                $streamIndex = 0;
                $stream = 0;
            } else {
                $streamIndex++;
                $stream <<= 1;
            }
            $outer[($y*$width)+$x] = $val;
        }
    }
    if($streamIndex != 0){
        $out[] = $stream << (31-$streamIndex);
    }
    $nw  = array();
    $nw[] = $width;
    $nw[] = $height;
    // Encode stream
    $uncodedSequence = array();
    $currentEqualityLength = 0;
    $currentEqualityValue = array(); // Or something that cannot be number
    foreach($out as $o) {
        if($currentEqualityLength == 0) { // No prior sequence
            if($currentEqualityValue == $o) { // Begin of the sequence
                $currentEqualityLength++;
            } else {
                $uncodedSequence[] = $o;
            }
            $currentEqualityValue = $o;
        } else { // Prior sequence, could either terminate or continue in it
            if($currentEqualityValue == $o) { // Sequence continuation
                $currentEqualityLength++;
            } else { // End of sequence, write it to output
                // Start with meta data
                $nw[] = (count($uncodedSequence) << 16) | $currentEqualityLength; // Number of uncoded data
                // Uncoded sequence
                foreach($uncodedSequence as $uc) {
                    $nw[] = $uc;
                }
                // Coded sequence
                $nw[] = $currentEqualityValue;
                
                // Reset settings
                $currentEqualityValue = $o;
                $uncodedSequence = array();
                $currentEqualityLength = 0;
                $uncodedSequence[] = $o;
            }
        }
    }
 
    // End of stream, push what is left
    $nw[] = (count($uncodedSequence) << 16) | $currentEqualityLength; // Number of collowing coded data
    foreach($uncodedSequence as $uc) {
        $nw[] = $uc;
    }
    if($currentEqualityLength > 0) {
        $nw[] = $currentEqualityValue;
    }
    
    $out = $nw;
    
    $sb = "const unsigned int dogee[] = {\r\n";
    $cnt = count($out)-1;
    $lastBreakLen = 0;
    foreach($out as $i=>$o) {
        $lb = $i % 10 == 9;
        
        $sb.="0x".dechex($o);
        if($cnt != $i) {
            $sb.=", ";
        }
        $len = strlen($sb);
        if($len - $lastBreakLen > 150) {
            $sb.="\r\n";
            $lastBreakLen = $len;
        }
    }
    $sb .= "\r\n};\r\n";
    return array($sb, $out, $outer);
}
 
function decode($img, $out, $outer) {
    $width = $out[0];
    $height = $out[1];
    $white = imagecolorallocate($img, 255,255,255);
    $black = imagecolorallocate($img, 0,0,0);
    $undef= imagecolorallocate($img, 255,127,127);
    for($y = 0; $y < $height; $y++) {
        for($x = 0; $x < $width; $x++) {
            imagesetpixel($img, $x, $y, $undef);
        }
    }
    
    $buffer = $out;
    $currentValIndex = 2;
    $currentValOffset = 31;
    
    $uncodedLeft = 0;
    $codedLeft = 0;
    
    for($y = 0; $y < $height; $y++) {
        for($x = 0; $x < $width; $x++) {
            if($uncodedLeft == 0 && $codedLeft == 0) {
                $uncodedLeft = $out[$currentValIndex] >> 16;
                $codedLeft = $out[$currentValIndex] & 0xffff;
                $currentValIndex += 1;
            }
            $val = $out[$currentValIndex];
            $val = $val >> $currentValOffset;
            $val = $val & 1;
            if($currentValOffset == 0) {
                if($uncodedLeft > 0) {
                    $currentValIndex++;
                    $uncodedLeft--;
                } else if($codedLeft > 0) {
                    $codedLeft--;
                    if($codedLeft == 0) {
                        $currentValIndex++;
                    }
                }
                $currentValOffset = 31;
            } else {
                $currentValOffset--;
            }
            imagesetpixel($img, $x, $y, $val == 1 ? $black : $white);
        }
    }
    return $img;
}
 
function show($img) {
    header('Content-Type: image/png');
    imagepng($img);
    imagedestroy($img);
}
if(isset($_GET["scale"])) {
    $img = getScaled($img, $_GET["scale"]);
}
list($sb, $out, $outer) = encode($img);
 
if(isset($_GET["output"])) {
    $output = $_GET["output"];
    if($output == "code") {
        die($sb);
    } else if($output == "image") {
        show($img);
    } else if($output == "test") {
        $img = decode($img, $out, $outer);
        show($img);
    } else {
        die("Invalid output. Valid is \"code\", \"test\" and \"image\"");
    }
}
 
die("<a href=?output=image>Continue here</a>");
 
 
?>