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