#include <sys/types.h>
#include <sys/errno.h>
#include <err.h>
#include <fcntl.h>
#include <libutil.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "mfiutil.h"
static const char* foreign_state = " (FOREIGN)";
MFI_TABLE(top, show);
void
format_stripe(char *buf, size_t buflen, uint8_t stripe)
{
humanize_number(buf, buflen, (1 << stripe) * 512, "", HN_AUTOSCALE,
HN_B | HN_NOSPACE);
}
static int
show_adapter(int ac, char **av __unused)
{
struct mfi_ctrl_info info;
char stripe[5];
int error, fd, comma;
if (ac != 1) {
warnx("show adapter: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
if (mfi_ctrl_get_info(fd, &info, NULL) < 0) {
error = errno;
warn("Failed to get controller info");
close(fd);
return (error);
}
printf("%s Adapter:\n", mfi_device);
printf(" Product Name: %.80s\n", info.product_name);
printf(" Serial Number: %.32s\n", info.serial_number);
if (info.package_version[0] != '\0')
printf(" Firmware: %s\n", info.package_version);
printf(" RAID Levels:");
#ifdef DEBUG
printf(" (%#x)", info.raid_levels);
#endif
comma = 0;
if (info.raid_levels & MFI_INFO_RAID_0) {
printf(" JBOD, RAID0");
comma = 1;
}
if (info.raid_levels & MFI_INFO_RAID_1) {
printf("%s RAID1", comma ? "," : "");
comma = 1;
}
if (info.raid_levels & MFI_INFO_RAID_5) {
printf("%s RAID5", comma ? "," : "");
comma = 1;
}
if (info.raid_levels & MFI_INFO_RAID_1E) {
printf("%s RAID1E", comma ? "," : "");
comma = 1;
}
if (info.raid_levels & MFI_INFO_RAID_6) {
printf("%s RAID6", comma ? "," : "");
comma = 1;
}
if ((info.raid_levels & (MFI_INFO_RAID_0 | MFI_INFO_RAID_1)) ==
(MFI_INFO_RAID_0 | MFI_INFO_RAID_1)) {
printf("%s RAID10", comma ? "," : "");
comma = 1;
}
if ((info.raid_levels & (MFI_INFO_RAID_0 | MFI_INFO_RAID_5)) ==
(MFI_INFO_RAID_0 | MFI_INFO_RAID_5)) {
printf("%s RAID50", comma ? "," : "");
comma = 1;
}
printf("\n");
printf(" Battery Backup: ");
if (info.hw_present & MFI_INFO_HW_BBU)
printf("present\n");
else
printf("not present\n");
if (info.hw_present & MFI_INFO_HW_NVRAM)
printf(" NVRAM: %uK\n", info.nvram_size);
printf(" Onboard Memory: %uM\n", info.memory_size);
format_stripe(stripe, sizeof(stripe), info.stripe_sz_ops.min);
printf(" Minimum Stripe: %s\n", stripe);
format_stripe(stripe, sizeof(stripe), info.stripe_sz_ops.max);
printf(" Maximum Stripe: %s\n", stripe);
close(fd);
return (0);
}
MFI_COMMAND(show, adapter, show_adapter);
static int
show_battery(int ac, char **av __unused)
{
struct mfi_bbu_capacity_info cap;
struct mfi_bbu_design_info design;
struct mfi_bbu_properties props;
struct mfi_bbu_status stat;
uint8_t status;
int comma, error, fd, show_capacity, show_props;
char buf[32];
if (ac != 1) {
warnx("show battery: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
if (mfi_dcmd_command(fd, MFI_DCMD_BBU_GET_CAPACITY_INFO, &cap,
sizeof(cap), NULL, 0, &status) < 0) {
error = errno;
warn("Failed to get capacity info");
close(fd);
return (error);
}
if (status == MFI_STAT_NO_HW_PRESENT) {
printf("%s: No battery present\n", mfi_device);
close(fd);
return (0);
}
show_capacity = (status == MFI_STAT_OK);
if (mfi_dcmd_command(fd, MFI_DCMD_BBU_GET_DESIGN_INFO, &design,
sizeof(design), NULL, 0, NULL) < 0) {
error = errno;
warn("Failed to get design info");
close(fd);
return (error);
}
if (mfi_dcmd_command(fd, MFI_DCMD_BBU_GET_STATUS, &stat, sizeof(stat),
NULL, 0, NULL) < 0) {
error = errno;
warn("Failed to get status");
close(fd);
return (error);
}
if (mfi_bbu_get_props(fd, &props, &status) < 0) {
error = errno;
warn("Failed to get properties");
close(fd);
return (error);
}
show_props = (status == MFI_STAT_OK);
printf("%s: Battery State:\n", mfi_device);
printf(" Manufacture Date: %d/%d/%d\n", design.mfg_date >> 5 & 0x0f,
design.mfg_date & 0x1f, design.mfg_date >> 9 & 0xffff);
printf(" Serial Number: %d\n", design.serial_number);
printf(" Manufacturer: %s\n", design.mfg_name);
printf(" Model: %s\n", design.device_name);
printf(" Chemistry: %s\n", design.device_chemistry);
printf(" Design Capacity: %d mAh\n", design.design_capacity);
if (show_capacity) {
printf(" Full Charge Capacity: %d mAh\n",
cap.full_charge_capacity);
printf(" Current Capacity: %d mAh\n",
cap.remaining_capacity);
printf(" Charge Cycles: %d\n", cap.cycle_count);
printf(" Current Charge: %d%%\n", cap.relative_charge);
}
printf(" Design Voltage: %d mV\n", design.design_voltage);
printf(" Current Voltage: %d mV\n", stat.voltage);
printf(" Temperature: %d C\n", stat.temperature);
if (show_props) {
printf(" Autolearn period: ");
mfi_autolearn_period(stdout, props.auto_learn_period);
printf("\n");
if (props.auto_learn_mode != 0)
snprintf(buf, sizeof(buf), "never");
else
mfi_next_learn_time(props.next_learn_time, buf,
sizeof(buf));
printf(" Next learn time: %s\n", buf);
printf(" Learn delay interval: %u hour%s\n",
props.learn_delay_interval,
props.learn_delay_interval != 1 ? "s" : "");
printf(" Autolearn mode: ");
mfi_autolearn_mode(stdout, props.auto_learn_mode);
printf("\n");
if (props.bbu_mode != 0)
printf(" BBU Mode: %d\n", props.bbu_mode);
}
printf(" Status:");
comma = 0;
if (stat.fw_status & MFI_BBU_STATE_PACK_MISSING) {
printf(" PACK_MISSING");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_VOLTAGE_LOW) {
printf("%s VOLTAGE_LOW", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_TEMPERATURE_HIGH) {
printf("%s TEMPERATURE_HIGH", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_CHARGE_ACTIVE) {
printf("%s CHARGING", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_DISCHARGE_ACTIVE) {
printf("%s DISCHARGING", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_LEARN_CYC_REQ) {
printf("%s LEARN_CYCLE_REQUESTED", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_LEARN_CYC_ACTIVE) {
printf("%s LEARN_CYCLE_ACTIVE", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_LEARN_CYC_FAIL) {
printf("%s LEARN_CYCLE_FAIL", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_LEARN_CYC_TIMEOUT) {
printf("%s LEARN_CYCLE_TIMEOUT", comma ? "," : "");
comma = 1;
}
if (stat.fw_status & MFI_BBU_STATE_I2C_ERR_DETECT) {
printf("%s I2C_ERROR_DETECT", comma ? "," : "");
comma = 1;
}
if (!comma)
printf(" normal");
printf("\n");
switch (stat.battery_type) {
case MFI_BBU_TYPE_BBU:
printf(" State of Health: %s\n",
stat.detail.bbu.is_SOH_good ? "good" : "bad");
break;
}
close(fd);
return (0);
}
MFI_COMMAND(show, battery, show_battery);
void
print_ld(struct mfi_ld_info *info, int state_len)
{
struct mfi_ld_params *params = &info->ld_config.params;
const char *level;
char size[6], stripe[5];
humanize_number(size, sizeof(size), info->size * 512,
"", HN_AUTOSCALE, HN_B | HN_NOSPACE | HN_DECIMAL);
format_stripe(stripe, sizeof(stripe),
info->ld_config.params.stripe_size);
level = mfi_raid_level(params->primary_raid_level,
params->secondary_raid_level);
if (state_len > 0)
printf("(%6s) %-8s %6s %-*s", size, level, stripe, state_len,
mfi_ldstate(params->state));
else
printf("(%s) %s %s %s", size, level, stripe,
mfi_ldstate(params->state));
}
void
print_pd(struct mfi_pd_info *info, int state_len)
{
const char *s;
char buf[256];
humanize_number(buf, 6, info->raw_size * 512, "",
HN_AUTOSCALE, HN_B | HN_NOSPACE |HN_DECIMAL);
printf("(%6s) ", buf);
if (info->state.ddf.v.pd_type.is_foreign) {
sprintf(buf, "%s%s", mfi_pdstate(info->fw_state), foreign_state);
s = buf;
} else
s = mfi_pdstate(info->fw_state);
if (state_len > 0)
printf("%-*s", state_len, s);
else
printf("%s",s);
s = mfi_pd_inq_string(info);
if (s != NULL)
printf(" %s", s);
}
static int
show_config(int ac, char **av __unused)
{
struct mfi_config_data *config;
struct mfi_array *ar;
struct mfi_ld_config *ld;
struct mfi_spare *sp;
struct mfi_ld_info linfo;
struct mfi_pd_info pinfo;
uint16_t device_id;
char *p;
int error, fd, i, j;
if (ac != 1) {
warnx("show config: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
if (mfi_config_read(fd, &config) < 0) {
error = errno;
warn("Failed to get config");
close(fd);
return (error);
}
printf("%s Configuration: %d arrays, %d volumes, %d spares\n",
mfi_device, config->array_count, config->log_drv_count,
config->spares_count);
p = (char *)config->array;
for (i = 0; i < config->array_count; i++) {
ar = (struct mfi_array *)p;
printf(" array %u of %u drives:\n", ar->array_ref,
ar->num_drives);
for (j = 0; j < ar->num_drives; j++) {
device_id = ar->pd[j].ref.v.device_id;
printf(" drive %s ", mfi_drive_name(NULL,
device_id,
MFI_DNAME_DEVICE_ID|MFI_DNAME_HONOR_OPTS));
if (device_id != 0xffff) {
if (mfi_pd_get_info(fd, device_id, &pinfo,
NULL) < 0)
printf("%s",
mfi_pdstate(ar->pd[j].fw_state));
else
print_pd(&pinfo, -1);
}
printf("\n");
}
p += config->array_size;
}
for (i = 0; i < config->log_drv_count; i++) {
ld = (struct mfi_ld_config *)p;
printf(" volume %s ",
mfi_volume_name(fd, ld->properties.ld.v.target_id));
if (mfi_ld_get_info(fd, ld->properties.ld.v.target_id, &linfo,
NULL) < 0) {
printf("%s %s",
mfi_raid_level(ld->params.primary_raid_level,
ld->params.secondary_raid_level),
mfi_ldstate(ld->params.state));
} else
print_ld(&linfo, -1);
if (ld->properties.name[0] != '\0')
printf(" <%s>", ld->properties.name);
printf(" spans:\n");
for (j = 0; j < ld->params.span_depth; j++)
printf(" array %u\n", ld->span[j].array_ref);
p += config->log_drv_size;
}
for (i = 0; i < config->spares_count; i++) {
sp = (struct mfi_spare *)p;
printf(" %s spare %s ",
sp->spare_type & MFI_SPARE_DEDICATED ? "dedicated" :
"global", mfi_drive_name(NULL, sp->ref.v.device_id,
MFI_DNAME_DEVICE_ID|MFI_DNAME_HONOR_OPTS));
if (mfi_pd_get_info(fd, sp->ref.v.device_id, &pinfo, NULL) < 0)
printf("%s", mfi_pdstate(MFI_PD_STATE_HOT_SPARE));
else
print_pd(&pinfo, -1);
if (sp->spare_type & MFI_SPARE_DEDICATED) {
printf(" backs:\n");
for (j = 0; j < sp->array_count; j++)
printf(" array %u\n", sp->array_ref[j]);
} else
printf("\n");
p += config->spares_size;
}
free(config);
close(fd);
return (0);
}
MFI_COMMAND(show, config, show_config);
static int
show_volumes(int ac, char **av __unused)
{
struct mfi_ld_list list;
struct mfi_ld_info info;
int error, fd;
u_int i, len, state_len;
if (ac != 1) {
warnx("show volumes: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
if (mfi_ld_get_list(fd, &list, NULL) < 0) {
error = errno;
warn("Failed to get volume list");
close(fd);
return (error);
}
printf("%s Volumes:\n", mfi_device);
state_len = strlen("State");
for (i = 0; i < list.ld_count; i++) {
len = strlen(mfi_ldstate(list.ld_list[i].state));
if (len > state_len)
state_len = len;
}
printf(" Id Size Level Stripe ");
len = state_len - strlen("State");
for (i = 0; i < (len + 1) / 2; i++)
printf(" ");
printf("State");
for (i = 0; i < len / 2; i++)
printf(" ");
printf(" Cache Name\n");
for (i = 0; i < list.ld_count; i++) {
if (mfi_ld_get_info(fd, list.ld_list[i].ld.v.target_id, &info,
NULL) < 0) {
error = errno;
warn("Failed to get info for volume %d",
list.ld_list[i].ld.v.target_id);
close(fd);
return (error);
}
printf("%6s ",
mfi_volume_name(fd, list.ld_list[i].ld.v.target_id));
print_ld(&info, state_len);
switch (info.ld_config.properties.current_cache_policy &
(MR_LD_CACHE_ALLOW_WRITE_CACHE |
MR_LD_CACHE_ALLOW_READ_CACHE)) {
case 0:
printf(" Disabled");
break;
case MR_LD_CACHE_ALLOW_READ_CACHE:
printf(" Reads ");
break;
case MR_LD_CACHE_ALLOW_WRITE_CACHE:
printf(" Writes ");
break;
case MR_LD_CACHE_ALLOW_WRITE_CACHE |
MR_LD_CACHE_ALLOW_READ_CACHE:
printf(" Enabled ");
break;
}
if (info.ld_config.properties.name[0] != '\0')
printf(" <%s>", info.ld_config.properties.name);
printf("\n");
}
close(fd);
return (0);
}
MFI_COMMAND(show, volumes, show_volumes);
static int
show_drives(int ac, char **av __unused)
{
struct mfi_pd_list *list;
struct mfi_pd_info info;
u_int i, len, state_len;
int error, fd;
if (ac != 1) {
warnx("show drives: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
list = NULL;
if (mfi_pd_get_list(fd, &list, NULL) < 0) {
error = errno;
warn("Failed to get drive list");
goto error;
}
state_len = 0;
for (i = 0; i < list->count; i++) {
if (list->addr[i].scsi_dev_type != 0)
continue;
if (mfi_pd_get_info(fd, list->addr[i].device_id, &info,
NULL) < 0) {
error = errno;
warn("Failed to fetch info for drive %u",
list->addr[i].device_id);
goto error;
}
len = strlen(mfi_pdstate(info.fw_state));
if (info.state.ddf.v.pd_type.is_foreign)
len += strlen(foreign_state);
if (len > state_len)
state_len = len;
}
printf("%s Physical Drives:\n", mfi_device);
for (i = 0; i < list->count; i++) {
if (list->addr[i].scsi_dev_type != 0)
continue;
if (mfi_pd_get_info(fd, list->addr[i].device_id, &info,
NULL) < 0) {
error = errno;
warn("Failed to fetch info for drive %u",
list->addr[i].device_id);
goto error;
}
printf("%s ", mfi_drive_name(&info, list->addr[i].device_id,
MFI_DNAME_DEVICE_ID));
print_pd(&info, state_len);
printf(" %s", mfi_drive_name(&info, list->addr[i].device_id,
MFI_DNAME_ES));
printf("\n");
}
error = 0;
error:
free(list);
close(fd);
return (error);
}
MFI_COMMAND(show, drives, show_drives);
static int
show_firmware(int ac, char **av __unused)
{
struct mfi_ctrl_info info;
struct mfi_info_component header;
int error, fd;
u_int i;
if (ac != 1) {
warnx("show firmware: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
if (mfi_ctrl_get_info(fd, &info, NULL) < 0) {
error = errno;
warn("Failed to get controller info");
close(fd);
return (error);
}
if (info.package_version[0] != '\0')
printf("%s Firmware Package Version: %s\n", mfi_device,
info.package_version);
printf("%s Firmware Images:\n", mfi_device);
strcpy(header.name, "Name");
strcpy(header.version, "Version");
strcpy(header.build_date, "Date");
strcpy(header.build_time, "Time");
scan_firmware(&header);
if (info.image_component_count > 8)
info.image_component_count = 8;
for (i = 0; i < info.image_component_count; i++)
scan_firmware(&info.image_component[i]);
if (info.pending_image_component_count > 8)
info.pending_image_component_count = 8;
for (i = 0; i < info.pending_image_component_count; i++)
scan_firmware(&info.pending_image_component[i]);
display_firmware(&header, "Status");
for (i = 0; i < info.image_component_count; i++)
display_firmware(&info.image_component[i], "active");
for (i = 0; i < info.pending_image_component_count; i++)
display_firmware(&info.pending_image_component[i], "pending");
close(fd);
return (0);
}
MFI_COMMAND(show, firmware, show_firmware);
static int
show_progress(int ac, char **av __unused)
{
struct mfi_ld_list llist;
struct mfi_pd_list *plist;
struct mfi_ld_info linfo;
struct mfi_pd_info pinfo;
int busy, error, fd;
u_int i;
uint16_t device_id;
uint8_t target_id;
if (ac != 1) {
warnx("show progress: extra arguments");
return (EINVAL);
}
fd = mfi_open(mfi_device, O_RDONLY);
if (fd < 0) {
error = errno;
warn("mfi_open");
return (error);
}
if (mfi_ld_get_list(fd, &llist, NULL) < 0) {
error = errno;
warn("Failed to get volume list");
close(fd);
return (error);
}
if (mfi_pd_get_list(fd, &plist, NULL) < 0) {
error = errno;
warn("Failed to get drive list");
close(fd);
return (error);
}
busy = 0;
for (i = 0; i < llist.ld_count; i++) {
target_id = llist.ld_list[i].ld.v.target_id;
if (mfi_ld_get_info(fd, target_id, &linfo, NULL) < 0) {
error = errno;
warn("Failed to get info for volume %s",
mfi_volume_name(fd, target_id));
free(plist);
close(fd);
return (error);
}
if (linfo.progress.active & MFI_LD_PROGRESS_CC) {
printf("volume %s ", mfi_volume_name(fd, target_id));
mfi_display_progress("Consistency Check",
&linfo.progress.cc);
busy = 1;
}
if (linfo.progress.active & MFI_LD_PROGRESS_BGI) {
printf("volume %s ", mfi_volume_name(fd, target_id));
mfi_display_progress("Background Init",
&linfo.progress.bgi);
busy = 1;
}
if (linfo.progress.active & MFI_LD_PROGRESS_FGI) {
printf("volume %s ", mfi_volume_name(fd, target_id));
mfi_display_progress("Foreground Init",
&linfo.progress.fgi);
busy = 1;
}
if (linfo.progress.active & MFI_LD_PROGRESS_RECON) {
printf("volume %s ", mfi_volume_name(fd, target_id));
mfi_display_progress("Reconstruction",
&linfo.progress.recon);
busy = 1;
}
}
for (i = 0; i < plist->count; i++) {
if (plist->addr[i].scsi_dev_type != 0)
continue;
device_id = plist->addr[i].device_id;
if (mfi_pd_get_info(fd, device_id, &pinfo, NULL) < 0) {
error = errno;
warn("Failed to fetch info for drive %u", device_id);
free(plist);
close(fd);
return (error);
}
if (pinfo.prog_info.active & MFI_PD_PROGRESS_REBUILD) {
printf("drive %s ", mfi_drive_name(NULL, device_id,
MFI_DNAME_DEVICE_ID|MFI_DNAME_HONOR_OPTS));
mfi_display_progress("Rebuild", &pinfo.prog_info.rbld);
busy = 1;
}
if (pinfo.prog_info.active & MFI_PD_PROGRESS_PATROL) {
printf("drive %s ", mfi_drive_name(NULL, device_id,
MFI_DNAME_DEVICE_ID|MFI_DNAME_HONOR_OPTS));
mfi_display_progress("Patrol Read",
&pinfo.prog_info.patrol);
busy = 1;
}
if (pinfo.prog_info.active & MFI_PD_PROGRESS_CLEAR) {
printf("drive %s ", mfi_drive_name(NULL, device_id,
MFI_DNAME_DEVICE_ID|MFI_DNAME_HONOR_OPTS));
mfi_display_progress("Clear", &pinfo.prog_info.clear);
busy = 1;
}
}
free(plist);
close(fd);
if (!busy)
printf("No activity in progress for adapter %s\n",
mfi_device);
return (0);
}
MFI_COMMAND(show, progress, show_progress);
static int
show_foreign(int ac, char **av)
{
return(display_format(ac, av, 0, MFI_DCMD_CFG_FOREIGN_DISPLAY));
}
MFI_COMMAND(show, foreign, show_foreign);
