|
|
1.1 ! root 1: #include <stdio.h> ! 2: #include "../scsi.h" ! 3: #include "../scsish.h" ! 4: #include "../tcl.h" ! 5: #include "fns.h" ! 6: ! 7: static char mtab[5][2] = ! 8: { ! 9: '0', '0', '1', '1', '1', '2', '2', '2', '?', '?' ! 10: }; ! 11: static char *brdname[] = { ! 12: "no doard", "T.D. Systems Viking", "U.S. Design 1158" ! 13: }; ! 14: ! 15: int ! 16: sony_conf(ClientData cd, Tcl_Interp *it, int argc, char **argv) ! 17: { ! 18: struct scsi_cmd cmd; ! 19: struct scsi_return ret; ! 20: int n, i; ! 21: char buf[512]; ! 22: ! 23: #pragma ref argc ! 24: #pragma ref argv ! 25: ! 26: set6(cmd, 0x12, 0, 0, 0, 44, 0); ! 27: if(n = s_io(0, &cmd, 0, &ret, 44, cd->err)) ! 28: ERR_RETURN ! 29: i = min(ret.data[37], 4); ! 30: fixedstr(&ret.data[8], 28, buf); ! 31: printf("config(%d,%d): %s device, '%s', %c controller%s, %c drive%s\n", ! 32: s_id, 0, (ret.data[0] == 0x4)? "WORM":"Unknown", ! 33: buf, mtab[i][0], (mtab[i][0] == '1')?"":"s", ! 34: mtab[i][1], (mtab[i][1] == '1')?"":"s"); ! 35: printf("\tUnibus-SCSI controller=%s\n", brdname[ret.type]); ! 36: printf("\tROMS:"); ! 37: if(ret.data[38] != 0xFF) ! 38: printf(" up cont.=0x%x,", ret.data[38]); ! 39: if(ret.data[40] != 0xFF) ! 40: printf(" lo cont.=0x%x,", ret.data[40]); ! 41: printf( " IF-129=0x%x, SY-46=0x%x, SS-30=0x%x\n", ret.data[36], ! 42: ret.data[42], ret.data[43]); ! 43: return(TCL_OK); ! 44: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.