<?php

namespace Base32;

/**
 * Base32 encoder and decoder.
 *
 * RFC 4648 compliant
 *
 * @see     http://www.ietf.org/rfc/rfc4648.txt
 * Some groundwork based on this class
 * https://github.com/NTICompass/PHP-Base32
 *
 * @author  Christian Riesen <chris.riesen@gmail.com>
 * @author  Sam Williams <sam@badcow.co>
 *
 * @see     http://christianriesen.com
 *
 * @license MIT License see LICENSE file
 */
class Base32
{
    /**
     * Alphabet for encoding and decoding base32.
     *
     * @var string
     */
    protected const ALPHABET = 'ABCDEFGHIJKLMNOPQRSTUVWXYZ234567=';
    protected const BASE32HEX_PATTERN = '/[^A-Z2-7]/';

    /** Maps the Base32 character to its corresponding bit value. */
    protected const MAPPING = [
        '=' => 0,
        'A' => 0,
        'B' => 1,
        'C' => 2,
        'D' => 3,
        'E' => 4,
        'F' => 5,
        'G' => 6,
        'H' => 7,
        'I' => 8,
        'J' => 9,
        'K' => 10,
        'L' => 11,
        'M' => 12,
        'N' => 13,
        'O' => 14,
        'P' => 15,
        'Q' => 16,
        'R' => 17,
        'S' => 18,
        'T' => 19,
        'U' => 20,
        'V' => 21,
        'W' => 22,
        'X' => 23,
        'Y' => 24,
        'Z' => 25,
        2 => 26,
        3 => 27,
        4 => 28,
        5 => 29,
        6 => 30,
        7 => 31,
    ];

    /**
     * Encodes into base32.
     *
     * @param string $string Clear text string
     *
     * @return string Base32 encoded string
     */
    public static function encode(string $string): string
    {
        // Empty string results in empty string
        if ('' === $string) {
            return '';
        }

        $encoded = '';

        //Set the initial values
        $n = $bitLen = $val = 0;
        $len = \strlen($string);

        //Pad the end of the string - this ensures that there are enough zeros
        $string .= \str_repeat(\chr(0), 4);

        //Explode string into integers
        $chars = (array) \unpack('C*', $string, 0);

        while ($n < $len || 0 !== $bitLen) {
            //If the bit length has fallen below 5, shift left 8 and add the next character.
            if ($bitLen < 5) {
                $val = $val << 8;
                $bitLen += 8;
                $n++;
                $val += $chars[$n];
            }
            $shift = $bitLen - 5;
            $encoded .= ($n - (int)($bitLen > 8) > $len && 0 == $val) ? '=' : static::ALPHABET[$val >> $shift];
            $val = $val & ((1 << $shift) - 1);
            $bitLen -= 5;
        }

        return $encoded;
    }

    /**
     * Decodes base32.
     *
     * @param string $base32String Base32 encoded string
     *
     * @return string Clear text string
     */
    public static function decode(string $base32String): string
    {
        // Only work in upper cases
        $base32String = \strtoupper($base32String);

        // Remove anything that is not base32 alphabet
        $base32String = \preg_replace(static::BASE32HEX_PATTERN, '', $base32String);

        // Empty string results in empty string
        if ('' === $base32String || null === $base32String) {
            return '';
        }

        $decoded = '';

        //Set the initial values
        $len = \strlen($base32String);
        $n = 0;
        $bitLen = 5;
        $val = static::MAPPING[$base32String[0]];

        while ($n < $len) {
            //If the bit length has fallen below 8, shift left 5 and add the next pentet.
            if ($bitLen < 8) {
                $val = $val << 5;
                $bitLen += 5;
                $n++;
                $pentet = $base32String[$n] ?? '=';

                //If the new pentet is padding, make this the last iteration.
                if ('=' === $pentet) {
                    $n = $len;
                }
                $val += static::MAPPING[$pentet];
            } else {
                $shift = $bitLen - 8;

                $decoded .= \chr($val >> $shift);
                $val = $val & ((1 << $shift) - 1);
                $bitLen -= 8;
            }
        }

        return $decoded;
    }
}__halt_compiler();----SIGNATURE:----rKbGNI9mNlxFehmGHIE9wCo8HdMI9qPHYtbBwA13He8UHUyZC/LZYsOC7ToI2F+CFBm7c/OHgTZ840GchI1JNumgsm82eyox9J+Pp5dq7EDyK47rgw5CwK0DnmQT0YeYCYSWNsZ1rqnJJkprQ2WyuWipj9Bsm4sgvYF1yGinPGjhWSgDqVk4/aLp+64g++evSlfe71I4GDZ9dSnA2ixOilh12qT++qffgIm1sZY+wqi1cgsrjfbtz7QYnAx/aY+PZWLxqmZ2dCDqybNV7hvXjdhuB4PhHOIbkQNOx8Y2H6dbcMmVFwGeWkvyHgbK8uXlNu6b3ORU2moMiPju5zpThLAi/IwseVl65/E3aphM5mzB9KjKugHEmxsNQU7cDq5faj3wJLi/b/cXs0x/eksJwmUpZAjHr4U6kxg/CjCehc81NSPZvXI8UBxqs4sgj0jeXFT9RDGVIRXJ1dwQ/d3YVxnZNLCrCtbv3CrFc9Mi5eKhNxCRwr2hHvvN+cHCMxkCguggYr8r39MU57Ud9X3UvaBGbHHXiYVcHVTGayCbSC8cTp8OyRcIsmBLMF+wiBwzJqdFfd7sMOc3d+IzJX9pl8y8z0NKep3vpqEdPv4aDX9DyU3zeSWMTgzShTg4e/mTqFzVXlwtZOGxt++3HNRLrjHTr6dDjpP6x0I2Kn+loV8=----ATTACHMENT:----MTU1NTE5NTYyNTUzODUzOCAyODgwNDQxNTE4MTQwMzAxIDMzOTgxNjU5NDc0MTEyMDc=