]> git.kernelconcepts.de Git - karo-tx-uboot.git/blob - board/karo/common/fdt.c
Merge branch 'tx51-bugfix' into karo-tx-merge
[karo-tx-uboot.git] / board / karo / common / fdt.c
1 /*
2  * (C) Copyright 2012,2013 Lothar Waßmann <LW@KARO-electronics.de>
3  *
4  * See file CREDITS for list of people who contributed to this
5  * project.
6  *
7  * This program is free software; you can redistribute it and/or
8  * modify it under the terms of the GNU General Public License
9  * version 2 as published by the Free Software Foundation.
10  *
11  * This program is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  * GNU General Public License for more details.
15  *
16 */
17
18 #include <common.h>
19 #include <errno.h>
20 #include <libfdt.h>
21 #include <fdt_support.h>
22 #include <nand.h>
23 #include <linux/list.h>
24 #include <linux/fb.h>
25 #include <jffs2/load_kernel.h>
26
27 #include "karo.h"
28
29 #ifdef CONFIG_MAX_DTB_SIZE
30 #define MAX_DTB_SIZE    CONFIG_MAX_DTB_SIZE
31 #else
32 #define MAX_DTB_SIZE    SZ_64K
33 #endif
34
35 DECLARE_GLOBAL_DATA_PTR;
36
37 static void karo_set_fdtsize(void *fdt)
38 {
39         char fdt_size[9];
40         size_t fdtsize = getenv_ulong("fdtsize", 16, 0);
41
42         if (fdtsize == fdt_totalsize(fdt)) {
43                 return;
44         }
45         debug("FDT size changed from %u to %u\n",
46                 fdtsize, fdt_totalsize(fdt));
47
48         snprintf(fdt_size, sizeof(fdt_size), "%08x", fdt_totalsize(fdt));
49         setenv("fdtsize", fdt_size);
50 }
51
52 void karo_fdt_move_fdt(void)
53 {
54         void *fdt;
55         unsigned long fdt_addr = getenv_ulong("fdtaddr", 16, 0);
56
57         if (working_fdt) {
58                 debug("DTB already loaded\n");
59                 return;
60         }
61
62         if (!fdt_addr) {
63                 fdt_addr = CONFIG_SYS_FDT_ADDR;
64                 printf("fdtaddr is not set; using default: %08lx\n",
65                         fdt_addr);
66         }
67
68         fdt = karo_fdt_load_dtb();
69         if (fdt == NULL) {
70                 fdt = (void *)gd->fdt_blob;
71                 if (fdt == NULL) {
72                         printf("Compiled in FDT not found\n");
73                         return;
74                 }
75                 debug("Checking FDT header @ %p\n", fdt);
76                 if (fdt_check_header(fdt)) {
77                         printf("ERROR: No valid DTB found at %p\n", fdt);
78                         return;
79                 }
80                 printf("No DTB in flash; using default DTB\n");
81                 debug("Moving FDT from %p..%p to %08lx..%08lx\n",
82                         fdt, fdt + fdt_totalsize(fdt) - 1,
83                         fdt_addr, fdt_addr + fdt_totalsize(fdt) - 1);
84                 memmove((void *)fdt_addr, fdt, fdt_totalsize(fdt));
85         }
86         set_working_fdt_addr((void *)fdt_addr);
87         gd->fdt_blob = fdt;
88         karo_set_fdtsize(fdt);
89 }
90
91 void karo_fdt_remove_node(void *blob, const char *node)
92 {
93         int off = fdt_path_offset(blob, node);
94         int ret;
95
96         debug("Removing node '%s' from DT\n", node);
97
98         if (off < 0) {
99                 printf("Could not find node '%s': %d\n", node, off);
100         } else {
101                 ret = fdt_del_node(blob, off);
102                 if (ret)
103                         printf("Failed to remove node '%s': %d\n",
104                                 node, ret);
105         }
106         karo_set_fdtsize(blob);
107 }
108
109 void karo_fdt_enable_node(void *blob, const char *node, int enable)
110 {
111         int off = fdt_path_offset(blob, node);
112
113         debug("%sabling node '%s'\n", enable ? "En" : "Dis", node);
114         if (off < 0) {
115                 printf("Could not find node '%s': %d\n", node, off);
116                 return;
117         }
118         fdt_set_node_status(blob, off,
119                         enable ? FDT_STATUS_OKAY : FDT_STATUS_DISABLED, 0);
120
121         karo_set_fdtsize(blob);
122 }
123
124 static const char *karo_touchpanels[] = {
125         "ti,tsc2007",
126         "edt,edt-ft5x06",
127 #ifdef CONFIG_MX28
128         "fsl,imx28-lradc",
129 #endif
130 };
131
132 static void fdt_disable_tp_node(void *blob, const char *name)
133 {
134         int offs = fdt_node_offset_by_compatible(blob, -1, name);
135
136         if (offs < 0) {
137                 debug("node '%s' not found: %d\n", name, offs);
138                 return;
139         }
140
141         debug("Disabling node '%s'\n", name);
142         fdt_set_node_status(blob, offs, FDT_STATUS_DISABLED, 0);
143 }
144
145 void karo_fdt_fixup_touchpanel(void *blob)
146 {
147         int i;
148         const char *model = getenv("touchpanel");
149
150         for (i = 0; i < ARRAY_SIZE(karo_touchpanels); i++) {
151                 const char *tp = karo_touchpanels[i];
152
153                 if (model != NULL && strcmp(model, tp) == 0)
154                         continue;
155
156                 if (model != NULL) {
157                         if (strcmp(model, tp) == 0)
158                                 continue;
159                         tp = strchr(tp, ',');
160                         if (tp != NULL && *tp != '\0' && strcmp(model, tp + 1) == 0)
161                                 continue;
162                 }
163                 fdt_disable_tp_node(blob, karo_touchpanels[i]);
164                 karo_set_fdtsize(blob);
165         }
166 }
167
168 void karo_fdt_fixup_usb_otg(void *blob, const char *node, const char *phy)
169 {
170         const char *otg_mode = getenv("otg_mode");
171         int off;
172         int ret;
173         const uint32_t *ph;
174         int disable_otg = 0;
175         int disable_phy_pins = 1;
176
177         debug("OTG mode is '%s'\n", otg_mode ? otg_mode : "<UNSET>");
178
179         off = fdt_path_offset(blob, node);
180         if (off < 0) {
181                 debug("Failed to find node %s\n", node);
182                 return;
183         }
184
185         if (otg_mode && (strcmp(otg_mode, "device") == 0 ||
186                                 strcmp(otg_mode, "gadget") == 0)) {
187                 debug("Setting dr_mode to 'peripheral'\n");
188                 ret = fdt_setprop_string(blob, off, "dr_mode", "peripheral");
189         } else if (otg_mode && strcmp(otg_mode, "host") == 0) {
190                 debug("Setting dr_mode to 'host'\n");
191                 ret = fdt_setprop_string(blob, off, "dr_mode", "host");
192                 disable_phy_pins = 0;
193         } else if (otg_mode && strcmp(otg_mode, "otg") == 0) {
194                 debug("Setting dr_mode to 'host'\n");
195                 ret = fdt_setprop_string(blob, off, "dr_mode", "otg");
196         } else {
197                 if (otg_mode && strcmp(otg_mode, "none") != 0)
198                         printf("Invalid 'otg_mode' setting '%s'; disabling usbotg port\n",
199                                 otg_mode);
200                 disable_otg = 1;
201                 ret = 0;
202         }
203
204         if ((!disable_phy_pins && !disable_otg) || ret)
205                 goto out;
206
207         if (disable_otg) {
208                 ret = fdt_set_node_status(blob, off, FDT_STATUS_DISABLED, 0);
209                 if (ret)
210                         goto out;
211         }
212
213         ph = fdt_getprop(blob, off, phy, NULL);
214         if (ph == NULL) {
215                 printf("Failed to find '%s' phandle in node '%s'\n", phy,
216                         fdt_get_name(blob, off, NULL));
217                 goto out;
218         }
219
220         off = fdt_node_offset_by_phandle(blob, fdt32_to_cpu(*ph));
221         if (off <= 0) {
222                 printf("Failed to find '%s' node via phandle %04x\n",
223                         phy, fdt32_to_cpu(*ph));
224                 goto out;
225         }
226
227         if (disable_otg) {
228                 debug("Disabling usbphy\n");
229                 ret = fdt_set_node_status(blob, off, FDT_STATUS_DISABLED, 0);
230         }
231 out:
232         if (ret)
233                 printf("Failed to update usbotg: %d\n", ret);
234         else
235                 debug("node '%s' updated\n", node);
236         karo_set_fdtsize(blob);
237 }
238
239 void karo_fdt_del_prop(void *blob, const char *compat, phys_addr_t offs,
240                         const char *prop)
241 {
242         int ret;
243         int offset;
244         const uint32_t *phandle;
245         uint32_t ph = 0;
246
247         offset = fdt_node_offset_by_compat_reg(blob, compat, offs);
248         if (offset <= 0)
249                 return;
250
251         phandle = fdt_getprop(blob, offset, prop, NULL);
252         if (phandle) {
253                 ph = fdt32_to_cpu(*phandle);
254         }
255
256         debug("Removing property '%s' from node %s@%08lx\n", prop, compat, offs);
257         ret = fdt_delprop(blob, offset, prop);
258         if (ret == 0)
259                 karo_set_fdtsize(blob);
260
261         if (!ph)
262                 return;
263
264         offset = fdt_node_offset_by_phandle(blob, ph);
265         if (offset <= 0)
266                 return;
267
268         debug("Removing node @ %08x\n", offset);
269         fdt_del_node(blob, offset);
270         karo_set_fdtsize(blob);
271 }
272
273 static int fdt_init_fb_mode(const void *blob, int off, struct fb_videomode *fb_mode)
274 {
275         const uint32_t *prop;
276
277         memset(fb_mode, 0, sizeof(*fb_mode));
278
279         prop = fdt_getprop(blob, off, "clock-frequency", NULL);
280         if (prop)
281                 fb_mode->pixclock = KHZ2PICOS(fdt32_to_cpu(*prop) / 1000);
282
283         prop = fdt_getprop(blob, off, "hactive", NULL);
284         if (prop)
285                 fb_mode->xres = fdt32_to_cpu(*prop);
286
287         prop = fdt_getprop(blob, off, "vactive", NULL);
288         if (prop)
289                 fb_mode->yres = fdt32_to_cpu(*prop);
290
291         prop = fdt_getprop(blob, off, "hback-porch", NULL);
292         if (prop)
293                 fb_mode->left_margin = fdt32_to_cpu(*prop);
294
295         prop = fdt_getprop(blob, off, "hsync-len", NULL);
296         if (prop)
297                 fb_mode->hsync_len = fdt32_to_cpu(*prop);
298
299         prop = fdt_getprop(blob, off, "hfront-porch", NULL);
300         if (prop)
301                 fb_mode->right_margin = fdt32_to_cpu(*prop);
302
303         prop = fdt_getprop(blob, off, "vback-porch", NULL);
304         if (prop)
305                 fb_mode->upper_margin = fdt32_to_cpu(*prop);
306
307         prop = fdt_getprop(blob, off, "vsync-len", NULL);
308         if (prop)
309                 fb_mode->vsync_len = fdt32_to_cpu(*prop);
310
311         prop = fdt_getprop(blob, off, "vfront-porch", NULL);
312         if (prop)
313                 fb_mode->lower_margin = fdt32_to_cpu(*prop);
314
315         prop = fdt_getprop(blob, off, "hsync-active", NULL);
316         if (prop)
317                 fb_mode->sync |= *prop ? FB_SYNC_VERT_HIGH_ACT : 0;
318
319         prop = fdt_getprop(blob, off, "vsync-active", NULL);
320         if (prop)
321                 fb_mode->sync |= *prop ? FB_SYNC_VERT_HIGH_ACT : 0;
322 #if 0
323         prop = fdt_getprop(blob, off, "de-active", NULL);
324         if (prop)
325                 fb_mode->sync |= *prop ? FB_SYNC_DATA_ENABLE_HIGH_ACT : 0;
326
327         prop = fdt_getprop(blob, off, "pixelclk-active", NULL);
328         if (prop)
329                 fb_mode->sync |= *prop ? FB_SYNC_DOTCLK_FALLING_ACT : 0;
330 #endif
331         return 0;
332 }
333
334 static int fdt_update_native_fb_mode(void *blob, int off)
335 {
336         int ret;
337         uint32_t ph;
338
339         debug("Creating phandle at offset %d\n", off);
340         ph = fdt_create_phandle(blob, off);
341         if (!ph) {
342                 ret = fdt_increase_size(blob, 512);
343                 if (ret) {
344                         printf("Failed to increase FDT size: %d\n", ret);
345                         return ret;
346                 }
347                 ph = fdt_create_phandle(blob, off);
348         }
349         if (!ph) {
350                 printf("Failed to create phandle for video timing\n");
351                 return -ENOMEM;
352         }
353
354         debug("phandle of %s @ %06x=%04x\n", fdt_get_name(blob, off, NULL),
355                 off, ph);
356         off = fdt_parent_offset(blob, off);
357         if (off < 0)
358                 return off;
359         debug("parent offset=%06x\n", off);
360         ret = fdt_setprop_cell(blob, off, "native-mode", ph);
361         if (ret)
362                 printf("Failed to set property 'native-mode': %d\n", ret);
363         karo_set_fdtsize(blob);
364         return ret;
365 }
366
367 static int karo_fdt_find_video_timings(void *blob)
368 {
369         int off = fdt_path_offset(blob, "display");
370         const char *subnode = "display-timings";
371
372         if (off < 0) {
373                 debug("Could not find node 'display' in FDT: %d\n", off);
374                 return off;
375         }
376
377         off = fdt_subnode_offset(blob, off, subnode);
378         if (off < 0) {
379                 debug("Could not find node '%s' in FDT: %d\n", subnode, off);
380         }
381         return off;
382 }
383
384 int karo_fdt_get_fb_mode(void *blob, const char *name, struct fb_videomode *fb_mode)
385 {
386         int off = karo_fdt_find_video_timings(blob);
387
388         if (off < 0)
389                 return off;
390         while (off > 0) {
391                 const char *n, *endp;
392                 int len, d = 1;
393
394                 off = fdt_next_node(blob, off, &d);
395                 if (off < 0)
396                         return off;
397                 if (d < 1)
398                         return -EINVAL;
399                 if (d > 2) {
400                         debug("Skipping node @ %04x %s depth %d\n", off, fdt_get_name(blob, off, NULL), d);
401                         continue;
402                 }
403                 debug("parsing subnode @ %04x %s depth %d\n", off, fdt_get_name(blob, off, NULL), d);
404
405                 n = fdt_getprop(blob, off, "panel-name", &len);
406                 if (!n) {
407                         n = fdt_get_name(blob, off, NULL);
408                         if (strcasecmp(n, name) == 0) {
409                                 break;
410                         }
411                 } else {
412                         int found = 0;
413
414                         for (endp = n + len; n < endp; n += strlen(n) + 1) {
415                                 debug("Checking panel-name '%s'\n", n);
416                                 if (strcasecmp(n, name) == 0) {
417                                         debug("Using node %s @ %04x\n",
418                                                 fdt_get_name(blob, off, NULL), off);
419                                         found = 1;
420                                         break;
421                                 }
422                         }
423                         if (found)
424                                 break;
425                 }
426         }
427         if (off > 0) {
428                 fdt_init_fb_mode(blob, off, fb_mode);
429                 return fdt_update_native_fb_mode(blob, off);
430         }
431         return -EINVAL;
432 }
433
434 #define SET_FB_PROP(n, v) ({                                            \
435         int ret;                                                        \
436         ret = fdt_setprop_u32(blob, off, n, v);                         \
437         if (ret) {                                                      \
438                 printf("Failed to set property %s: %d\n", name, ret);   \
439         }                                                               \
440         ret;                                                            \
441 })
442
443
444 int karo_fdt_create_fb_mode(void *blob, const char *name,
445                         struct fb_videomode *fb_mode)
446 {
447         int off = fdt_path_offset(blob, "display");
448         int ret;
449         const char *subnode = "display-timings";
450
451         if (off < 0) {
452                 printf("'display' node not found in FDT\n");
453                 return off;
454         }
455
456         ret = fdt_increase_size(blob, 512);
457         if (ret) {
458                 printf("Failed to increase FDT size: %d\n", ret);
459                 return ret;
460         }
461
462         printf("node '%s' offset=%d\n", "display", off);
463         ret = fdt_subnode_offset(blob, off, subnode);
464         if (ret < 0) {
465                 debug("Could not find node '%s' in FDT: %d\n", subnode, ret);
466                 ret = fdt_add_subnode(blob, off, subnode);
467                 if (ret < 0) {
468                         printf("Failed to add %s subnode: %d\n", subnode, ret);
469                         return ret;
470                 }
471         }
472
473         printf("node '%s' offset=%d\n", subnode, ret);
474         ret = fdt_add_subnode(blob, ret, name);
475         if (ret < 0) {
476                 printf("Failed to add %s subnode: %d\n", name, ret);
477                 return ret;
478         }
479         off = ret;
480
481         ret = SET_FB_PROP("clock-frequency",
482                         PICOS2KHZ(fb_mode->pixclock) * 1000);
483         if (ret)
484                 goto out;
485         ret = SET_FB_PROP("hactive", fb_mode->xres);
486         if (ret)
487                 goto out;
488         ret = SET_FB_PROP("vactive", fb_mode->yres);
489         if (ret)
490                 goto out;
491         ret = SET_FB_PROP("hback-porch", fb_mode->left_margin);
492         if (ret)
493                 goto out;
494         ret = SET_FB_PROP("hsync-len", fb_mode->hsync_len);
495         if (ret)
496                 goto out;
497         ret = SET_FB_PROP("hfront-porch", fb_mode->right_margin);
498         if (ret)
499                 goto out;
500         ret = SET_FB_PROP("vback-porch", fb_mode->upper_margin);
501         if (ret)
502                 goto out;
503         ret = SET_FB_PROP("vsync-len", fb_mode->vsync_len);
504         if (ret)
505                 goto out;
506         ret = SET_FB_PROP("vfront-porch", fb_mode->lower_margin);
507         if (ret)
508                 goto out;
509         ret = SET_FB_PROP("hsync-active",
510                         fb_mode->sync & FB_SYNC_VERT_HIGH_ACT ? 1 : 0);
511         if (ret)
512                 goto out;
513         ret = SET_FB_PROP("vsync-active",
514                         fb_mode->sync & FB_SYNC_VERT_HIGH_ACT ? 1 : 0);
515         if (ret)
516                 goto out;
517
518         /* TOTO: make these configurable */
519         ret = SET_FB_PROP("de-active", 1);
520         if (ret)
521                 goto out;
522         ret = SET_FB_PROP("pixelclk-active", 1);
523         if (ret)
524                 goto out;
525
526         return fdt_update_native_fb_mode(blob, off);
527
528 out:
529         karo_set_fdtsize(blob);
530         return ret;
531 }
532
533 int karo_fdt_update_fb_mode(void *blob, const char *name)
534 {
535         int off = fdt_path_offset(blob, "display");
536         const char *subnode = "display-timings";
537
538         if (off < 0)
539                 return off;
540
541         if (name == NULL) {
542                 int parent = fdt_parent_offset(blob, off);
543                 int ret;
544
545                 if (parent < 0) {
546                         printf("Failed to find parent of node '%s'\n",
547                                 fdt_get_name(blob, off, NULL));
548                         return parent;
549                 }
550                 debug("parent offset=%06x\n", parent);
551                 ret = fdt_set_node_status(blob, parent, FDT_STATUS_DISABLED, 0);
552                 return ret;
553         }
554
555         off = fdt_subnode_offset(blob, off, subnode);
556         if (off < 0) {
557                 debug("Could not find node '%s' in FDT: %d\n", subnode, off);
558                 return off;
559         }
560         while (off > 0) {
561                 const char *n, *endp;
562                 int len, d = 1;
563
564                 off = fdt_next_node(blob, off, &d);
565                 if (off < 0)
566                         return off;
567                 if (d < 1)
568                         return -EINVAL;
569                 if (d > 2) {
570                         debug("Skipping node @ %04x %s depth %d\n", off, fdt_get_name(blob, off, NULL), d);
571                         continue;
572                 }
573                 debug("parsing subnode @ %04x %s depth %d\n", off, fdt_get_name(blob, off, NULL), d);
574
575                 n = fdt_getprop(blob, off, "panel-name", &len);
576                 if (!n) {
577                         n = fdt_get_name(blob, off, NULL);
578                         if (strcasecmp(n, name) == 0) {
579                                 break;
580                         }
581                 } else {
582                         int found = 0;
583
584                         for (endp = n + len; n < endp; n += strlen(n) + 1) {
585                                 debug("Checking panel-name '%s'\n", n);
586                                 if (strcasecmp(n, name) == 0) {
587                                         debug("Using node %s @ %04x\n",
588                                                 fdt_get_name(blob, off, NULL), off);
589                                         found = 1;
590                                         break;
591                                 }
592                         }
593                         if (found)
594                                 break;
595                 }
596         }
597         if (off > 0)
598                 return fdt_update_native_fb_mode(blob, off);
599         return off;
600 }
601
602 static int karo_load_part(const char *part, void *addr, size_t len)
603 {
604         int ret;
605         struct mtd_device *dev;
606         struct part_info *part_info;
607         u8 part_num;
608         size_t actual;
609
610         debug("Initializing mtd_parts\n");
611         ret = mtdparts_init();
612         if (ret)
613                 return ret;
614
615         debug("Trying to find NAND partition '%s'\n", part);
616         ret = find_dev_and_part(part, &dev, &part_num,
617                                 &part_info);
618         if (ret) {
619                 printf("Failed to find flash partition '%s': %d\n",
620                         part, ret);
621
622                 return ret;
623         }
624         debug("Found partition '%s': offset=%08x size=%08x\n",
625                 part, part_info->offset, part_info->size);
626         if (part_info->size < len) {
627                 printf("Warning: partition '%s' smaller than requested size: %u; truncating data to %u byte\n",
628                         part, len, part_info->size);
629                 len = part_info->size;
630         }
631         debug("Reading NAND partition '%s' to %p\n", part, addr);
632         ret = nand_read_skip_bad(&nand_info[0], part_info->offset, &len,
633                                 &actual, len, addr);
634         if (ret) {
635                 printf("Failed to load partition '%s' to %p\n", part, addr);
636                 return ret;
637         }
638         if (actual < len)
639                 printf("Read only %u of %u bytes due to bad blocks\n",
640                         actual, len);
641
642         debug("Read %u byte from partition '%s' @ offset %08x\n",
643                 len, part, part_info->offset);
644         return 0;
645 }
646
647 void *karo_fdt_load_dtb(void)
648 {
649         int ret;
650         void *fdt = (void *)getenv_ulong("fdtaddr", 16, CONFIG_SYS_FDT_ADDR);
651
652         if (tstc()) {
653                 debug("aborting DTB load\n");
654                 return NULL;
655         }
656
657         /* clear FDT header in memory */
658         memset(fdt, 0, 4);
659
660         ret = karo_load_part("dtb", fdt, MAX_DTB_SIZE);
661         if (ret) {
662                 printf("Failed to load dtb from flash: %d\n", ret);
663                 return NULL;
664         }
665
666         if (fdt_check_header(fdt)) {
667                 debug("No valid DTB in flash\n");
668                 return NULL;
669         }
670         debug("Using DTB from flash\n");
671         karo_set_fdtsize(fdt);
672         return fdt;
673 }