3 * used to be just scsi disks, and issued scsi commands directly to the host
4 * adapter, but now it just does normal i/o.
8 enum { Sectorsz = 512, }; /* usual disk sector size */
10 typedef struct Wren Wren;
13 long block; /* size of a block -- from config */
14 Devsize nblock; /* number of blocks -- from config */
15 long mult; /* multiplier to get physical blocks */
16 Devsize max; /* number of logical blocks */
26 if (dir != nil && dir->mode & DMDIR)
27 datanm = smprint("%s/data", file);
29 datanm = strdup(file);
42 d->private = dr = malloc(sizeof(Wren));
45 d->wren.sddata = dataof(d->wren.file);
47 d->wren.sddir = sdof(d);
48 d->wren.sddata = smprint("%s/data", d->wren.sddir);
51 assert(d->wren.fd <= 0);
52 d->wren.fd = open(d->wren.sddata, ORDWR);
54 panic("wreninit: can't open %s for %Z: %r", d->wren.sddata, d);
56 dr->block = inqsize(d->wren.sddata);
57 if(dr->block <= 0 || dr->block >= 16*1024) {
59 print("\twreninit %Z block size %ld, setting to %d\n",
60 d, dr->block, Sectorsz);
64 dir = dirfstat(d->wren.fd);
65 dr->nblock = dir->length / dr->block;
68 dr->mult = (RBUFSIZE + dr->block - 1) / dr->block;
69 dr->max = (dr->nblock + 1) / dr->mult;
71 print("\tdisk drive %Z: %,lld %ld-byte sectors, ",
72 d, (Wideoff)dr->nblock, dr->block);
73 print("%,lld %d-byte blocks\n", (Wideoff)dr->max, RBUFSIZE);
74 print("\t\t%ld multiplier\n", dr->mult);
81 return ((Wren *)d->private)->max;
85 wrenread(Device *d, Off b, void *c)
88 Wren *dr = d->private;
91 panic("wrenread: no drive (%Z) block %lld", d, (Wideoff)b);
93 fprint(2, "wrenread: block out of range %Z(%lld)\n", d, (Wideoff)b);
95 } else if (pread(d->wren.fd, c, RBUFSIZE, (vlong)b*RBUFSIZE) != RBUFSIZE) {
96 fprint(2, "wrenread: error on %Z(%lld): %r\n", d, (Wideoff)b);
104 wrenwrite(Device *d, Off b, void *c)
107 Wren *dr = d->private;
110 panic("wrenwrite: no drive (%Z) block %lld", d, (Wideoff)b);
112 fprint(2, "wrenwrite: block out of range %Z(%lld)\n",
115 } else if (pwrite(d->wren.fd, c, RBUFSIZE, (vlong)b*RBUFSIZE) != RBUFSIZE) {
116 fprint(2, "wrenwrite: error on %Z(%lld): %r\n", d, (Wideoff)b);