Linux-libre 5.3.12-gnu
[librecmc/linux-libre.git] / arch / powerpc / boot / treeboot-currituck.c
1 // SPDX-License-Identifier: GPL-2.0-or-later
2 /*
3  * Copyright © 2011 Tony Breeds IBM Corporation
4  *
5  * Based on earlier code:
6  *   Copyright (C) Paul Mackerras 1997.
7  *
8  *   Matt Porter <mporter@kernel.crashing.org>
9  *   Copyright 2002-2005 MontaVista Software Inc.
10  *
11  *   Eugene Surovegin <eugene.surovegin@zultys.com> or <ebs@ebshome.net>
12  *   Copyright (c) 2003, 2004 Zultys Technologies
13  *
14  *    Copyright 2007 David Gibson, IBM Corporation.
15  *    Copyright 2010 Ben. Herrenschmidt, IBM Corporation.
16  *    Copyright © 2011 David Kleikamp IBM Corporation
17  */
18 #include <stdarg.h>
19 #include <stddef.h>
20 #include "types.h"
21 #include "elf.h"
22 #include "string.h"
23 #include "stdio.h"
24 #include "page.h"
25 #include "ops.h"
26 #include "reg.h"
27 #include "io.h"
28 #include "dcr.h"
29 #include "4xx.h"
30 #include "44x.h"
31 #include "libfdt.h"
32
33 BSS_STACK(4096);
34
35 #define MAX_RANKS       0x4
36 #define DDR3_MR0CF      0x80010011U
37
38 static unsigned long long ibm_currituck_memsize;
39 static unsigned long long ibm_currituck_detect_memsize(void)
40 {
41         u32 reg;
42         unsigned i;
43         unsigned long long memsize = 0;
44
45         for(i = 0; i < MAX_RANKS; i++){
46                 reg = mfdcrx(DDR3_MR0CF + i);
47
48                 if (!(reg & 1))
49                         continue;
50
51                 reg &= 0x0000f000;
52                 reg >>= 12;
53                 memsize += (0x800000ULL << reg);
54         }
55
56         return memsize;
57 }
58
59 static void ibm_currituck_fixups(void)
60 {
61         void *devp = finddevice("/");
62         u32 dma_ranges[7];
63
64         dt_fixup_memory(0x0ULL,  ibm_currituck_memsize);
65
66         while ((devp = find_node_by_devtype(devp, "pci"))) {
67                 if (getprop(devp, "dma-ranges", dma_ranges, sizeof(dma_ranges)) < 0) {
68                         printf("%s: Failed to get dma-ranges\r\n", __func__);
69                         continue;
70                 }
71
72                 dma_ranges[5] = ibm_currituck_memsize >> 32;
73                 dma_ranges[6] = ibm_currituck_memsize & 0xffffffffUL;
74
75                 setprop(devp, "dma-ranges", dma_ranges, sizeof(dma_ranges));
76         }
77 }
78
79 #define SPRN_PIR        0x11E   /* Processor Identification Register */
80 void platform_init(void)
81 {
82         unsigned long end_of_ram, avail_ram;
83         u32 pir_reg;
84         int node, size;
85         const u32 *timebase;
86
87         ibm_currituck_memsize = ibm_currituck_detect_memsize();
88         if (ibm_currituck_memsize >> 32)
89                 end_of_ram = ~0UL;
90         else
91                 end_of_ram = ibm_currituck_memsize;
92         avail_ram = end_of_ram - (unsigned long)_end;
93
94         simple_alloc_init(_end, avail_ram, 128, 64);
95         platform_ops.fixups = ibm_currituck_fixups;
96         platform_ops.exit = ibm44x_dbcr_reset;
97         pir_reg = mfspr(SPRN_PIR);
98
99         /* Make sure FDT blob is sane */
100         if (fdt_check_header(_dtb_start) != 0)
101                 fatal("Invalid device tree blob\n");
102
103         node = fdt_node_offset_by_prop_value(_dtb_start, -1, "device_type",
104                                              "cpu", sizeof("cpu"));
105         if (!node)
106                 fatal("Cannot find cpu node\n");
107         timebase = fdt_getprop(_dtb_start, node, "timebase-frequency", &size);
108         if (timebase && (size == 4))
109                 timebase_period_ns = 1000000000 / *timebase;
110
111         fdt_set_boot_cpuid_phys(_dtb_start, pir_reg);
112         fdt_init(_dtb_start);
113
114         serial_console_init();
115 }