1 b3994ec5 2003-12-11 devnull #include <u.h>
  2 b3994ec5 2003-12-11 devnull #include <libc.h>
  3 b3994ec5 2003-12-11 devnull #include <draw.h>
  4 b3994ec5 2003-12-11 devnull #include <thread.h>
  5 b3994ec5 2003-12-11 devnull #include <cursor.h>
  6 b3994ec5 2003-12-11 devnull #include <mouse.h>
  7 b3994ec5 2003-12-11 devnull #include <keyboard.h>
  8 b3994ec5 2003-12-11 devnull #include <frame.h>
  9 b3994ec5 2003-12-11 devnull #include <fcall.h>
 10 b3994ec5 2003-12-11 devnull #include <plumb.h>
 11 b3994ec5 2003-12-11 devnull #include "dat.h"
 12 b3994ec5 2003-12-11 devnull #include "fns.h"
 13 b3994ec5 2003-12-11 devnull 
 14 b3994ec5 2003-12-11 devnull static	Block	*blist;
 15 b3994ec5 2003-12-11 devnull 
 16 b3994ec5 2003-12-11 devnull int
 17 b3994ec5 2003-12-11 devnull tempfile(void)
 18 b3994ec5 2003-12-11 devnull {
 19 b3994ec5 2003-12-11 devnull 	char buf[128];
 20 b3994ec5 2003-12-11 devnull 	int i, fd;
 21 b3994ec5 2003-12-11 devnull 
 22 b3994ec5 2003-12-11 devnull 	snprint(buf, sizeof buf, "/tmp/X%d.%.4sacme", getpid(), getuser());
 23 b3994ec5 2003-12-11 devnull 	for(i='A'; i<='Z'; i++){
 24 b3994ec5 2003-12-11 devnull 		buf[5] = i;
 25 b3994ec5 2003-12-11 devnull 		if(access(buf, AEXIST) == 0)
 26 b3994ec5 2003-12-11 devnull 			continue;
 27 b3994ec5 2003-12-11 devnull 		fd = create(buf, ORDWR|ORCLOSE|OCEXEC, 0600);
 28 b3994ec5 2003-12-11 devnull 		if(fd >= 0)
 29 b3994ec5 2003-12-11 devnull 			return fd;
 30 b3994ec5 2003-12-11 devnull 	}
 31 b3994ec5 2003-12-11 devnull 	return -1;
 32 b3994ec5 2003-12-11 devnull }
 33 b3994ec5 2003-12-11 devnull 
 34 b3994ec5 2003-12-11 devnull Disk*
 35 b3994ec5 2003-12-11 devnull diskinit()
 36 b3994ec5 2003-12-11 devnull {
 37 b3994ec5 2003-12-11 devnull 	Disk *d;
 38 b3994ec5 2003-12-11 devnull 
 39 b3994ec5 2003-12-11 devnull 	d = emalloc(sizeof(Disk));
 40 b3994ec5 2003-12-11 devnull 	d->fd = tempfile();
 41 b3994ec5 2003-12-11 devnull 	if(d->fd < 0){
 42 b3994ec5 2003-12-11 devnull 		fprint(2, "acme: can't create temp file: %r\n");
 43 b3994ec5 2003-12-11 devnull 		threadexitsall("diskinit");
 44 b3994ec5 2003-12-11 devnull 	}
 45 b3994ec5 2003-12-11 devnull 	return d;
 46 b3994ec5 2003-12-11 devnull }
 47 b3994ec5 2003-12-11 devnull 
 48 b3994ec5 2003-12-11 devnull static
 49 b3994ec5 2003-12-11 devnull uint
 50 b3994ec5 2003-12-11 devnull ntosize(uint n, uint *ip)
 51 b3994ec5 2003-12-11 devnull {
 52 b3994ec5 2003-12-11 devnull 	uint size;
 53 b3994ec5 2003-12-11 devnull 
 54 b3994ec5 2003-12-11 devnull 	if(n > Maxblock)
 55 b3994ec5 2003-12-11 devnull 		error("internal error: ntosize");
 56 b3994ec5 2003-12-11 devnull 	size = n;
 57 b3994ec5 2003-12-11 devnull 	if(size & (Blockincr-1))
 58 b3994ec5 2003-12-11 devnull 		size += Blockincr - (size & (Blockincr-1));
 59 b3994ec5 2003-12-11 devnull 	/* last bucket holds blocks of exactly Maxblock */
 60 b3994ec5 2003-12-11 devnull 	if(ip)
 61 b3994ec5 2003-12-11 devnull 		*ip = size/Blockincr;
 62 b3994ec5 2003-12-11 devnull 	return size * sizeof(Rune);
 63 b3994ec5 2003-12-11 devnull }
 64 b3994ec5 2003-12-11 devnull 
 65 b3994ec5 2003-12-11 devnull Block*
 66 b3994ec5 2003-12-11 devnull disknewblock(Disk *d, uint n)
 67 b3994ec5 2003-12-11 devnull {
 68 b3994ec5 2003-12-11 devnull 	uint i, j, size;
 69 b3994ec5 2003-12-11 devnull 	Block *b;
 70 b3994ec5 2003-12-11 devnull 
 71 b3994ec5 2003-12-11 devnull 	size = ntosize(n, &i);
 72 b3994ec5 2003-12-11 devnull 	b = d->free[i];
 73 b3994ec5 2003-12-11 devnull 	if(b)
 74 b3994ec5 2003-12-11 devnull 		d->free[i] = b->u.next;
 75 b3994ec5 2003-12-11 devnull 	else{
 76 b3994ec5 2003-12-11 devnull 		/* allocate in chunks to reduce malloc overhead */
 77 b3994ec5 2003-12-11 devnull 		if(blist == nil){
 78 b3994ec5 2003-12-11 devnull 			blist = emalloc(100*sizeof(Block));
 79 b3994ec5 2003-12-11 devnull 			for(j=0; j<100-1; j++)
 80 b3994ec5 2003-12-11 devnull 				blist[j].u.next = &blist[j+1];
 81 b3994ec5 2003-12-11 devnull 		}
 82 b3994ec5 2003-12-11 devnull 		b = blist;
 83 b3994ec5 2003-12-11 devnull 		blist = b->u.next;
 84 b3994ec5 2003-12-11 devnull 		b->addr = d->addr;
 85 b3994ec5 2003-12-11 devnull 		d->addr += size;
 86 b3994ec5 2003-12-11 devnull 	}
 87 b3994ec5 2003-12-11 devnull 	b->u.n = n;
 88 b3994ec5 2003-12-11 devnull 	return b;
 89 b3994ec5 2003-12-11 devnull }
 90 b3994ec5 2003-12-11 devnull 
 91 b3994ec5 2003-12-11 devnull void
 92 b3994ec5 2003-12-11 devnull diskrelease(Disk *d, Block *b)
 93 b3994ec5 2003-12-11 devnull {
 94 b3994ec5 2003-12-11 devnull 	uint i;
 95 b3994ec5 2003-12-11 devnull 
 96 b3994ec5 2003-12-11 devnull 	ntosize(b->u.n, &i);
 97 b3994ec5 2003-12-11 devnull 	b->u.next = d->free[i];
 98 b3994ec5 2003-12-11 devnull 	d->free[i] = b;
 99 b3994ec5 2003-12-11 devnull }
