excalibur/os/excalibur.c

	excalibur.c revision 7c478bd95313f5f23a4c958a745db2134aa03244
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 2004 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

#pragma ident   "%Z%%M% %I% %E% SMI"

#include <sys/param.h>
#include <sys/systm.h>
#include <sys/sysmacros.h>
#include <sys/sunddi.h>
#include <sys/esunddi.h>
#include <sys/sunndi.h>
#include <sys/conf.h>

#include <sys/platform_module.h>
#include <sys/errno.h>

#include <sys/sunldi.h>
#include <sys/file.h>

#define SHARED_PCF8584_PATH "/pci@8,700000/ebus@5/i2c@1,2e/nvram@0,a0"
static dev_info_t *shared_pcf8584_dip;
static kmutex_t excal_pcf8584_mutex;

int (*p2get_mem_unum)(int, uint64_t, char *, int, int *);

/*
 * Excalibur fan information
 */
typedef struct xcalfan_info {
    char        *pathname;
    int8_t      val8;
    ldi_handle_t    lh;
} xcalfan_info_t;

static xcalfan_info_t xcalfans[] = {
    {"/pci@8,700000/ebus@5/i2c@1,30/fan-control@0,48:2", 63, NULL},
    {"/pci@8,700000/ebus@5/i2c@1,30/fan-control@0,48:0", 63, NULL},
    {"/pci@8,700000/ebus@5/i2c@1,30/fan-control@0,48:4", 31, NULL}
};

#define NFANS   (sizeof (xcalfans) / sizeof (xcalfans[0]))

void
startup_platform(void)
{
    mutex_init(&excal_pcf8584_mutex, NULL, NULL, NULL);
}

int
set_platform_tsb_spares()
{
    return (0);
}

void
set_platform_defaults(void)
{
}

void
load_platform_drivers(void)
{
    ldi_ident_t li;
    dev_info_t  *dip;
    char        **drv;
    int     i, err;

    static char *boot_time_drivers[] = {
        "todds1287",
        "us",
        "mc-us3",
        "bbc_beep",
        "max1617",
        "tda8444",
        "seeprom",
        NULL
    };

    for (drv = boot_time_drivers; *drv; drv++) {
        if ((i_ddi_attach_hw_nodes(*drv) != DDI_SUCCESS) &&
            (strcmp(*drv, "us") != 0))
            /*
             * It is OK if 'us' driver doesn't load. It's
             * not available in Core cluster.
             */
            cmn_err(CE_WARN, "Failed to install \"%s\" driver.",
                *drv);
    }

    /*
     * mc-us3 must stay loaded for plat_get_mem_unum()
     */
    (void) ddi_hold_driver(ddi_name_to_major("mc-us3"));

    /*
     * Figure out which pcf8584_dip is shared with OBP for the nvram
     * device, so the lock can be acquired.
     *
     * This should really be done elsewhere, like startup_platform, but
     * that runs before the devinfo tree is setup with configure().
     * So it is here until there is a better place.
     */
    dip = e_ddi_hold_devi_by_path(SHARED_PCF8584_PATH, 0);

    ASSERT(dip != NULL);
    shared_pcf8584_dip = ddi_get_parent(dip);

    ndi_hold_devi(shared_pcf8584_dip);
    ndi_rele_devi(dip);

    li = ldi_ident_from_anon();
    for (i = 0; i < NFANS; ++i) {
        err = ldi_open_by_name(xcalfans[i].pathname,
            FWRITE, kcred, &xcalfans[i].lh, li);

        if (err != 0) {
            cmn_err(CE_WARN, "plat_fan_blast: "
                "Failed to get fan device handle for %s",
                xcalfans[i].pathname);
            continue;
        }
    }
    ldi_ident_release(li);
}

/*ARGSUSED*/
int
plat_cpu_poweron(struct cpu *cp)
{
    return (ENOTSUP);   /* not supported on this platform */
}

/*ARGSUSED*/
int
plat_cpu_poweroff(struct cpu *cp)
{
    return (ENOTSUP);   /* not supported on this platform */
}

/*ARGSUSED*/
void
plat_freelist_process(int mnode)
{
}

char *platform_module_list[] = {
    "schppm",   /* must attach before xcalppm */
    "xcalppm",
    (char *)0
};

/*ARGSUSED*/
void
plat_tod_fault(enum tod_fault_type tod_bad)
{
}

/*ARGSUSED*/
int
plat_get_mem_unum(int synd_code, uint64_t flt_addr, int flt_bus_id,
    int flt_in_memory, ushort_t flt_status, char *buf, int buflen, int *lenp)
{
    if (flt_in_memory && (p2get_mem_unum != NULL))
        return (p2get_mem_unum(synd_code, P2ALIGN(flt_addr, 8),
            buf, buflen, lenp));
    else
        return (ENOTSUP);
}

int
plat_get_cpu_unum(int cpuid, char *buf, int buflen, int *lenp)
{
    if (snprintf(buf, buflen, "Slot %d", cpuid) >= buflen) {
        return (ENOSPC);
    } else {
        *lenp = strlen(buf);
        return (0);
    }
}

/*
 * Unfortunately, excal's BBC pcf8584 controller is used by both OBP
 * and the OS's i2c drivers.  The 'eeprom' command executes
 * OBP code to handle property requests.  If eeprom didn't do this, or if the
 * controllers were partitioned so that all devices on a given controller were
 * driven by either OBP or the OS, this wouldn't be necessary.
 *
 * Note that getprop doesn't have the same issue as it reads from cached
 * memory in OBP.
 */

/*
 * Common locking enter code
 */
void
plat_setprop_enter(void)
{
    mutex_enter(&excal_pcf8584_mutex);
}

/*
 * Common locking exit code
 */
void
plat_setprop_exit(void)
{
    mutex_exit(&excal_pcf8584_mutex);
}

/*
 * Called by pcf8584 driver
 */
void
plat_shared_i2c_enter(dev_info_t *dip)
{
    if (dip == shared_pcf8584_dip) {
        plat_setprop_enter();
    }
}

/*
 * Called by pcf8584 driver
 */
void
plat_shared_i2c_exit(dev_info_t *dip)
{
    if (dip == shared_pcf8584_dip) {
        plat_setprop_exit();
    }
}

/*
 * Set platform fans to maximum speed
 */
void
plat_fan_blast(void)
{
    struct uio  uio;
    struct iovec    iov;
    int8_t      fv;
    int     err;
    int     i;

    for (i = 0; i < NFANS; ++i) {
        fv = xcalfans[i].val8;
        bzero(&uio, sizeof (uio));
        bzero(&iov, sizeof (iov));
        iov.iov_base = &fv;
        iov.iov_len = sizeof (fv);
        uio.uio_iov = &iov;
        uio.uio_iovcnt = 1;
        uio.uio_loffset = 0;
        uio.uio_segflg = UIO_SYSSPACE;
        uio.uio_resid = sizeof (fv);

        err = ldi_write(xcalfans[i].lh, &uio, kcred);
        if (err != 0) {
            if (err == EAGAIN) {
                cmn_err(CE_WARN, "!plat_fan_blast: Cannot "
                    "write %d to %s now, try again later.",
                    xcalfans[i].val8, xcalfans[i].pathname);
            } else {
                cmn_err(CE_WARN, "plat_fan_blast: "
                    "Error %d while writing %d to %s.", err,
                    xcalfans[i].val8, xcalfans[i].pathname);
            }
        }
    }
}