]> git.kernelconcepts.de Git - karo-tx-uboot.git/blob - board/karo/common/fdt.c
merged tx6dl-devel into denx master branch
[karo-tx-uboot.git] / board / karo / common / fdt.c
1 /*
2  * (C) Copyright 2012 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_del_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("Removing node '%s' from DT\n", name);
142         fdt_del_node(blob, offs);
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_del_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
175         debug("OTG mode is '%s'\n", otg_mode ? otg_mode : "<UNSET>");
176
177         off = fdt_path_offset(blob, node);
178         if (off < 0) {
179                 debug("Failed to find node %s\n", node);
180                 return;
181         }
182
183         if (otg_mode && (strcmp(otg_mode, "device") == 0 ||
184                                 strcmp(otg_mode, "gadget") == 0)) {
185                 ret = fdt_setprop_string(blob, off, "dr_mode", "peripheral");
186                 phy = NULL;
187         } else if (otg_mode && strcmp(otg_mode, "host") == 0) {
188                 ret = fdt_setprop_string(blob, off, "dr_mode", "host");
189                 phy = NULL;
190         } else {
191                 if (otg_mode && strcmp(otg_mode, "none") != 0)
192                         printf("Invalid 'otg_mode' setting '%s'; disabling usbotg port\n",
193                                 otg_mode);
194                 ret = fdt_setprop_string(blob, off, "status", "disabled");
195         }
196         if (ret)
197                 goto out;
198
199         if (phy == NULL)
200                 goto out;
201
202         ph = fdt_getprop(blob, off, phy, NULL);
203         if (ph == NULL) {
204                 printf("Failed to find '%s' phandle in node '%s'\n", phy,
205                         fdt_get_name(blob, off, NULL));
206                 goto out;
207         }
208
209         off = fdt_node_offset_by_phandle(blob, fdt32_to_cpu(*ph));
210         if (off <= 0) {
211                 printf("Failed to find '%s' node via phandle %04x\n",
212                         phy, fdt32_to_cpu(*ph));
213                 goto out;
214         }
215         ret = fdt_setprop_string(blob, off, "status", "disabled");
216
217 out:
218         if (ret)
219                 printf("Failed to update usbotg: %d\n", ret);
220         printf("node '%s' updated\n", node);
221         karo_set_fdtsize(blob);
222 }
223
224 void karo_fdt_del_prop(void *blob, const char *compat, phys_addr_t offs,
225                         const char *prop)
226 {
227         int ret;
228         int offset;
229         const uint32_t *phandle;
230         uint32_t ph = 0;
231
232         offset = fdt_node_offset_by_compat_reg(blob, compat, offs);
233         if (offset <= 0)
234                 return;
235
236         phandle = fdt_getprop(blob, offset, prop, NULL);
237         if (phandle) {
238                 ph = fdt32_to_cpu(*phandle);
239         }
240
241         debug("Removing property '%s' from node %s@%08lx\n", prop, compat, offs);
242         ret = fdt_delprop(blob, offset, prop);
243         if (ret == 0)
244                 karo_set_fdtsize(blob);
245
246         if (!ph)
247                 return;
248
249         offset = fdt_node_offset_by_phandle(blob, ph);
250         if (offset <= 0)
251                 return;
252
253         debug("Removing node @ %08x\n", offset);
254         fdt_del_node(blob, offset);
255         karo_set_fdtsize(blob);
256 }
257
258 static int fdt_init_fb_mode(const void *blob, int off, struct fb_videomode *fb_mode)
259 {
260         const uint32_t *prop;
261
262         memset(fb_mode, 0, sizeof(*fb_mode));
263
264         prop = fdt_getprop(blob, off, "clock-frequency", NULL);
265         if (prop)
266                 fb_mode->pixclock = KHZ2PICOS(fdt32_to_cpu(*prop) / 1000);
267
268         prop = fdt_getprop(blob, off, "hactive", NULL);
269         if (prop)
270                 fb_mode->xres = fdt32_to_cpu(*prop);
271
272         prop = fdt_getprop(blob, off, "vactive", NULL);
273         if (prop)
274                 fb_mode->yres = fdt32_to_cpu(*prop);
275
276         prop = fdt_getprop(blob, off, "hback-porch", NULL);
277         if (prop)
278                 fb_mode->left_margin = fdt32_to_cpu(*prop);
279
280         prop = fdt_getprop(blob, off, "hsync-len", NULL);
281         if (prop)
282                 fb_mode->hsync_len = fdt32_to_cpu(*prop);
283
284         prop = fdt_getprop(blob, off, "hfront-porch", NULL);
285         if (prop)
286                 fb_mode->right_margin = fdt32_to_cpu(*prop);
287
288         prop = fdt_getprop(blob, off, "vback-porch", NULL);
289         if (prop)
290                 fb_mode->upper_margin = fdt32_to_cpu(*prop);
291
292         prop = fdt_getprop(blob, off, "vsync-len", NULL);
293         if (prop)
294                 fb_mode->vsync_len = fdt32_to_cpu(*prop);
295
296         prop = fdt_getprop(blob, off, "vfront-porch", NULL);
297         if (prop)
298                 fb_mode->lower_margin = fdt32_to_cpu(*prop);
299
300         prop = fdt_getprop(blob, off, "hsync-active", NULL);
301         if (prop)
302                 fb_mode->sync |= *prop ? FB_SYNC_VERT_HIGH_ACT : 0;
303
304         prop = fdt_getprop(blob, off, "vsync-active", NULL);
305         if (prop)
306                 fb_mode->sync |= *prop ? FB_SYNC_VERT_HIGH_ACT : 0;
307 #if 0
308         prop = fdt_getprop(blob, off, "de-active", NULL);
309         if (prop)
310                 fb_mode->sync |= *prop ? FB_SYNC_DATA_ENABLE_HIGH_ACT : 0;
311
312         prop = fdt_getprop(blob, off, "pixelclk-active", NULL);
313         if (prop)
314                 fb_mode->sync |= *prop ? FB_SYNC_DOTCLK_FALLING_ACT : 0;
315 #endif
316         return 0;
317 }
318
319 static int fdt_update_native_fb_mode(void *blob, int off)
320 {
321         int ret;
322         uint32_t ph;
323         int i;
324
325         for (i = 1; i < 16; i++) {
326                 fdt_set_totalsize(blob, fdt_totalsize(blob) + 8 * 4);
327                 karo_set_fdtsize(blob);
328                 ph = fdt_create_phandle(blob, off);
329                 if (ph)
330                         break;
331         }
332         if (ph == 0) {
333                 printf("Failed to create phandle for video timing\n");
334                 return -ENOMEM;
335         }
336
337         debug("phandle of %s @ %06x=%04x\n", fdt_get_name(blob, off, NULL),
338                 off, ph);
339         off = fdt_parent_offset(blob, off);
340         if (off < 0)
341                 return off;
342         debug("parent offset=%06x\n", off);
343         ret = fdt_setprop_cell(blob, off, "native-mode", ph);
344         return ret;
345 }
346
347 static int karo_fdt_find_video_timings(void *blob)
348 {
349         int off = fdt_path_offset(blob, "display");
350         const char *subnode = "display-timings";
351
352         if (off < 0) {
353                 debug("Could not find node 'display' in FDT: %d\n", off);
354                 return off;
355         }
356
357         off = fdt_subnode_offset(blob, off, subnode);
358         if (off < 0) {
359                 debug("Could not find node '%s' in FDT: %d\n", subnode, off);
360         }
361         return off;
362 }
363
364 int karo_fdt_get_fb_mode(void *blob, const char *name, struct fb_videomode *fb_mode)
365 {
366         int off = karo_fdt_find_video_timings(blob);
367
368         if (off < 0)
369                 return off;
370         do {
371                 const char *n, *endp;
372                 int len, d = 1;
373
374                 off = fdt_next_node(blob, off, &d);
375                 if (d > 2) {
376                         debug("Skipping node @ %04x %s depth %d\n", off, fdt_get_name(blob, off, NULL), d);
377                         continue;
378                 }
379                 debug("parsing subnode @ %04x %s depth %d\n", off, fdt_get_name(blob, off, NULL), d);
380                 if (off < 0 || d < 1)
381                         break;
382
383                 n = fdt_getprop(blob, off, "panel-name", &len);
384                 if (!n) {
385                         printf("Missing 'panel-name' property in node '%s'\n",
386                                 fdt_get_name(blob, off, NULL));
387                         continue;
388                 }
389                 for (endp = n + len; n < endp; n += strlen(n) + 1) {
390                         debug("Checking panel-name '%s'\n", n);
391                         if (strcasecmp(n, name) == 0) {
392                                 fdt_init_fb_mode(blob, off, fb_mode);
393                                 return fdt_update_native_fb_mode(blob, off);
394                         }
395                 }
396         } while (off > 0);
397         return -EINVAL;
398 }
399
400 int karo_fdt_update_fb_mode(void *blob, const char *name)
401 {
402         int off = fdt_path_offset(blob, "display");
403         const char *subnode = "display-timings";
404
405         if (off < 0)
406                 return off;
407
408         if (name == NULL) {
409                 int parent = fdt_parent_offset(blob, off);
410                 int ret;
411
412                 if (parent < 0) {
413                         printf("Failed to find parent of node '%s'\n",
414                                 fdt_get_name(blob, off, NULL));
415                         return parent;
416                 }
417                 debug("parent offset=%06x\n", parent);
418                 ret = fdt_setprop_string(blob, parent, "status", "disabled");
419                 return ret;
420         }
421
422         off = fdt_subnode_offset(blob, off, subnode);
423         if (off < 0) {
424                 debug("Could not find node '%s' in FDT: %d\n", subnode, off);
425         }
426         do {
427                 const char *n, *endp;
428                 int len, d = 1;
429                 int node = fdt_next_node(blob, off, &d);
430                 int do_del;
431
432                 if (d > 2) {
433                         debug("Skipping node @ %04x %s depth %d\n", node, fdt_get_name(blob, node, NULL), d);
434                         continue;
435                 }
436                 debug("parsing subnode @ %04x %s depth %d\n", node, fdt_get_name(blob, node, NULL), d);
437                 if (node < 0 || d < 1)
438                         break;
439
440                 n = fdt_getprop(blob, node, "panel-name", &len);
441                 if (!n) {
442                         printf("Missing 'panel-name' property in node '%s'\n",
443                                 fdt_get_name(blob, node, NULL));
444                         continue;
445                 }
446                 do_del = 1;
447                 for (endp = n + len; n < endp; n += strlen(n) + 1) {
448                         debug("Checking panel-name '%s'\n", n);
449                         if (strcasecmp(n, name) == 0) {
450                                 debug("Keeping node %s @ %04x\n",
451                                         fdt_get_name(blob, node, NULL), node);
452                                 off = node;
453                                 do_del = 0;
454                                 break;
455                         }
456                 }
457                 if (do_del) {
458                         debug("Deleting node %s @ %04x\n",
459                                 fdt_get_name(blob, node, NULL), node);
460                         fdt_del_node(blob, node);
461                 }
462
463         } while (off > 0);
464
465         return 0;
466 }
467
468 static int karo_load_part(const char *part, void *addr, size_t len)
469 {
470         int ret;
471         struct mtd_device *dev;
472         struct part_info *part_info;
473         u8 part_num;
474         size_t actual;
475
476         debug("Initializing mtd_parts\n");
477         ret = mtdparts_init();
478         if (ret)
479                 return ret;
480
481         debug("Trying to find NAND partition '%s'\n", part);
482         ret = find_dev_and_part(part, &dev, &part_num,
483                                 &part_info);
484         if (ret) {
485                 printf("Failed to find flash partition '%s': %d\n",
486                         part, ret);
487
488                 return ret;
489         }
490         debug("Found partition '%s': offset=%08x size=%08x\n",
491                 part, part_info->offset, part_info->size);
492         if (part_info->size < len) {
493                 printf("Warning: partition '%s' smaller than requested size: %u; truncating data to %u byte\n",
494                         part, len, part_info->size);
495                 len = part_info->size;
496         }
497         debug("Reading NAND partition '%s' to %p\n", part, addr);
498         ret = nand_read_skip_bad(&nand_info[0], part_info->offset, &len,
499                                 &actual, len, addr);
500         if (ret) {
501                 printf("Failed to load partition '%s' to %p\n", part, addr);
502                 return ret;
503         }
504         if (actual < len)
505                 printf("Read only %u of %u bytes due to bad blocks\n",
506                         actual, len);
507
508         debug("Read %u byte from partition '%s' @ offset %08x\n",
509                 len, part, part_info->offset);
510         return 0;
511 }
512
513 void *karo_fdt_load_dtb(void)
514 {
515         int ret;
516         void *fdt = (void *)getenv_ulong("fdtaddr", 16, CONFIG_SYS_FDT_ADDR);
517
518         if (tstc()) {
519                 debug("aborting DTB load\n");
520                 return NULL;
521         }
522
523         /* clear FDT header in memory */
524         memset(fdt, 0, 4);
525
526         ret = karo_load_part("dtb", fdt, MAX_DTB_SIZE);
527         if (ret) {
528                 printf("Failed to load dtb from flash: %d\n", ret);
529                 return NULL;
530         }
531
532         if (fdt_check_header(fdt)) {
533                 debug("No valid DTB in flash\n");
534                 return NULL;
535         }
536         debug("Using DTB from flash\n");
537         karo_set_fdtsize(fdt);
538         return fdt;
539 }