ip27-klconfig.c

Go to the documentation of this file.

/*
 * Copyright (C) 1999, 2000 Ralf Baechle ([email protected])
 * Copyright (C) 1999, 2000 Silicon Graphics, Inc.
 */
#include <linux/init.h>
#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/interrupt.h>
#include <linux/kernel_stat.h>
#include <linux/param.h>
#include <linux/timex.h>
#include <linux/mm.h>

#include <asm/sn/klconfig.h>
#include <asm/sn/arch.h>
#include <asm/sn/gda.h>

klinfo_t *find_component(lboard_t *brd, klinfo_t *kli, unsigned char struct_type)
{
    int index, j;

    if (kli == (klinfo_t *)NULL) {
        index = 0;
    } else {
        for (j = 0; j < KLCF_NUM_COMPS(brd); j++)
            if (kli == KLCF_COMP(brd, j))
                break;
        index = j;
        if (index == KLCF_NUM_COMPS(brd)) {
            printk("find_component: Bad pointer: 0x%p\n", kli);
            return (klinfo_t *)NULL;
        }
        index++;        /* next component */
    }

    for (; index < KLCF_NUM_COMPS(brd); index++) {
        kli = KLCF_COMP(brd, index);
        if (KLCF_COMP_TYPE(kli) == struct_type)
            return kli;
    }

    /* Didn't find it. */
    return (klinfo_t *)NULL;
}

klinfo_t *find_first_component(lboard_t *brd, unsigned char struct_type)
{
    return find_component(brd, (klinfo_t *)NULL, struct_type);
}

lboard_t *find_lboard(lboard_t *start, unsigned char brd_type)
{
    /* Search all boards stored on this node. */
    while (start) {
        if (start->brd_type == brd_type)
            return start;
        start = KLCF_NEXT(start);
    }
    /* Didn't find it. */
    return (lboard_t *)NULL;
}

lboard_t *find_lboard_class(lboard_t *start, unsigned char brd_type)
{
    /* Search all boards stored on this node. */
    while (start) {
        if (KLCLASS(start->brd_type) == KLCLASS(brd_type))
            return start;
        start = KLCF_NEXT(start);
    }

    /* Didn't find it. */
    return (lboard_t *)NULL;
}

cnodeid_t get_cpu_cnode(cpuid_t cpu)
{
    return CPUID_TO_COMPACT_NODEID(cpu);
}

klcpu_t *nasid_slice_to_cpuinfo(nasid_t nasid, int slice)
{
    lboard_t *brd;
    klcpu_t *acpu;

    if (!(brd = find_lboard((lboard_t *)KL_CONFIG_INFO(nasid), KLTYPE_IP27)))
        return (klcpu_t *)NULL;

    if (!(acpu = (klcpu_t *)find_first_component(brd, KLSTRUCT_CPU)))
        return (klcpu_t *)NULL;

    do {
        if ((acpu->cpu_info.physid) == slice)
            return acpu;
    } while ((acpu = (klcpu_t *)find_component(brd, (klinfo_t *)acpu,
                                KLSTRUCT_CPU)));
    return (klcpu_t *)NULL;
}

klcpu_t *sn_get_cpuinfo(cpuid_t cpu)
{
    nasid_t nasid;
    int slice;
    klcpu_t *acpu;
    gda_t *gdap = GDA;
    cnodeid_t cnode;

    if (!(cpu < MAXCPUS)) {
        printk("sn_get_cpuinfo: illegal cpuid 0x%lx\n", cpu);
        return NULL;
    }

    cnode = get_cpu_cnode(cpu);
    if (cnode == INVALID_CNODEID)
        return NULL;

    if ((nasid = gdap->g_nasidtable[cnode]) == INVALID_NASID)
        return NULL;

    for (slice = 0; slice < CPUS_PER_NODE; slice++) {
        acpu = nasid_slice_to_cpuinfo(nasid, slice);
        if (acpu && acpu->cpu_info.virtid == cpu)
            return acpu;
    }
    return NULL;
}

int get_cpu_slice(cpuid_t cpu)
{
    klcpu_t *acpu;

    if ((acpu = sn_get_cpuinfo(cpu)) == NULL)
        return -1;
    return acpu->cpu_info.physid;
}