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"
14 b3994ec5 2003-12-11 devnull static Block *blist;
17 b3994ec5 2003-12-11 devnull tempfile(void)
19 b3994ec5 2003-12-11 devnull char buf[128];
20 b3994ec5 2003-12-11 devnull int i, fd;
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;
31 b3994ec5 2003-12-11 devnull return -1;
35 b3994ec5 2003-12-11 devnull diskinit()
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");
45 b3994ec5 2003-12-11 devnull return d;
50 b3994ec5 2003-12-11 devnull ntosize(uint n, uint *ip)
52 b3994ec5 2003-12-11 devnull uint size;
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 */
61 b3994ec5 2003-12-11 devnull *ip = size/Blockincr;
62 b3994ec5 2003-12-11 devnull return size * sizeof(Rune);
66 b3994ec5 2003-12-11 devnull disknewblock(Disk *d, uint n)
68 b3994ec5 2003-12-11 devnull uint i, j, size;
69 b3994ec5 2003-12-11 devnull Block *b;
71 b3994ec5 2003-12-11 devnull size = ntosize(n, &i);
72 b3994ec5 2003-12-11 devnull b = d->free[i];
74 b3994ec5 2003-12-11 devnull d->free[i] = b->u.next;
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];
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;
87 b3994ec5 2003-12-11 devnull b->u.n = n;
88 b3994ec5 2003-12-11 devnull return b;
92 b3994ec5 2003-12-11 devnull diskrelease(Disk *d, Block *b)
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;
102 b3994ec5 2003-12-11 devnull diskwrite(Disk *d, Block **bp, Rune *r, uint n)
104 b3994ec5 2003-12-11 devnull int size, nsize;
105 b3994ec5 2003-12-11 devnull Block *b;
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;
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;
121 b3994ec5 2003-12-11 devnull diskread(Disk *d, Block *b, Rune *r, uint n)
123 b3994ec5 2003-12-11 devnull if(n > b->u.n)
124 b3994ec5 2003-12-11 devnull error("internal error: diskread");
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");