freebsd-dev/usr.sbin/dpt/dpt_led/dpt_led.c

123 lines
3.5 KiB
C

/*
* Copyright (c) 1997 by Simon Shapiro
* 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. 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.
* 3. The name of the author may not be used to endorse or promote products
* derived from this software without specific prior written permission.
*
* 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.
*
*/
/* dpt_led.c: Show the blinking LED array status of a DPT HBAs */
#ident "$Id: dpt_led.c,v 1.1 1998/01/26 06:26:41 julian Exp $"
#include <fcntl.h>
#include <stdio.h>
#include <string.h>
#include <errno.h>
#include <sys/time.h>
#include <sys/stat.h>
#include <sys/queue.h>
#include <sys/ioctl.h>
#include <scsi/scsi_all.h>
#include <scsi/scsi_message.h>
#include <scsi/scsiconf.h>
#include <sys/dpt.h>
int
main(int argc, char **argv, char **argp)
{
eata_pt_t pass_thru;
int led;
int result;
int fd;
if ( (fd = open(argv[1], O_RDWR, S_IRUSR | S_IWUSR)) == -1 ) {
(void)fprintf(stderr, "%s ERROR: Failed to open \"%s\" - %s\n",
argv[0], argv[1], strerror(errno));
exit(1);
}
pass_thru.eataID[0] = 'E';
pass_thru.eataID[1] = 'A';
pass_thru.eataID[2] = 'T';
pass_thru.eataID[3] = 'A';
pass_thru.command = DPT_BLINKLED;
pass_thru.command_buffer = (u_int8_t *)&led;
if ( (result = ioctl(fd, DPT_IOCTL_SEND, &pass_thru)) != 0 ) {
(void)fprintf(stderr, "%s ERROR: Failed to send IOCTL %lx "
"- %s\n",
argv[0], DPT_IOCTL_SEND,
strerror(errno));
exit(1);
}
(void)fprintf(stdout, "%s\n", i2bin((unsigned int)led, 16));
return(0);
}
/*
* and this one presents an integer as ones and zeros
*/
static char i2bin_bitmap[48]; /* Used for binary dump of registers */
char *
i2bin(unsigned int no, int length)
{
int ndx, rind;
for (ndx = 0, rind = 0; ndx < 32; ndx++, rind++) {
i2bin_bitmap[rind] = (((no << ndx) & 0x80000000) ? '1' : '0');
if (((ndx % 4) == 3))
i2bin_bitmap[++rind] = ' ';
}
if ((ndx % 4) == 3)
i2bin_bitmap[rind - 1] = '\0';
else
i2bin_bitmap[rind] = '\0';
switch (length) {
case 8:
return (i2bin_bitmap + 30);
break;
case 16:
return (i2bin_bitmap + 20);
break;
case 24:
return (i2bin_bitmap + 10);
break;
case 32:
return (i2bin_bitmap);
default:
return ("i2bin: Invalid length Specs");
break;
}
}