schemes/cpu/cpu.c

	cpu.c revision 14ea4bb737263733ad80a36b4f73f681c30a6b45
/*
 * 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 2006 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

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

#include <sys/types.h>
#include <sys/processor.h>
#include <fm/fmd_fmri.h>

#include <strings.h>
#include <errno.h>
#include <kstat.h>

#ifdef  sparc
#include <cpu_mdesc.h>
#include <sys/fm/ldom.h>
#endif

/*
 * The scheme plugin for cpu FMRIs.
 */

#ifdef sparc
cpu_t cpu;
static ldom_hdl_t *cpu_scheme_lhp;
#endif /* sparc */

ssize_t
fmd_fmri_nvl2str(nvlist_t *nvl, char *buf, size_t buflen)
{
    int err;
    uint8_t version;
    uint32_t cpuid;
    uint64_t serint;
    char *serstr;

    if (nvlist_lookup_uint8(nvl, FM_VERSION, &version) != 0)
        return (fmd_fmri_set_errno(EINVAL));

    if (version == CPU_SCHEME_VERSION0) {
        if (nvlist_lookup_uint32(nvl, FM_FMRI_CPU_ID, &cpuid) != 0 ||
            nvlist_lookup_uint64(nvl, FM_FMRI_CPU_SERIAL_ID, &serint)
            != 0)
            return (fmd_fmri_set_errno(EINVAL));

        return (snprintf(buf, buflen, "cpu:///%s=%u/%s=%llX",
            FM_FMRI_CPU_ID, cpuid, FM_FMRI_CPU_SERIAL_ID,
            (u_longlong_t)serint));

    } else if (version == CPU_SCHEME_VERSION1) {
        if (nvlist_lookup_uint32(nvl, FM_FMRI_CPU_ID, &cpuid) != 0)
            return (fmd_fmri_set_errno(EINVAL));

        /*
         * Serial number is an optional element
         */
        if ((err = nvlist_lookup_string(nvl, FM_FMRI_CPU_SERIAL_ID,
            &serstr)) != 0)
            if (err == ENOENT)
                return (snprintf(buf, buflen, "cpu:///%s=%u",
                    FM_FMRI_CPU_ID, cpuid));
            else
                return (fmd_fmri_set_errno(EINVAL));
        else
            return (snprintf(buf, buflen, "cpu:///%s=%u/%s=%s",
                FM_FMRI_CPU_ID, cpuid, FM_FMRI_CPU_SERIAL_ID,
                serstr));

    } else {
        return (fmd_fmri_set_errno(EINVAL));
    }
}

static int
cpu_get_serialid_kstat(uint32_t cpuid, uint64_t *serialidp)
{
    kstat_named_t *kn;
    kstat_ctl_t *kc;
    kstat_t *ksp;
    int i;

    if ((kc = kstat_open()) == NULL)
        return (-1); /* errno is set for us */

    if ((ksp = kstat_lookup(kc, "cpu_info", cpuid, NULL)) == NULL) {
        (void) kstat_close(kc);
        return (fmd_fmri_set_errno(ENOENT));
    }

    if (kstat_read(kc, ksp, NULL) == -1) {
        int oserr = errno;
        (void) kstat_close(kc);
        return (fmd_fmri_set_errno(oserr));
    }

    for (kn = ksp->ks_data, i = 0; i < ksp->ks_ndata; i++, kn++) {
        if (strcmp(kn->name, "device_ID") == 0) {
            *serialidp = kn->value.ui64;
            (void) kstat_close(kc);
            return (0);
        }
    }

    (void) kstat_close(kc);
    return (fmd_fmri_set_errno(ENOENT));
}

static int
cpu_get_serialid_V1(uint32_t cpuid, char *serbuf, size_t len)
{
    int err;
    uint64_t serial = 0;

#ifdef  sparc
    if (cpu.cpu_mdesc_cpus != NULL)
        err = cpu_get_serialid_mdesc(cpuid, &serial);
    else
#endif  /* sparc */
        err = cpu_get_serialid_kstat(cpuid, &serial);

    (void) snprintf(serbuf, len, "%llX", (u_longlong_t)serial);
    return (err);
}

static int
cpu_get_serialid_V0(uint32_t cpuid, uint64_t *serialidp)
{
#ifdef  sparc
    if (cpu.cpu_mdesc_cpus != NULL)
        return (cpu_get_serialid_mdesc(cpuid, serialidp));
    else
#endif  /* sparc */
        return (cpu_get_serialid_kstat(cpuid, serialidp));
}

