sun4v/io/dr_util.c

	dr_util.c revision 79afa7fba66c808623862442107f913bce5ea783
/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License (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 2010 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*
 * sun4v DR Utility functions
 */

#include <sys/types.h>
#include <sys/cmn_err.h>
#include <sys/sunddi.h>
#include <sys/note.h>
#include <sys/sysevent.h>
#include <sys/sysevent/dr.h>
#include <sys/sysevent/eventdefs.h>
#include <sys/ldoms.h>
#include <sys/memlist.h>
#include <sys/dr_util.h>

extern int ppvm_enable;

boolean_t
dr_is_disabled(dr_type_t type)
{
    /*
     * The type argument is currently unused. However, it
     * keeps the interface flexible enough to allows for
     * only disabling certain types of DR.
     */
    _NOTE(ARGUNUSED(type))

    /*
     * DR requires that the kernel is using its own CIF
     * handler. If that is not the case, either because
     * domaining has been explicitly disabled, or because
     * the firmware does not support it, the system must
     * remain static and DR must be disabled.
     */
    if (!domaining_enabled()) {
        cmn_err(CE_NOTE, "!Kernel CIF handler is not enabled, DR "
            "is not available\n");
        return (B_TRUE);
    }

    if (type == DR_TYPE_MEM && ppvm_enable == 0) {
        cmn_err(CE_NOTE, "!Memory DR is disabled\n");
        return (B_TRUE);
    }

    return (B_FALSE);
}

/*
 * Generate a DR sysevent based on the type of resource and
 * sysevent hint specified. The hint indicates whether the
 * resource was added or removed.
 */
void
dr_generate_event(dr_type_t type, int se_hint)
{
    int         rv;
    sysevent_id_t       eid;
    sysevent_t      *ev = NULL;
    sysevent_attr_list_t    *evnt_attr_list = NULL;
    sysevent_value_t    evnt_val;
    static char     pubname[] = SUNW_KERN_PUB"dr";

    DR_DBG_ALL("generate_event: type=%s, hint=%s\n", DR_TYPE2STR(type),
        SE_HINT2STR(se_hint));

    /*
     * Add the attachment point attribute
     */
    ev = sysevent_alloc(EC_DR, ESC_DR_AP_STATE_CHANGE, pubname, KM_SLEEP);
    evnt_val.value_type = SE_DATA_TYPE_STRING;
    evnt_val.value.sv_string = DR_TYPE2STR(type);

    rv = sysevent_add_attr(&evnt_attr_list, DR_AP_ID, &evnt_val, KM_SLEEP);
    if (rv != 0) {
        DR_DBG_ALL("generate_event: failed to add attr '%s' for "
            "'%s' event\n", DR_AP_ID, EC_DR);
        goto done;
    }

    /*
     * Add the DR hint attribute
     */
    evnt_val.value_type = SE_DATA_TYPE_STRING;
    evnt_val.value.sv_string = SE_HINT2STR(se_hint);

    rv = sysevent_add_attr(&evnt_attr_list, DR_HINT, &evnt_val, KM_SLEEP);
    if (rv != 0) {
        DR_DBG_ALL("generate_event: failed to add attr '%s' for "
            "'%s' event\n", DR_HINT, EC_DR);
        sysevent_free_attr(evnt_attr_list);
        goto done;
    }

    /*
     * Attach the attribute list to the event
     */
    rv = sysevent_attach_attributes(ev, evnt_attr_list);
    if (rv != 0) {
        DR_DBG_ALL("generate_event: failed to add attr list for "
            "'%s' event\n", EC_DR);
        sysevent_free_attr(evnt_attr_list);
        goto done;
    }

    /*
     * Log the event
     */
    rv = log_sysevent(ev, KM_NOSLEEP, &eid);
    if (rv != 0) {
        DR_DBG_ALL("generate_event: failed to log event (%d)\n", rv);
    }

done:
    if (ev != NULL)
        sysevent_free(ev);
}

struct memlist *
dr_memlist_dup(struct memlist *mlist)
{
    struct memlist *hl = NULL, *tl, **mlp;

    if (mlist == NULL)
        return (NULL);

    mlp = &hl;
    tl = *mlp;
    for (; mlist; mlist = mlist->ml_next) {
        *mlp =  (struct memlist *)kmem_zalloc(sizeof (struct memlist),\
            KM_SLEEP);
        (*mlp)->ml_address = mlist->ml_address;
        (*mlp)->ml_size = mlist->ml_size;
        (*mlp)->ml_prev = tl;
        tl = *mlp;
        mlp = &((*mlp)->ml_next);
    }
    *mlp = NULL;

    return (hl);
}

/*
 * Free a memlist and its elements
 */
void
dr_memlist_delete(struct memlist *mlist)
{
    register struct memlist *ml;

    for (ml = mlist; ml; ml = mlist) {
        mlist = ml->ml_next;
        kmem_free((void *)ml, sizeof (struct memlist));
    }
}

/*
 * Debugging Features
 */
#ifdef DEBUG

uint_t dr_debug = 0x0;

#define BYTESPERLINE    8
#define LINEWIDTH   ((BYTESPERLINE * 3) + (BYTESPERLINE + 2) + 1)
#define ASCIIOFFSET ((BYTESPERLINE * 3) + 2)
#define ISPRINT(c)  ((c >= ' ') && (c <= '~'))

/*
 * Output a buffer formatted with a set number of bytes on
 * each line. Append each line with the ASCII equivalent of
 * each byte if it falls within the printable ASCII range,
 * and '.' otherwise.
 */
void
dr_dbg_dump_msg(void *buf, size_t len)
{
    int i, j;
    char    *msg = buf;
    char    *curr;
    char    *aoff;
    char    line[LINEWIDTH];

    /* abort if not debugging transport */
    if (!(dr_debug & DR_DBG_FLAG_TRANS)) {
        return;
    }

    /* walk the buffer one line at a time */
    for (i = 0; i < len; i += BYTESPERLINE) {

        bzero(line, LINEWIDTH);

        curr = line;
        aoff = line + ASCIIOFFSET;

        /*
         * Walk the bytes in the current line, storing
         * the hex value for the byte as well as the
         * ASCII representation in a temporary buffer.
         * All ASCII values are placed at the end of
         * the line.
         */
        for (j = 0; (j < BYTESPERLINE) && ((i + j) < len); j++) {
            (void) sprintf(curr, " %02x", msg[i + j]);
            *aoff = (ISPRINT(msg[i + j])) ? msg[i + j] : '.';
            curr += 3;
            aoff++;
        }

        /*
         * Fill in to the start of the ASCII translation
         * with spaces. This will only be necessary if
         * this is the last line and there are not enough
         * bytes to fill the whole line.
         */
        while (curr != (line + ASCIIOFFSET))
            *curr++ = ' ';

        DR_DBG_TRANS("%s\n", line);
    }
}
#endif /* DEBUG */