/*
* 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 (c) 2008, 2010, Oracle and/or its affiliates. All rights reserved.
*/
#include <sys/types.h>
#include <stddef.h>
#include <stdio.h>
#include <string.h>
#include <strings.h>
#include <libnvpair.h>
#include <scsi/libses.h>
#include "ses2_impl.h"
#define SES_UCODE_DEF_CHUNK (32 * 1024)
/*ARGSUSED*/
static int
enc_do_ucode(ses_plugin_t *sp, ses_node_t *np, nvlist_t *nvl)
{
nvlist_t *props = ses_node_props(np);
uint64_t maxlen, bufid = 0;
uint8_t *data;
ses2_ucode_ctl_page_impl_t *uip;
size_t offset, len, pagelen;
uint_t datalen;
uint64_t mode;
uint64_t chunksz = SES_UCODE_DEF_CHUNK;
/*
* Get the data and check the length.
*/
if (nvlist_lookup_byte_array(nvl, SES_CTL_PROP_UCODE_DATA,
&data, &datalen) != 0)
return (ses_error(ESES_INVALID_PROP,
"missing or invalid %s property", SES_CTL_PROP_UCODE_DATA));
if (nvlist_lookup_uint64(nvl, SES_CTL_PROP_UCODE_MODE,
&mode) != 0)
return (ses_error(ESES_INVALID_PROP,
"missing or invalid %s property", SES_CTL_PROP_UCODE_MODE));
if (nvlist_lookup_uint64(props, SES_EN_PROP_UCODE_SZ,
&maxlen) != 0 || datalen > maxlen)
return (ses_error(ESES_RANGE,
"microcode image length (%u) exceeds maximum length (%llu)",
datalen, maxlen));
/*
* Get the expected buffer ID, but allow the user to override it.
*/
(void) nvlist_lookup_uint64(props, SES_EN_PROP_UCODE_BUF,
&bufid);
if (bufid == 0xFF)
bufid = 0;
(void) nvlist_lookup_uint64(nvl, SES_CTL_PROP_UCODE_BUFID, &bufid);
(void) nvlist_lookup_uint64(nvl, SES_CTL_PROP_UCODE_DATA_LEN, &chunksz);
if (chunksz & 3)
return (ses_error(ESES_RANGE,
"upload chunk size %llu is not divisible by 4", chunksz));
for (offset = 0; offset < datalen; offset += chunksz) {
len = MIN(datalen - offset, chunksz);
if (len & 0x3)
pagelen = (len + 4) & ~0x3;
else
pagelen = len;
if ((uip = ses_plugin_ctlpage_lookup(sp, ses_node_snapshot(np),
SES2_DIAGPAGE_DL_MICROCODE_CTL_STATUS, pagelen,
np, B_TRUE)) == NULL)
return (-1);
uip->sucpi_buffer_id = (uint8_t)bufid;
uip->sucpi_dl_ucode_mode = mode;
SCSI_WRITE32(&uip->sucpi_buffer_offset, offset);
SCSI_WRITE32(&uip->sucpi_ucode_image_length, datalen);
SCSI_WRITE32(&uip->sucpi_ucode_data_length, len);
bcopy(data + offset, &uip->sucpi_ucode_data[0],
len);
if (len != pagelen)
bzero(&uip->sucpi_ucode_data[0] + len,
pagelen - len);
}
(void) nvlist_remove_all(nvl, SES_CTL_PROP_UCODE_DATA);
(void) nvlist_remove_all(nvl, SES_CTL_PROP_UCODE_MODE);
(void) nvlist_remove_all(nvl, SES_CTL_PROP_UCODE_BUFID);
(void) nvlist_remove_all(nvl, SES_CTL_PROP_UCODE_DATA_LEN);
return (0);
}
static int
enc_ctl_common(ses_plugin_t *sp, ses_node_t *np, ses2_diag_page_t page,
nvpair_t *nvp)
{
ses2_enclosure_ctl_impl_t *tp;
const char *name;
boolean_t boolval;
uint64_t intval;
ASSERT(page == SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS);
if ((tp = ses_plugin_ctlpage_lookup(sp, ses_node_snapshot(np),
page, 0, np, B_FALSE)) == NULL)
return (-1);
name = nvpair_name(nvp);
(void) nvpair_value_boolean_value(nvp, &boolval);
(void) nvpair_value_uint64(nvp, &intval);
if (strcmp(name, SES_PROP_IDENT) == 0)
tp->seci_rqst_ident = boolval;
else if (strcmp(name, SES_PROP_WARN_REQ) == 0)
tp->seci_request_warning = boolval;
else if (strcmp(name, SES_PROP_FAIL_REQ) == 0)
tp->seci_request_failure = boolval;
else if (strcmp(name, SES_EN_PROP_POWER_DELAY) == 0)
tp->seci_power_cycle_delay = intval;
else if (strcmp(name, SES_EN_PROP_POWER_REQUEST) == 0)
tp->seci_power_cycle_request = intval;
else if (strcmp(name, SES_EN_PROP_POWER_DURATION) == 0)
tp->seci_power_off_duration = intval;
else
ses_panic("bad property %s", name);
return (0);
}
/*ARGSUSED*/
static int
enc_ctl_string(ses_plugin_t *sp, ses_node_t *np, ses2_diag_page_t page,
nvpair_t *nvp)
{
ses2_substring_out_page_impl_t *spip;
ses2_string_out_page_impl_t *pip;
const uint8_t *data;
size_t datalen;
uint_t nvlen;
nvlist_t *props = ses_node_props(np);
uint64_t eid;
ASSERT(strcmp(nvpair_name(nvp), SES_EN_PROP_STRING) == 0);
VERIFY(nvlist_lookup_uint64(props, SES_EN_PROP_EID, &eid) == 0);
(void) nvpair_value_byte_array(nvp, (uint8_t **)&data, &nvlen);
datalen = (size_t)nvlen;
if ((spip = ses_plugin_ctlpage_lookup(sp, ses_node_snapshot(np),
SES2_DIAGPAGE_SUBENCLOSURE_STRING_IO, datalen, np,
B_FALSE)) != NULL) {
spip->ssopi_subenclosure_identifier = eid;
bcopy(data, spip->ssopi_data, datalen);
} else {
if (eid != 0)
return (ses_error(ESES_NOTSUP, "target does not "
"support string data for secondary subenclosures"));
if ((pip = ses_plugin_ctlpage_lookup(sp, ses_node_snapshot(np),
SES2_DIAGPAGE_STRING_IO, datalen, np, B_FALSE)) == NULL)
return (-1);
bcopy(data, pip->ssopi_data, datalen);
}
return (0);
}
static int
enc_ctl_nick(ses_plugin_t *sp, ses_node_t *np, ses2_diag_page_t page,
nvpair_t *nvp)
{
/* LINTED - dummy variable for sizeof */
ses2_subnick_ctl_page_impl_t *pip, dummy;
const char *nick;
size_t len, max;
nvlist_t *props = ses_node_props(np);
uint64_t eid;
ASSERT(strcmp(nvpair_name(nvp), SES_EN_PROP_NICK) == 0);
ASSERT(page == SES2_DIAGPAGE_SUBENCLOSURE_NICKNAME_CTL_STATUS);
(void) nvpair_value_string(nvp, (char **)&nick);
len = strlen(nick);
VERIFY(nvlist_lookup_uint64(props, SES_EN_PROP_EID, &eid) == 0);
max = sizeof (dummy.sspci_subenclosure_nickname);
if (len > max)
return (ses_error(ESES_RANGE, "nickname '%s' exceeds "
"maximum length %lu", nick, max));
if ((pip = ses_plugin_ctlpage_lookup(sp, ses_node_snapshot(np),
page, len, np, B_FALSE)) == NULL)
return (-1);
pip->sspci_subenclosure_identifier = eid;
bcopy(nick, pip->sspci_subenclosure_nickname, len);
return (0);
}
static const ses2_ctl_prop_t enc_props[] = {
SES_COMMON_CTL_PROPS,
{
.scp_name = SES_PROP_IDENT,
.scp_type = DATA_TYPE_BOOLEAN_VALUE,
.scp_num = SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS,
.scp_setprop = enc_ctl_common
},
{
.scp_name = SES_PROP_WARN_REQ,
.scp_type = DATA_TYPE_BOOLEAN_VALUE,
.scp_num = SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS,
.scp_setprop = enc_ctl_common
},
{
.scp_name = SES_PROP_FAIL_REQ,
.scp_type = DATA_TYPE_BOOLEAN_VALUE,
.scp_num = SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS,
.scp_setprop = enc_ctl_common
},
{
.scp_name = SES_EN_PROP_POWER_DELAY,
.scp_type = DATA_TYPE_UINT64,
.scp_num = SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS,
.scp_setprop = enc_ctl_common
},
{
.scp_name = SES_EN_PROP_POWER_DURATION,
.scp_type = DATA_TYPE_UINT64,
.scp_num = SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS,
.scp_setprop = enc_ctl_common
},
{
.scp_name = SES_EN_PROP_POWER_REQUEST,
.scp_type = DATA_TYPE_UINT64,
.scp_num = SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS,
.scp_setprop = enc_ctl_common
},
{
.scp_name = SES_EN_PROP_STRING,
.scp_type = DATA_TYPE_BYTE_ARRAY,
.scp_num = -1,
.scp_setprop = enc_ctl_string
},
{
.scp_name = SES_EN_PROP_NICK,
.scp_type = DATA_TYPE_STRING,
.scp_num = SES2_DIAGPAGE_SUBENCLOSURE_NICKNAME_CTL_STATUS,
.scp_setprop = enc_ctl_nick
},
{
NULL
}
};
static int
enc_setdef_one(ses_node_t *np, ses2_diag_page_t page, void *data)
{
ses2_enclosure_ctl_impl_t *tp = data;
nvlist_t *props = ses_node_props(np);
if (page != SES2_DIAGPAGE_ENCLOSURE_CTL_STATUS)
return (0);
SES_NV_CTLBOOL(props, SES_PROP_IDENT, tp->seci_rqst_ident);
SES_NV_CTLBOOL(props, SES_PROP_WARN_REQ,
tp->seci_request_warning);
SES_NV_CTLBOOL(props, SES_PROP_FAIL_REQ,
tp->seci_request_failure);
return (0);
}
int
ses2_enclosure_ctl(ses_plugin_t *sp, ses_node_t *np, const char *op,
nvlist_t *nvl)
{
if (strcmp(op, SES_CTL_OP_SETPROP) == 0)
return (ses2_setprop(sp, np, enc_props, nvl));
else if (strcmp(op, SES_CTL_OP_DL_UCODE) == 0)
return (enc_do_ucode(sp, np, nvl));
return (0);
}
int
ses2_enclosure_setdef(ses_node_t *np, ses2_diag_page_t page, void *data)
{
nvlist_t *props = ses_node_props(np);
uint64_t type;
VERIFY(nvlist_lookup_uint64(props, SES_PROP_ELEMENT_TYPE, &type) == 0);
if (type == SES_ET_ENCLOSURE &&
enc_setdef_one(np, page, data) != 0)
return (-1);
return (0);
}