/*
 * Copyright (c) 2020, 2023, Oracle and/or its affiliates. All rights reserved.
 * Copyright (c) 2023 SAP SE. 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 jdk.internal.foreign.abi.ppc64;

import jdk.internal.foreign.abi.ABIDescriptor;
import jdk.internal.foreign.abi.Architecture;
import jdk.internal.foreign.abi.StubLocations;
import jdk.internal.foreign.abi.VMStorage;

public final class PPC64Architecture implements Architecture {
    public static final Architecture INSTANCE = new PPC64Architecture();

    // Needs to be consistent with vmstorage_ppc.hpp.
    public static final short REG32_MASK = 0b0000_0000_0000_0001;
    public static final short REG64_MASK = 0b0000_0000_0000_0011;

    private static final int INTEGER_REG_SIZE = 8;
    private static final int FLOAT_REG_SIZE = 8;
    private static final int STACK_SLOT_SIZE = 8;

    // Suppresses default constructor, ensuring non-instantiability.
    private PPC64Architecture() {
    }

    @Override
    public boolean isStackType(int cls) {
        return cls == StorageType.STACK;
    }

    @Override
    public int typeSize(int cls) {
        return switch (cls) {
            case StorageType.INTEGER -> INTEGER_REG_SIZE;
            case StorageType.FLOAT   -> FLOAT_REG_SIZE;
            // STACK is deliberately omitted
            default -> throw new IllegalArgumentException("Invalid Storage Class: " + cls);
        };
    }

    public interface StorageType {
        byte INTEGER = 0;
        byte FLOAT = 1;
        byte STACK = 2;
        byte PLACEHOLDER = 3;
    }

    public static class Regs { // break circular dependency
        public static final VMStorage r0  = integerRegister(0);
        public static final VMStorage r1  = integerRegister(1);
        public static final VMStorage r2  = integerRegister(2);
        public static final VMStorage r3  = integerRegister(3);
        public static final VMStorage r4  = integerRegister(4);
        public static final VMStorage r5  = integerRegister(5);
        public static final VMStorage r6  = integerRegister(6);
        public static final VMStorage r7  = integerRegister(7);
        public static final VMStorage r8  = integerRegister(8);
        public static final VMStorage r9  = integerRegister(9);
        public static final VMStorage r10 = integerRegister(10);
        public static final VMStorage r11 = integerRegister(11);
        public static final VMStorage r12 = integerRegister(12);
        public static final VMStorage r13 = integerRegister(13);
        public static final VMStorage r14 = integerRegister(14);
        public static final VMStorage r15 = integerRegister(15);
        public static final VMStorage r16 = integerRegister(16);
        public static final VMStorage r17 = integerRegister(17);
        public static final VMStorage r18 = integerRegister(18);
        public static final VMStorage r19 = integerRegister(19);
        public static final VMStorage r20 = integerRegister(20);
        public static final VMStorage r21 = integerRegister(21);
        public static final VMStorage r22 = integerRegister(22);
        public static final VMStorage r23 = integerRegister(23);
        public static final VMStorage r24 = integerRegister(24);
        public static final VMStorage r25 = integerRegister(25);
        public static final VMStorage r26 = integerRegister(26);
        public static final VMStorage r27 = integerRegister(27);
        public static final VMStorage r28 = integerRegister(28);
        public static final VMStorage r29 = integerRegister(29);
        public static final VMStorage r30 = integerRegister(30);
        public static final VMStorage r31 = integerRegister(31);

        public static final VMStorage f0  = floatRegister(0);
        public static final VMStorage f1  = floatRegister(1);
        public static final VMStorage f2  = floatRegister(2);
        public static final VMStorage f3  = floatRegister(3);
        public static final VMStorage f4  = floatRegister(4);
        public static final VMStorage f5  = floatRegister(5);
        public static final VMStorage f6  = floatRegister(6);
        public static final VMStorage f7  = floatRegister(7);
        public static final VMStorage f8  = floatRegister(8);
        public static final VMStorage f9  = floatRegister(9);
        public static final VMStorage f10 = floatRegister(10);
        public static final VMStorage f11 = floatRegister(11);
        public static final VMStorage f12 = floatRegister(12);
        public static final VMStorage f13 = floatRegister(13);
        public static final VMStorage f14 = floatRegister(14);
        public static final VMStorage f15 = floatRegister(15);
        public static final VMStorage f16 = floatRegister(16);
        public static final VMStorage f17 = floatRegister(17);
        public static final VMStorage f18 = floatRegister(18);
        public static final VMStorage f19 = floatRegister(19);
        public static final VMStorage f20 = floatRegister(20);
        public static final VMStorage f21 = floatRegister(21);
        public static final VMStorage f22 = floatRegister(22);
        public static final VMStorage f23 = floatRegister(23);
        public static final VMStorage f24 = floatRegister(24);
        public static final VMStorage f25 = floatRegister(25);
        public static final VMStorage f26 = floatRegister(26);
        public static final VMStorage f27 = floatRegister(27);
        public static final VMStorage f28 = floatRegister(28);
        public static final VMStorage f29 = floatRegister(29);
        public static final VMStorage f30 = floatRegister(30);
        public static final VMStorage f31 = floatRegister(31);
    }

    private static VMStorage integerRegister(int index) {
        return new VMStorage(StorageType.INTEGER, REG64_MASK, index, "r" + index);
    }

    private static VMStorage floatRegister(int index) {
        return new VMStorage(StorageType.FLOAT, REG64_MASK, index, "v" + index);
    }

    public static VMStorage stackStorage(short size, int byteOffset) {
        return new VMStorage(StorageType.STACK, size, byteOffset);
    }

    public static ABIDescriptor abiFor(VMStorage[] inputIntRegs,
                                       VMStorage[] inputFloatRegs,
                                       VMStorage[] outputIntRegs,
                                       VMStorage[] outputFloatRegs,
                                       VMStorage[] volatileIntRegs,
                                       VMStorage[] volatileFloatRegs,
                                       int stackAlignment,
                                       int shadowSpace,
                                       VMStorage scratch1, VMStorage scratch2) {
        return new ABIDescriptor(
            INSTANCE,
            new VMStorage[][] {
                inputIntRegs,
                inputFloatRegs,
            },
            new VMStorage[][] {
                outputIntRegs,
                outputFloatRegs,
            },
            new VMStorage[][] {
                volatileIntRegs,
                volatileFloatRegs,
            },
            stackAlignment,
            shadowSpace,
            scratch1, scratch2,
            StubLocations.TARGET_ADDRESS.storage(StorageType.PLACEHOLDER),
            StubLocations.RETURN_BUFFER.storage(StorageType.PLACEHOLDER),
            StubLocations.CAPTURED_STATE_BUFFER.storage(StorageType.PLACEHOLDER));
    }
}
