|
|
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_readt(ClientData cd, Tcl_Interp *it, int argc, char **argv) ! 9: { ! 10: struct scsi_cmd cmd; ! 11: struct scsi_return ret; ! 12: int unit, i; ! 13: unsigned long ns, ss; ! 14: long bs, addr; ! 15: long t1, t2; ! 16: int count; ! 17: ! 18: if(argc < 3) ! 19: USAGE_RETURN ! 20: addr = atol(argv[1]); ! 21: count = atol(argv[2]); ! 22: unit = (argc >= 3)? atoi(argv[3]):0; ! 23: set10(cmd, 0x25, unit<<5, 0, 0, 0, 0, 0, 0, 0, 0); ! 24: if(s_io(0, &cmd, 0, &ret, 8, cd->err)) ! 25: ERR_RETURN ! 26: ns = longat(&ret.data[0]); ! 27: ss = longat(&ret.data[4]); ! 28: bs = ss? sizeof(ret.data)/ss : 1; ! 29: time(&t1); ! 30: srand(t1); ! 31: printf("read(%d,%d): %d blocks @%d (bs=%dB, %d sectors),", s_id, unit, count, addr, bs*ss, bs); ! 32: fflush(stdout); ! 33: time(&t1); ! 34: for(i = count; i > 0; i -= bs){ ! 35: set10(cmd, 0x28, unit<<5, addr>>24, addr>>16, addr>>8, addr, ! 36: 0, 0, bs*0, 0); ! 37: if(s_io(0, &cmd, 0, &ret, bs*ss, cd->err)) ! 38: ERR_RETURN ! 39: addr += bs; ! 40: } ! 41: time(&t2); ! 42: printf(" t=%ds (%.0fKB/s)\n", t2-t1, (count*(float)ss/1024.)/((t1 == t2)? 1:t2-t1)); ! 43: return(0); ! 44: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.