LXR linux/arch/mips/sgi-ip27/ip27-klconfig.c

   1/*
   2 * Copyright (C) 1999, 2000 Ralf Baechle (ralf@gnu.org)
   3 * Copyright (C) 1999, 2000 Silicon Graphics, Inc.
   4 */
   5#include <linux/kernel.h>
   6#include <linux/sched.h>
   7#include <linux/interrupt.h>
   8#include <linux/kernel_stat.h>
   9#include <linux/param.h>
  10#include <linux/timex.h>
  11#include <linux/mm.h>
  12
  13#include <asm/sn/klconfig.h>
  14#include <asm/sn/arch.h>
  15#include <asm/sn/gda.h>
  16
  17klinfo_t *find_component(lboard_t *brd, klinfo_t *kli, unsigned char struct_type)
  18{
  19        int index, j;
  20
  21        if (kli == (klinfo_t *)NULL) {
  22                index = 0;
  23        } else {
  24                for (j = 0; j < KLCF_NUM_COMPS(brd); j++)
  25                        if (kli == KLCF_COMP(brd, j))
  26                                break;
  27                index = j;
  28                if (index == KLCF_NUM_COMPS(brd)) {
  29                        printk("find_component: Bad pointer: 0x%p\n", kli);
  30                        return (klinfo_t *)NULL;
  31                }
  32                index++;                /* next component */
  33        }
  34
  35        for (; index < KLCF_NUM_COMPS(brd); index++) {
  36                kli = KLCF_COMP(brd, index);
  37                if (KLCF_COMP_TYPE(kli) == struct_type)
  38                        return kli;
  39        }
  40
  41        /* Didn't find it. */
  42        return (klinfo_t *)NULL;
  43}
  44
  45klinfo_t *find_first_component(lboard_t *brd, unsigned char struct_type)
  46{
  47        return find_component(brd, (klinfo_t *)NULL, struct_type);
  48}
  49
  50lboard_t *find_lboard(lboard_t *start, unsigned char brd_type)
  51{
  52        /* Search all boards stored on this node. */
  53        while (start) {
  54                if (start->brd_type == brd_type)
  55                        return start;
  56                start = KLCF_NEXT(start);
  57        }
  58        /* Didn't find it. */
  59        return (lboard_t *)NULL;
  60}
  61
  62lboard_t *find_lboard_class(lboard_t *start, unsigned char brd_type)
  63{
  64        /* Search all boards stored on this node. */
  65        while (start) {
  66                if (KLCLASS(start->brd_type) == KLCLASS(brd_type))
  67                        return start;
  68                start = KLCF_NEXT(start);
  69        }
  70
  71        /* Didn't find it. */
  72        return (lboard_t *)NULL;
  73}
  74
  75cnodeid_t get_cpu_cnode(cpuid_t cpu)
  76{
  77        return CPUID_TO_COMPACT_NODEID(cpu);
  78}
  79
  80klcpu_t *nasid_slice_to_cpuinfo(nasid_t nasid, int slice)
  81{
  82        lboard_t *brd;
  83        klcpu_t *acpu;
  84
  85        if (!(brd = find_lboard((lboard_t *)KL_CONFIG_INFO(nasid), KLTYPE_IP27)))
  86                return (klcpu_t *)NULL;
  87
  88        if (!(acpu = (klcpu_t *)find_first_component(brd, KLSTRUCT_CPU)))
  89                return (klcpu_t *)NULL;
  90
  91        do {
  92                if ((acpu->cpu_info.physid) == slice)
  93                        return acpu;
  94        } while ((acpu = (klcpu_t *)find_component(brd, (klinfo_t *)acpu,
  95                                                                KLSTRUCT_CPU)));
  96        return (klcpu_t *)NULL;
  97}
  98
  99klcpu_t *sn_get_cpuinfo(cpuid_t cpu)
 100{
 101        nasid_t nasid;
 102        int slice;
 103        klcpu_t *acpu;
 104        gda_t *gdap = GDA;
 105        cnodeid_t cnode;
 106
 107        if (!(cpu < MAXCPUS)) {
 108                printk("sn_get_cpuinfo: illegal cpuid 0x%lx\n", cpu);
 109                return NULL;
 110        }
 111
 112        cnode = get_cpu_cnode(cpu);
 113        if (cnode == INVALID_CNODEID)
 114                return NULL;
 115
 116        if ((nasid = gdap->g_nasidtable[cnode]) == INVALID_NASID)
 117                return NULL;
 118
 119        for (slice = 0; slice < CPUS_PER_NODE; slice++) {
 120                acpu = nasid_slice_to_cpuinfo(nasid, slice);
 121                if (acpu && acpu->cpu_info.virtid == cpu)
 122                        return acpu;
 123        }
 124        return NULL;
 125}
 126
 127int get_cpu_slice(cpuid_t cpu)
 128{
 129        klcpu_t *acpu;
 130
 131        if ((acpu = sn_get_cpuinfo(cpu)) == NULL)
 132                return -1;
 133        return acpu->cpu_info.physid;
 134}
 135