<?php


namespace AdamGaskins\Barcoder\KreativeKorp;

/****************************************************************************\

barcode.php - Generate barcodes from a single PHP file. MIT license.

Copyright (c) 2016-2018 Kreative Software.

Permission is hereby granted, free of charge, to any person obtaining a copy
of this software and associated documentation files (the "Software"), to deal
in the Software without restriction, including without limitation the rights
to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
copies of the Software, and to permit persons to whom the Software is
furnished to do so, subject to the following conditions:

The above copyright notice and this permission notice shall be included in
all copies or substantial portions of the Software.

THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER
DEALINGS IN THE SOFTWARE.

\****************************************************************************/

class Barcode
{
    public function output_image($format, $symbology, $data, $options)
    {
        switch (strtolower(preg_replace('/[^A-Za-z0-9]/', '', $format))) {
            case 'png':
                header('Content-Type: image/png');
                $image = $this->render_image($symbology, $data, $options);
                imagepng($image);
                imagedestroy($image);

                break;
            case 'gif':
                header('Content-Type: image/gif');
                $image = $this->render_image($symbology, $data, $options);
                imagegif($image);
                imagedestroy($image);

                break;
            case 'jpg': case 'jpe': case 'jpeg':
            header('Content-Type: image/jpeg');
            $image = $this->render_image($symbology, $data, $options);
            imagejpeg($image);
            imagedestroy($image);

            break;
            case 'svg':
                header('Content-Type: image/svg+xml');
                echo $this->render_svg($symbology, $data, $options);

                break;
        }
    }

    public function render_image($symbology, $data, $options)
    {
        list($code, $widths, $width, $height, $x, $y, $w, $h) =
            $this->encode_and_calculate_size($symbology, $data, $options);
        $image = imagecreatetruecolor($width, $height);
        imagesavealpha($image, true);
        $bgcolor = (isset($options['bc']) ? $options['bc'] : 'FFF');
        $bgcolor = $this->allocate_color($image, $bgcolor);
        imagefill($image, 0, 0, $bgcolor);
        $colors = [
            (isset($options['cs']) ? $options['cs'] : ''),
            (isset($options['cm']) ? $options['cm'] : '000'),
            (isset($options['c2']) ? $options['c2'] : 'F00'),
            (isset($options['c3']) ? $options['c3'] : 'FF0'),
            (isset($options['c4']) ? $options['c4'] : '0F0'),
            (isset($options['c5']) ? $options['c5'] : '0FF'),
            (isset($options['c6']) ? $options['c6'] : '00F'),
            (isset($options['c7']) ? $options['c7'] : 'F0F'),
            (isset($options['c8']) ? $options['c8'] : 'FFF'),
            (isset($options['c9']) ? $options['c9'] : '000'),
        ];
        foreach ($colors as $i => $color) {
            $colors[$i] = $this->allocate_color($image, $color);
        }
        $this->dispatch_render_image(
            $image,
            $code,
            $x,
            $y,
            $w,
            $h,
            $colors,
            $widths,
            $options
        );

        return $image;
    }

    public function render_svg($symbology, $data, $options)
    {
        list($code, $widths, $width, $height, $x, $y, $w, $h) =
            $this->encode_and_calculate_size($symbology, $data, $options);
        $svg = '<?xml version="1.0"?>';
        $svg .= '<svg xmlns="http://www.w3.org/2000/svg" version="1.1"';
        $svg .= ' width="' . $width . '" height="' . $height . '"';
        $svg .= ' viewBox="0 0 ' . $width . ' ' . $height . '"><g>';
        $bgcolor = (isset($options['bc']) ? $options['bc'] : 'white');
        if ($bgcolor) {
            $svg .= '<rect x="0" y="0"';
            $svg .= ' width="' . $width . '" height="' . $height . '"';
            $svg .= ' fill="' . htmlspecialchars($bgcolor) . '"/>';
        }
        $colors = [
            (isset($options['cs']) ? $options['cs'] : ''),
            (isset($options['cm']) ? $options['cm'] : 'black'),
            (isset($options['c2']) ? $options['c2'] : '#FF0000'),
            (isset($options['c3']) ? $options['c3'] : '#FFFF00'),
            (isset($options['c4']) ? $options['c4'] : '#00FF00'),
            (isset($options['c5']) ? $options['c5'] : '#00FFFF'),
            (isset($options['c6']) ? $options['c6'] : '#0000FF'),
            (isset($options['c7']) ? $options['c7'] : '#FF00FF'),
            (isset($options['c8']) ? $options['c8'] : 'white'),
            (isset($options['c9']) ? $options['c9'] : 'black'),
        ];
        $svg .= $this->dispatch_render_svg(
            $code,
            $x,
            $y,
            $w,
            $h,
            $colors,
            $widths,
            $options
        );
        $svg .= '</g></svg>';

        return $svg;
    }

    /* - - - - INTERNAL FUNCTIONS - - - - */

    private function encode_and_calculate_size($symbology, $data, $options)
    {
        $code = $this->dispatch_encode($symbology, $data, $options);
        $widths = [
            (isset($options['wq']) ? (int)$options['wq'] : 1),
            (isset($options['wm']) ? (int)$options['wm'] : 1),
            (isset($options['ww']) ? (int)$options['ww'] : 3),
            (isset($options['wn']) ? (int)$options['wn'] : 1),
            (isset($options['w4']) ? (int)$options['w4'] : 1),
            (isset($options['w5']) ? (int)$options['w5'] : 1),
            (isset($options['w6']) ? (int)$options['w6'] : 1),
            (isset($options['w7']) ? (int)$options['w7'] : 1),
            (isset($options['w8']) ? (int)$options['w8'] : 1),
            (isset($options['w9']) ? (int)$options['w9'] : 1),
        ];
        $size = $this->dispatch_calculate_size($code, $widths, $options);
        $dscale = ($code && isset($code['g']) && $code['g'] == 'm') ? 4 : 1;
        $scale = (isset($options['sf']) ? (float)$options['sf'] : $dscale);
        $scalex = (isset($options['sx']) ? (float)$options['sx'] : $scale);
        $scaley = (isset($options['sy']) ? (float)$options['sy'] : $scale);
        $dpadding = ($code && isset($code['g']) && $code['g'] == 'm') ? 0 : 10;
        $padding = (isset($options['p']) ? (int)$options['p'] : $dpadding);
        $vert = (isset($options['pv']) ? (int)$options['pv'] : $padding);
        $horiz = (isset($options['ph']) ? (int)$options['ph'] : $padding);
        $top = (isset($options['pt']) ? (int)$options['pt'] : $vert);
        $left = (isset($options['pl']) ? (int)$options['pl'] : $horiz);
        $right = (isset($options['pr']) ? (int)$options['pr'] : $horiz);
        $bottom = (isset($options['pb']) ? (int)$options['pb'] : $vert);
        $dwidth = ceil($size[0] * $scalex) + $left + $right;
        $dheight = ceil($size[1] * $scaley) + $top + $bottom;
        $iwidth = (isset($options['w']) ? (int)$options['w'] : $dwidth);
        $iheight = (isset($options['h']) ? (int)$options['h'] : $dheight);
        $swidth = $iwidth - $left - $right;
        $sheight = $iheight - $top - $bottom;

        return [
            $code, $widths, $iwidth, $iheight,
            $left, $top, $swidth, $sheight,
        ];
    }

    private function allocate_color($image, $color)
    {
        $color = preg_replace('/[^0-9A-Fa-f]/', '', $color);
        switch (strlen($color)) {
            case 1:
                $v = hexdec($color) * 17;

                return imagecolorallocate($image, $v, $v, $v);
            case 2:
                $v = hexdec($color);

                return imagecolorallocate($image, $v, $v, $v);
            case 3:
                $r = hexdec(substr($color, 0, 1)) * 17;
                $g = hexdec(substr($color, 1, 1)) * 17;
                $b = hexdec(substr($color, 2, 1)) * 17;

                return imagecolorallocate($image, $r, $g, $b);
            case 4:
                $a = hexdec(substr($color, 0, 1)) * 17;
                $r = hexdec(substr($color, 1, 1)) * 17;
                $g = hexdec(substr($color, 2, 1)) * 17;
                $b = hexdec(substr($color, 3, 1)) * 17;
                $a = round((255 - $a) * 127 / 255);

                return imagecolorallocatealpha($image, $r, $g, $b, $a);
            case 6:
                $r = hexdec(substr($color, 0, 2));
                $g = hexdec(substr($color, 2, 2));
                $b = hexdec(substr($color, 4, 2));

                return imagecolorallocate($image, $r, $g, $b);
            case 8:
                $a = hexdec(substr($color, 0, 2));
                $r = hexdec(substr($color, 2, 2));
                $g = hexdec(substr($color, 4, 2));
                $b = hexdec(substr($color, 6, 2));
                $a = round((255 - $a) * 127 / 255);

                return imagecolorallocatealpha($image, $r, $g, $b, $a);
            default:
                return imagecolorallocatealpha($image, 0, 0, 0, 127);
        }
    }

    /* - - - - DISPATCH - - - - */

    private function dispatch_encode($symbology, $data, $options)
    {
        switch (strtolower(preg_replace('/[^A-Za-z0-9]/', '', $symbology))) {
            case 'upca': return $this->upc_a_encode($data);
            case 'upce': return $this->upc_e_encode($data);
            case 'ean13nopad': return $this->ean_13_encode($data, ' ');
            case 'ean13pad': return $this->ean_13_encode($data, '>');
            case 'ean13': return $this->ean_13_encode($data, '>');
            case 'ean8': return $this->ean_8_encode($data);
            case 'code39': return $this->code_39_encode($data);
            case 'code39ascii': return $this->code_39_ascii_encode($data);
            case 'code93': return $this->code_93_encode($data);
            case 'code93ascii': return $this->code_93_ascii_encode($data);
            case 'code128': return $this->code_128_encode($data, 0, false);
            case 'code128a': return $this->code_128_encode($data, 1, false);
            case 'code128b': return $this->code_128_encode($data, 2, false);
            case 'code128c': return $this->code_128_encode($data, 3, false);
            case 'code128ac': return $this->code_128_encode($data, -1, false);
            case 'code128bc': return $this->code_128_encode($data, -2, false);
            case 'ean128': return $this->code_128_encode($data, 0, true);
            case 'ean128a': return $this->code_128_encode($data, 1, true);
            case 'ean128b': return $this->code_128_encode($data, 2, true);
            case 'ean128c': return $this->code_128_encode($data, 3, true);
            case 'ean128ac': return $this->code_128_encode($data, -1, true);
            case 'ean128bc': return $this->code_128_encode($data, -2, true);
            case 'codabar': return $this->codabar_encode($data);
            case 'itf': return $this->itf_encode($data);
            case 'itf14': return $this->itf_encode($data);
            case 'qr': return $this->qr_encode($data, 0);
            case 'qrl': return $this->qr_encode($data, 0);
            case 'qrm': return $this->qr_encode($data, 1);
            case 'qrq': return $this->qr_encode($data, 2);
            case 'qrh': return $this->qr_encode($data, 3);
            case 'dmtx': return $this->dmtx_encode($data, false, false);
            case 'dmtxs': return $this->dmtx_encode($data, false, false);
            case 'dmtxr': return $this->dmtx_encode($data, true, false);
            case 'gs1dmtx': return $this->dmtx_encode($data, false, true);
            case 'gs1dmtxs': return $this->dmtx_encode($data, false, true);
            case 'gs1dmtxr': return $this->dmtx_encode($data, true, true);
        }

        return null;
    }

    private function dispatch_calculate_size($code, $widths, $options)
    {
        if ($code && isset($code['g']) && $code['g']) {
            switch ($code['g']) {
                case 'l':
                    return $this->linear_calculate_size($code, $widths);
                case 'm':
                    return $this->matrix_calculate_size($code, $widths);
            }
        }

        return [0, 0];
    }

    private function dispatch_render_image(
        $image,
        $code,
        $x,
        $y,
        $w,
        $h,
        $colors,
        $widths,
        $options
    ) {
        if ($code && isset($code['g']) && $code['g']) {
            switch ($code['g']) {
                case 'l':
                    $this->linear_render_image(
                        $image,
                        $code,
                        $x,
                        $y,
                        $w,
                        $h,
                        $colors,
                        $widths,
                        $options
                    );

                    break;
                case 'm':
                    $this->matrix_render_image(
                        $image,
                        $code,
                        $x,
                        $y,
                        $w,
                        $h,
                        $colors,
                        $widths,
                        $options
                    );

                    break;
            }
        }
    }

    private function dispatch_render_svg(
        $code,
        $x,
        $y,
        $w,
        $h,
        $colors,
        $widths,
        $options
    ) {
        if ($code && isset($code['g']) && $code['g']) {
            switch ($code['g']) {
                case 'l':
                    return $this->linear_render_svg(
                        $code,
                        $x,
                        $y,
                        $w,
                        $h,
                        $colors,
                        $widths,
                        $options
                    );
                case 'm':
                    return $this->matrix_render_svg(
                        $code,
                        $x,
                        $y,
                        $w,
                        $h,
                        $colors,
                        $widths,
                        $options
                    );
            }
        }

        return '';
    }

    /* - - - - LINEAR BARCODE RENDERER - - - - */

    private function linear_calculate_size($code, $widths)
    {
        $width = 0;
        foreach ($code['b'] as $block) {
            foreach ($block['m'] as $module) {
                $width += $module[1] * $widths[$module[2]];
            }
        }

        return [$width, 80];
    }

    private function linear_render_image(
        $image,
        $code,
        $x,
        $y,
        $w,
        $h,
        $colors,
        $widths,
        $options
    ) {
        $textheight = (isset($options['th']) ? (int)$options['th'] : 10);
        $textsize = (isset($options['ts']) ? (int)$options['ts'] : 1);
        $textcolor = (isset($options['tc']) ? $options['tc'] : '000');
        $textcolor = $this->allocate_color($image, $textcolor);
        $width = 0;
        foreach ($code['b'] as $block) {
            foreach ($block['m'] as $module) {
                $width += $module[1] * $widths[$module[2]];
            }
        }
        if ($width) {
            $scale = $w / $width;
            $scale = (($scale > 1) ? floor($scale) : 1);
            $x = floor($x + ($w - $width * $scale) / 2);
        } else {
            $scale = 1;
            $x = floor($x + $w / 2);
        }
        foreach ($code['b'] as $block) {
            if (isset($block['l'])) {
                $label = $block['l'][0];
                $ly = (isset($block['l'][1]) ? (float)$block['l'][1] : 1);
                $lx = (isset($block['l'][2]) ? (float)$block['l'][2] : 0.5);
                $my = round($y + min($h, $h + ($ly - 1) * $textheight));
                $ly = ($y + $h + $ly * $textheight);
                $ly = round($ly - imagefontheight($textsize));
            } else {
                $label = null;
                $my = $y + $h;
            }
            $mx = $x;
            foreach ($block['m'] as $module) {
                $mc = $colors[$module[0]];
                $mw = $mx + $module[1] * $widths[$module[2]] * $scale;
                imagefilledrectangle($image, $mx, $y, $mw - 1, $my - 1, $mc);
                $mx = $mw;
            }
            if (! is_null($label)) {
                $lx = ($x + ($mx - $x) * $lx);
                $lw = imagefontwidth($textsize) * strlen($label);
                $lx = round($lx - $lw / 2);
                imagestring($image, $textsize, $lx, $ly, $label, $textcolor);
            }
            $x = $mx;
        }
    }

    private function linear_render_svg(
        $code,
        $x,
        $y,
        $w,
        $h,
        $colors,
        $widths,
        $options
    ) {
        $textheight = (isset($options['th']) ? (int)$options['th'] : 10);
        $textfont = (isset($options['tf']) ? $options['tf'] : 'monospace');
        $textsize = (isset($options['ts']) ? (int)$options['ts'] : 10);
        $textcolor = (isset($options['tc']) ? $options['tc'] : 'black');
        $width = 0;
        foreach ($code['b'] as $block) {
            foreach ($block['m'] as $module) {
                $width += $module[1] * $widths[$module[2]];
            }
        }
        if ($width) {
            $scale = $w / $width;
            if ($scale > 1) {
                $scale = floor($scale);
                $x = floor($x + ($w - $width * $scale) / 2);
            }
        } else {
            $scale = 1;
            $x = floor($x + $w / 2);
        }
        $tx = 'translate(' . $x . ' ' . $y . ')';
        if ($scale != 1) {
            $tx .= ' scale(' . $scale . ' 1)';
        }
        $svg = '<g transform="' . htmlspecialchars($tx) . '">';
        $x = 0;
        foreach ($code['b'] as $block) {
            if (isset($block['l'])) {
                $label = $block['l'][0];
                $ly = (isset($block['l'][1]) ? (float)$block['l'][1] : 1);
                $lx = (isset($block['l'][2]) ? (float)$block['l'][2] : 0.5);
                $mh = min($h, $h + ($ly - 1) * $textheight);
                $ly = $h + $ly * $textheight;
            } else {
                $label = null;
                $mh = $h;
            }
            $svg .= '<g>';
            $mx = $x;
            foreach ($block['m'] as $module) {
                $mc = htmlspecialchars($colors[$module[0]]);
                $mw = $module[1] * $widths[$module[2]];
                if ($mc) {
                    $svg .= '<rect';
                    $svg .= ' x="' . $mx . '" y="0"';
                    $svg .= ' width="' . $mw . '"';
                    $svg .= ' height="' . $mh . '"';
                    $svg .= ' fill="' . $mc . '"/>';
                }
                $mx += $mw;
            }
            if (! is_null($label) && $options['showLabel'] ?? true) {
                $lx = ($x + ($mx - $x) * $lx);
                $svg .= '<text';
                $svg .= ' x="' . $lx . '" y="' . $ly . '"';
                $svg .= ' text-anchor="middle"';
                $svg .= ' font-family="'.htmlspecialchars($textfont).'"';
                $svg .= ' font-size="'.htmlspecialchars($textsize).'"';
                $svg .= ' fill="'.htmlspecialchars($textcolor).'">';
                $svg .= htmlspecialchars($label);
                $svg .= '</text>';
            }
            $svg .= '</g>';
            $x = $mx;
        }

        return $svg . '</g>';
    }

    /* - - - - MATRIX BARCODE RENDERER - - - - */

    private function matrix_calculate_size($code, $widths)
    {
        $width = (
            $code['q'][3] * $widths[0] +
            $code['s'][0] * $widths[1] +
            $code['q'][1] * $widths[0]
        );
        $height = (
            $code['q'][0] * $widths[0] +
            $code['s'][1] * $widths[1] +
            $code['q'][2] * $widths[0]
        );

        return [$width, $height];
    }

