1 // SPDX-License-Identifier: GPL-2.0 2 /* 3 * Architecture specific OF callbacks. 4 */ 5 #include <linux/export.h> 6 #include <linux/io.h> 7 #include <linux/interrupt.h> 8 #include <linux/list.h> 9 #include <linux/of.h> 10 #include <linux/of_fdt.h> 11 #include <linux/of_address.h> 12 #include <linux/of_platform.h> 13 #include <linux/of_irq.h> 14 #include <linux/libfdt.h> 15 #include <linux/slab.h> 16 #include <linux/pci.h> 17 #include <linux/of_pci.h> 18 #include <linux/initrd.h> 19 20 #include <asm/irqdomain.h> 21 #include <asm/hpet.h> 22 #include <asm/apic.h> 23 #include <asm/pci_x86.h> 24 #include <asm/setup.h> 25 #include <asm/i8259.h> 26 27 __initdata u64 initial_dtb; 28 char __initdata cmd_line[COMMAND_LINE_SIZE]; 29 30 int __initdata of_ioapic; 31 32 void __init early_init_dt_scan_chosen_arch(unsigned long node) 33 { 34 BUG(); 35 } 36 37 void __init early_init_dt_add_memory_arch(u64 base, u64 size) 38 { 39 BUG(); 40 } 41 42 void __init add_dtb(u64 data) 43 { 44 initial_dtb = data + offsetof(struct setup_data, data); 45 } 46 47 /* 48 * CE4100 ids. Will be moved to machine_device_initcall() once we have it. 49 */ 50 static struct of_device_id __initdata ce4100_ids[] = { 51 { .compatible = "intel,ce4100-cp", }, 52 { .compatible = "isa", }, 53 { .compatible = "pci", }, 54 {}, 55 }; 56 57 static int __init add_bus_probe(void) 58 { 59 if (!of_have_populated_dt()) 60 return 0; 61 62 return of_platform_bus_probe(NULL, ce4100_ids, NULL); 63 } 64 device_initcall(add_bus_probe); 65 66 #ifdef CONFIG_PCI 67 struct device_node *pcibios_get_phb_of_node(struct pci_bus *bus) 68 { 69 struct device_node *np; 70 71 for_each_node_by_type(np, "pci") { 72 const void *prop; 73 unsigned int bus_min; 74 75 prop = of_get_property(np, "bus-range", NULL); 76 if (!prop) 77 continue; 78 bus_min = be32_to_cpup(prop); 79 if (bus->number == bus_min) 80 return np; 81 } 82 return NULL; 83 } 84 85 static int x86_of_pci_irq_enable(struct pci_dev *dev) 86 { 87 u32 virq; 88 int ret; 89 u8 pin; 90 91 ret = pci_read_config_byte(dev, PCI_INTERRUPT_PIN, &pin); 92 if (ret) 93 return ret; 94 if (!pin) 95 return 0; 96 97 virq = of_irq_parse_and_map_pci(dev, 0, 0); 98 if (virq == 0) 99 return -EINVAL; 100 dev->irq = virq; 101 return 0; 102 } 103 104 static void x86_of_pci_irq_disable(struct pci_dev *dev) 105 { 106 } 107 108 void x86_of_pci_init(void) 109 { 110 pcibios_enable_irq = x86_of_pci_irq_enable; 111 pcibios_disable_irq = x86_of_pci_irq_disable; 112 } 113 #endif 114 115 static void __init dtb_setup_hpet(void) 116 { 117 #ifdef CONFIG_HPET_TIMER 118 struct device_node *dn; 119 struct resource r; 120 int ret; 121 122 dn = of_find_compatible_node(NULL, NULL, "intel,ce4100-hpet"); 123 if (!dn) 124 return; 125 ret = of_address_to_resource(dn, 0, &r); 126 if (ret) { 127 WARN_ON(1); 128 return; 129 } 130 hpet_address = r.start; 131 #endif 132 } 133 134 static void __init dtb_lapic_setup(void) 135 { 136 #ifdef CONFIG_X86_LOCAL_APIC 137 struct device_node *dn; 138 struct resource r; 139 int ret; 140 141 dn = of_find_compatible_node(NULL, NULL, "intel,ce4100-lapic"); 142 if (!dn) 143 return; 144 145 ret = of_address_to_resource(dn, 0, &r); 146 if (WARN_ON(ret)) 147 return; 148 149 /* Did the boot loader setup the local APIC ? */ 150 if (!boot_cpu_has(X86_FEATURE_APIC)) { 151 if (apic_force_enable(r.start)) 152 return; 153 } 154 smp_found_config = 1; 155 pic_mode = 1; 156 register_lapic_address(r.start); 157 generic_processor_info(boot_cpu_physical_apicid, 158 GET_APIC_VERSION(apic_read(APIC_LVR))); 159 #endif 160 } 161 162 #ifdef CONFIG_X86_IO_APIC 163 static unsigned int ioapic_id; 164 165 struct of_ioapic_type { 166 u32 out_type; 167 u32 trigger; 168 u32 polarity; 169 }; 170 171 static struct of_ioapic_type of_ioapic_type[] = 172 { 173 { 174 .out_type = IRQ_TYPE_EDGE_RISING, 175 .trigger = IOAPIC_EDGE, 176 .polarity = 1, 177 }, 178 { 179 .out_type = IRQ_TYPE_LEVEL_LOW, 180 .trigger = IOAPIC_LEVEL, 181 .polarity = 0, 182 }, 183 { 184 .out_type = IRQ_TYPE_LEVEL_HIGH, 185 .trigger = IOAPIC_LEVEL, 186 .polarity = 1, 187 }, 188 { 189 .out_type = IRQ_TYPE_EDGE_FALLING, 190 .trigger = IOAPIC_EDGE, 191 .polarity = 0, 192 }, 193 }; 194 195 static int dt_irqdomain_alloc(struct irq_domain *domain, unsigned int virq, 196 unsigned int nr_irqs, void *arg) 197 { 198 struct irq_fwspec *fwspec = (struct irq_fwspec *)arg; 199 struct of_ioapic_type *it; 200 struct irq_alloc_info tmp; 201 int type_index; 202 203 if (WARN_ON(fwspec->param_count < 2)) 204 return -EINVAL; 205 206 type_index = fwspec->param[1]; 207 if (type_index >= ARRAY_SIZE(of_ioapic_type)) 208 return -EINVAL; 209 210 it = &of_ioapic_type[type_index]; 211 ioapic_set_alloc_attr(&tmp, NUMA_NO_NODE, it->trigger, it->polarity); 212 tmp.ioapic_id = mpc_ioapic_id(mp_irqdomain_ioapic_idx(domain)); 213 tmp.ioapic_pin = fwspec->param[0]; 214 215 return mp_irqdomain_alloc(domain, virq, nr_irqs, &tmp); 216 } 217 218 static const struct irq_domain_ops ioapic_irq_domain_ops = { 219 .alloc = dt_irqdomain_alloc, 220 .free = mp_irqdomain_free, 221 .activate = mp_irqdomain_activate, 222 .deactivate = mp_irqdomain_deactivate, 223 }; 224 225 static void __init dtb_add_ioapic(struct device_node *dn) 226 { 227 struct resource r; 228 int ret; 229 struct ioapic_domain_cfg cfg = { 230 .type = IOAPIC_DOMAIN_DYNAMIC, 231 .ops = &ioapic_irq_domain_ops, 232 .dev = dn, 233 }; 234 235 ret = of_address_to_resource(dn, 0, &r); 236 if (ret) { 237 printk(KERN_ERR "Can't obtain address from device node %pOF.\n", dn); 238 return; 239 } 240 mp_register_ioapic(++ioapic_id, r.start, gsi_top, &cfg); 241 } 242 243 static void __init dtb_ioapic_setup(void) 244 { 245 struct device_node *dn; 246 247 for_each_compatible_node(dn, NULL, "intel,ce4100-ioapic") 248 dtb_add_ioapic(dn); 249 250 if (nr_ioapics) { 251 of_ioapic = 1; 252 return; 253 } 254 printk(KERN_ERR "Error: No information about IO-APIC in OF.\n"); 255 } 256 #else 257 static void __init dtb_ioapic_setup(void) {} 258 #endif 259 260 static void __init dtb_apic_setup(void) 261 { 262 dtb_lapic_setup(); 263 dtb_ioapic_setup(); 264 } 265 266 #ifdef CONFIG_OF_FLATTREE 267 static void __init x86_flattree_get_config(void) 268 { 269 u32 size, map_len; 270 void *dt; 271 272 if (!initial_dtb) 273 return; 274 275 map_len = max(PAGE_SIZE - (initial_dtb & ~PAGE_MASK), (u64)128); 276 277 dt = early_memremap(initial_dtb, map_len); 278 size = fdt_totalsize(dt); 279 if (map_len < size) { 280 early_memunmap(dt, map_len); 281 dt = early_memremap(initial_dtb, size); 282 map_len = size; 283 } 284 285 early_init_dt_verify(dt); 286 unflatten_and_copy_device_tree(); 287 early_memunmap(dt, map_len); 288 } 289 #else 290 static inline void x86_flattree_get_config(void) { } 291 #endif 292 293 void __init x86_dtb_init(void) 294 { 295 x86_flattree_get_config(); 296 297 if (!of_have_populated_dt()) 298 return; 299 300 dtb_setup_hpet(); 301 dtb_apic_setup(); 302 } 303