op public repos

Blob

Date:: Sun Mar 25 17:32:16 2007 UTC
Message:: make Load more faithful to original Dump (Peter Canning)
Actions:: History | Blame | Raw File
1 #include <u.h>
2 #include <libc.h>
3 #include <draw.h>
4 #include <thread.h>
5 #include <cursor.h>
6 #include <mouse.h>
7 #include <keyboard.h>
8 #include <frame.h>
9 #include <fcall.h>
10 #include <plumb.h>
11 #include "dat.h"
12 #include "fns.h"
13 
14 static Rune Lheader[] = {
15 	'N', 'e', 'w', ' ',
16 	'C', 'u', 't', ' ',
17 	'P', 'a', 's', 't', 'e', ' ',
18 	'S', 'n', 'a', 'r', 'f', ' ',
19 	'S', 'o', 'r', 't', ' ',
20 	'Z', 'e', 'r', 'o', 'x', ' ',
21 	'D', 'e', 'l', 'c', 'o', 'l', ' ',
22 	0
23 };
24 
25 void
26 colinit(Column *c, Rectangle r)
27 {
28 	Rectangle r1;
29 	Text *t;
30 
31 	draw(screen, r, display->white, nil, ZP);
32 	c->r = r;
33 	c->w = nil;
34 	c->nw = 0;
35 	t = &c->tag;
36 	t->w = nil;
37 	t->col = c;
38 	r1 = r;
39 	r1.max.y = r1.min.y + font->height;
40 	textinit(t, fileaddtext(nil, t), r1, &reffont, tagcols);
41 	t->what = Columntag;
42 	r1.min.y = r1.max.y;
43 	r1.max.y += Border;
44 	draw(screen, r1, display->black, nil, ZP);
45 	textinsert(t, 0, Lheader, 38, TRUE);
46 	textsetselect(t, t->file->b.nc, t->file->b.nc);
47 	draw(screen, t->scrollr, colbutton, nil, colbutton->r.min);
48 	c->safe = TRUE;
49 }
50 
51 Window*
52 coladd(Column *c, Window *w, Window *clone, int y)
53 {
54 	Rectangle r, r1;
55 	Window *v;
56 	int i, j, minht, t;
57 
58 	v = nil;
59 	r = c->r;
60 	r.min.y = c->tag.fr.r.max.y+Border;
61 	if(y<r.min.y && c->nw>0){	/* steal half of last window by default */
62 		v = c->w[c->nw-1];
63 		y = v->body.fr.r.min.y+Dy(v->body.fr.r)/2;
64 	}
65 	/* look for window we'll land on */
66 	for(i=0; i<c->nw; i++){
67 		v = c->w[i];
68 		if(y < v->r.max.y)
69 			break;
70 	}
71 	if(c->nw > 0){
72 		if(i < c->nw)
73 			i++;	/* new window will go after v */
74 		/*
75 		 * if v's too small, grow it first.
76 		 */
77 		minht = v->tag.fr.font->height+Border+1;
78 		j = 0;
79 		while(!c->safe || v->body.fr.maxlines<=3 || Dy(v->body.all) <= minht){
80 			if(++j > 10){
81 fprint(2, "oops: dy=%d\n", Dy(v->body.all));
82 				break;
83 			}
84 			colgrow(c, v, 1);
85 		}
86 		if(i == c->nw)
87 			t = c->r.max.y;
88 		else
89 			t = c->w[i]->r.min.y-Border;
90 		y = min(y, v->body.all.min.y+Dy(v->body.all)/2);
91 		if(t - y < minht)
92 			y = t - minht;
93 		if(y < v->body.all.min.y)
94 			y = v->body.all.min.y;
95 		r = v->r;
96 		r.max.y = t;
97 		draw(screen, r, textcols[BACK], nil, ZP);
98 		r1 = r;
99 		y = min(y, t-(v->tag.fr.font->height*v->taglines+v->body.fr.font->height+Border+1));
100 		r1.max.y = min(y, v->body.fr.r.min.y+v->body.fr.nlines*v->body.fr.font->height);
101 		r1.min.y = winresize(v, r1, FALSE, FALSE);
102 		r1.max.y = r1.min.y+Border;
103 		draw(screen, r1, display->black, nil, ZP);
104 		r.min.y = r1.max.y;
105 	}
106 	if(w == nil){
107 		w = emalloc(sizeof(Window));
108 		w->col = c;
109 		draw(screen, r, textcols[BACK], nil, ZP);
110 		wininit(w, clone, r);
111 	}else{
112 		w->col = c;
113 		winresize(w, r, FALSE, TRUE);
114 	}
115 	w->tag.col = c;
116 	w->tag.row = c->row;
117 	w->body.col = c;
118 	w->body.row = c->row;
119 	c->w = realloc(c->w, (c->nw+1)*sizeof(Window*));
120 	memmove(c->w+i+1, c->w+i, (c->nw-i)*sizeof(Window*));
121 	c->nw++;
122 	c->w[i] = w;
123 	savemouse(w);
124 	/* near but not on the button */
125 	moveto(mousectl, addpt(w->tag.scrollr.max, Pt(3, 3)));
126 	barttext = &w->body;
127 	c->safe = TRUE;
128 	return w;
129 }
130 
131 void
132 colclose(Column *c, Window *w, int dofree)
133 {
134 	Rectangle r;
135 	int i;
136 
137 	/* w is locked */
138 	if(!c->safe)
139 		colgrow(c, w, 1);
140 	for(i=0; i<c->nw; i++)
141 		if(c->w[i] == w)
142 			goto Found;
143 	error("can't find window");
144   Found:
145 	r = w->r;
146 	w->tag.col = nil;
147 	w->body.col = nil;
148 	w->col = nil;
149 	restoremouse(w);
150 	if(dofree){
151 		windelete(w);
152 		winclose(w);
153 	}
154 	memmove(c->w+i, c->w+i+1, (c->nw-i-1)*sizeof(Window*));
155 	c->nw--;
156 	c->w = realloc(c->w, c->nw*sizeof(Window*));
157 	if(c->nw == 0){
158 		draw(screen, r, display->white, nil, ZP);
159 		return;
160 	}
161 	if(i == c->nw){		/* extend last window down */
162 		w = c->w[i-1];
163 		r.min.y = w->r.min.y;
164 		r.max.y = c->r.max.y;
165 	}else{			/* extend next window up */
166 		w = c->w[i];
167 		r.max.y = w->r.max.y;
168 	}
169 	draw(screen, r, textcols[BACK], nil, ZP);
170 	if(c->safe)
171 		winresize(w, r, FALSE, TRUE);
172 }
173 
174 void
175 colcloseall(Column *c)
176 {
177 	int i;
178 	Window *w;
179 
180 	if(c == activecol)
181 		activecol = nil;
182 	textclose(&c->tag);
183 	for(i=0; i<c->nw; i++){
184 		w = c->w[i];
185 		winclose(w);
186 	}
187 	c->nw = 0;
188 	free(c->w);
189 	free(c);
190 	clearmouse();
191 }
192 
193 void
194 colmousebut(Column *c)
195 {
196 	moveto(mousectl, divpt(addpt(c->tag.scrollr.min, c->tag.scrollr.max), 2));
197 }
198 
199 void
200 colresize(Column *c, Rectangle r)
201 {
202 	int i;
203 	Rectangle r1, r2;
204 	Window *w;
205 
206 	clearmouse();
207 	r1 = r;
208 	r1.max.y = r1.min.y + c->tag.fr.font->height;
209 	textresize(&c->tag, r1, TRUE);
210 	draw(screen, c->tag.scrollr, colbutton, nil, colbutton->r.min);
211 	r1.min.y = r1.max.y;
212 	r1.max.y += Border;
213 	draw(screen, r1, display->black, nil, ZP);
214 	r1.max.y = r.max.y;
215 	for(i=0; i<c->nw; i++){
216 		w = c->w[i];
217 		w->maxlines = 0;
218 		if(i == c->nw-1)
219 			r1.max.y = r.max.y;
220 		else
221 			r1.max.y = r1.min.y+(Dy(w->r)+Border)*Dy(r)/Dy(c->r);
222 		if(Dy(r1) < Border+font->height)
223 			r1.max.y = r1.min.y + Border+font->height;
224 		r2 = r1;
225 		r2.max.y = r2.min.y+Border;
226 		draw(screen, r2, display->black, nil, ZP);
227 		r1.min.y = r2.max.y;
228 		r1.min.y = winresize(w, r1, FALSE, i==c->nw-1);
229 	}
230 	c->r = r;
231 }
232 
233 static
234 int
235 colcmp(const void *a, const void *b)
236 {
237 	Rune *r1, *r2;
238 	int i, nr1, nr2;
239 
240 	r1 = (*(Window**)a)->body.file->name;
241 	nr1 = (*(Window**)a)->body.file->nname;
242 	r2 = (*(Window**)b)->body.file->name;
243 	nr2 = (*(Window**)b)->body.file->nname;
244 	for(i=0; i<nr1 && i<nr2; i++){
245 		if(*r1 != *r2)
246 			return *r1-*r2;
247 		r1++;
248 		r2++;
249 	}
250 	return nr1-nr2;
251 }
252 
253 void
254 colsort(Column *c)
255 {
256 	int i, y;
257 	Rectangle r, r1, *rp;
258 	Window **wp, *w;
259 
260 	if(c->nw == 0)
261 		return;
262 	clearmouse();
263 	rp = emalloc(c->nw*sizeof(Rectangle));
264 	wp = emalloc(c->nw*sizeof(Window*));
265 	memmove(wp, c->w, c->nw*sizeof(Window*));
266 	qsort(wp, c->nw, sizeof(Window*), colcmp);
267 	for(i=0; i<c->nw; i++)
268 		rp[i] = wp[i]->r;
269 	r = c->r;
270 	r.min.y = c->tag.fr.r.max.y;
271 	draw(screen, r, textcols[BACK], nil, ZP);
272 	y = r.min.y;
273 	for(i=0; i<c->nw; i++){
274 		w = wp[i];
275 		r.min.y = y;
276 		if(i == c->nw-1)
277 			r.max.y = c->r.max.y;
278 		else
279 			r.max.y = r.min.y+Dy(w->r)+Border;
280 		r1 = r;
281 		r1.max.y = r1.min.y+Border;
282 		draw(screen, r1, display->black, nil, ZP);
283 		r.min.y = r1.max.y;
284 		y = winresize(w, r, FALSE, i==c->nw-1);
285 	}
286 	free(rp);
287 	free(c->w);
288 	c->w = wp;
289 }
290 
291 void
292 colgrow(Column *c, Window *w, int but)
293 {
294 	Rectangle r, cr;
295 	int i, j, k, l, y1, y2, *nl, *ny, tot, nnl, onl, dnl, h;
296 	Window *v;
297 
298 	for(i=0; i<c->nw; i++)
299 		if(c->w[i] == w)
300 			goto Found;
301 	error("can't find window");
302 
303   Found:
304 	cr = c->r;
305 	if(but < 0){	/* make sure window fills its own space properly */
306 		r = w->r;
307 		if(i==c->nw-1 || c->safe==FALSE)
308 			r.max.y = cr.max.y;
309 		else
310 			r.max.y = c->w[i+1]->r.min.y-Border;
311 		winresize(w, r, FALSE, TRUE);
312 		return;
313 	}
314 	cr.min.y = c->w[0]->r.min.y;
315 	if(but == 3){	/* full size */
316 		if(i != 0){
317 			v = c->w[0];
318 			c->w[0] = w;
319 			c->w[i] = v;
320 		}
321 		draw(screen, cr, textcols[BACK], nil, ZP);
322 		winresize(w, cr, FALSE, TRUE);
323 		for(i=1; i<c->nw; i++)
324 			c->w[i]->body.fr.maxlines = 0;
325 		c->safe = FALSE;
326 		return;
327 	}
328 	/* store old #lines for each window */
329 	onl = w->body.fr.maxlines;
330 	nl = emalloc(c->nw * sizeof(int));
331 	ny = emalloc(c->nw * sizeof(int));
332 	tot = 0;
333 	for(j=0; j<c->nw; j++){
334 		l = c->w[j]->taglines-1 + c->w[j]->body.fr.maxlines;
335 		nl[j] = l;
336 		tot += l;
337 	}
338 	/* approximate new #lines for this window */
339 	if(but == 2){	/* as big as can be */
340 		memset(nl, 0, c->nw * sizeof(int));
341 		goto Pack;
342 	}
343 	nnl = min(onl + max(min(5, w->taglines-1+w->maxlines), onl/2), tot);
344 	if(nnl < w->taglines-1+w->maxlines)
345 		nnl = (w->taglines-1+w->maxlines+nnl)/2;
346 	if(nnl == 0)
347 		nnl = 2;
348 	dnl = nnl - onl;
349 	/* compute new #lines for each window */
350 	for(k=1; k<c->nw; k++){
351 		/* prune from later window */
352 		j = i+k;
353 		if(j<c->nw && nl[j]){
354 			l = min(dnl, max(1, nl[j]/2));
355 			nl[j] -= l;
356 			nl[i] += l;
357 			dnl -= l;
358 		}
359 		/* prune from earlier window */
360 		j = i-k;
361 		if(j>=0 && nl[j]){
362 			l = min(dnl, max(1, nl[j]/2));
363 			nl[j] -= l;
364 			nl[i] += l;
365 			dnl -= l;
366 		}
367 	}
368     Pack:
369 	/* pack everyone above */
370 	y1 = cr.min.y;
371 	for(j=0; j<i; j++){
372 		v = c->w[j];
373 		r = v->r;
374 		r.min.y = y1;
375 		r.max.y = y1+Dy(v->tagtop);
376 		if(nl[j])
377 			r.max.y += 1 + nl[j]*v->body.fr.font->height;
378 		r.min.y = winresize(v, r, c->safe, FALSE);
379 		r.max.y += Border;
380 		draw(screen, r, display->black, nil, ZP);
381 		y1 = r.max.y;
382 	}
383 	/* scan to see new size of everyone below */
384 	y2 = c->r.max.y;
385 	for(j=c->nw-1; j>i; j--){
386 		v = c->w[j];
387 		r = v->r;
388 		r.min.y = y2-Dy(v->tagtop);
389 		if(nl[j])
390 			r.min.y -= 1 + nl[j]*v->body.fr.font->height;
391 		r.min.y -= Border;
392 		ny[j] = r.min.y;
393 		y2 = r.min.y;
394 	}
395 	/* compute new size of window */
396 	r = w->r;
397 	r.min.y = y1;
398 	r.max.y = y2;
399 	h = w->body.fr.font->height;
400 	if(Dy(r) < Dy(w->tagtop)+1+h+Border)
401 		r.max.y = r.min.y + Dy(w->tagtop)+1+h+Border;
402 	/* draw window */
403 	winresize(w, r, c->safe, TRUE);
404 	if(i < c->nw-1){
405 		r.min.y = r.max.y;
406 		r.max.y += Border;
407 		draw(screen, r, display->black, nil, ZP);
408 		for(j=i+1; j<c->nw; j++)
409 			ny[j] -= (y2-r.max.y);
410 	}
411 	/* pack everyone below */
412 	y1 = r.max.y;
413 	for(j=i+1; j<c->nw; j++){
414 		v = c->w[j];
415 		r = v->r;
416 		r.min.y = y1;
417 		r.max.y = y1+Dy(v->tagtop);
418 		if(nl[j])
419 			r.max.y += 1 + nl[j]*v->body.fr.font->height;
420 		y1 = winresize(v, r, c->safe, j+1==c->nw);
421 		if(j < c->nw-1){	/* no border on last window */
422 			r.min.y = y1;
423 			r.max.y += Border;
424 			draw(screen, r, display->black, nil, ZP);
425 			y1 = r.max.y;
426 		}
427 	}
428 /*
429 	r = w->r;
430 	r.min.y = y1;
431 	r.max.y = c->r.max.y;
432 	draw(screen, r, textcols[BACK], nil, ZP);
433 */
434 	free(nl);
435 	free(ny);
436 	c->safe = TRUE;
437 	winmousebut(w);
438 }
439 
440 void
441 coldragwin(Column *c, Window *w, int but)
442 {
443 	Rectangle r;
444 	int i, b;
445 	Point p, op;
446 	Window *v;
447 	Column *nc;
448 
449 	clearmouse();
450 	setcursor(mousectl, &boxcursor);
451 	b = mouse->buttons;
452 	op = mouse->xy;
453 	while(mouse->buttons == b)
454 		readmouse(mousectl);
455 	setcursor(mousectl, nil);
456 	if(mouse->buttons){
457 		while(mouse->buttons)
458 			readmouse(mousectl);
459 		return;
460 	}
461 
462 	for(i=0; i<c->nw; i++)
463 		if(c->w[i] == w)
464 			goto Found;
465 	error("can't find window");
466 
467   Found:
468 /* TAG - force recompute tag size (if in auto-expand mode) on mouse op. */
469 	w->taglines = 1;
470 /* END TAG */
471 	p = mouse->xy;
472 	if(abs(p.x-op.x)<5 && abs(p.y-op.y)<5){
473 		colgrow(c, w, but);
474 		winmousebut(w);
475 		return;
476 	}
477 	/* is it a flick to the right? */
478 	if(abs(p.y-op.y)<10 && p.x>op.x+30 && rowwhichcol(c->row, p)==c)
479 		p.x = op.x+Dx(w->r);	/* yes: toss to next column */
480 	nc = rowwhichcol(c->row, p);
481 	if(nc!=nil && nc!=c){
482 		colclose(c, w, FALSE);
483 		coladd(nc, w, nil, p.y);
484 		winmousebut(w);
485 		return;
486 	}
487 	if(i==0 && c->nw==1)
488 		return;			/* can't do it */
489 	if((i>0 && p.y<c->w[i-1]->r.min.y) || (i<c->nw-1 && p.y>w->r.max.y)
490 	|| (i==0 && p.y>w->r.max.y)){
491 		/* shuffle */
492 		colclose(c, w, FALSE);
493 		coladd(c, w, nil, p.y);
494 		winmousebut(w);
495 		return;
496 	}
497 	if(i == 0)
498 		return;
499 	v = c->w[i-1];
500 	if(p.y < v->tagtop.max.y)
501 		p.y = v->tagtop.max.y;
502 	if(p.y > w->r.max.y-Dy(w->tagtop)-Border)
503 		p.y = w->r.max.y-Dy(w->tagtop)-Border;
504 	r = v->r;
505 	r.max.y = p.y;
506 	if(r.max.y > v->body.fr.r.min.y){
507 		r.max.y -= (r.max.y-v->body.fr.r.min.y)%v->body.fr.font->height;
508 		if(v->body.fr.r.min.y == v->body.fr.r.max.y)
509 			r.max.y++;
510 	}
511 	r.min.y = winresize(v, r, c->safe, FALSE);
512 	r.max.y = r.min.y+Border;
513 	draw(screen, r, display->black, nil, ZP);
514 	r.min.y = r.max.y;
515 	if(i == c->nw-1)
516 		r.max.y = c->r.max.y;
517 	else
518 		r.max.y = c->w[i+1]->r.min.y-Border;
519 	winresize(w, r, c->safe, TRUE);
520 	c->safe = TRUE;
521     	winmousebut(w);
522 }
523 
524 Text*
525 colwhich(Column *c, Point p)
526 {
527 	int i;
528 	Window *w;
529 
530 	if(!ptinrect(p, c->r))
531 		return nil;
532 	if(ptinrect(p, c->tag.all))
533 		return &c->tag;
534 	for(i=0; i<c->nw; i++){
535 		w = c->w[i];
536 		if(ptinrect(p, w->r)){
537 			if(ptinrect(p, w->tagtop) || ptinrect(p, w->tag.fr.r))
538 				return &w->tag;
539 			if(ptinrect(p, w->body.scrollr) || ptinrect(p, w->body.fr.r))
540 				return &w->body;
541 			return nil;
542 		}
543 	}
544 	return nil;
545 }
546 
547 int
548 colclean(Column *c)
549 {
550 	int i, clean;
551 
552 	clean = TRUE;
553 	for(i=0; i<c->nw; i++)
554 		clean &= winclean(c->w[i], TRUE);
555 	return clean;
556 }