chicago/os/chicago.c

	chicago.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 2005 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/platform_module.h>
#include <sys/errno.h>
#include <sys/lgrp.h>
#include <sys/memnode.h>
#include <sys/promif.h>

#define SHARED_MI2CV_PATH "/i2c@1f,520000"
static dev_info_t *shared_mi2cv_dip;
static kmutex_t chicago_mi2cv_mutex;

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

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

int
set_platform_tsb_spares()
{
    return (0);
}

void
set_platform_defaults(void)
{
    extern char *tod_module_name;
    /* Set appropriate tod module for Chicago */
    if (tod_module_name == NULL)
        tod_module_name = "todds1337";
}

/*
 * Definitions for accessing the pci config space of the isa node
 * of Southbridge.
 */
static ddi_acc_handle_t isa_handle = NULL;  /* handle for isa pci space */


void
load_platform_drivers(void)
{
    /*
     * Install power driver which handles the power button.
     */
    if (i_ddi_attach_hw_nodes("power") != DDI_SUCCESS)
        cmn_err(CE_WARN, "Failed to install \"power\" driver.");
    (void) ddi_hold_driver(ddi_name_to_major("power"));

    /*
     * It is OK to return error because 'us' driver is not available
     * in all clusters (e.g. missing in Core cluster).
     */
    (void) i_ddi_attach_hw_nodes("us");

    if (i_ddi_attach_hw_nodes("grbeep") != DDI_SUCCESS)
        cmn_err(CE_WARN, "Failed to install \"beep\" driver.");


    /*
     * mc-us3i must stay loaded for plat_get_mem_unum()
     */
    if (i_ddi_attach_hw_nodes("mc-us3i") != DDI_SUCCESS)
        cmn_err(CE_WARN, "mc-us3i driver failed to install");
    (void) ddi_hold_driver(ddi_name_to_major("mc-us3i"));

    /*
     * Figure out which mi2cv dip is shared with OBP for the nvram
     * device, so the lock can be acquired.
     */
    shared_mi2cv_dip = e_ddi_hold_devi_by_path(SHARED_MI2CV_PATH, 0);

    /*
     * todds1337 needs early attach
     */
    if (i_ddi_attach_hw_nodes("todds1337") != DDI_SUCCESS)
        cmn_err(CE_WARN, "todds1337 driver failed to install");
}

/*
 * This routine is needed if a device error or timeout occurs before the
 * driver is loaded.
 */
/*ARGSUSED*/
int
plat_ide_chipreset(dev_info_t *dip, int chno)
{
    int ret = DDI_SUCCESS;

    if (isa_handle == NULL) {
        return (DDI_FAILURE);
    }

    /*
     * This will be filled in with the reset logic
     * for the ULI1573 when that becomes available.
     * currently this is just a stub.
     */
    return (ret);
}


/*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[] = {
    "mi2cv",
    "jbusppm",
    "pca9556",
    "ppm",
    (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);
}

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

/*
 * Fiesta support for lgroups.
 *
 * On fiesta platform, an lgroup platform handle == CPU id
 */

/*
 * Macro for extracting the CPU number from the CPU id
 */
#define CPUID_TO_LGRP(id)   ((id) & 0x7)
#define CHICAGO_MC_SHIFT    36

/*
 * Return the platform handle for the lgroup containing the given CPU
 */
void *
plat_lgrp_cpu_to_hand(processorid_t id)
{
    return ((void *) CPUID_TO_LGRP(id));
}

/*
 * Platform specific lgroup initialization
 */
