/*
 * Copyright (c) 2023, Oracle and/or its affiliates. All rights reserved.
 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
 *
 * This code is free software; you can redistribute it and/or modify it
 * under the terms of the GNU General Public License version 2 only, as
 * published by the Free Software Foundation.  Oracle designates this
 * particular file as subject to the "Classpath" exception as provided
 * by Oracle in the LICENSE file that accompanied this code.
 *
 * This code is distributed in the hope that it will be useful, but WITHOUT
 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
 * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
 * version 2 for more details (a copy is included in the LICENSE file that
 * accompanied this code).
 *
 * You should have received a copy of the GNU General Public License version
 * 2 along with this work; if not, write to the Free Software Foundation,
 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
 *
 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
 * or visit www.oracle.com if you need additional information or have any
 * questions.
 */

package java.util;

import java.lang.invoke.MethodHandle;

import jdk.internal.vm.annotation.Stable;

/**
 * Digits class for hexadecimal digits.
 *
 * @since 21
 */
final class HexDigits implements Digits {
    /**
     * Each element of the array represents the ascii encoded
     * hex relative to its index, for example:<p>
     * <pre>
     *       0 -> '00' -> ('0' << 8) | '0' -> 12336
     *       1 -> '01' -> ('0' << 8) | '1' -> 12337
     *       2 -> '02' -> ('0' << 8) | '2' -> 12338
     *
     *     ...
     *
     *      10 -> '0a' -> ('0' << 8) | 'a' -> 12385
     *      11 -> '0b' -> ('0' << 8) | 'b' -> 12386
     *      12 -> '0c' -> ('0' << 8) | 'b' -> 12387
     *
     *     ...
     *
     *      26 -> '1a' -> ('1' << 8) | 'a' -> 12641
     *      27 -> '1b' -> ('1' << 8) | 'b' -> 12642
     *      28 -> '1c' -> ('1' << 8) | 'c' -> 12643
     *
     *     ...
     *
     *     253 -> 'fd' -> ('f' << 8) | 'd' -> 26212
     *     254 -> 'fe' -> ('f' << 8) | 'e' -> 26213
     *     255 -> 'ff' -> ('f' << 8) | 'f' -> 26214
     * </pre>
     * <p>use like this:
     * <pre>
     *     int v = 254;
     *
     *     char[] chars = new char[2];
     *
     *     short i = DIGITS[v]; // 26213
     *
     *     chars[0] = (char) (byte) (i >> 8); // 'f'
     *     chars[1] = (char) (byte) i;        // 'e'
     * </pre>
     */
    @Stable
    private static final short[] DIGITS;

    /**
     * Singleton instance of HexDigits.
     */
    static final Digits INSTANCE = new HexDigits();

    static {
        short[] digits = new short[16 * 16];

        for (int i = 0; i < 16; i++) {
            short hi = (short) ((i < 10 ? i + '0' : i - 10 + 'a') << 8);

            for (int j = 0; j < 16; j++) {
                short lo = (short) (j < 10 ? j + '0' : j - 10 + 'a');
                digits[(i << 4) + j] = (short) (hi | lo);
            }
        }

        DIGITS = digits;
    }

    /**
     * Constructor.
     */
    private HexDigits() {
    }

    /**
     * Combine two hex shorts into one int based on big endian
     */
    static int digit(int b0, int b1) {
        return (DIGITS[b0 & 0xff] << 16) | DIGITS[b1 & 0xff];
    }

    /**
     * Combine four hex shorts into one long based on big endian
     */
    static long digit(int b0, int b1, int b2, int b3) {
        return (((long) DIGITS[b0 & 0xff]) << 48)
                | (((long) DIGITS[b1 & 0xff]) << 32)
                | (DIGITS[b2 & 0xff] << 16)
                | DIGITS[b3 & 0xff];
    }

    @Override
    public int digits(long value, byte[] buffer, int index,
                      MethodHandle putCharMH) throws Throwable {
        while ((value & ~0xFF) != 0) {
            int digits = DIGITS[(int) (value & 0xFF)];
            value >>>= 8;
            putCharMH.invokeExact(buffer, --index, digits & 0xFF);
            putCharMH.invokeExact(buffer, --index, digits >> 8);
        }

        int digits = DIGITS[(int) (value & 0xFF)];
        putCharMH.invokeExact(buffer, --index, digits & 0xFF);

        if (0xF < value) {
            putCharMH.invokeExact(buffer, --index, digits >> 8);
        }

        return index;
    }

    @Override
    public int size(long value) {
        return value == 0 ? 1 :
                67 - Long.numberOfLeadingZeros(value) >> 2;
    }
}