ppc4xx: Add initial fdt support to 4xx (first needed on 405EX)
Signed-off-by: Stefan Roese <sr@denx.de>
diff --git a/cpu/ppc4xx/fdt.c b/cpu/ppc4xx/fdt.c
new file mode 100644
index 0000000..a1c81e6
--- /dev/null
+++ b/cpu/ppc4xx/fdt.c
@@ -0,0 +1,171 @@
+/*
+ * (C) Copyright 2007
+ * Stefan Roese, DENX Software Engineering, sr@denx.de.
+ *
+ * See file CREDITS for list of people who contributed to this
+ * project.
+ *
+ * This program is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU General Public License as
+ * published by the Free Software Foundation; either version 2 of
+ * the License, or (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
+ * MA 02111-1307 USA
+ */
+
+/* define DEBUG for debugging output (obviously ;-)) */
+#if 0
+#define DEBUG
+#endif
+
+#include <common.h>
+#include <watchdog.h>
+#include <command.h>
+#include <asm/cache.h>
+#include <ppc4xx.h>
+
+#if defined(CONFIG_OF_LIBFDT)
+#include <libfdt.h>
+#include <libfdt_env.h>
+
+static void do_fixup(void *fdt, const char *node, const char *prop,
+ const void *val, int len, int create)
+{
+#if defined(DEBUG)
+ int i;
+ debug("Updating property '%s/%s' = ", node, prop);
+ for (i = 0; i < len; i++)
+ debug(" %.2x", *(u8*)(val+i));
+ debug("\n");
+#endif
+ int rc = fdt_find_and_setprop(fdt, node, prop, val, len, create);
+ if (rc)
+ printf("Unable to update property %s:%s, err=%s\n",
+ node, prop, fdt_strerror(rc));
+}
+
+static void do_fixup_macaddr(void *fdt, int offset, const void *val, int i)
+{
+ int rc;
+
+ debug("Updating node EMAC%d\n", i);
+
+ rc = fdt_setprop(fdt, offset, "mac-address", val, 6);
+ if (rc)
+ printf("Unable to update property %s, err=%s\n",
+ "mac-address", fdt_strerror(rc));
+ rc = fdt_setprop(fdt, offset, "local-mac-address", val, 6);
+ if (rc)
+ printf("Unable to update property %s, err=%s\n",
+ "local-mac-address", fdt_strerror(rc));
+}
+
+static void do_fixup_u32(void *fdt, const char *node, const char *prop,
+ u32 val, int create)
+{
+ val = cpu_to_fdt32(val);
+ do_fixup(fdt, node, prop, &val, sizeof(val), create);
+}
+
+static void do_fixup_uart(void *fdt, int offset, int i, bd_t *bd)
+{
+ int rc;
+ u32 val;
+
+ debug("Updating node UART%d\n", i);
+
+ val = cpu_to_fdt32(CFG_EXT_SERIAL_CLOCK);
+ rc = fdt_setprop(fdt, offset, "clock-frequency", &val, 4);
+ if (rc)
+ printf("Unable to update node UART, err=%s\n", fdt_strerror(rc));
+
+ val = cpu_to_fdt32(bd->bi_baudrate);
+ rc = fdt_setprop(fdt, offset, "current-speed", &val, 4);
+ if (rc)
+ printf("Unable to update node UART, err=%s\n", fdt_strerror(rc));
+}
+
+void ft_cpu_setup(void *blob, bd_t *bd)
+{
+ char * cpu_path = "/cpus/" OF_CPU;
+ sys_info_t sys_info;
+ int offset;
+ int i;
+ int tmp[2];
+
+ get_sys_info (&sys_info);
+
+ do_fixup_u32(blob, cpu_path, "timebase-frequency", bd->bi_intfreq, 1);
+ do_fixup_u32(blob, cpu_path, "clock-frequency", bd->bi_intfreq, 1);
+ do_fixup_u32(blob, "/plb", "clock-frequency", sys_info.freqPLB, 1);
+ do_fixup_u32(blob, "/plb/opb", "clock-frequency", sys_info.freqOPB, 1);
+ do_fixup_u32(blob, "/plb/opb/ebc", "clock-frequency", sys_info.freqEBC, 1);
+
+ /* update, or add and update /memory node */
+ offset = fdt_find_node_by_path(blob, "/memory");
+ if (offset < 0) {
+ offset = fdt_add_subnode(blob, 0, "memory");
+ if (offset < 0)
+ debug("failed to add /memory node: %s\n",
+ fdt_strerror(offset));
+ }
+ if (offset >= 0) {
+ fdt_setprop(blob, offset, "device_type",
+ "memory", sizeof("memory"));
+ tmp[0] = cpu_to_fdt32(bd->bi_memstart);
+ tmp[1] = cpu_to_fdt32(bd->bi_memsize);
+ fdt_setprop(blob, offset, "reg", tmp, sizeof(tmp));
+ }
+
+ /*
+ * Setup all baudrates for the UARTs
+ */
+ offset = 0;
+ for (i = 0; i < 4; i++) {
+ offset = fdt_find_node_by_type(blob, offset, "serial");
+ if (offset < 0)
+ break;
+
+ do_fixup_uart(blob, offset, i, bd);
+ }
+
+ /*
+ * Setup all MAC addresses in fdt
+ */
+ offset = 0;
+ for (i = 0; i < 4; i++) {
+ offset = fdt_find_node_by_type(blob, offset, "network");
+ if (offset < 0)
+ break;
+
+ switch (i) {
+ case 0:
+ do_fixup_macaddr(blob, offset, bd->bi_enetaddr, 0);
+ break;
+#ifdef CONFIG_HAS_ETH1
+ case 1:
+ do_fixup_macaddr(blob, offset, bd->bi_enet1addr, 1);
+ break;
+#endif
+#ifdef CONFIG_HAS_ETH2
+ case 2:
+ do_fixup_macaddr(blob, offset, bd->bi_enet2addr, 2);
+ break;
+#endif
+#ifdef CONFIG_HAS_ETH3
+ case 3:
+ do_fixup_macaddr(blob, offset, bd->bi_enet3addr, 3);
+ break;
+#endif
+ }
+ }
+}
+#endif /* CONFIG_OF_LIBFDT */