TCPDFBarcode::barcode_rms4cc PHP Method

    protected function barcode_rms4cc($code, $kix = false)
    {
        $notkix = !$kix;
        // bar mode
        // 1 = pos 1, length 2
        // 2 = pos 1, length 3
        // 3 = pos 2, length 1
        // 4 = pos 2, length 2
        $barmode = array('0' => array(3, 3, 2, 2), '1' => array(3, 4, 1, 2), '2' => array(3, 4, 2, 1), '3' => array(4, 3, 1, 2), '4' => array(4, 3, 2, 1), '5' => array(4, 4, 1, 1), '6' => array(3, 1, 4, 2), '7' => array(3, 2, 3, 2), '8' => array(3, 2, 4, 1), '9' => array(4, 1, 3, 2), 'A' => array(4, 1, 4, 1), 'B' => array(4, 2, 3, 1), 'C' => array(3, 1, 2, 4), 'D' => array(3, 2, 1, 4), 'E' => array(3, 2, 2, 3), 'F' => array(4, 1, 1, 4), 'G' => array(4, 1, 2, 3), 'H' => array(4, 2, 1, 3), 'I' => array(1, 3, 4, 2), 'J' => array(1, 4, 3, 2), 'K' => array(1, 4, 4, 1), 'L' => array(2, 3, 3, 2), 'M' => array(2, 3, 4, 1), 'N' => array(2, 4, 3, 1), 'O' => array(1, 3, 2, 4), 'P' => array(1, 4, 1, 4), 'Q' => array(1, 4, 2, 3), 'R' => array(2, 3, 1, 4), 'S' => array(2, 3, 2, 3), 'T' => array(2, 4, 1, 3), 'U' => array(1, 1, 4, 4), 'V' => array(1, 2, 3, 4), 'W' => array(1, 2, 4, 3), 'X' => array(2, 1, 3, 4), 'Y' => array(2, 1, 4, 3), 'Z' => array(2, 2, 3, 3));
        $code = strtoupper($code);
        $len = strlen($code);
        $bararray = array('code' => $code, 'maxw' => 0, 'maxh' => 3, 'bcode' => array());
        if ($notkix) {
            // table for checksum calculation (row,col)
            $checktable = array('0' => array(1, 1), '1' => array(1, 2), '2' => array(1, 3), '3' => array(1, 4), '4' => array(1, 5), '5' => array(1, 0), '6' => array(2, 1), '7' => array(2, 2), '8' => array(2, 3), '9' => array(2, 4), 'A' => array(2, 5), 'B' => array(2, 0), 'C' => array(3, 1), 'D' => array(3, 2), 'E' => array(3, 3), 'F' => array(3, 4), 'G' => array(3, 5), 'H' => array(3, 0), 'I' => array(4, 1), 'J' => array(4, 2), 'K' => array(4, 3), 'L' => array(4, 4), 'M' => array(4, 5), 'N' => array(4, 0), 'O' => array(5, 1), 'P' => array(5, 2), 'Q' => array(5, 3), 'R' => array(5, 4), 'S' => array(5, 5), 'T' => array(5, 0), 'U' => array(0, 1), 'V' => array(0, 2), 'W' => array(0, 3), 'X' => array(0, 4), 'Y' => array(0, 5), 'Z' => array(0, 0));
            $row = 0;
            $col = 0;
            for ($i = 0; $i < $len; ++$i) {
                $row += $checktable[$code[$i]][0];
                $col += $checktable[$code[$i]][1];
            }
            $row %= 6;
            $col %= 6;
            $chk = array_keys($checktable, array($row, $col));
            $code .= $chk[0];
            ++$len;
        }
        $k = 0;
        if ($notkix) {
            // start bar
            $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 2, 'p' => 0);
            $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
            $bararray['maxw'] += 2;
        }
        for ($i = 0; $i < $len; ++$i) {
            for ($j = 0; $j < 4; ++$j) {
                switch ($barmode[$code[$i]][$j]) {
                    case 1:
                        $p = 0;
                        $h = 2;
                        break;
                    case 2:
                        $p = 0;
                        $h = 3;
                        break;
                    case 3:
                        $p = 1;
                        $h = 1;
                        break;
                    case 4:
                        $p = 1;
                        $h = 2;
                        break;
                }
                $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => $h, 'p' => $p);
                $bararray['bcode'][$k++] = array('t' => 0, 'w' => 1, 'h' => 2, 'p' => 0);
                $bararray['maxw'] += 2;
            }
        }
        if ($notkix) {
            // stop bar
            $bararray['bcode'][$k++] = array('t' => 1, 'w' => 1, 'h' => 3, 'p' => 0);
            $bararray['maxw'] += 1;
        }
        return $bararray;
    }