/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (the "License").
 * You may not use this file except in compliance with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */

/*
 * Copyright 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#pragma ident   "%Z%%M% %I%     %E% SMI"

#include <sys/promif_impl.h>
#include <sys/machsystm.h>
#include <sys/hypervisor_api.h>
#include <sys/lpad.h>

extern int (*prom_cif_handler)(void *);
extern int cif_cpu_mp_ready;

int
promif_set_mmfsa_traptable(void *p)
{
        cell_t          *ci = (cell_t *)p;
        uint64_t        rtba;
        caddr_t         tba;
        uint64_t        mmfsa_ra;
        int             rv, ret;

        ASSERT(ci[1] == 2);

        /*
         * We use the same trap table for the rtba as well.
         */
        rtba = va_to_pa(p1275_cell2ptr(ci[3]));

        /*
         * if cif_cpu_mp_ready is not set the prom is still
         * setting the mmfsa and trap table. Set the rtba
         * after the prom cif call.
         */
        if (!cif_cpu_mp_ready) {
                ret = (*prom_cif_handler)(p);
                if ((rv = hv_cpu_set_rtba(&rtba)) != H_EOK)
                        panic("hv_cpu_set_rtba failed: %d\n", rv);
                return (ret);
        }

        tba = p1275_cell2ptr(ci[3]);
        mmfsa_ra = (uint64_t)p1275_cell2ptr(ci[4]);

        if (tba != (caddr_t)KERNELBASE)
                return (-1);

        (void) set_tba(tba);

        if ((rv = hv_mmu_fault_area_conf(&mmfsa_ra)) != H_EOK) {
                panic("hv_mmu_fault_area_conf failed: %d\n", rv);
        }

        if ((rv = hv_cpu_set_rtba(&rtba)) != H_EOK) {
                panic("hv_cpu_set_rtba failed: %d\n", rv);
        }

        return (0);
}

int
promif_start_cpu(void *p)
{
        cell_t          *ci = (cell_t *)p;
        int             cpuid;
        caddr_t         pc;
        int             arg;
        uint64_t        rtba = 0;
        int             rv;
        uint64_t        *lpp;

        ASSERT(ci[1] == 3);

        cpuid = p1275_cell2int(ci[3]);
        pc = p1275_cell2ptr(ci[4]);
        arg = p1275_cell2int(ci[5]);

        if (!cif_cpu_mp_ready)
                return ((*prom_cif_handler)(p));

        rtba = va_to_pa(&trap_table);

        lpp = lpad_setup(cpuid, (uint64_t)pc, (uint64_t)arg);

        ASSERT(lpp);

        pc = (caddr_t)lpp;

        rv = hv_cpu_start(cpuid, va_to_pa(pc), rtba, cpuid);

        if (rv != H_EOK) {
                panic("promif_start_cpu: failed to start cpu %d (%d)\n",
                    cpuid, rv);
        }

        ci[6] = p1275_int2cell(rv);

        return (0);
}