fsl_soc.c

Go to the documentation of this file.

/*
 * FSL SoC setup code
 *
 * Maintained by Kumar Gala (see MAINTAINERS for contact information)
 *
 * 2006 (c) MontaVista Software, Inc.
 * Vitaly Bordug <[email protected]>
 *
 * 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.
 */

#include <linux/stddef.h>
#include <linux/kernel.h>
#include <linux/init.h>
#include <linux/errno.h>
#include <linux/major.h>
#include <linux/delay.h>
#include <linux/irq.h>
#include <linux/export.h>
#include <linux/device.h>
#include <linux/platform_device.h>
#include <linux/of.h>
#include <linux/of_platform.h>
#include <linux/phy.h>
#include <linux/phy_fixed.h>
#include <linux/spi/spi.h>
#include <linux/fsl_devices.h>
#include <linux/fs_enet_pd.h>
#include <linux/fs_uart_pd.h>

#include <linux/atomic.h>
#include <asm/io.h>
#include <asm/irq.h>
#include <asm/time.h>
#include <asm/prom.h>
#include <asm/machdep.h>
#include <sysdev/fsl_soc.h>
#include <mm/mmu_decl.h>
#include <asm/cpm2.h>
#include <asm/fsl_hcalls.h> /* For the Freescale hypervisor */

extern void init_fcc_ioports(struct fs_platform_info*);
extern void init_fec_ioports(struct fs_platform_info*);
extern void init_smc_ioports(struct fs_uart_platform_info*);
static phys_addr_t immrbase = -1;

phys_addr_t get_immrbase(void)
{
    struct device_node *soc;

    if (immrbase != -1)
        return immrbase;

    soc = of_find_node_by_type(NULL, "soc");
    if (soc) {
        int size;
        u32 naddr;
        const u32 *prop = of_get_property(soc, "#address-cells", &size);

        if (prop && size == 4)
            naddr = *prop;
        else
            naddr = 2;

        prop = of_get_property(soc, "ranges", &size);
        if (prop)
            immrbase = of_translate_address(soc, prop + naddr);

        of_node_put(soc);
    }

    return immrbase;
}

EXPORT_SYMBOL(get_immrbase);

static u32 sysfreq = -1;

u32 fsl_get_sys_freq(void)
{
    struct device_node *soc;
    const u32 *prop;
    int size;

    if (sysfreq != -1)
        return sysfreq;

    soc = of_find_node_by_type(NULL, "soc");
    if (!soc)
        return -1;

    prop = of_get_property(soc, "clock-frequency", &size);
    if (!prop || size != sizeof(*prop) || *prop == 0)
        prop = of_get_property(soc, "bus-frequency", &size);

    if (prop && size == sizeof(*prop))
        sysfreq = *prop;

    of_node_put(soc);
    return sysfreq;
}
EXPORT_SYMBOL(fsl_get_sys_freq);

#if defined(CONFIG_CPM2) || defined(CONFIG_QUICC_ENGINE) || defined(CONFIG_8xx)

static u32 brgfreq = -1;

u32 get_brgfreq(void)
{
    struct device_node *node;
    const unsigned int *prop;
    int size;

    if (brgfreq != -1)
        return brgfreq;

    node = of_find_compatible_node(NULL, NULL, "fsl,cpm-brg");
    if (node) {
        prop = of_get_property(node, "clock-frequency", &size);
        if (prop && size == 4)
            brgfreq = *prop;

        of_node_put(node);
        return brgfreq;
    }

    /* Legacy device binding -- will go away when no users are left. */
    node = of_find_node_by_type(NULL, "cpm");
    if (!node)
        node = of_find_compatible_node(NULL, NULL, "fsl,qe");
    if (!node)
        node = of_find_node_by_type(NULL, "qe");

    if (node) {
        prop = of_get_property(node, "brg-frequency", &size);
        if (prop && size == 4)
            brgfreq = *prop;

        if (brgfreq == -1 || brgfreq == 0) {
            prop = of_get_property(node, "bus-frequency", &size);
            if (prop && size == 4)
                brgfreq = *prop / 2;
        }
        of_node_put(node);
    }

    return brgfreq;
}

EXPORT_SYMBOL(get_brgfreq);

static u32 fs_baudrate = -1;

u32 get_baudrate(void)
{
    struct device_node *node;

    if (fs_baudrate != -1)
        return fs_baudrate;

    node = of_find_node_by_type(NULL, "serial");
    if (node) {
        int size;
        const unsigned int *prop = of_get_property(node,
                "current-speed", &size);

        if (prop)
            fs_baudrate = *prop;
        of_node_put(node);
    }

    return fs_baudrate;
}

EXPORT_SYMBOL(get_baudrate);
#endif /* CONFIG_CPM2 */

#ifdef CONFIG_FIXED_PHY
static int __init of_add_fixed_phys(void)
{
    int ret;
    struct device_node *np;
    u32 *fixed_link;
    struct fixed_phy_status status = {};

    for_each_node_by_name(np, "ethernet") {
        fixed_link  = (u32 *)of_get_property(np, "fixed-link", NULL);
        if (!fixed_link)
            continue;

        status.link = 1;
        status.duplex = fixed_link[1];
        status.speed = fixed_link[2];
        status.pause = fixed_link[3];
        status.asym_pause = fixed_link[4];

        ret = fixed_phy_add(PHY_POLL, fixed_link[0], &status);
        if (ret) {
            of_node_put(np);
            return ret;
        }
    }

    return 0;
}
arch_initcall(of_add_fixed_phys);
#endif /* CONFIG_FIXED_PHY */

#if defined(CONFIG_FSL_SOC_BOOKE) || defined(CONFIG_PPC_86xx)
static __be32 __iomem *rstcr;

static int __init setup_rstcr(void)
{
    struct device_node *np;

    for_each_node_by_name(np, "global-utilities") {
        if ((of_get_property(np, "fsl,has-rstcr", NULL))) {
            rstcr = of_iomap(np, 0) + 0xb0;
            if (!rstcr)
                printk (KERN_ERR "Error: reset control "
                        "register not mapped!\n");
            break;
        }
    }

    if (!rstcr && ppc_md.restart == fsl_rstcr_restart)
        printk(KERN_ERR "No RSTCR register, warm reboot won't work\n");

    if (np)
        of_node_put(np);

    return 0;
}

arch_initcall(setup_rstcr);

void fsl_rstcr_restart(char *cmd)
{
    local_irq_disable();
    if (rstcr)
        /* set reset control register */
        out_be32(rstcr, 0x2);   /* HRESET_REQ */

    while (1) ;
}
#endif

#if defined(CONFIG_FB_FSL_DIU) || defined(CONFIG_FB_FSL_DIU_MODULE)
struct platform_diu_data_ops diu_ops;
EXPORT_SYMBOL(diu_ops);
#endif

/*
 * Restart the current partition
 *
 * This function should be assigned to the ppc_md.restart function pointer,
 * to initiate a partition restart when we're running under the Freescale
 * hypervisor.
 */
void fsl_hv_restart(char *cmd)
{
    pr_info("hv restart\n");
    fh_partition_restart(-1);
}

/*
 * Halt the current partition
 *
 * This function should be assigned to the ppc_md.power_off and ppc_md.halt
 * function pointers, to shut down the partition when we're running under
 * the Freescale hypervisor.
 */
void fsl_hv_halt(void)
{
    pr_info("hv exit\n");
    fh_partition_stop(-1);
}