101a344a2SDavid du Colombier /*
201a344a2SDavid du Colombier * drive disks
301a344a2SDavid du Colombier * used to be just scsi disks, and issued scsi commands directly to the host
401a344a2SDavid du Colombier * adapter, but now it just does normal i/o.
501a344a2SDavid du Colombier */
601a344a2SDavid du Colombier #include "all.h"
701a344a2SDavid du Colombier
801a344a2SDavid du Colombier enum { Sectorsz = 512, }; /* usual disk sector size */
901a344a2SDavid du Colombier
1001a344a2SDavid du Colombier typedef struct Wren Wren;
1101a344a2SDavid du Colombier struct Wren
1201a344a2SDavid du Colombier {
1301a344a2SDavid du Colombier long block; /* size of a block -- from config */
1401a344a2SDavid du Colombier Devsize nblock; /* number of blocks -- from config */
1501a344a2SDavid du Colombier long mult; /* multiplier to get physical blocks */
1601a344a2SDavid du Colombier Devsize max; /* number of logical blocks */
1701a344a2SDavid du Colombier
1801a344a2SDavid du Colombier // char *sddir; /* /dev/sdXX name */
1901a344a2SDavid du Colombier };
2001a344a2SDavid du Colombier
2101a344a2SDavid du Colombier char *
dataof(char * file)2201a344a2SDavid du Colombier dataof(char *file)
2301a344a2SDavid du Colombier {
2401a344a2SDavid du Colombier char *datanm;
2501a344a2SDavid du Colombier Dir *dir;
2601a344a2SDavid du Colombier
2701a344a2SDavid du Colombier dir = dirstat(file);
2801a344a2SDavid du Colombier if (dir != nil && dir->mode & DMDIR)
2901a344a2SDavid du Colombier datanm = smprint("%s/data", file);
3001a344a2SDavid du Colombier else
3101a344a2SDavid du Colombier datanm = strdup(file);
3201a344a2SDavid du Colombier free(dir);
3301a344a2SDavid du Colombier return datanm;
3401a344a2SDavid du Colombier }
3501a344a2SDavid du Colombier
3601a344a2SDavid du Colombier void
wreninit(Device * d)3701a344a2SDavid du Colombier wreninit(Device *d)
3801a344a2SDavid du Colombier {
3901a344a2SDavid du Colombier Wren *dr;
4001a344a2SDavid du Colombier Dir *dir;
4101a344a2SDavid du Colombier
4201a344a2SDavid du Colombier if(d->private)
4301a344a2SDavid du Colombier return;
4401a344a2SDavid du Colombier d->private = dr = malloc(sizeof(Wren));
4501a344a2SDavid du Colombier
4601a344a2SDavid du Colombier if (d->wren.file)
4701a344a2SDavid du Colombier d->wren.sddata = dataof(d->wren.file);
4801a344a2SDavid du Colombier else {
4901a344a2SDavid du Colombier d->wren.sddir = sdof(d);
5001a344a2SDavid du Colombier d->wren.sddata = smprint("%s/data", d->wren.sddir);
5101a344a2SDavid du Colombier }
5201a344a2SDavid du Colombier
5301a344a2SDavid du Colombier assert(d->wren.fd <= 0);
5401a344a2SDavid du Colombier d->wren.fd = open(d->wren.sddata, ORDWR);
5501a344a2SDavid du Colombier if (d->wren.fd < 0)
5601a344a2SDavid du Colombier panic("wreninit: can't open %s for %Z: %r", d->wren.sddata, d);
5701a344a2SDavid du Colombier
5801a344a2SDavid du Colombier dr->block = inqsize(d->wren.sddata);
5901a344a2SDavid du Colombier if(dr->block <= 0 || dr->block >= 16*1024) {
6001a344a2SDavid du Colombier print("\twreninit %Z block size %ld, setting to %d\n",
6101a344a2SDavid du Colombier d, dr->block, Sectorsz);
6201a344a2SDavid du Colombier dr->block = Sectorsz;
6301a344a2SDavid du Colombier }
6401a344a2SDavid du Colombier
6501a344a2SDavid du Colombier dir = dirfstat(d->wren.fd);
6601a344a2SDavid du Colombier dr->nblock = dir->length / dr->block;
6701a344a2SDavid du Colombier free(dir);
6801a344a2SDavid du Colombier
6901a344a2SDavid du Colombier dr->mult = (RBUFSIZE + dr->block - 1) / dr->block;
7001a344a2SDavid du Colombier dr->max = (dr->nblock + 1) / dr->mult;
7101a344a2SDavid du Colombier print("\tdisk drive %Z: %,lld %ld-byte sectors, ",
7201a344a2SDavid du Colombier d, (Wideoff)dr->nblock, dr->block);
7301a344a2SDavid du Colombier print("%,lld %d-byte blocks\n", (Wideoff)dr->max, RBUFSIZE);
7401a344a2SDavid du Colombier print("\t\t%ld multiplier\n", dr->mult);
7501a344a2SDavid du Colombier }
7601a344a2SDavid du Colombier
7701a344a2SDavid du Colombier Devsize
wrensize(Device * d)7801a344a2SDavid du Colombier wrensize(Device *d)
7901a344a2SDavid du Colombier {
8001a344a2SDavid du Colombier return ((Wren *)d->private)->max;
8101a344a2SDavid du Colombier }
8201a344a2SDavid du Colombier
8301a344a2SDavid du Colombier int
wrenread(Device * d,Off b,void * c)8401a344a2SDavid du Colombier wrenread(Device *d, Off b, void *c)
8501a344a2SDavid du Colombier {
8601a344a2SDavid du Colombier int r = 0;
8701a344a2SDavid du Colombier Wren *dr = d->private;
8801a344a2SDavid du Colombier
8901a344a2SDavid du Colombier if (dr == nil)
9001a344a2SDavid du Colombier panic("wrenread: no drive (%Z) block %lld", d, (Wideoff)b);
9101a344a2SDavid du Colombier if(b >= dr->max) {
9201a344a2SDavid du Colombier print("wrenread: block out of range %Z(%lld)\n", d, (Wideoff)b);
9301a344a2SDavid du Colombier r = 0x040;
94*390ad7e1SDavid du Colombier } else if (pread(d->wren.fd, c, RBUFSIZE, (vlong)b*RBUFSIZE) != RBUFSIZE) {
9501a344a2SDavid du Colombier print("wrenread: error on %Z(%lld): %r\n", d, (Wideoff)b);
9601a344a2SDavid du Colombier cons.nwrenre++;
9701a344a2SDavid du Colombier r = 1;
9801a344a2SDavid du Colombier }
9901a344a2SDavid du Colombier return r;
10001a344a2SDavid du Colombier }
10101a344a2SDavid du Colombier
10201a344a2SDavid du Colombier int
wrenwrite(Device * d,Off b,void * c)10301a344a2SDavid du Colombier wrenwrite(Device *d, Off b, void *c)
10401a344a2SDavid du Colombier {
10501a344a2SDavid du Colombier int r = 0;
10601a344a2SDavid du Colombier Wren *dr = d->private;
10701a344a2SDavid du Colombier
10801a344a2SDavid du Colombier if (dr == nil)
10901a344a2SDavid du Colombier panic("wrenwrite: no drive (%Z) block %lld", d, (Wideoff)b);
11001a344a2SDavid du Colombier if(b >= dr->max) {
11101a344a2SDavid du Colombier print("wrenwrite: block out of range %Z(%lld)\n",
11201a344a2SDavid du Colombier d, (Wideoff)b);
11301a344a2SDavid du Colombier r = 0x040;
114*390ad7e1SDavid du Colombier } else if (pwrite(d->wren.fd, c, RBUFSIZE, (vlong)b*RBUFSIZE) != RBUFSIZE) {
11501a344a2SDavid du Colombier print("wrenwrite: error on %Z(%lld): %r\n", d, (Wideoff)b);
11601a344a2SDavid du Colombier cons.nwrenwe++;
11701a344a2SDavid du Colombier r = 1;
11801a344a2SDavid du Colombier }
11901a344a2SDavid du Colombier return r;
12001a344a2SDavid du Colombier }
121