/*
 * Copyright 2018 NXP
 *
 * SPDX-License-Identifier: BSD-3-Clause
 *
 * Author Rod Dorris <rod.dorris@nxp.com>
 */

  .section .text, "ax"

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

#include <asm_macros.S>
#include <platform_def.h>
#include <psci.h>
#include <bl31_data.h>
#include <plat_psci.h>

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

.global soc_init_start
.global soc_init_percpu
.global soc_init_finish
.global _set_platform_security
.global _soc_set_start_addr

.global _soc_core_release
.global _soc_ck_disabled
.global _soc_core_restart
.global _soc_core_prep_off
.global _soc_core_entr_off
.global _soc_core_exit_off
.global _soc_sys_reset
.global _soc_sys_off
.global _soc_core_prep_stdby
.global _soc_core_entr_stdby
.global _soc_core_exit_stdby
.global _soc_core_prep_pwrdn
.global _soc_core_entr_pwrdn
.global _soc_core_exit_pwrdn
.global _soc_clstr_prep_stdby
.global _soc_clstr_exit_stdby
.global _soc_clstr_prep_pwrdn
.global _soc_clstr_exit_pwrdn
.global _soc_sys_prep_stdby
.global _soc_sys_exit_stdby
.global _soc_sys_prep_pwrdn
.global _soc_sys_pwrdn_wfi
.global _soc_sys_exit_pwrdn

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

.equ TZPCDECPROT_0_SET_BASE, 0x02200804
.equ TZPCDECPROT_1_SET_BASE, 0x02200810
.equ TZPCDECPROT_2_SET_BASE, 0x0220081C

.equ TZASC_REGION_ATTRIBUTES_0_0, 0x01100110

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

 /* this function starts the initialization tasks of the soc, using secondary cores
  * if they are available
  * in: 
  * out: 
  * uses x0, x1, x2, x3, x4, x5, x6, x7, x8, x9, x10, x11
  */