    private function matrix_render_image(
        $image,
        $code,
        $x,
        $y,
        $w,
        $h,
        $colors,
        $widths,
        $options
    ) {
        $shape = (isset($options['ms']) ? strtolower($options['ms']) : '');
        $density = (isset($options['md']) ? (float)$options['md'] : 1);
        list($width, $height) = $this->matrix_calculate_size($code, $widths);
        if ($width && $height) {
            $scale = min($w / $width, $h / $height);
            $scale = (($scale > 1) ? floor($scale) : 1);
            $x = floor($x + ($w - $width * $scale) / 2);
            $y = floor($y + ($h - $height * $scale) / 2);
        } else {
            $scale = 1;
            $x = floor($x + $w / 2);
            $y = floor($y + $h / 2);
        }
        $x += $code['q'][3] * $widths[0] * $scale;
        $y += $code['q'][0] * $widths[0] * $scale;
        $wh = $widths[1] * $scale;
        foreach ($code['b'] as $by => $row) {
            $y1 = $y + $by * $wh;
            foreach ($row as $bx => $color) {
                $x1 = $x + $bx * $wh;
                $mc = $colors[$color];
                $this->matrix_dot_image(
                    $image,
                    $x1,
                    $y1,
                    $wh,
                    $wh,
                    $mc,
                    $shape,
                    $density
                );
            }
        }
    }

    private function matrix_render_svg(
        $code,
        $x,
        $y,
        $w,
        $h,
        $colors,
        $widths,
        $options
    ) {
        $shape = (isset($options['ms']) ? strtolower($options['ms']) : '');
        $density = (isset($options['md']) ? (float)$options['md'] : 1);
        list($width, $height) = $this->matrix_calculate_size($code, $widths);
        if ($width && $height) {
            $scale = min($w / $width, $h / $height);
            if ($scale > 1) {
                $scale = floor($scale);
            }
            $x = floor($x + ($w - $width * $scale) / 2);
            $y = floor($y + ($h - $height * $scale) / 2);
        } else {
            $scale = 1;
            $x = floor($x + $w / 2);
            $y = floor($y + $h / 2);
        }
        $tx = 'translate(' . $x . ' ' . $y . ')';
        if ($scale != 1) {
            $tx .= ' scale(' . $scale . ' ' . $scale . ')';
        }
        $svg = '<g transform="' . htmlspecialchars($tx) . '">';
        $x = $code['q'][3] * $widths[0];
        $y = $code['q'][0] * $widths[0];
        $wh = $widths[1];
        foreach ($code['b'] as $by => $row) {
            $y1 = $y + $by * $wh;
            foreach ($row as $bx => $color) {
                $x1 = $x + $bx * $wh;
                $mc = $colors[$color];
                if ($mc) {
                    $svg .= $this->matrix_dot_svg(
                        $x1,
                        $y1,
                        $wh,
                        $wh,
                        $mc,
                        $shape,
                        $density
                    );
                }
            }
        }

        return $svg . '</g>';
    }

    private function matrix_dot_image($image, $x, $y, $w, $h, $mc, $ms, $md)
    {
        switch ($ms) {
            default:
                $x = floor($x + (1 - $md) * $w / 2);
                $y = floor($y + (1 - $md) * $h / 2);
                $w = ceil($w * $md);
                $h = ceil($h * $md);
                imagefilledrectangle($image, $x, $y, $x + $w - 1, $y + $h - 1, $mc);

                break;
            case 'r':
                $cx = floor($x + $w / 2);
                $cy = floor($y + $h / 2);
                $dx = ceil($w * $md);
                $dy = ceil($h * $md);
                imagefilledellipse($image, $cx, $cy, $dx, $dy, $mc);

                break;
            case 'x':
                $x = floor($x + (1 - $md) * $w / 2);
                $y = floor($y + (1 - $md) * $h / 2);
                $w = ceil($w * $md);
                $h = ceil($h * $md);
                imageline($image, $x, $y, $x + $w - 1, $y + $h - 1, $mc);
                imageline($image, $x, $y + $h - 1, $x + $w - 1, $y, $mc);

                break;
        }
    }

    private function matrix_dot_svg($x, $y, $w, $h, $mc, $ms, $md)
    {
        switch ($ms) {
            default:
                $x += (1 - $md) * $w / 2;
                $y += (1 - $md) * $h / 2;
                $w *= $md;
                $h *= $md;
                $svg = '<rect x="' . $x . '" y="' . $y . '"';
                $svg .= ' width="' . $w . '" height="' . $h . '"';
                $svg .= ' fill="' . $mc . '"/>';

                return $svg;
            case 'r':
                $cx = $x + $w / 2;
                $cy = $y + $h / 2;
                $rx = $w * $md / 2;
                $ry = $h * $md / 2;
                $svg = '<ellipse cx="' . $cx . '" cy="' . $cy . '"';
                $svg .= ' rx="' . $rx . '" ry="' . $ry . '"';
                $svg .= ' fill="' . $mc . '"/>';

                return $svg;
            case 'x':
                $x1 = $x + (1 - $md) * $w / 2;
                $y1 = $y + (1 - $md) * $h / 2;
                $x2 = $x + $w - (1 - $md) * $w / 2;
                $y2 = $y + $h - (1 - $md) * $h / 2;
                $svg = '<line x1="' . $x1 . '" y1="' . $y1 . '"';
                $svg .= ' x2="' . $x2 . '" y2="' . $y2 . '"';
                $svg .= ' stroke="' . $mc . '"';
                $svg .= ' stroke-width="' . ($md / 5) . '"/>';
                $svg .= '<line x1="' . $x1 . '" y1="' . $y2 . '"';
                $svg .= ' x2="' . $x2 . '" y2="' . $y1 . '"';
                $svg .= ' stroke="' . $mc . '"';
                $svg .= ' stroke-width="' . ($md / 5) . '"/>';

                return '<g>' . $svg . '</g>';
        }
    }

    /* - - - - UPC FAMILY ENCODER - - - - */

    private function upc_a_encode($data)
    {
        $data = $this->upc_a_normalize($data);
        $blocks = [];
        /* Quiet zone, start, first digit. */
        $digit = substr($data, 0, 1);
        $blocks[] = [
            'm' => [[0, 9, 0]],
            'l' => [$digit, 0, 1 / 3],
        ];
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        $blocks[] = [
            'm' => [
                [0, $this->upc_alphabet[$digit][0], 1],
                [1, $this->upc_alphabet[$digit][1], 1],
                [0, $this->upc_alphabet[$digit][2], 1],
                [1, $this->upc_alphabet[$digit][3], 1],
            ],
        ];
        /* Left zone. */
        for ($i = 1; $i < 6; $i++) {
            $digit = substr($data, $i, 1);
            $blocks[] = [
                'm' => [
                    [0, $this->upc_alphabet[$digit][0], 1],
                    [1, $this->upc_alphabet[$digit][1], 1],
                    [0, $this->upc_alphabet[$digit][2], 1],
                    [1, $this->upc_alphabet[$digit][3], 1],
                ],
                'l' => [$digit, 0.5, (6 - $i) / 6],
            ];
        }
        /* Middle. */
        $blocks[] = [
            'm' => [
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
            ],
        ];
        /* Right zone. */
        for ($i = 6; $i < 11; $i++) {
            $digit = substr($data, $i, 1);
            $blocks[] = [
                'm' => [
                    [1, $this->upc_alphabet[$digit][0], 1],
                    [0, $this->upc_alphabet[$digit][1], 1],
                    [1, $this->upc_alphabet[$digit][2], 1],
                    [0, $this->upc_alphabet[$digit][3], 1],
                ],
                'l' => [$digit, 0.5, (11 - $i) / 6],
            ];
        }
        /* Last digit, end, quiet zone. */
        $digit = substr($data, 11, 1);
        $blocks[] = [
            'm' => [
                [1, $this->upc_alphabet[$digit][0], 1],
                [0, $this->upc_alphabet[$digit][1], 1],
                [1, $this->upc_alphabet[$digit][2], 1],
                [0, $this->upc_alphabet[$digit][3], 1],
            ],
        ];
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        $blocks[] = [
            'm' => [[0, 9, 0]],
            'l' => [$digit, 0, 2 / 3],
        ];
        /* Return code. */
        return ['g' => 'l', 'b' => $blocks];
    }

