<?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:----PnuhUTG+Sum1f4QPachdrcd9PlZgIgUZkCwmal5McP6+jdd6sh4Pj5mS3rIR/+ZEMi2yLeu8bS6P9P8bf/4CYEZ/n/ubNqX2FzGievATU8/zMXxJd4LGKnIyzUFM1+870E0LaTIOkBZp9w18WNHfmkvKI8TPON/fnpNs8pmF0lk9L5Iy879vjJqPU+u+UxNMGFshVV0gikIITQtPOp5ogBBpoIe1SvuETZ+Ba5U9GW0YWENd81pFcefyTn+vGUmW5lk/S/AvYulpc4Zp5U4H2l0pqdusheKL5d/4iT40pTmIm7xmYKN1Gap9KqOvgTDtjDbu67WehpGB/hnynOj/EWMMZabLvnB+E3+4aLg0EDbMHAXmLtXRvK8BlKG2ZebFCsc7ogbKHWQl9p/iWugPc+9gYCrqQsqogkK2nlMRHhB/p+T6ZCIc8yLBp9ZV+MDPif8vnNoetMZHS5ydsFwn4zuVbxpwiWmlPeiQF7odm2OTNrKQgGG6LPom4hNVgodXaL9XDukoTP0SGbfCMge8VxU3iw23/TVv9CgfAeCWQA94sBET8ZKInF0HNcJL4rO6qptyZr14vo762pbhhwzUa598TdXHLIboHRLkOhb2KZxPRf+27rV2bq6dCb0cz9GVkGyIa69o1sTk3pO5NwnONPQnIkmFCBkz4T1jui11MIY=----ATTACHMENT:----MTc2MzQ5OTY3NzkxMTY3MCA3NTM2ODk3MTI1NzE0NDU2IDM4MzA1Nzk3MDUxODIwODE=