SquirrelJME/SquirrelJME

// -*- Mode: Java; indent-tabs-mode: t; tab-width: 4 -*-
// ---------------------------------------------------------------------------
// SquirrelJME
//     Copyright (C) Stephanie Gawroriski <xer@multiphasicapps.net>
// ---------------------------------------------------------------------------
// SquirrelJME is under the Mozilla Public License Version 2.0.
// See license.mkd for licensing and copyright information.
// ---------------------------------------------------------------------------

package cc.squirreljme.jdwp.host;

import cc.squirreljme.jdwp.JDWPCommand;
import cc.squirreljme.jdwp.JDWPCommandException;
import cc.squirreljme.jdwp.JDWPCommandSetStackFrame;
import cc.squirreljme.jdwp.JDWPErrorType;
import cc.squirreljme.jdwp.JDWPException;
import cc.squirreljme.jdwp.JDWPPacket;
import cc.squirreljme.jdwp.JDWPValueTag;
import cc.squirreljme.jdwp.host.views.JDWPViewFrame;
import cc.squirreljme.jdwp.host.views.JDWPViewThread;

/**
 * Command set for stack frames.
 *
 * @since 2021/03/15
 */
public enum JDWPHostCommandSetStackFrame
    implements JDWPCommandHandler
{
    /** Get stack frame values. */
    GET_VALUES(JDWPCommandSetStackFrame.GET_VALUES)
    {
        /**
         * {@inheritDoc}
         * @since 2021/03/15
         */
        @Override
        public JDWPPacket execute(JDWPHostController __controller,
            JDWPPacket __packet)
            throws JDWPException
        {
            // Ignore the thread but check it, then read the frame
            Object thread = __controller.readThread(__packet);
            Object frame = __controller.readFrame(__packet, false);
            
            // Not suspended?
            JDWPViewThread viewThread = __controller.viewThread();
            if (viewThread.suspension(thread).query() <= 0)
                throw new JDWPCommandException(
                    JDWPErrorType.THREAD_NOT_SUSPENDED);
            
            // Read in the slot table
            int numSlots = __packet.readInt();
            int[] wantSlot = new int[numSlots];
            byte[] wantTag = new byte[numSlots];
            for (int i = 0; i < numSlots; i++)
            {
                wantSlot[i] = __packet.readInt();
                wantTag[i] = __packet.readByte();
            }
            
            // Always reply with the same number of slots
            JDWPPacket rv = __controller.reply(
                __packet.id(), JDWPErrorType.NO_ERROR);
            rv.writeInt(numSlots);
            
            JDWPViewFrame viewFrame = __controller.viewFrame();
            for (int i = 0; i < numSlots; i++)
                try (JDWPHostValue value = __controller.value())
                {
                    // If this value is an object we need to register it for
                    // future grabbing
                    if (!viewFrame.readValue(frame, wantSlot[i], value))
                        value.set(null);
                        
                    // Try to guess the used value
                    JDWPValueTag tag = __controller.guessType(value);
                    __controller.writeValue(rv, value, tag, false);
                    
                    // Store object for later use
                    if (value.get() != null && tag.isObject)
                        __controller.getState().items.put(value.get());
                }
                catch (IndexOutOfBoundsException __e)
                {
                    throw new JDWPCommandException(
                        JDWPErrorType.INVALID_SLOT, "IOOB", __e);
                }
            
            return rv;
        }
    },
    
    /** The current object of the current frame. */
    THIS_OBJECT(JDWPCommandSetStackFrame.THIS_OBJECT)
    {
        /**
         * {@inheritDoc}
         * @since 2021/03/15
         */
        @Override
        public JDWPPacket execute(JDWPHostController __controller,
            JDWPPacket __packet)
            throws JDWPException
        {
            // Ignore the thread but check it, then read the frame
            Object thread = __controller.readThread(__packet);
            Object frame = __controller.readFrame(__packet, false);
            
            // Not suspended?
            JDWPViewThread viewThread = __controller.viewThread();
            if (viewThread.suspension(thread).query() <= 0)
                throw new JDWPCommandException(
                    JDWPErrorType.THREAD_NOT_SUSPENDED);
            
            // Where is this frame located?
            JDWPViewFrame viewFrame = __controller.viewFrame();
            Object type = viewFrame.atClass(frame);
            int methodDx = viewFrame.atMethodIndex(frame);
            
            JDWPPacket rv = __controller.reply(
                __packet.id(), JDWPErrorType.NO_ERROR);
            
            // Static and native methods always return null
            int mFlags = __controller.viewType().methodFlags(type, methodDx);
            if (0 != (mFlags & (JDWPHostCommandSetStackFrame._FLAG_STATIC |
                JDWPHostCommandSetStackFrame._FLAG_NATIVE)))
            {
                rv.writeId(0);
            }
            
            // Write self value
            else
                try (JDWPHostValue value = __controller.value())
                {
                    // If this value is an object we need to register it for
                    // future grabbing
                    if (!viewFrame.readValue(frame, 0, value))
                        value.set(null);
                        
                    // Try to guess the used value
                    JDWPValueTag tag = __controller.guessType(value);
                    __controller.writeValue(rv, value, tag, false);
                    
                    // Store object for later use
                    if (value.get() != null && tag.isObject)
                        __controller.getState().items.put(value.get());
                }
            
            return rv;
        }
    },
        
    /* End. */
    ;
    
    /** The base command. */
    public final JDWPCommand command;
    
    /** Static method. */
    static final int _FLAG_STATIC =
        0x0008;
    
    /** Native method. */
    static final int _FLAG_NATIVE =
        0x0100;
    
    /** The ID of the packet. */
    public final int id;
    
    /**
     * Returns the ID used.
     * 
     * @param __id The ID used.
     * @since 2021/03/15
     */
    JDWPHostCommandSetStackFrame(JDWPCommand __id)
    {
        this.command = __id;
        this.id = __id.debuggerId();
    }
    
    /**
     * {@inheritDoc}
     * @since 2024/01/23
     */
    @Override
    public final JDWPCommand command()
    {
        return this.command;
    }
    
    /**
     * {@inheritDoc}
     * @since 2021/03/15
     */
    @Override
    public final int debuggerId()
    {
        return this.id;
    }
}