binadd, php

gistfile1.php

function binadd($a, $b) {
    $n = strlen($a);
    $m = strlen($b);
    $max = max($n, $m);
    $sum = [];
    $r = 0;
    for ($i = 0; $i < $max; $i++) {
        $s = ($n > $i ? $a{$i} : 0) + ($m > $i ? $b{$i} : 0) + $r; $r = 0;
        $sum[] = $s & 1 ? '1' : '0';
        if ($s > 1) {
            $r = 1;
        }
    }
    if ($r) {
        $sum[] = '1';
    }
    return join('', $sum);
}