Index: head/usr.sbin/sesutil/eltsub.c =================================================================== --- head/usr.sbin/sesutil/eltsub.c (revision 297290) +++ head/usr.sbin/sesutil/eltsub.c (revision 297291) @@ -1,235 +1,231 @@ /* $FreeBSD$ */ /* * Copyright (c) 2000 by Matthew Jacob * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions, and the following disclaimer, * without modification, immediately at the beginning of the file. * 2. The name of the author may not be used to endorse or promote products * derived from this software without specific prior written permission. * * Alternatively, this software may be distributed under the terms of the * the GNU Public License ("GPL"). * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE FOR * ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. * * Matthew Jacob * Feral Software * mjacob@feral.com */ #include #include #include #include -#include #include -#include #include #include -#include -#include #include #include "eltsub.h" /* * offset by +20 degrees. * The range of the value expresses a temperature between -19 and +235 degrees * Celsius. A value of 00h is reserved. */ #define TEMPERATURE_OFFSET 20 char * geteltnm(int type) { static char rbuf[132]; switch (type) { case ELMTYP_UNSPECIFIED: sprintf(rbuf, "Unspecified"); break; case ELMTYP_DEVICE: sprintf(rbuf, "Device Slot"); break; case ELMTYP_POWER: sprintf(rbuf, "Power Supply"); break; case ELMTYP_FAN: sprintf(rbuf, "Cooling"); break; case ELMTYP_THERM: sprintf(rbuf, "Temperature Sensors"); break; case ELMTYP_DOORLOCK: sprintf(rbuf, "Door Lock"); break; case ELMTYP_ALARM: sprintf(rbuf, "Audible alarm"); break; case ELMTYP_ESCC: sprintf(rbuf, "Enclosure Services Controller Electronics"); break; case ELMTYP_SCC: sprintf(rbuf, "SCC Controller Electronics"); break; case ELMTYP_NVRAM: sprintf(rbuf, "Nonvolatile Cache"); break; case ELMTYP_INV_OP_REASON: sprintf(rbuf, "Invalid Operation Reason"); break; case ELMTYP_UPS: sprintf(rbuf, "Uninterruptible Power Supply"); break; case ELMTYP_DISPLAY: sprintf(rbuf, "Display"); break; case ELMTYP_KEYPAD: sprintf(rbuf, "Key Pad Entry"); break; case ELMTYP_ENCLOSURE: sprintf(rbuf, "Enclosure"); break; case ELMTYP_SCSIXVR: sprintf(rbuf, "SCSI Port/Transceiver"); break; case ELMTYP_LANGUAGE: sprintf(rbuf, "Language"); break; case ELMTYP_COMPORT: sprintf(rbuf, "Communication Port"); break; case ELMTYP_VOM: sprintf(rbuf, "Voltage Sensor"); break; case ELMTYP_AMMETER: sprintf(rbuf, "Current Sensor"); break; case ELMTYP_SCSI_TGT: sprintf(rbuf, "SCSI Target Port"); break; case ELMTYP_SCSI_INI: sprintf(rbuf, "SCSI Initiator Port"); break; case ELMTYP_SUBENC: sprintf(rbuf, "Simple Subenclosure"); break; case ELMTYP_ARRAY_DEV: sprintf(rbuf, "Array Device Slot"); break; case ELMTYP_SAS_EXP: sprintf(rbuf, "SAS Expander"); break; case ELMTYP_SAS_CONN: sprintf(rbuf, "SAS Connector"); break; default: (void) sprintf(rbuf, "", type); break; } return (rbuf); } char * scode2ascii(u_char code) { static char rbuf[32]; switch (code & 0xf) { case SES_OBJSTAT_UNSUPPORTED: sprintf(rbuf, "Unsupported"); break; case SES_OBJSTAT_OK: sprintf(rbuf, "OK"); break; case SES_OBJSTAT_CRIT: sprintf(rbuf, "Critical"); break; case SES_OBJSTAT_NONCRIT: sprintf(rbuf, "Noncritical"); break; case SES_OBJSTAT_UNRECOV: sprintf(rbuf, "Unrecoverable"); break; case SES_OBJSTAT_NOTINSTALLED: sprintf(rbuf, "Not Installed"); break; case SES_OBJSTAT_UNKNOWN: sprintf(rbuf, "Unknown"); break; case SES_OBJSTAT_NOTAVAIL: sprintf(rbuf, "Not Available"); break; case SES_OBJSTAT_NOACCESS: sprintf(rbuf, "No Access Allowed"); break; default: sprintf(rbuf, "", code & 0xf); break; } return (rbuf); } struct sbuf * stat2sbuf(int eletype, u_char *cstat) { struct sbuf *buf; buf = sbuf_new_auto(); if (buf == NULL) err(EXIT_FAILURE, "sbuf_new_auto()"); if (cstat[0] & 0x40) sbuf_printf(buf, "\t\t- Predicted Failure\n"); if (cstat[0] & 0x20) sbuf_printf(buf, "\t\t- Disabled\n"); if (cstat[0] & 0x10) sbuf_printf(buf, "\t\t- Swapped\n"); switch (eletype) { case ELMTYP_DEVICE: if (cstat[2] & 0x02) sbuf_printf(buf, "\t\t- LED=locate\n"); if (cstat[2] & 0x20) sbuf_printf(buf, "\t\t- LED=fault\n"); break; case ELMTYP_ARRAY_DEV: if (cstat[2] & 0x02) sbuf_printf(buf, "\t\t- LED=locate\n"); if (cstat[2] & 0x20) sbuf_printf(buf, "\t\t- LED=fault\n"); break; case ELMTYP_FAN: sbuf_printf(buf, "\t\t- Speed: %d rpm\n", (((0x7 & cstat[1]) << 8) + cstat[2]) * 10); break; case ELMTYP_THERM: if (cstat[2]) { sbuf_printf(buf, "\t\t- Temperature: %d C\n", cstat[2] - TEMPERATURE_OFFSET); } else { sbuf_printf(buf, "\t\t- Temperature: -reserved-\n"); } break; case ELMTYP_VOM: sbuf_printf(buf, "\t\t- Voltage: %.2f V\n", be16dec(cstat + 2) / 100.0); break; } sbuf_finish(buf); return (buf); } Index: head/usr.sbin/sesutil/sesutil.c =================================================================== --- head/usr.sbin/sesutil/sesutil.c (revision 297290) +++ head/usr.sbin/sesutil/sesutil.c (revision 297291) @@ -1,560 +1,559 @@ /*- * Copyright (c) 2015 Baptiste Daroussin * Copyright (c) 2015 Allan Jude * Copyright (c) 2000 by Matthew Jacob * All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer * in this position and unchanged. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * * THIS SOFTWARE IS PROVIDED BY THE AUTHOR(S) ``AS IS'' AND ANY EXPRESS OR * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. * IN NO EVENT SHALL THE AUTHOR(S) BE LIABLE FOR ANY DIRECT, INDIRECT, * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. */ #include __FBSDID("$FreeBSD$"); #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include #include -#include #include #include "eltsub.h" static int encstatus(int argc, char **argv); static int fault(int argc, char **argv); static int locate(int argc, char **argv); static int objmap(int argc, char **argv); static int sesled(int argc, char **argv, bool fault); static struct command { const char *name; const char *param; const char *desc; int (*exec)(int argc, char **argv); } cmds[] = { { "fault", "(||all) (on|off)", "Change the state of the fault LED associated with a disk", fault }, { "locate", "(||all) (on|off)", "Change the state of the locate LED associated with a disk", locate }, { "map", "", "Print a map of the devices managed by the enclosure", objmap } , { "status", "", "Print the status of the enclosure", encstatus }, }; static const int nbcmds = nitems(cmds); static const char *uflag; static void usage(FILE *out, const char *subcmd) { int i; if (subcmd == NULL) { fprintf(out, "Usage: %s [-u /dev/ses] [options]\n", getprogname()); fprintf(out, "Commands supported:\n"); } for (i = 0; i < nbcmds; i++) { if (subcmd != NULL) { if (strcmp(subcmd, cmds[i].name) == 0) { fprintf(out, "Usage: %s %s [-u /dev/ses] " "%s\n\t%s\n", getprogname(), subcmd, cmds[i].param, cmds[i].desc); break; } continue; } fprintf(out, " %-12s%s\n\t\t%s\n\n", cmds[i].name, cmds[i].param, cmds[i].desc); } exit(EXIT_FAILURE); } static void do_led(int fd, unsigned int idx, bool onoff, bool setfault) { encioc_elm_status_t o; o.elm_idx = idx; if (ioctl(fd, ENCIOC_GETELMSTAT, (caddr_t) &o) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETELMSTAT"); } o.cstat[0] |= 0x80; if (onoff) { o.cstat[2] |= (setfault ? 0x20 : 0x02); } else { o.cstat[2] &= (setfault ? 0xdf : 0xfd); } if (ioctl(fd, ENCIOC_SETELMSTAT, (caddr_t) &o) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_SETELMSTAT"); } } static bool disk_match(const char *devnames, const char *disk, size_t len) { const char *dname; dname = devnames; while ((dname = strstr(dname, disk)) != NULL) { if (dname[len] == '\0' || dname[len] == ',') { return (true); } dname++; } return (false); } static int sesled(int argc, char **argv, bool setfault) { encioc_elm_devnames_t objdn; encioc_element_t *objp; glob_t g; char *disk, *endptr; size_t len, i, ndisks; int fd; unsigned int nobj, j, sesid; bool all, isses, onoff; isses = false; all = false; onoff = false; if (argc != 3) { usage(stderr, (setfault ? "fault" : "locate")); } disk = argv[1]; sesid = strtoul(disk, &endptr, 10); if (*endptr == '\0') { endptr = strrchr(uflag, '*'); if (endptr != NULL && *endptr == '*') { warnx("Must specifying a SES device (-u) to use a SES " "id# to identify a disk"); usage(stderr, (setfault ? "fault" : "locate")); } isses = true; } if (strcmp(argv[2], "on") == 0) { onoff = true; } else if (strcmp(argv[2], "off") == 0) { onoff = false; } else { usage(stderr, (setfault ? "fault" : "locate")); } if (strcmp(disk, "all") == 0) { all = true; } len = strlen(disk); /* Get the list of ses devices */ if (glob((uflag != NULL ? uflag : "/dev/ses[0-9]*"), 0, NULL, &g) == GLOB_NOMATCH) { globfree(&g); errx(EXIT_FAILURE, "No SES devices found"); } ndisks = 0; for (i = 0; i < g.gl_pathc; i++) { /* ensure we only got numbers after ses */ if (strspn(g.gl_pathv[i] + 8, "0123456789") != strlen(g.gl_pathv[i] + 8)) { continue; } if ((fd = open(g.gl_pathv[i], O_RDWR)) < 0) { /* * Don't treat non-access errors as critical if we are * accessing all devices */ if (errno == EACCES && g.gl_pathc > 1) { err(EXIT_FAILURE, "unable to access SES device"); } warn("unable to access SES device: %s", g.gl_pathv[i]); continue; } if (ioctl(fd, ENCIOC_GETNELM, (caddr_t) &nobj) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETNELM"); } objp = calloc(nobj, sizeof(encioc_element_t)); if (objp == NULL) { close(fd); err(EXIT_FAILURE, "calloc()"); } if (ioctl(fd, ENCIOC_GETELMMAP, (caddr_t) objp) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETELMMAP"); } if (isses) { if (sesid > nobj) { close(fd); errx(EXIT_FAILURE, "Requested SES ID does not exist"); } do_led(fd, sesid, onoff, setfault); ndisks++; close(fd); break; } for (j = 0; j < nobj; j++) { memset(&objdn, 0, sizeof(objdn)); objdn.elm_idx = objp[j].elm_idx; objdn.elm_names_size = 128; objdn.elm_devnames = calloc(128, sizeof(char)); if (objdn.elm_devnames == NULL) { close(fd); err(EXIT_FAILURE, "calloc()"); } if (ioctl(fd, ENCIOC_GETELMDEVNAMES, (caddr_t) &objdn) <0) { continue; } if (objdn.elm_names_len > 0) { if (all) { do_led(fd, objdn.elm_idx, onoff, setfault); continue; } if (disk_match(objdn.elm_devnames, disk, len)) { do_led(fd, objdn.elm_idx, onoff, setfault); ndisks++; break; } } } close(fd); } globfree(&g); if (ndisks == 0 && all == false) { errx(EXIT_FAILURE, "Count not find the SES id of device '%s'", disk); } return (EXIT_SUCCESS); } static int locate(int argc, char **argv) { return (sesled(argc, argv, false)); } static int fault(int argc, char **argv) { return (sesled(argc, argv, true)); } static int objmap(int argc, char **argv __unused) { struct sbuf *extra; encioc_string_t stri; encioc_elm_devnames_t e_devname; encioc_elm_status_t e_status; encioc_elm_desc_t e_desc; encioc_element_t *e_ptr; glob_t g; int fd; unsigned int j, nobj; size_t i; char str[32]; if (argc != 1) { usage(stderr, "map"); } /* Get the list of ses devices */ if (glob(uflag, 0, NULL, &g) == GLOB_NOMATCH) { globfree(&g); errx(EXIT_FAILURE, "No SES devices found"); } for (i = 0; i < g.gl_pathc; i++) { /* ensure we only got numbers after ses */ if (strspn(g.gl_pathv[i] + 8, "0123456789") != strlen(g.gl_pathv[i] + 8)) { continue; } if ((fd = open(g.gl_pathv[i], O_RDWR)) < 0) { /* * Don't treat non-access errors as critical if we are * accessing all devices */ if (errno == EACCES && g.gl_pathc > 1) { err(EXIT_FAILURE, "unable to access SES device"); } warn("unable to access SES device: %s", g.gl_pathv[i]); continue; } if (ioctl(fd, ENCIOC_GETNELM, (caddr_t) &nobj) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETNELM"); } e_ptr = calloc(nobj, sizeof(encioc_element_t)); if (e_ptr == NULL) { close(fd); err(EXIT_FAILURE, "calloc()"); } if (ioctl(fd, ENCIOC_GETELMMAP, (caddr_t) e_ptr) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETELMMAP"); } printf("%s:\n", g.gl_pathv[i] + 5); stri.bufsiz = sizeof(str); stri.buf = &str[0]; if (ioctl(fd, ENCIOC_GETENCNAME, (caddr_t) &stri) == 0) printf("\tEnclosure Name: %s\n", stri.buf); stri.bufsiz = sizeof(str); stri.buf = &str[0]; if (ioctl(fd, ENCIOC_GETENCID, (caddr_t) &stri) == 0) printf("\tEnclosure ID: %s\n", stri.buf); for (j = 0; j < nobj; j++) { /* Get the status of the element */ memset(&e_status, 0, sizeof(e_status)); e_status.elm_idx = e_ptr[j].elm_idx; if (ioctl(fd, ENCIOC_GETELMSTAT, (caddr_t) &e_status) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETELMSTAT"); } /* Get the description of the element */ memset(&e_desc, 0, sizeof(e_desc)); e_desc.elm_idx = e_ptr[j].elm_idx; e_desc.elm_desc_len = UINT16_MAX; e_desc.elm_desc_str = calloc(UINT16_MAX, sizeof(char)); if (e_desc.elm_desc_str == NULL) { close(fd); err(EXIT_FAILURE, "calloc()"); } if (ioctl(fd, ENCIOC_GETELMDESC, (caddr_t) &e_desc) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETELMDESC"); } /* Get the device name(s) of the element */ memset(&e_devname, 0, sizeof(e_devname)); e_devname.elm_idx = e_ptr[j].elm_idx; e_devname.elm_names_size = 128; e_devname.elm_devnames = calloc(128, sizeof(char)); if (e_devname.elm_devnames == NULL) { close(fd); err(EXIT_FAILURE, "calloc()"); } if (ioctl(fd, ENCIOC_GETELMDEVNAMES, (caddr_t) &e_devname) <0) { /* We don't care if this fails */ e_devname.elm_devnames[0] = '\0'; } printf("\tElement %u, Type: %s\n", e_ptr[j].elm_idx, geteltnm(e_ptr[j].elm_type)); printf("\t\tStatus: %s (0x%02x 0x%02x 0x%02x 0x%02x)\n", scode2ascii(e_status.cstat[0]), e_status.cstat[0], e_status.cstat[1], e_status.cstat[2], e_status.cstat[3]); if (e_desc.elm_desc_len > 0) { printf("\t\tDescription: %s\n", e_desc.elm_desc_str); } if (e_devname.elm_names_len > 0) { printf("\t\tDevice Names: %s\n", e_devname.elm_devnames); } extra = stat2sbuf(e_ptr[j].elm_type, e_status.cstat); if (sbuf_len(extra) > 0) { printf("\t\tExtra status:\n%s", sbuf_data(extra)); } sbuf_delete(extra); free(e_devname.elm_devnames); } close(fd); } globfree(&g); return (EXIT_SUCCESS); } static int encstatus(int argc, char **argv __unused) { glob_t g; int fd, status; size_t i, e; u_char estat; status = 0; if (argc != 1) { usage(stderr, "status"); } /* Get the list of ses devices */ if (glob(uflag, 0, NULL, &g) == GLOB_NOMATCH) { globfree(&g); errx(EXIT_FAILURE, "No SES devices found"); } for (i = 0; i < g.gl_pathc; i++) { /* ensure we only got numbers after ses */ if (strspn(g.gl_pathv[i] + 8, "0123456789") != strlen(g.gl_pathv[i] + 8)) { continue; } if ((fd = open(g.gl_pathv[i], O_RDWR)) < 0) { /* * Don't treat non-access errors as critical if we are * accessing all devices */ if (errno == EACCES && g.gl_pathc > 1) { err(EXIT_FAILURE, "unable to access SES device"); } warn("unable to access SES device: %s", g.gl_pathv[i]); continue; } if (ioctl(fd, ENCIOC_GETENCSTAT, (caddr_t) &estat) < 0) { close(fd); err(EXIT_FAILURE, "ENCIOC_GETENCSTAT"); } printf("%s: ", g.gl_pathv[i] + 5); e = 0; if (estat == 0) { if (status == 0) { status = 1; } printf("OK"); } else { if (estat & SES_ENCSTAT_INFO) { printf("INFO"); e++; } if (estat & SES_ENCSTAT_NONCRITICAL) { if (e) printf(","); printf("NONCRITICAL"); e++; } if (estat & SES_ENCSTAT_CRITICAL) { if (e) printf(","); printf("CRITICAL"); e++; status = -1; } if (estat & SES_ENCSTAT_UNRECOV) { if (e) printf(","); printf("UNRECOV"); e++; status = -1; } } printf("\n"); close(fd); } globfree(&g); if (status == 1) { return (EXIT_SUCCESS); } else { return (EXIT_FAILURE); } } int main(int argc, char **argv) { int i, ch; struct command *cmd = NULL; uflag = "/dev/ses[0-9]*"; while ((ch = getopt_long(argc, argv, "u:", NULL, NULL)) != -1) { switch (ch) { case 'u': uflag = optarg; break; case '?': default: usage(stderr, NULL); } } argc -= optind; argv += optind; if (argc < 1) { warnx("Missing command"); usage(stderr, NULL); } for (i = 0; i < nbcmds; i++) { if (strcmp(argv[0], cmds[i].name) == 0) { cmd = &cmds[i]; break; } } if (cmd == NULL) { warnx("unknown command %s", argv[0]); usage(stderr, NULL); } return (cmd->exec(argc, argv)); }