Int.avt

/*
    Реализация среды исполнения языка программирования
    Объектно-ориентированный продвинутый векторный транслятор

    Copyright © 2021, 2024 Малик Разработчик

    Это свободная программа: вы можете перераспространять ее и/или изменять
    ее на условиях Меньшей Стандартной общественной лицензии GNU в том виде,
    в каком она была опубликована Фондом свободного программного обеспечения;
    либо версии 3 лицензии, либо (по вашему выбору) любой более поздней версии.

    Эта программа распространяется в надежде, что она будет полезной,
    но БЕЗО ВСЯКИХ ГАРАНТИЙ; даже без неявной гарантии ТОВАРНОГО ВИДА
    или ПРИГОДНОСТИ ДЛЯ ОПРЕДЕЛЕННЫХ ЦЕЛЕЙ. Подробнее см. в Меньшей Стандартной
    общественной лицензии GNU.

    Вы должны были получить копию Меньшей Стандартной общественной лицензии GNU
    вместе с этой программой. Если это не так, см.
    <https://www.gnu.org/licenses/>.
*/

package avt.lang;

import avt.lang.array.*;

public final class Int(Object, Numeric, Comparable, Cloneable)
{
    public static final int MIN_VALUE = 0x80000000;
    public static final int MAX_VALUE = 0x7fffffff;

    public static native byte4 toByte4Bits(int value);

    public static native short2 toShort2Bits(int value);

    public static native int max(int value0, int value1);

    public static native int maxUnsigned(int value0, int value1);

    public static native int min(int value0, int value1);

    public static native int minUnsigned(int value0, int value1);

    public static native int rotateLeft(int value, int bits);

    public static native int rotateRight(int value, int bits);

    public static int parse(CharArray string) { return parse(string, 10); }

    public static int parse(CharArray string, int radix) {
        int length = string == null ? 0 : string.length;
        if(length <= 0)
        {
            throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
        }
        if(radix < Char.MIN_RADIX || radix > Char.MAX_RADIX)
        {
            throw new NumberFormatException(String.format(package.getResourceString("illegal-argument.number-format.radix"), new Object[] { new Int(radix) }));
        }
        boolean negative = false;
        int index = 0;
        int limit = 0x80000001;
        if(string[0] == '-')
        {
            negative = true;
            limit--;
            index++;
        }
        int mulmin = limit / radix;
        int result = 0;
        if(index < length)
        {
            int digit = Char.toDigit(string[index++], radix);
            if(digit < 0)
            {
                throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
            }
            result = -digit;
        }
        while(index < length)
        {
            int digit = Char.toDigit(string[index++], radix);
            if(digit < 0 || result < mulmin || (result *= radix) < limit + digit)
            {
                throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
            }
            result -= digit;
        }
        if(negative)
        {
            if(index <= 1)
            {
                throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
            }
            return result;
        }
        return -result;
    }

    public static int parseUnsigned(CharArray string) { return parseUnsigned(string, 10); }

    public static int parseUnsigned(CharArray string, int radix) {
        int length = string == null ? 0 : string.length;
        if(length <= 0)
        {
            throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
        }
        if(radix < Char.MIN_RADIX || radix > Char.MAX_RADIX)
        {
            throw new NumberFormatException(String.format(package.getResourceString("illegal-argument.number-format.radix"), new Object[] { new Int(radix) }));
        }
        int index = 1;
        int mulmin = 0xffffffff // radix;
        int result = Char.toDigit(string[0], radix);
        if(result < 0)
        {
            throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
        }
        while(index < length)
        {
            int digit = Char.toDigit(string[index++], radix);
            if(digit < 0 || compareUnsigned(result, mulmin) > 0 || compareUnsigned(result *= radix, 0xffffffff - digit) > 0)
            {
                throw new NumberFormatException(package.getResourceString("illegal-argument.number-format"));
            }
            result += digit;
        }
        return result;
    }

    public static native int signum(int value);

    public static native int compare(int value0, int value1);

    public static native int compareUnsigned(int value0, int value1);

    public static native float toFloatBits(int value);

    public static String toBinaryString(int value) { return toShiftUnsignedString(value, 1); }

    public static String toOctalString(int value) { return toShiftUnsignedString(value, 3); }

    public static String toHexString(int value) { return toShiftUnsignedString(value, 4); }

    public static String toString(int value) { return toString(value, 10); }

    public static String toString(int value, int radix) {
        boolean negative = value < 0;
        int index = 32;
        int length = index + 1;
        char[] buffer = new char[length];
        if(radix < Char.MIN_RADIX || radix > Char.MAX_RADIX) radix = 10;
        if(!negative) value = -value;
        for(int negradix = -radix; value <= negradix; value /= radix) buffer[index--] = Char.toChar(-(value % radix));
        buffer[index] = Char.toChar(-value);
        if(negative) buffer[--index] = '-';
        return new String(buffer, index, length - index);
    }

