2 * (C) Copyright 2012,2013 Lothar Waßmann <LW@KARO-electronics.de>
4 * See file CREDITS for list of people who contributed to this
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.
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.
21 #include <fdt_support.h>
24 #include <linux/list.h>
26 #include <jffs2/load_kernel.h>
31 #ifdef CONFIG_MAX_DTB_SIZE
32 #define MAX_DTB_SIZE CONFIG_MAX_DTB_SIZE
34 #define MAX_DTB_SIZE SZ_64K
37 DECLARE_GLOBAL_DATA_PTR;
39 static void karo_set_fdtsize(void *fdt)
41 size_t fdtsize = getenv_ulong("fdtsize", 16, 0);
43 if (fdtsize == fdt_totalsize(fdt)) {
46 debug("FDT size changed from %u to %u\n",
47 fdtsize, fdt_totalsize(fdt));
48 setenv_hex("fdtsize", fdt_totalsize(fdt));
51 static int karo_load_part(const char *part, void *addr, size_t len)
54 struct mtd_device *dev;
55 struct part_info *part_info;
59 debug("Initializing mtd_parts\n");
60 ret = mtdparts_init();
64 debug("Trying to find NAND partition '%s'\n", part);
65 ret = find_dev_and_part(part, &dev, &part_num, &part_info);
67 printf("Failed to find flash partition '%s': %d\n",
72 debug("Found partition '%s': offset=%08x size=%08x\n",
73 part, part_info->offset, part_info->size);
74 if (part_info->size < len) {
75 printf("Warning: partition '%s' smaller than requested size: %u; truncating data to %u byte\n",
76 part, len, part_info->size);
77 len = part_info->size;
79 debug("Reading NAND partition '%s' to %p\n", part, addr);
80 ret = nand_read_skip_bad(&nand_info[0], part_info->offset, &len,
83 printf("Failed to load partition '%s' to %p\n", part, addr);
87 printf("Read only %u of %u bytes due to bad blocks\n",
90 debug("Read %u byte from partition '%s' @ offset %08x\n",
91 len, part, part_info->offset);
95 static void *karo_fdt_load_dtb(void)
98 void *fdt = (void *)getenv_ulong("fdtaddr", 16, CONFIG_SYS_FDT_ADDR);
101 printf("aborting DTB load\n");
105 /* clear FDT header in memory */
108 ret = karo_load_part("dtb", fdt, MAX_DTB_SIZE);
110 printf("Failed to load dtb from flash: %d\n", ret);
114 if (fdt_check_header(fdt)) {
115 debug("No valid DTB in flash\n");
118 debug("Using DTB from flash\n");
119 karo_set_fdtsize(fdt);
123 void karo_fdt_move_fdt(void)
126 unsigned long fdt_addr = getenv_ulong("fdtaddr", 16, 0);
129 debug("DTB already loaded\n");
133 setenv("fdtsize", 0);
136 fdt_addr = CONFIG_SYS_FDT_ADDR;
137 printf("fdtaddr is not set; using default: %08lx\n",
141 fdt = karo_fdt_load_dtb();
143 fdt = (void *)gd->fdt_blob;
145 #ifdef CONFIG_OF_EMBED
146 printf("Compiled in FDT not found");
148 printf("No FDT found");
150 printf("; creating empty DTB\n");
151 fdt = (void *)fdt_addr;
152 fdt_create_empty_tree(fdt, 256);
154 printf("No DTB in flash; using default DTB\n");
156 debug("Checking FDT header @ %p\n", fdt);
157 if (fdt_check_header(fdt)) {
158 printf("ERROR: No valid DTB found at %p\n", fdt);
161 debug("Moving FDT from %p..%p to %08lx..%08lx\n",
162 fdt, fdt + fdt_totalsize(fdt) - 1,
163 fdt_addr, fdt_addr + fdt_totalsize(fdt) - 1);
164 memmove((void *)fdt_addr, fdt, fdt_totalsize(fdt));
166 set_working_fdt_addr((void *)fdt_addr);
168 karo_set_fdtsize(fdt);
171 void karo_fdt_remove_node(void *blob, const char *node)
173 int off = fdt_path_offset(blob, node);
176 debug("Removing node '%s' from DT\n", node);
179 printf("Could not find node '%s': %s\n", node,
182 ret = fdt_del_node(blob, off);
184 printf("Failed to remove node '%s': %s\n",
185 node, fdt_strerror(ret));
187 karo_set_fdtsize(blob);
190 void karo_fdt_enable_node(void *blob, const char *node, int enable)
192 int off = fdt_path_offset(blob, node);
194 debug("%sabling node '%s'\n", enable ? "En" : "Dis", node);
196 printf("Could not find node '%s': %s\n", node,
200 fdt_set_node_status(blob, off,
201 enable ? FDT_STATUS_OKAY : FDT_STATUS_DISABLED, 0);
203 karo_set_fdtsize(blob);
206 static void fdt_disable_tp_node(void *blob, const char *name)
208 int offs = fdt_node_offset_by_compatible(blob, -1, name);
211 debug("node '%s' not found: %s\n", name, fdt_strerror(offs));
215 debug("Disabling node '%s'\n", name);
216 fdt_set_node_status(blob, offs, FDT_STATUS_DISABLED, 0);
219 void karo_fdt_fixup_touchpanel(void *blob, const char *panels[],
223 const char *model = getenv("touchpanel");
225 for (i = 0; i < num_panels; i++) {
226 const char *tp = panels[i];
229 if (strcmp(model, tp) == 0)
232 if (*tp != '\0' && strcmp(model, tp + 1) == 0)
234 tp = strpbrk(tp + 1, ",-");
239 fdt_disable_tp_node(blob, panels[i]);
241 karo_set_fdtsize(blob);
244 void karo_fdt_fixup_usb_otg(void *blob, const char *node, const char *phy)
246 const char *otg_mode = getenv("otg_mode");
251 int disable_phy_pins = 1;
253 debug("OTG mode is '%s'\n", otg_mode ? otg_mode : "<UNSET>");
255 off = fdt_path_offset(blob, node);
257 debug("Failed to find node %s\n", node);
261 if (otg_mode && (strcmp(otg_mode, "device") == 0 ||
262 strcmp(otg_mode, "gadget") == 0)) {
263 debug("Setting dr_mode to 'peripheral'\n");
264 ret = fdt_setprop_string(blob, off, "dr_mode", "peripheral");
265 } else if (otg_mode && strcmp(otg_mode, "host") == 0) {
266 debug("Setting dr_mode to 'host'\n");
267 ret = fdt_setprop_string(blob, off, "dr_mode", "host");
268 disable_phy_pins = 0;
269 } else if (otg_mode && strcmp(otg_mode, "otg") == 0) {
270 debug("Setting dr_mode to 'host'\n");
271 ret = fdt_setprop_string(blob, off, "dr_mode", "otg");
273 if (otg_mode && strcmp(otg_mode, "none") != 0)
274 printf("Invalid 'otg_mode' setting '%s'; disabling usbotg port\n",
280 if ((!disable_phy_pins && !disable_otg) || ret)
284 ret = fdt_set_node_status(blob, off, FDT_STATUS_DISABLED, 0);
289 ph = fdt_getprop(blob, off, phy, NULL);
291 printf("Failed to find '%s' phandle in node '%s'\n", phy,
292 fdt_get_name(blob, off, NULL));
296 off = fdt_node_offset_by_phandle(blob, fdt32_to_cpu(*ph));
298 printf("Failed to find '%s' node via phandle %04x\n",
299 phy, fdt32_to_cpu(*ph));
304 debug("Disabling usbphy\n");
305 ret = fdt_set_node_status(blob, off, FDT_STATUS_DISABLED, 0);
309 printf("Failed to update usbotg: %s\n", fdt_strerror(ret));
311 debug("node '%s' updated\n", node);
312 karo_set_fdtsize(blob);
315 static int karo_fdt_flexcan_enabled(void *blob)
317 const char *can_ifs[] = {
323 for (i = 0; i < ARRAY_SIZE(can_ifs); i++) {
325 int off = fdt_path_offset(blob, can_ifs[i]);
328 debug("node '%s' not found\n", can_ifs[i]);
331 status = fdt_getprop(blob, off, "status", NULL);
332 if (status && strcmp(status, "okay") == 0) {
333 debug("%s is enabled\n", can_ifs[i]);
337 debug("can driver is disabled\n");
341 static void karo_fdt_set_lcd_pins(void *blob, const char *name)
343 int off = fdt_path_offset(blob, name);
345 const struct fdt_property *pc;
351 ph = fdt_create_phandle(blob, off);
355 off = fdt_path_offset(blob, "display");
359 pc = fdt_get_property(blob, off, "pinctrl-0", &len);
360 if (!pc || len < sizeof(ph))
363 memcpy((void *)pc->data, &ph, sizeof(ph));
364 fdt_setprop_cell(blob, off, "pinctrl-0", ph);
367 void karo_fdt_fixup_flexcan(void *blob, int xcvr_present)
369 const char *xcvr_status = "disabled";
372 if (karo_fdt_flexcan_enabled(blob)) {
373 karo_fdt_set_lcd_pins(blob, "lcdif_23bit_pins_a");
374 xcvr_status = "okay";
376 karo_fdt_set_lcd_pins(blob, "lcdif_24bit_pins_a");
379 const char *otg_mode = getenv("otg_mode");
381 if (otg_mode && (strcmp(otg_mode, "host") == 0))
382 karo_fdt_enable_node(blob, "can1", 0);
384 karo_fdt_set_lcd_pins(blob, "lcdif_24bit_pins_a");
386 fdt_find_and_setprop(blob, "reg_can_xcvr", "status",
387 xcvr_status, strlen(xcvr_status) + 1, 1);
390 void karo_fdt_del_prop(void *blob, const char *compat, phys_addr_t offs,
395 const uint32_t *phandle;
398 offset = fdt_node_offset_by_compat_reg(blob, compat, offs);
402 phandle = fdt_getprop(blob, offset, prop, NULL);
404 ph = fdt32_to_cpu(*phandle);
407 debug("Removing property '%s' from node %s@%08lx\n", prop, compat, offs);
408 ret = fdt_delprop(blob, offset, prop);
410 karo_set_fdtsize(blob);
415 offset = fdt_node_offset_by_phandle(blob, ph);
419 debug("Removing node @ %08x\n", offset);
420 fdt_del_node(blob, offset);
421 karo_set_fdtsize(blob);
424 static int fdt_init_fb_mode(const void *blob, int off, struct fb_videomode *fb_mode)
426 const uint32_t *prop;
428 memset(fb_mode, 0, sizeof(*fb_mode));
430 prop = fdt_getprop(blob, off, "clock-frequency", NULL);
432 fb_mode->pixclock = KHZ2PICOS(fdt32_to_cpu(*prop) / 1000);
434 prop = fdt_getprop(blob, off, "hactive", NULL);
436 fb_mode->xres = fdt32_to_cpu(*prop);
438 prop = fdt_getprop(blob, off, "vactive", NULL);
440 fb_mode->yres = fdt32_to_cpu(*prop);
442 prop = fdt_getprop(blob, off, "hback-porch", NULL);
444 fb_mode->left_margin = fdt32_to_cpu(*prop);
446 prop = fdt_getprop(blob, off, "hsync-len", NULL);
448 fb_mode->hsync_len = fdt32_to_cpu(*prop);
450 prop = fdt_getprop(blob, off, "hfront-porch", NULL);
452 fb_mode->right_margin = fdt32_to_cpu(*prop);
454 prop = fdt_getprop(blob, off, "vback-porch", NULL);
456 fb_mode->upper_margin = fdt32_to_cpu(*prop);
458 prop = fdt_getprop(blob, off, "vsync-len", NULL);
460 fb_mode->vsync_len = fdt32_to_cpu(*prop);
462 prop = fdt_getprop(blob, off, "vfront-porch", NULL);
464 fb_mode->lower_margin = fdt32_to_cpu(*prop);
466 prop = fdt_getprop(blob, off, "hsync-active", NULL);
468 fb_mode->sync |= *prop ? FB_SYNC_VERT_HIGH_ACT : 0;
470 prop = fdt_getprop(blob, off, "vsync-active", NULL);
472 fb_mode->sync |= *prop ? FB_SYNC_VERT_HIGH_ACT : 0;
474 prop = fdt_getprop(blob, off, "de-active", NULL);
476 fb_mode->sync |= *prop ? 0 : FB_SYNC_OE_LOW_ACT;
478 prop = fdt_getprop(blob, off, "pixelclk-active", NULL);
480 fb_mode->sync |= *prop ? 0 : FB_SYNC_CLK_LAT_FALL;
485 static int fdt_update_native_fb_mode(void *blob, int off)
490 ret = fdt_increase_size(blob, 64);
492 printf("Warning: Failed to increase FDT size: %s\n",
495 debug("Creating phandle at offset %d\n", off);
496 ph = fdt_create_phandle(blob, off);
498 printf("Failed to create phandle for video timing\n");
502 debug("phandle of %s @ %06x=%04x\n", fdt_get_name(blob, off, NULL),
504 off = fdt_parent_offset(blob, off);
507 debug("parent offset=%06x\n", off);
508 ret = fdt_setprop_cell(blob, off, "native-mode", ph);
510 printf("Failed to set property 'native-mode': %s\n",
512 karo_set_fdtsize(blob);
516 static int karo_fdt_find_video_timings(void *blob)
518 int off = fdt_path_offset(blob, "display");
519 const char *subnode = "display-timings";
522 debug("Could not find node 'display' in FDT: %s\n",
527 off = fdt_subnode_offset(blob, off, subnode);
529 debug("Could not find node '%s' in FDT: %s\n", subnode,
535 int karo_fdt_get_fb_mode(void *blob, const char *name, struct fb_videomode *fb_mode)
537 int off = karo_fdt_find_video_timings(blob);
542 const char *n, *endp;
545 off = fdt_next_node(blob, off, &d);
551 debug("Skipping node @ %04x %s depth %d\n", off,
552 fdt_get_name(blob, off, NULL), d);
555 debug("parsing subnode @ %04x %s depth %d\n", off,
556 fdt_get_name(blob, off, NULL), d);
558 n = fdt_getprop(blob, off, "panel-name", &len);
560 n = fdt_get_name(blob, off, NULL);
561 if (strcasecmp(n, name) == 0) {
567 for (endp = n + len; n < endp; n += strlen(n) + 1) {
568 debug("Checking panel-name '%s'\n", n);
569 if (strcasecmp(n, name) == 0) {
570 debug("Using node %s @ %04x\n",
571 fdt_get_name(blob, off, NULL), off);
581 return fdt_init_fb_mode(blob, off, fb_mode);
586 #define SET_FB_PROP(n, v) ({ \
588 ret = fdt_setprop_u32(blob, off, n, v); \
590 printf("Failed to set property %s: %s\n", name, \
591 fdt_strerror(ret)); \
597 int karo_fdt_create_fb_mode(void *blob, const char *name,
598 struct fb_videomode *fb_mode)
600 int off = fdt_path_offset(blob, "display");
602 const char *subnode = "display-timings";
605 printf("'display' node not found in FDT\n");
609 ret = fdt_increase_size(blob, 512);
611 printf("Failed to increase FDT size: %s\n", fdt_strerror(ret));
615 ret = fdt_subnode_offset(blob, off, subnode);
617 debug("Could not find node '%s' in FDT: %s\n", subnode,
619 ret = fdt_add_subnode(blob, off, subnode);
621 printf("Failed to add %s subnode: %s\n", subnode,
627 ret = fdt_add_subnode(blob, ret, name);
629 printf("Failed to add %s subnode: %s\n", name,
635 ret = SET_FB_PROP("clock-frequency",
636 PICOS2KHZ(fb_mode->pixclock) * 1000);
639 ret = SET_FB_PROP("hactive", fb_mode->xres);
642 ret = SET_FB_PROP("vactive", fb_mode->yres);
645 ret = SET_FB_PROP("hback-porch", fb_mode->left_margin);
648 ret = SET_FB_PROP("hsync-len", fb_mode->hsync_len);
651 ret = SET_FB_PROP("hfront-porch", fb_mode->right_margin);
654 ret = SET_FB_PROP("vback-porch", fb_mode->upper_margin);
657 ret = SET_FB_PROP("vsync-len", fb_mode->vsync_len);
660 ret = SET_FB_PROP("vfront-porch", fb_mode->lower_margin);
663 ret = SET_FB_PROP("hsync-active",
664 fb_mode->sync & FB_SYNC_VERT_HIGH_ACT ? 1 : 0);
667 ret = SET_FB_PROP("vsync-active",
668 fb_mode->sync & FB_SYNC_VERT_HIGH_ACT ? 1 : 0);
671 ret = SET_FB_PROP("de-active",
672 !(fb_mode->sync & FB_SYNC_OE_LOW_ACT));
675 ret = SET_FB_PROP("pixelclk-active",
676 !(fb_mode->sync & FB_SYNC_CLK_LAT_FALL));
678 karo_set_fdtsize(blob);
682 static int karo_fdt_set_display_alias(void *blob, const char *path,
687 size_t size = strlen(path) + strlen(name) + 2;
690 display = malloc(size);
691 if (display == NULL) {
692 printf("%s: Failed to allocate buffer\n", __func__);
695 sprintf(display, "%s/%s", path, name);
696 if (strlen(display) != size - 1)
698 off = fdt_path_offset(blob, "/aliases");
699 if (off == FDT_ERR_BADMAGIC)
701 ret = fdt_resize(blob);
703 printf("%s: Failed to resize FDT: %s\n",
704 __func__, fdt_strerror(ret));
707 off = fdt_add_subnode(blob, 0, "aliases");
709 printf("%s: Failed to create 'aliases' node: %s\n",
710 __func__, fdt_strerror(off));
714 ret = fdt_setprop_string(blob, off, "display", display);
715 debug("setprop_string(display='%s') returned %d (%s)\n", display, ret,
716 ret < 0 ? fdt_strerror(ret) : "OK");
720 const char *karo_fdt_set_display(const char *video_mode, const char *lcd_path,
721 const char *lvds_path)
723 const char *vmode = NULL;
725 void *blob = working_fdt;
727 if (video_mode == NULL || strlen(video_mode) == 0)
730 vmode = strchr(video_mode, ':');
732 if (lvds_path == NULL)
733 return vmode ? vmode + 1 : video_mode;
735 if (lvds_path != NULL && vmode != NULL) {
736 if (strncmp(video_mode, "LVDS:", 5) == 0 ||
737 strncmp(video_mode, "LVDS0:", 6) == 0) {
738 ret = karo_fdt_set_display_alias(blob, lvds_path,
740 } else if (strncmp(video_mode, "LVDS1:", 6) == 0) {
741 ret = karo_fdt_set_display_alias(blob, lvds_path,
744 debug("%s: Syntax error in video_mode\n", __func__);
747 video_mode = vmode + 1;
751 ret = karo_fdt_set_display_alias(blob, lcd_path,
754 off = fdt_path_offset(blob, "lvds0");
756 ret = fdt_set_node_status(blob, off,
757 FDT_STATUS_DISABLED, 0);
759 off = fdt_path_offset(blob, "lvds1");
761 ret = fdt_set_node_status(blob, off,
762 FDT_STATUS_DISABLED, 0);
766 printf("%s: failed to set 'display' alias: %s\n",
767 __func__, fdt_strerror(ret));
772 int karo_fdt_update_fb_mode(void *blob, const char *name)
774 int off = fdt_path_offset(blob, "display");
775 const char *subnode = "display-timings";
783 debug("Disabling node '%s' at %03x\n",
784 fdt_get_name(blob, off, NULL), off);
785 ret = fdt_set_node_status(blob, off, FDT_STATUS_DISABLED, 0);
789 off = fdt_subnode_offset(blob, off, subnode);
791 debug("Could not find node '%s' in FDT: %s\n", subnode,
796 const char *n, *endp;
799 off = fdt_next_node(blob, off, &d);
805 debug("Skipping node @ %04x %s depth %d\n", off,
806 fdt_get_name(blob, off, NULL), d);
809 debug("parsing subnode @ %04x %s depth %d\n", off,
810 fdt_get_name(blob, off, NULL), d);
812 n = fdt_getprop(blob, off, "panel-name", &len);
814 n = fdt_get_name(blob, off, NULL);
815 if (strcasecmp(n, name) == 0) {
821 for (endp = n + len; n < endp; n += strlen(n) + 1) {
822 debug("Checking panel-name '%s'\n", n);
823 if (strcasecmp(n, name) == 0) {
824 debug("Using node %s @ %04x\n",
825 fdt_get_name(blob, off, NULL), off);
835 return fdt_update_native_fb_mode(blob, off);