func soc_init_start
     /* called from C, so save the non-volatile regs
      * save these as pairs of registers to maintain the
      *  required 16-byte alignment on the stack */
    stp  x4,  x5,  [sp, #-16]!
    stp  x6,  x7,  [sp, #-16]!
    stp  x8,  x9,  [sp, #-16]!
    stp  x10, x11, [sp, #-16]!
    stp  x12, x13, [sp, #-16]!
    stp  x18, x30, [sp, #-16]!

     /* make sure the personality has been established by releasing cores
      * that are marked "to-be-disabled" from reset
      */
    bl  release_disabled  // 0-8

     /* init the task flags */
    bl  _init_task_flags   // 0-1

#if 0

     /* save start address */
    bl   _soc_get_start_addr   // 0-2
    mov  x1, x0
    mov  x0, #BOOTLOC_OFFSET
    bl   _set_global_data

     /* see if we are initializing ocram */
    ldr x0, =POLICY_USING_ECC
    cbz x0, 1f
     /* initialize the OCRAM for ECC */

     /* get a secondary core to initialize the upper half of ocram */
    bl  _find_core      // 0-4
    cbz x0, 2f
    bl  init_task_1     // 0-4   
5:
     /* wait til task 1 has started */
    bl  _get_task1_start // 0-1
    cbnz x0, 4f
    b    5b
4:
     /* get a secondary core to initialize the lower
      * half of ocram
      */
    bl  _find_core      // 0-4
    cbz x0, 3f
    bl  init_task_2     // 0-4
6:
     /* wait til task 2 has started */
    bl  _get_task2_start // 0-1
    cbnz x0, 7f
    b    6b
2:
     /* there are no secondary cores available, so the
      * boot core will have to init upper ocram
      */
    bl  _ocram_init_upper // 0-10
3:
     /* there are no secondary cores available, so the
      * boot core will have to init lower ocram
      */
    bl  _ocram_init_lower // 0-10
    b   1f
7:
     /* clear bootlocptr */
    mov  x0, xzr
    bl    _soc_set_start_addr
#endif

     /* set SCRATCHRW7 to 0x0 */
    ldr  x0, =DCFG_SCRATCHRW7_OFFSET
    mov  x1, xzr
    bl   _write_reg_dcfg

1:
     /* restore the aarch32/64 non-volatile registers */
    ldp  x18, x30, [sp], #16
    ldp  x12, x13, [sp], #16
    ldp  x10, x11, [sp], #16
    ldp  x8,  x9,  [sp], #16
    ldp  x6,  x7,  [sp], #16
    ldp  x4,  x5,  [sp], #16
    ret
endfunc soc_init_start

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

 /* this function completes the initialization tasks of the soc
  * in: 
  * out: 
  * uses x0, x1, x2, x3, x4
  */
func soc_init_finish
    stp  x4,  x30,  [sp, #-16]!

#if 0
     /* are we initializing ocram? */
    ldr x0, =POLICY_USING_ECC
    cbz x0, 4f

     /* if the ocram init is not completed, wait til it is */
1:
    bl   _get_task1_done
    cbnz x0, 2f
    wfe
    b    1b    
2:
    bl   _get_task2_done
    cbnz x0, 3f
    wfe
    b    2b    
3:
     /* set the task 1 core state to IN_RESET */
    bl   _get_task1_core
    cbz  x0, 5f
     /* x0 = core mask lsb of the task 1 core */
    mov  x1, #CORE_STATE_DATA
    mov  x2, #CORE_WFE
    bl   _setCoreData
5:
     /* set the task 2 core state to IN_RESET */
    bl   _get_task2_core
    cbz  x0, 4f
     /* x0 = core mask lsb of the task 2 core */
    mov  x1, #CORE_STATE_DATA
    mov  x2, #CORE_WFE
    bl   _setCoreData
4:
     /* restore bootlocptr */
    mov  x0, #BOOTLOC_OFFSET
    bl   _get_global_data
     /* x0 = saved start address */
    bl    _soc_set_start_addr
#endif

    ldp   x4,  x30,  [sp], #16
    ret
endfunc soc_init_finish

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

 /* void soc_init_percpu(void)
  * this function performs any soc-specific initialization that is needed on 
  * a per-core basis
  * in:  none
  * out: none
  * uses x0, x1, x2, x3
  */
func soc_init_percpu
    stp  x4,  x30,  [sp, #-16]!

    bl    plat_my_core_mask
    mov   x2, x0

     /* x2 = core mask */

     /* see if this core is marked for prefetch disable */
    mov   x0, #PREFETCH_DIS_OFFSET
    bl    _get_global_data  /* 0-1 */
    tst   x0, x2
    b.eq  1f
    bl    _disable_ldstr_pfetch_A72  /* 0 */
1:
    bl    enable_timer_base_to_cluster

    ldp   x4,  x30,  [sp], #16
    ret
endfunc soc_init_percpu

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

 /* this function determines if a core is disabled via COREDISABLEDSR
  * in:  w0  = core_mask_lsb
  * out: w0  = 0, core not disabled
  *      w0 != 0, core disabled
  * uses x0, x1
  */
_soc_ck_disabled:

     /* get base addr of dcfg block */
    ldr  x1, =NXP_DCFG_ADDR

     /* read COREDISABLEDSR */
    ldr  w1, [x1, #DCFG_COREDISABLEDSR_OFFSET]

     /* test core bit */
    and  w0, w1, w0

    ret

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

 /* this function sets the security mechanisms in the SoC to implement the
  * Platform Security Policy
  */
func _set_platform_security
    mov  x3, x30

#if (!SUPPRESS_TZC)
     /* initialize the tzpc */
    bl   init_tzpc
#endif

#if (!SUPPRESS_SEC)
     /* initialize secmon */
    bl  initSecMon
#endif

    mov  x30, x3
    ret
endfunc _set_platform_security

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

 /* part of CPU_ON
  * this function releases a secondary core from reset
  * in:   x0 = core_mask_lsb
  * out:  none
  * uses: x0, x1, x2, x3 
  */
_soc_core_release:
    mov   x3, x30

     /* x0 = core mask */

     /* write to CORE_HOLD to tell the bootrom that we want this core
      * to run
      */
    ldr  x1, =NXP_SEC_REGFILE_ADDR
    str  w0, [x1, #CORE_HOLD_OFFSET]

     /* x0 = core mask */

     /* read-modify-write BRRL to release core */
    mov  x1, #NXP_RESET_ADDR
    ldr  w2, [x1, #BRR_OFFSET]
    orr  w2, w2, w0
    str  w2, [x1, #BRR_OFFSET]
    dsb  sy
    isb

     /* send event */
    sev
    isb

    mov   x30, x3
    ret

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

 /* this function writes a 64-bit address to bootlocptrh/l
  * in:  x0, 64-bit address to write to BOOTLOCPTRL/H
  * uses x0, x1, x2
  */
func _soc_set_start_addr
     /* get the 64-bit base address of the dcfg block */
    ldr  x2, =NXP_DCFG_ADDR

     /* write the 32-bit BOOTLOCPTRL register */
    mov  x1, x0
    str  w1, [x2, #DCFG_BOOTLOCPTRL_OFFSET]

     /* write the 32-bit BOOTLOCPTRH register */
    lsr  x1, x0, #32
    str  w1, [x2, #DCFG_BOOTLOCPTRH_OFFSET]
    ret
endfunc _soc_set_start_addr

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

 /* part of CPU_ON
  * this function restarts a core shutdown via _soc_core_entr_off
  * in:  x0 = core mask lsb (of the target cpu)
  * out: x0 == 0, on success
  *      x0 != 0, on failure
  * uses x0, x1, x2, x3, x4, x5, x6
  */
_soc_core_restart:
    mov  x6, x30
    mov  x4, x0

     /* x4 = core mask lsb */

     /* pgm GICD_CTLR - enable secure grp0  */
    mov  x5, #NXP_GICD_ADDR
    ldr  w2, [x5, #GICD_CTLR_OFFSET]
    orr  w2, w2, #GICD_CTLR_EN_GRP_0
    str  w2, [x5, #GICD_CTLR_OFFSET]
    dsb sy
    isb
     /* poll on RWP til write completes */
4:
    ldr  w2, [x5, #GICD_CTLR_OFFSET]
    tst  w2, #GICD_CTLR_RWP
    b.ne 4b   

     /* x4 = core mask lsb
      * x5 = gicd base addr
      */

    mov  x0, x4
    bl   get_mpidr_value

     /* x0 = mpidr of target core
      * x4 = core mask lsb of target core
      * x5 = gicd base addr
      */

     /* generate target list bit */
    and  x1, x0, #MPIDR_AFFINITY0_MASK
    mov  x2, #1
    lsl  x2, x2, x1
     /* get the affinity1 field */
    and  x1, x0, #MPIDR_AFFINITY1_MASK
    lsl  x1, x1, #8
    orr  x2, x2, x1
     /* insert the INTID for SGI15 */
    orr  x2, x2, #ICC_SGI0R_EL1_INTID
     /* fire the SGI */
    msr  ICC_SGI0R_EL1, x2
    dsb  sy
    isb

     /* load '0' on success */
    mov  x0, xzr

    mov  x30, x6
    ret

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

 /* part of CPU_OFF
  * this function programs SoC & GIC registers in preparation for shutting down
  * the core
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1, x2, x3, x4, x5, x6, x7
  */
_soc_core_prep_off:
    mov  x8, x30
    mov  x7, x0

     /* x7 = core mask lsb */

    mrs  x1, CPUECTLR_EL1
     /* set smp and disable L2 snoops in cpuectlr */
    orr  x1, x1, #CPUECTLR_SMPEN_EN
    orr  x1, x1, #CPUECTLR_DISABLE_TWALK_PREFETCH
    bic  x1, x1, #CPUECTLR_INS_PREFETCH_MASK
    bic  x1, x1, #CPUECTLR_DAT_PREFETCH_MASK
     /* set retention control in cpuectlr */
    bic  x1, x1, #CPUECTLR_TIMER_MASK
    orr  x1, x1, #CPUECTLR_TIMER_8TICKS
    msr  CPUECTLR_EL1, x1

     /* get redistributor rd base addr for this core */
    mov  x0, x7
    bl   get_gic_rd_base
    mov  x6, x0

     /* get redistributor sgi base addr for this core */
    mov  x0, x7
    bl   get_gic_sgi_base
    mov  x5, x0

     /* x5 = gicr sgi base addr
      * x6 = gicr rd  base addr
      * x7 = core mask lsb
      */

     /* disable SGI 15 at redistributor - GICR_ICENABLER0 */
    mov  w3, #GICR_ICENABLER0_SGI15
    str  w3, [x5, #GICR_ICENABLER0_OFFSET]
2:
     /* poll on rwp bit in GICR_CTLR */
    ldr  w4, [x6, #GICR_CTLR_OFFSET]
    tst  w4, #GICR_CTLR_RWP
    b.ne 2b

     /* disable GRP1 interrupts at cpu interface */
    msr  ICC_IGRPEN1_EL3, xzr

     /* disable GRP0 ints at cpu interface */
    msr  ICC_IGRPEN0_EL1, xzr

     /* program the redistributor - poll on GICR_CTLR.RWP as needed */

     /* define SGI 15 as Grp0 - GICR_IGROUPR0 */
    ldr  w4, [x5, #GICR_IGROUPR0_OFFSET]
    bic  w4, w4, #GICR_IGROUPR0_SGI15
    str  w4, [x5, #GICR_IGROUPR0_OFFSET]

     /* define SGI 15 as Grp0 - GICR_IGRPMODR0 */
    ldr  w3, [x5, #GICR_IGRPMODR0_OFFSET]
    bic  w3, w3, #GICR_IGRPMODR0_SGI15
    str  w3, [x5, #GICR_IGRPMODR0_OFFSET]

     /* set priority of SGI 15 to highest (0x0) - GICR_IPRIORITYR3 */
    ldr  w4, [x5, #GICR_IPRIORITYR3_OFFSET]
    bic  w4, w4, #GICR_IPRIORITYR3_SGI15_MASK
    str  w4, [x5, #GICR_IPRIORITYR3_OFFSET]

     /* enable SGI 15 at redistributor - GICR_ISENABLER0 */
    mov  w3, #GICR_ISENABLER0_SGI15
    str  w3, [x5, #GICR_ISENABLER0_OFFSET]
    dsb  sy
    isb
3:
     /* poll on rwp bit in GICR_CTLR */
    ldr  w4, [x6, #GICR_CTLR_OFFSET]
    tst  w4, #GICR_CTLR_RWP
    b.ne 3b

     /* quiesce the debug interfaces */
    mrs  x3, osdlr_el1
    orr  x3, x3, #OSDLR_EL1_DLK_LOCK
    msr  osdlr_el1, x3
    isb

     /* enable grp0 ints */
    mov  x3, #ICC_IGRPEN0_EL1_EN
    msr  ICC_IGRPEN0_EL1, x3

     /* x5 = gicr sgi base addr
      * x6 = gicr rd  base addr
      * x7 = core mask lsb
      */

     /* clear any pending interrupts */
    mvn  w1, wzr
    str  w1, [x5, #GICR_ICPENDR0_OFFSET]

     /* make sure system counter is enabled */
    ldr  x3, =NXP_TIMER_ADDR
    ldr  w0, [x3, #SYS_COUNTER_CNTCR_OFFSET]
    tst  w0, #SYS_COUNTER_CNTCR_EN
    b.ne 4f
    orr  w0, w0, #SYS_COUNTER_CNTCR_EN
    str  w0, [x3, #SYS_COUNTER_CNTCR_OFFSET]
4:
     /* enable the core timer and mask timer interrupt */
    mov  x1, #CNTP_CTL_EL0_EN
    orr  x1, x1, #CNTP_CTL_EL0_IMASK
    msr  cntp_ctl_el0, x1

    isb
    mov  x30, x8
    ret

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

 /* part of CPU_OFF
  * this function performs the final steps to shutdown the core
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1, x2, x3, x4, x5
  */
_soc_core_entr_off:
    mov  x5, x30
    mov  x4, x0

     /* x4 = core mask */
1:
     /* enter low-power state by executing wfi */
    wfi

     /* see if SGI15 woke us up */
    mrs  x2, ICC_IAR0_EL1
    mov  x3, #ICC_IAR0_EL1_SGI15
    cmp  x2, x3
    b.ne 1b

     // deactivate the int
    msr ICC_EOIR0_EL1, x2

     /* x4 = core mask */
2:
     /* check if core has been turned on */
    mov  x0, x4
    bl   _getCoreState

     /* x0 = core state */

    cmp  x0, #CORE_WAKEUP
    b.ne 1b

     /* if we get here, then we have exited the wfi */

    mov  x30, x5
    ret

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

 /* part of CPU_OFF
  * this function starts the process of starting a core back up
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1, x2, x3, x4, x5, x6
  */
_soc_core_exit_off:
    mov  x6, x30
    mov  x5, x0

     /* disable forwarding of GRP0 ints at cpu interface */
    msr  ICC_IGRPEN0_EL1, xzr

     /* get redistributor sgi base addr for this core */
    mov  x0, x5
    bl   get_gic_sgi_base
    mov  x4, x0

     /* x4 = gicr sgi base addr */
     /* x5 = core mask */

     /* disable SGI 15 at redistributor - GICR_ICENABLER0 */
    mov  w1, #GICR_ICENABLER0_SGI15
    str  w1, [x4, #GICR_ICENABLER0_OFFSET]

     /* get redistributor rd base addr for this core */
    mov  x0, x5
    bl   get_gic_rd_base
    mov  x4, x0

     /* x4 = gicr rd  base addr */
2:
     /* poll on rwp bit in GICR_CTLR */
    ldr  w2, [x4, #GICR_CTLR_OFFSET]
    tst  w2, #GICR_CTLR_RWP
    b.ne 2b

     /* x4 = gicr rd  base addr */

     // unlock the debug interfaces
    mrs  x3, osdlr_el1
    bic  x3, x3, #OSDLR_EL1_DLK_LOCK
    msr  osdlr_el1, x3
    isb

    dsb sy
    isb
    mov  x30, x6
    ret

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

 /* this function requests a reset of the entire SOC
  * in:  none
  * out: none
  * uses: x0, x1, x2, x3, x4, x5, x6
  */
_soc_sys_reset:
    mov  x3, x30

     /* make sure the mask is cleared in the reset request mask register */
    mov  x0, #RST_RSTRQMR1_OFFSET
    mov  w1, wzr
    bl   _write_reg_reset

     /* set the reset request */
    mov  x4, #RST_RSTCR_OFFSET
    mov  x0, x4
    mov  w1, #RSTCR_RESET_REQ
    bl   _write_reg_reset

     /* x4 = RST_RSTCR_OFFSET */

     /* just in case this address range is mapped as cacheable,
      * flush the write out of the dcaches
      */
    mov  x2, #NXP_RESET_ADDR
    add  x2, x2, x4
    dc   cvac, x2
    dsb  st
    isb

     /* this function does not return */
    b  .

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

 /* part of SYSTEM_OFF
  * this function turns off the SoC clocks
  * Note: this function is not intended to return, and the only allowable
  *       recovery is POR
  * in:  none
  * out: none
  * uses x0, x1, x2, x3
  */
_soc_sys_off:

     /* A-009810: LPM20 entry sequence might cause
      * spurious timeout reset request
      * workaround: MASK RESET REQ RPTOE
      */
    ldr  x0, =NXP_RESET_ADDR
    ldr  w1, =RSTRQMR_RPTOE_MASK
    str  w1, [x0, #RST_RSTRQMR1_OFFSET]

     /* disable sec, QBman, spi and qspi */
    ldr  x2, =NXP_DCFG_ADDR
    ldr  x0, =DCFG_DEVDISR1_OFFSET
    ldr  w1, =DCFG_DEVDISR1_SEC
    str  w1, [x2, x0]
    ldr  x0, =DCFG_DEVDISR3_OFFSET
    ldr  w1, =DCFG_DEVDISR3_QBMAIN
    str  w1, [x2, x0]
    ldr  x0, =DCFG_DEVDISR4_OFFSET
    ldr  w1, =DCFG_DEVDISR4_SPI_QSPI
    str  w1, [x2, x0]

     /* set TPMWAKEMR0 */
    ldr  x0, =TPMWAKEMR0_ADDR
    mov  w1, #0x1
    str  w1, [x0]

     /* disable icache, dcache, mmu @ EL1 */
    mov  x1, #SCTLR_I_C_M_MASK
    mrs  x0, sctlr_el1
    bic  x0, x0, x1
    msr  sctlr_el1, x0

     /* disable L2 prefetches */
    mrs  x0, CPUECTLR_EL1
    orr  x0, x0, #CPUECTLR_SMPEN_EN
    orr  x0, x0, #CPUECTLR_TIMER_8TICKS
    msr  CPUECTLR_EL1, x0
    isb

     /* disable CCN snoop domain */
    mov  x1, #CCI_HN_F_0_BASE
    ldr  x0, =CCN_HN_F_SNP_DMN_CTL_MASK
    str  x0, [x1, #CCN_HN_F_SNP_DMN_CTL_CLR_OFFSET]

    mov  x1, #CCI_HN_F_0_BASE
3:
    ldr  w1, [x1, #CCN_HN_F_SNP_DMN_CTL_OFFSET]
    cmp  w1, #0x2
    b.ne 3b

    mov  x3, #NXP_PMU_ADDR

     /* x3 = pmu base addr */

4:
    ldr  w1, [x3, #PMU_PCPW20SR_OFFSET]
    cmp  w1, #PMU_IDLE_CORE_MASK
    b.ne 4b

	mov  w1, #PMU_IDLE_CLUSTER_MASK
    str  w1, [x3, #PMU_CLAINACTSETR_OFFSET]

1:
    ldr  w1, [x3, #PMU_PCPW20SR_OFFSET]
    cmp  w1, #PMU_IDLE_CORE_MASK
    b.ne 1b

	mov  w1, #PMU_FLUSH_CLUSTER_MASK
    str  w1, [x3, #PMU_CLL2FLUSHSETR_OFFSET]

2:
    ldr  w1, [x3, #PMU_CLL2FLUSHSR_OFFSET]
    cmp  w1, #PMU_FLUSH_CLUSTER_MASK
    b.ne 2b

	mov  w1, #PMU_FLUSH_CLUSTER_MASK
    str  w1, [x3, #PMU_CLSL2FLUSHCLRR_OFFSET]

	mov  w1, #PMU_FLUSH_CLUSTER_MASK
    str  w1, [x3, #PMU_CLSINACTSETR_OFFSET]

    mov  x2, #DAIF_SET_MASK
    mrs  x1, spsr_el1
    orr  x1, x1, x2
    msr  spsr_el1, x1

    mrs  x1, spsr_el2
    orr  x1, x1, x2
    msr  spsr_el2, x1

     /* force the debug interface to be quiescent */
    mrs  x0, osdlr_el1
    orr  x0, x0, #0x1
    msr  osdlr_el1, x0

     /* invalidate all TLB entries at all 3 exception levels */
    tlbi alle1
    tlbi alle2
    tlbi alle3

     /* x3 = pmu base addr */

     /* request lpm20 */
    ldr  x0, =PMU_POWMGTCSR_OFFSET
    ldr  w1, =PMU_POWMGTCSR_VAL
    str  w1, [x3, x0]

5:
    wfe
    b.eq  5b

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

 /* part of CPU_SUSPEND
  * this function performs SoC-specific programming prior to standby
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1
  */
_soc_core_prep_stdby:

     /* clear CPUECTLR_EL1[2:0] */
    mrs  x1, CPUECTLR_EL1
    bic  x1, x1, #CPUECTLR_TIMER_MASK
    msr  CPUECTLR_EL1, x1

    ret

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

 /* part of CPU_SUSPEND
  * this function puts the calling core into standby state
  * in:  x0 = core mask lsb
  * out: none
  * uses x0
  */
_soc_core_entr_stdby:

     /* X0 = core mask lsb */

    dsb  sy
    isb
    wfi

    ret

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

 /* part of CPU_SUSPEND
  * this function performs any SoC-specific cleanup after standby state
  * in:  x0 = core mask lsb
  * out: none
  * uses none
  */
_soc_core_exit_stdby:

    ret

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

 /* part of CPU_SUSPEND
  * this function performs SoC-specific programming prior to power-down
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1, x2
  */
_soc_core_prep_pwrdn:


     /* make sure system counter is enabled */
    ldr  x2, =NXP_TIMER_ADDR
    ldr  w0, [x2, #SYS_COUNTER_CNTCR_OFFSET]
    tst  w0, #SYS_COUNTER_CNTCR_EN
    b.ne 1f
    orr  w0, w0, #SYS_COUNTER_CNTCR_EN
    str  w0, [x2, #SYS_COUNTER_CNTCR_OFFSET]
1:

     /* enable dynamic retention control (CPUECTLR[2:0])
      * set the SMPEN bit (CPUECTLR[6])
      */
    mrs  x1, CPUECTLR_EL1
    bic  x1, x1, #CPUECTLR_RET_MASK
    orr  x1, x1, #CPUECTLR_TIMER_8TICKS
    orr  x1, x1, #CPUECTLR_SMPEN_EN
    msr  CPUECTLR_EL1, x1

    isb
    ret

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

 /* part of CPU_SUSPEND
  * this function puts the calling core into a power-down state
  * in:  x0 = core mask lsb
  * out: none
  * uses x0
  */
_soc_core_entr_pwrdn:

     /* X0 = core mask lsb */

    dsb  sy
    isb
    wfi

    ret

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

 /* part of CPU_SUSPEND
  * this function performs any SoC-specific cleanup after power-down state
  * in:  x0 = core mask lsb
  * out: none
  * uses none
  */
_soc_core_exit_pwrdn:

    ret

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

 /* part of CPU_SUSPEND
  * this function performs SoC-specific programming prior to standby
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1
  */
_soc_clstr_prep_stdby:

     /* clear CPUECTLR_EL1[2:0] */
    mrs  x1, CPUECTLR_EL1
    bic  x1, x1, #CPUECTLR_TIMER_MASK
    msr  CPUECTLR_EL1, x1

    ret

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

 /* part of CPU_SUSPEND
  * this function performs any SoC-specific cleanup after standby state
  * in:  x0 = core mask lsb
  * out: none
  * uses none
  */
_soc_clstr_exit_stdby:

    ret

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

 /* part of CPU_SUSPEND
  * this function performs SoC-specific programming prior to power-down
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1, x2
  */
_soc_clstr_prep_pwrdn:


     /* make sure system counter is enabled */
    ldr  x2, =NXP_TIMER_ADDR
    ldr  w0, [x2, #SYS_COUNTER_CNTCR_OFFSET]
    tst  w0, #SYS_COUNTER_CNTCR_EN
    b.ne 1f
    orr  w0, w0, #SYS_COUNTER_CNTCR_EN
    str  w0, [x2, #SYS_COUNTER_CNTCR_OFFSET]
1:

     /* enable dynamic retention control (CPUECTLR[2:0])
      * set the SMPEN bit (CPUECTLR[6])
      */
    mrs  x1, CPUECTLR_EL1
    bic  x1, x1, #CPUECTLR_RET_MASK
    orr  x1, x1, #CPUECTLR_TIMER_8TICKS
    orr  x1, x1, #CPUECTLR_SMPEN_EN
    msr  CPUECTLR_EL1, x1

    isb
    ret

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

 /* part of CPU_SUSPEND
  * this function performs any SoC-specific cleanup after power-down state
  * in:  x0 = core mask lsb
  * out: none
  * uses none
  */
_soc_clstr_exit_pwrdn:

    ret

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

 /* part of CPU_SUSPEND
  * this function performs SoC-specific programming prior to standby
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1
  */
_soc_sys_prep_stdby:

     /* clear CPUECTLR_EL1[2:0] */
    mrs  x1, CPUECTLR_EL1
    bic  x1, x1, #CPUECTLR_TIMER_MASK
    msr  CPUECTLR_EL1, x1

    ret

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

 /* part of CPU_SUSPEND
  * this function performs any SoC-specific cleanup after standby state
  * in:  x0 = core mask lsb
  * out: none
  * uses none
  */
_soc_sys_exit_stdby:

    ret

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

 /* part of CPU_SUSPEND
  * this function performs SoC-specific programming prior to
  * suspend-to-power-down
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1, x2, x3, x4
  */
_soc_sys_prep_pwrdn:

     /* set retention control */
    mrs  x0, CPUECTLR_EL1
    bic  x0, x0, #CPUECTLR_TIMER_MASK
    orr  x0, x0, #CPUECTLR_TIMER_8TICKS
    orr  x0, x0, #CPUECTLR_SMPEN_EN
    msr  CPUECTLR_EL1, x0

    isb
    ret

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

 /* part of CPU_SUSPEND
  * this function puts the calling core, and potentially the soc, into a
  * low-power state
  * in:  x0 = core mask lsb
  * out: x0 = 0, success
  *      x0 < 0, failure
  * uses x0, x1, x2, x3, x4, x5, x6, x7, x8, x9, x10, x13, x14, x15,
  *      x16, x17, x18
  */
_soc_sys_pwrdn_wfi:
    mov  x18, x30

    mov  x3, #NXP_PMU_ADDR

     /* x3 = pmu base addr */

     /* backup epu registers to stack */
    ldr  x2, =NXP_EPU_ADDR
    ldr  w4, [x2, #EPU_EPIMCR10_OFFSET]
    ldr  w5, [x2, #EPU_EPCCR10_OFFSET]
    ldr  w6, [x2, #EPU_EPCTR10_OFFSET]
    ldr  w7, [x2, #EPU_EPGCR_OFFSET]
    stp  x4,  x5,  [sp, #-16]!
    stp  x6,  x7,  [sp, #-16]!

     /* x2 = epu base addr
      * x3 = pmu base addr
      */

     /* set up EPU event to receive the wake signal from PMU */
    mov  w4, #EPU_EPIMCR10_VAL
    mov  w5, #EPU_EPCCR10_VAL
    mov  w6, #EPU_EPCTR10_VAL
    mov  w7, #EPU_EPGCR_VAL
    str  w4, [x2, #EPU_EPIMCR10_OFFSET]
    str  w5, [x2, #EPU_EPCCR10_OFFSET]
    str  w6, [x2, #EPU_EPCTR10_OFFSET]
    str  w7, [x2, #EPU_EPGCR_OFFSET]

    ldr  x2, =NXP_GICD_ADDR

     /* x2 = gicd base addr
      * x3 = pmu base addr
      */

     /* backup flextimer/mmc/usb interrupt router */
    ldr  x0, =GICD_IROUTER60_OFFSET
    ldr  x1, =GICD_IROUTER76_OFFSET
    ldr  w4, [x2, x0]
    ldr  w5, [x2, x1]
    ldr  x0, =GICD_IROUTER112_OFFSET
    ldr  x1, =GICD_IROUTER113_OFFSET
    ldr  w6, [x2, x0]
    ldr  w7, [x2, x1]
    stp  x4,  x5,  [sp, #-16]!
    stp  x6,  x7,  [sp, #-16]!

     /* x2 = gicd base addr
      * x3 = pmu base addr
      * x0 = GICD_IROUTER112_OFFSET
      * x1 = GICD_IROUTER113_OFFSET
      */

     /* re-route interrupt to cluster 1 */
    ldr  w4, =GICD_IROUTER_VALUE
    str  w4, [x2, x0]
    str  w4, [x2, x1]
    ldr  x0, =GICD_IROUTER60_OFFSET
    ldr  x1, =GICD_IROUTER76_OFFSET
    str  w4, [x2, x0]
    str  w4, [x2, x1]
    dsb  sy
    isb

     /* x3 = pmu base addr */

     /* A-009810: LPM20 entry sequence might cause
      * spurious timeout reset request
      * workaround: MASK RESET REQ RPTOE
      */
    ldr  x0, =NXP_RESET_ADDR
    ldr  w1, =RSTRQMR_RPTOE_MASK
    str  w1, [x0, #RST_RSTRQMR1_OFFSET]

     /* disable sec, QBman, spi and qspi */
    ldr  x2, =NXP_DCFG_ADDR
    ldr  x0, =DCFG_DEVDISR1_OFFSET
    ldr  w1, =DCFG_DEVDISR1_SEC
    str  w1, [x2, x0]
    ldr  x0, =DCFG_DEVDISR3_OFFSET
    ldr  w1, =DCFG_DEVDISR3_QBMAIN
    str  w1, [x2, x0]
    ldr  x0, =DCFG_DEVDISR4_OFFSET
    ldr  w1, =DCFG_DEVDISR4_SPI_QSPI
    str  w1, [x2, x0]

     /* x3 = pmu base addr */

     /* set TPMWAKEMR0 */
    ldr  x0, =TPMWAKEMR0_ADDR
    mov  w1, #0x1
    str  w1, [x0]

     /* setup retention control */
    mrs  x0, CPUECTLR_EL1
    orr  x0, x0, #CPUECTLR_SMPEN_EN
    orr  x0, x0, #CPUECTLR_TIMER_8TICKS
    msr  CPUECTLR_EL1, x0
    dsb  sy
    isb

     /* disable CCN snoop domain */
    mov  x1, #CCI_HN_F_0_BASE
    ldr  x0, =CCN_HN_F_SNP_DMN_CTL_MASK
    str  x0, [x1, #CCN_HN_F_SNP_DMN_CTL_CLR_OFFSET]

     /* x1 = CCI_HN_F_0_BASE */

3:
    ldr  w5, [x1, #CCN_HN_F_SNP_DMN_CTL_OFFSET]
    cmp  w5, #0x2
    b.ne  3b

    mov  x0, #NXP_PMU_ADDR
8:
    ldr  w1, [x0, #PMU_PCPW20SR_OFFSET]
    cmp  w1, #PMU_IDLE_CORE_MASK
    b.ne 8b

     /* x0 = NXP_PMU_ADDR */

    mov  w1, #PMU_IDLE_CLUSTER_MASK
    str  w1, [x0, #PMU_CLAINACTSETR_OFFSET]

     /* x0 = NXP_PMU_ADDR */
1:
    ldr  w1, [x0, #PMU_PCPW20SR_OFFSET]
    cmp  w1, #PMU_IDLE_CORE_MASK
    b.ne 1b

     /* x0 = NXP_PMU_ADDR */

    mov  w1, #PMU_FLUSH_CLUSTER_MASK
    str  w1, [x0, #PMU_CLL2FLUSHSETR_OFFSET]

     /* x0 = NXP_PMU_ADDR */

2:
    ldr  w1, [x0, #PMU_CLL2FLUSHSR_OFFSET]
    cmp  w1, #PMU_FLUSH_CLUSTER_MASK
    b.ne 2b

     /* x0 = NXP_PMU_ADDR */

    mov  w1, #PMU_FLUSH_CLUSTER_MASK
    str  w1, [x0, #PMU_CLSL2FLUSHCLRR_OFFSET]

    mov  w1, #PMU_FLUSH_CLUSTER_MASK
    str  w1, [x0, #PMU_CLSINACTSETR_OFFSET]

     /* force the debug interface to be quiescent */
    mrs  x0, osdlr_el1
    orr  x0, x0, #0x1
    msr  osdlr_el1, x0

     /* enable the WakeRequest signal
      * x3 is cpu mask starting from cpu0
      */
    mov  x3, #0x1
2:
    mov x0, x3
    bl   get_gic_rd_base  // 0-2
    ldr  w1, [x0, #0x14]
    orr  w1, w1, #0x2
    str  w1, [x0, #0x14]
1:
    ldr  w1, [x0, #0x14]
    cmp  w1, #0x6
    b.ne 1b

    lsl  x3, x3, #1
    cmp  x3, #0x100
    b.ne 2b

     /* invalidate all TLB entries at all 3 exception levels */
    tlbi alle1
    tlbi alle2
    tlbi alle3

     /* request lpm20 */

    mov  x3, #NXP_PMU_ADDR
    ldr  x0, =PMU_POWMGTCSR_OFFSET
    ldr  w1, =PMU_POWMGTCSR_VAL
    str  w1, [x3, x0]

    ldr  x5, =NXP_EPU_ADDR
4:
    wfe

	/* add delay to the interval of wfe loop to avoid hang*/
	mov x4, #0
203:
	add x4, x4, 1
	cmp x4, #0x30000
	b.le 203b

    ldr  w1, [x5, #EPU_EPCTR10_OFFSET]
    cmp  w1, #0
    b.eq  4b

     /* x3 = NXP_PMU_ADDR */

     /* Re-enable the GPP ACP */
    ldr  w1, =PMU_IDLE_CLUSTER_MASK
    str  w1, [x3, #PMU_CLAINACTCLRR_OFFSET]
    str  w1, [x3, #PMU_CLSINACTCLRR_OFFSET]

     /* x3 = NXP_PMU_ADDR */
3:
    ldr  w1, [x3, #PMU_CLAINACTSETR_OFFSET]
    cbnz w1, 3b
4:
    ldr  w1, [x3, #PMU_CLSINACTSETR_OFFSET]
    cbnz w1, 4b

     /* disable the WakeRequest signal on cpu 0-7
      * x3 is cpu mask starting from cpu7
      */
    mov  x3, #0x80
2:
    mov x0, x3
    bl   get_gic_rd_base  // 0-2
    ldr  w1, [x0, #GICR_WAKER_OFFSET]
    bic  w1, w1, #GICR_WAKER_SLEEP_BIT
    str  w1, [x0, #GICR_WAKER_OFFSET]
1:
    ldr  w1, [x0, #GICR_WAKER_OFFSET]
    cbnz w1, 1b

    lsr  x3, x3, #1
    cbnz x3, 2b

     /* enable CCN snoop domain */
    mov  x1, #CCI_HN_F_0_BASE
    ldr  x0, =CCN_HN_F_SNP_DMN_CTL_MASK
    str  x0, [x1, #CCN_HN_F_SNP_DMN_CTL_SET_OFFSET]

    ldr  x3, =NXP_EPU_ADDR

     /* x3 = epu base addr */

     /* enable sec, QBman, spi and qspi */
    ldr  x2, =NXP_DCFG_ADDR
    str  wzr, [x2, #DCFG_DEVDISR1_OFFSET]
    str  wzr, [x2, #DCFG_DEVDISR3_OFFSET]
    str  wzr, [x2, #DCFG_DEVDISR4_OFFSET]

     /* restore flextimer/mmc/usb interrupt router */
    ldr  x3, =NXP_GICD_ADDR
    ldp  x0, x2, [sp], #16
    ldr  x1, =GICD_IROUTER113_OFFSET
    str  w2, [x3, x1]
    ldr  x1, =GICD_IROUTER112_OFFSET
    str  w0, [x3, x1]
    ldp  x0, x2, [sp], #16
    ldr  x1, =GICD_IROUTER76_OFFSET
    str  w2, [x3, x1]
    ldr  x1, =GICD_IROUTER60_OFFSET
    str  w0, [x3, x1]

     /* restore EPU registers */
    ldr  x3, =NXP_EPU_ADDR
    ldp  x0, x2, [sp], #16
    str  w2, [x3, #EPU_EPGCR_OFFSET]
    str  w0, [x3, #EPU_EPCTR10_OFFSET]
    ldp  x2, x1, [sp], #16
    str  w1, [x3, #EPU_EPCCR10_OFFSET]
    str  w2, [x3, #EPU_EPIMCR10_OFFSET]

    dsb sy
    isb
    mov  x30, x18
    ret

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

 /* part of CPU_SUSPEND
  * this function performs any SoC-specific cleanup after power-down
  * in:  x0 = core mask lsb
  * out: none
  * uses x0, x1
  */
_soc_sys_exit_pwrdn:

     /* enable stack alignment checking */
    mrs  x1, SCTLR_EL1
    orr  x1, x1, #0x4
    msr  SCTLR_EL1, x1

     /* enable debug interface */
    mrs  x1, osdlr_el1
    bic  x1, x1, #OSDLR_EL1_DLK_LOCK
    msr  osdlr_el1, x1

    /* enable i-cache */
    mrs  x1, SCTLR_EL3
    orr  x1, x1, #SCTLR_I_MASK
    msr  SCTLR_EL3, x1

    isb
    ret

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

 /* this function setc up the TrustZone Address Space Controller (TZASC)
  * in:  none
  * out: none
  * uses x0, x1
  */
init_tzpc:

     /* set Non Secure access for all devices protected via TZPC */
    ldr	x1, =TZPCDECPROT_0_SET_BASE   /* decode Protection-0 Set Reg */
    mov	w0, #0xFF		      /* set decode region to NS, Bits[7:0] */
    str	w0, [x1]

    ldr	x1, =TZPCDECPROT_1_SET_BASE   /* decode Protection-1 Set Reg */
    mov	w0, #0xFF		      /* set decode region to NS, Bits[7:0] */
    str	w0, [x1]

    ldr	x1, =TZPCDECPROT_2_SET_BASE   /* decode Protection-2 Set Reg */
    mov	w0, #0xFF		      /* set decode region to NS, Bits[7:0] */
    str	w0, [x1]

     /* entire SRAM as NS */
    ldr	x1, =NXP_OCRAM_TZPC_ADDR      /* secure RAM region size Reg */
    mov	w0, #0x00000000		      /* 0x00000000 = no secure region */
    str	w0, [x1]

    ret

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

 /* this function performs any needed initialization on SecMon for
  * boot services
  */
initSecMon:

     /* read the register hpcomr */
    ldr  x1, =NXP_SNVS_ADDR
    ldr  w0, [x1, #SECMON_HPCOMR_OFFSET]
     /* turn off secure access for the privileged registers */
    orr  w0, w0, #SECMON_HPCOMR_NPSWAEN
     /* write back */
    str  w0, [x1, #SECMON_HPCOMR_OFFSET]

    ret

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

 /* this function checks to see if cores which are to be disabled have been
  * released from reset - if not, it releases them
  * in:  none
  * out: none
  * uses x0, x1, x2, x3, x4, x5, x6, x7, x8
  */
release_disabled:
    mov  x8, x30

     /* read COREDISABLESR */
    mov  x0, #NXP_DCFG_ADDR
    ldr  w4, [x0, #DCFG_COREDISABLEDSR_OFFSET]

     /* get the number of cpus on this device */
    mov   x6, #PLATFORM_CORE_COUNT

    mov  x0, #NXP_RESET_ADDR
    ldr  w5, [x0, #BRR_OFFSET]

     /* load the core mask for the first core */
    mov  x7, #1

     /* x4 = COREDISABLESR
      * x5 = BRR
      * x6 = loop count
      * x7 = core mask bit
      */
2:
     /* check if the core is to be disabled */
    tst  x4, x7
    b.eq 1f

     /* see if disabled cores have already been released from reset */
    tst  x5, x7
    b.ne 1f

     /* if core has not been released, then release it (0-3) */
    mov  x0, x7
    bl   _soc_core_release

     /* record the core state in the data area (0-3) */
    mov  x0, x7
    mov  x1, #CORE_DISABLED
    bl   _setCoreState

1:
     /* decrement the counter */
    subs  x6, x6, #1
    b.le  3f
    
     /* shift the core mask to the next core */
    lsl   x7, x7, #1
     /* continue */
    b     2b
3:
    mov  x30, x8
    ret

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

 /* write a register in the DCFG block
  * in:  x0 = offset
  * in:  w1 = value to write
  * uses x0, x1, x2
  */
_write_reg_dcfg:
    ldr  x2, =NXP_DCFG_ADDR
    str  w1, [x2, x0]
    ret

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

 /* read a register in the DCFG block
  * in:  x0 = offset
  * out: w0 = value read
  * uses x0, x1, x2
  */
_read_reg_dcfg:
    ldr  x2, =NXP_DCFG_ADDR
    ldr  w1, [x2, x0]
    mov  w0, w1
    ret

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

 /* this function returns an mpidr value for a core, given a core_mask_lsb
  * in:  x0 = core mask lsb
  * out: x0 = affinity2:affinity1:affinity0, where affinity is 8-bits
  * uses x0, x1
  */
get_mpidr_value:

     /* convert a core mask to an SoC core number */
    clz  w0, w0
    mov  w1, #31
    sub  w0, w1, w0

     /* get the mpidr core number from the SoC core number */
    mov  w1, wzr
    tst  x0, #1
    b.eq 1f
    orr  w1, w1, #1

1:
     /* extract the cluster number */
    lsr  w0, w0, #1
    orr  w0, w1, w0, lsl #8

    ret

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

 /* this function returns the redistributor base address for the core specified
  * in x1
  * in:  x0 - core mask lsb of specified core
  * out: x0 = redistributor rd base address for specified core
  * uses x0, x1, x2
  */
get_gic_rd_base:
     /* get the 0-based core number */
    clz  w1, w0
    mov  w2, #0x20
    sub  w2, w2, w1
    sub  w2, w2, #1

     /* x2 = core number / loop counter */

    ldr  x0, =NXP_GICR_ADDR
    mov  x1, #GIC_RD_OFFSET
2:
    cbz  x2, 1f
    add  x0, x0, x1
    sub  x2, x2, #1
    b    2b
1:
    ret

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

 /* this function returns the redistributor base address for the core specified
  * in x1
  * in:  x0 - core mask lsb of specified core
  * out: x0 = redistributor sgi base address for specified core
  * uses x0, x1, x2
  */
get_gic_sgi_base:
     /* get the 0-based core number */
    clz  w1, w0
    mov  w2, #0x20
    sub  w2, w2, w1
    sub  w2, w2, #1

     /* x2 = core number / loop counter */

    ldr  x0, =NXP_GICR_SGI_ADDR
    mov  x1, #GIC_SGI_OFFSET
2:
    cbz  x2, 1f
    add  x0, x0, x1
    sub  x2, x2, #1
    b    2b
1:
    ret

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

 /* write a register in the RESET block
  * in:  x0 = offset
  * in:  w1 = value to write
  * uses x0, x1, x2
  */
_write_reg_reset:
    ldr  x2, =NXP_RESET_ADDR
    str  w1, [x2, x0]
    ret

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

 /* read a register in the RESET block
  * in:  x0 = offset
  * out: w0 = value read
  * uses x0, x1
  */
_read_reg_reset:
    ldr  x1, =NXP_RESET_ADDR
    ldr  w0, [x1, x0]
    ret

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