    public static String toUnsignedString(int value) { return toUnsignedString(value, 10); }

    public static String toUnsignedString(int value, int radix) {
        int index = 31;
        int length = index + 1;
        char[] buffer = new char[length];
        if(radix < Char.MIN_RADIX || radix > Char.MAX_RADIX) radix = 10;
        for(; compareUnsigned(value, radix) >= 0; value //= radix) buffer[index--] = Char.toChar(value %% radix);
        buffer[index] = Char.toChar(value);
        return new String(buffer, index, length - index);
    }

    public static String toLeadZeroString(int value, int width) { return toLeadZeroString(value, width, 10); }

    public static String toLeadZeroString(int value, int width, int radix) {
        boolean negative = value < 0;
        int index = 32;
        int length = index + 1;
        char[] buffer = new char[length];
        if(width > index) width = index;
        if(radix < Char.MIN_RADIX || radix > Char.MAX_RADIX) radix = 10;
        if(!negative) value = -value;
        for(int negradix = -radix; value <= negradix; value /= radix) buffer[index--] = Char.toChar(-(value % radix));
        buffer[index] = Char.toChar(-value);
        for(int count = length - index; count < width; count++) buffer[--index] = '0';
        if(negative) buffer[--index] = '-';
        return new String(buffer, index, length - index);
    }

    public static Int valueOf(byte value) { return new Int(value); }

    public static Int valueOf(short value) { return new Int(value); }

    public static Int valueOf(int value) { return new Int(value); }

    public static Int valueOf(long value) { return new Int(value); }

    public static Int valueOf(float value) { return new Int(value); }

    public static Int valueOf(double value) { return new Int(value); }

    public static Int valueOf(real value) { return new Int(value); }

    public static Int valueOf(CharArray string) {
        int value = parse(string, 10);
        return new Int(value);
    }

    public static Int valueOf(CharArray string, int radix) {
        int value = parse(string, radix);
        return new Int(value);
    }

    private static String toShiftUnsignedString(int value, int shift) {
        int index = 32;
        int length = index;
        int mask = (1 << shift) - 1;
        char[] buffer = new char[length];
        do
        {
            buffer[--index] = Char.toChar(value & mask);
        } while((value >>>= shift) != 0);
        return new String(buffer, index, length - index);
    }

    private final int fldValue;

    public (byte value) { fldValue = value; }

    public (short value) { fldValue = value; }

    public (int value) { fldValue = value; }

    public (long value) { fldValue = (int) value; }

    public (float value) { fldValue = (int) value; }

    public (double value) { fldValue = (int) value; }

    public (real value) { fldValue = (int) value; }

    public boolean equals(Object anot) { return anot == this || anot instanceof Int && ((Int) anot).fldValue == fldValue; }

    public int hashCode() { return fldValue; }

    public long hashCodeAsLong() { return fldValue; }

    public String toString() { return toString(fldValue, 10); }

    public byte asByte() { return (byte) fldValue; }

    public byte2 asByte2() { return (byte) fldValue; }

    public byte4 asByte4() { return (byte) fldValue; }

    public byte8 asByte8() { return (byte) fldValue; }

    public short asShort() { return (short) fldValue; }

    public short2 asShort2() { return (short) fldValue; }

    public short4 asShort4() { return (short) fldValue; }

    public short8 asShort8() { return (short) fldValue; }

    public int asInt() { return fldValue; }

    public int2 asInt2() { return fldValue; }

    public int4 asInt4() { return fldValue; }

    public int8 asInt8() { return fldValue; }

    public long asLong() { return fldValue; }

    public long2 asLong2() { return fldValue; }

    public long4 asLong4() { return fldValue; }

    public long8 asLong8() { return fldValue; }

    public float asFloat() { return (float) fldValue; }

    public float2 asFloat2() { return (float) fldValue; }

    public float4 asFloat4() { return (float) fldValue; }

    public float8 asFloat8() { return (float) fldValue; }

    public double asDouble() { return fldValue; }

    public double2 asDouble2() { return fldValue; }

    public double4 asDouble4() { return fldValue; }

    public double8 asDouble8() { return fldValue; }

    public real asReal() { return fldValue; }

    public int compareTo(Comparable anot) { return anot == this ? EQUALS : !(anot instanceof Int) ? INDEFINITE : compare(fldValue, ((Int) anot).fldValue); }

    public Int clone() { return new Int(fldValue); }

    public int kind { read = Class.INT }

    public int intValue { read = fldValue }
}