/* Maynard Johnson
 * PPC64-specific code.
 *
 */

#include <sys/ucontext.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "libperfctr.h"
#include "arch.h"
#include "ppc64.h"

unsigned long ucontext_pc(const struct ucontext *uc)
{
    /* glibc-2.3.3 (YDL4) changed the type of uc->uc_mcontext,
     * breaking code which worked in glibc-2.3.1 (YDL3.0.1).
     * This formulation works with both, and is cleaner than
     * selecting glibc-2.3.3 specific code with "#ifdef NGREG".
     */
    return uc->uc_mcontext.regs->nip;
}

void do_setup(const struct perfctr_info *info,
	      struct perfctr_cpu_control *cpu_control)
{
    memset(cpu_control, 0, sizeof *cpu_control);

    cpu_control->tsc_on = 1;
    cpu_control->nractrs = 0;
    cpu_control->nrictrs = 1;
    cpu_control->pmc_map[0] = 3;

    /* FLOPS COMPLETED */
    if ((info->cpu_type == PERFCTR_PPC64_POWER4) ||
        (info->cpu_type == PERFCTR_PPC64_POWER4p)) {
	cpu_control->ppc64.mmcr0 = 0x00000810ULL;
	cpu_control->ppc64.mmcr1 = 0x00000000420E84A0ULL;
	cpu_control->ppc64.mmcra = 0x00002000ULL;
    } else if (info->cpu_type == PERFCTR_PPC64_POWER5) {
        cpu_control->ppc64.mmcr0 = 0x00000000ULL;
        cpu_control->ppc64.mmcr1 = 0x0000000020202010ULL;
        cpu_control->ppc64.mmcra = 0x00000000ULL;
    } else if (info->cpu_type == PERFCTR_PPC64_970 ||
	       info->cpu_type == PERFCTR_PPC64_970MP) {
        cpu_control->ppc64.mmcr0 = 0x00000000ULL;
        cpu_control->ppc64.mmcr1 = 0x00000000001E0480ULL;
        cpu_control->ppc64.mmcra = 0x00002000ULL;
    }

    /* not kernel mode, enable PMCj interrupts */
    cpu_control->ppc64.mmcr0 |= MMCR0_FCS | MMCR0_PMCjCE;

    /* overflow after 100 events */
    cpu_control->ireset[0] = 0x80000000 - 100;


}