]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
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 | ||
18 | klinfo_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 | ||
46 | klinfo_t *find_first_component(lboard_t *brd, unsigned char struct_type) | |
47 | { | |
48 | return find_component(brd, (klinfo_t *)NULL, struct_type); | |
49 | } | |
50 | ||
51 | lboard_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 | ||
63 | lboard_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 | ||
76 | cnodeid_t get_cpu_cnode(cpuid_t cpu) | |
77 | { | |
78 | return CPUID_TO_COMPACT_NODEID(cpu); | |
79 | } | |
80 | ||
81 | klcpu_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 | ||
100 | klcpu_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 | ||
128 | int 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 | } |