void
plat_lgrp_init(void)
{
    dnode_t     curnode;
    char        tmp_name[MAXSYSNAME];
    int     portid;
    int     cpucnt = 0;
    int     max_portid = -1;
    extern uint32_t lgrp_expand_proc_thresh;
    extern uint32_t lgrp_expand_proc_diff;
    extern pgcnt_t  lgrp_mem_free_thresh;
    extern uint32_t lgrp_loadavg_tolerance;
    extern uint32_t lgrp_loadavg_max_effect;
    extern uint32_t lgrp_load_thresh;
    extern lgrp_mem_policy_t  lgrp_mem_policy_root;

    /*
     * Count the number of CPUs installed to determine if
     * NUMA optimization should be enabled or not.
     *
     * All CPU nodes reside in the root node and have a
     * device type "cpu".
     */
    curnode = prom_rootnode();
    for (curnode = prom_childnode(curnode); curnode;
        curnode = prom_nextnode(curnode)) {
        bzero(tmp_name, MAXSYSNAME);
        if (prom_getproplen(curnode, OBP_NAME) < MAXSYSNAME) {
            if (prom_getprop(curnode, OBP_NAME,
                (caddr_t)tmp_name) == -1 || prom_getprop(curnode,
                OBP_DEVICETYPE, tmp_name) == -1 || strcmp(tmp_name,
                "cpu") != 0)
            continue;

            cpucnt++;
            if (prom_getprop(curnode, "portid", (caddr_t)&portid) !=
                -1 && portid > max_portid)
                max_portid = portid;
        }
    }
    if (cpucnt <= 1)
        max_mem_nodes = 1;
    else if (max_portid >= 0 && max_portid < MAX_MEM_NODES)
        max_mem_nodes = max_portid + 1;

    /*
     * Set tuneables for fiesta architecture
     *
     * lgrp_expand_proc_thresh is the minimum load on the lgroups
     * this process is currently running on before considering
     * expanding threads to another lgroup.
     *
     * lgrp_expand_proc_diff determines how much less the remote lgroup
     * must be loaded before expanding to it.
     *
     * Optimize for memory bandwidth by spreading multi-threaded
     * program to different lgroups.
     */
    lgrp_expand_proc_thresh = lgrp_loadavg_max_effect - 1;
    lgrp_expand_proc_diff = lgrp_loadavg_max_effect / 2;
    lgrp_loadavg_tolerance = lgrp_loadavg_max_effect / 2;
    lgrp_mem_free_thresh = 1;   /* home lgrp must have some memory */
    lgrp_expand_proc_thresh = lgrp_loadavg_max_effect - 1;
    lgrp_mem_policy_root = LGRP_MEM_POLICY_NEXT;
    lgrp_load_thresh = 0;

    mem_node_pfn_shift = CHICAGO_MC_SHIFT - MMU_PAGESHIFT;
}

/*
 * Return latency between "from" and "to" lgroups
 *
 * This latency number can only be used for relative comparison
 * between lgroups on the running system, cannot be used across platforms,
 * and may not reflect the actual latency.  It is platform and implementation
 * specific, so platform gets to decide its value.  It would be nice if the
 * number was at least proportional to make comparisons more meaningful though.
 * NOTE: The numbers below are supposed to be load latencies for uncached
 * memory divided by 10.
 */
int
plat_lgrp_latency(lgrp_handle_t from, lgrp_handle_t to)
{
    /*
     * Return remote latency when there are more than two lgroups
     * (root and child) and getting latency between two different
     * lgroups or root is involved
     */
    if (lgrp_optimizations() && (from != to ||
        from == LGRP_DEFAULT_HANDLE || to == LGRP_DEFAULT_HANDLE))
        return (17);
    else
        return (12);
}

int
plat_pfn_to_mem_node(pfn_t pfn)
{
    ASSERT(max_mem_nodes > 1);
    return (pfn >> mem_node_pfn_shift);
}

/*
 * Assign memnode to lgroups
 */
void
plat_fill_mc(dnode_t nodeid)
{
    int     portid;

    /*
     * Chicago memory controller portid == global CPU id
     */
    if ((prom_getprop(nodeid, "portid", (caddr_t)&portid) == -1) ||
        (portid < 0))
        return;

    if (portid < max_mem_nodes)
        plat_assign_lgrphand_to_mem_node((lgrp_handle_t)portid, portid);
}

/* ARGSUSED */
void
plat_build_mem_nodes(u_longlong_t *list, size_t nelems)
{
    size_t  elem;
    pfn_t   basepfn;
    pgcnt_t npgs;

    /*
     * Boot install lists are arranged <addr, len>, <addr, len>, ...
     */
    for (elem = 0; elem < nelems; elem += 2) {
        basepfn = btop(list[elem]);
        npgs = btop(list[elem+1]);
        mem_node_add_slice(basepfn, basepfn + npgs - 1);
    }
}

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

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

/*
 * Called by mi2cv driver
 */
void
plat_shared_i2c_enter(dev_info_t *i2cnexus_dip)
{
    if (i2cnexus_dip == shared_mi2cv_dip) {
        plat_setprop_enter();
    }
}

/*
 * Called by mi2cv driver
 */
void
plat_shared_i2c_exit(dev_info_t *i2cnexus_dip)
{
    if (i2cnexus_dip == shared_mi2cv_dip) {
        plat_setprop_exit();
    }
}