4 char *datac[] = {0,"#P/iob","#P/iow",0,"#P/iol",0,0,0,"#P/msr"};
7 main(int argc, char** argv) {
17 case 'W': size = 2; break;
18 case 'L': size = 4; break;
19 case 'M': size = 8; break;
20 case 'E': datac[1] = datac[2] = datac[4] = datac[8] = "#P/ec"; break;
21 case 'r': op = OREAD; break;
22 case 'w': op = OWRITE; break;
23 default: sysfatal("bad flag %c", ARGC());
25 if(op == -1) sysfatal("no operation selected");
26 if(argc < 1) sysfatal("no port selected");
27 if(op == OWRITE && argc < 2) sysfatal("no data selected");
28 port = strtoul(argv[0], 0, 0);
29 if(op == OWRITE) data = strtoull(argv[1], 0, 0);
31 fd = open(datac[size], op);
32 if(fd == -1) sysfatal("open: %r");
37 datab[2] = data >> 16;
38 datab[3] = data >> 24;
39 datab[4] = data >> 32;
40 datab[5] = data >> 40;
41 datab[6] = data >> 48;
42 datab[7] = data >> 56;
43 if(pwrite(fd, datab, size, port) != size)
44 sysfatal("pwrite: %r");
48 if(pread(fd, datab, size, port) != size)
49 sysfatal("pread: %r");
50 data = datab[0] | (datab[1] << 8) | (datab[2] << 16) |
51 (datab[3] << 24) | ((vlong)datab[4] << 32) |
52 ((vlong)datab[5] << 40) | ((vlong)datab[6] << 48) |
53 ((vlong)datab[7] << 56);
54 print("0x%ullx\n", data);