532 lines
14 KiB
C
532 lines
14 KiB
C
/*
|
|
* (C) Copyright 2007
|
|
* Gerald Van Baren, Custom IDEAS, vanbaren@cideas.com
|
|
*
|
|
* 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
|
|
*/
|
|
|
|
#include <common.h>
|
|
#include <linux/ctype.h>
|
|
#include <linux/types.h>
|
|
#include <asm/global_data.h>
|
|
#include <fdt.h>
|
|
#include <libfdt.h>
|
|
#include <fdt_support.h>
|
|
#include <exports.h>
|
|
|
|
/*
|
|
* Global data (for the gd->bd)
|
|
*/
|
|
DECLARE_GLOBAL_DATA_PTR;
|
|
|
|
|
|
/**
|
|
* fdt_find_and_setprop: Find a node and set it's property
|
|
*
|
|
* @fdt: ptr to device tree
|
|
* @node: path of node
|
|
* @prop: property name
|
|
* @val: ptr to new value
|
|
* @len: length of new property value
|
|
* @create: flag to create the property if it doesn't exist
|
|
*
|
|
* Convenience function to directly set a property given the path to the node.
|
|
*/
|
|
int fdt_find_and_setprop(void *fdt, const char *node, const char *prop,
|
|
const void *val, int len, int create)
|
|
{
|
|
int nodeoff = fdt_path_offset(fdt, node);
|
|
|
|
if (nodeoff < 0)
|
|
return nodeoff;
|
|
|
|
if ((!create) && (fdt_get_property(fdt, nodeoff, prop, 0) == NULL))
|
|
return 0; /* create flag not set; so exit quietly */
|
|
|
|
return fdt_setprop(fdt, nodeoff, prop, val, len);
|
|
}
|
|
|
|
#ifdef CONFIG_OF_STDOUT_VIA_ALIAS
|
|
static int fdt_fixup_stdout(void *fdt, int chosenoff)
|
|
{
|
|
int err = 0;
|
|
#ifdef CONFIG_CONS_INDEX
|
|
int node;
|
|
char sername[9] = { 0 };
|
|
const char *path;
|
|
|
|
sprintf(sername, "serial%d", CONFIG_CONS_INDEX - 1);
|
|
|
|
err = node = fdt_path_offset(fdt, "/aliases");
|
|
if (node >= 0) {
|
|
int len;
|
|
path = fdt_getprop(fdt, node, sername, &len);
|
|
if (path) {
|
|
char *p = malloc(len);
|
|
err = -FDT_ERR_NOSPACE;
|
|
if (p) {
|
|
memcpy(p, path, len);
|
|
err = fdt_setprop(fdt, chosenoff,
|
|
"linux,stdout-path", p, len);
|
|
free(p);
|
|
}
|
|
} else {
|
|
err = len;
|
|
}
|
|
}
|
|
#endif
|
|
if (err < 0)
|
|
printf("WARNING: could not set linux,stdout-path %s.\n",
|
|
fdt_strerror(err));
|
|
|
|
return err;
|
|
}
|
|
#endif
|
|
|
|
int fdt_chosen(void *fdt, ulong initrd_start, ulong initrd_end, int force)
|
|
{
|
|
int nodeoffset;
|
|
int err;
|
|
u32 tmp; /* used to set 32 bit integer properties */
|
|
char *str; /* used to set string properties */
|
|
const char *path;
|
|
|
|
err = fdt_check_header(fdt);
|
|
if (err < 0) {
|
|
printf("fdt_chosen: %s\n", fdt_strerror(err));
|
|
return err;
|
|
}
|
|
|
|
if (initrd_start && initrd_end) {
|
|
uint64_t addr, size;
|
|
int total = fdt_num_mem_rsv(fdt);
|
|
int j;
|
|
|
|
/*
|
|
* Look for an existing entry and update it. If we don't find
|
|
* the entry, we will j be the next available slot.
|
|
*/
|
|
for (j = 0; j < total; j++) {
|
|
err = fdt_get_mem_rsv(fdt, j, &addr, &size);
|
|
if (addr == initrd_start) {
|
|
fdt_del_mem_rsv(fdt, j);
|
|
break;
|
|
}
|
|
}
|
|
|
|
err = fdt_add_mem_rsv(fdt, initrd_start, initrd_end - initrd_start + 1);
|
|
if (err < 0) {
|
|
printf("fdt_chosen: %s\n", fdt_strerror(err));
|
|
return err;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Find the "chosen" node.
|
|
*/
|
|
nodeoffset = fdt_path_offset (fdt, "/chosen");
|
|
|
|
/*
|
|
* If there is no "chosen" node in the blob, create it.
|
|
*/
|
|
if (nodeoffset < 0) {
|
|
/*
|
|
* Create a new node "/chosen" (offset 0 is root level)
|
|
*/
|
|
nodeoffset = fdt_add_subnode(fdt, 0, "chosen");
|
|
if (nodeoffset < 0) {
|
|
printf("WARNING: could not create /chosen %s.\n",
|
|
fdt_strerror(nodeoffset));
|
|
return nodeoffset;
|
|
}
|
|
}
|
|
|
|
/*
|
|
* Create /chosen properites that don't exist in the fdt.
|
|
* If the property exists, update it only if the "force" parameter
|
|
* is true.
|
|
*/
|
|
str = getenv("bootargs");
|
|
if (str != NULL) {
|
|
path = fdt_getprop(fdt, nodeoffset, "bootargs", NULL);
|
|
if ((path == NULL) || force) {
|
|
err = fdt_setprop(fdt, nodeoffset,
|
|
"bootargs", str, strlen(str)+1);
|
|
if (err < 0)
|
|
printf("WARNING: could not set bootargs %s.\n",
|
|
fdt_strerror(err));
|
|
}
|
|
}
|
|
if (initrd_start && initrd_end) {
|
|
path = fdt_getprop(fdt, nodeoffset, "linux,initrd-start", NULL);
|
|
if ((path == NULL) || force) {
|
|
tmp = __cpu_to_be32(initrd_start);
|
|
err = fdt_setprop(fdt, nodeoffset,
|
|
"linux,initrd-start", &tmp, sizeof(tmp));
|
|
if (err < 0)
|
|
printf("WARNING: "
|
|
"could not set linux,initrd-start %s.\n",
|
|
fdt_strerror(err));
|
|
tmp = __cpu_to_be32(initrd_end);
|
|
err = fdt_setprop(fdt, nodeoffset,
|
|
"linux,initrd-end", &tmp, sizeof(tmp));
|
|
if (err < 0)
|
|
printf("WARNING: could not set linux,initrd-end %s.\n",
|
|
fdt_strerror(err));
|
|
}
|
|
}
|
|
|
|
#ifdef CONFIG_OF_STDOUT_VIA_ALIAS
|
|
path = fdt_getprop(fdt, nodeoffset, "linux,stdout-path", NULL);
|
|
if ((path == NULL) || force)
|
|
err = fdt_fixup_stdout(fdt, nodeoffset);
|
|
#endif
|
|
|
|
#ifdef OF_STDOUT_PATH
|
|
path = fdt_getprop(fdt, nodeoffset, "linux,stdout-path", NULL);
|
|
if ((path == NULL) || force) {
|
|
err = fdt_setprop(fdt, nodeoffset,
|
|
"linux,stdout-path", OF_STDOUT_PATH, strlen(OF_STDOUT_PATH)+1);
|
|
if (err < 0)
|
|
printf("WARNING: could not set linux,stdout-path %s.\n",
|
|
fdt_strerror(err));
|
|
}
|
|
#endif
|
|
|
|
return err;
|
|
}
|
|
|
|
void do_fixup_by_path(void *fdt, const char *path, const char *prop,
|
|
const void *val, int len, int create)
|
|
{
|
|
#if defined(DEBUG)
|
|
int i;
|
|
debug("Updating property '%s/%s' = ", path, prop);
|
|
for (i = 0; i < len; i++)
|
|
debug(" %.2x", *(u8*)(val+i));
|
|
debug("\n");
|
|
#endif
|
|
int rc = fdt_find_and_setprop(fdt, path, prop, val, len, create);
|
|
if (rc)
|
|
printf("Unable to update property %s:%s, err=%s\n",
|
|
path, prop, fdt_strerror(rc));
|
|
}
|
|
|
|
void do_fixup_by_path_u32(void *fdt, const char *path, const char *prop,
|
|
u32 val, int create)
|
|
{
|
|
val = cpu_to_fdt32(val);
|
|
do_fixup_by_path(fdt, path, prop, &val, sizeof(val), create);
|
|
}
|
|
|
|
void do_fixup_by_prop(void *fdt,
|
|
const char *pname, const void *pval, int plen,
|
|
const char *prop, const void *val, int len,
|
|
int create)
|
|
{
|
|
int off;
|
|
#if defined(DEBUG)
|
|
int i;
|
|
debug("Updating property '%s' = ", prop);
|
|
for (i = 0; i < len; i++)
|
|
debug(" %.2x", *(u8*)(val+i));
|
|
debug("\n");
|
|
#endif
|
|
off = fdt_node_offset_by_prop_value(fdt, -1, pname, pval, plen);
|
|
while (off != -FDT_ERR_NOTFOUND) {
|
|
if (create || (fdt_get_property(fdt, off, prop, 0) != NULL))
|
|
fdt_setprop(fdt, off, prop, val, len);
|
|
off = fdt_node_offset_by_prop_value(fdt, off, pname, pval, plen);
|
|
}
|
|
}
|
|
|
|
void do_fixup_by_prop_u32(void *fdt,
|
|
const char *pname, const void *pval, int plen,
|
|
const char *prop, u32 val, int create)
|
|
{
|
|
val = cpu_to_fdt32(val);
|
|
do_fixup_by_prop(fdt, pname, pval, plen, prop, &val, 4, create);
|
|
}
|
|
|
|
void do_fixup_by_compat(void *fdt, const char *compat,
|
|
const char *prop, const void *val, int len, int create)
|
|
{
|
|
int off = -1;
|
|
#if defined(DEBUG)
|
|
int i;
|
|
debug("Updating property '%s' = ", prop);
|
|
for (i = 0; i < len; i++)
|
|
debug(" %.2x", *(u8*)(val+i));
|
|
debug("\n");
|
|
#endif
|
|
off = fdt_node_offset_by_compatible(fdt, -1, compat);
|
|
while (off != -FDT_ERR_NOTFOUND) {
|
|
if (create || (fdt_get_property(fdt, off, prop, 0) != NULL))
|
|
fdt_setprop(fdt, off, prop, val, len);
|
|
off = fdt_node_offset_by_compatible(fdt, off, compat);
|
|
}
|
|
}
|
|
|
|
void do_fixup_by_compat_u32(void *fdt, const char *compat,
|
|
const char *prop, u32 val, int create)
|
|
{
|
|
val = cpu_to_fdt32(val);
|
|
do_fixup_by_compat(fdt, compat, prop, &val, 4, create);
|
|
}
|
|
|
|
int fdt_fixup_memory(void *blob, u64 start, u64 size)
|
|
{
|
|
int err, nodeoffset, len = 0;
|
|
u8 tmp[16];
|
|
const u32 *addrcell, *sizecell;
|
|
|
|
err = fdt_check_header(blob);
|
|
if (err < 0) {
|
|
printf("%s: %s\n", __FUNCTION__, fdt_strerror(err));
|
|
return err;
|
|
}
|
|
|
|
/* update, or add and update /memory node */
|
|
nodeoffset = fdt_path_offset(blob, "/memory");
|
|
if (nodeoffset < 0) {
|
|
nodeoffset = fdt_add_subnode(blob, 0, "memory");
|
|
if (nodeoffset < 0)
|
|
printf("WARNING: could not create /memory: %s.\n",
|
|
fdt_strerror(nodeoffset));
|
|
return nodeoffset;
|
|
}
|
|
err = fdt_setprop(blob, nodeoffset, "device_type", "memory",
|
|
sizeof("memory"));
|
|
if (err < 0) {
|
|
printf("WARNING: could not set %s %s.\n", "device_type",
|
|
fdt_strerror(err));
|
|
return err;
|
|
}
|
|
|
|
addrcell = fdt_getprop(blob, 0, "#address-cells", NULL);
|
|
/* use shifts and mask to ensure endianness */
|
|
if ((addrcell) && (*addrcell == 2)) {
|
|
tmp[0] = (start >> 56) & 0xff;
|
|
tmp[1] = (start >> 48) & 0xff;
|
|
tmp[2] = (start >> 40) & 0xff;
|
|
tmp[3] = (start >> 32) & 0xff;
|
|
tmp[4] = (start >> 24) & 0xff;
|
|
tmp[5] = (start >> 16) & 0xff;
|
|
tmp[6] = (start >> 8) & 0xff;
|
|
tmp[7] = (start ) & 0xff;
|
|
len = 8;
|
|
} else {
|
|
tmp[0] = (start >> 24) & 0xff;
|
|
tmp[1] = (start >> 16) & 0xff;
|
|
tmp[2] = (start >> 8) & 0xff;
|
|
tmp[3] = (start ) & 0xff;
|
|
len = 4;
|
|
}
|
|
|
|
sizecell = fdt_getprop(blob, 0, "#size-cells", NULL);
|
|
/* use shifts and mask to ensure endianness */
|
|
if ((sizecell) && (*sizecell == 2)) {
|
|
tmp[0+len] = (size >> 56) & 0xff;
|
|
tmp[1+len] = (size >> 48) & 0xff;
|
|
tmp[2+len] = (size >> 40) & 0xff;
|
|
tmp[3+len] = (size >> 32) & 0xff;
|
|
tmp[4+len] = (size >> 24) & 0xff;
|
|
tmp[5+len] = (size >> 16) & 0xff;
|
|
tmp[6+len] = (size >> 8) & 0xff;
|
|
tmp[7+len] = (size ) & 0xff;
|
|
len += 8;
|
|
} else {
|
|
tmp[0+len] = (size >> 24) & 0xff;
|
|
tmp[1+len] = (size >> 16) & 0xff;
|
|
tmp[2+len] = (size >> 8) & 0xff;
|
|
tmp[3+len] = (size ) & 0xff;
|
|
len += 4;
|
|
}
|
|
|
|
err = fdt_setprop(blob, nodeoffset, "reg", tmp, len);
|
|
if (err < 0) {
|
|
printf("WARNING: could not set %s %s.\n",
|
|
"reg", fdt_strerror(err));
|
|
return err;
|
|
}
|
|
return 0;
|
|
}
|
|
|
|
#if defined(CONFIG_HAS_ETH0) || defined(CONFIG_HAS_ETH1) ||\
|
|
defined(CONFIG_HAS_ETH2) || defined(CONFIG_HAS_ETH3)
|
|
|
|
void fdt_fixup_ethernet(void *fdt, bd_t *bd)
|
|
{
|
|
int node;
|
|
const char *path;
|
|
|
|
node = fdt_path_offset(fdt, "/aliases");
|
|
if (node >= 0) {
|
|
#if defined(CONFIG_HAS_ETH0)
|
|
path = fdt_getprop(fdt, node, "ethernet0", NULL);
|
|
if (path) {
|
|
do_fixup_by_path(fdt, path, "mac-address",
|
|
bd->bi_enetaddr, 6, 0);
|
|
do_fixup_by_path(fdt, path, "local-mac-address",
|
|
bd->bi_enetaddr, 6, 1);
|
|
}
|
|
#endif
|
|
#if defined(CONFIG_HAS_ETH1)
|
|
path = fdt_getprop(fdt, node, "ethernet1", NULL);
|
|
if (path) {
|
|
do_fixup_by_path(fdt, path, "mac-address",
|
|
bd->bi_enet1addr, 6, 0);
|
|
do_fixup_by_path(fdt, path, "local-mac-address",
|
|
bd->bi_enet1addr, 6, 1);
|
|
}
|
|
#endif
|
|
#if defined(CONFIG_HAS_ETH2)
|
|
path = fdt_getprop(fdt, node, "ethernet2", NULL);
|
|
if (path) {
|
|
do_fixup_by_path(fdt, path, "mac-address",
|
|
bd->bi_enet2addr, 6, 0);
|
|
do_fixup_by_path(fdt, path, "local-mac-address",
|
|
bd->bi_enet2addr, 6, 1);
|
|
}
|
|
#endif
|
|
#if defined(CONFIG_HAS_ETH3)
|
|
path = fdt_getprop(fdt, node, "ethernet3", NULL);
|
|
if (path) {
|
|
do_fixup_by_path(fdt, path, "mac-address",
|
|
bd->bi_enet3addr, 6, 0);
|
|
do_fixup_by_path(fdt, path, "local-mac-address",
|
|
bd->bi_enet3addr, 6, 1);
|
|
}
|
|
#endif
|
|
}
|
|
}
|
|
#endif
|
|
|
|
#ifdef CONFIG_HAS_FSL_DR_USB
|
|
void fdt_fixup_dr_usb(void *blob, bd_t *bd)
|
|
{
|
|
char *mode;
|
|
const char *compat = "fsl-usb2-dr";
|
|
const char *prop = "dr_mode";
|
|
int node_offset;
|
|
int err;
|
|
|
|
mode = getenv("usb_dr_mode");
|
|
if (!mode)
|
|
return;
|
|
|
|
node_offset = fdt_node_offset_by_compatible(blob, 0, compat);
|
|
if (node_offset < 0)
|
|
printf("WARNING: could not find compatible node %s: %s.\n",
|
|
compat, fdt_strerror(node_offset));
|
|
|
|
err = fdt_setprop(blob, node_offset, prop, mode, strlen(mode) + 1);
|
|
if (err < 0)
|
|
printf("WARNING: could not set %s for %s: %s.\n",
|
|
prop, compat, fdt_strerror(err));
|
|
}
|
|
#endif /* CONFIG_HAS_FSL_DR_USB */
|
|
|
|
#if defined(CONFIG_MPC83XX) || defined(CONFIG_MPC85xx)
|
|
/*
|
|
* update crypto node properties to a specified revision of the SEC
|
|
* called with sec_rev == 0 if not on an mpc8xxxE processor
|
|
*/
|
|
void fdt_fixup_crypto_node(void *blob, int sec_rev)
|
|
{
|
|
const struct sec_rev_prop {
|
|
u32 sec_rev;
|
|
u32 num_channels;
|
|
u32 channel_fifo_len;
|
|
u32 exec_units_mask;
|
|
u32 descriptor_types_mask;
|
|
} sec_rev_prop_list [] = {
|
|
{ 0x0200, 4, 24, 0x07e, 0x01010ebf }, /* SEC 2.0 */
|
|
{ 0x0201, 4, 24, 0x0fe, 0x012b0ebf }, /* SEC 2.1 */
|
|
{ 0x0202, 1, 24, 0x04c, 0x0122003f }, /* SEC 2.2 */
|
|
{ 0x0204, 4, 24, 0x07e, 0x012b0ebf }, /* SEC 2.4 */
|
|
{ 0x0300, 4, 24, 0x9fe, 0x03ab0ebf }, /* SEC 3.0 */
|
|
{ 0x0303, 4, 24, 0x97c, 0x03ab0abf }, /* SEC 3.3 */
|
|
};
|
|
char compat_strlist[ARRAY_SIZE(sec_rev_prop_list) *
|
|
sizeof("fsl,secX.Y")];
|
|
int crypto_node, sec_idx, err;
|
|
char *p;
|
|
u32 val;
|
|
|
|
/* locate crypto node based on lowest common compatible */
|
|
crypto_node = fdt_node_offset_by_compatible(blob, -1, "fsl,sec2.0");
|
|
if (crypto_node == -FDT_ERR_NOTFOUND)
|
|
return;
|
|
|
|
/* delete it if not on an E-processor */
|
|
if (crypto_node > 0 && !sec_rev) {
|
|
fdt_del_node(blob, crypto_node);
|
|
return;
|
|
}
|
|
|
|
/* else we got called for possible uprev */
|
|
for (sec_idx = 0; sec_idx < ARRAY_SIZE(sec_rev_prop_list); sec_idx++)
|
|
if (sec_rev_prop_list[sec_idx].sec_rev == sec_rev)
|
|
break;
|
|
|
|
if (sec_idx == ARRAY_SIZE(sec_rev_prop_list)) {
|
|
puts("warning: unknown SEC revision number\n");
|
|
return;
|
|
}
|
|
|
|
val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].num_channels);
|
|
err = fdt_setprop(blob, crypto_node, "fsl,num-channels", &val, 4);
|
|
if (err < 0)
|
|
printf("WARNING: could not set crypto property: %s\n",
|
|
fdt_strerror(err));
|
|
|
|
val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].descriptor_types_mask);
|
|
err = fdt_setprop(blob, crypto_node, "fsl,descriptor-types-mask", &val, 4);
|
|
if (err < 0)
|
|
printf("WARNING: could not set crypto property: %s\n",
|
|
fdt_strerror(err));
|
|
|
|
val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].exec_units_mask);
|
|
err = fdt_setprop(blob, crypto_node, "fsl,exec-units-mask", &val, 4);
|
|
if (err < 0)
|
|
printf("WARNING: could not set crypto property: %s\n",
|
|
fdt_strerror(err));
|
|
|
|
val = cpu_to_fdt32(sec_rev_prop_list[sec_idx].channel_fifo_len);
|
|
err = fdt_setprop(blob, crypto_node, "fsl,channel-fifo-len", &val, 4);
|
|
if (err < 0)
|
|
printf("WARNING: could not set crypto property: %s\n",
|
|
fdt_strerror(err));
|
|
|
|
val = 0;
|
|
while (sec_idx >= 0) {
|
|
p = compat_strlist + val;
|
|
val += sprintf(p, "fsl,sec%d.%d",
|
|
(sec_rev_prop_list[sec_idx].sec_rev & 0xff00) >> 8,
|
|
sec_rev_prop_list[sec_idx].sec_rev & 0x00ff) + 1;
|
|
sec_idx--;
|
|
}
|
|
err = fdt_setprop(blob, crypto_node, "compatible", &compat_strlist, val);
|
|
if (err < 0)
|
|
printf("WARNING: could not set crypto property: %s\n",
|
|
fdt_strerror(err));
|
|
}
|
|
#endif /* defined(CONFIG_MPC83XX) || defined(CONFIG_MPC85xx) */
|