int
fmd_fmri_expand(nvlist_t *nvl)
{
    uint8_t version;
    uint32_t cpuid;
    uint64_t serialid;
    char *serstr, serbuf[21]; /* sizeof (UINT64_MAX) + '\0' */
    int rc;

    if (nvlist_lookup_uint8(nvl, FM_VERSION, &version) != 0 ||
        nvlist_lookup_uint32(nvl, FM_FMRI_CPU_ID, &cpuid) != 0)
        return (fmd_fmri_set_errno(EINVAL));

    if (version == CPU_SCHEME_VERSION0) {
        if ((rc = nvlist_lookup_uint64(nvl, FM_FMRI_CPU_SERIAL_ID,
            &serialid)) != 0) {
            if (rc != ENOENT)
                return (fmd_fmri_set_errno(rc));

            if (cpu_get_serialid_V0(cpuid, &serialid) != 0)
                return (-1); /* errno is set for us */

            if ((rc = nvlist_add_uint64(nvl, FM_FMRI_CPU_SERIAL_ID,
                serialid)) != 0)
                return (fmd_fmri_set_errno(rc));
#ifdef sparc
            if (cpu.cpu_mdesc_cpus != NULL) {
                md_cpumap_t *mcmp = cpu_find_cpumap(cpuid);
                (void) nvlist_add_string(nvl,
                    FM_FMRI_CPU_CPUFRU, mcmp->cpumap_cpufru);
                (void) nvlist_add_string(nvl,
                    FM_FMRI_HC_PART, mcmp->cpumap_cpufrupn);
                (void) nvlist_add_string(nvl,
                    FM_FMRI_HC_SERIAL_ID,
                    mcmp->cpumap_cpufrusn);
            }
#endif  /* sparc */
        }
    } else if (version == CPU_SCHEME_VERSION1) {
        if ((rc = nvlist_lookup_string(nvl, FM_FMRI_CPU_SERIAL_ID,
            &serstr)) != 0) {
            if (rc != ENOENT)
                return (fmd_fmri_set_errno(rc));

            if (cpu_get_serialid_V1(cpuid, serbuf, 21) != 0)
                return (0); /* Serial number is optional */

            if ((rc = nvlist_add_string(nvl, FM_FMRI_CPU_SERIAL_ID,
                serbuf)) != 0)
                return (fmd_fmri_set_errno(rc));
        }
    } else {
        return (fmd_fmri_set_errno(EINVAL));
    }

    return (0);
}

int
fmd_fmri_present(nvlist_t *nvl)
{
    int rc;
    uint8_t version;
    uint32_t cpuid;
    uint64_t nvlserid, curserid;
    char *nvlserstr, curserbuf[21]; /* sizeof (UINT64_MAX) + '\0' */

    if (nvlist_lookup_uint8(nvl, FM_VERSION, &version) != 0 ||
        nvlist_lookup_uint32(nvl, FM_FMRI_CPU_ID, &cpuid) != 0)
        return (fmd_fmri_set_errno(EINVAL));

    if (version == CPU_SCHEME_VERSION0) {
        if (nvlist_lookup_uint64(nvl, FM_FMRI_CPU_SERIAL_ID,
            &nvlserid) != 0)
            return (fmd_fmri_set_errno(EINVAL));
        if (cpu_get_serialid_V0(cpuid, &curserid) != 0)
            return (errno == ENOENT ? 0 : -1);

        return (curserid == nvlserid);

    } else if (version == CPU_SCHEME_VERSION1) {
        if ((rc = nvlist_lookup_string(nvl, FM_FMRI_CPU_SERIAL_ID,
            &nvlserstr)) != 0)
            if (rc != ENOENT)
                return (fmd_fmri_set_errno(EINVAL));

        /*
         * Serial id may not be available, return true
         */
        if (cpu_get_serialid_V1(cpuid, curserbuf, 21) != 0)
            return (1);

        return (strcmp(curserbuf, nvlserstr) == 0 ? 1 : 0);

    } else {
        return (fmd_fmri_set_errno(EINVAL));
    }
}

int
fmd_fmri_unusable(nvlist_t *nvl)
{
    uint8_t version;
    uint32_t cpuid;

    if (nvlist_lookup_uint8(nvl, FM_VERSION, &version) != 0 ||
        version > FM_CPU_SCHEME_VERSION ||
        nvlist_lookup_uint32(nvl, FM_FMRI_CPU_ID, &cpuid) != 0)
        return (fmd_fmri_set_errno(EINVAL));

#ifdef sparc
    {
        int cpustatus = ldom_fmri_status(cpu_scheme_lhp, nvl);

        return (cpustatus == P_FAULTED || (cpustatus == P_OFFLINE &&
                ldom_major_version(cpu_scheme_lhp) == 1));
    }
#else
    return (p_online(cpuid, P_STATUS) == P_FAULTED);
#endif
}

#ifdef  sparc
int
fmd_fmri_init(void)
{
    cpu_scheme_lhp = ldom_init(fmd_fmri_alloc, fmd_fmri_free);
    return (cpu_mdesc_init(cpu_scheme_lhp));
}

void
fmd_fmri_fini(void)
{
    cpu_mdesc_fini();
    ldom_fini(cpu_scheme_lhp);
}
#endif  /* sparc */