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