File:  [Research Unix] / researchv10dc / cmd / worm / scsi / wren / inq.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:33 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Dan Cross

#include	<stdio.h>
#include	"../scsi.h"
#include	"../scsish.h"
#include	"../tcl.h"
#include	"fns.h"

extern char *gen_rmb[2];
extern char *gen_devtype[256];

int
wr_extinq(ClientData cd, Tcl_Interp *it, int argc, char **argv)
{
	struct scsi_cmd cmd;
	struct scsi_return ret;
	char vendor[9], product[17];

#pragma ref argc
#pragma ref argv

	set6(cmd, 0x12, 0, 0, 0, 96, 0);
	if(s_io(0, &cmd, 0, &ret, 96, it->result = cd->err))
		ERR_RETURN
	fixedstr(&ret.data[8], 8, vendor);
	fixedstr(&ret.data[16], 16, product);
	printf("inq(%d,%d): %s %s, %s/%s rev=%0.4s serial=%0.8s\n",
		s_id, 0, gen_rmb[ret.data[1]>>7], gen_devtype[ret.data[0]],
		vendor, product, &ret.data[32], &ret.data[36]);
	return(TCL_OK);
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.