    private function upc_e_encode($data)
    {
        $data = $this->upc_e_normalize($data);
        $blocks = [];
        /* Quiet zone, start. */
        $blocks[] = [
            'm' => [[0, 9, 0]],
        ];
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        /* Digits */
        $system = substr($data, 0, 1) & 1;
        $check = substr($data, 7, 1);
        $pbits = $this->upc_parity[$check];
        for ($i = 1; $i < 7; $i++) {
            $digit = substr($data, $i, 1);
            $pbit = $pbits[$i - 1] ^ $system;
            $blocks[] = [
                'm' => [
                    [0, $this->upc_alphabet[$digit][$pbit ? 3 : 0], 1],
                    [1, $this->upc_alphabet[$digit][$pbit ? 2 : 1], 1],
                    [0, $this->upc_alphabet[$digit][$pbit ? 1 : 2], 1],
                    [1, $this->upc_alphabet[$digit][$pbit ? 0 : 3], 1],
                ],
                'l' => [$digit, 0.5, (7 - $i) / 7],
            ];
        }
        /* End, quiet zone. */
        $blocks[] = [
            'm' => [
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        $blocks[] = [
            'm' => [[0, 9, 0]],
        ];
        /* Return code. */
        return ['g' => 'l', 'b' => $blocks];
    }

    private function ean_13_encode($data, $pad)
    {
        $data = $this->ean_13_normalize($data);
        $blocks = [];
        /* Quiet zone, start, first digit (as parity). */
        $system = substr($data, 0, 1);
        $pbits = (
            (int)$system ?
            $this->upc_parity[$system] :
            [1, 1, 1, 1, 1, 1]
        );
        $blocks[] = [
            'm' => [[0, 9, 0]],
            'l' => [$system, 0.5, 1 / 3],
        ];
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        /* Left zone. */
        for ($i = 1; $i < 7; $i++) {
            $digit = substr($data, $i, 1);
            $pbit = $pbits[$i - 1];
            $blocks[] = [
                'm' => [
                    [0, $this->upc_alphabet[$digit][$pbit ? 0 : 3], 1],
                    [1, $this->upc_alphabet[$digit][$pbit ? 1 : 2], 1],
                    [0, $this->upc_alphabet[$digit][$pbit ? 2 : 1], 1],
                    [1, $this->upc_alphabet[$digit][$pbit ? 3 : 0], 1],
                ],
                'l' => [$digit, 0.5, (7 - $i) / 7],
            ];
        }
        /* Middle. */
        $blocks[] = [
            'm' => [
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
            ],
        ];
        /* Right zone. */
        for ($i = 7; $i < 13; $i++) {
            $digit = substr($data, $i, 1);
            $blocks[] = [
                'm' => [
                    [1, $this->upc_alphabet[$digit][0], 1],
                    [0, $this->upc_alphabet[$digit][1], 1],
                    [1, $this->upc_alphabet[$digit][2], 1],
                    [0, $this->upc_alphabet[$digit][3], 1],
                ],
                'l' => [$digit, 0.5, (13 - $i) / 7],
            ];
        }
        /* End, quiet zone. */
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        $blocks[] = [
            'm' => [[0, 9, 0]],
            'l' => [$pad, 0.5, 2 / 3],
        ];
        /* Return code. */
        return ['g' => 'l', 'b' => $blocks];
    }

    private function ean_8_encode($data)
    {
        $data = $this->ean_8_normalize($data);
        $blocks = [];
        /* Quiet zone, start. */
        $blocks[] = [
            'm' => [[0, 9, 0]],
            'l' => ['<', 0.5, 1 / 3],
        ];
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        /* Left zone. */
        for ($i = 0; $i < 4; $i++) {
            $digit = substr($data, $i, 1);
            $blocks[] = [
                'm' => [
                    [0, $this->upc_alphabet[$digit][0], 1],
                    [1, $this->upc_alphabet[$digit][1], 1],
                    [0, $this->upc_alphabet[$digit][2], 1],
                    [1, $this->upc_alphabet[$digit][3], 1],
                ],
                'l' => [$digit, 0.5, (4 - $i) / 5],
            ];
        }
        /* Middle. */
        $blocks[] = [
            'm' => [
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
            ],
        ];
        /* Right zone. */
        for ($i = 4; $i < 8; $i++) {
            $digit = substr($data, $i, 1);
            $blocks[] = [
                'm' => [
                    [1, $this->upc_alphabet[$digit][0], 1],
                    [0, $this->upc_alphabet[$digit][1], 1],
                    [1, $this->upc_alphabet[$digit][2], 1],
                    [0, $this->upc_alphabet[$digit][3], 1],
                ],
                'l' => [$digit, 0.5, (8 - $i) / 5],
            ];
        }
        /* End, quiet zone. */
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        $blocks[] = [
            'm' => [[0, 9, 0]],
            'l' => ['>', 0.5, 2 / 3],
        ];
        /* Return code. */
        return ['g' => 'l', 'b' => $blocks];
    }

    public function upc_a_normalize($data)
    {
        $data = preg_replace('/[^0-9*]/', '', $data);
        /* Set length to 12 digits. */
        if (strlen($data) < 5) {
            $data = str_repeat('0', 12);
        } elseif (strlen($data) < 12) {
            $system = substr($data, 0, 1);
            $edata = substr($data, 1, -2);
            $epattern = (int)substr($data, -2, 1);
            $check = substr($data, -1);
            if ($epattern < 3) {
                $left = $system . substr($edata, 0, 2) . $epattern;
                $right = substr($edata, 2) . $check;
            } elseif ($epattern < strlen($edata)) {
                $left = $system . substr($edata, 0, $epattern);
                $right = substr($edata, $epattern) . $check;
            } else {
                $left = $system . $edata;
                $right = $epattern . $check;
            }
            $center = str_repeat('0', 12 - strlen($left . $right));
            $data = $left . $center . $right;
        } elseif (strlen($data) > 12) {
            $left = substr($data, 0, 6);
            $right = substr($data, -6);
            $data = $left . $right;
        }
        /* Replace * with missing or check digit. */
        while (($o = strrpos($data, '*')) !== false) {
            $checksum = 0;
            for ($i = 0; $i < 12; $i++) {
                $digit = $data[$i];
                if ($digit === '*') {
                    continue;
                }
                $checksum += (($i % 2) ? 1 : 3) * $digit;
            }
            $checksum *= (($o % 2) ? 9 : 3);
            $left = substr($data, 0, $o);
            $center = substr($checksum, -1);
            $right = substr($data, $o + 1);
            $data = $left . $center . $right;
        }

        return $data;
    }

    private function upc_e_normalize($data)
    {
        $data = preg_replace('/[^0-9*]/', '', $data);
        /* If exactly 8 digits, use verbatim even if check digit is wrong. */
        if (preg_match(
            '/^([01])([0-9][0-9][0-9][0-9][0-9][0-9])([0-9])$/',
            $data,
            $m
        )) {
            return $data;
        }
        /* If unknown check digit, use verbatim but calculate check digit. */
        if (preg_match(
            '/^([01])([0-9][0-9][0-9][0-9][0-9][0-9])([*])$/',
            $data,
            $m
        )) {
            $data = $this->upc_a_normalize($data);

            return $m[1] . $m[2] . substr($data, -1);
        }
        /* Otherwise normalize to UPC-A and convert back. */
        $data = $this->upc_a_normalize($data);
        if (preg_match(
            '/^([01])([0-9][0-9])([0-2])0000([0-9][0-9][0-9])([0-9])$/',
            $data,
            $m
        )) {
            return $m[1] . $m[2] . $m[4] . $m[3] . $m[5];
        }
        if (preg_match(
            '/^([01])([0-9][0-9][0-9])00000([0-9][0-9])([0-9])$/',
            $data,
            $m
        )) {
            return $m[1] . $m[2] . $m[3] . '3' . $m[4];
        }
        if (preg_match(
            '/^([01])([0-9][0-9][0-9][0-9])00000([0-9])([0-9])$/',
            $data,
            $m
        )) {
            return $m[1] . $m[2] . $m[3] . '4' . $m[4];
        }
        if (preg_match(
            '/^([01])([0-9][0-9][0-9][0-9][0-9])0000([5-9])([0-9])$/',
            $data,
            $m
        )) {
            return $m[1] . $m[2] . $m[3] . $m[4];
        }

        return str_repeat('0', 8);
    }

    private function ean_13_normalize($data)
    {
        $data = preg_replace('/[^0-9*]/', '', $data);
        /* Set length to 13 digits. */
        if (strlen($data) < 13) {
            return '0' . $this->upc_a_normalize($data);
        } elseif (strlen($data) > 13) {
            $left = substr($data, 0, 7);
            $right = substr($data, -6);
            $data = $left . $right;
        }
        /* Replace * with missing or check digit. */
        while (($o = strrpos($data, '*')) !== false) {
            $checksum = 0;
            for ($i = 0; $i < 13; $i++) {
                $digit = substr($data, $i, 1);
                if ($digit === '*') {
                    continue;
                }
                $checksum += (($i % 2) ? 3 : 1) * $digit;
            }
            $checksum *= (($o % 2) ? 3 : 9);
            $left = substr($data, 0, $o);
            $center = substr($checksum, -1);
            $right = substr($data, $o + 1);
            $data = $left . $center . $right;
        }

        return $data;
    }

    private function ean_8_normalize($data)
    {
        $data = preg_replace('/[^0-9*]/', '', $data);
        /* Set length to 8 digits. */
        if (strlen($data) < 8) {
            $midpoint = floor(strlen($data) / 2);
            $left = substr($data, 0, $midpoint);
            $center = str_repeat('0', 8 - strlen($data));
            $right = substr($data, $midpoint);
            $data = $left . $center . $right;
        } elseif (strlen($data) > 8) {
            $left = substr($data, 0, 4);
            $right = substr($data, -4);
            $data = $left . $right;
        }
        /* Replace * with missing or check digit. */
        while (($o = strrpos($data, '*')) !== false) {
            $checksum = 0;
            for ($i = 0; $i < 8; $i++) {
                $digit = substr($data, $i, 1);
                if ($digit === '*') {
                    continue;
                }
                $checksum += (($i % 2) ? 1 : 3) * $digit;
            }
            $checksum *= (($o % 2) ? 9 : 3);
            $left = substr($data, 0, $o);
            $center = substr($checksum, -1);
            $right = substr($data, $o + 1);
            $data = $left . $center . $right;
        }

        return $data;
    }

    private $upc_alphabet = [
        '0' => [3, 2, 1, 1],
        '1' => [2, 2, 2, 1],
        '2' => [2, 1, 2, 2],
        '3' => [1, 4, 1, 1],
        '4' => [1, 1, 3, 2],
        '5' => [1, 2, 3, 1],
        '6' => [1, 1, 1, 4],
        '7' => [1, 3, 1, 2],
        '8' => [1, 2, 1, 3],
        '9' => [3, 1, 1, 2],
    ];

    private $upc_parity = [
        '0' => [1, 1, 1, 0, 0, 0],
        '1' => [1, 1, 0, 1, 0, 0],
        '2' => [1, 1, 0, 0, 1, 0],
        '3' => [1, 1, 0, 0, 0, 1],
        '4' => [1, 0, 1, 1, 0, 0],
        '5' => [1, 0, 0, 1, 1, 0],
        '6' => [1, 0, 0, 0, 1, 1],
        '7' => [1, 0, 1, 0, 1, 0],
        '8' => [1, 0, 1, 0, 0, 1],
        '9' => [1, 0, 0, 1, 0, 1],
    ];

    /* - - - - CODE 39 FAMILY ENCODER - - - - */

    private function code_39_encode($data)
    {
        $data = strtoupper(preg_replace('/[^0-9A-Za-z%$\/+ .-]/', '', $data));
        $blocks = [];
        /* Start */
        $blocks[] = [
            'm' => [
                [1, 1, 1], [0, 1, 2], [1, 1, 1],
                [0, 1, 1], [1, 1, 2], [0, 1, 1],
                [1, 1, 2], [0, 1, 1], [1, 1, 1],
            ],
            'l' => ['*'],
        ];
        /* Data */
        for ($i = 0, $n = strlen($data); $i < $n; $i++) {
            $blocks[] = [
                'm' => [[0, 1, 3]],
            ];
            $char = substr($data, $i, 1);
            $block = $this->code_39_alphabet[$char];
            $blocks[] = [
                'm' => [
                    [1, 1, $block[0]],
                    [0, 1, $block[1]],
                    [1, 1, $block[2]],
                    [0, 1, $block[3]],
                    [1, 1, $block[4]],
                    [0, 1, $block[5]],
                    [1, 1, $block[6]],
                    [0, 1, $block[7]],
                    [1, 1, $block[8]],
                ],
                'l' => [$char],
            ];
        }
        $blocks[] = [
            'm' => [[0, 1, 3]],
        ];
        /* End */
        $blocks[] = [
            'm' => [
                [1, 1, 1], [0, 1, 2], [1, 1, 1],
                [0, 1, 1], [1, 1, 2], [0, 1, 1],
                [1, 1, 2], [0, 1, 1], [1, 1, 1],
            ],
            'l' => ['*'],
        ];
        /* Return */
        return ['g' => 'l', 'b' => $blocks];
    }

    private function code_39_ascii_encode($data)
    {
        $modules = [];
        /* Start */
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 2];
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 2];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 2];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        /* Data */
        $label = '';
        for ($i = 0, $n = strlen($data); $i < $n; $i++) {
            $char = substr($data, $i, 1);
            $ch = ord($char);
            if ($ch < 128) {
                if ($ch < 32 || $ch >= 127) {
                    $label .= ' ';
                } else {
                    $label .= $char;
                }
                $ch = $this->code_39_asciibet[$ch];
                for ($j = 0, $m = strlen($ch); $j < $m; $j++) {
                    $c = substr($ch, $j, 1);
                    $b = $this->code_39_alphabet[$c];
                    $modules[] = [0, 1, 3];
                    $modules[] = [1, 1, $b[0]];
                    $modules[] = [0, 1, $b[1]];
                    $modules[] = [1, 1, $b[2]];
                    $modules[] = [0, 1, $b[3]];
                    $modules[] = [1, 1, $b[4]];
                    $modules[] = [0, 1, $b[5]];
                    $modules[] = [1, 1, $b[6]];
                    $modules[] = [0, 1, $b[7]];
                    $modules[] = [1, 1, $b[8]];
                }
            }
        }
        $modules[] = [0, 1, 3];
        /* End */
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 2];
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 2];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 2];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        /* Return */
        $blocks = [['m' => $modules, 'l' => [$label]]];

        return ['g' => 'l', 'b' => $blocks];
    }

    private function code_93_encode($data)
    {
        $data = strtoupper(preg_replace('/[^0-9A-Za-z%+\/$ .-]/', '', $data));
        $modules = [];
        /* Start */
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 4, 1];
        $modules[] = [0, 1, 1];
        /* Data */
        $values = [];
        for ($i = 0, $n = strlen($data); $i < $n; $i++) {
            $char = substr($data, $i, 1);
            $block = $this->code_93_alphabet[$char];
            $modules[] = [1, $block[0], 1];
            $modules[] = [0, $block[1], 1];
            $modules[] = [1, $block[2], 1];
            $modules[] = [0, $block[3], 1];
            $modules[] = [1, $block[4], 1];
            $modules[] = [0, $block[5], 1];
            $values[] = $block[6];
        }
        /* Check Digits */
        for ($i = 0; $i < 2; $i++) {
            $index = count($values);
            $weight = 0;
            $checksum = 0;
            while ($index) {
                $index--;
                $weight++;
                $checksum += $weight * $values[$index];
                $checksum %= 47;
                $weight %= ($i ? 15 : 20);
            }
            $values[] = $checksum;
        }
        $alphabet = array_values($this->code_93_alphabet);
        for ($i = count($values) - 2, $n = count($values); $i < $n; $i++) {
            $block = $alphabet[$values[$i]];
            $modules[] = [1, $block[0], 1];
            $modules[] = [0, $block[1], 1];
            $modules[] = [1, $block[2], 1];
            $modules[] = [0, $block[3], 1];
            $modules[] = [1, $block[4], 1];
            $modules[] = [0, $block[5], 1];
        }
        /* End */
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 4, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        /* Return */
        $blocks = [['m' => $modules, 'l' => [$data]]];

        return ['g' => 'l', 'b' => $blocks];
    }

    private function code_93_ascii_encode($data)
    {
        $modules = [];
        /* Start */
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 4, 1];
        $modules[] = [0, 1, 1];
        /* Data */
        $label = '';
        $values = [];
        for ($i = 0, $n = strlen($data); $i < $n; $i++) {
            $char = substr($data, $i, 1);
            $ch = ord($char);
            if ($ch < 128) {
                if ($ch < 32 || $ch >= 127) {
                    $label .= ' ';
                } else {
                    $label .= $char;
                }
                $ch = $this->code_93_asciibet[$ch];
                for ($j = 0, $m = strlen($ch); $j < $m; $j++) {
                    $c = substr($ch, $j, 1);
                    $b = $this->code_93_alphabet[$c];
                    $modules[] = [1, $b[0], 1];
                    $modules[] = [0, $b[1], 1];
                    $modules[] = [1, $b[2], 1];
                    $modules[] = [0, $b[3], 1];
                    $modules[] = [1, $b[4], 1];
                    $modules[] = [0, $b[5], 1];
                    $values[] = $b[6];
                }
            }
        }
        /* Check Digits */
        for ($i = 0; $i < 2; $i++) {
            $index = count($values);
            $weight = 0;
            $checksum = 0;
            while ($index) {
                $index--;
                $weight++;
                $checksum += $weight * $values[$index];
                $checksum %= 47;
                $weight %= ($i ? 15 : 20);
            }
            $values[] = $checksum;
        }
        $alphabet = array_values($this->code_93_alphabet);
        for ($i = count($values) - 2, $n = count($values); $i < $n; $i++) {
            $block = $alphabet[$values[$i]];
            $modules[] = [1, $block[0], 1];
            $modules[] = [0, $block[1], 1];
            $modules[] = [1, $block[2], 1];
            $modules[] = [0, $block[3], 1];
            $modules[] = [1, $block[4], 1];
            $modules[] = [0, $block[5], 1];
        }
        /* End */
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 4, 1];
        $modules[] = [0, 1, 1];
        $modules[] = [1, 1, 1];
        /* Return */
        $blocks = [['m' => $modules, 'l' => [$label]]];

        return ['g' => 'l', 'b' => $blocks];
    }

    private $code_39_alphabet = [
        '1' => [2, 1, 1, 2, 1, 1, 1, 1, 2],
        '2' => [1, 1, 2, 2, 1, 1, 1, 1, 2],
        '3' => [2, 1, 2, 2, 1, 1, 1, 1, 1],
        '4' => [1, 1, 1, 2, 2, 1, 1, 1, 2],
        '5' => [2, 1, 1, 2, 2, 1, 1, 1, 1],
        '6' => [1, 1, 2, 2, 2, 1, 1, 1, 1],
        '7' => [1, 1, 1, 2, 1, 1, 2, 1, 2],
        '8' => [2, 1, 1, 2, 1, 1, 2, 1, 1],
        '9' => [1, 1, 2, 2, 1, 1, 2, 1, 1],
        '0' => [1, 1, 1, 2, 2, 1, 2, 1, 1],
        'A' => [2, 1, 1, 1, 1, 2, 1, 1, 2],
        'B' => [1, 1, 2, 1, 1, 2, 1, 1, 2],
        'C' => [2, 1, 2, 1, 1, 2, 1, 1, 1],
        'D' => [1, 1, 1, 1, 2, 2, 1, 1, 2],
        'E' => [2, 1, 1, 1, 2, 2, 1, 1, 1],
        'F' => [1, 1, 2, 1, 2, 2, 1, 1, 1],
        'G' => [1, 1, 1, 1, 1, 2, 2, 1, 2],
        'H' => [2, 1, 1, 1, 1, 2, 2, 1, 1],
        'I' => [1, 1, 2, 1, 1, 2, 2, 1, 1],
        'J' => [1, 1, 1, 1, 2, 2, 2, 1, 1],
        'K' => [2, 1, 1, 1, 1, 1, 1, 2, 2],
        'L' => [1, 1, 2, 1, 1, 1, 1, 2, 2],
        'M' => [2, 1, 2, 1, 1, 1, 1, 2, 1],
        'N' => [1, 1, 1, 1, 2, 1, 1, 2, 2],
        'O' => [2, 1, 1, 1, 2, 1, 1, 2, 1],
        'P' => [1, 1, 2, 1, 2, 1, 1, 2, 1],
        'Q' => [1, 1, 1, 1, 1, 1, 2, 2, 2],
        'R' => [2, 1, 1, 1, 1, 1, 2, 2, 1],
        'S' => [1, 1, 2, 1, 1, 1, 2, 2, 1],
        'T' => [1, 1, 1, 1, 2, 1, 2, 2, 1],
        'U' => [2, 2, 1, 1, 1, 1, 1, 1, 2],
        'V' => [1, 2, 2, 1, 1, 1, 1, 1, 2],
        'W' => [2, 2, 2, 1, 1, 1, 1, 1, 1],
        'X' => [1, 2, 1, 1, 2, 1, 1, 1, 2],
        'Y' => [2, 2, 1, 1, 2, 1, 1, 1, 1],
        'Z' => [1, 2, 2, 1, 2, 1, 1, 1, 1],
        '-' => [1, 2, 1, 1, 1, 1, 2, 1, 2],
        '.' => [2, 2, 1, 1, 1, 1, 2, 1, 1],
        ' ' => [1, 2, 2, 1, 1, 1, 2, 1, 1],
        '*' => [1, 2, 1, 1, 2, 1, 2, 1, 1],
        '+' => [1, 2, 1, 1, 1, 2, 1, 2, 1],
        '/' => [1, 2, 1, 2, 1, 1, 1, 2, 1],
        '$' => [1, 2, 1, 2, 1, 2, 1, 1, 1],
        '%' => [1, 1, 1, 2, 1, 2, 1, 2, 1],
    ];

    private $code_39_asciibet = [
        '%U', '$A', '$B', '$C', '$D', '$E', '$F', '$G',
        '$H', '$I', '$J', '$K', '$L', '$M', '$N', '$O',
        '$P', '$Q', '$R', '$S', '$T', '$U', '$V', '$W',
        '$X', '$Y', '$Z', '%A', '%B', '%C', '%D', '%E',
        ' ' , '/A', '/B', '/C', '/D', '/E', '/F', '/G',
        '/H', '/I', '/J', '/K', '/L', '-' , '.' , '/O',
        '0' , '1' , '2' , '3' , '4' , '5' , '6' , '7' ,
        '8' , '9' , '/Z', '%F', '%G', '%H', '%I', '%J',
        '%V', 'A' , 'B' , 'C' , 'D' , 'E' , 'F' , 'G' ,
        'H' , 'I' , 'J' , 'K' , 'L' , 'M' , 'N' , 'O' ,
        'P' , 'Q' , 'R' , 'S' , 'T' , 'U' , 'V' , 'W' ,
        'X' , 'Y' , 'Z' , '%K', '%L', '%M', '%N', '%O',
        '%W', '+A', '+B', '+C', '+D', '+E', '+F', '+G',
        '+H', '+I', '+J', '+K', '+L', '+M', '+N', '+O',
        '+P', '+Q', '+R', '+S', '+T', '+U', '+V', '+W',
        '+X', '+Y', '+Z', '%P', '%Q', '%R', '%S', '%T',
    ];

    private $code_93_alphabet = [
        '0' => [1, 3, 1, 1, 1, 2,  0],
        '1' => [1, 1, 1, 2, 1, 3,  1],
        '2' => [1, 1, 1, 3, 1, 2,  2],
        '3' => [1, 1, 1, 4, 1, 1,  3],
        '4' => [1, 2, 1, 1, 1, 3,  4],
        '5' => [1, 2, 1, 2, 1, 2,  5],
        '6' => [1, 2, 1, 3, 1, 1,  6],
        '7' => [1, 1, 1, 1, 1, 4,  7],
        '8' => [1, 3, 1, 2, 1, 1,  8],
        '9' => [1, 4, 1, 1, 1, 1,  9],
        'A' => [2, 1, 1, 1, 1, 3, 10],
        'B' => [2, 1, 1, 2, 1, 2, 11],
        'C' => [2, 1, 1, 3, 1, 1, 12],
        'D' => [2, 2, 1, 1, 1, 2, 13],
        'E' => [2, 2, 1, 2, 1, 1, 14],
        'F' => [2, 3, 1, 1, 1, 1, 15],
        'G' => [1, 1, 2, 1, 1, 3, 16],
        'H' => [1, 1, 2, 2, 1, 2, 17],
        'I' => [1, 1, 2, 3, 1, 1, 18],
        'J' => [1, 2, 2, 1, 1, 2, 19],
        'K' => [1, 3, 2, 1, 1, 1, 20],
        'L' => [1, 1, 1, 1, 2, 3, 21],
        'M' => [1, 1, 1, 2, 2, 2, 22],
        'N' => [1, 1, 1, 3, 2, 1, 23],
        'O' => [1, 2, 1, 1, 2, 2, 24],
        'P' => [1, 3, 1, 1, 2, 1, 25],
        'Q' => [2, 1, 2, 1, 1, 2, 26],
        'R' => [2, 1, 2, 2, 1, 1, 27],
        'S' => [2, 1, 1, 1, 2, 2, 28],
        'T' => [2, 1, 1, 2, 2, 1, 29],
        'U' => [2, 2, 1, 1, 2, 1, 30],
        'V' => [2, 2, 2, 1, 1, 1, 31],
        'W' => [1, 1, 2, 1, 2, 2, 32],
        'X' => [1, 1, 2, 2, 2, 1, 33],
        'Y' => [1, 2, 2, 1, 2, 1, 34],
        'Z' => [1, 2, 3, 1, 1, 1, 35],
        '-' => [1, 2, 1, 1, 3, 1, 36],
        '.' => [3, 1, 1, 1, 1, 2, 37],
        ' ' => [3, 1, 1, 2, 1, 1, 38],
        '$' => [3, 2, 1, 1, 1, 1, 39],
        '/' => [1, 1, 2, 1, 3, 1, 40],
        '+' => [1, 1, 3, 1, 2, 1, 41],
        '%' => [2, 1, 1, 1, 3, 1, 42],
        '#' => [1, 2, 1, 2, 2, 1, 43], /* ($) */
        '&' => [3, 1, 2, 1, 1, 1, 44], /* (%) */
        '|' => [3, 1, 1, 1, 2, 1, 45], /* (/) */
        '=' => [1, 2, 2, 2, 1, 1, 46], /* (+) */
        '*' => [1, 1, 1, 1, 4, 1,  0],
    ];

    private $code_93_asciibet = [
        '&U', '#A', '#B', '#C', '#D', '#E', '#F', '#G',
        '#H', '#I', '#J', '#K', '#L', '#M', '#N', '#O',
        '#P', '#Q', '#R', '#S', '#T', '#U', '#V', '#W',
        '#X', '#Y', '#Z', '&A', '&B', '&C', '&D', '&E',
        ' ' , '|A', '|B', '|C', '$' , '%' , '|F', '|G',
        '|H', '|I', '|J', '+' , '|L', '-' , '.' , '/' ,
        '0' , '1' , '2' , '3' , '4' , '5' , '6' , '7' ,
        '8' , '9' , '|Z', '&F', '&G', '&H', '&I', '&J',
        '&V', 'A' , 'B' , 'C' , 'D' , 'E' , 'F' , 'G' ,
        'H' , 'I' , 'J' , 'K' , 'L' , 'M' , 'N' , 'O' ,
        'P' , 'Q' , 'R' , 'S' , 'T' , 'U' , 'V' , 'W' ,
        'X' , 'Y' , 'Z' , '&K', '&L', '&M', '&N', '&O',
        '&W', '=A', '=B', '=C', '=D', '=E', '=F', '=G',
        '=H', '=I', '=J', '=K', '=L', '=M', '=N', '=O',
        '=P', '=Q', '=R', '=S', '=T', '=U', '=V', '=W',
        '=X', '=Y', '=Z', '&P', '&Q', '&R', '&S', '&T',
    ];

    /* - - - - CODE 128 ENCODER - - - - */

    private function code_128_encode($data, $dstate, $fnc1)
    {
        $data = preg_replace('/[\x80-\xFF]/', '', $data);
        $label = preg_replace('/[\x00-\x1F\x7F]/', ' ', $data);
        $chars = $this->code_128_normalize($data, $dstate, $fnc1);
        $checksum = $chars[0] % 103;
        for ($i = 1, $n = count($chars); $i < $n; $i++) {
            $checksum += $i * $chars[$i];
            $checksum %= 103;
        }
        $chars[] = $checksum;
        $chars[] = 106;
        $modules = [];
        $modules[] = [0, 10, 0];
        foreach ($chars as $char) {
            $block = $this->code_128_alphabet[$char];
            foreach ($block as $i => $module) {
                $modules[] = [($i & 1) ^ 1, $module, 1];
            }
        }
        $modules[] = [0, 10, 0];
        $blocks = [['m' => $modules, 'l' => [$label]]];

        return ['g' => 'l', 'b' => $blocks];
    }

    private function code_128_normalize($data, $dstate, $fnc1)
    {
        $detectcba = '/(^[0-9]{4,}|^[0-9]{2}$)|([\x60-\x7F])|([\x00-\x1F])/';
        $detectc = '/(^[0-9]{6,}|^[0-9]{4,}$)/';
        $detectba = '/([\x60-\x7F])|([\x00-\x1F])/';
        $consumec = '/(^[0-9]{2})/';
        $state = (($dstate > 0 && $dstate < 4) ? $dstate : 0);
        $abstate = ((abs($dstate) == 2) ? 2 : 1);
        $chars = [102 + ($state ? $state : $abstate)];
        if ($fnc1) {
            $chars[] = 102;
        }
        while (strlen($data)) {
            switch ($state) {
                case 0:
                    if (preg_match($detectcba, $data, $m)) {
                        if ($m[1]) {
                            $state = 3;
                        } elseif ($m[2]) {
                            $state = 2;
                        } else {
                            $state = 1;
                        }
                    } else {
                        $state = $abstate;
                    }
                    $chars = [102 + $state];
                    if ($fnc1) {
                        $chars[] = 102;
                    }

                    break;
                case 1:
                    if ($dstate <= 0 && preg_match($detectc, $data, $m)) {
                        if (strlen($m[0]) % 2) {
                            $data = substr($data, 1);
                            $chars[] = 16 + substr($m[0], 0, 1);
                        }
                        $state = 3;
                        $chars[] = 99;
                    } else {
                        $ch = ord(substr($data, 0, 1));
                        $data = substr($data, 1);
                        if ($ch < 32) {
                            $chars[] = $ch + 64;
                        } elseif ($ch < 96) {
                            $chars[] = $ch - 32;
                        } else {
                            if (preg_match($detectba, $data, $m)) {
                                if ($m[1]) {
                                    $state = 2;
                                    $chars[] = 100;
                                } else {
                                    $chars[] = 98;
                                }
                            } else {
                                $chars[] = 98;
                            }
                            $chars[] = $ch - 32;
                        }
                    }

                    break;
                case 2:
                    if ($dstate <= 0 && preg_match($detectc, $data, $m)) {
                        if (strlen($m[0]) % 2) {
                            $data = substr($data, 1);
                            $chars[] = 16 + substr($m[0], 0, 1);
                        }
                        $state = 3;
                        $chars[] = 99;
                    } else {
                        $ch = ord(substr($data, 0, 1));
                        $data = substr($data, 1);
                        if ($ch >= 32) {
                            $chars[] = $ch - 32;
                        } else {
                            if (preg_match($detectba, $data, $m)) {
                                if ($m[2]) {
                                    $state = 1;
                                    $chars[] = 101;
                                } else {
                                    $chars[] = 98;
                                }
                            } else {
                                $chars[] = 98;
                            }
                            $chars[] = $ch + 64;
                        }
                    }

                    break;
                case 3:
                    if (preg_match($consumec, $data, $m)) {
                        $data = substr($data, 2);
                        $chars[] = (int)$m[0];
                    } else {
                        if (preg_match($detectba, $data, $m)) {
                            if ($m[1]) {
                                $state = 2;
                            } else {
                                $state = 1;
                            }
                        } else {
                            $state = $abstate;
                        }
                        $chars[] = 102 - $state;
                    }

                    break;
            }
        }

        return $chars;
    }

    private $code_128_alphabet = [
        [2, 1, 2, 2, 2, 2], [2, 2, 2, 1, 2, 2],
        [2, 2, 2, 2, 2, 1], [1, 2, 1, 2, 2, 3],
        [1, 2, 1, 3, 2, 2], [1, 3, 1, 2, 2, 2],
        [1, 2, 2, 2, 1, 3], [1, 2, 2, 3, 1, 2],
        [1, 3, 2, 2, 1, 2], [2, 2, 1, 2, 1, 3],
        [2, 2, 1, 3, 1, 2], [2, 3, 1, 2, 1, 2],
        [1, 1, 2, 2, 3, 2], [1, 2, 2, 1, 3, 2],
        [1, 2, 2, 2, 3, 1], [1, 1, 3, 2, 2, 2],
        [1, 2, 3, 1, 2, 2], [1, 2, 3, 2, 2, 1],
        [2, 2, 3, 2, 1, 1], [2, 2, 1, 1, 3, 2],
        [2, 2, 1, 2, 3, 1], [2, 1, 3, 2, 1, 2],
        [2, 2, 3, 1, 1, 2], [3, 1, 2, 1, 3, 1],
        [3, 1, 1, 2, 2, 2], [3, 2, 1, 1, 2, 2],
        [3, 2, 1, 2, 2, 1], [3, 1, 2, 2, 1, 2],
        [3, 2, 2, 1, 1, 2], [3, 2, 2, 2, 1, 1],
        [2, 1, 2, 1, 2, 3], [2, 1, 2, 3, 2, 1],
        [2, 3, 2, 1, 2, 1], [1, 1, 1, 3, 2, 3],
        [1, 3, 1, 1, 2, 3], [1, 3, 1, 3, 2, 1],
        [1, 1, 2, 3, 1, 3], [1, 3, 2, 1, 1, 3],
        [1, 3, 2, 3, 1, 1], [2, 1, 1, 3, 1, 3],
        [2, 3, 1, 1, 1, 3], [2, 3, 1, 3, 1, 1],
        [1, 1, 2, 1, 3, 3], [1, 1, 2, 3, 3, 1],
        [1, 3, 2, 1, 3, 1], [1, 1, 3, 1, 2, 3],
        [1, 1, 3, 3, 2, 1], [1, 3, 3, 1, 2, 1],
        [3, 1, 3, 1, 2, 1], [2, 1, 1, 3, 3, 1],
        [2, 3, 1, 1, 3, 1], [2, 1, 3, 1, 1, 3],
        [2, 1, 3, 3, 1, 1], [2, 1, 3, 1, 3, 1],
        [3, 1, 1, 1, 2, 3], [3, 1, 1, 3, 2, 1],
        [3, 3, 1, 1, 2, 1], [3, 1, 2, 1, 1, 3],
        [3, 1, 2, 3, 1, 1], [3, 3, 2, 1, 1, 1],
        [3, 1, 4, 1, 1, 1], [2, 2, 1, 4, 1, 1],
        [4, 3, 1, 1, 1, 1], [1, 1, 1, 2, 2, 4],
        [1, 1, 1, 4, 2, 2], [1, 2, 1, 1, 2, 4],
        [1, 2, 1, 4, 2, 1], [1, 4, 1, 1, 2, 2],
        [1, 4, 1, 2, 2, 1], [1, 1, 2, 2, 1, 4],
        [1, 1, 2, 4, 1, 2], [1, 2, 2, 1, 1, 4],
        [1, 2, 2, 4, 1, 1], [1, 4, 2, 1, 1, 2],
        [1, 4, 2, 2, 1, 1], [2, 4, 1, 2, 1, 1],
        [2, 2, 1, 1, 1, 4], [4, 1, 3, 1, 1, 1],
        [2, 4, 1, 1, 1, 2], [1, 3, 4, 1, 1, 1],
        [1, 1, 1, 2, 4, 2], [1, 2, 1, 1, 4, 2],
        [1, 2, 1, 2, 4, 1], [1, 1, 4, 2, 1, 2],
        [1, 2, 4, 1, 1, 2], [1, 2, 4, 2, 1, 1],
        [4, 1, 1, 2, 1, 2], [4, 2, 1, 1, 1, 2],
        [4, 2, 1, 2, 1, 1], [2, 1, 2, 1, 4, 1],
        [2, 1, 4, 1, 2, 1], [4, 1, 2, 1, 2, 1],
        [1, 1, 1, 1, 4, 3], [1, 1, 1, 3, 4, 1],
        [1, 3, 1, 1, 4, 1], [1, 1, 4, 1, 1, 3],
        [1, 1, 4, 3, 1, 1], [4, 1, 1, 1, 1, 3],
        [4, 1, 1, 3, 1, 1], [1, 1, 3, 1, 4, 1],
        [1, 1, 4, 1, 3, 1], [3, 1, 1, 1, 4, 1],
        [4, 1, 1, 1, 3, 1], [2, 1, 1, 4, 1, 2],
        [2, 1, 1, 2, 1, 4], [2, 1, 1, 2, 3, 2],
        [2, 3, 3, 1, 1, 1, 2],
    ];

    /* - - - - CODABAR ENCODER - - - - */

    private function codabar_encode($data)
    {
        $data = strtoupper(preg_replace(
            '/[^0-9ABCDENTabcdent*.\/:+$-]/',
            '',
            $data
        ));
        $blocks = [];
        for ($i = 0, $n = strlen($data); $i < $n; $i++) {
            if ($blocks) {
                $blocks[] = [
                    'm' => [[0, 1, 3]],
                ];
            }
            $char = substr($data, $i, 1);
            $block = $this->codabar_alphabet[$char];
            $blocks[] = [
                'm' => [
                    [1, 1, $block[0]],
                    [0, 1, $block[1]],
                    [1, 1, $block[2]],
                    [0, 1, $block[3]],
                    [1, 1, $block[4]],
                    [0, 1, $block[5]],
                    [1, 1, $block[6]],
                ],
                'l' => [$char],
            ];
        }

        return ['g' => 'l', 'b' => $blocks];
    }

    private $codabar_alphabet = [
        '0' => [1, 1, 1, 1, 1, 2, 2],
        '1' => [1, 1, 1, 1, 2, 2, 1],
        '4' => [1, 1, 2, 1, 1, 2, 1],
        '5' => [2, 1, 1, 1, 1, 2, 1],
        '2' => [1, 1, 1, 2, 1, 1, 2],
        '-' => [1, 1, 1, 2, 2, 1, 1],
        '$' => [1, 1, 2, 2, 1, 1, 1],
        '9' => [2, 1, 1, 2, 1, 1, 1],
        '6' => [1, 2, 1, 1, 1, 1, 2],
        '7' => [1, 2, 1, 1, 2, 1, 1],
        '8' => [1, 2, 2, 1, 1, 1, 1],
        '3' => [2, 2, 1, 1, 1, 1, 1],
        'C' => [1, 1, 1, 2, 1, 2, 2],
        'D' => [1, 1, 1, 2, 2, 2, 1],
        'A' => [1, 1, 2, 2, 1, 2, 1],
        'B' => [1, 2, 1, 2, 1, 1, 2],
        '*' => [1, 1, 1, 2, 1, 2, 2],
        'E' => [1, 1, 1, 2, 2, 2, 1],
        'T' => [1, 1, 2, 2, 1, 2, 1],
        'N' => [1, 2, 1, 2, 1, 1, 2],
        '.' => [2, 1, 2, 1, 2, 1, 1],
        '/' => [2, 1, 2, 1, 1, 1, 2],
        ':' => [2, 1, 1, 1, 2, 1, 2],
        '+' => [1, 1, 2, 1, 2, 1, 2],
    ];

    /* - - - - ITF ENCODER - - - - */

    private function itf_encode($data)
    {
        $data = preg_replace('/[^0-9]/', '', $data);
        if (strlen($data) % 2) {
            $data = '0' . $data;
        }
        $blocks = [];
        /* Quiet zone, start. */
        $blocks[] = [
            'm' => [[0, 10, 0]],
        ];
        $blocks[] = [
            'm' => [
                [1, 1, 1],
                [0, 1, 1],
                [1, 1, 1],
                [0, 1, 1],
            ],
        ];
        /* Data. */
        for ($i = 0, $n = strlen($data); $i < $n; $i += 2) {
            $c1 = substr($data, $i, 1);
            $c2 = substr($data, $i + 1, 1);
            $b1 = $this->itf_alphabet[$c1];
            $b2 = $this->itf_alphabet[$c2];
            $blocks[] = [
                'm' => [
                    [1, 1, $b1[0]],
                    [0, 1, $b2[0]],
                    [1, 1, $b1[1]],
                    [0, 1, $b2[1]],
                    [1, 1, $b1[2]],
                    [0, 1, $b2[2]],
                    [1, 1, $b1[3]],
                    [0, 1, $b2[3]],
                    [1, 1, $b1[4]],
                    [0, 1, $b2[4]],
                ],
                'l' => [$c1 . $c2],
            ];
        }
        /* End, quiet zone. */
        $blocks[] = [
            'm' => [
                [1, 1, 2],
                [0, 1, 1],
                [1, 1, 1],
            ],
        ];
        $blocks[] = [
            'm' => [[0, 10, 0]],
        ];
        /* Return code. */
        return ['g' => 'l', 'b' => $blocks];
    }

    private $itf_alphabet = [
        '0' => [1, 1, 2, 2, 1],
        '1' => [2, 1, 1, 1, 2],
        '2' => [1, 2, 1, 1, 2],
        '3' => [2, 2, 1, 1, 1],
        '4' => [1, 1, 2, 1, 2],
        '5' => [2, 1, 2, 1, 1],
        '6' => [1, 2, 2, 1, 1],
        '7' => [1, 1, 1, 2, 2],
        '8' => [2, 1, 1, 2, 1],
        '9' => [1, 2, 1, 2, 1],
    ];

    /* - - - - QR ENCODER - - - - */

    private function qr_encode($data, $ecl)
    {
        list($mode, $vers, $ec, $data) = $this->qr_encode_data($data, $ecl);
        $data = $this->qr_encode_ec($data, $ec, $vers);
        list($size, $mtx) = $this->qr_create_matrix($vers, $data);
        list($mask, $mtx) = $this->qr_apply_best_mask($mtx, $size);
        $mtx = $this->qr_finalize_matrix($mtx, $size, $ecl, $mask, $vers);

        return [
            'g' => 'm',
            'q' => [4, 4, 4, 4],
            's' => [$size, $size],
            'b' => $mtx,
        ];
    }

    private function qr_encode_data($data, $ecl)
    {
        $mode = $this->qr_detect_mode($data);
        $version = $this->qr_detect_version($data, $mode, $ecl);
        $version_group = (($version < 10) ? 0 : (($version < 27) ? 1 : 2));
        $ec_params = $this->qr_ec_params[($version - 1) * 4 + $ecl];
        /* Don't cut off mid-character if exceeding capacity. */
        $max_chars = $this->qr_capacity[$version - 1][$ecl][$mode];
        if ($mode == 3) {
            $max_chars <<= 1;
        }
        $data = substr($data, 0, $max_chars);
        /* Convert from character level to bit level. */
        switch ($mode) {
            case 0:
                $code = $this->qr_encode_numeric($data, $version_group);

                break;
            case 1:
                $code = $this->qr_encode_alphanumeric($data, $version_group);

                break;
            case 2:
                $code = $this->qr_encode_binary($data, $version_group);

                break;
            case 3:
                $code = $this->qr_encode_kanji($data, $version_group);

                break;
        }
        for ($i = 0; $i < 4; $i++) {
            $code[] = 0;
        }
        while (count($code) % 8) {
            $code[] = 0;
        }
        /* Convert from bit level to byte level. */
        $data = [];
        for ($i = 0, $n = count($code); $i < $n; $i += 8) {
            $byte = 0;
            if ($code[$i + 0]) {
                $byte |= 0x80;
            }
            if ($code[$i + 1]) {
                $byte |= 0x40;
            }
            if ($code[$i + 2]) {
                $byte |= 0x20;
            }
            if ($code[$i + 3]) {
                $byte |= 0x10;
            }
            if ($code[$i + 4]) {
                $byte |= 0x08;
            }
            if ($code[$i + 5]) {
                $byte |= 0x04;
            }
            if ($code[$i + 6]) {
                $byte |= 0x02;
            }
            if ($code[$i + 7]) {
                $byte |= 0x01;
            }
            $data[] = $byte;
        }
        for (
            $i = count($data), $a = 1, $n = $ec_params[0];
            $i < $n; $i++, $a ^= 1
        ) {
            $data[] = $a ? 236 : 17;
        }
        /* Return. */
        return [$mode, $version, $ec_params, $data];
    }

    private function qr_detect_mode($data)
    {
        $numeric = '/^[0-9]*$/';
        $alphanumeric = '/^[0-9A-Z .\/:$%*+-]*$/';
        $kanji = '/^([\x81-\x9F\xE0-\xEA][\x40-\xFC]|[\xEB][\x40-\xBF])*$/';
        if (preg_match($numeric, $data)) {
            return 0;
        }
        if (preg_match($alphanumeric, $data)) {
            return 1;
        }
        if (preg_match($kanji, $data)) {
            return 3;
        }

        return 2;
    }

    private function qr_detect_version($data, $mode, $ecl)
    {
        $length = strlen($data);
        if ($mode == 3) {
            $length >>= 1;
        }
        for ($v = 0; $v < 40; $v++) {
            if ($length <= $this->qr_capacity[$v][$ecl][$mode]) {
                return $v + 1;
            }
        }

        return 40;
    }

    private function qr_encode_numeric($data, $version_group)
    {
        $code = [0, 0, 0, 1];
        $length = strlen($data);
        switch ($version_group) {
            case 2:  /* 27 - 40 */
                $code[] = $length & 0x2000;
                $code[] = $length & 0x1000;
                // no break
            case 1:  /* 10 - 26 */
                $code[] = $length & 0x0800;
                $code[] = $length & 0x0400;
                // no break
            case 0:  /* 1 - 9 */
                $code[] = $length & 0x0200;
                $code[] = $length & 0x0100;
                $code[] = $length & 0x0080;
                $code[] = $length & 0x0040;
                $code[] = $length & 0x0020;
                $code[] = $length & 0x0010;
                $code[] = $length & 0x0008;
                $code[] = $length & 0x0004;
                $code[] = $length & 0x0002;
                $code[] = $length & 0x0001;
        }
        for ($i = 0; $i < $length; $i += 3) {
            $group = substr($data, $i, 3);
            switch (strlen($group)) {
                case 3:
                    $code[] = $group & 0x200;
                    $code[] = $group & 0x100;
                    $code[] = $group & 0x080;
                    // no break
                case 2:
                    $code[] = $group & 0x040;
                    $code[] = $group & 0x020;
                    $code[] = $group & 0x010;
                    // no break
                case 1:
                    $code[] = $group & 0x008;
                    $code[] = $group & 0x004;
                    $code[] = $group & 0x002;
                    $code[] = $group & 0x001;
            }
        }

        return $code;
    }

    private function qr_encode_alphanumeric($data, $version_group)
    {
        $alphabet = '0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ $%*+-./:';
        $code = [0, 0, 1, 0];
        $length = strlen($data);
        switch ($version_group) {
            case 2:  /* 27 - 40 */
                $code[] = $length & 0x1000;
                $code[] = $length & 0x0800;
                // no break
            case 1:  /* 10 - 26 */
                $code[] = $length & 0x0400;
                $code[] = $length & 0x0200;
                // no break
            case 0:  /* 1 - 9 */
                $code[] = $length & 0x0100;
                $code[] = $length & 0x0080;
                $code[] = $length & 0x0040;
                $code[] = $length & 0x0020;
                $code[] = $length & 0x0010;
                $code[] = $length & 0x0008;
                $code[] = $length & 0x0004;
                $code[] = $length & 0x0002;
                $code[] = $length & 0x0001;
        }
        for ($i = 0; $i < $length; $i += 2) {
            $group = substr($data, $i, 2);
            if (strlen($group) > 1) {
                $c1 = strpos($alphabet, substr($group, 0, 1));
                $c2 = strpos($alphabet, substr($group, 1, 1));
                $ch = $c1 * 45 + $c2;
                $code[] = $ch & 0x400;
                $code[] = $ch & 0x200;
                $code[] = $ch & 0x100;
                $code[] = $ch & 0x080;
                $code[] = $ch & 0x040;
                $code[] = $ch & 0x020;
                $code[] = $ch & 0x010;
                $code[] = $ch & 0x008;
                $code[] = $ch & 0x004;
                $code[] = $ch & 0x002;
                $code[] = $ch & 0x001;
            } else {
                $ch = strpos($alphabet, $group);
                $code[] = $ch & 0x020;
                $code[] = $ch & 0x010;
                $code[] = $ch & 0x008;
                $code[] = $ch & 0x004;
                $code[] = $ch & 0x002;
                $code[] = $ch & 0x001;
            }
        }

        return $code;
    }

    private function qr_encode_binary($data, $version_group)
    {
        $code = [0, 1, 0, 0];
        $length = strlen($data);
        switch ($version_group) {
            case 2:  /* 27 - 40 */
            case 1:  /* 10 - 26 */
                $code[] = $length & 0x8000;
                $code[] = $length & 0x4000;
                $code[] = $length & 0x2000;
                $code[] = $length & 0x1000;
                $code[] = $length & 0x0800;
                $code[] = $length & 0x0400;
                $code[] = $length & 0x0200;
                $code[] = $length & 0x0100;
                // no break
            case 0:  /* 1 - 9 */
                $code[] = $length & 0x0080;
                $code[] = $length & 0x0040;
                $code[] = $length & 0x0020;
                $code[] = $length & 0x0010;
                $code[] = $length & 0x0008;
                $code[] = $length & 0x0004;
                $code[] = $length & 0x0002;
                $code[] = $length & 0x0001;
        }
        for ($i = 0; $i < $length; $i++) {
            $ch = ord(substr($data, $i, 1));
            $code[] = $ch & 0x80;
            $code[] = $ch & 0x40;
            $code[] = $ch & 0x20;
            $code[] = $ch & 0x10;
            $code[] = $ch & 0x08;
            $code[] = $ch & 0x04;
            $code[] = $ch & 0x02;
            $code[] = $ch & 0x01;
        }

        return $code;
    }

    private function qr_encode_kanji($data, $version_group)
    {
        $code = [1, 0, 0, 0];
        $length = strlen($data);
        switch ($version_group) {
            case 2:  /* 27 - 40 */
                $code[] = $length & 0x1000;
                $code[] = $length & 0x0800;
                // no break
            case 1:  /* 10 - 26 */
                $code[] = $length & 0x0400;
                $code[] = $length & 0x0200;
                // no break
            case 0:  /* 1 - 9 */
                $code[] = $length & 0x0100;
                $code[] = $length & 0x0080;
                $code[] = $length & 0x0040;
                $code[] = $length & 0x0020;
                $code[] = $length & 0x0010;
                $code[] = $length & 0x0008;
                $code[] = $length & 0x0004;
                $code[] = $length & 0x0002;
        }
        for ($i = 0; $i < $length; $i += 2) {
            $group = substr($data, $i, 2);
            $c1 = ord(substr($group, 0, 1));
            $c2 = ord(substr($group, 1, 1));
            if ($c1 >= 0x81 && $c1 <= 0x9F && $c2 >= 0x40 && $c2 <= 0xFC) {
                $ch = ($c1 - 0x81) * 0xC0 + ($c2 - 0x40);
            } elseif (
                ($c1 >= 0xE0 && $c1 <= 0xEA && $c2 >= 0x40 && $c2 <= 0xFC) ||
                ($c1 == 0xEB && $c2 >= 0x40 && $c2 <= 0xBF)
            ) {
                $ch = ($c1 - 0xC1) * 0xC0 + ($c2 - 0x40);
            } else {
                $ch = 0;
            }
            $code[] = $ch & 0x1000;
            $code[] = $ch & 0x0800;
            $code[] = $ch & 0x0400;
            $code[] = $ch & 0x0200;
            $code[] = $ch & 0x0100;
            $code[] = $ch & 0x0080;
            $code[] = $ch & 0x0040;
            $code[] = $ch & 0x0020;
            $code[] = $ch & 0x0010;
            $code[] = $ch & 0x0008;
            $code[] = $ch & 0x0004;
            $code[] = $ch & 0x0002;
            $code[] = $ch & 0x0001;
        }

        return $code;
    }

    private function qr_encode_ec($data, $ec_params, $version)
    {
        $blocks = $this->qr_ec_split($data, $ec_params);
        $ec_blocks = [];
        for ($i = 0, $n = count($blocks); $i < $n; $i++) {
            $ec_blocks[] = $this->qr_ec_divide($blocks[$i], $ec_params);
        }
        $data = $this->qr_ec_interleave($blocks);
        $ec_data = $this->qr_ec_interleave($ec_blocks);
        $code = [];
        foreach ($data as $ch) {
            $code[] = $ch & 0x80;
            $code[] = $ch & 0x40;
            $code[] = $ch & 0x20;
            $code[] = $ch & 0x10;
            $code[] = $ch & 0x08;
            $code[] = $ch & 0x04;
            $code[] = $ch & 0x02;
            $code[] = $ch & 0x01;
        }
        foreach ($ec_data as $ch) {
            $code[] = $ch & 0x80;
            $code[] = $ch & 0x40;
            $code[] = $ch & 0x20;
            $code[] = $ch & 0x10;
            $code[] = $ch & 0x08;
            $code[] = $ch & 0x04;
            $code[] = $ch & 0x02;
            $code[] = $ch & 0x01;
        }
        for ($n = $this->qr_remainder_bits[$version - 1]; $n > 0; $n--) {
            $code[] = 0;
        }

        return $code;
    }

    private function qr_ec_split($data, $ec_params)
    {
        $blocks = [];
        $offset = 0;
        for ($i = $ec_params[2], $length = $ec_params[3]; $i > 0; $i--) {
            $blocks[] = array_slice($data, $offset, $length);
            $offset += $length;
        }
        for ($i = $ec_params[4], $length = $ec_params[5]; $i > 0; $i--) {
            $blocks[] = array_slice($data, $offset, $length);
            $offset += $length;
        }

        return $blocks;
    }

    private function qr_ec_divide($data, $ec_params)
    {
        $num_data = count($data);
        $num_error = $ec_params[1];
        $generator = $this->qr_ec_polynomials[$num_error];
        $message = $data;
        for ($i = 0; $i < $num_error; $i++) {
            $message[] = 0;
        }
        for ($i = 0; $i < $num_data; $i++) {
            if ($message[$i]) {
                $leadterm = $this->qr_log[$message[$i]];
                for ($j = 0; $j <= $num_error; $j++) {
                    $term = ($generator[$j] + $leadterm) % 255;
                    $message[$i + $j] ^= $this->qr_exp[$term];
                }
            }
        }

        return array_slice($message, $num_data, $num_error);
    }

    private function qr_ec_interleave($blocks)
    {
        $data = [];
        $num_blocks = count($blocks);
        for ($offset = 0; true; $offset++) {
            $break = true;
            for ($i = 0; $i < $num_blocks; $i++) {
                if (isset($blocks[$i][$offset])) {
                    $data[] = $blocks[$i][$offset];
                    $break = false;
                }
            }
            if ($break) {
                break;
            }
        }

        return $data;
    }

    private function qr_create_matrix($version, $data)
    {
        $size = $version * 4 + 17;
        $matrix = [];
        for ($i = 0; $i < $size; $i++) {
            $row = [];
            for ($j = 0; $j < $size; $j++) {
                $row[] = 0;
            }
            $matrix[] = $row;
        }
        /* Finder patterns. */
        for ($i = 0; $i < 8; $i++) {
            for ($j = 0; $j < 8; $j++) {
                $m = (($i == 7 || $j == 7) ? 2 :
                    (($i == 0 || $j == 0 || $i == 6 || $j == 6) ? 3 :
                        (($i == 1 || $j == 1 || $i == 5 || $j == 5) ? 2 : 3)));
                $matrix[$i][$j] = $m;
                $matrix[$size - $i - 1][$j] = $m;
                $matrix[$i][$size - $j - 1] = $m;
            }
        }
        /* Alignment patterns. */
        if ($version >= 2) {
            $alignment = $this->qr_alignment_patterns[$version - 2];
            foreach ($alignment as $i) {
                foreach ($alignment as $j) {
                    if (! $matrix[$i][$j]) {
                        for ($ii = -2; $ii <= 2; $ii++) {
                            for ($jj = -2; $jj <= 2; $jj++) {
                                $m = (max(abs($ii), abs($jj)) & 1) ^ 3;
                                $matrix[$i + $ii][$j + $jj] = $m;
                            }
                        }
                    }
                }
            }
        }
        /* Timing patterns. */
        for ($i = $size - 9; $i >= 8; $i--) {
            $matrix[$i][6] = ($i & 1) ^ 3;
            $matrix[6][$i] = ($i & 1) ^ 3;
        }
        /* Dark module. Such an ominous name for such an innocuous thing. */
        $matrix[$size - 8][8] = 3;
        /* Format information area. */
        for ($i = 0; $i <= 8; $i++) {
            if (! $matrix[$i][8]) {
                $matrix[$i][8] = 1;
            }
            if (! $matrix[8][$i]) {
                $matrix[8][$i] = 1;
            }
            if ($i && ! $matrix[$size - $i][8]) {
                $matrix[$size - $i][8] = 1;
            }
            if ($i && ! $matrix[8][$size - $i]) {
                $matrix[8][$size - $i] = 1;
            }
        }
        /* Version information area. */
        if ($version >= 7) {
            for ($i = 9; $i < 12; $i++) {
                for ($j = 0; $j < 6; $j++) {
                    $matrix[$size - $i][$j] = 1;
                    $matrix[$j][$size - $i] = 1;
                }
            }
        }
        /* Data. */
        $col = $size - 1;
        $row = $size - 1;
        $dir = -1;
        $offset = 0;
        $length = count($data);
        while ($col > 0 && $offset < $length) {
            if (! $matrix[$row][$col]) {
                $matrix[$row][$col] = $data[$offset] ? 5 : 4;
                $offset++;
            }
            if (! $matrix[$row][$col - 1]) {
                $matrix[$row][$col - 1] = $data[$offset] ? 5 : 4;
                $offset++;
            }
            $row += $dir;
            if ($row < 0 || $row >= $size) {
                $dir = -$dir;
                $row += $dir;
                $col -= 2;
                if ($col == 6) {
                    $col--;
                }
            }
        }

        return [$size, $matrix];
    }

    private function qr_apply_best_mask($matrix, $size)
    {
        $best_mask = 0;
        $best_matrix = $this->qr_apply_mask($matrix, $size, $best_mask);
        $best_penalty = $this->qr_penalty($best_matrix, $size);
        for ($test_mask = 1; $test_mask < 8; $test_mask++) {
            $test_matrix = $this->qr_apply_mask($matrix, $size, $test_mask);
            $test_penalty = $this->qr_penalty($test_matrix, $size);
            if ($test_penalty < $best_penalty) {
                $best_mask = $test_mask;
                $best_matrix = $test_matrix;
                $best_penalty = $test_penalty;
            }
        }

        return [$best_mask, $best_matrix];
    }

    private function qr_apply_mask($matrix, $size, $mask)
    {
        for ($i = 0; $i < $size; $i++) {
            for ($j = 0; $j < $size; $j++) {
                if ($matrix[$i][$j] >= 4) {
                    if ($this->qr_mask($mask, $i, $j)) {
                        $matrix[$i][$j] ^= 1;
                    }
                }
            }
        }

        return $matrix;
    }

    private function qr_mask($mask, $r, $c)
    {
        switch ($mask) {
            case 0: return ! (($r + $c) % 2);
            case 1: return ! (($r) % 2);
            case 2: return ! (($c) % 3);
            case 3: return ! (($r + $c) % 3);
            case 4: return ! ((floor(($r) / 2) + floor(($c) / 3)) % 2);
            case 5: return ! (((($r * $c) % 2) + (($r * $c) % 3)));
            case 6: return ! (((($r * $c) % 2) + (($r * $c) % 3)) % 2);
            case 7: return ! (((($r + $c) % 2) + (($r * $c) % 3)) % 2);
        }
    }

    private function qr_penalty(&$matrix, $size)
    {
        $score = $this->qr_penalty_1($matrix, $size);
        $score += $this->qr_penalty_2($matrix, $size);
        $score += $this->qr_penalty_3($matrix, $size);
        $score += $this->qr_penalty_4($matrix, $size);

        return $score;
    }

    private function qr_penalty_1(&$matrix, $size)
    {
        $score = 0;
        for ($i = 0; $i < $size; $i++) {
            $rowvalue = 0;
            $rowcount = 0;
            $colvalue = 0;
            $colcount = 0;
            for ($j = 0; $j < $size; $j++) {
                $rv = ($matrix[$i][$j] == 5 || $matrix[$i][$j] == 3) ? 1 : 0;
                $cv = ($matrix[$j][$i] == 5 || $matrix[$j][$i] == 3) ? 1 : 0;
                if ($rv == $rowvalue) {
                    $rowcount++;
                } else {
                    if ($rowcount >= 5) {
                        $score += $rowcount - 2;
                    }
                    $rowvalue = $rv;
                    $rowcount = 1;
                }
                if ($cv == $colvalue) {
                    $colcount++;
                } else {
                    if ($colcount >= 5) {
                        $score += $colcount - 2;
                    }
                    $colvalue = $cv;
                    $colcount = 1;
                }
            }
            if ($rowcount >= 5) {
                $score += $rowcount - 2;
            }
            if ($colcount >= 5) {
                $score += $colcount - 2;
            }
        }

        return $score;
    }

    private function qr_penalty_2(&$matrix, $size)
    {
        $score = 0;
        for ($i = 1; $i < $size; $i++) {
            for ($j = 1; $j < $size; $j++) {
                $v1 = $matrix[$i - 1][$j - 1];
                $v2 = $matrix[$i - 1][$j    ];
                $v3 = $matrix[$i    ][$j - 1];
                $v4 = $matrix[$i    ][$j    ];
                $v1 = ($v1 == 5 || $v1 == 3) ? 1 : 0;
                $v2 = ($v2 == 5 || $v2 == 3) ? 1 : 0;
                $v3 = ($v3 == 5 || $v3 == 3) ? 1 : 0;
                $v4 = ($v4 == 5 || $v4 == 3) ? 1 : 0;
                if ($v1 == $v2 && $v2 == $v3 && $v3 == $v4) {
                    $score += 3;
                }
            }
        }

        return $score;
    }

    private function qr_penalty_3(&$matrix, $size)
    {
        $score = 0;
        for ($i = 0; $i < $size; $i++) {
            $rowvalue = 0;
            $colvalue = 0;
            for ($j = 0; $j < 11; $j++) {
                $rv = ($matrix[$i][$j] == 5 || $matrix[$i][$j] == 3) ? 1 : 0;
                $cv = ($matrix[$j][$i] == 5 || $matrix[$j][$i] == 3) ? 1 : 0;
                $rowvalue = (($rowvalue << 1) & 0x7FF) | $rv;
                $colvalue = (($colvalue << 1) & 0x7FF) | $cv;
            }
            if ($rowvalue == 0x5D0 || $rowvalue == 0x5D) {
                $score += 40;
            }
            if ($colvalue == 0x5D0 || $colvalue == 0x5D) {
                $score += 40;
            }
            for ($j = 11; $j < $size; $j++) {
                $rv = ($matrix[$i][$j] == 5 || $matrix[$i][$j] == 3) ? 1 : 0;
                $cv = ($matrix[$j][$i] == 5 || $matrix[$j][$i] == 3) ? 1 : 0;
                $rowvalue = (($rowvalue << 1) & 0x7FF) | $rv;
                $colvalue = (($colvalue << 1) & 0x7FF) | $cv;
                if ($rowvalue == 0x5D0 || $rowvalue == 0x5D) {
                    $score += 40;
                }
                if ($colvalue == 0x5D0 || $colvalue == 0x5D) {
                    $score += 40;
                }
            }
        }

        return $score;
    }

    private function qr_penalty_4(&$matrix, $size)
    {
        $dark = 0;
        for ($i = 0; $i < $size; $i++) {
            for ($j = 0; $j < $size; $j++) {
                if ($matrix[$i][$j] == 5 || $matrix[$i][$j] == 3) {
                    $dark++;
                }
            }
        }
        $dark *= 20;
        $dark /= $size * $size;
        $a = abs(floor($dark) - 10);
        $b = abs(ceil($dark) - 10);

        return min($a, $b) * 10;
    }

    private function qr_finalize_matrix(
        $matrix,
        $size,
        $ecl,
        $mask,
        $version
    ) {
        /* Format Info */
        $format = $this->qr_format_info[$ecl * 8 + $mask];
        $matrix[8][0] = $format[0];
        $matrix[8][1] = $format[1];
        $matrix[8][2] = $format[2];
        $matrix[8][3] = $format[3];
        $matrix[8][4] = $format[4];
        $matrix[8][5] = $format[5];
        $matrix[8][7] = $format[6];
        $matrix[8][8] = $format[7];
        $matrix[7][8] = $format[8];
        $matrix[5][8] = $format[9];
        $matrix[4][8] = $format[10];
        $matrix[3][8] = $format[11];
        $matrix[2][8] = $format[12];
        $matrix[1][8] = $format[13];
        $matrix[0][8] = $format[14];
        $matrix[$size - 1][8] = $format[0];
        $matrix[$size - 2][8] = $format[1];
        $matrix[$size - 3][8] = $format[2];
        $matrix[$size - 4][8] = $format[3];
        $matrix[$size - 5][8] = $format[4];
        $matrix[$size - 6][8] = $format[5];
        $matrix[$size - 7][8] = $format[6];
        $matrix[8][$size - 8] = $format[7];
        $matrix[8][$size - 7] = $format[8];
        $matrix[8][$size - 6] = $format[9];
        $matrix[8][$size - 5] = $format[10];
        $matrix[8][$size - 4] = $format[11];
        $matrix[8][$size - 3] = $format[12];
        $matrix[8][$size - 2] = $format[13];
        $matrix[8][$size - 1] = $format[14];
        /* Version Info */
        if ($version >= 7) {
            $version = $this->qr_version_info[$version - 7];
            for ($i = 0; $i < 18; $i++) {
                $r = $size - 9 - ($i % 3);
                $c = 5 - floor($i / 3);
                $matrix[$r][$c] = $version[$i];
                $matrix[$c][$r] = $version[$i];
            }
        }
        /* Patterns & Data */
        for ($i = 0; $i < $size; $i++) {
            for ($j = 0; $j < $size; $j++) {
                $matrix[$i][$j] &= 1;
            }
        }

        return $matrix;
    }

    /*  maximum encodable characters = $qr_capacity [ (version - 1) ]  */
    /*    [ (0 for L, 1 for M, 2 for Q, 3 for H)                    ]  */
    /*    [ (0 for numeric, 1 for alpha, 2 for binary, 3 for kanji) ]  */
    private $qr_capacity = [
        [[  41,   25,   17,   10], [  34,   20,   14,    8],
            [  27,   16,   11,    7], [  17,   10,    7,    4], ],
        [[  77,   47,   32,   20], [  63,   38,   26,   16],
            [  48,   29,   20,   12], [  34,   20,   14,    8], ],
        [[ 127,   77,   53,   32], [ 101,   61,   42,   26],
            [  77,   47,   32,   20], [  58,   35,   24,   15], ],
        [[ 187,  114,   78,   48], [ 149,   90,   62,   38],
            [ 111,   67,   46,   28], [  82,   50,   34,   21], ],
        [[ 255,  154,  106,   65], [ 202,  122,   84,   52],
            [ 144,   87,   60,   37], [ 106,   64,   44,   27], ],
        [[ 322,  195,  134,   82], [ 255,  154,  106,   65],
            [ 178,  108,   74,   45], [ 139,   84,   58,   36], ],
        [[ 370,  224,  154,   95], [ 293,  178,  122,   75],
            [ 207,  125,   86,   53], [ 154,   93,   64,   39], ],
        [[ 461,  279,  192,  118], [ 365,  221,  152,   93],
            [ 259,  157,  108,   66], [ 202,  122,   84,   52], ],
        [[ 552,  335,  230,  141], [ 432,  262,  180,  111],
            [ 312,  189,  130,   80], [ 235,  143,   98,   60], ],
        [[ 652,  395,  271,  167], [ 513,  311,  213,  131],
            [ 364,  221,  151,   93], [ 288,  174,  119,   74], ],
        [[ 772,  468,  321,  198], [ 604,  366,  251,  155],
            [ 427,  259,  177,  109], [ 331,  200,  137,   85], ],
        [[ 883,  535,  367,  226], [ 691,  419,  287,  177],
            [ 489,  296,  203,  125], [ 374,  227,  155,   96], ],
        [[1022,  619,  425,  262], [ 796,  483,  331,  204],
            [ 580,  352,  241,  149], [ 427,  259,  177,  109], ],
        [[1101,  667,  458,  282], [ 871,  528,  362,  223],
            [ 621,  376,  258,  159], [ 468,  283,  194,  120], ],
        [[1250,  758,  520,  320], [ 991,  600,  412,  254],
            [ 703,  426,  292,  180], [ 530,  321,  220,  136], ],
        [[1408,  854,  586,  361], [1082,  656,  450,  277],
            [ 775,  470,  322,  198], [ 602,  365,  250,  154], ],
        [[1548,  938,  644,  397], [1212,  734,  504,  310],
            [ 876,  531,  364,  224], [ 674,  408,  280,  173], ],
        [[1725, 1046,  718,  442], [1346,  816,  560,  345],
            [ 948,  574,  394,  243], [ 746,  452,  310,  191], ],
        [[1903, 1153,  792,  488], [1500,  909,  624,  384],
            [1063,  644,  442,  272], [ 813,  493,  338,  208], ],
        [[2061, 1249,  858,  528], [1600,  970,  666,  410],
            [1159,  702,  482,  297], [ 919,  557,  382,  235], ],
        [[2232, 1352,  929,  572], [1708, 1035,  711,  438],
            [1224,  742,  509,  314], [ 969,  587,  403,  248], ],
        [[2409, 1460, 1003,  618], [1872, 1134,  779,  480],
            [1358,  823,  565,  348], [1056,  640,  439,  270], ],
        [[2620, 1588, 1091,  672], [2059, 1248,  857,  528],
            [1468,  890,  611,  376], [1108,  672,  461,  284], ],
        [[2812, 1704, 1171,  721], [2188, 1326,  911,  561],
            [1588,  963,  661,  407], [1228,  744,  511,  315], ],
        [[3057, 1853, 1273,  784], [2395, 1451,  997,  614],
            [1718, 1041,  715,  440], [1286,  779,  535,  330], ],
        [[3283, 1990, 1367,  842], [2544, 1542, 1059,  652],
            [1804, 1094,  751,  462], [1425,  864,  593,  365], ],
        [[3517, 2132, 1465,  902], [2701, 1637, 1125,  692],
            [1933, 1172,  805,  496], [1501,  910,  625,  385], ],
        [[3669, 2223, 1528,  940], [2857, 1732, 1190,  732],
            [2085, 1263,  868,  534], [1581,  958,  658,  405], ],
        [[3909, 2369, 1628, 1002], [3035, 1839, 1264,  778],
            [2181, 1322,  908,  559], [1677, 1016,  698,  430], ],
        [[4158, 2520, 1732, 1066], [3289, 1994, 1370,  843],
            [2358, 1429,  982,  604], [1782, 1080,  742,  457], ],
        [[4417, 2677, 1840, 1132], [3486, 2113, 1452,  894],
            [2473, 1499, 1030,  634], [1897, 1150,  790,  486], ],
        [[4686, 2840, 1952, 1201], [3693, 2238, 1538,  947],
            [2670, 1618, 1112,  684], [2022, 1226,  842,  518], ],
        [[4965, 3009, 2068, 1273], [3909, 2369, 1628, 1002],
            [2805, 1700, 1168,  719], [2157, 1307,  898,  553], ],
        [[5253, 3183, 2188, 1347], [4134, 2506, 1722, 1060],
            [2949, 1787, 1228,  756], [2301, 1394,  958,  590], ],
        [[5529, 3351, 2303, 1417], [4343, 2632, 1809, 1113],
            [3081, 1867, 1283,  790], [2361, 1431,  983,  605], ],
        [[5836, 3537, 2431, 1496], [4588, 2780, 1911, 1176],
            [3244, 1966, 1351,  832], [2524, 1530, 1051,  647], ],
        [[6153, 3729, 2563, 1577], [4775, 2894, 1989, 1224],
            [3417, 2071, 1423,  876], [2625, 1591, 1093,  673], ],
        [[6479, 3927, 2699, 1661], [5039, 3054, 2099, 1292],
            [3599, 2181, 1499,  923], [2735, 1658, 1139,  701], ],
        [[6743, 4087, 2809, 1729], [5313, 3220, 2213, 1362],
            [3791, 2298, 1579,  972], [2927, 1774, 1219,  750], ],
        [[7089, 4296, 2953, 1817], [5596, 3391, 2331, 1435],
            [3993, 2420, 1663, 1024], [3057, 1852, 1273,  784], ],
    ];

    /*  $qr_ec_params[                                              */
    /*    4 * (version - 1) + (0 for L, 1 for M, 2 for Q, 3 for H)  */
    /*  ] = array(                                                  */
    /*    total number of data codewords,                           */
    /*    number of error correction codewords per block,           */
    /*    number of blocks in first group,                          */
    /*    number of data codewords per block in first group,        */
    /*    number of blocks in second group,                         */
    /*    number of data codewords per block in second group        */
    /*  );                                                          */
    private $qr_ec_params = [
        [   19,  7,  1,  19,  0,   0 ],
        [   16, 10,  1,  16,  0,   0 ],
        [   13, 13,  1,  13,  0,   0 ],
        [    9, 17,  1,   9,  0,   0 ],
        [   34, 10,  1,  34,  0,   0 ],
        [   28, 16,  1,  28,  0,   0 ],
        [   22, 22,  1,  22,  0,   0 ],
        [   16, 28,  1,  16,  0,   0 ],
        [   55, 15,  1,  55,  0,   0 ],
        [   44, 26,  1,  44,  0,   0 ],
        [   34, 18,  2,  17,  0,   0 ],
        [   26, 22,  2,  13,  0,   0 ],
        [   80, 20,  1,  80,  0,   0 ],
        [   64, 18,  2,  32,  0,   0 ],
        [   48, 26,  2,  24,  0,   0 ],
        [   36, 16,  4,   9,  0,   0 ],
        [  108, 26,  1, 108,  0,   0 ],
        [   86, 24,  2,  43,  0,   0 ],
        [   62, 18,  2,  15,  2,  16 ],
        [   46, 22,  2,  11,  2,  12 ],
        [  136, 18,  2,  68,  0,   0 ],
        [  108, 16,  4,  27,  0,   0 ],
        [   76, 24,  4,  19,  0,   0 ],
        [   60, 28,  4,  15,  0,   0 ],
        [  156, 20,  2,  78,  0,   0 ],
        [  124, 18,  4,  31,  0,   0 ],
        [   88, 18,  2,  14,  4,  15 ],
        [   66, 26,  4,  13,  1,  14 ],
        [  194, 24,  2,  97,  0,   0 ],
        [  154, 22,  2,  38,  2,  39 ],
        [  110, 22,  4,  18,  2,  19 ],
        [   86, 26,  4,  14,  2,  15 ],
        [  232, 30,  2, 116,  0,   0 ],
        [  182, 22,  3,  36,  2,  37 ],
        [  132, 20,  4,  16,  4,  17 ],
        [  100, 24,  4,  12,  4,  13 ],
        [  274, 18,  2,  68,  2,  69 ],
        [  216, 26,  4,  43,  1,  44 ],
        [  154, 24,  6,  19,  2,  20 ],
        [  122, 28,  6,  15,  2,  16 ],
        [  324, 20,  4,  81,  0,   0 ],
        [  254, 30,  1,  50,  4,  51 ],
        [  180, 28,  4,  22,  4,  23 ],
        [  140, 24,  3,  12,  8,  13 ],
        [  370, 24,  2,  92,  2,  93 ],
        [  290, 22,  6,  36,  2,  37 ],
        [  206, 26,  4,  20,  6,  21 ],
        [  158, 28,  7,  14,  4,  15 ],
        [  428, 26,  4, 107,  0,   0 ],
        [  334, 22,  8,  37,  1,  38 ],
        [  244, 24,  8,  20,  4,  21 ],
        [  180, 22, 12,  11,  4,  12 ],
        [  461, 30,  3, 115,  1, 116 ],
        [  365, 24,  4,  40,  5,  41 ],
        [  261, 20, 11,  16,  5,  17 ],
        [  197, 24, 11,  12,  5,  13 ],
        [  523, 22,  5,  87,  1,  88 ],
        [  415, 24,  5,  41,  5,  42 ],
        [  295, 30,  5,  24,  7,  25 ],
        [  223, 24, 11,  12,  7,  13 ],
        [  589, 24,  5,  98,  1,  99 ],
        [  453, 28,  7,  45,  3,  46 ],
        [  325, 24, 15,  19,  2,  20 ],
        [  253, 30,  3,  15, 13,  16 ],
        [  647, 28,  1, 107,  5, 108 ],
        [  507, 28, 10,  46,  1,  47 ],
        [  367, 28,  1,  22, 15,  23 ],
        [  283, 28,  2,  14, 17,  15 ],
        [  721, 30,  5, 120,  1, 121 ],
        [  563, 26,  9,  43,  4,  44 ],
        [  397, 28, 17,  22,  1,  23 ],
        [  313, 28,  2,  14, 19,  15 ],
        [  795, 28,  3, 113,  4, 114 ],
        [  627, 26,  3,  44, 11,  45 ],
        [  445, 26, 17,  21,  4,  22 ],
        [  341, 26,  9,  13, 16,  14 ],
        [  861, 28,  3, 107,  5, 108 ],
        [  669, 26,  3,  41, 13,  42 ],
        [  485, 30, 15,  24,  5,  25 ],
        [  385, 28, 15,  15, 10,  16 ],
        [  932, 28,  4, 116,  4, 117 ],
        [  714, 26, 17,  42,  0,   0 ],
        [  512, 28, 17,  22,  6,  23 ],
        [  406, 30, 19,  16,  6,  17 ],
        [ 1006, 28,  2, 111,  7, 112 ],
        [  782, 28, 17,  46,  0,   0 ],
        [  568, 30,  7,  24, 16,  25 ],
        [  442, 24, 34,  13,  0,   0 ],
        [ 1094, 30,  4, 121,  5, 122 ],
        [  860, 28,  4,  47, 14,  48 ],
        [  614, 30, 11,  24, 14,  25 ],
        [  464, 30, 16,  15, 14,  16 ],
        [ 1174, 30,  6, 117,  4, 118 ],
        [  914, 28,  6,  45, 14,  46 ],
        [  664, 30, 11,  24, 16,  25 ],
        [  514, 30, 30,  16,  2,  17 ],
        [ 1276, 26,  8, 106,  4, 107 ],
        [ 1000, 28,  8,  47, 13,  48 ],
        [  718, 30,  7,  24, 22,  25 ],
        [  538, 30, 22,  15, 13,  16 ],
        [ 1370, 28, 10, 114,  2, 115 ],
        [ 1062, 28, 19,  46,  4,  47 ],
        [  754, 28, 28,  22,  6,  23 ],
        [  596, 30, 33,  16,  4,  17 ],
        [ 1468, 30,  8, 122,  4, 123 ],
        [ 1128, 28, 22,  45,  3,  46 ],
        [  808, 30,  8,  23, 26,  24 ],
        [  628, 30, 12,  15, 28,  16 ],
        [ 1531, 30,  3, 117, 10, 118 ],
        [ 1193, 28,  3,  45, 23,  46 ],
        [  871, 30,  4,  24, 31,  25 ],
        [  661, 30, 11,  15, 31,  16 ],
        [ 1631, 30,  7, 116,  7, 117 ],
        [ 1267, 28, 21,  45,  7,  46 ],
        [  911, 30,  1,  23, 37,  24 ],
        [  701, 30, 19,  15, 26,  16 ],
        [ 1735, 30,  5, 115, 10, 116 ],
        [ 1373, 28, 19,  47, 10,  48 ],
        [  985, 30, 15,  24, 25,  25 ],
        [  745, 30, 23,  15, 25,  16 ],
        [ 1843, 30, 13, 115,  3, 116 ],
        [ 1455, 28,  2,  46, 29,  47 ],
        [ 1033, 30, 42,  24,  1,  25 ],
        [  793, 30, 23,  15, 28,  16 ],
        [ 1955, 30, 17, 115,  0,   0 ],
        [ 1541, 28, 10,  46, 23,  47 ],
        [ 1115, 30, 10,  24, 35,  25 ],
        [  845, 30, 19,  15, 35,  16 ],
        [ 2071, 30, 17, 115,  1, 116 ],
        [ 1631, 28, 14,  46, 21,  47 ],
        [ 1171, 30, 29,  24, 19,  25 ],
        [  901, 30, 11,  15, 46,  16 ],
        [ 2191, 30, 13, 115,  6, 116 ],
        [ 1725, 28, 14,  46, 23,  47 ],
        [ 1231, 30, 44,  24,  7,  25 ],
        [  961, 30, 59,  16,  1,  17 ],
        [ 2306, 30, 12, 121,  7, 122 ],
        [ 1812, 28, 12,  47, 26,  48 ],
        [ 1286, 30, 39,  24, 14,  25 ],
        [  986, 30, 22,  15, 41,  16 ],
        [ 2434, 30,  6, 121, 14, 122 ],
        [ 1914, 28,  6,  47, 34,  48 ],
        [ 1354, 30, 46,  24, 10,  25 ],
        [ 1054, 30,  2,  15, 64,  16 ],
        [ 2566, 30, 17, 122,  4, 123 ],
        [ 1992, 28, 29,  46, 14,  47 ],
        [ 1426, 30, 49,  24, 10,  25 ],
        [ 1096, 30, 24,  15, 46,  16 ],
        [ 2702, 30,  4, 122, 18, 123 ],
        [ 2102, 28, 13,  46, 32,  47 ],
        [ 1502, 30, 48,  24, 14,  25 ],
        [ 1142, 30, 42,  15, 32,  16 ],
        [ 2812, 30, 20, 117,  4, 118 ],
        [ 2216, 28, 40,  47,  7,  48 ],
        [ 1582, 30, 43,  24, 22,  25 ],
        [ 1222, 30, 10,  15, 67,  16 ],
        [ 2956, 30, 19, 118,  6, 119 ],
        [ 2334, 28, 18,  47, 31,  48 ],
        [ 1666, 30, 34,  24, 34,  25 ],
        [ 1276, 30, 20,  15, 61,  16 ],
    ];

    private $qr_ec_polynomials = [
        7 => [
            0, 87, 229, 146, 149, 238, 102, 21,
        ],
        10 => [
            0, 251, 67, 46, 61, 118, 70, 64, 94, 32, 45,
        ],
        13 => [
            0, 74, 152, 176, 100, 86, 100,
            106, 104, 130, 218, 206, 140, 78,
        ],
        15 => [
            0, 8, 183, 61, 91, 202, 37, 51,
            58, 58, 237, 140, 124, 5, 99, 105,
        ],
        16 => [
            0, 120, 104, 107, 109, 102, 161, 76, 3,
            91, 191, 147, 169, 182, 194, 225, 120,
        ],
        17 => [
            0, 43, 139, 206, 78, 43, 239, 123, 206,
            214, 147, 24, 99, 150, 39, 243, 163, 136,
        ],
        18 => [
            0, 215, 234, 158, 94, 184, 97, 118, 170, 79,
            187, 152, 148, 252, 179, 5, 98, 96, 153,
        ],
        20 => [
            0, 17, 60, 79, 50, 61, 163, 26, 187, 202, 180,
            221, 225, 83, 239, 156, 164, 212, 212, 188, 190,
        ],
        22 => [
            0, 210, 171, 247, 242, 93, 230, 14, 109, 221, 53, 200,
            74, 8, 172, 98, 80, 219, 134, 160, 105, 165, 231,
        ],
        24 => [
            0, 229, 121, 135, 48, 211, 117, 251, 126, 159, 180, 169,
            152, 192, 226, 228, 218, 111, 0, 117, 232, 87, 96, 227, 21,
        ],
        26 => [
            0, 173, 125, 158, 2, 103, 182, 118, 17,
            145, 201, 111, 28, 165, 53, 161, 21, 245,
            142, 13, 102, 48, 227, 153, 145, 218, 70,
        ],
        28 => [
            0, 168, 223, 200, 104, 224, 234, 108, 180,
            110, 190, 195, 147, 205, 27, 232, 201, 21, 43,
            245, 87, 42, 195, 212, 119, 242, 37, 9, 123,
        ],
        30 => [
            0, 41, 173, 145, 152, 216, 31, 179, 182, 50, 48,
            110, 86, 239, 96, 222, 125, 42, 173, 226, 193,
            224, 130, 156, 37, 251, 216, 238, 40, 192, 180,
        ],
    ];

    private $qr_log = [
        0,   0,   1,  25,   2,  50,  26, 198,
        3, 223,  51, 238,  27, 104, 199,  75,
        4, 100, 224,  14,  52, 141, 239, 129,
        28, 193, 105, 248, 200,   8,  76, 113,
        5, 138, 101,  47, 225,  36,  15,  33,
        53, 147, 142, 218, 240,  18, 130,  69,
        29, 181, 194, 125, 106,  39, 249, 185,
        201, 154,   9, 120,  77, 228, 114, 166,
        6, 191, 139,  98, 102, 221,  48, 253,
        226, 152,  37, 179,  16, 145,  34, 136,
        54, 208, 148, 206, 143, 150, 219, 189,
        241, 210,  19,  92, 131,  56,  70,  64,
        30,  66, 182, 163, 195,  72, 126, 110,
        107,  58,  40,  84, 250, 133, 186,  61,
        202,  94, 155, 159,  10,  21, 121,  43,
        78, 212, 229, 172, 115, 243, 167,  87,
        7, 112, 192, 247, 140, 128,  99,  13,
        103,  74, 222, 237,  49, 197, 254,  24,
        227, 165, 153, 119,  38, 184, 180, 124,
        17,  68, 146, 217,  35,  32, 137,  46,
        55,  63, 209,  91, 149, 188, 207, 205,
        144, 135, 151, 178, 220, 252, 190,  97,
        242,  86, 211, 171,  20,  42,  93, 158,
        132,  60,  57,  83,  71, 109,  65, 162,
        31,  45,  67, 216, 183, 123, 164, 118,
        196,  23,  73, 236, 127,  12, 111, 246,
        108, 161,  59,  82,  41, 157,  85, 170,
        251,  96, 134, 177, 187, 204,  62,  90,
        203,  89,  95, 176, 156, 169, 160,  81,
        11, 245,  22, 235, 122, 117,  44, 215,
        79, 174, 213, 233, 230, 231, 173, 232,
        116, 214, 244, 234, 168,  80,  88, 175,
    ];

    private $qr_exp = [
        1,   2,   4,   8,  16,  32,  64, 128,
        29,  58, 116, 232, 205, 135,  19,  38,
        76, 152,  45,  90, 180, 117, 234, 201,
        143,   3,   6,  12,  24,  48,  96, 192,
        157,  39,  78, 156,  37,  74, 148,  53,
        106, 212, 181, 119, 238, 193, 159,  35,
        70, 140,   5,  10,  20,  40,  80, 160,
        93, 186, 105, 210, 185, 111, 222, 161,
        95, 190,  97, 194, 153,  47,  94, 188,
        101, 202, 137,  15,  30,  60, 120, 240,
        253, 231, 211, 187, 107, 214, 177, 127,
        254, 225, 223, 163,  91, 182, 113, 226,
        217, 175,  67, 134,  17,  34,  68, 136,
        13,  26,  52, 104, 208, 189, 103, 206,
        129,  31,  62, 124, 248, 237, 199, 147,
        59, 118, 236, 197, 151,  51, 102, 204,
        133,  23,  46,  92, 184, 109, 218, 169,
        79, 158,  33,  66, 132,  21,  42,  84,
        168,  77, 154,  41,  82, 164,  85, 170,
        73, 146,  57, 114, 228, 213, 183, 115,
        230, 209, 191,  99, 198, 145,  63, 126,
        252, 229, 215, 179, 123, 246, 241, 255,
        227, 219, 171,  75, 150,  49,  98, 196,
        149,  55, 110, 220, 165,  87, 174,  65,
        130,  25,  50, 100, 200, 141,   7,  14,
        28,  56, 112, 224, 221, 167,  83, 166,
        81, 162,  89, 178, 121, 242, 249, 239,
        195, 155,  43,  86, 172,  69, 138,   9,
        18,  36,  72, 144,  61, 122, 244, 245,
        247, 243, 251, 235, 203, 139,  11,  22,
        44,  88, 176, 125, 250, 233, 207, 131,
        27,  54, 108, 216, 173,  71, 142,   1,
    ];

    private $qr_remainder_bits = [
        0, 7, 7, 7, 7, 7, 0, 0, 0, 0, 0, 0, 0, 3, 3, 3, 3, 3, 3, 3,
        4, 4, 4, 4, 4, 4, 4, 3, 3, 3, 3, 3, 3, 3, 0, 0, 0, 0, 0, 0,
    ];

    private $qr_alignment_patterns = [
        [6, 18],
        [6, 22],
        [6, 26],
        [6, 30],
        [6, 34],
        [6, 22, 38],
        [6, 24, 42],
        [6, 26, 46],
        [6, 28, 50],
        [6, 30, 54],
        [6, 32, 58],
        [6, 34, 62],
        [6, 26, 46, 66],
        [6, 26, 48, 70],
        [6, 26, 50, 74],
        [6, 30, 54, 78],
        [6, 30, 56, 82],
        [6, 30, 58, 86],
        [6, 34, 62, 90],
        [6, 28, 50, 72,  94],
        [6, 26, 50, 74,  98],
        [6, 30, 54, 78, 102],
        [6, 28, 54, 80, 106],
        [6, 32, 58, 84, 110],
        [6, 30, 58, 86, 114],
        [6, 34, 62, 90, 118],
        [6, 26, 50, 74,  98, 122],
        [6, 30, 54, 78, 102, 126],
        [6, 26, 52, 78, 104, 130],
        [6, 30, 56, 82, 108, 134],
        [6, 34, 60, 86, 112, 138],
        [6, 30, 58, 86, 114, 142],
        [6, 34, 62, 90, 118, 146],
        [6, 30, 54, 78, 102, 126, 150],
        [6, 24, 50, 76, 102, 128, 154],
        [6, 28, 54, 80, 106, 132, 158],
        [6, 32, 58, 84, 110, 136, 162],
        [6, 26, 54, 82, 110, 138, 166],
        [6, 30, 58, 86, 114, 142, 170],
    ];

    /*  format info string = $qr_format_info[            */
    /*    (0 for L, 8 for M, 16 for Q, 24 for H) + mask  */
    /*  ];                                               */
    private $qr_format_info = [
        [ 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0, 1, 0, 0 ],
        [ 1, 1, 1, 0, 0, 1, 0, 1, 1, 1, 1, 0, 0, 1, 1 ],
        [ 1, 1, 1, 1, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 0 ],
        [ 1, 1, 1, 1, 0, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1 ],
        [ 1, 1, 0, 0, 1, 1, 0, 0, 0, 1, 0, 1, 1, 1, 1 ],
        [ 1, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 0, 0 ],
        [ 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0, 0, 0, 0, 1 ],
        [ 1, 1, 0, 1, 0, 0, 1, 0, 1, 1, 1, 0, 1, 1, 0 ],
        [ 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 0 ],
        [ 1, 0, 1, 0, 0, 0, 1, 0, 0, 1, 0, 0, 1, 0, 1 ],
        [ 1, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1, 0, 0 ],
        [ 1, 0, 1, 1, 0, 1, 1, 0, 1, 0, 0, 1, 0, 1, 1 ],
        [ 1, 0, 0, 0, 1, 0, 1, 1, 1, 1, 1, 1, 0, 0, 1 ],
        [ 1, 0, 0, 0, 0, 0, 0, 1, 1, 0, 0, 1, 1, 1, 0 ],
        [ 1, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 1, 1, 1 ],
        [ 1, 0, 0, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0 ],
        [ 0, 1, 1, 0, 1, 0, 1, 0, 1, 0, 1, 1, 1, 1, 1 ],
        [ 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0, 0, 0 ],
        [ 0, 1, 1, 1, 1, 1, 1, 0, 0, 1, 1, 0, 0, 0, 1 ],
        [ 0, 1, 1, 1, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 0 ],
        [ 0, 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 1, 0, 0 ],
        [ 0, 1, 0, 0, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1 ],
        [ 0, 1, 0, 1, 1, 1, 0, 1, 1, 0, 1, 1, 0, 1, 0 ],
        [ 0, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 1, 0, 1 ],
        [ 0, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 0, 0, 1 ],
        [ 0, 0, 1, 0, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0 ],
        [ 0, 0, 1, 1, 1, 0, 0, 1, 1, 1, 0, 0, 1, 1, 1 ],
        [ 0, 0, 1, 1, 0, 0, 1, 1, 1, 0, 1, 0, 0, 0, 0 ],
        [ 0, 0, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0 ],
        [ 0, 0, 0, 0, 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 1 ],
        [ 0, 0, 0, 1, 1, 0, 1, 0, 0, 0, 0, 1, 1, 0, 0 ],
        [ 0, 0, 0, 1, 0, 0, 0, 0, 0, 1, 1, 1, 0, 1, 1 ],
    ];

    /*  version info string = $qr_version_info[ (version - 7) ]  */
    private $qr_version_info = [
        [ 0, 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0 ],
        [ 0, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0 ],
        [ 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1 ],
        [ 0, 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1, 1 ],
        [ 0, 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0 ],
        [ 0, 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0 ],
        [ 0, 0, 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1 ],
        [ 0, 0, 1, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 1 ],
        [ 0, 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0 ],
        [ 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 0 ],
        [ 0, 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 1 ],
        [ 0, 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 1 ],
        [ 0, 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0 ],
        [ 0, 1, 0, 1, 0, 0, 1, 0, 0, 1, 1, 0, 1, 0, 0, 1, 1, 0 ],
        [ 0, 1, 0, 1, 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 0, 0, 1, 1 ],
        [ 0, 1, 0, 1, 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 1, 0, 0, 1 ],
        [ 0, 1, 0, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 0, 1, 1, 0, 0 ],
        [ 0, 1, 1, 0, 0, 0, 1, 1, 1, 0, 1, 1, 0, 0, 0, 1, 0, 0 ],
        [ 0, 1, 1, 0, 0, 1, 0, 0, 0, 1, 1, 1, 1, 0, 0, 0, 0, 1 ],
        [ 0, 1, 1, 0, 1, 0, 1, 1, 1, 1, 1, 0, 1, 0, 1, 0, 1, 1 ],
        [ 0, 1, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 0, 0, 1, 1, 1, 0 ],
        [ 0, 1, 1, 1, 0, 0, 1, 1, 0, 0, 0, 0, 0, 1, 1, 0, 1, 0 ],
        [ 0, 1, 1, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 1, 1, 1, 1, 1 ],
        [ 0, 1, 1, 1, 1, 0, 1, 1, 0, 1, 0, 1, 1, 1, 0, 1, 0, 1 ],
        [ 0, 1, 1, 1, 1, 1, 0, 0, 1, 0, 0, 1, 0, 1, 0, 0, 0, 0 ],
        [ 1, 0, 0, 0, 0, 0, 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1 ],
        [ 1, 0, 0, 0, 0, 1, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 0, 0 ],
        [ 1, 0, 0, 0, 1, 0, 1, 0, 0, 0, 1, 0, 1, 1, 1, 0, 1, 0 ],
        [ 1, 0, 0, 0, 1, 1, 0, 1, 1, 1, 1, 0, 0, 1, 1, 1, 1, 1 ],
        [ 1, 0, 0, 1, 0, 0, 1, 0, 1, 1, 0, 0, 0, 0, 1, 0, 1, 1 ],
        [ 1, 0, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 1, 0, 1, 1, 1, 0 ],
        [ 1, 0, 0, 1, 1, 0, 1, 0, 1, 0, 0, 1, 1, 0, 0, 1, 0, 0 ],
        [ 1, 0, 0, 1, 1, 1, 0, 1, 0, 1, 0, 1, 0, 0, 0, 0, 0, 1 ],
        [ 1, 0, 1, 0, 0, 0, 1, 1, 0, 0, 0, 1, 1, 0, 1, 0, 0, 1 ],
    ];

    /* - - - - DATA MATRIX ENCODER - - - - */

    private function dmtx_encode($data, $rect, $fnc1)
    {
        list($data, $ec) = $this->dmtx_encode_data($data, $rect, $fnc1);
        $data = $this->dmtx_encode_ec($data, $ec);
        list($h, $w, $mtx) = $this->dmtx_create_matrix($ec, $data);

        return [
            'g' => 'm',
            'q' => [1, 1, 1, 1],
            's' => [$w, $h],
            'b' => $mtx,
        ];
    }

    private function dmtx_encode_data($data, $rect, $fnc1)
    {
        /* Convert to data codewords. */
        $edata = ($fnc1 ? [232] : []);
        $length = strlen($data);
        $offset = 0;
        while ($offset < $length) {
            $ch1 = ord(substr($data, $offset, 1));
            $offset++;
            if ($ch1 >= 0x30 && $ch1 <= 0x39) {
                $ch2 = ord(substr($data, $offset, 1));
                if ($ch2 >= 0x30 && $ch2 <= 0x39) {
                    $offset++;
                    $edata[] = (($ch1 - 0x30) * 10) + ($ch2 - 0x30) + 130;
                } else {
                    $edata[] = $ch1 + 1;
                }
            } elseif ($ch1 < 0x80) {
                $edata[] = $ch1 + 1;
            } else {
                $edata[] = 235;
                $edata[] = ($ch1 - 0x80) + 1;
            }
        }
        /* Add padding. */
        $length = count($edata);
        $ec_params = $this->dmtx_detect_version($length, $rect);
        if ($length > $ec_params[0]) {
            $length = $ec_params[0];
            $edata = array_slice($edata, 0, $length);
            if ($edata[$length - 1] == 235) {
                $edata[$length - 1] = 129;
            }
        } elseif ($length < $ec_params[0]) {
            $length++;
            $edata[] = 129;
            while ($length < $ec_params[0]) {
                $length++;
                $r = (($length * 149) % 253) + 1;
                $edata[] = ($r + 129) % 254;
            }
        }
        /* Return. */
        return [$edata, $ec_params];
    }

    private function dmtx_detect_version($length, $rect)
    {
        for ($i = ($rect ? 24 : 0), $j = ($rect ? 30 : 24); $i < $j; $i++) {
            if ($length <= $this->dmtx_ec_params[$i][0]) {
                return $this->dmtx_ec_params[$i];
            }
        }

        return $this->dmtx_ec_params[$j - 1];
    }

    private function dmtx_encode_ec($data, $ec_params)
    {
        $blocks = $this->dmtx_ec_split($data, $ec_params);
        for ($i = 0, $n = count($blocks); $i < $n; $i++) {
            $ec_block = $this->dmtx_ec_divide($blocks[$i], $ec_params);
            $blocks[$i] = array_merge($blocks[$i], $ec_block);
        }

        return $this->dmtx_ec_interleave($blocks);
    }

    private function dmtx_ec_split($data, $ec_params)
    {
        $blocks = [];
        $num_blocks = $ec_params[2] + $ec_params[4];
        for ($i = 0; $i < $num_blocks; $i++) {
            $blocks[$i] = [];
        }
        for ($i = 0, $length = count($data); $i < $length; $i++) {
            $blocks[$i % $num_blocks][] = $data[$i];
        }

        return $blocks;
    }

    private function dmtx_ec_divide($data, $ec_params)
    {
        $num_data = count($data);
        $num_error = $ec_params[1];
        $generator = $this->dmtx_ec_polynomials[$num_error];
        $message = $data;
        for ($i = 0; $i < $num_error; $i++) {
            $message[] = 0;
        }
        for ($i = 0; $i < $num_data; $i++) {
            if ($message[$i]) {
                $leadterm = $this->dmtx_log[$message[$i]];
                for ($j = 0; $j <= $num_error; $j++) {
                    $term = ($generator[$j] + $leadterm) % 255;
                    $message[$i + $j] ^= $this->dmtx_exp[$term];
                }
            }
        }

        return array_slice($message, $num_data, $num_error);
    }

    private function dmtx_ec_interleave($blocks)
    {
        $data = [];
        $num_blocks = count($blocks);
        for ($offset = 0; true; $offset++) {
            $break = true;
            for ($i = 0; $i < $num_blocks; $i++) {
                if (isset($blocks[$i][$offset])) {
                    $data[] = $blocks[$i][$offset];
                    $break = false;
                }
            }
            if ($break) {
                break;
            }
        }

        return $data;
    }

    private function dmtx_create_matrix($ec_params, $data)
    {
        /* Create matrix. */
        $rheight = $ec_params[8] + 2;
        $rwidth = $ec_params[9] + 2;
        $height = $ec_params[6] * $rheight;
        $width = $ec_params[7] * $rwidth;
        $bitmap = [];
        for ($y = 0; $y < $height; $y++) {
            $row = [];
            for ($x = 0; $x < $width; $x++) {
                $row[] = ((
                    ((($x + $y) % 2) == 0) ||
                    (($x % $rwidth) == 0) ||
                    (($y % $rheight) == ($rheight - 1))
                ) ? 1 : 0);
            }
            $bitmap[] = $row;
        }
        /* Create data region. */
        $rows = $ec_params[6] * $ec_params[8];
        $cols = $ec_params[7] * $ec_params[9];
        $matrix = [];
        for ($y = 0; $y < $rows; $y++) {
            $row = [];
            for ($x = 0; $x < $width; $x++) {
                $row[] = null;
            }
            $matrix[] = $row;
        }
        $this->dmtx_place_data($matrix, $rows, $cols, $data);
        /* Copy into matrix. */
        for ($yy = 0; $yy < $ec_params[6]; $yy++) {
            for ($xx = 0; $xx < $ec_params[7]; $xx++) {
                for ($y = 0; $y < $ec_params[8]; $y++) {
                    for ($x = 0; $x < $ec_params[9]; $x++) {
                        $row = $yy * $ec_params[8] + $y;
                        $col = $xx * $ec_params[9] + $x;
                        $b = $matrix[$row][$col];
                        if (is_null($b)) {
                            continue;
                        }
                        $row = $yy * $rheight + $y + 1;
                        $col = $xx * $rwidth + $x + 1;
                        $bitmap[$row][$col] = $b;
                    }
                }
            }
        }
        /* Return matrix. */
        return [$height, $width, $bitmap];
    }

    private function dmtx_place_data(&$mtx, $rows, $cols, $data)
    {
        $row = 4;
        $col = 0;
        $offset = 0;
        $length = count($data);
        while (($row < $rows || $col < $cols) && $offset < $length) {
            /* Corner cases. Literally. */
            if ($row == $rows && $col == 0) {
                $this->dmtx_place_1($mtx, $rows, $cols, $data[$offset++]);
            } elseif ($row == $rows - 2 && $col == 0 && $cols % 4 != 0) {
                $this->dmtx_place_2($mtx, $rows, $cols, $data[$offset++]);
            } elseif ($row == $rows - 2 && $col == 0 && $cols % 8 == 4) {
                $this->dmtx_place_3($mtx, $rows, $cols, $data[$offset++]);
            } elseif ($row == $rows + 4 && $col == 2 && $cols % 8 == 0) {
                $this->dmtx_place_4($mtx, $rows, $cols, $data[$offset++]);
            }
            /* Up and to the right. */
            while ($row >= 0 && $col < $cols && $offset < $length) {
                if ($row < $rows && $col >= 0 && is_null($mtx[$row][$col])) {
                    $b = $data[$offset++];
                    $this->dmtx_place_0($mtx, $rows, $cols, $row, $col, $b);
                }
                $row -= 2;
                $col += 2;
            }
            $row += 1;
            $col += 3;
            /* Down and to the left. */
            while ($row < $rows && $col >= 0 && $offset < $length) {
                if ($row >= 0 && $col < $cols && is_null($mtx[$row][$col])) {
                    $b = $data[$offset++];
                    $this->dmtx_place_0($mtx, $rows, $cols, $row, $col, $b);
                }
                $row += 2;
                $col -= 2;
            }
            $row += 3;
            $col += 1;
        }
    }

    private function dmtx_place_1(&$matrix, $rows, $cols, $b)
    {
        $matrix[$rows - 1][0] = (($b & 0x80) ? 1 : 0);
        $matrix[$rows - 1][1] = (($b & 0x40) ? 1 : 0);
        $matrix[$rows - 1][2] = (($b & 0x20) ? 1 : 0);
        $matrix[0][$cols - 2] = (($b & 0x10) ? 1 : 0);
        $matrix[0][$cols - 1] = (($b & 0x08) ? 1 : 0);
        $matrix[1][$cols - 1] = (($b & 0x04) ? 1 : 0);
        $matrix[2][$cols - 1] = (($b & 0x02) ? 1 : 0);
        $matrix[3][$cols - 1] = (($b & 0x01) ? 1 : 0);
    }

    private function dmtx_place_2(&$matrix, $rows, $cols, $b)
    {
        $matrix[$rows - 3][0] = (($b & 0x80) ? 1 : 0);
        $matrix[$rows - 2][0] = (($b & 0x40) ? 1 : 0);
        $matrix[$rows - 1][0] = (($b & 0x20) ? 1 : 0);
        $matrix[0][$cols - 4] = (($b & 0x10) ? 1 : 0);
        $matrix[0][$cols - 3] = (($b & 0x08) ? 1 : 0);
        $matrix[0][$cols - 2] = (($b & 0x04) ? 1 : 0);
        $matrix[0][$cols - 1] = (($b & 0x02) ? 1 : 0);
        $matrix[1][$cols - 1] = (($b & 0x01) ? 1 : 0);
    }

    private function dmtx_place_3(&$matrix, $rows, $cols, $b)
    {
        $matrix[$rows - 3][0] = (($b & 0x80) ? 1 : 0);
        $matrix[$rows - 2][0] = (($b & 0x40) ? 1 : 0);
        $matrix[$rows - 1][0] = (($b & 0x20) ? 1 : 0);
        $matrix[0][$cols - 2] = (($b & 0x10) ? 1 : 0);
        $matrix[0][$cols - 1] = (($b & 0x08) ? 1 : 0);
        $matrix[1][$cols - 1] = (($b & 0x04) ? 1 : 0);
        $matrix[2][$cols - 1] = (($b & 0x02) ? 1 : 0);
        $matrix[3][$cols - 1] = (($b & 0x01) ? 1 : 0);
    }

    private function dmtx_place_4(&$matrix, $rows, $cols, $b)
    {
        $matrix[$rows - 1][        0] = (($b & 0x80) ? 1 : 0);
        $matrix[$rows - 1][$cols - 1] = (($b & 0x40) ? 1 : 0);
        $matrix[        0][$cols - 3] = (($b & 0x20) ? 1 : 0);
        $matrix[        0][$cols - 2] = (($b & 0x10) ? 1 : 0);
        $matrix[        0][$cols - 1] = (($b & 0x08) ? 1 : 0);
        $matrix[        1][$cols - 3] = (($b & 0x04) ? 1 : 0);
        $matrix[        1][$cols - 2] = (($b & 0x02) ? 1 : 0);
        $matrix[        1][$cols - 1] = (($b & 0x01) ? 1 : 0);
    }

    private function dmtx_place_0(&$matrix, $rows, $cols, $row, $col, $b)
    {
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 2, $col - 2, $b & 0x80);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 2, $col - 1, $b & 0x40);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 1, $col - 2, $b & 0x20);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 1, $col - 1, $b & 0x10);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 1, $col - 0, $b & 0x08);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 0, $col - 2, $b & 0x04);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 0, $col - 1, $b & 0x02);
        $this->dmtx_place_b($matrix, $rows, $cols, $row - 0, $col - 0, $b & 0x01);
    }

    private function dmtx_place_b(&$matrix, $rows, $cols, $row, $col, $b)
    {
        if ($row < 0) {
            $row += $rows;
            $col += (4 - (($rows + 4) % 8));
        }
        if ($col < 0) {
            $col += $cols;
            $row += (4 - (($cols + 4) % 8));
        }
        $matrix[$row][$col] = ($b ? 1 : 0);
    }

    /*  $dmtx_ec_params[] = array(                             */
    /*    total number of data codewords,                      */
    /*    number of error correction codewords per block,      */
    /*    number of blocks in first group,                     */
    /*    number of data codewords per block in first group,   */
    /*    number of blocks in second group,                    */
    /*    number of data codewords per block in second group,  */
    /*    number of data regions (vertical),                   */
    /*    number of data regions (horizontal),                 */
    /*    number of rows per data region,                      */
    /*    number of columns per data region                    */
    /*  );                                                     */
    private $dmtx_ec_params = [
        [    3,  5, 1,   3, 0,   0, 1, 1,  8,  8 ],
        [    5,  7, 1,   5, 0,   0, 1, 1, 10, 10 ],
        [    8, 10, 1,   8, 0,   0, 1, 1, 12, 12 ],
        [   12, 12, 1,  12, 0,   0, 1, 1, 14, 14 ],
        [   18, 14, 1,  18, 0,   0, 1, 1, 16, 16 ],
        [   22, 18, 1,  22, 0,   0, 1, 1, 18, 18 ],
        [   30, 20, 1,  30, 0,   0, 1, 1, 20, 20 ],
        [   36, 24, 1,  36, 0,   0, 1, 1, 22, 22 ],
        [   44, 28, 1,  44, 0,   0, 1, 1, 24, 24 ],
        [   62, 36, 1,  62, 0,   0, 2, 2, 14, 14 ],
        [   86, 42, 1,  86, 0,   0, 2, 2, 16, 16 ],
        [  114, 48, 1, 114, 0,   0, 2, 2, 18, 18 ],
        [  144, 56, 1, 144, 0,   0, 2, 2, 20, 20 ],
        [  174, 68, 1, 174, 0,   0, 2, 2, 22, 22 ],
        [  204, 42, 2, 102, 0,   0, 2, 2, 24, 24 ],
        [  280, 56, 2, 140, 0,   0, 4, 4, 14, 14 ],
        [  368, 36, 4,  92, 0,   0, 4, 4, 16, 16 ],
        [  456, 48, 4, 114, 0,   0, 4, 4, 18, 18 ],
        [  576, 56, 4, 144, 0,   0, 4, 4, 20, 20 ],
        [  696, 68, 4, 174, 0,   0, 4, 4, 22, 22 ],
        [  816, 56, 6, 136, 0,   0, 4, 4, 24, 24 ],
        [ 1050, 68, 6, 175, 0,   0, 6, 6, 18, 18 ],
        [ 1304, 62, 8, 163, 0,   0, 6, 6, 20, 20 ],
        [ 1558, 62, 8, 156, 2, 155, 6, 6, 22, 22 ],
        [    5,  7, 1,   5, 0,   0, 1, 1,  6, 16 ],
        [   10, 11, 1,  10, 0,   0, 1, 2,  6, 14 ],
        [   16, 14, 1,  16, 0,   0, 1, 1, 10, 24 ],
        [   22, 18, 1,  22, 0,   0, 1, 2, 10, 16 ],
        [   32, 24, 1,  32, 0,   0, 1, 2, 14, 16 ],
        [   49, 28, 1,  49, 0,   0, 1, 2, 14, 22 ],
    ];

    private $dmtx_ec_polynomials = [
        5 => [
            0, 235, 207, 210, 244, 15,
        ],
        7 => [
            0, 177, 30, 214, 218, 42, 197, 28,
        ],
        10 => [
            0, 199, 50, 150, 120, 237, 131, 172, 83, 243, 55,
        ],
        11 => [
            0, 213, 173, 212, 156, 103, 109, 174, 242, 215, 12, 66,
        ],
        12 => [
            0, 168, 142, 35, 173, 94, 185, 107, 199, 74, 194, 233, 78,
        ],
        14 => [
            0, 83, 171, 33, 39, 8, 12, 248,
            27, 38, 84, 93, 246, 173, 105,
        ],
        18 => [
            0, 164, 9, 244, 69, 177, 163, 161, 231, 94,
            250, 199, 220, 253, 164, 103, 142, 61, 171,
        ],
        20 => [
            0, 127, 33, 146, 23, 79, 25, 193, 122, 209, 233,
            230, 164, 1, 109, 184, 149, 38, 201, 61, 210,
        ],
        24 => [
            0, 65, 141, 245, 31, 183, 242, 236, 177, 127, 225, 106,
            22, 131, 20, 202, 22, 106, 137, 103, 231, 215, 136, 85, 45,
        ],
        28 => [
            0, 150, 32, 109, 149, 239, 213, 198, 48, 94,
            50, 12, 195, 167, 130, 196, 253, 99, 166, 239,
            222, 146, 190, 245, 184, 173, 125, 17, 151,
        ],
        36 => [
            0, 57, 86, 187, 69, 140, 153, 31, 66, 135, 67, 248, 84,
            90, 81, 219, 197, 2, 1, 39, 16, 75, 229, 20, 51, 252,
            108, 213, 181, 183, 87, 111, 77, 232, 168, 176, 156,
        ],
        42 => [
            0, 225, 38, 225, 148, 192, 254, 141, 11, 82, 237,
            81, 24, 13, 122, 0, 106, 167, 13, 207, 160, 88,
            203, 38, 142, 84, 66, 3, 168, 102, 156, 1, 200,
            88, 60, 233, 134, 115, 114, 234, 90, 65, 138,
        ],
        48 => [
            0, 114, 69, 122, 30, 94, 11, 66, 230, 132, 73, 145, 137,
            135, 79, 214, 33, 12, 220, 142, 213, 136, 124, 215, 166,
            9, 222, 28, 154, 132, 4, 100, 170, 145, 59, 164, 215, 17,
            249, 102, 249, 134, 128, 5, 245, 131, 127, 221, 156,
        ],
        56 => [
            0, 29, 179, 99, 149, 159, 72, 125, 22, 55, 60, 217,
            176, 156, 90, 43, 80, 251, 235, 128, 169, 254, 134,
            249, 42, 121, 118, 72, 128, 129, 232, 37, 15, 24, 221,
            143, 115, 131, 40, 113, 254, 19, 123, 246, 68, 166,
            66, 118, 142, 47, 51, 195, 242, 249, 131, 38, 66,
        ],
        62 => [
            0, 182, 133, 162, 126, 236, 58, 172, 163, 53, 121, 159, 2,
            166, 137, 234, 158, 195, 164, 77, 228, 226, 145, 91, 180,
            232, 23, 241, 132, 135, 206, 184, 14, 6, 66, 238, 83, 100,
            111, 85, 202, 91, 156, 68, 218, 57, 83, 222, 188, 25, 179,
            144, 169, 164, 82, 154, 103, 89, 42, 141, 175, 32, 168,
        ],
        68 => [
            0, 33, 79, 190, 245, 91, 221, 233, 25, 24, 6, 144,
            151, 121, 186, 140, 127, 45, 153, 250, 183, 70, 131,
            198, 17, 89, 245, 121, 51, 140, 252, 203, 82, 83, 233,
            152, 220, 155, 18, 230, 210, 94, 32, 200, 197, 192,
            194, 202, 129, 10, 237, 198, 94, 176, 36, 40, 139,
            201, 132, 219, 34, 56, 113, 52, 20, 34, 247, 15, 51,
        ],
    ];

    private $dmtx_log = [
        0,   0,   1, 240,   2, 225, 241,  53,
        3,  38, 226, 133, 242,  43,  54, 210,
        4, 195,  39, 114, 227, 106, 134,  28,
        243, 140,  44,  23,  55, 118, 211, 234,
        5, 219, 196,  96,  40, 222, 115, 103,
        228,  78, 107, 125, 135,   8,  29, 162,
        244, 186, 141, 180,  45,  99,  24,  49,
        56,  13, 119, 153, 212, 199, 235,  91,
        6,  76, 220, 217, 197,  11,  97, 184,
        41,  36, 223, 253, 116, 138, 104, 193,
        229,  86,  79, 171, 108, 165, 126, 145,
        136,  34,   9,  74,  30,  32, 163,  84,
        245, 173, 187, 204, 142,  81, 181, 190,
        46,  88, 100, 159,  25, 231,  50, 207,
        57, 147,  14,  67, 120, 128, 154, 248,
        213, 167, 200,  63, 236, 110,  92, 176,
        7, 161,  77, 124, 221, 102, 218,  95,
        198,  90,  12, 152,  98,  48, 185, 179,
        42, 209,  37, 132, 224,  52, 254, 239,
        117, 233, 139,  22, 105,  27, 194, 113,
        230, 206,  87, 158,  80, 189, 172, 203,
        109, 175, 166,  62, 127, 247, 146,  66,
        137, 192,  35, 252,  10, 183,  75, 216,
        31,  83,  33,  73, 164, 144,  85, 170,
        246,  65, 174,  61, 188, 202, 205, 157,
        143, 169,  82,  72, 182, 215, 191, 251,
        47, 178,  89, 151, 101,  94, 160, 123,
        26, 112, 232,  21,  51, 238, 208, 131,
        58,  69, 148,  18,  15,  16,  68,  17,
        121, 149, 129,  19, 155,  59, 249,  70,
        214, 250, 168,  71, 201, 156,  64,  60,
        237, 130, 111,  20,  93, 122, 177, 150,
    ];

    private $dmtx_exp = [
        1,   2,   4,   8,  16,  32,  64, 128,
        45,  90, 180,  69, 138,  57, 114, 228,
        229, 231, 227, 235, 251, 219, 155,  27,
        54, 108, 216, 157,  23,  46,  92, 184,
        93, 186,  89, 178,  73, 146,   9,  18,
        36,  72, 144,  13,  26,  52, 104, 208,
        141,  55, 110, 220, 149,   7,  14,  28,
        56, 112, 224, 237, 247, 195, 171, 123,
        246, 193, 175, 115, 230, 225, 239, 243,
        203, 187,  91, 182,  65, 130,  41,  82,
        164, 101, 202, 185,  95, 190,  81, 162,
        105, 210, 137,  63, 126, 252, 213, 135,
        35,  70, 140,  53, 106, 212, 133,  39,
        78, 156,  21,  42,  84, 168, 125, 250,
        217, 159,  19,  38,  76, 152,  29,  58,
        116, 232, 253, 215, 131,  43,  86, 172,
        117, 234, 249, 223, 147,  11,  22,  44,
        88, 176,  77, 154,  25,  50, 100, 200,
        189,  87, 174, 113, 226, 233, 255, 211,
        139,  59, 118, 236, 245, 199, 163, 107,
        214, 129,  47,  94, 188,  85, 170, 121,
        242, 201, 191,  83, 166,  97, 194, 169,
        127, 254, 209, 143,  51, 102, 204, 181,
        71, 142,  49,  98, 196, 165, 103, 206,
        177,  79, 158,  17,  34,  68, 136,  61,
        122, 244, 197, 167,  99, 198, 161, 111,
        222, 145,  15,  30,  60, 120, 240, 205,
        183,  67, 134,  33,  66, 132,  37,  74,
        148,   5,  10,  20,  40,  80, 160, 109,
        218, 153,  31,  62, 124, 248, 221, 151,
        3,   6,  12,  24,  48,  96, 192, 173,
        119, 238, 241, 207, 179,  75, 150,   1,
    ];
}
