Loading...
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Author: Xiang Gao <gaoxiang@loongson.cn>
4 * Huacai Chen <chenhuacai@loongson.cn>
5 *
6 * Copyright (C) 2020-2022 Loongson Technology Corporation Limited
7 */
8#include <linux/init.h>
9#include <linux/kernel.h>
10#include <linux/mm.h>
11#include <linux/mmzone.h>
12#include <linux/export.h>
13#include <linux/nodemask.h>
14#include <linux/swap.h>
15#include <linux/memblock.h>
16#include <linux/pfn.h>
17#include <linux/acpi.h>
18#include <linux/efi.h>
19#include <linux/irq.h>
20#include <linux/pci.h>
21#include <asm/bootinfo.h>
22#include <asm/loongson.h>
23#include <asm/numa.h>
24#include <asm/page.h>
25#include <asm/pgalloc.h>
26#include <asm/sections.h>
27#include <asm/time.h>
28
29int numa_off;
30struct pglist_data *node_data[MAX_NUMNODES];
31unsigned char node_distances[MAX_NUMNODES][MAX_NUMNODES];
32
33EXPORT_SYMBOL(node_data);
34EXPORT_SYMBOL(node_distances);
35
36static struct numa_meminfo numa_meminfo;
37cpumask_t cpus_on_node[MAX_NUMNODES];
38cpumask_t phys_cpus_on_node[MAX_NUMNODES];
39EXPORT_SYMBOL(cpus_on_node);
40
41/*
42 * apicid, cpu, node mappings
43 */
44s16 __cpuid_to_node[CONFIG_NR_CPUS] = {
45 [0 ... CONFIG_NR_CPUS - 1] = NUMA_NO_NODE
46};
47EXPORT_SYMBOL(__cpuid_to_node);
48
49nodemask_t numa_nodes_parsed __initdata;
50
51#ifdef CONFIG_HAVE_SETUP_PER_CPU_AREA
52unsigned long __per_cpu_offset[NR_CPUS] __read_mostly;
53EXPORT_SYMBOL(__per_cpu_offset);
54
55static int __init pcpu_cpu_to_node(int cpu)
56{
57 return early_cpu_to_node(cpu);
58}
59
60static int __init pcpu_cpu_distance(unsigned int from, unsigned int to)
61{
62 if (early_cpu_to_node(from) == early_cpu_to_node(to))
63 return LOCAL_DISTANCE;
64 else
65 return REMOTE_DISTANCE;
66}
67
68void __init pcpu_populate_pte(unsigned long addr)
69{
70 populate_kernel_pte(addr);
71}
72
73void __init setup_per_cpu_areas(void)
74{
75 unsigned long delta;
76 unsigned int cpu;
77 int rc = -EINVAL;
78
79 if (pcpu_chosen_fc == PCPU_FC_AUTO) {
80 if (nr_node_ids >= 8)
81 pcpu_chosen_fc = PCPU_FC_PAGE;
82 else
83 pcpu_chosen_fc = PCPU_FC_EMBED;
84 }
85
86 /*
87 * Always reserve area for module percpu variables. That's
88 * what the legacy allocator did.
89 */
90 if (pcpu_chosen_fc != PCPU_FC_PAGE) {
91 rc = pcpu_embed_first_chunk(PERCPU_MODULE_RESERVE,
92 PERCPU_DYNAMIC_RESERVE, PMD_SIZE,
93 pcpu_cpu_distance, pcpu_cpu_to_node);
94 if (rc < 0)
95 pr_warn("%s allocator failed (%d), falling back to page size\n",
96 pcpu_fc_names[pcpu_chosen_fc], rc);
97 }
98 if (rc < 0)
99 rc = pcpu_page_first_chunk(PERCPU_MODULE_RESERVE, pcpu_cpu_to_node);
100 if (rc < 0)
101 panic("cannot initialize percpu area (err=%d)", rc);
102
103 delta = (unsigned long)pcpu_base_addr - (unsigned long)__per_cpu_start;
104 for_each_possible_cpu(cpu)
105 __per_cpu_offset[cpu] = delta + pcpu_unit_offsets[cpu];
106}
107#endif
108
109/*
110 * Get nodeid by logical cpu number.
111 * __cpuid_to_node maps phyical cpu id to node, so we
112 * should use cpu_logical_map(cpu) to index it.
113 *
114 * This routine is only used in early phase during
115 * booting, after setup_per_cpu_areas calling and numa_node
116 * initialization, cpu_to_node will be used instead.
117 */
118int early_cpu_to_node(int cpu)
119{
120 int physid = cpu_logical_map(cpu);
121
122 if (physid < 0)
123 return NUMA_NO_NODE;
124
125 return __cpuid_to_node[physid];
126}
127
128void __init early_numa_add_cpu(int cpuid, s16 node)
129{
130 int cpu = __cpu_number_map[cpuid];
131
132 if (cpu < 0)
133 return;
134
135 cpumask_set_cpu(cpu, &cpus_on_node[node]);
136 cpumask_set_cpu(cpuid, &phys_cpus_on_node[node]);
137}
138
139void numa_add_cpu(unsigned int cpu)
140{
141 int nid = cpu_to_node(cpu);
142 cpumask_set_cpu(cpu, &cpus_on_node[nid]);
143}
144
145void numa_remove_cpu(unsigned int cpu)
146{
147 int nid = cpu_to_node(cpu);
148 cpumask_clear_cpu(cpu, &cpus_on_node[nid]);
149}
150
151static int __init numa_add_memblk_to(int nid, u64 start, u64 end,
152 struct numa_meminfo *mi)
153{
154 /* ignore zero length blks */
155 if (start == end)
156 return 0;
157
158 /* whine about and ignore invalid blks */
159 if (start > end || nid < 0 || nid >= MAX_NUMNODES) {
160 pr_warn("NUMA: Warning: invalid memblk node %d [mem %#010Lx-%#010Lx]\n",
161 nid, start, end - 1);
162 return 0;
163 }
164
165 if (mi->nr_blks >= NR_NODE_MEMBLKS) {
166 pr_err("NUMA: too many memblk ranges\n");
167 return -EINVAL;
168 }
169
170 mi->blk[mi->nr_blks].start = PFN_ALIGN(start);
171 mi->blk[mi->nr_blks].end = PFN_ALIGN(end - PAGE_SIZE + 1);
172 mi->blk[mi->nr_blks].nid = nid;
173 mi->nr_blks++;
174 return 0;
175}
176
177/**
178 * numa_add_memblk - Add one numa_memblk to numa_meminfo
179 * @nid: NUMA node ID of the new memblk
180 * @start: Start address of the new memblk
181 * @end: End address of the new memblk
182 *
183 * Add a new memblk to the default numa_meminfo.
184 *
185 * RETURNS:
186 * 0 on success, -errno on failure.
187 */
188int __init numa_add_memblk(int nid, u64 start, u64 end)
189{
190 return numa_add_memblk_to(nid, start, end, &numa_meminfo);
191}
192
193static void __init alloc_node_data(int nid)
194{
195 void *nd;
196 unsigned long nd_pa;
197 size_t nd_sz = roundup(sizeof(pg_data_t), PAGE_SIZE);
198
199 nd_pa = memblock_phys_alloc_try_nid(nd_sz, SMP_CACHE_BYTES, nid);
200 if (!nd_pa) {
201 pr_err("Cannot find %zu Byte for node_data (initial node: %d)\n", nd_sz, nid);
202 return;
203 }
204
205 nd = __va(nd_pa);
206
207 node_data[nid] = nd;
208 memset(nd, 0, sizeof(pg_data_t));
209}
210
211static void __init node_mem_init(unsigned int node)
212{
213 unsigned long start_pfn, end_pfn;
214 unsigned long node_addrspace_offset;
215
216 node_addrspace_offset = nid_to_addrbase(node);
217 pr_info("Node%d's addrspace_offset is 0x%lx\n",
218 node, node_addrspace_offset);
219
220 get_pfn_range_for_nid(node, &start_pfn, &end_pfn);
221 pr_info("Node%d: start_pfn=0x%lx, end_pfn=0x%lx\n",
222 node, start_pfn, end_pfn);
223
224 alloc_node_data(node);
225}
226
227#ifdef CONFIG_ACPI_NUMA
228
229static void __init add_node_intersection(u32 node, u64 start, u64 size, u32 type)
230{
231 static unsigned long num_physpages;
232
233 num_physpages += (size >> PAGE_SHIFT);
234 pr_info("Node%d: mem_type:%d, mem_start:0x%llx, mem_size:0x%llx Bytes\n",
235 node, type, start, size);
236 pr_info(" start_pfn:0x%llx, end_pfn:0x%llx, num_physpages:0x%lx\n",
237 start >> PAGE_SHIFT, (start + size) >> PAGE_SHIFT, num_physpages);
238 memblock_set_node(start, size, &memblock.memory, node);
239}
240
241/*
242 * add_numamem_region
243 *
244 * Add a uasable memory region described by BIOS. The
245 * routine gets each intersection between BIOS's region
246 * and node's region, and adds them into node's memblock
247 * pool.
248 *
249 */
250static void __init add_numamem_region(u64 start, u64 end, u32 type)
251{
252 u32 i;
253 u64 ofs = start;
254
255 if (start >= end) {
256 pr_debug("Invalid region: %016llx-%016llx\n", start, end);
257 return;
258 }
259
260 for (i = 0; i < numa_meminfo.nr_blks; i++) {
261 struct numa_memblk *mb = &numa_meminfo.blk[i];
262
263 if (ofs > mb->end)
264 continue;
265
266 if (end > mb->end) {
267 add_node_intersection(mb->nid, ofs, mb->end - ofs, type);
268 ofs = mb->end;
269 } else {
270 add_node_intersection(mb->nid, ofs, end - ofs, type);
271 break;
272 }
273 }
274}
275
276static void __init init_node_memblock(void)
277{
278 u32 mem_type;
279 u64 mem_end, mem_start, mem_size;
280 efi_memory_desc_t *md;
281
282 /* Parse memory information and activate */
283 for_each_efi_memory_desc(md) {
284 mem_type = md->type;
285 mem_start = md->phys_addr;
286 mem_size = md->num_pages << EFI_PAGE_SHIFT;
287 mem_end = mem_start + mem_size;
288
289 switch (mem_type) {
290 case EFI_LOADER_CODE:
291 case EFI_LOADER_DATA:
292 case EFI_BOOT_SERVICES_CODE:
293 case EFI_BOOT_SERVICES_DATA:
294 case EFI_PERSISTENT_MEMORY:
295 case EFI_CONVENTIONAL_MEMORY:
296 add_numamem_region(mem_start, mem_end, mem_type);
297 break;
298 case EFI_PAL_CODE:
299 case EFI_UNUSABLE_MEMORY:
300 case EFI_ACPI_RECLAIM_MEMORY:
301 add_numamem_region(mem_start, mem_end, mem_type);
302 fallthrough;
303 case EFI_RESERVED_TYPE:
304 case EFI_RUNTIME_SERVICES_CODE:
305 case EFI_RUNTIME_SERVICES_DATA:
306 case EFI_MEMORY_MAPPED_IO:
307 case EFI_MEMORY_MAPPED_IO_PORT_SPACE:
308 pr_info("Resvd: mem_type:%d, mem_start:0x%llx, mem_size:0x%llx Bytes\n",
309 mem_type, mem_start, mem_size);
310 break;
311 }
312 }
313}
314
315static void __init numa_default_distance(void)
316{
317 int row, col;
318
319 for (row = 0; row < MAX_NUMNODES; row++)
320 for (col = 0; col < MAX_NUMNODES; col++) {
321 if (col == row)
322 node_distances[row][col] = LOCAL_DISTANCE;
323 else
324 /* We assume that one node per package here!
325 *
326 * A SLIT should be used for multiple nodes
327 * per package to override default setting.
328 */
329 node_distances[row][col] = REMOTE_DISTANCE;
330 }
331}
332
333/*
334 * fake_numa_init() - For Non-ACPI systems
335 * Return: 0 on success, -errno on failure.
336 */
337static int __init fake_numa_init(void)
338{
339 phys_addr_t start = memblock_start_of_DRAM();
340 phys_addr_t end = memblock_end_of_DRAM() - 1;
341
342 node_set(0, numa_nodes_parsed);
343 pr_info("Faking a node at [mem %pap-%pap]\n", &start, &end);
344
345 return numa_add_memblk(0, start, end + 1);
346}
347
348int __init init_numa_memory(void)
349{
350 int i;
351 int ret;
352 int node;
353
354 for (i = 0; i < NR_CPUS; i++)
355 set_cpuid_to_node(i, NUMA_NO_NODE);
356
357 numa_default_distance();
358 nodes_clear(numa_nodes_parsed);
359 nodes_clear(node_possible_map);
360 nodes_clear(node_online_map);
361 memset(&numa_meminfo, 0, sizeof(numa_meminfo));
362
363 /* Parse SRAT and SLIT if provided by firmware. */
364 ret = acpi_disabled ? fake_numa_init() : acpi_numa_init();
365 if (ret < 0)
366 return ret;
367
368 node_possible_map = numa_nodes_parsed;
369 if (WARN_ON(nodes_empty(node_possible_map)))
370 return -EINVAL;
371
372 init_node_memblock();
373 if (!memblock_validate_numa_coverage(SZ_1M))
374 return -EINVAL;
375
376 for_each_node_mask(node, node_possible_map) {
377 node_mem_init(node);
378 node_set_online(node);
379 }
380 max_low_pfn = PHYS_PFN(memblock_end_of_DRAM());
381
382 setup_nr_node_ids();
383 loongson_sysconf.nr_nodes = nr_node_ids;
384 loongson_sysconf.cores_per_node = cpumask_weight(&phys_cpus_on_node[0]);
385
386 return 0;
387}
388
389#endif
390
391void __init paging_init(void)
392{
393 unsigned int node;
394 unsigned long zones_size[MAX_NR_ZONES] = {0, };
395
396 for_each_online_node(node) {
397 unsigned long start_pfn, end_pfn;
398
399 get_pfn_range_for_nid(node, &start_pfn, &end_pfn);
400
401 if (end_pfn > max_low_pfn)
402 max_low_pfn = end_pfn;
403 }
404#ifdef CONFIG_ZONE_DMA32
405 zones_size[ZONE_DMA32] = MAX_DMA32_PFN;
406#endif
407 zones_size[ZONE_NORMAL] = max_low_pfn;
408 free_area_init(zones_size);
409}
410
411void __init mem_init(void)
412{
413 high_memory = (void *) __va(max_low_pfn << PAGE_SHIFT);
414 memblock_free_all();
415}
416
417int pcibus_to_node(struct pci_bus *bus)
418{
419 return dev_to_node(&bus->dev);
420}
421EXPORT_SYMBOL(pcibus_to_node);
1// SPDX-License-Identifier: GPL-2.0
2/*
3 * Author: Xiang Gao <gaoxiang@loongson.cn>
4 * Huacai Chen <chenhuacai@loongson.cn>
5 *
6 * Copyright (C) 2020-2022 Loongson Technology Corporation Limited
7 */
8#include <linux/init.h>
9#include <linux/kernel.h>
10#include <linux/mm.h>
11#include <linux/mmzone.h>
12#include <linux/export.h>
13#include <linux/nodemask.h>
14#include <linux/swap.h>
15#include <linux/memblock.h>
16#include <linux/pfn.h>
17#include <linux/acpi.h>
18#include <linux/efi.h>
19#include <linux/irq.h>
20#include <linux/pci.h>
21#include <asm/bootinfo.h>
22#include <asm/loongson.h>
23#include <asm/numa.h>
24#include <asm/page.h>
25#include <asm/pgalloc.h>
26#include <asm/sections.h>
27#include <asm/time.h>
28
29int numa_off;
30struct pglist_data *node_data[MAX_NUMNODES];
31unsigned char node_distances[MAX_NUMNODES][MAX_NUMNODES];
32
33EXPORT_SYMBOL(node_data);
34EXPORT_SYMBOL(node_distances);
35
36static struct numa_meminfo numa_meminfo;
37cpumask_t cpus_on_node[MAX_NUMNODES];
38cpumask_t phys_cpus_on_node[MAX_NUMNODES];
39EXPORT_SYMBOL(cpus_on_node);
40
41/*
42 * apicid, cpu, node mappings
43 */
44s16 __cpuid_to_node[CONFIG_NR_CPUS] = {
45 [0 ... CONFIG_NR_CPUS - 1] = NUMA_NO_NODE
46};
47EXPORT_SYMBOL(__cpuid_to_node);
48
49nodemask_t numa_nodes_parsed __initdata;
50
51#ifdef CONFIG_HAVE_SETUP_PER_CPU_AREA
52unsigned long __per_cpu_offset[NR_CPUS] __read_mostly;
53EXPORT_SYMBOL(__per_cpu_offset);
54
55static int __init pcpu_cpu_to_node(int cpu)
56{
57 return early_cpu_to_node(cpu);
58}
59
60static int __init pcpu_cpu_distance(unsigned int from, unsigned int to)
61{
62 if (early_cpu_to_node(from) == early_cpu_to_node(to))
63 return LOCAL_DISTANCE;
64 else
65 return REMOTE_DISTANCE;
66}
67
68void __init pcpu_populate_pte(unsigned long addr)
69{
70 pgd_t *pgd = pgd_offset_k(addr);
71 p4d_t *p4d = p4d_offset(pgd, addr);
72 pud_t *pud;
73 pmd_t *pmd;
74
75 if (p4d_none(*p4d)) {
76 pud_t *new;
77
78 new = memblock_alloc(PAGE_SIZE, PAGE_SIZE);
79 pgd_populate(&init_mm, pgd, new);
80#ifndef __PAGETABLE_PUD_FOLDED
81 pud_init(new);
82#endif
83 }
84
85 pud = pud_offset(p4d, addr);
86 if (pud_none(*pud)) {
87 pmd_t *new;
88
89 new = memblock_alloc(PAGE_SIZE, PAGE_SIZE);
90 pud_populate(&init_mm, pud, new);
91#ifndef __PAGETABLE_PMD_FOLDED
92 pmd_init(new);
93#endif
94 }
95
96 pmd = pmd_offset(pud, addr);
97 if (!pmd_present(*pmd)) {
98 pte_t *new;
99
100 new = memblock_alloc(PAGE_SIZE, PAGE_SIZE);
101 pmd_populate_kernel(&init_mm, pmd, new);
102 }
103}
104
105void __init setup_per_cpu_areas(void)
106{
107 unsigned long delta;
108 unsigned int cpu;
109 int rc = -EINVAL;
110
111 if (pcpu_chosen_fc == PCPU_FC_AUTO) {
112 if (nr_node_ids >= 8)
113 pcpu_chosen_fc = PCPU_FC_PAGE;
114 else
115 pcpu_chosen_fc = PCPU_FC_EMBED;
116 }
117
118 /*
119 * Always reserve area for module percpu variables. That's
120 * what the legacy allocator did.
121 */
122 if (pcpu_chosen_fc != PCPU_FC_PAGE) {
123 rc = pcpu_embed_first_chunk(PERCPU_MODULE_RESERVE,
124 PERCPU_DYNAMIC_RESERVE, PMD_SIZE,
125 pcpu_cpu_distance, pcpu_cpu_to_node);
126 if (rc < 0)
127 pr_warn("%s allocator failed (%d), falling back to page size\n",
128 pcpu_fc_names[pcpu_chosen_fc], rc);
129 }
130 if (rc < 0)
131 rc = pcpu_page_first_chunk(PERCPU_MODULE_RESERVE, pcpu_cpu_to_node);
132 if (rc < 0)
133 panic("cannot initialize percpu area (err=%d)", rc);
134
135 delta = (unsigned long)pcpu_base_addr - (unsigned long)__per_cpu_start;
136 for_each_possible_cpu(cpu)
137 __per_cpu_offset[cpu] = delta + pcpu_unit_offsets[cpu];
138}
139#endif
140
141/*
142 * Get nodeid by logical cpu number.
143 * __cpuid_to_node maps phyical cpu id to node, so we
144 * should use cpu_logical_map(cpu) to index it.
145 *
146 * This routine is only used in early phase during
147 * booting, after setup_per_cpu_areas calling and numa_node
148 * initialization, cpu_to_node will be used instead.
149 */
150int early_cpu_to_node(int cpu)
151{
152 int physid = cpu_logical_map(cpu);
153
154 if (physid < 0)
155 return NUMA_NO_NODE;
156
157 return __cpuid_to_node[physid];
158}
159
160void __init early_numa_add_cpu(int cpuid, s16 node)
161{
162 int cpu = __cpu_number_map[cpuid];
163
164 if (cpu < 0)
165 return;
166
167 cpumask_set_cpu(cpu, &cpus_on_node[node]);
168 cpumask_set_cpu(cpuid, &phys_cpus_on_node[node]);
169}
170
171void numa_add_cpu(unsigned int cpu)
172{
173 int nid = cpu_to_node(cpu);
174 cpumask_set_cpu(cpu, &cpus_on_node[nid]);
175}
176
177void numa_remove_cpu(unsigned int cpu)
178{
179 int nid = cpu_to_node(cpu);
180 cpumask_clear_cpu(cpu, &cpus_on_node[nid]);
181}
182
183static int __init numa_add_memblk_to(int nid, u64 start, u64 end,
184 struct numa_meminfo *mi)
185{
186 /* ignore zero length blks */
187 if (start == end)
188 return 0;
189
190 /* whine about and ignore invalid blks */
191 if (start > end || nid < 0 || nid >= MAX_NUMNODES) {
192 pr_warn("NUMA: Warning: invalid memblk node %d [mem %#010Lx-%#010Lx]\n",
193 nid, start, end - 1);
194 return 0;
195 }
196
197 if (mi->nr_blks >= NR_NODE_MEMBLKS) {
198 pr_err("NUMA: too many memblk ranges\n");
199 return -EINVAL;
200 }
201
202 mi->blk[mi->nr_blks].start = PFN_ALIGN(start);
203 mi->blk[mi->nr_blks].end = PFN_ALIGN(end - PAGE_SIZE + 1);
204 mi->blk[mi->nr_blks].nid = nid;
205 mi->nr_blks++;
206 return 0;
207}
208
209/**
210 * numa_add_memblk - Add one numa_memblk to numa_meminfo
211 * @nid: NUMA node ID of the new memblk
212 * @start: Start address of the new memblk
213 * @end: End address of the new memblk
214 *
215 * Add a new memblk to the default numa_meminfo.
216 *
217 * RETURNS:
218 * 0 on success, -errno on failure.
219 */
220int __init numa_add_memblk(int nid, u64 start, u64 end)
221{
222 return numa_add_memblk_to(nid, start, end, &numa_meminfo);
223}
224
225static void __init alloc_node_data(int nid)
226{
227 void *nd;
228 unsigned long nd_pa;
229 size_t nd_sz = roundup(sizeof(pg_data_t), PAGE_SIZE);
230
231 nd_pa = memblock_phys_alloc_try_nid(nd_sz, SMP_CACHE_BYTES, nid);
232 if (!nd_pa) {
233 pr_err("Cannot find %zu Byte for node_data (initial node: %d)\n", nd_sz, nid);
234 return;
235 }
236
237 nd = __va(nd_pa);
238
239 node_data[nid] = nd;
240 memset(nd, 0, sizeof(pg_data_t));
241}
242
243static void __init node_mem_init(unsigned int node)
244{
245 unsigned long start_pfn, end_pfn;
246 unsigned long node_addrspace_offset;
247
248 node_addrspace_offset = nid_to_addrbase(node);
249 pr_info("Node%d's addrspace_offset is 0x%lx\n",
250 node, node_addrspace_offset);
251
252 get_pfn_range_for_nid(node, &start_pfn, &end_pfn);
253 pr_info("Node%d: start_pfn=0x%lx, end_pfn=0x%lx\n",
254 node, start_pfn, end_pfn);
255
256 alloc_node_data(node);
257}
258
259#ifdef CONFIG_ACPI_NUMA
260
261/*
262 * Sanity check to catch more bad NUMA configurations (they are amazingly
263 * common). Make sure the nodes cover all memory.
264 */
265static bool __init numa_meminfo_cover_memory(const struct numa_meminfo *mi)
266{
267 int i;
268 u64 numaram, biosram;
269
270 numaram = 0;
271 for (i = 0; i < mi->nr_blks; i++) {
272 u64 s = mi->blk[i].start >> PAGE_SHIFT;
273 u64 e = mi->blk[i].end >> PAGE_SHIFT;
274
275 numaram += e - s;
276 numaram -= __absent_pages_in_range(mi->blk[i].nid, s, e);
277 if ((s64)numaram < 0)
278 numaram = 0;
279 }
280 max_pfn = max_low_pfn;
281 biosram = max_pfn - absent_pages_in_range(0, max_pfn);
282
283 BUG_ON((s64)(biosram - numaram) >= (1 << (20 - PAGE_SHIFT)));
284 return true;
285}
286
287static void __init add_node_intersection(u32 node, u64 start, u64 size, u32 type)
288{
289 static unsigned long num_physpages;
290
291 num_physpages += (size >> PAGE_SHIFT);
292 pr_info("Node%d: mem_type:%d, mem_start:0x%llx, mem_size:0x%llx Bytes\n",
293 node, type, start, size);
294 pr_info(" start_pfn:0x%llx, end_pfn:0x%llx, num_physpages:0x%lx\n",
295 start >> PAGE_SHIFT, (start + size) >> PAGE_SHIFT, num_physpages);
296 memblock_set_node(start, size, &memblock.memory, node);
297}
298
299/*
300 * add_numamem_region
301 *
302 * Add a uasable memory region described by BIOS. The
303 * routine gets each intersection between BIOS's region
304 * and node's region, and adds them into node's memblock
305 * pool.
306 *
307 */
308static void __init add_numamem_region(u64 start, u64 end, u32 type)
309{
310 u32 i;
311 u64 ofs = start;
312
313 if (start >= end) {
314 pr_debug("Invalid region: %016llx-%016llx\n", start, end);
315 return;
316 }
317
318 for (i = 0; i < numa_meminfo.nr_blks; i++) {
319 struct numa_memblk *mb = &numa_meminfo.blk[i];
320
321 if (ofs > mb->end)
322 continue;
323
324 if (end > mb->end) {
325 add_node_intersection(mb->nid, ofs, mb->end - ofs, type);
326 ofs = mb->end;
327 } else {
328 add_node_intersection(mb->nid, ofs, end - ofs, type);
329 break;
330 }
331 }
332}
333
334static void __init init_node_memblock(void)
335{
336 u32 mem_type;
337 u64 mem_end, mem_start, mem_size;
338 efi_memory_desc_t *md;
339
340 /* Parse memory information and activate */
341 for_each_efi_memory_desc(md) {
342 mem_type = md->type;
343 mem_start = md->phys_addr;
344 mem_size = md->num_pages << EFI_PAGE_SHIFT;
345 mem_end = mem_start + mem_size;
346
347 switch (mem_type) {
348 case EFI_LOADER_CODE:
349 case EFI_LOADER_DATA:
350 case EFI_BOOT_SERVICES_CODE:
351 case EFI_BOOT_SERVICES_DATA:
352 case EFI_PERSISTENT_MEMORY:
353 case EFI_CONVENTIONAL_MEMORY:
354 add_numamem_region(mem_start, mem_end, mem_type);
355 break;
356 case EFI_PAL_CODE:
357 case EFI_UNUSABLE_MEMORY:
358 case EFI_ACPI_RECLAIM_MEMORY:
359 add_numamem_region(mem_start, mem_end, mem_type);
360 fallthrough;
361 case EFI_RESERVED_TYPE:
362 case EFI_RUNTIME_SERVICES_CODE:
363 case EFI_RUNTIME_SERVICES_DATA:
364 case EFI_MEMORY_MAPPED_IO:
365 case EFI_MEMORY_MAPPED_IO_PORT_SPACE:
366 pr_info("Resvd: mem_type:%d, mem_start:0x%llx, mem_size:0x%llx Bytes\n",
367 mem_type, mem_start, mem_size);
368 break;
369 }
370 }
371}
372
373static void __init numa_default_distance(void)
374{
375 int row, col;
376
377 for (row = 0; row < MAX_NUMNODES; row++)
378 for (col = 0; col < MAX_NUMNODES; col++) {
379 if (col == row)
380 node_distances[row][col] = LOCAL_DISTANCE;
381 else
382 /* We assume that one node per package here!
383 *
384 * A SLIT should be used for multiple nodes
385 * per package to override default setting.
386 */
387 node_distances[row][col] = REMOTE_DISTANCE;
388 }
389}
390
391/*
392 * fake_numa_init() - For Non-ACPI systems
393 * Return: 0 on success, -errno on failure.
394 */
395static int __init fake_numa_init(void)
396{
397 phys_addr_t start = memblock_start_of_DRAM();
398 phys_addr_t end = memblock_end_of_DRAM() - 1;
399
400 node_set(0, numa_nodes_parsed);
401 pr_info("Faking a node at [mem %pap-%pap]\n", &start, &end);
402
403 return numa_add_memblk(0, start, end + 1);
404}
405
406int __init init_numa_memory(void)
407{
408 int i;
409 int ret;
410 int node;
411
412 for (i = 0; i < NR_CPUS; i++)
413 set_cpuid_to_node(i, NUMA_NO_NODE);
414
415 numa_default_distance();
416 nodes_clear(numa_nodes_parsed);
417 nodes_clear(node_possible_map);
418 nodes_clear(node_online_map);
419 memset(&numa_meminfo, 0, sizeof(numa_meminfo));
420
421 /* Parse SRAT and SLIT if provided by firmware. */
422 ret = acpi_disabled ? fake_numa_init() : acpi_numa_init();
423 if (ret < 0)
424 return ret;
425
426 node_possible_map = numa_nodes_parsed;
427 if (WARN_ON(nodes_empty(node_possible_map)))
428 return -EINVAL;
429
430 init_node_memblock();
431 if (numa_meminfo_cover_memory(&numa_meminfo) == false)
432 return -EINVAL;
433
434 for_each_node_mask(node, node_possible_map) {
435 node_mem_init(node);
436 node_set_online(node);
437 }
438 max_low_pfn = PHYS_PFN(memblock_end_of_DRAM());
439
440 setup_nr_node_ids();
441 loongson_sysconf.nr_nodes = nr_node_ids;
442 loongson_sysconf.cores_per_node = cpumask_weight(&phys_cpus_on_node[0]);
443
444 return 0;
445}
446
447#endif
448
449void __init paging_init(void)
450{
451 unsigned int node;
452 unsigned long zones_size[MAX_NR_ZONES] = {0, };
453
454 for_each_online_node(node) {
455 unsigned long start_pfn, end_pfn;
456
457 get_pfn_range_for_nid(node, &start_pfn, &end_pfn);
458
459 if (end_pfn > max_low_pfn)
460 max_low_pfn = end_pfn;
461 }
462#ifdef CONFIG_ZONE_DMA32
463 zones_size[ZONE_DMA32] = MAX_DMA32_PFN;
464#endif
465 zones_size[ZONE_NORMAL] = max_low_pfn;
466 free_area_init(zones_size);
467}
468
469void __init mem_init(void)
470{
471 high_memory = (void *) __va(get_num_physpages() << PAGE_SHIFT);
472 memblock_free_all();
473 setup_zero_pages(); /* This comes from node 0 */
474}
475
476int pcibus_to_node(struct pci_bus *bus)
477{
478 return dev_to_node(&bus->dev);
479}
480EXPORT_SYMBOL(pcibus_to_node);