100 b3994ec5 2003-12-11 devnull 
101 b3994ec5 2003-12-11 devnull void
102 b3994ec5 2003-12-11 devnull diskwrite(Disk *d, Block **bp, Rune *r, uint n)
103 b3994ec5 2003-12-11 devnull {
104 b3994ec5 2003-12-11 devnull 	int size, nsize;
105 b3994ec5 2003-12-11 devnull 	Block *b;
106 b3994ec5 2003-12-11 devnull 
107 b3994ec5 2003-12-11 devnull 	b = *bp;
108 b3994ec5 2003-12-11 devnull 	size = ntosize(b->u.n, nil);
109 b3994ec5 2003-12-11 devnull 	nsize = ntosize(n, nil);
110 b3994ec5 2003-12-11 devnull 	if(size != nsize){
111 b3994ec5 2003-12-11 devnull 		diskrelease(d, b);
112 b3994ec5 2003-12-11 devnull 		b = disknewblock(d, n);
113 b3994ec5 2003-12-11 devnull 		*bp = b;
114 b3994ec5 2003-12-11 devnull 	}
115 b3994ec5 2003-12-11 devnull 	if(pwrite(d->fd, r, n*sizeof(Rune), b->addr) != n*sizeof(Rune))
116 b3994ec5 2003-12-11 devnull 		error("write error to temp file");
117 b3994ec5 2003-12-11 devnull 	b->u.n = n;
118 b3994ec5 2003-12-11 devnull }
119 b3994ec5 2003-12-11 devnull 
120 b3994ec5 2003-12-11 devnull void
121 b3994ec5 2003-12-11 devnull diskread(Disk *d, Block *b, Rune *r, uint n)
122 b3994ec5 2003-12-11 devnull {
123 b3994ec5 2003-12-11 devnull 	if(n > b->u.n)
124 b3994ec5 2003-12-11 devnull 		error("internal error: diskread");
125 b3994ec5 2003-12-11 devnull 
126 b3994ec5 2003-12-11 devnull 	ntosize(b->u.n, nil);
127 b3994ec5 2003-12-11 devnull 	if(pread(d->fd, r, n*sizeof(Rune), b->addr) != n*sizeof(Rune))
128 b3994ec5 2003-12-11 devnull 		error("read error from temp file");
129 b3994ec5 2003-12-11 devnull }