/* IBM_PROLOG_BEGIN_TAG                                                   */
/* This is an automatically generated prolog.                             */
/*                                                                        */
/* $Source: src/occ_405/firdata/scom_trgt.c $                             */
/*                                                                        */
/* OpenPOWER OnChipController Project                                     */
/*                                                                        */
/* Contributors Listed Below - COPYRIGHT 2015,2017                        */
/* [+] International Business Machines Corp.                              */
/*                                                                        */
/*                                                                        */
/* Licensed under the Apache License, Version 2.0 (the "License");        */
/* you may not use this file except in compliance with the License.       */
/* You may obtain a copy of the License at                                */
/*                                                                        */
/*     http://www.apache.org/licenses/LICENSE-2.0                         */
/*                                                                        */
/* Unless required by applicable law or agreed to in writing, software    */
/* distributed under the License is distributed on an "AS IS" BASIS,      */
/* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or        */
/* implied. See the License for the specific language governing           */
/* permissions and limitations under the License.                         */
/*                                                                        */
/* IBM_PROLOG_END_TAG                                                     */

#include <native.h>
#include <scom_trgt.h>
#include <scom_util.h>

/*------------------------------------------------------------------------------ */

SCOM_Trgt_t SCOM_Trgt_getTrgt( TrgtType_t i_type, uint8_t i_procPos,
                               uint8_t i_procUnitPos, uint32_t i_fsiBaseAddr,
                               bool i_isMaster )
{
    SCOM_Trgt_t trgt = {
        .type        = i_type,
        .procPos     = i_procPos,
        .procUnitPos = i_procUnitPos,
        .isMaster    = i_isMaster,
        .fsiBaseAddr = i_fsiBaseAddr,
    };

    if (TRGT_PROC == trgt.type)
    {
        trgt.procUnitPos = 0;
    } 

    if ( TRGT_MEMBUF == trgt.type || TRGT_MBA == trgt.type )
    {
        trgt.isMaster = false;
    }

    return trgt;
}

/*------------------------------------------------------------------------------ */

uint8_t SCOM_Trgt_getChipPos( SCOM_Trgt_t i_trgt )
{
    uint32_t p = 0;

    switch ( i_trgt.type )
    {
        case TRGT_PROC:
        case TRGT_CAPP:
        case TRGT_XBUS:
        case TRGT_OBUS:
        case TRGT_PEC:
        case TRGT_PHB:
        case TRGT_EQ:
        case TRGT_EX:
        case TRGT_EC:
        case TRGT_MCBIST:
        case TRGT_MCS:
        case TRGT_MCA:
            p = i_trgt.procPos;
            break;

        case TRGT_MEMBUF:  /* TODO RTC 173614  -- with CUMULUS   */
            p = (i_trgt.procPos * MAX_MEMBUF_PER_PROC) + i_trgt.procUnitPos;
            break;

        case TRGT_MBA:     /* TODO RTC 173614  -- with CUMULUS   */
            p = (i_trgt.procPos     * MAX_MEMBUF_PER_PROC) +
                (i_trgt.procUnitPos / MAX_MBA_PER_MEMBUF);
            break;

        default: ;
    }

    return p;
}

/*------------------------------------------------------------------------------ */

uint8_t SCOM_Trgt_getChipUnitPos( SCOM_Trgt_t i_trgt )
{
    uint32_t u = 0;

    switch ( i_trgt.type )
    {
        case TRGT_PROC:
        case TRGT_MEMBUF: u = 0; break;

        case TRGT_CAPP:
        case TRGT_XBUS:
        case TRGT_OBUS:
        case TRGT_PEC:
        case TRGT_PHB:
        case TRGT_EQ:
        case TRGT_EX:
        case TRGT_EC:
        case TRGT_MCBIST:
        case TRGT_MCS:
        case TRGT_MCA:  u = i_trgt.procUnitPos; break;

        case TRGT_MBA:  u = i_trgt.procUnitPos % MAX_MBA_PER_MEMBUF; break;
           /* TODO RTC 173614  -- with CUMULUS   */

        default: ;
    }

    return u;
}

/*------------------------------------------------------------------------------ */

SCOM_Trgt_t SCOM_Trgt_getParentChip( SCOM_Trgt_t i_trgt )
{
    TrgtType_t t = TRGT_MAX;
    switch ( i_trgt.type )
    {
        case TRGT_PROC:
        case TRGT_CAPP:
        case TRGT_XBUS:
        case TRGT_OBUS:
        case TRGT_PEC:
        case TRGT_PHB:
        case TRGT_EQ:
        case TRGT_EX:
        case TRGT_EC:
        case TRGT_MCBIST:
        case TRGT_MCS:
        case TRGT_MCA:   t = TRGT_PROC; break;

        case TRGT_MEMBUF:
        case TRGT_MBA:  t = TRGT_MEMBUF; break;

        default: ;
    }

    uint8_t u = 0;
    switch ( i_trgt.type )
    {
        case TRGT_PROC:
        case TRGT_CAPP:
        case TRGT_XBUS:
        case TRGT_OBUS:
        case TRGT_PEC:
        case TRGT_PHB:
        case TRGT_EQ:
        case TRGT_EX:
        case TRGT_EC:
        case TRGT_MCBIST:
        case TRGT_MCS:
        case TRGT_MCA:
        case TRGT_MEMBUF: u = i_trgt.procUnitPos;                  break;
           /* TODO RTC 173614  -- with CUMULUS   */

        case TRGT_MBA:  u = i_trgt.procUnitPos / MAX_MBA_PER_MEMBUF; break;
           /* TODO RTC 173614  -- with CUMULUS   */

        default: ;
    }

    return SCOM_Trgt_getTrgt( t, i_trgt.procPos, u, i_trgt.fsiBaseAddr,
                              i_trgt.isMaster );
}