1 /*
2 * ARM Platform Bus device tree generation helpers
3 *
4 * Copyright (c) 2014 Linaro Limited
5 *
6 * Authors:
7 * Alex Graf <agraf@suse.de>
8 * Eric Auger <eric.auger@linaro.org>
9 *
10 * This program is free software; you can redistribute it and/or modify it
11 * under the terms and conditions of the GNU General Public License,
12 * version 2 or later, as published by the Free Software Foundation.
13 *
14 * This program is distributed in the hope it will be useful, but WITHOUT
15 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
16 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for
17 * more details.
18 *
19 * You should have received a copy of the GNU General Public License along with
20 * this program. If not, see <http://www.gnu.org/licenses/>.
21 *
22 */
23
24 #include "qemu/osdep.h"
25 #include "qapi/error.h"
26 #include <libfdt.h>
27 #ifdef CONFIG_LINUX
28 #include <linux/vfio.h>
29 #endif
30 #include "hw/core/sysbus-fdt.h"
31 #include "qemu/error-report.h"
32 #include "sysemu/device_tree.h"
33 #include "sysemu/tpm.h"
34 #include "hw/platform-bus.h"
35 #include "hw/vfio/vfio-platform.h"
36 #include "hw/vfio/vfio-calxeda-xgmac.h"
37 #include "hw/vfio/vfio-amd-xgbe.h"
38 #include "hw/display/ramfb.h"
39 #include "hw/arm/fdt.h"
40
41 /*
42 * internal struct that contains the information to create dynamic
43 * sysbus device node
44 */
45 typedef struct PlatformBusFDTData {
46 void *fdt; /* device tree handle */
47 int irq_start; /* index of the first IRQ usable by platform bus devices */
48 const char *pbus_node_name; /* name of the platform bus node */
49 PlatformBusDevice *pbus;
50 } PlatformBusFDTData;
51
52 /* struct that allows to match a device and create its FDT node */
53 typedef struct BindingEntry {
54 const char *typename;
55 const char *compat;
56 int (*add_fn)(SysBusDevice *sbdev, void *opaque);
57 bool (*match_fn)(SysBusDevice *sbdev, const struct BindingEntry *combo);
58 } BindingEntry;
59
60 /* helpers */
61
62 typedef struct HostProperty {
63 const char *name;
64 bool optional;
65 } HostProperty;
66
67 #ifdef CONFIG_LINUX
68
69 /**
70 * copy_properties_from_host
71 *
72 * copies properties listed in an array from host device tree to
73 * guest device tree. If a non optional property is not found, the
74 * function asserts. An optional property is ignored if not found
75 * in the host device tree.
76 * @props: array of HostProperty to copy
77 * @nb_props: number of properties in the array
78 * @host_dt: host device tree blob
79 * @guest_dt: guest device tree blob
80 * @node_path: host dt node path where the property is supposed to be
81 found
82 * @nodename: guest node name the properties should be added to
83 */
copy_properties_from_host(HostProperty * props,int nb_props,void * host_fdt,void * guest_fdt,char * node_path,char * nodename)84 static void copy_properties_from_host(HostProperty *props, int nb_props,
85 void *host_fdt, void *guest_fdt,
86 char *node_path, char *nodename)
87 {
88 int i, prop_len;
89 const void *r;
90 Error *err = NULL;
91
92 for (i = 0; i < nb_props; i++) {
93 r = qemu_fdt_getprop(host_fdt, node_path,
94 props[i].name,
95 &prop_len,
96 &err);
97 if (r) {
98 qemu_fdt_setprop(guest_fdt, nodename,
99 props[i].name, r, prop_len);
100 } else {
101 if (props[i].optional && prop_len == -FDT_ERR_NOTFOUND) {
102 /* optional property does not exist */
103 error_free(err);
104 } else {
105 error_report_err(err);
106 }
107 if (!props[i].optional) {
108 /* mandatory property not found: bail out */
109 exit(1);
110 }
111 err = NULL;
112 }
113 }
114 }
115
116 /* clock properties whose values are copied/pasted from host */
117 static HostProperty clock_copied_properties[] = {
118 {"compatible", false},
119 {"#clock-cells", false},
120 {"clock-frequency", true},
121 {"clock-output-names", true},
122 };
123
124 /**
125 * fdt_build_clock_node
126 *
127 * Build a guest clock node, used as a dependency from a passthrough'ed
128 * device. Most information are retrieved from the host clock node.
129 * Also check the host clock is a fixed one.
130 *
131 * @host_fdt: host device tree blob from which info are retrieved
132 * @guest_fdt: guest device tree blob where the clock node is added
133 * @host_phandle: phandle of the clock in host device tree
134 * @guest_phandle: phandle to assign to the guest node
135 */
fdt_build_clock_node(void * host_fdt,void * guest_fdt,uint32_t host_phandle,uint32_t guest_phandle)136 static void fdt_build_clock_node(void *host_fdt, void *guest_fdt,
137 uint32_t host_phandle,
138 uint32_t guest_phandle)
139 {
140 char *node_path = NULL;
141 char *nodename;
142 const void *r;
143 int ret, node_offset, prop_len, path_len = 16;
144
145 node_offset = fdt_node_offset_by_phandle(host_fdt, host_phandle);
146 if (node_offset <= 0) {
147 error_report("not able to locate clock handle %d in host device tree",
148 host_phandle);
149 exit(1);
150 }
151 node_path = g_malloc(path_len);
152 while ((ret = fdt_get_path(host_fdt, node_offset, node_path, path_len))
153 == -FDT_ERR_NOSPACE) {
154 path_len += 16;
155 node_path = g_realloc(node_path, path_len);
156 }
157 if (ret < 0) {
158 error_report("not able to retrieve node path for clock handle %d",
159 host_phandle);
160 exit(1);
161 }
162
163 r = qemu_fdt_getprop(host_fdt, node_path, "compatible", &prop_len,
164 &error_fatal);
165 if (strcmp(r, "fixed-clock")) {
166 error_report("clock handle %d is not a fixed clock", host_phandle);
167 exit(1);
168 }
169
170 nodename = strrchr(node_path, '/');
171 qemu_fdt_add_subnode(guest_fdt, nodename);
172
173 copy_properties_from_host(clock_copied_properties,
174 ARRAY_SIZE(clock_copied_properties),
175 host_fdt, guest_fdt,
176 node_path, nodename);
177
178 qemu_fdt_setprop_cell(guest_fdt, nodename, "phandle", guest_phandle);
179
180 g_free(node_path);
181 }
182
183 /**
184 * sysfs_to_dt_name: convert the name found in sysfs into the node name
185 * for instance e0900000.xgmac is converted into xgmac@e0900000
186 * @sysfs_name: directory name in sysfs
187 *
188 * returns the device tree name upon success or NULL in case the sysfs name
189 * does not match the expected format
190 */
sysfs_to_dt_name(const char * sysfs_name)191 static char *sysfs_to_dt_name(const char *sysfs_name)
192 {
193 gchar **substrings = g_strsplit(sysfs_name, ".", 2);
194 char *dt_name = NULL;
195
196 if (!substrings || !substrings[0] || !substrings[1]) {
197 goto out;
198 }
199 dt_name = g_strdup_printf("%s@%s", substrings[1], substrings[0]);
200 out:
201 g_strfreev(substrings);
202 return dt_name;
203 }
204
205 /* Device Specific Code */
206
207 /**
208 * add_calxeda_midway_xgmac_fdt_node
209 *
210 * Generates a simple node with following properties:
211 * compatible string, regs, interrupts, dma-coherent
212 */
add_calxeda_midway_xgmac_fdt_node(SysBusDevice * sbdev,void * opaque)213 static int add_calxeda_midway_xgmac_fdt_node(SysBusDevice *sbdev, void *opaque)
214 {
215 PlatformBusFDTData *data = opaque;
216 PlatformBusDevice *pbus = data->pbus;
217 void *fdt = data->fdt;
218 const char *parent_node = data->pbus_node_name;
219 int compat_str_len, i;
220 char *nodename;
221 uint32_t *irq_attr, *reg_attr;
222 uint64_t mmio_base, irq_number;
223 VFIOPlatformDevice *vdev = VFIO_PLATFORM_DEVICE(sbdev);
224 VFIODevice *vbasedev = &vdev->vbasedev;
225
226 mmio_base = platform_bus_get_mmio_addr(pbus, sbdev, 0);
227 nodename = g_strdup_printf("%s/%s@%" PRIx64, parent_node,
228 vbasedev->name, mmio_base);
229 qemu_fdt_add_subnode(fdt, nodename);
230
231 compat_str_len = strlen(vdev->compat) + 1;
232 qemu_fdt_setprop(fdt, nodename, "compatible",
233 vdev->compat, compat_str_len);
234
235 qemu_fdt_setprop(fdt, nodename, "dma-coherent", "", 0);
236
237 reg_attr = g_new(uint32_t, vbasedev->num_regions * 2);
238 for (i = 0; i < vbasedev->num_regions; i++) {
239 mmio_base = platform_bus_get_mmio_addr(pbus, sbdev, i);
240 reg_attr[2 * i] = cpu_to_be32(mmio_base);
241 reg_attr[2 * i + 1] = cpu_to_be32(
242 memory_region_size(vdev->regions[i]->mem));
243 }
244 qemu_fdt_setprop(fdt, nodename, "reg", reg_attr,
245 vbasedev->num_regions * 2 * sizeof(uint32_t));
246
247 irq_attr = g_new(uint32_t, vbasedev->num_irqs * 3);
248 for (i = 0; i < vbasedev->num_irqs; i++) {
249 irq_number = platform_bus_get_irqn(pbus, sbdev , i)
250 + data->irq_start;
251 irq_attr[3 * i] = cpu_to_be32(GIC_FDT_IRQ_TYPE_SPI);
252 irq_attr[3 * i + 1] = cpu_to_be32(irq_number);
253 irq_attr[3 * i + 2] = cpu_to_be32(GIC_FDT_IRQ_FLAGS_LEVEL_HI);
254 }
255 qemu_fdt_setprop(fdt, nodename, "interrupts",
256 irq_attr, vbasedev->num_irqs * 3 * sizeof(uint32_t));
257 g_free(irq_attr);
258 g_free(reg_attr);
259 g_free(nodename);
260 return 0;
261 }
262
263 /* AMD xgbe properties whose values are copied/pasted from host */
264 static HostProperty amd_xgbe_copied_properties[] = {
265 {"compatible", false},
266 {"dma-coherent", true},
267 {"amd,per-channel-interrupt", true},
268 {"phy-mode", false},
269 {"mac-address", true},
270 {"amd,speed-set", false},
271 {"amd,serdes-blwc", true},
272 {"amd,serdes-cdr-rate", true},
273 {"amd,serdes-pq-skew", true},
274 {"amd,serdes-tx-amp", true},
275 {"amd,serdes-dfe-tap-config", true},
276 {"amd,serdes-dfe-tap-enable", true},
277 {"clock-names", false},
278 };
279
280 /**
281 * add_amd_xgbe_fdt_node
282 *
283 * Generates the combined xgbe/phy node following kernel >=4.2
284 * binding documentation:
285 * Documentation/devicetree/bindings/net/amd-xgbe.txt:
286 * Also 2 clock nodes are created (dma and ptp)
287 *
288 * Asserts in case of error
289 */
add_amd_xgbe_fdt_node(SysBusDevice * sbdev,void * opaque)290 static int add_amd_xgbe_fdt_node(SysBusDevice *sbdev, void *opaque)
291 {
292 PlatformBusFDTData *data = opaque;
293 PlatformBusDevice *pbus = data->pbus;
294 VFIOPlatformDevice *vdev = VFIO_PLATFORM_DEVICE(sbdev);
295 VFIODevice *vbasedev = &vdev->vbasedev;
296 VFIOINTp *intp;
297 const char *parent_node = data->pbus_node_name;
298 char **node_path, *nodename, *dt_name;
299 void *guest_fdt = data->fdt, *host_fdt;
300 const void *r;
301 int i, prop_len;
302 uint32_t *irq_attr, *reg_attr;
303 const uint32_t *host_clock_phandles;
304 uint64_t mmio_base, irq_number;
305 uint32_t guest_clock_phandles[2];
306
307 host_fdt = load_device_tree_from_sysfs();
308
309 dt_name = sysfs_to_dt_name(vbasedev->name);
310 if (!dt_name) {
311 error_report("%s incorrect sysfs device name %s",
312 __func__, vbasedev->name);
313 exit(1);
314 }
315 node_path = qemu_fdt_node_path(host_fdt, dt_name, vdev->compat,
316 &error_fatal);
317 if (!node_path || !node_path[0]) {
318 error_report("%s unable to retrieve node path for %s/%s",
319 __func__, dt_name, vdev->compat);
320 exit(1);
321 }
322
323 if (node_path[1]) {
324 error_report("%s more than one node matching %s/%s!",
325 __func__, dt_name, vdev->compat);
326 exit(1);
327 }
328
329 g_free(dt_name);
330
331 if (vbasedev->num_regions != 5) {
332 error_report("%s Does the host dt node combine XGBE/PHY?", __func__);
333 exit(1);
334 }
335
336 /* generate nodes for DMA_CLK and PTP_CLK */
337 r = qemu_fdt_getprop(host_fdt, node_path[0], "clocks",
338 &prop_len, &error_fatal);
339 if (prop_len != 8) {
340 error_report("%s clocks property should contain 2 handles", __func__);
341 exit(1);
342 }
343 host_clock_phandles = r;
344 guest_clock_phandles[0] = qemu_fdt_alloc_phandle(guest_fdt);
345 guest_clock_phandles[1] = qemu_fdt_alloc_phandle(guest_fdt);
346
347 /**
348 * clock handles fetched from host dt are in be32 layout whereas
349 * rest of the code uses cpu layout. Also guest clock handles are
350 * in cpu layout.
351 */
352 fdt_build_clock_node(host_fdt, guest_fdt,
353 be32_to_cpu(host_clock_phandles[0]),
354 guest_clock_phandles[0]);
355
356 fdt_build_clock_node(host_fdt, guest_fdt,
357 be32_to_cpu(host_clock_phandles[1]),
358 guest_clock_phandles[1]);
359
360 /* combined XGBE/PHY node */
361 mmio_base = platform_bus_get_mmio_addr(pbus, sbdev, 0);
362 nodename = g_strdup_printf("%s/%s@%" PRIx64, parent_node,
363 vbasedev->name, mmio_base);
364 qemu_fdt_add_subnode(guest_fdt, nodename);
365
366 copy_properties_from_host(amd_xgbe_copied_properties,
367 ARRAY_SIZE(amd_xgbe_copied_properties),
368 host_fdt, guest_fdt,
369 node_path[0], nodename);
370
371 qemu_fdt_setprop_cells(guest_fdt, nodename, "clocks",
372 guest_clock_phandles[0],
373 guest_clock_phandles[1]);
374
375 reg_attr = g_new(uint32_t, vbasedev->num_regions * 2);
376 for (i = 0; i < vbasedev->num_regions; i++) {
377 mmio_base = platform_bus_get_mmio_addr(pbus, sbdev, i);
378 reg_attr[2 * i] = cpu_to_be32(mmio_base);
379 reg_attr[2 * i + 1] = cpu_to_be32(
380 memory_region_size(vdev->regions[i]->mem));
381 }
382 qemu_fdt_setprop(guest_fdt, nodename, "reg", reg_attr,
383 vbasedev->num_regions * 2 * sizeof(uint32_t));
384
385 irq_attr = g_new(uint32_t, vbasedev->num_irqs * 3);
386 for (i = 0; i < vbasedev->num_irqs; i++) {
387 irq_number = platform_bus_get_irqn(pbus, sbdev , i)
388 + data->irq_start;
389 irq_attr[3 * i] = cpu_to_be32(GIC_FDT_IRQ_TYPE_SPI);
390 irq_attr[3 * i + 1] = cpu_to_be32(irq_number);
391 /*
392 * General device interrupt and PCS auto-negotiation interrupts are
393 * level-sensitive while the 4 per-channel interrupts are edge
394 * sensitive
395 */
396 QLIST_FOREACH(intp, &vdev->intp_list, next) {
397 if (intp->pin == i) {
398 break;
399 }
400 }
401 if (intp->flags & VFIO_IRQ_INFO_AUTOMASKED) {
402 irq_attr[3 * i + 2] = cpu_to_be32(GIC_FDT_IRQ_FLAGS_LEVEL_HI);
403 } else {
404 irq_attr[3 * i + 2] = cpu_to_be32(GIC_FDT_IRQ_FLAGS_EDGE_LO_HI);
405 }
406 }
407 qemu_fdt_setprop(guest_fdt, nodename, "interrupts",
408 irq_attr, vbasedev->num_irqs * 3 * sizeof(uint32_t));
409
410 g_free(host_fdt);
411 g_strfreev(node_path);
412 g_free(irq_attr);
413 g_free(reg_attr);
414 g_free(nodename);
415 return 0;
416 }
417
418 /* DT compatible matching */
vfio_platform_match(SysBusDevice * sbdev,const BindingEntry * entry)419 static bool vfio_platform_match(SysBusDevice *sbdev,
420 const BindingEntry *entry)
421 {
422 VFIOPlatformDevice *vdev = VFIO_PLATFORM_DEVICE(sbdev);
423 const char *compat;
424 unsigned int n;
425
426 for (n = vdev->num_compat, compat = vdev->compat; n > 0;
427 n--, compat += strlen(compat) + 1) {
428 if (!strcmp(entry->compat, compat)) {
429 return true;
430 }
431 }
432
433 return false;
434 }
435
436 #define VFIO_PLATFORM_BINDING(compat, add_fn) \
437 {TYPE_VFIO_PLATFORM, (compat), (add_fn), vfio_platform_match}
438
439 #endif /* CONFIG_LINUX */
440
441 #ifdef CONFIG_TPM
442 /*
443 * add_tpm_tis_fdt_node: Create a DT node for TPM TIS
444 *
445 * See kernel documentation:
446 * Documentation/devicetree/bindings/security/tpm/tpm_tis_mmio.txt
447 * Optional interrupt for command completion is not exposed
448 */
add_tpm_tis_fdt_node(SysBusDevice * sbdev,void * opaque)449 static int add_tpm_tis_fdt_node(SysBusDevice *sbdev, void *opaque)
450 {
451 PlatformBusFDTData *data = opaque;
452 PlatformBusDevice *pbus = data->pbus;
453 void *fdt = data->fdt;
454 const char *parent_node = data->pbus_node_name;
455 char *nodename;
456 uint32_t reg_attr[2];
457 uint64_t mmio_base;
458
459 mmio_base = platform_bus_get_mmio_addr(pbus, sbdev, 0);
460 nodename = g_strdup_printf("%s/tpm_tis@%" PRIx64, parent_node, mmio_base);
461 qemu_fdt_add_subnode(fdt, nodename);
462
463 qemu_fdt_setprop_string(fdt, nodename, "compatible", "tcg,tpm-tis-mmio");
464
465 reg_attr[0] = cpu_to_be32(mmio_base);
466 reg_attr[1] = cpu_to_be32(0x5000);
467 qemu_fdt_setprop(fdt, nodename, "reg", reg_attr, 2 * sizeof(uint32_t));
468
469 g_free(nodename);
470 return 0;
471 }
472 #endif
473
no_fdt_node(SysBusDevice * sbdev,void * opaque)474 static int no_fdt_node(SysBusDevice *sbdev, void *opaque)
475 {
476 return 0;
477 }
478
479 /* Device type based matching */
type_match(SysBusDevice * sbdev,const BindingEntry * entry)480 static bool type_match(SysBusDevice *sbdev, const BindingEntry *entry)
481 {
482 return !strcmp(object_get_typename(OBJECT(sbdev)), entry->typename);
483 }
484
485 #define TYPE_BINDING(type, add_fn) {(type), NULL, (add_fn), NULL}
486
487 /* list of supported dynamic sysbus bindings */
488 static const BindingEntry bindings[] = {
489 #ifdef CONFIG_LINUX
490 TYPE_BINDING(TYPE_VFIO_CALXEDA_XGMAC, add_calxeda_midway_xgmac_fdt_node),
491 TYPE_BINDING(TYPE_VFIO_AMD_XGBE, add_amd_xgbe_fdt_node),
492 VFIO_PLATFORM_BINDING("amd,xgbe-seattle-v1a", add_amd_xgbe_fdt_node),
493 #endif
494 #ifdef CONFIG_TPM
495 TYPE_BINDING(TYPE_TPM_TIS_SYSBUS, add_tpm_tis_fdt_node),
496 #endif
497 TYPE_BINDING(TYPE_RAMFB_DEVICE, no_fdt_node),
498 TYPE_BINDING("", NULL), /* last element */
499 };
500
501 /* Generic Code */
502
503 /**
504 * add_fdt_node - add the device tree node of a dynamic sysbus device
505 *
506 * @sbdev: handle to the sysbus device
507 * @opaque: handle to the PlatformBusFDTData
508 *
509 * Checks the sysbus type belongs to the list of device types that
510 * are dynamically instantiable and if so call the node creation
511 * function.
512 */
add_fdt_node(SysBusDevice * sbdev,void * opaque)513 static void add_fdt_node(SysBusDevice *sbdev, void *opaque)
514 {
515 int i, ret;
516
517 for (i = 0; i < ARRAY_SIZE(bindings); i++) {
518 const BindingEntry *iter = &bindings[i];
519
520 if (type_match(sbdev, iter)) {
521 if (!iter->match_fn || iter->match_fn(sbdev, iter)) {
522 ret = iter->add_fn(sbdev, opaque);
523 assert(!ret);
524 return;
525 }
526 }
527 }
528 error_report("Device %s can not be dynamically instantiated",
529 qdev_fw_name(DEVICE(sbdev)));
530 exit(1);
531 }
532
platform_bus_add_all_fdt_nodes(void * fdt,const char * intc,hwaddr addr,hwaddr bus_size,int irq_start)533 void platform_bus_add_all_fdt_nodes(void *fdt, const char *intc, hwaddr addr,
534 hwaddr bus_size, int irq_start)
535 {
536 const char platcomp[] = "qemu,platform\0simple-bus";
537 PlatformBusDevice *pbus;
538 DeviceState *dev;
539 gchar *node;
540
541 assert(fdt);
542
543 node = g_strdup_printf("/platform-bus@%"PRIx64, addr);
544
545 /* Create a /platform node that we can put all devices into */
546 qemu_fdt_add_subnode(fdt, node);
547 qemu_fdt_setprop(fdt, node, "compatible", platcomp, sizeof(platcomp));
548
549 /* Our platform bus region is less than 32bits, so 1 cell is enough for
550 * address and size
551 */
552 qemu_fdt_setprop_cells(fdt, node, "#size-cells", 1);
553 qemu_fdt_setprop_cells(fdt, node, "#address-cells", 1);
554 qemu_fdt_setprop_cells(fdt, node, "ranges", 0, addr >> 32, addr, bus_size);
555
556 qemu_fdt_setprop_phandle(fdt, node, "interrupt-parent", intc);
557
558 dev = qdev_find_recursive(sysbus_get_default(), TYPE_PLATFORM_BUS_DEVICE);
559 pbus = PLATFORM_BUS_DEVICE(dev);
560
561 PlatformBusFDTData data = {
562 .fdt = fdt,
563 .irq_start = irq_start,
564 .pbus_node_name = node,
565 .pbus = pbus,
566 };
567
568 /* Loop through all dynamic sysbus devices and create their node */
569 foreach_dynamic_sysbus_device(add_fdt_node, &data);
570
571 g_free(node);
572 }
573