//-----------------------------------------------------------------------------
// *! (C) Copyright International Business Machines Corp. 2015
// *! All Rights Reserved -- Property of IBM
// *! *** IBM Confidential ***
//-----------------------------------------------------------------------------

/// \file std_irq_init.c
/// \brief Standard PPE IRQ initialization code for PK
///
///  The entry points in this file are initialization routines that could be
///  eliminated/deallocated by the application to free up storage if they are
///  no longer needed after initialization.

#include "pk.h"

/// Define the polarity and trigger condition for an interrupt.
///
/// It is up to the application to take care of any side effects that may
/// occur from programming or reprogramming the interrupt controller.  For
/// example, changing edge/level sensitivity or active level may set or clear
/// interrupt status in the controller.
///
/// Note that PK allows this API to be called from any context, and changes
/// to the interrupt controller are made from a critical section.
///
/// Return values other then PK_OK (0) are errors; see \ref pk_errors
///
/// \retval 0 Successful completion
///
/// \retval -PK_INVALID_ARGUMENT_IRQ_SETUP One or more arguments are invalid, 
/// including an invalid \a irq, or invalid \a polarity or \a trigger parameters.

int
pk_irq_setup(PkIrqId irq,
              int      polarity,
              int      trigger)
{
    PkMachineContext ctx;

    if (PK_ERROR_CHECK_API) {
        PK_ERROR_IF(!STD_IRQ_VALID(irq) ||
                     !((polarity == PK_IRQ_POLARITY_ACTIVE_HIGH) ||
                       (polarity == PK_IRQ_POLARITY_ACTIVE_LOW)) ||
                     !((trigger == PK_IRQ_TRIGGER_LEVEL_SENSITIVE) ||
                       (trigger == PK_IRQ_TRIGGER_EDGE_SENSITIVE)),
                     PK_INVALID_ARGUMENT_IRQ_SETUP);
    }

    pk_critical_section_enter(&ctx);

    if (polarity == PK_IRQ_POLARITY_ACTIVE_HIGH) {
        out64(STD_LCL_EIPR_OR, STD_IRQ_MASK64(irq));
    } else {
        out64(STD_LCL_EIPR_CLR, STD_IRQ_MASK64(irq));
    }

    if (trigger == PK_IRQ_TRIGGER_EDGE_SENSITIVE) {
        out64(STD_LCL_EITR_OR, STD_IRQ_MASK64(irq));
    } else {
        out64(STD_LCL_EITR_CLR, STD_IRQ_MASK64(irq));
    }

    pk_critical_section_exit(&ctx);

    return PK_OK;
}


/// (Re)define the IRQ handler and priority for an interrupt.
/// Return values other then PK_OK (0) are errors; see \ref pk_errors
///
/// Note that PK allows this API to be called from any context, and changes
/// to the interrupt controller are made from a critical section.
///
/// \retval 0 Successful completion
///
/// \retval -PK_INVALID_ARGUMENT_IRQ_HANDLER One or more arguments are 
/// invalid, including an invalid \a irq, a  null (0) \a handler, 
/// or invalid \a priority.

int
pk_irq_handler_set(PkIrqId      irq,
                    PkIrqHandler handler,
                    void          *arg)
{
    PkMachineContext ctx;

    if (PK_ERROR_CHECK_API) {
        PK_ERROR_IF(!STD_IRQ_VALID(irq) ||
                     (handler == 0),
                     PK_INVALID_ARGUMENT_IRQ_HANDLER);
    }

    pk_critical_section_enter(&ctx);

    __ppe42_irq_handlers[irq].handler = handler;
    __ppe42_irq_handlers[irq].arg = arg;

    pk_critical_section_exit(&ctx);

    return PK_OK;
}