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
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}

  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}