ofnode: add {ofnode, dev}_read_resource_byname()
[platform/kernel/u-boot.git] / drivers / core / ofnode.c
1 /*
2  * Copyright (c) 2017 Google, Inc
3  * Written by Simon Glass <sjg@chromium.org>
4  *
5  * SPDX-License-Identifier:     GPL-2.0+
6  */
7
8 #include <common.h>
9 #include <dm.h>
10 #include <fdtdec.h>
11 #include <fdt_support.h>
12 #include <libfdt.h>
13 #include <dm/of_access.h>
14 #include <dm/of_addr.h>
15 #include <dm/ofnode.h>
16 #include <linux/err.h>
17 #include <linux/ioport.h>
18
19 int ofnode_read_u32(ofnode node, const char *propname, u32 *outp)
20 {
21         assert(ofnode_valid(node));
22         debug("%s: %s: ", __func__, propname);
23
24         if (ofnode_is_np(node)) {
25                 return of_read_u32(ofnode_to_np(node), propname, outp);
26         } else {
27                 const fdt32_t *cell;
28                 int len;
29
30                 cell = fdt_getprop(gd->fdt_blob, ofnode_to_offset(node),
31                                    propname, &len);
32                 if (!cell || len < sizeof(int)) {
33                         debug("(not found)\n");
34                         return -EINVAL;
35                 }
36                 *outp = fdt32_to_cpu(cell[0]);
37         }
38         debug("%#x (%d)\n", *outp, *outp);
39
40         return 0;
41 }
42
43 int ofnode_read_u32_default(ofnode node, const char *propname, u32 def)
44 {
45         assert(ofnode_valid(node));
46         ofnode_read_u32(node, propname, &def);
47
48         return def;
49 }
50
51 int ofnode_read_s32_default(ofnode node, const char *propname, s32 def)
52 {
53         assert(ofnode_valid(node));
54         ofnode_read_u32(node, propname, (u32 *)&def);
55
56         return def;
57 }
58
59 bool ofnode_read_bool(ofnode node, const char *propname)
60 {
61         const void *prop;
62
63         assert(ofnode_valid(node));
64         debug("%s: %s: ", __func__, propname);
65
66         prop = ofnode_get_property(node, propname, NULL);
67
68         debug("%s\n", prop ? "true" : "false");
69
70         return prop ? true : false;
71 }
72
73 const char *ofnode_read_string(ofnode node, const char *propname)
74 {
75         const char *str = NULL;
76         int len = -1;
77
78         assert(ofnode_valid(node));
79         debug("%s: %s: ", __func__, propname);
80
81         if (ofnode_is_np(node)) {
82                 struct property *prop = of_find_property(
83                                 ofnode_to_np(node), propname, NULL);
84
85                 if (prop) {
86                         str = prop->value;
87                         len = prop->length;
88                 }
89         } else {
90                 str = fdt_getprop(gd->fdt_blob, ofnode_to_offset(node),
91                                   propname, &len);
92         }
93         if (!str) {
94                 debug("<not found>\n");
95                 return NULL;
96         }
97         if (strnlen(str, len) >= len) {
98                 debug("<invalid>\n");
99                 return NULL;
100         }
101         debug("%s\n", str);
102
103         return str;
104 }
105
106 ofnode ofnode_find_subnode(ofnode node, const char *subnode_name)
107 {
108         ofnode subnode;
109
110         assert(ofnode_valid(node));
111         debug("%s: %s: ", __func__, subnode_name);
112
113         if (ofnode_is_np(node)) {
114                 const struct device_node *np = ofnode_to_np(node);
115
116                 for (np = np->child; np; np = np->sibling) {
117                         if (!strcmp(subnode_name, np->name))
118                                 break;
119                 }
120                 subnode = np_to_ofnode(np);
121         } else {
122                 int ooffset = fdt_subnode_offset(gd->fdt_blob,
123                                 ofnode_to_offset(node), subnode_name);
124                 subnode = offset_to_ofnode(ooffset);
125         }
126         debug("%s\n", ofnode_valid(subnode) ?
127               ofnode_get_name(subnode) : "<none>");
128
129         return subnode;
130 }
131
132 int ofnode_read_u32_array(ofnode node, const char *propname,
133                           u32 *out_values, size_t sz)
134 {
135         assert(ofnode_valid(node));
136         debug("%s: %s: ", __func__, propname);
137
138         if (ofnode_is_np(node)) {
139                 return of_read_u32_array(ofnode_to_np(node), propname,
140                                          out_values, sz);
141         } else {
142                 return fdtdec_get_int_array(gd->fdt_blob,
143                                             ofnode_to_offset(node), propname,
144                                             out_values, sz);
145         }
146 }
147
148 ofnode ofnode_first_subnode(ofnode node)
149 {
150         assert(ofnode_valid(node));
151         if (ofnode_is_np(node))
152                 return np_to_ofnode(node.np->child);
153
154         return offset_to_ofnode(
155                 fdt_first_subnode(gd->fdt_blob, ofnode_to_offset(node)));
156 }
157
158 ofnode ofnode_next_subnode(ofnode node)
159 {
160         assert(ofnode_valid(node));
161         if (ofnode_is_np(node))
162                 return np_to_ofnode(node.np->sibling);
163
164         return offset_to_ofnode(
165                 fdt_next_subnode(gd->fdt_blob, ofnode_to_offset(node)));
166 }
167
168 const char *ofnode_get_name(ofnode node)
169 {
170         assert(ofnode_valid(node));
171         if (ofnode_is_np(node))
172                 return strrchr(node.np->full_name, '/') + 1;
173
174         return fdt_get_name(gd->fdt_blob, ofnode_to_offset(node), NULL);
175 }
176
177 int ofnode_read_size(ofnode node, const char *propname)
178 {
179         int len;
180
181         if (ofnode_is_np(node)) {
182                 struct property *prop = of_find_property(
183                                 ofnode_to_np(node), propname, NULL);
184
185                 if (prop)
186                         return prop->length;
187         } else {
188                 if (fdt_getprop(gd->fdt_blob, ofnode_to_offset(node), propname,
189                                 &len))
190                         return len;
191         }
192
193         return -EINVAL;
194 }
195
196 fdt_addr_t ofnode_get_addr_index(ofnode node, int index)
197 {
198         if (ofnode_is_np(node)) {
199                 const __be32 *prop_val;
200                 uint flags;
201                 u64 size;
202                 int na;
203
204                 prop_val = of_get_address(ofnode_to_np(node), index, &size,
205                                           &flags);
206                 if (!prop_val)
207                         return FDT_ADDR_T_NONE;
208                 na = of_n_addr_cells(ofnode_to_np(node));
209                 return of_read_number(prop_val, na);
210         } else {
211                 return fdt_get_base_address(gd->fdt_blob,
212                                             ofnode_to_offset(node));
213         }
214
215         return FDT_ADDR_T_NONE;
216 }
217
218 fdt_addr_t ofnode_get_addr(ofnode node)
219 {
220         return ofnode_get_addr_index(node, 0);
221 }
222
223 int ofnode_stringlist_search(ofnode node, const char *property,
224                              const char *string)
225 {
226         if (ofnode_is_np(node)) {
227                 return of_property_match_string(ofnode_to_np(node),
228                                                 property, string);
229         } else {
230                 int ret;
231
232                 ret = fdt_stringlist_search(gd->fdt_blob,
233                                             ofnode_to_offset(node), property,
234                                             string);
235                 if (ret == -FDT_ERR_NOTFOUND)
236                         return -ENODATA;
237                 else if (ret < 0)
238                         return -EINVAL;
239
240                 return ret;
241         }
242 }
243
244 int ofnode_read_string_index(ofnode node, const char *property, int index,
245                              const char **outp)
246 {
247         if (ofnode_is_np(node)) {
248                 return of_property_read_string_index(ofnode_to_np(node),
249                                                      property, index, outp);
250         } else {
251                 int len;
252
253                 *outp = fdt_stringlist_get(gd->fdt_blob, ofnode_to_offset(node),
254                                            property, index, &len);
255                 if (len < 0)
256                         return -EINVAL;
257                 return 0;
258         }
259 }
260
261 int ofnode_read_string_count(ofnode node, const char *property)
262 {
263         if (ofnode_is_np(node)) {
264                 return of_property_count_strings(ofnode_to_np(node), property);
265         } else {
266                 return fdt_stringlist_count(gd->fdt_blob,
267                                             ofnode_to_offset(node), property);
268         }
269 }
270
271 static void ofnode_from_fdtdec_phandle_args(struct fdtdec_phandle_args *in,
272                                             struct ofnode_phandle_args *out)
273 {
274         assert(OF_MAX_PHANDLE_ARGS == MAX_PHANDLE_ARGS);
275         out->node = offset_to_ofnode(in->node);
276         out->args_count = in->args_count;
277         memcpy(out->args, in->args, sizeof(out->args));
278 }
279
280 static void ofnode_from_of_phandle_args(struct of_phandle_args *in,
281                                         struct ofnode_phandle_args *out)
282 {
283         assert(OF_MAX_PHANDLE_ARGS == MAX_PHANDLE_ARGS);
284         out->node = np_to_ofnode(in->np);
285         out->args_count = in->args_count;
286         memcpy(out->args, in->args, sizeof(out->args));
287 }
288
289 int ofnode_parse_phandle_with_args(ofnode node, const char *list_name,
290                                    const char *cells_name, int cell_count,
291                                    int index,
292                                    struct ofnode_phandle_args *out_args)
293 {
294         if (ofnode_is_np(node)) {
295                 struct of_phandle_args args;
296                 int ret;
297
298                 ret = of_parse_phandle_with_args(ofnode_to_np(node),
299                                 list_name, cells_name, index, &args);
300                 if (ret)
301                         return ret;
302                 ofnode_from_of_phandle_args(&args, out_args);
303         } else {
304                 struct fdtdec_phandle_args args;
305                 int ret;
306
307                 ret = fdtdec_parse_phandle_with_args(gd->fdt_blob,
308                                 ofnode_to_offset(node), list_name, cells_name,
309                                 cell_count, index, &args);
310                 if (ret)
311                         return ret;
312                 ofnode_from_fdtdec_phandle_args(&args, out_args);
313         }
314
315         return 0;
316 }
317
318 int ofnode_count_phandle_with_args(ofnode node, const char *list_name,
319                                    const char *cells_name)
320 {
321         if (ofnode_is_np(node))
322                 return of_count_phandle_with_args(ofnode_to_np(node),
323                                 list_name, cells_name);
324         else
325                 return fdtdec_parse_phandle_with_args(gd->fdt_blob,
326                                 ofnode_to_offset(node), list_name, cells_name,
327                                 0, -1, NULL);
328 }
329
330 ofnode ofnode_path(const char *path)
331 {
332         if (of_live_active())
333                 return np_to_ofnode(of_find_node_by_path(path));
334         else
335                 return offset_to_ofnode(fdt_path_offset(gd->fdt_blob, path));
336 }
337
338 const char *ofnode_get_chosen_prop(const char *name)
339 {
340         ofnode chosen_node;
341
342         chosen_node = ofnode_path("/chosen");
343
344         return ofnode_read_string(chosen_node, name);
345 }
346
347 ofnode ofnode_get_chosen_node(const char *name)
348 {
349         const char *prop;
350
351         prop = ofnode_get_chosen_prop(name);
352         if (!prop)
353                 return ofnode_null();
354
355         return ofnode_path(prop);
356 }
357
358 static int decode_timing_property(ofnode node, const char *name,
359                                   struct timing_entry *result)
360 {
361         int length, ret = 0;
362
363         length = ofnode_read_size(node, name);
364         if (length < 0) {
365                 debug("%s: could not find property %s\n",
366                       ofnode_get_name(node), name);
367                 return length;
368         }
369
370         if (length == sizeof(u32)) {
371                 result->typ = ofnode_read_u32_default(node, name, 0);
372                 result->min = result->typ;
373                 result->max = result->typ;
374         } else {
375                 ret = ofnode_read_u32_array(node, name, &result->min, 3);
376         }
377
378         return ret;
379 }
380
381 int ofnode_decode_display_timing(ofnode parent, int index,
382                                  struct display_timing *dt)
383 {
384         int i;
385         ofnode timings, node;
386         u32 val = 0;
387         int ret = 0;
388
389         timings = ofnode_find_subnode(parent, "display-timings");
390         if (!ofnode_valid(timings))
391                 return -EINVAL;
392
393         for (i = 0, node = ofnode_first_subnode(timings);
394              ofnode_valid(node) && i != index;
395              node = ofnode_first_subnode(node))
396                 i++;
397
398         if (!ofnode_valid(node))
399                 return -EINVAL;
400
401         memset(dt, 0, sizeof(*dt));
402
403         ret |= decode_timing_property(node, "hback-porch", &dt->hback_porch);
404         ret |= decode_timing_property(node, "hfront-porch", &dt->hfront_porch);
405         ret |= decode_timing_property(node, "hactive", &dt->hactive);
406         ret |= decode_timing_property(node, "hsync-len", &dt->hsync_len);
407         ret |= decode_timing_property(node, "vback-porch", &dt->vback_porch);
408         ret |= decode_timing_property(node, "vfront-porch", &dt->vfront_porch);
409         ret |= decode_timing_property(node, "vactive", &dt->vactive);
410         ret |= decode_timing_property(node, "vsync-len", &dt->vsync_len);
411         ret |= decode_timing_property(node, "clock-frequency", &dt->pixelclock);
412
413         dt->flags = 0;
414         val = ofnode_read_u32_default(node, "vsync-active", -1);
415         if (val != -1) {
416                 dt->flags |= val ? DISPLAY_FLAGS_VSYNC_HIGH :
417                                 DISPLAY_FLAGS_VSYNC_LOW;
418         }
419         val = ofnode_read_u32_default(node, "hsync-active", -1);
420         if (val != -1) {
421                 dt->flags |= val ? DISPLAY_FLAGS_HSYNC_HIGH :
422                                 DISPLAY_FLAGS_HSYNC_LOW;
423         }
424         val = ofnode_read_u32_default(node, "de-active", -1);
425         if (val != -1) {
426                 dt->flags |= val ? DISPLAY_FLAGS_DE_HIGH :
427                                 DISPLAY_FLAGS_DE_LOW;
428         }
429         val = ofnode_read_u32_default(node, "pixelclk-active", -1);
430         if (val != -1) {
431                 dt->flags |= val ? DISPLAY_FLAGS_PIXDATA_POSEDGE :
432                                 DISPLAY_FLAGS_PIXDATA_NEGEDGE;
433         }
434
435         if (ofnode_read_bool(node, "interlaced"))
436                 dt->flags |= DISPLAY_FLAGS_INTERLACED;
437         if (ofnode_read_bool(node, "doublescan"))
438                 dt->flags |= DISPLAY_FLAGS_DOUBLESCAN;
439         if (ofnode_read_bool(node, "doubleclk"))
440                 dt->flags |= DISPLAY_FLAGS_DOUBLECLK;
441
442         return ret;
443 }
444
445 const void *ofnode_get_property(ofnode node, const char *propname, int *lenp)
446 {
447         if (ofnode_is_np(node))
448                 return of_get_property(ofnode_to_np(node), propname, lenp);
449         else
450                 return fdt_getprop(gd->fdt_blob, ofnode_to_offset(node),
451                                    propname, lenp);
452 }
453
454 bool ofnode_is_available(ofnode node)
455 {
456         if (ofnode_is_np(node))
457                 return of_device_is_available(ofnode_to_np(node));
458         else
459                 return fdtdec_get_is_enabled(gd->fdt_blob,
460                                              ofnode_to_offset(node));
461 }
462
463 fdt_addr_t ofnode_get_addr_size(ofnode node, const char *property,
464                                 fdt_size_t *sizep)
465 {
466         if (ofnode_is_np(node)) {
467                 int na, ns;
468                 int psize;
469                 const struct device_node *np = ofnode_to_np(node);
470                 const __be32 *prop = of_get_property(np, "reg", &psize);
471
472                 na = of_n_addr_cells(np);
473                 ns = of_n_addr_cells(np);
474                 *sizep = of_read_number(prop + na, ns);
475                 return of_read_number(prop, na);
476         } else {
477                 return fdtdec_get_addr_size(gd->fdt_blob,
478                                             ofnode_to_offset(node), property,
479                                             sizep);
480         }
481 }
482
483 const uint8_t *ofnode_read_u8_array_ptr(ofnode node, const char *propname,
484                                         size_t sz)
485 {
486         if (ofnode_is_np(node)) {
487                 const struct device_node *np = ofnode_to_np(node);
488                 int psize;
489                 const __be32 *prop = of_get_property(np, propname, &psize);
490
491                 if (!prop || sz != psize)
492                         return NULL;
493                 return (uint8_t *)prop;
494
495         } else {
496                 return fdtdec_locate_byte_array(gd->fdt_blob,
497                                 ofnode_to_offset(node), propname, sz);
498         }
499 }
500
501 int ofnode_read_pci_addr(ofnode node, enum fdt_pci_space type,
502                          const char *propname, struct fdt_pci_addr *addr)
503 {
504         const fdt32_t *cell;
505         int len;
506         int ret = -ENOENT;
507
508         debug("%s: %s: ", __func__, propname);
509
510         /*
511          * If we follow the pci bus bindings strictly, we should check
512          * the value of the node's parent node's #address-cells and
513          * #size-cells. They need to be 3 and 2 accordingly. However,
514          * for simplicity we skip the check here.
515          */
516         cell = ofnode_get_property(node, propname, &len);
517         if (!cell)
518                 goto fail;
519
520         if ((len % FDT_PCI_REG_SIZE) == 0) {
521                 int num = len / FDT_PCI_REG_SIZE;
522                 int i;
523
524                 for (i = 0; i < num; i++) {
525                         debug("pci address #%d: %08lx %08lx %08lx\n", i,
526                               (ulong)fdt32_to_cpu(cell[0]),
527                               (ulong)fdt32_to_cpu(cell[1]),
528                               (ulong)fdt32_to_cpu(cell[2]));
529                         if ((fdt32_to_cpu(*cell) & type) == type) {
530                                 addr->phys_hi = fdt32_to_cpu(cell[0]);
531                                 addr->phys_mid = fdt32_to_cpu(cell[1]);
532                                 addr->phys_lo = fdt32_to_cpu(cell[1]);
533                                 break;
534                         } else {
535                                 cell += (FDT_PCI_ADDR_CELLS +
536                                          FDT_PCI_SIZE_CELLS);
537                         }
538                 }
539
540                 if (i == num) {
541                         ret = -ENXIO;
542                         goto fail;
543                 }
544
545                 return 0;
546         } else {
547                 ret = -EINVAL;
548         }
549
550 fail:
551         debug("(not found)\n");
552         return ret;
553 }
554
555 int ofnode_read_addr_cells(ofnode node)
556 {
557         if (ofnode_is_np(node))
558                 return of_n_addr_cells(ofnode_to_np(node));
559         else  /* NOTE: this call should walk up the parent stack */
560                 return fdt_address_cells(gd->fdt_blob, ofnode_to_offset(node));
561 }
562
563 int ofnode_read_size_cells(ofnode node)
564 {
565         if (ofnode_is_np(node))
566                 return of_n_size_cells(ofnode_to_np(node));
567         else  /* NOTE: this call should walk up the parent stack */
568                 return fdt_size_cells(gd->fdt_blob, ofnode_to_offset(node));
569 }
570
571 int ofnode_read_simple_addr_cells(ofnode node)
572 {
573         if (ofnode_is_np(node))
574                 return of_simple_addr_cells(ofnode_to_np(node));
575         else
576                 return fdt_address_cells(gd->fdt_blob, ofnode_to_offset(node));
577 }
578
579 int ofnode_read_simple_size_cells(ofnode node)
580 {
581         if (ofnode_is_np(node))
582                 return of_simple_size_cells(ofnode_to_np(node));
583         else
584                 return fdt_size_cells(gd->fdt_blob, ofnode_to_offset(node));
585 }
586
587 bool ofnode_pre_reloc(ofnode node)
588 {
589         if (ofnode_read_bool(node, "u-boot,dm-pre-reloc"))
590                 return true;
591
592 #ifdef CONFIG_TPL_BUILD
593         if (ofnode_read_bool(node, "u-boot,dm-tpl"))
594                 return true;
595 #elif defined(CONFIG_SPL_BUILD)
596         if (ofnode_read_bool(node, "u-boot,dm-spl"))
597                 return true;
598 #else
599         /*
600          * In regular builds individual spl and tpl handling both
601          * count as handled pre-relocation for later second init.
602          */
603         if (ofnode_read_bool(node, "u-boot,dm-spl") ||
604             ofnode_read_bool(node, "u-boot,dm-tpl"))
605                 return true;
606 #endif
607
608         return false;
609 }
610
611 int ofnode_read_resource(ofnode node, uint index, struct resource *res)
612 {
613         if (ofnode_is_np(node)) {
614                 return of_address_to_resource(ofnode_to_np(node), index, res);
615         } else {
616                 struct fdt_resource fres;
617                 int ret;
618
619                 ret = fdt_get_resource(gd->fdt_blob, ofnode_to_offset(node),
620                                        "reg", index, &fres);
621                 if (ret < 0)
622                         return -EINVAL;
623                 memset(res, '\0', sizeof(*res));
624                 res->start = fres.start;
625                 res->end = fres.end;
626
627                 return 0;
628         }
629 }
630
631 int ofnode_read_resource_byname(ofnode node, const char *name,
632                                 struct resource *res)
633 {
634         int index;
635
636         index = ofnode_stringlist_search(node, "reg-names", name);
637         if (index < 0)
638                 return index;
639
640         return ofnode_read_resource(node, index, res);
641 }