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