Loading...
1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * PCI <-> OF mapping helpers
4 *
5 * Copyright 2011 IBM Corp.
6 */
7#define pr_fmt(fmt) "PCI: OF: " fmt
8
9#include <linux/irqdomain.h>
10#include <linux/kernel.h>
11#include <linux/pci.h>
12#include <linux/of.h>
13#include <linux/of_irq.h>
14#include <linux/of_address.h>
15#include <linux/of_pci.h>
16#include "pci.h"
17
18#ifdef CONFIG_PCI
19/**
20 * pci_set_of_node - Find and set device's DT device_node
21 * @dev: the PCI device structure to fill
22 *
23 * Returns 0 on success with of_node set or when no device is described in the
24 * DT. Returns -ENODEV if the device is present, but disabled in the DT.
25 */
26int pci_set_of_node(struct pci_dev *dev)
27{
28 struct device_node *node;
29
30 if (!dev->bus->dev.of_node)
31 return 0;
32
33 node = of_pci_find_child_device(dev->bus->dev.of_node, dev->devfn);
34 if (!node)
35 return 0;
36
37 device_set_node(&dev->dev, of_fwnode_handle(node));
38 return 0;
39}
40
41void pci_release_of_node(struct pci_dev *dev)
42{
43 of_node_put(dev->dev.of_node);
44 device_set_node(&dev->dev, NULL);
45}
46
47void pci_set_bus_of_node(struct pci_bus *bus)
48{
49 struct device_node *node;
50
51 if (bus->self == NULL) {
52 node = pcibios_get_phb_of_node(bus);
53 } else {
54 node = of_node_get(bus->self->dev.of_node);
55 if (node && of_property_read_bool(node, "external-facing"))
56 bus->self->external_facing = true;
57 }
58
59 device_set_node(&bus->dev, of_fwnode_handle(node));
60}
61
62void pci_release_bus_of_node(struct pci_bus *bus)
63{
64 of_node_put(bus->dev.of_node);
65 device_set_node(&bus->dev, NULL);
66}
67
68struct device_node * __weak pcibios_get_phb_of_node(struct pci_bus *bus)
69{
70 /* This should only be called for PHBs */
71 if (WARN_ON(bus->self || bus->parent))
72 return NULL;
73
74 /*
75 * Look for a node pointer in either the intermediary device we
76 * create above the root bus or its own parent. Normally only
77 * the later is populated.
78 */
79 if (bus->bridge->of_node)
80 return of_node_get(bus->bridge->of_node);
81 if (bus->bridge->parent && bus->bridge->parent->of_node)
82 return of_node_get(bus->bridge->parent->of_node);
83 return NULL;
84}
85
86struct irq_domain *pci_host_bridge_of_msi_domain(struct pci_bus *bus)
87{
88#ifdef CONFIG_IRQ_DOMAIN
89 struct irq_domain *d;
90
91 if (!bus->dev.of_node)
92 return NULL;
93
94 /* Start looking for a phandle to an MSI controller. */
95 d = of_msi_get_domain(&bus->dev, bus->dev.of_node, DOMAIN_BUS_PCI_MSI);
96 if (d)
97 return d;
98
99 /*
100 * If we don't have an msi-parent property, look for a domain
101 * directly attached to the host bridge.
102 */
103 d = irq_find_matching_host(bus->dev.of_node, DOMAIN_BUS_PCI_MSI);
104 if (d)
105 return d;
106
107 return irq_find_host(bus->dev.of_node);
108#else
109 return NULL;
110#endif
111}
112
113bool pci_host_of_has_msi_map(struct device *dev)
114{
115 if (dev && dev->of_node)
116 return of_get_property(dev->of_node, "msi-map", NULL);
117 return false;
118}
119
120static inline int __of_pci_pci_compare(struct device_node *node,
121 unsigned int data)
122{
123 int devfn;
124
125 devfn = of_pci_get_devfn(node);
126 if (devfn < 0)
127 return 0;
128
129 return devfn == data;
130}
131
132struct device_node *of_pci_find_child_device(struct device_node *parent,
133 unsigned int devfn)
134{
135 struct device_node *node, *node2;
136
137 for_each_child_of_node(parent, node) {
138 if (__of_pci_pci_compare(node, devfn))
139 return node;
140 /*
141 * Some OFs create a parent node "multifunc-device" as
142 * a fake root for all functions of a multi-function
143 * device we go down them as well.
144 */
145 if (of_node_name_eq(node, "multifunc-device")) {
146 for_each_child_of_node(node, node2) {
147 if (__of_pci_pci_compare(node2, devfn)) {
148 of_node_put(node);
149 return node2;
150 }
151 }
152 }
153 }
154 return NULL;
155}
156EXPORT_SYMBOL_GPL(of_pci_find_child_device);
157
158/**
159 * of_pci_get_devfn() - Get device and function numbers for a device node
160 * @np: device node
161 *
162 * Parses a standard 5-cell PCI resource and returns an 8-bit value that can
163 * be passed to the PCI_SLOT() and PCI_FUNC() macros to extract the device
164 * and function numbers respectively. On error a negative error code is
165 * returned.
166 */
167int of_pci_get_devfn(struct device_node *np)
168{
169 u32 reg[5];
170 int error;
171
172 error = of_property_read_u32_array(np, "reg", reg, ARRAY_SIZE(reg));
173 if (error)
174 return error;
175
176 return (reg[0] >> 8) & 0xff;
177}
178EXPORT_SYMBOL_GPL(of_pci_get_devfn);
179
180/**
181 * of_pci_parse_bus_range() - parse the bus-range property of a PCI device
182 * @node: device node
183 * @res: address to a struct resource to return the bus-range
184 *
185 * Returns 0 on success or a negative error-code on failure.
186 */
187int of_pci_parse_bus_range(struct device_node *node, struct resource *res)
188{
189 u32 bus_range[2];
190 int error;
191
192 error = of_property_read_u32_array(node, "bus-range", bus_range,
193 ARRAY_SIZE(bus_range));
194 if (error)
195 return error;
196
197 res->name = node->name;
198 res->start = bus_range[0];
199 res->end = bus_range[1];
200 res->flags = IORESOURCE_BUS;
201
202 return 0;
203}
204EXPORT_SYMBOL_GPL(of_pci_parse_bus_range);
205
206/**
207 * of_get_pci_domain_nr - Find the host bridge domain number
208 * of the given device node.
209 * @node: Device tree node with the domain information.
210 *
211 * This function will try to obtain the host bridge domain number by finding
212 * a property called "linux,pci-domain" of the given device node.
213 *
214 * Return:
215 * * > 0 - On success, an associated domain number.
216 * * -EINVAL - The property "linux,pci-domain" does not exist.
217 * * -ENODATA - The linux,pci-domain" property does not have value.
218 * * -EOVERFLOW - Invalid "linux,pci-domain" property value.
219 *
220 * Returns the associated domain number from DT in the range [0-0xffff], or
221 * a negative value if the required property is not found.
222 */
223int of_get_pci_domain_nr(struct device_node *node)
224{
225 u32 domain;
226 int error;
227
228 error = of_property_read_u32(node, "linux,pci-domain", &domain);
229 if (error)
230 return error;
231
232 return (u16)domain;
233}
234EXPORT_SYMBOL_GPL(of_get_pci_domain_nr);
235
236/**
237 * of_pci_check_probe_only - Setup probe only mode if linux,pci-probe-only
238 * is present and valid
239 */
240void of_pci_check_probe_only(void)
241{
242 u32 val;
243 int ret;
244
245 ret = of_property_read_u32(of_chosen, "linux,pci-probe-only", &val);
246 if (ret) {
247 if (ret == -ENODATA || ret == -EOVERFLOW)
248 pr_warn("linux,pci-probe-only without valid value, ignoring\n");
249 return;
250 }
251
252 if (val)
253 pci_add_flags(PCI_PROBE_ONLY);
254 else
255 pci_clear_flags(PCI_PROBE_ONLY);
256
257 pr_info("PROBE_ONLY %s\n", val ? "enabled" : "disabled");
258}
259EXPORT_SYMBOL_GPL(of_pci_check_probe_only);
260
261/**
262 * devm_of_pci_get_host_bridge_resources() - Resource-managed parsing of PCI
263 * host bridge resources from DT
264 * @dev: host bridge device
265 * @busno: bus number associated with the bridge root bus
266 * @bus_max: maximum number of buses for this bridge
267 * @resources: list where the range of resources will be added after DT parsing
268 * @ib_resources: list where the range of inbound resources (with addresses
269 * from 'dma-ranges') will be added after DT parsing
270 * @io_base: pointer to a variable that will contain on return the physical
271 * address for the start of the I/O range. Can be NULL if the caller doesn't
272 * expect I/O ranges to be present in the device tree.
273 *
274 * This function will parse the "ranges" property of a PCI host bridge device
275 * node and setup the resource mapping based on its content. It is expected
276 * that the property conforms with the Power ePAPR document.
277 *
278 * It returns zero if the range parsing has been successful or a standard error
279 * value if it failed.
280 */
281static int devm_of_pci_get_host_bridge_resources(struct device *dev,
282 unsigned char busno, unsigned char bus_max,
283 struct list_head *resources,
284 struct list_head *ib_resources,
285 resource_size_t *io_base)
286{
287 struct device_node *dev_node = dev->of_node;
288 struct resource *res, tmp_res;
289 struct resource *bus_range;
290 struct of_pci_range range;
291 struct of_pci_range_parser parser;
292 const char *range_type;
293 int err;
294
295 if (io_base)
296 *io_base = (resource_size_t)OF_BAD_ADDR;
297
298 bus_range = devm_kzalloc(dev, sizeof(*bus_range), GFP_KERNEL);
299 if (!bus_range)
300 return -ENOMEM;
301
302 dev_info(dev, "host bridge %pOF ranges:\n", dev_node);
303
304 err = of_pci_parse_bus_range(dev_node, bus_range);
305 if (err) {
306 bus_range->start = busno;
307 bus_range->end = bus_max;
308 bus_range->flags = IORESOURCE_BUS;
309 dev_info(dev, " No bus range found for %pOF, using %pR\n",
310 dev_node, bus_range);
311 } else {
312 if (bus_range->end > bus_range->start + bus_max)
313 bus_range->end = bus_range->start + bus_max;
314 }
315 pci_add_resource(resources, bus_range);
316
317 /* Check for ranges property */
318 err = of_pci_range_parser_init(&parser, dev_node);
319 if (err)
320 return 0;
321
322 dev_dbg(dev, "Parsing ranges property...\n");
323 for_each_of_pci_range(&parser, &range) {
324 /* Read next ranges element */
325 if ((range.flags & IORESOURCE_TYPE_BITS) == IORESOURCE_IO)
326 range_type = "IO";
327 else if ((range.flags & IORESOURCE_TYPE_BITS) == IORESOURCE_MEM)
328 range_type = "MEM";
329 else
330 range_type = "err";
331 dev_info(dev, " %6s %#012llx..%#012llx -> %#012llx\n",
332 range_type, range.cpu_addr,
333 range.cpu_addr + range.size - 1, range.pci_addr);
334
335 /*
336 * If we failed translation or got a zero-sized region
337 * then skip this range
338 */
339 if (range.cpu_addr == OF_BAD_ADDR || range.size == 0)
340 continue;
341
342 err = of_pci_range_to_resource(&range, dev_node, &tmp_res);
343 if (err)
344 continue;
345
346 res = devm_kmemdup(dev, &tmp_res, sizeof(tmp_res), GFP_KERNEL);
347 if (!res) {
348 err = -ENOMEM;
349 goto failed;
350 }
351
352 if (resource_type(res) == IORESOURCE_IO) {
353 if (!io_base) {
354 dev_err(dev, "I/O range found for %pOF. Please provide an io_base pointer to save CPU base address\n",
355 dev_node);
356 err = -EINVAL;
357 goto failed;
358 }
359 if (*io_base != (resource_size_t)OF_BAD_ADDR)
360 dev_warn(dev, "More than one I/O resource converted for %pOF. CPU base address for old range lost!\n",
361 dev_node);
362 *io_base = range.cpu_addr;
363 } else if (resource_type(res) == IORESOURCE_MEM) {
364 res->flags &= ~IORESOURCE_MEM_64;
365 }
366
367 pci_add_resource_offset(resources, res, res->start - range.pci_addr);
368 }
369
370 /* Check for dma-ranges property */
371 if (!ib_resources)
372 return 0;
373 err = of_pci_dma_range_parser_init(&parser, dev_node);
374 if (err)
375 return 0;
376
377 dev_dbg(dev, "Parsing dma-ranges property...\n");
378 for_each_of_pci_range(&parser, &range) {
379 /*
380 * If we failed translation or got a zero-sized region
381 * then skip this range
382 */
383 if (((range.flags & IORESOURCE_TYPE_BITS) != IORESOURCE_MEM) ||
384 range.cpu_addr == OF_BAD_ADDR || range.size == 0)
385 continue;
386
387 dev_info(dev, " %6s %#012llx..%#012llx -> %#012llx\n",
388 "IB MEM", range.cpu_addr,
389 range.cpu_addr + range.size - 1, range.pci_addr);
390
391
392 err = of_pci_range_to_resource(&range, dev_node, &tmp_res);
393 if (err)
394 continue;
395
396 res = devm_kmemdup(dev, &tmp_res, sizeof(tmp_res), GFP_KERNEL);
397 if (!res) {
398 err = -ENOMEM;
399 goto failed;
400 }
401
402 pci_add_resource_offset(ib_resources, res,
403 res->start - range.pci_addr);
404 }
405
406 return 0;
407
408failed:
409 pci_free_resource_list(resources);
410 return err;
411}
412
413#if IS_ENABLED(CONFIG_OF_IRQ)
414/**
415 * of_irq_parse_pci - Resolve the interrupt for a PCI device
416 * @pdev: the device whose interrupt is to be resolved
417 * @out_irq: structure of_phandle_args filled by this function
418 *
419 * This function resolves the PCI interrupt for a given PCI device. If a
420 * device-node exists for a given pci_dev, it will use normal OF tree
421 * walking. If not, it will implement standard swizzling and walk up the
422 * PCI tree until an device-node is found, at which point it will finish
423 * resolving using the OF tree walking.
424 */
425static int of_irq_parse_pci(const struct pci_dev *pdev, struct of_phandle_args *out_irq)
426{
427 struct device_node *dn, *ppnode = NULL;
428 struct pci_dev *ppdev;
429 __be32 laddr[3];
430 u8 pin;
431 int rc;
432
433 /*
434 * Check if we have a device node, if yes, fallback to standard
435 * device tree parsing
436 */
437 dn = pci_device_to_OF_node(pdev);
438 if (dn) {
439 rc = of_irq_parse_one(dn, 0, out_irq);
440 if (!rc)
441 return rc;
442 }
443
444 /*
445 * Ok, we don't, time to have fun. Let's start by building up an
446 * interrupt spec. we assume #interrupt-cells is 1, which is standard
447 * for PCI. If you do different, then don't use that routine.
448 */
449 rc = pci_read_config_byte(pdev, PCI_INTERRUPT_PIN, &pin);
450 if (rc != 0)
451 goto err;
452 /* No pin, exit with no error message. */
453 if (pin == 0)
454 return -ENODEV;
455
456 /* Local interrupt-map in the device node? Use it! */
457 if (of_property_present(dn, "interrupt-map")) {
458 pin = pci_swizzle_interrupt_pin(pdev, pin);
459 ppnode = dn;
460 }
461
462 /* Now we walk up the PCI tree */
463 while (!ppnode) {
464 /* Get the pci_dev of our parent */
465 ppdev = pdev->bus->self;
466
467 /* Ouch, it's a host bridge... */
468 if (ppdev == NULL) {
469 ppnode = pci_bus_to_OF_node(pdev->bus);
470
471 /* No node for host bridge ? give up */
472 if (ppnode == NULL) {
473 rc = -EINVAL;
474 goto err;
475 }
476 } else {
477 /* We found a P2P bridge, check if it has a node */
478 ppnode = pci_device_to_OF_node(ppdev);
479 }
480
481 /*
482 * Ok, we have found a parent with a device-node, hand over to
483 * the OF parsing code.
484 * We build a unit address from the linux device to be used for
485 * resolution. Note that we use the linux bus number which may
486 * not match your firmware bus numbering.
487 * Fortunately, in most cases, interrupt-map-mask doesn't
488 * include the bus number as part of the matching.
489 * You should still be careful about that though if you intend
490 * to rely on this function (you ship a firmware that doesn't
491 * create device nodes for all PCI devices).
492 */
493 if (ppnode)
494 break;
495
496 /*
497 * We can only get here if we hit a P2P bridge with no node;
498 * let's do standard swizzling and try again
499 */
500 pin = pci_swizzle_interrupt_pin(pdev, pin);
501 pdev = ppdev;
502 }
503
504 out_irq->np = ppnode;
505 out_irq->args_count = 1;
506 out_irq->args[0] = pin;
507 laddr[0] = cpu_to_be32((pdev->bus->number << 16) | (pdev->devfn << 8));
508 laddr[1] = laddr[2] = cpu_to_be32(0);
509 rc = of_irq_parse_raw(laddr, out_irq);
510 if (rc)
511 goto err;
512 return 0;
513err:
514 if (rc == -ENOENT) {
515 dev_warn(&pdev->dev,
516 "%s: no interrupt-map found, INTx interrupts not available\n",
517 __func__);
518 pr_warn_once("%s: possibly some PCI slots don't have level triggered interrupts capability\n",
519 __func__);
520 } else {
521 dev_err(&pdev->dev, "%s: failed with rc=%d\n", __func__, rc);
522 }
523 return rc;
524}
525
526/**
527 * of_irq_parse_and_map_pci() - Decode a PCI IRQ from the device tree and map to a VIRQ
528 * @dev: The PCI device needing an IRQ
529 * @slot: PCI slot number; passed when used as map_irq callback. Unused
530 * @pin: PCI IRQ pin number; passed when used as map_irq callback. Unused
531 *
532 * @slot and @pin are unused, but included in the function so that this
533 * function can be used directly as the map_irq callback to
534 * pci_assign_irq() and struct pci_host_bridge.map_irq pointer
535 */
536int of_irq_parse_and_map_pci(const struct pci_dev *dev, u8 slot, u8 pin)
537{
538 struct of_phandle_args oirq;
539 int ret;
540
541 ret = of_irq_parse_pci(dev, &oirq);
542 if (ret)
543 return 0; /* Proper return code 0 == NO_IRQ */
544
545 return irq_create_of_mapping(&oirq);
546}
547EXPORT_SYMBOL_GPL(of_irq_parse_and_map_pci);
548#endif /* CONFIG_OF_IRQ */
549
550static int pci_parse_request_of_pci_ranges(struct device *dev,
551 struct pci_host_bridge *bridge)
552{
553 int err, res_valid = 0;
554 resource_size_t iobase;
555 struct resource_entry *win, *tmp;
556
557 INIT_LIST_HEAD(&bridge->windows);
558 INIT_LIST_HEAD(&bridge->dma_ranges);
559
560 err = devm_of_pci_get_host_bridge_resources(dev, 0, 0xff, &bridge->windows,
561 &bridge->dma_ranges, &iobase);
562 if (err)
563 return err;
564
565 err = devm_request_pci_bus_resources(dev, &bridge->windows);
566 if (err)
567 return err;
568
569 resource_list_for_each_entry_safe(win, tmp, &bridge->windows) {
570 struct resource *res = win->res;
571
572 switch (resource_type(res)) {
573 case IORESOURCE_IO:
574 err = devm_pci_remap_iospace(dev, res, iobase);
575 if (err) {
576 dev_warn(dev, "error %d: failed to map resource %pR\n",
577 err, res);
578 resource_list_destroy_entry(win);
579 }
580 break;
581 case IORESOURCE_MEM:
582 res_valid |= !(res->flags & IORESOURCE_PREFETCH);
583
584 if (!(res->flags & IORESOURCE_PREFETCH))
585 if (upper_32_bits(resource_size(res)))
586 dev_warn(dev, "Memory resource size exceeds max for 32 bits\n");
587
588 break;
589 }
590 }
591
592 if (!res_valid)
593 dev_warn(dev, "non-prefetchable memory resource required\n");
594
595 return 0;
596}
597
598int devm_of_pci_bridge_init(struct device *dev, struct pci_host_bridge *bridge)
599{
600 if (!dev->of_node)
601 return 0;
602
603 bridge->swizzle_irq = pci_common_swizzle;
604 bridge->map_irq = of_irq_parse_and_map_pci;
605
606 return pci_parse_request_of_pci_ranges(dev, bridge);
607}
608
609#ifdef CONFIG_PCI_DYNAMIC_OF_NODES
610
611void of_pci_remove_node(struct pci_dev *pdev)
612{
613 struct device_node *np;
614
615 np = pci_device_to_OF_node(pdev);
616 if (!np || !of_node_check_flag(np, OF_DYNAMIC))
617 return;
618 pdev->dev.of_node = NULL;
619
620 of_changeset_revert(np->data);
621 of_changeset_destroy(np->data);
622 of_node_put(np);
623}
624
625void of_pci_make_dev_node(struct pci_dev *pdev)
626{
627 struct device_node *ppnode, *np = NULL;
628 const char *pci_type;
629 struct of_changeset *cset;
630 const char *name;
631 int ret;
632
633 /*
634 * If there is already a device tree node linked to this device,
635 * return immediately.
636 */
637 if (pci_device_to_OF_node(pdev))
638 return;
639
640 /* Check if there is device tree node for parent device */
641 if (!pdev->bus->self)
642 ppnode = pdev->bus->dev.of_node;
643 else
644 ppnode = pdev->bus->self->dev.of_node;
645 if (!ppnode)
646 return;
647
648 if (pci_is_bridge(pdev))
649 pci_type = "pci";
650 else
651 pci_type = "dev";
652
653 name = kasprintf(GFP_KERNEL, "%s@%x,%x", pci_type,
654 PCI_SLOT(pdev->devfn), PCI_FUNC(pdev->devfn));
655 if (!name)
656 return;
657
658 cset = kmalloc(sizeof(*cset), GFP_KERNEL);
659 if (!cset)
660 goto out_free_name;
661 of_changeset_init(cset);
662
663 np = of_changeset_create_node(cset, ppnode, name);
664 if (!np)
665 goto out_destroy_cset;
666
667 ret = of_pci_add_properties(pdev, cset, np);
668 if (ret)
669 goto out_free_node;
670
671 ret = of_changeset_apply(cset);
672 if (ret)
673 goto out_free_node;
674
675 np->data = cset;
676 pdev->dev.of_node = np;
677 kfree(name);
678
679 return;
680
681out_free_node:
682 of_node_put(np);
683out_destroy_cset:
684 of_changeset_destroy(cset);
685 kfree(cset);
686out_free_name:
687 kfree(name);
688}
689#endif
690
691#endif /* CONFIG_PCI */
692
693/**
694 * of_pci_get_max_link_speed - Find the maximum link speed of the given device node.
695 * @node: Device tree node with the maximum link speed information.
696 *
697 * This function will try to find the limitation of link speed by finding
698 * a property called "max-link-speed" of the given device node.
699 *
700 * Return:
701 * * > 0 - On success, a maximum link speed.
702 * * -EINVAL - Invalid "max-link-speed" property value, or failure to access
703 * the property of the device tree node.
704 *
705 * Returns the associated max link speed from DT, or a negative value if the
706 * required property is not found or is invalid.
707 */
708int of_pci_get_max_link_speed(struct device_node *node)
709{
710 u32 max_link_speed;
711
712 if (of_property_read_u32(node, "max-link-speed", &max_link_speed) ||
713 max_link_speed == 0 || max_link_speed > 4)
714 return -EINVAL;
715
716 return max_link_speed;
717}
718EXPORT_SYMBOL_GPL(of_pci_get_max_link_speed);
719
720/**
721 * of_pci_get_slot_power_limit - Parses the "slot-power-limit-milliwatt"
722 * property.
723 *
724 * @node: device tree node with the slot power limit information
725 * @slot_power_limit_value: pointer where the value should be stored in PCIe
726 * Slot Capabilities Register format
727 * @slot_power_limit_scale: pointer where the scale should be stored in PCIe
728 * Slot Capabilities Register format
729 *
730 * Returns the slot power limit in milliwatts and if @slot_power_limit_value
731 * and @slot_power_limit_scale pointers are non-NULL, fills in the value and
732 * scale in format used by PCIe Slot Capabilities Register.
733 *
734 * If the property is not found or is invalid, returns 0.
735 */
736u32 of_pci_get_slot_power_limit(struct device_node *node,
737 u8 *slot_power_limit_value,
738 u8 *slot_power_limit_scale)
739{
740 u32 slot_power_limit_mw;
741 u8 value, scale;
742
743 if (of_property_read_u32(node, "slot-power-limit-milliwatt",
744 &slot_power_limit_mw))
745 slot_power_limit_mw = 0;
746
747 /* Calculate Slot Power Limit Value and Slot Power Limit Scale */
748 if (slot_power_limit_mw == 0) {
749 value = 0x00;
750 scale = 0;
751 } else if (slot_power_limit_mw <= 255) {
752 value = slot_power_limit_mw;
753 scale = 3;
754 } else if (slot_power_limit_mw <= 255*10) {
755 value = slot_power_limit_mw / 10;
756 scale = 2;
757 slot_power_limit_mw = slot_power_limit_mw / 10 * 10;
758 } else if (slot_power_limit_mw <= 255*100) {
759 value = slot_power_limit_mw / 100;
760 scale = 1;
761 slot_power_limit_mw = slot_power_limit_mw / 100 * 100;
762 } else if (slot_power_limit_mw <= 239*1000) {
763 value = slot_power_limit_mw / 1000;
764 scale = 0;
765 slot_power_limit_mw = slot_power_limit_mw / 1000 * 1000;
766 } else if (slot_power_limit_mw < 250*1000) {
767 value = 0xEF;
768 scale = 0;
769 slot_power_limit_mw = 239*1000;
770 } else if (slot_power_limit_mw <= 600*1000) {
771 value = 0xF0 + (slot_power_limit_mw / 1000 - 250) / 25;
772 scale = 0;
773 slot_power_limit_mw = slot_power_limit_mw / (1000*25) * (1000*25);
774 } else {
775 value = 0xFE;
776 scale = 0;
777 slot_power_limit_mw = 600*1000;
778 }
779
780 if (slot_power_limit_value)
781 *slot_power_limit_value = value;
782
783 if (slot_power_limit_scale)
784 *slot_power_limit_scale = scale;
785
786 return slot_power_limit_mw;
787}
788EXPORT_SYMBOL_GPL(of_pci_get_slot_power_limit);
1// SPDX-License-Identifier: GPL-2.0+
2/*
3 * PCI <-> OF mapping helpers
4 *
5 * Copyright 2011 IBM Corp.
6 */
7#define pr_fmt(fmt) "PCI: OF: " fmt
8
9#include <linux/irqdomain.h>
10#include <linux/kernel.h>
11#include <linux/pci.h>
12#include <linux/of.h>
13#include <linux/of_irq.h>
14#include <linux/of_address.h>
15#include <linux/of_pci.h>
16#include "pci.h"
17
18void pci_set_of_node(struct pci_dev *dev)
19{
20 if (!dev->bus->dev.of_node)
21 return;
22 dev->dev.of_node = of_pci_find_child_device(dev->bus->dev.of_node,
23 dev->devfn);
24}
25
26void pci_release_of_node(struct pci_dev *dev)
27{
28 of_node_put(dev->dev.of_node);
29 dev->dev.of_node = NULL;
30}
31
32void pci_set_bus_of_node(struct pci_bus *bus)
33{
34 if (bus->self == NULL)
35 bus->dev.of_node = pcibios_get_phb_of_node(bus);
36 else
37 bus->dev.of_node = of_node_get(bus->self->dev.of_node);
38}
39
40void pci_release_bus_of_node(struct pci_bus *bus)
41{
42 of_node_put(bus->dev.of_node);
43 bus->dev.of_node = NULL;
44}
45
46struct device_node * __weak pcibios_get_phb_of_node(struct pci_bus *bus)
47{
48 /* This should only be called for PHBs */
49 if (WARN_ON(bus->self || bus->parent))
50 return NULL;
51
52 /*
53 * Look for a node pointer in either the intermediary device we
54 * create above the root bus or its own parent. Normally only
55 * the later is populated.
56 */
57 if (bus->bridge->of_node)
58 return of_node_get(bus->bridge->of_node);
59 if (bus->bridge->parent && bus->bridge->parent->of_node)
60 return of_node_get(bus->bridge->parent->of_node);
61 return NULL;
62}
63
64struct irq_domain *pci_host_bridge_of_msi_domain(struct pci_bus *bus)
65{
66#ifdef CONFIG_IRQ_DOMAIN
67 struct irq_domain *d;
68
69 if (!bus->dev.of_node)
70 return NULL;
71
72 /* Start looking for a phandle to an MSI controller. */
73 d = of_msi_get_domain(&bus->dev, bus->dev.of_node, DOMAIN_BUS_PCI_MSI);
74 if (d)
75 return d;
76
77 /*
78 * If we don't have an msi-parent property, look for a domain
79 * directly attached to the host bridge.
80 */
81 d = irq_find_matching_host(bus->dev.of_node, DOMAIN_BUS_PCI_MSI);
82 if (d)
83 return d;
84
85 return irq_find_host(bus->dev.of_node);
86#else
87 return NULL;
88#endif
89}
90
91static inline int __of_pci_pci_compare(struct device_node *node,
92 unsigned int data)
93{
94 int devfn;
95
96 devfn = of_pci_get_devfn(node);
97 if (devfn < 0)
98 return 0;
99
100 return devfn == data;
101}
102
103struct device_node *of_pci_find_child_device(struct device_node *parent,
104 unsigned int devfn)
105{
106 struct device_node *node, *node2;
107
108 for_each_child_of_node(parent, node) {
109 if (__of_pci_pci_compare(node, devfn))
110 return node;
111 /*
112 * Some OFs create a parent node "multifunc-device" as
113 * a fake root for all functions of a multi-function
114 * device we go down them as well.
115 */
116 if (!strcmp(node->name, "multifunc-device")) {
117 for_each_child_of_node(node, node2) {
118 if (__of_pci_pci_compare(node2, devfn)) {
119 of_node_put(node);
120 return node2;
121 }
122 }
123 }
124 }
125 return NULL;
126}
127EXPORT_SYMBOL_GPL(of_pci_find_child_device);
128
129/**
130 * of_pci_get_devfn() - Get device and function numbers for a device node
131 * @np: device node
132 *
133 * Parses a standard 5-cell PCI resource and returns an 8-bit value that can
134 * be passed to the PCI_SLOT() and PCI_FUNC() macros to extract the device
135 * and function numbers respectively. On error a negative error code is
136 * returned.
137 */
138int of_pci_get_devfn(struct device_node *np)
139{
140 u32 reg[5];
141 int error;
142
143 error = of_property_read_u32_array(np, "reg", reg, ARRAY_SIZE(reg));
144 if (error)
145 return error;
146
147 return (reg[0] >> 8) & 0xff;
148}
149EXPORT_SYMBOL_GPL(of_pci_get_devfn);
150
151/**
152 * of_pci_parse_bus_range() - parse the bus-range property of a PCI device
153 * @node: device node
154 * @res: address to a struct resource to return the bus-range
155 *
156 * Returns 0 on success or a negative error-code on failure.
157 */
158int of_pci_parse_bus_range(struct device_node *node, struct resource *res)
159{
160 u32 bus_range[2];
161 int error;
162
163 error = of_property_read_u32_array(node, "bus-range", bus_range,
164 ARRAY_SIZE(bus_range));
165 if (error)
166 return error;
167
168 res->name = node->name;
169 res->start = bus_range[0];
170 res->end = bus_range[1];
171 res->flags = IORESOURCE_BUS;
172
173 return 0;
174}
175EXPORT_SYMBOL_GPL(of_pci_parse_bus_range);
176
177/**
178 * This function will try to obtain the host bridge domain number by
179 * finding a property called "linux,pci-domain" of the given device node.
180 *
181 * @node: device tree node with the domain information
182 *
183 * Returns the associated domain number from DT in the range [0-0xffff], or
184 * a negative value if the required property is not found.
185 */
186int of_get_pci_domain_nr(struct device_node *node)
187{
188 u32 domain;
189 int error;
190
191 error = of_property_read_u32(node, "linux,pci-domain", &domain);
192 if (error)
193 return error;
194
195 return (u16)domain;
196}
197EXPORT_SYMBOL_GPL(of_get_pci_domain_nr);
198
199/**
200 * This function will try to find the limitation of link speed by finding
201 * a property called "max-link-speed" of the given device node.
202 *
203 * @node: device tree node with the max link speed information
204 *
205 * Returns the associated max link speed from DT, or a negative value if the
206 * required property is not found or is invalid.
207 */
208int of_pci_get_max_link_speed(struct device_node *node)
209{
210 u32 max_link_speed;
211
212 if (of_property_read_u32(node, "max-link-speed", &max_link_speed) ||
213 max_link_speed > 4)
214 return -EINVAL;
215
216 return max_link_speed;
217}
218EXPORT_SYMBOL_GPL(of_pci_get_max_link_speed);
219
220/**
221 * of_pci_check_probe_only - Setup probe only mode if linux,pci-probe-only
222 * is present and valid
223 */
224void of_pci_check_probe_only(void)
225{
226 u32 val;
227 int ret;
228
229 ret = of_property_read_u32(of_chosen, "linux,pci-probe-only", &val);
230 if (ret) {
231 if (ret == -ENODATA || ret == -EOVERFLOW)
232 pr_warn("linux,pci-probe-only without valid value, ignoring\n");
233 return;
234 }
235
236 if (val)
237 pci_add_flags(PCI_PROBE_ONLY);
238 else
239 pci_clear_flags(PCI_PROBE_ONLY);
240
241 pr_info("PROBE_ONLY %sabled\n", val ? "en" : "dis");
242}
243EXPORT_SYMBOL_GPL(of_pci_check_probe_only);
244
245#if defined(CONFIG_OF_ADDRESS)
246/**
247 * of_pci_get_host_bridge_resources - Parse PCI host bridge resources from DT
248 * @dev: device node of the host bridge having the range property
249 * @busno: bus number associated with the bridge root bus
250 * @bus_max: maximum number of buses for this bridge
251 * @resources: list where the range of resources will be added after DT parsing
252 * @io_base: pointer to a variable that will contain on return the physical
253 * address for the start of the I/O range. Can be NULL if the caller doesn't
254 * expect I/O ranges to be present in the device tree.
255 *
256 * It is the caller's job to free the @resources list.
257 *
258 * This function will parse the "ranges" property of a PCI host bridge device
259 * node and setup the resource mapping based on its content. It is expected
260 * that the property conforms with the Power ePAPR document.
261 *
262 * It returns zero if the range parsing has been successful or a standard error
263 * value if it failed.
264 */
265int of_pci_get_host_bridge_resources(struct device_node *dev,
266 unsigned char busno, unsigned char bus_max,
267 struct list_head *resources, resource_size_t *io_base)
268{
269 struct resource_entry *window;
270 struct resource *res;
271 struct resource *bus_range;
272 struct of_pci_range range;
273 struct of_pci_range_parser parser;
274 char range_type[4];
275 int err;
276
277 if (io_base)
278 *io_base = (resource_size_t)OF_BAD_ADDR;
279
280 bus_range = kzalloc(sizeof(*bus_range), GFP_KERNEL);
281 if (!bus_range)
282 return -ENOMEM;
283
284 pr_info("host bridge %pOF ranges:\n", dev);
285
286 err = of_pci_parse_bus_range(dev, bus_range);
287 if (err) {
288 bus_range->start = busno;
289 bus_range->end = bus_max;
290 bus_range->flags = IORESOURCE_BUS;
291 pr_info(" No bus range found for %pOF, using %pR\n",
292 dev, bus_range);
293 } else {
294 if (bus_range->end > bus_range->start + bus_max)
295 bus_range->end = bus_range->start + bus_max;
296 }
297 pci_add_resource(resources, bus_range);
298
299 /* Check for ranges property */
300 err = of_pci_range_parser_init(&parser, dev);
301 if (err)
302 goto parse_failed;
303
304 pr_debug("Parsing ranges property...\n");
305 for_each_of_pci_range(&parser, &range) {
306 /* Read next ranges element */
307 if ((range.flags & IORESOURCE_TYPE_BITS) == IORESOURCE_IO)
308 snprintf(range_type, 4, " IO");
309 else if ((range.flags & IORESOURCE_TYPE_BITS) == IORESOURCE_MEM)
310 snprintf(range_type, 4, "MEM");
311 else
312 snprintf(range_type, 4, "err");
313 pr_info(" %s %#010llx..%#010llx -> %#010llx\n", range_type,
314 range.cpu_addr, range.cpu_addr + range.size - 1,
315 range.pci_addr);
316
317 /*
318 * If we failed translation or got a zero-sized region
319 * then skip this range
320 */
321 if (range.cpu_addr == OF_BAD_ADDR || range.size == 0)
322 continue;
323
324 res = kzalloc(sizeof(struct resource), GFP_KERNEL);
325 if (!res) {
326 err = -ENOMEM;
327 goto parse_failed;
328 }
329
330 err = of_pci_range_to_resource(&range, dev, res);
331 if (err) {
332 kfree(res);
333 continue;
334 }
335
336 if (resource_type(res) == IORESOURCE_IO) {
337 if (!io_base) {
338 pr_err("I/O range found for %pOF. Please provide an io_base pointer to save CPU base address\n",
339 dev);
340 err = -EINVAL;
341 goto conversion_failed;
342 }
343 if (*io_base != (resource_size_t)OF_BAD_ADDR)
344 pr_warn("More than one I/O resource converted for %pOF. CPU base address for old range lost!\n",
345 dev);
346 *io_base = range.cpu_addr;
347 }
348
349 pci_add_resource_offset(resources, res, res->start - range.pci_addr);
350 }
351
352 return 0;
353
354conversion_failed:
355 kfree(res);
356parse_failed:
357 resource_list_for_each_entry(window, resources)
358 kfree(window->res);
359 pci_free_resource_list(resources);
360 return err;
361}
362EXPORT_SYMBOL_GPL(of_pci_get_host_bridge_resources);
363#endif /* CONFIG_OF_ADDRESS */
364
365/**
366 * of_pci_map_rid - Translate a requester ID through a downstream mapping.
367 * @np: root complex device node.
368 * @rid: PCI requester ID to map.
369 * @map_name: property name of the map to use.
370 * @map_mask_name: optional property name of the mask to use.
371 * @target: optional pointer to a target device node.
372 * @id_out: optional pointer to receive the translated ID.
373 *
374 * Given a PCI requester ID, look up the appropriate implementation-defined
375 * platform ID and/or the target device which receives transactions on that
376 * ID, as per the "iommu-map" and "msi-map" bindings. Either of @target or
377 * @id_out may be NULL if only the other is required. If @target points to
378 * a non-NULL device node pointer, only entries targeting that node will be
379 * matched; if it points to a NULL value, it will receive the device node of
380 * the first matching target phandle, with a reference held.
381 *
382 * Return: 0 on success or a standard error code on failure.
383 */
384int of_pci_map_rid(struct device_node *np, u32 rid,
385 const char *map_name, const char *map_mask_name,
386 struct device_node **target, u32 *id_out)
387{
388 u32 map_mask, masked_rid;
389 int map_len;
390 const __be32 *map = NULL;
391
392 if (!np || !map_name || (!target && !id_out))
393 return -EINVAL;
394
395 map = of_get_property(np, map_name, &map_len);
396 if (!map) {
397 if (target)
398 return -ENODEV;
399 /* Otherwise, no map implies no translation */
400 *id_out = rid;
401 return 0;
402 }
403
404 if (!map_len || map_len % (4 * sizeof(*map))) {
405 pr_err("%pOF: Error: Bad %s length: %d\n", np,
406 map_name, map_len);
407 return -EINVAL;
408 }
409
410 /* The default is to select all bits. */
411 map_mask = 0xffffffff;
412
413 /*
414 * Can be overridden by "{iommu,msi}-map-mask" property.
415 * If of_property_read_u32() fails, the default is used.
416 */
417 if (map_mask_name)
418 of_property_read_u32(np, map_mask_name, &map_mask);
419
420 masked_rid = map_mask & rid;
421 for ( ; map_len > 0; map_len -= 4 * sizeof(*map), map += 4) {
422 struct device_node *phandle_node;
423 u32 rid_base = be32_to_cpup(map + 0);
424 u32 phandle = be32_to_cpup(map + 1);
425 u32 out_base = be32_to_cpup(map + 2);
426 u32 rid_len = be32_to_cpup(map + 3);
427
428 if (rid_base & ~map_mask) {
429 pr_err("%pOF: Invalid %s translation - %s-mask (0x%x) ignores rid-base (0x%x)\n",
430 np, map_name, map_name,
431 map_mask, rid_base);
432 return -EFAULT;
433 }
434
435 if (masked_rid < rid_base || masked_rid >= rid_base + rid_len)
436 continue;
437
438 phandle_node = of_find_node_by_phandle(phandle);
439 if (!phandle_node)
440 return -ENODEV;
441
442 if (target) {
443 if (*target)
444 of_node_put(phandle_node);
445 else
446 *target = phandle_node;
447
448 if (*target != phandle_node)
449 continue;
450 }
451
452 if (id_out)
453 *id_out = masked_rid - rid_base + out_base;
454
455 pr_debug("%pOF: %s, using mask %08x, rid-base: %08x, out-base: %08x, length: %08x, rid: %08x -> %08x\n",
456 np, map_name, map_mask, rid_base, out_base,
457 rid_len, rid, masked_rid - rid_base + out_base);
458 return 0;
459 }
460
461 pr_err("%pOF: Invalid %s translation - no match for rid 0x%x on %pOF\n",
462 np, map_name, rid, target && *target ? *target : NULL);
463 return -EFAULT;
464}
465
466#if IS_ENABLED(CONFIG_OF_IRQ)
467/**
468 * of_irq_parse_pci - Resolve the interrupt for a PCI device
469 * @pdev: the device whose interrupt is to be resolved
470 * @out_irq: structure of_irq filled by this function
471 *
472 * This function resolves the PCI interrupt for a given PCI device. If a
473 * device-node exists for a given pci_dev, it will use normal OF tree
474 * walking. If not, it will implement standard swizzling and walk up the
475 * PCI tree until an device-node is found, at which point it will finish
476 * resolving using the OF tree walking.
477 */
478static int of_irq_parse_pci(const struct pci_dev *pdev, struct of_phandle_args *out_irq)
479{
480 struct device_node *dn, *ppnode;
481 struct pci_dev *ppdev;
482 __be32 laddr[3];
483 u8 pin;
484 int rc;
485
486 /*
487 * Check if we have a device node, if yes, fallback to standard
488 * device tree parsing
489 */
490 dn = pci_device_to_OF_node(pdev);
491 if (dn) {
492 rc = of_irq_parse_one(dn, 0, out_irq);
493 if (!rc)
494 return rc;
495 }
496
497 /*
498 * Ok, we don't, time to have fun. Let's start by building up an
499 * interrupt spec. we assume #interrupt-cells is 1, which is standard
500 * for PCI. If you do different, then don't use that routine.
501 */
502 rc = pci_read_config_byte(pdev, PCI_INTERRUPT_PIN, &pin);
503 if (rc != 0)
504 goto err;
505 /* No pin, exit with no error message. */
506 if (pin == 0)
507 return -ENODEV;
508
509 /* Now we walk up the PCI tree */
510 for (;;) {
511 /* Get the pci_dev of our parent */
512 ppdev = pdev->bus->self;
513
514 /* Ouch, it's a host bridge... */
515 if (ppdev == NULL) {
516 ppnode = pci_bus_to_OF_node(pdev->bus);
517
518 /* No node for host bridge ? give up */
519 if (ppnode == NULL) {
520 rc = -EINVAL;
521 goto err;
522 }
523 } else {
524 /* We found a P2P bridge, check if it has a node */
525 ppnode = pci_device_to_OF_node(ppdev);
526 }
527
528 /*
529 * Ok, we have found a parent with a device-node, hand over to
530 * the OF parsing code.
531 * We build a unit address from the linux device to be used for
532 * resolution. Note that we use the linux bus number which may
533 * not match your firmware bus numbering.
534 * Fortunately, in most cases, interrupt-map-mask doesn't
535 * include the bus number as part of the matching.
536 * You should still be careful about that though if you intend
537 * to rely on this function (you ship a firmware that doesn't
538 * create device nodes for all PCI devices).
539 */
540 if (ppnode)
541 break;
542
543 /*
544 * We can only get here if we hit a P2P bridge with no node;
545 * let's do standard swizzling and try again
546 */
547 pin = pci_swizzle_interrupt_pin(pdev, pin);
548 pdev = ppdev;
549 }
550
551 out_irq->np = ppnode;
552 out_irq->args_count = 1;
553 out_irq->args[0] = pin;
554 laddr[0] = cpu_to_be32((pdev->bus->number << 16) | (pdev->devfn << 8));
555 laddr[1] = laddr[2] = cpu_to_be32(0);
556 rc = of_irq_parse_raw(laddr, out_irq);
557 if (rc)
558 goto err;
559 return 0;
560err:
561 if (rc == -ENOENT) {
562 dev_warn(&pdev->dev,
563 "%s: no interrupt-map found, INTx interrupts not available\n",
564 __func__);
565 pr_warn_once("%s: possibly some PCI slots don't have level triggered interrupts capability\n",
566 __func__);
567 } else {
568 dev_err(&pdev->dev, "%s: failed with rc=%d\n", __func__, rc);
569 }
570 return rc;
571}
572
573/**
574 * of_irq_parse_and_map_pci() - Decode a PCI IRQ from the device tree and map to a VIRQ
575 * @dev: The PCI device needing an IRQ
576 * @slot: PCI slot number; passed when used as map_irq callback. Unused
577 * @pin: PCI IRQ pin number; passed when used as map_irq callback. Unused
578 *
579 * @slot and @pin are unused, but included in the function so that this
580 * function can be used directly as the map_irq callback to
581 * pci_assign_irq() and struct pci_host_bridge.map_irq pointer
582 */
583int of_irq_parse_and_map_pci(const struct pci_dev *dev, u8 slot, u8 pin)
584{
585 struct of_phandle_args oirq;
586 int ret;
587
588 ret = of_irq_parse_pci(dev, &oirq);
589 if (ret)
590 return 0; /* Proper return code 0 == NO_IRQ */
591
592 return irq_create_of_mapping(&oirq);
593}
594EXPORT_SYMBOL_GPL(of_irq_parse_and_map_pci);
595#endif /* CONFIG_OF_IRQ */
596
597int pci_parse_request_of_pci_ranges(struct device *dev,
598 struct list_head *resources,
599 struct resource **bus_range)
600{
601 int err, res_valid = 0;
602 struct device_node *np = dev->of_node;
603 resource_size_t iobase;
604 struct resource_entry *win, *tmp;
605
606 INIT_LIST_HEAD(resources);
607 err = of_pci_get_host_bridge_resources(np, 0, 0xff, resources, &iobase);
608 if (err)
609 return err;
610
611 err = devm_request_pci_bus_resources(dev, resources);
612 if (err)
613 goto out_release_res;
614
615 resource_list_for_each_entry_safe(win, tmp, resources) {
616 struct resource *res = win->res;
617
618 switch (resource_type(res)) {
619 case IORESOURCE_IO:
620 err = pci_remap_iospace(res, iobase);
621 if (err) {
622 dev_warn(dev, "error %d: failed to map resource %pR\n",
623 err, res);
624 resource_list_destroy_entry(win);
625 }
626 break;
627 case IORESOURCE_MEM:
628 res_valid |= !(res->flags & IORESOURCE_PREFETCH);
629 break;
630 case IORESOURCE_BUS:
631 if (bus_range)
632 *bus_range = res;
633 break;
634 }
635 }
636
637 if (res_valid)
638 return 0;
639
640 dev_err(dev, "non-prefetchable memory resource required\n");
641 err = -EINVAL;
642
643 out_release_res:
644 pci_free_resource_list(resources);
645 return err;
646}
647