|
|
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: int ! 8: gen_start(ClientData cd, Tcl_Interp *it, int argc, char **argv) ! 9: { ! 10: struct scsi_cmd cmd; ! 11: struct scsi_return ret; ! 12: int i, unit; ! 13: ! 14: #pragma ref ncargs ! 15: #pragma ref cargs ! 16: ! 17: if(argc <= 1) ! 18: argv[i = 0] = "0"; ! 19: else ! 20: i = 1; ! 21: for(; i < argc; i++){ ! 22: unit = atoi(argv[i]); ! 23: set6(cmd, 0x1B, unit<<5, 0, 0, 1, 0); ! 24: if(s_io(0, &cmd, 0, &ret, 0, cd->err)) ! 25: ERR_RETURN ! 26: } ! 27: return(0); ! 28: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.