1 // SPDX-License-Identifier: GPL-2.0
2 /*
3  * Copyright (C) 1999, 2000 Ralf Baechle (ralf@gnu.org)
4  * Copyright (C) 1999, 2000 Silicon Graphics, Inc.
5  */
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 klcpu_t *nasid_slice_to_cpuinfo(nasid_t nasid, int slice)
77 {
78 	lboard_t *brd;
79 	klcpu_t *acpu;
80 
81 	if (!(brd = find_lboard((lboard_t *)KL_CONFIG_INFO(nasid), KLTYPE_IP27)))
82 		return (klcpu_t *)NULL;
83 
84 	if (!(acpu = (klcpu_t *)find_first_component(brd, KLSTRUCT_CPU)))
85 		return (klcpu_t *)NULL;
86 
87 	do {
88 		if ((acpu->cpu_info.physid) == slice)
89 			return acpu;
90 	} while ((acpu = (klcpu_t *)find_component(brd, (klinfo_t *)acpu,
91 								KLSTRUCT_CPU)));
92 	return (klcpu_t *)NULL;
93 }
94 
95 klcpu_t *sn_get_cpuinfo(cpuid_t cpu)
96 {
97 	nasid_t nasid;
98 	int slice;
99 	klcpu_t *acpu;
100 
101 	if (!(cpu < MAXCPUS)) {
102 		printk("sn_get_cpuinfo: illegal cpuid 0x%lx\n", cpu);
103 		return NULL;
104 	}
105 
106 	nasid = cputonasid(cpu);
107 	if (nasid  == INVALID_NASID)
108 		return NULL;
109 
110 	for (slice = 0; slice < CPUS_PER_NODE; slice++) {
111 		acpu = nasid_slice_to_cpuinfo(nasid, slice);
112 		if (acpu && acpu->cpu_info.virtid == cpu)
113 			return acpu;
114 	}
115 	return NULL;
116 }
117 
118 int get_cpu_slice(cpuid_t cpu)
119 {
120 	klcpu_t *acpu;
121 
122 	if ((acpu = sn_get_cpuinfo(cpu)) == NULL)
123 		return -1;
124 	return acpu->cpu_info.physid;
125 }
126