1 84b1cb73 2003-09-30 devnull #include <u.h>
  2 84b1cb73 2003-09-30 devnull #include <libc.h>
  3 84b1cb73 2003-09-30 devnull #include <draw.h>
  4 84b1cb73 2003-09-30 devnull #include <thread.h>
  5 84b1cb73 2003-09-30 devnull #include <mouse.h>
  6 84b1cb73 2003-09-30 devnull #include <cursor.h>
  7 84b1cb73 2003-09-30 devnull #include <keyboard.h>
  8 84b1cb73 2003-09-30 devnull #include <frame.h>
  9 84b1cb73 2003-09-30 devnull #include "flayer.h"
 10 84b1cb73 2003-09-30 devnull #include "samterm.h"
 11 84b1cb73 2003-09-30 devnull 
 12 84b1cb73 2003-09-30 devnull #define	DELTA	10
 13 84b1cb73 2003-09-30 devnull 
 14 84b1cb73 2003-09-30 devnull static Flayer	**llist;	/* front to back */
 15 84b1cb73 2003-09-30 devnull static int	nllist;
 16 84b1cb73 2003-09-30 devnull static int	nlalloc;
 17 84b1cb73 2003-09-30 devnull static Rectangle lDrect;
 18 84b1cb73 2003-09-30 devnull 
 19 84b1cb73 2003-09-30 devnull Vis		visibility(Flayer *);
 20 84b1cb73 2003-09-30 devnull void		newvisibilities(int);
 21 84b1cb73 2003-09-30 devnull void		llinsert(Flayer*);
 22 84b1cb73 2003-09-30 devnull void		lldelete(Flayer*);
 23 84b1cb73 2003-09-30 devnull 
 24 84b1cb73 2003-09-30 devnull Image	*maincols[NCOL];
 25 84b1cb73 2003-09-30 devnull Image	*cmdcols[NCOL];
 26 84b1cb73 2003-09-30 devnull 
 27 84b1cb73 2003-09-30 devnull void
 28 84b1cb73 2003-09-30 devnull flstart(Rectangle r)
 29 84b1cb73 2003-09-30 devnull {
 30 84b1cb73 2003-09-30 devnull 	lDrect = r;
 31 84b1cb73 2003-09-30 devnull 
 32 84b1cb73 2003-09-30 devnull 	/* Main text is yellowish */
 33 84b1cb73 2003-09-30 devnull 	maincols[BACK] = allocimagemix(display, DPaleyellow, DWhite);
 34 84b1cb73 2003-09-30 devnull 	maincols[HIGH] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DDarkyellow);
 35 84b1cb73 2003-09-30 devnull 	maincols[BORD] = allocimage(display, Rect(0,0,2,2), screen->chan, 1, DYellowgreen);
 36 84b1cb73 2003-09-30 devnull 	maincols[TEXT] = display->black;
 37 84b1cb73 2003-09-30 devnull 	maincols[HTEXT] = display->black;
 38 84b1cb73 2003-09-30 devnull 
 39 84b1cb73 2003-09-30 devnull 	/* Command text is blueish */
 40 84b1cb73 2003-09-30 devnull 	cmdcols[BACK] = allocimagemix(display, DPalebluegreen, DWhite);
 41 84b1cb73 2003-09-30 devnull 	cmdcols[HIGH] = allocimage(display, Rect(0,0,1,1), screen->chan, 1, DPalegreygreen);
 42 84b1cb73 2003-09-30 devnull 	cmdcols[BORD] = allocimage(display, Rect(0,0,2,2), screen->chan, 1, DPurpleblue);
 43 84b1cb73 2003-09-30 devnull 	cmdcols[TEXT] = display->black;
 44 84b1cb73 2003-09-30 devnull 	cmdcols[HTEXT] = display->black;
 45 84b1cb73 2003-09-30 devnull }
 46 84b1cb73 2003-09-30 devnull 
 47 84b1cb73 2003-09-30 devnull void
 48 84b1cb73 2003-09-30 devnull flnew(Flayer *l, Rune *(*fn)(Flayer*, long, ulong*), int u0, void *u1)
 49 84b1cb73 2003-09-30 devnull {
 50 84b1cb73 2003-09-30 devnull 	if(nllist == nlalloc){
 51 84b1cb73 2003-09-30 devnull 		nlalloc += DELTA;
 52 84b1cb73 2003-09-30 devnull 		llist = realloc(llist, nlalloc*sizeof(Flayer**));
 53 84b1cb73 2003-09-30 devnull 		if(llist == 0)
 54 84b1cb73 2003-09-30 devnull 			panic("flnew");
 55 84b1cb73 2003-09-30 devnull 	}
 56 84b1cb73 2003-09-30 devnull 	l->textfn = fn;
 57 84b1cb73 2003-09-30 devnull 	l->user0 = u0;
 58 84b1cb73 2003-09-30 devnull 	l->user1 = u1;
 59 84b1cb73 2003-09-30 devnull 	l->lastsr = ZR;
 60 84b1cb73 2003-09-30 devnull 	llinsert(l);
 61 84b1cb73 2003-09-30 devnull }
 62 84b1cb73 2003-09-30 devnull 
 63 84b1cb73 2003-09-30 devnull Rectangle
 64 84b1cb73 2003-09-30 devnull flrect(Flayer *l, Rectangle r)
 65 84b1cb73 2003-09-30 devnull {
 66 84b1cb73 2003-09-30 devnull 	rectclip(&r, lDrect);
 67 84b1cb73 2003-09-30 devnull 	l->entire = r;
 68 c2822499 2012-11-26 rsc 	l->scroll = insetrect(r, FLMARGIN(l));
 69 84b1cb73 2003-09-30 devnull 	r.min.x =
 70 c2822499 2012-11-26 rsc 	 l->scroll.max.x = r.min.x+FLMARGIN(l)+FLSCROLLWID(l)+(FLGAP(l)-FLMARGIN(l));
 71 84b1cb73 2003-09-30 devnull 	return r;
 72 84b1cb73 2003-09-30 devnull }
 73 84b1cb73 2003-09-30 devnull 
 74 84b1cb73 2003-09-30 devnull void
 75 84b1cb73 2003-09-30 devnull flinit(Flayer *l, Rectangle r, Font *ft, Image **cols)
 76 84b1cb73 2003-09-30 devnull {
 77 84b1cb73 2003-09-30 devnull 	lldelete(l);
 78 84b1cb73 2003-09-30 devnull 	llinsert(l);
 79 84b1cb73 2003-09-30 devnull 	l->visible = All;
 80 84b1cb73 2003-09-30 devnull 	l->origin = l->p0 = l->p1 = 0;
 81 c2822499 2012-11-26 rsc 	l->f.display = display; // for FLMARGIN
 82 c2822499 2012-11-26 rsc 	frinit(&l->f, insetrect(flrect(l, r), FLMARGIN(l)), ft, screen, cols);
 83 84b1cb73 2003-09-30 devnull 	l->f.maxtab = maxtab*stringwidth(ft, "0");
 84 84b1cb73 2003-09-30 devnull 	newvisibilities(1);
 85 84b1cb73 2003-09-30 devnull 	draw(screen, l->entire, l->f.cols[BACK], nil, ZP);
 86 84b1cb73 2003-09-30 devnull 	scrdraw(l, 0L);
 87 84b1cb73 2003-09-30 devnull 	flborder(l, 0);
 88 84b1cb73 2003-09-30 devnull }
 89 84b1cb73 2003-09-30 devnull 
 90 84b1cb73 2003-09-30 devnull void
 91 84b1cb73 2003-09-30 devnull flclose(Flayer *l)
 92 84b1cb73 2003-09-30 devnull {
 93 84b1cb73 2003-09-30 devnull 	if(l->visible == All)
 94 84b1cb73 2003-09-30 devnull 		draw(screen, l->entire, display->white, nil, ZP);
 95 84b1cb73 2003-09-30 devnull 	else if(l->visible == Some){
 96 84b1cb73 2003-09-30 devnull 		if(l->f.b == 0)
 97 84b1cb73 2003-09-30 devnull 			l->f.b = allocimage(display, l->entire, screen->chan, 0, DNofill);
 98 84b1cb73 2003-09-30 devnull 		if(l->f.b){
 99 84b1cb73 2003-09-30 devnull 			draw(l->f.b, l->entire, display->white, nil, ZP);
100 84b1cb73 2003-09-30 devnull 			flrefresh(l, l->entire, 0);
101 84b1cb73 2003-09-30 devnull 		}
102 84b1cb73 2003-09-30 devnull 	}
103 84b1cb73 2003-09-30 devnull 	frclear(&l->f, 1);
104 84b1cb73 2003-09-30 devnull 	lldelete(l);
105 84b1cb73 2003-09-30 devnull 	if(l->f.b && l->visible!=All)
106 84b1cb73 2003-09-30 devnull 		freeimage(l->f.b);
107 84b1cb73 2003-09-30 devnull 	l->textfn = 0;
108 84b1cb73 2003-09-30 devnull 	newvisibilities(1);
109 84b1cb73 2003-09-30 devnull }
110 84b1cb73 2003-09-30 devnull 
111 84b1cb73 2003-09-30 devnull void
112 84b1cb73 2003-09-30 devnull flborder(Flayer *l, int wide)
113 84b1cb73 2003-09-30 devnull {
114 84b1cb73 2003-09-30 devnull 	if(flprepare(l)){
115 c2822499 2012-11-26 rsc 		border(l->f.b, l->entire, FLMARGIN(l), l->f.cols[BACK], ZP);
116 c2822499 2012-11-26 rsc 		border(l->f.b, l->entire, wide? FLMARGIN(l) : 1, l->f.cols[BORD], ZP);
117 84b1cb73 2003-09-30 devnull 		if(l->visible==Some)
118 84b1cb73 2003-09-30 devnull 			flrefresh(l, l->entire, 0);
119 84b1cb73 2003-09-30 devnull 	}
120 84b1cb73 2003-09-30 devnull }
121 84b1cb73 2003-09-30 devnull 
122 84b1cb73 2003-09-30 devnull Flayer *
123 84b1cb73 2003-09-30 devnull flwhich(Point p)
124 84b1cb73 2003-09-30 devnull {
125 84b1cb73 2003-09-30 devnull 	int i;
126 84b1cb73 2003-09-30 devnull 
127 84b1cb73 2003-09-30 devnull 	if(p.x==0 && p.y==0)
128 84b1cb73 2003-09-30 devnull 		return nllist? llist[0] : 0;
129 84b1cb73 2003-09-30 devnull 	for(i=0; i<nllist; i++)
130 84b1cb73 2003-09-30 devnull 		if(ptinrect(p, llist[i]->entire))
131 84b1cb73 2003-09-30 devnull 			return llist[i];
132 84b1cb73 2003-09-30 devnull 	return 0;
133 84b1cb73 2003-09-30 devnull }
134 84b1cb73 2003-09-30 devnull 
135 84b1cb73 2003-09-30 devnull void
136 84b1cb73 2003-09-30 devnull flupfront(Flayer *l)
137 84b1cb73 2003-09-30 devnull {
138 84b1cb73 2003-09-30 devnull 	int v = l->visible;
139 84b1cb73 2003-09-30 devnull 
140 84b1cb73 2003-09-30 devnull 	lldelete(l);
141 84b1cb73 2003-09-30 devnull 	llinsert(l);
142 84b1cb73 2003-09-30 devnull 	if(v!=All)
143 84b1cb73 2003-09-30 devnull 		newvisibilities(0);
144 84b1cb73 2003-09-30 devnull }
145 84b1cb73 2003-09-30 devnull 
146 84b1cb73 2003-09-30 devnull void
147 84b1cb73 2003-09-30 devnull newvisibilities(int redraw)
148 84b1cb73 2003-09-30 devnull 	/* if redraw false, we know it's a flupfront, and needn't
149 84b1cb73 2003-09-30 devnull 	 * redraw anyone becoming partially covered */
150 84b1cb73 2003-09-30 devnull {
151 84b1cb73 2003-09-30 devnull 	int i;
152 84b1cb73 2003-09-30 devnull 	Vis ov;
153 84b1cb73 2003-09-30 devnull 	Flayer *l;
154 84b1cb73 2003-09-30 devnull 
155 84b1cb73 2003-09-30 devnull 	for(i = 0; i<nllist; i++){
156 84b1cb73 2003-09-30 devnull 		l = llist[i];
157 84b1cb73 2003-09-30 devnull 		l->lastsr = ZR;	/* make sure scroll bar gets redrawn */
158 84b1cb73 2003-09-30 devnull 		ov = l->visible;
159 84b1cb73 2003-09-30 devnull 		l->visible = visibility(l);
160 84b1cb73 2003-09-30 devnull #define	V(a, b)	(((a)<<2)|((b)))
161 84b1cb73 2003-09-30 devnull 		switch(V(ov, l->visible)){
162 84b1cb73 2003-09-30 devnull 		case V(Some, None):
163 84b1cb73 2003-09-30 devnull 			if(l->f.b)
164 84b1cb73 2003-09-30 devnull 				freeimage(l->f.b);
165 84b1cb73 2003-09-30 devnull 		case V(All, None):
166 84b1cb73 2003-09-30 devnull 		case V(All, Some):
167 84b1cb73 2003-09-30 devnull 			l->f.b = 0;
168 84b1cb73 2003-09-30 devnull 			frclear(&l->f, 0);
169 84b1cb73 2003-09-30 devnull 			break;
170 84b1cb73 2003-09-30 devnull 
171 84b1cb73 2003-09-30 devnull 		case V(Some, Some):
172 84b1cb73 2003-09-30 devnull 		case V(None, Some):
173 1c845e0b 2021-01-06 rsc 			if(ov == None || (l->f.b==0 && redraw))
174 84b1cb73 2003-09-30 devnull 				flprepare(l);
175 84b1cb73 2003-09-30 devnull 			if(l->f.b && redraw){
176 84b1cb73 2003-09-30 devnull 				flrefresh(l, l->entire, 0);
177 84b1cb73 2003-09-30 devnull 				freeimage(l->f.b);
178 84b1cb73 2003-09-30 devnull 				l->f.b = 0;
179 84b1cb73 2003-09-30 devnull 				frclear(&l->f, 0);
180 84b1cb73 2003-09-30 devnull 			}
181 84b1cb73 2003-09-30 devnull 		case V(None, None):
182 84b1cb73 2003-09-30 devnull 		case V(All, All):
183 84b1cb73 2003-09-30 devnull 			break;
184 84b1cb73 2003-09-30 devnull 
185 84b1cb73 2003-09-30 devnull 		case V(Some, All):
186 84b1cb73 2003-09-30 devnull 			if(l->f.b){
187 84b1cb73 2003-09-30 devnull 				draw(screen, l->entire, l->f.b, nil, l->entire.min);
188 84b1cb73 2003-09-30 devnull 				freeimage(l->f.b);
189 84b1cb73 2003-09-30 devnull 				l->f.b = screen;
190 84b1cb73 2003-09-30 devnull 				break;
191 84b1cb73 2003-09-30 devnull 			}
192 84b1cb73 2003-09-30 devnull 		case V(None, All):
193 84b1cb73 2003-09-30 devnull 			flprepare(l);
194 84b1cb73 2003-09-30 devnull 			break;
195 84b1cb73 2003-09-30 devnull 		}
196 84b1cb73 2003-09-30 devnull 		if(ov==None && l->visible!=None)
197 84b1cb73 2003-09-30 devnull 			flnewlyvisible(l);
198 84b1cb73 2003-09-30 devnull 	}
199 84b1cb73 2003-09-30 devnull }
200 84b1cb73 2003-09-30 devnull 
201 84b1cb73 2003-09-30 devnull void
202 84b1cb73 2003-09-30 devnull llinsert(Flayer *l)
203 84b1cb73 2003-09-30 devnull {
204 84b1cb73 2003-09-30 devnull 	int i;
205 84b1cb73 2003-09-30 devnull 	for(i=nllist; i>0; --i)
206 84b1cb73 2003-09-30 devnull 		llist[i]=llist[i-1];
207 84b1cb73 2003-09-30 devnull 	llist[0]=l;
208 84b1cb73 2003-09-30 devnull 	nllist++;
209 84b1cb73 2003-09-30 devnull }
210 84b1cb73 2003-09-30 devnull 
211 84b1cb73 2003-09-30 devnull void
212 84b1cb73 2003-09-30 devnull lldelete(Flayer *l)
213 84b1cb73 2003-09-30 devnull {
214 84b1cb73 2003-09-30 devnull 	int i;
215 84b1cb73 2003-09-30 devnull 
216 84b1cb73 2003-09-30 devnull 	for(i=0; i<nllist; i++)
217 84b1cb73 2003-09-30 devnull 		if(llist[i]==l){
218 84b1cb73 2003-09-30 devnull 			--nllist;
219 84b1cb73 2003-09-30 devnull 			for(; i<nllist; i++)
220 84b1cb73 2003-09-30 devnull 				llist[i] = llist[i+1];
221 84b1cb73 2003-09-30 devnull 			return;
222 84b1cb73 2003-09-30 devnull 		}
223 84b1cb73 2003-09-30 devnull 	panic("lldelete");
224 84b1cb73 2003-09-30 devnull }
225 84b1cb73 2003-09-30 devnull 
226 84b1cb73 2003-09-30 devnull void
227 84b1cb73 2003-09-30 devnull flinsert(Flayer *l, Rune *sp, Rune *ep, long p0)
228 84b1cb73 2003-09-30 devnull {
229 84b1cb73 2003-09-30 devnull 	if(flprepare(l)){
230 84b1cb73 2003-09-30 devnull 		frinsert(&l->f, sp, ep, p0-l->origin);
231 84b1cb73 2003-09-30 devnull 		scrdraw(l, scrtotal(l));
232 84b1cb73 2003-09-30 devnull 		if(l->visible==Some)
233 84b1cb73 2003-09-30 devnull 			flrefresh(l, l->entire, 0);
234 84b1cb73 2003-09-30 devnull 	}
235 84b1cb73 2003-09-30 devnull }
236 84b1cb73 2003-09-30 devnull 
237 84b1cb73 2003-09-30 devnull void
238 84b1cb73 2003-09-30 devnull fldelete(Flayer *l, long p0, long p1)
239 84b1cb73 2003-09-30 devnull {
240 84b1cb73 2003-09-30 devnull 	if(flprepare(l)){
241 84b1cb73 2003-09-30 devnull 		p0 -= l->origin;
242 84b1cb73 2003-09-30 devnull 		if(p0 < 0)
243 84b1cb73 2003-09-30 devnull 			p0 = 0;
244 84b1cb73 2003-09-30 devnull 		p1 -= l->origin;
245 84b1cb73 2003-09-30 devnull 		if(p1<0)
246 84b1cb73 2003-09-30 devnull 			p1 = 0;
247 84b1cb73 2003-09-30 devnull 		frdelete(&l->f, p0, p1);
248 84b1cb73 2003-09-30 devnull 		scrdraw(l, scrtotal(l));
249 84b1cb73 2003-09-30 devnull 		if(l->visible==Some)
250 84b1cb73 2003-09-30 devnull 			flrefresh(l, l->entire, 0);
251 84b1cb73 2003-09-30 devnull 	}
252 84b1cb73 2003-09-30 devnull }
253 84b1cb73 2003-09-30 devnull 
254 84b1cb73 2003-09-30 devnull int
255 84b1cb73 2003-09-30 devnull flselect(Flayer *l)
256 84b1cb73 2003-09-30 devnull {
257 17ab31aa 2005-01-27 devnull 	int ret;
258 84b1cb73 2003-09-30 devnull 	if(l->visible!=All)
259 84b1cb73 2003-09-30 devnull 		flupfront(l);
260 84b1cb73 2003-09-30 devnull 	frselect(&l->f, mousectl);
261 17ab31aa 2005-01-27 devnull 	ret = 0;
262 84b1cb73 2003-09-30 devnull 	if(l->f.p0==l->f.p1){
263 84b1cb73 2003-09-30 devnull 		if(mousep->msec-l->click<Clicktime && l->f.p0+l->origin==l->p0){
264 84b1cb73 2003-09-30 devnull 			ret = 1;
265 84b1cb73 2003-09-30 devnull 			l->click = 0;
266 84b1cb73 2003-09-30 devnull 		}else
267 84b1cb73 2003-09-30 devnull 			l->click = mousep->msec;
268 84b1cb73 2003-09-30 devnull 	}else
269 84b1cb73 2003-09-30 devnull 		l->click = 0;
270 84b1cb73 2003-09-30 devnull 	l->p0 = l->f.p0+l->origin, l->p1 = l->f.p1+l->origin;
271 84b1cb73 2003-09-30 devnull 	return ret;
272 84b1cb73 2003-09-30 devnull }
273 84b1cb73 2003-09-30 devnull 
274 84b1cb73 2003-09-30 devnull void
275 84b1cb73 2003-09-30 devnull flsetselect(Flayer *l, long p0, long p1)
276 84b1cb73 2003-09-30 devnull {
277 84b1cb73 2003-09-30 devnull 	ulong fp0, fp1;
278 7a353351 2007-05-10 devnull 	int ticked;
279 84b1cb73 2003-09-30 devnull 
280 84b1cb73 2003-09-30 devnull 	l->click = 0;
281 84b1cb73 2003-09-30 devnull 	if(l->visible==None || !flprepare(l)){
282 84b1cb73 2003-09-30 devnull 		l->p0 = p0, l->p1 = p1;
283 84b1cb73 2003-09-30 devnull 		return;
284 84b1cb73 2003-09-30 devnull 	}
285 84b1cb73 2003-09-30 devnull 	l->p0 = p0, l->p1 = p1;
286 7a353351 2007-05-10 devnull 	flfp0p1(l, &fp0, &fp1, &ticked);
287 7a353351 2007-05-10 devnull 	if(fp0==l->f.p0 && fp1==l->f.p1){
288 7a353351 2007-05-10 devnull 		if(l->f.ticked != ticked)
289 af4c2786 2007-05-10 devnull 			frtick(&l->f, frptofchar(&l->f, fp0), ticked);
290 84b1cb73 2003-09-30 devnull 		return;
291 7a353351 2007-05-10 devnull 	}
292 84b1cb73 2003-09-30 devnull 
293 84b1cb73 2003-09-30 devnull 	if(fp1<=l->f.p0 || fp0>=l->f.p1 || l->f.p0==l->f.p1 || fp0==fp1){
294 84b1cb73 2003-09-30 devnull 		/* no overlap or trivial repainting */
295 84b1cb73 2003-09-30 devnull 		frdrawsel(&l->f, frptofchar(&l->f, l->f.p0), l->f.p0, l->f.p1, 0);
296 af4c2786 2007-05-10 devnull 		if(fp0 != fp1 || ticked)
297 af4c2786 2007-05-10 devnull 			frdrawsel(&l->f, frptofchar(&l->f, fp0), fp0, fp1, 1);
298 84b1cb73 2003-09-30 devnull 		goto Refresh;
299 84b1cb73 2003-09-30 devnull 	}
300 84b1cb73 2003-09-30 devnull 	/* the current selection and the desired selection overlap and are both non-empty */
301 84b1cb73 2003-09-30 devnull 	if(fp0 < l->f.p0){
302 84b1cb73 2003-09-30 devnull 		/* extend selection backwards */
303 84b1cb73 2003-09-30 devnull 		frdrawsel(&l->f, frptofchar(&l->f, fp0), fp0, l->f.p0, 1);
304 84b1cb73 2003-09-30 devnull 	}else if(fp0 > l->f.p0){
305 84b1cb73 2003-09-30 devnull 		/* trim first part of selection */
306 84b1cb73 2003-09-30 devnull 		frdrawsel(&l->f, frptofchar(&l->f, l->f.p0), l->f.p0, fp0, 0);
307 84b1cb73 2003-09-30 devnull 	}
308 84b1cb73 2003-09-30 devnull 	if(fp1 > l->f.p1){
309 84b1cb73 2003-09-30 devnull 		/* extend selection forwards */
310 84b1cb73 2003-09-30 devnull 		frdrawsel(&l->f, frptofchar(&l->f, l->f.p1), l->f.p1, fp1, 1);
311 84b1cb73 2003-09-30 devnull 	}else if(fp1 < l->f.p1){
312 84b1cb73 2003-09-30 devnull 		/* trim last part of selection */
313 84b1cb73 2003-09-30 devnull 		frdrawsel(&l->f, frptofchar(&l->f, fp1), fp1, l->f.p1, 0);
314 84b1cb73 2003-09-30 devnull 	}
315 84b1cb73 2003-09-30 devnull 
316 84b1cb73 2003-09-30 devnull     Refresh:
317 84b1cb73 2003-09-30 devnull 	l->f.p0 = fp0;
318 84b1cb73 2003-09-30 devnull 	l->f.p1 = fp1;
319 84b1cb73 2003-09-30 devnull 	if(l->visible==Some)
320 84b1cb73 2003-09-30 devnull 		flrefresh(l, l->entire, 0);
321 84b1cb73 2003-09-30 devnull }
322 84b1cb73 2003-09-30 devnull 
323 84b1cb73 2003-09-30 devnull void
324 7a353351 2007-05-10 devnull flfp0p1(Flayer *l, ulong *pp0, ulong *pp1, int *ticked)
325 84b1cb73 2003-09-30 devnull {
326 84b1cb73 2003-09-30 devnull 	long p0 = l->p0-l->origin, p1 = l->p1-l->origin;
327 84b1cb73 2003-09-30 devnull 
328 af4c2786 2007-05-10 devnull 	*ticked = p0 == p1;
329 7a353351 2007-05-10 devnull 	if(p0 < 0){
330 7a353351 2007-05-10 devnull 		*ticked = 0;
331 84b1cb73 2003-09-30 devnull 		p0 = 0;
332 7a353351 2007-05-10 devnull 	}
333 84b1cb73 2003-09-30 devnull 	if(p1 < 0)
334 84b1cb73 2003-09-30 devnull 		p1 = 0;
335 84b1cb73 2003-09-30 devnull 	if(p0 > l->f.nchars)
336 84b1cb73 2003-09-30 devnull 		p0 = l->f.nchars;
337 7a353351 2007-05-10 devnull 	if(p1 > l->f.nchars){
338 7a353351 2007-05-10 devnull 		*ticked = 0;
339 84b1cb73 2003-09-30 devnull 		p1 = l->f.nchars;
340 7a353351 2007-05-10 devnull 	}
341 84b1cb73 2003-09-30 devnull 	*pp0 = p0;
342 84b1cb73 2003-09-30 devnull 	*pp1 = p1;
343 84b1cb73 2003-09-30 devnull }
344 84b1cb73 2003-09-30 devnull 
345 84b1cb73 2003-09-30 devnull Rectangle
346 84b1cb73 2003-09-30 devnull rscale(Rectangle r, Point old, Point new)
347 84b1cb73 2003-09-30 devnull {
348 84b1cb73 2003-09-30 devnull 	r.min.x = r.min.x*new.x/old.x;
349 84b1cb73 2003-09-30 devnull 	r.min.y = r.min.y*new.y/old.y;
350 84b1cb73 2003-09-30 devnull 	r.max.x = r.max.x*new.x/old.x;
351 84b1cb73 2003-09-30 devnull 	r.max.y = r.max.y*new.y/old.y;
352 84b1cb73 2003-09-30 devnull 	return r;
353 84b1cb73 2003-09-30 devnull }
354 84b1cb73 2003-09-30 devnull 
355 84b1cb73 2003-09-30 devnull void
356 84b1cb73 2003-09-30 devnull flresize(Rectangle dr)
357 84b1cb73 2003-09-30 devnull {
358 84b1cb73 2003-09-30 devnull 	int i;
359 84b1cb73 2003-09-30 devnull 	Flayer *l;
360 84b1cb73 2003-09-30 devnull 	Frame *f;
361 84b1cb73 2003-09-30 devnull 	Rectangle r, olDrect;
362 84b1cb73 2003-09-30 devnull 	int move;
363 84b1cb73 2003-09-30 devnull 
364 84b1cb73 2003-09-30 devnull 	olDrect = lDrect;
365 84b1cb73 2003-09-30 devnull 	lDrect = dr;
366 84b1cb73 2003-09-30 devnull 	move = 0;
367 84b1cb73 2003-09-30 devnull 	/* no moving on rio; must repaint */
368 84b1cb73 2003-09-30 devnull 	if(0 && Dx(dr)==Dx(olDrect) && Dy(dr)==Dy(olDrect))
369 84b1cb73 2003-09-30 devnull 		move = 1;
370 84b1cb73 2003-09-30 devnull 	else
371 84b1cb73 2003-09-30 devnull 		draw(screen, lDrect, display->white, nil, ZP);
372 84b1cb73 2003-09-30 devnull 	for(i=0; i<nllist; i++){
373 84b1cb73 2003-09-30 devnull 		l = llist[i];
374 84b1cb73 2003-09-30 devnull 		l->lastsr = ZR;
375 84b1cb73 2003-09-30 devnull 		f = &l->f;
376 84b1cb73 2003-09-30 devnull 		if(move)
377 84b1cb73 2003-09-30 devnull 			r = rectaddpt(rectsubpt(l->entire, olDrect.min), dr.min);
378 84b1cb73 2003-09-30 devnull 		else{
379 84b1cb73 2003-09-30 devnull 			r = rectaddpt(rscale(rectsubpt(l->entire, olDrect.min),
380 84b1cb73 2003-09-30 devnull 				subpt(olDrect.max, olDrect.min),
381 84b1cb73 2003-09-30 devnull 				subpt(dr.max, dr.min)), dr.min);
382 84b1cb73 2003-09-30 devnull 			if(l->visible==Some && f->b){
383 84b1cb73 2003-09-30 devnull 				freeimage(f->b);
384 84b1cb73 2003-09-30 devnull 				frclear(f, 0);
385 84b1cb73 2003-09-30 devnull 			}
386 84b1cb73 2003-09-30 devnull 			f->b = 0;
387 84b1cb73 2003-09-30 devnull 			if(l->visible!=None)
388 84b1cb73 2003-09-30 devnull 				frclear(f, 0);
389 84b1cb73 2003-09-30 devnull 		}
390 84b1cb73 2003-09-30 devnull 		if(!rectclip(&r, dr))
391 84b1cb73 2003-09-30 devnull 			panic("flresize");
392 84b1cb73 2003-09-30 devnull 		if(r.max.x-r.min.x<100)
393 84b1cb73 2003-09-30 devnull 			r.min.x = dr.min.x;
394 84b1cb73 2003-09-30 devnull 		if(r.max.x-r.min.x<100)
395 84b1cb73 2003-09-30 devnull 			r.max.x = dr.max.x;
396 c2822499 2012-11-26 rsc 		if(r.max.y-r.min.y<2*FLMARGIN(l)+f->font->height)
397 84b1cb73 2003-09-30 devnull 			r.min.y = dr.min.y;
398 c2822499 2012-11-26 rsc 		if(r.max.y-r.min.y<2*FLMARGIN(l)+f->font->height)
399 84b1cb73 2003-09-30 devnull 			r.max.y = dr.max.y;
400 84b1cb73 2003-09-30 devnull 		if(!move)
401 84b1cb73 2003-09-30 devnull 			l->visible = None;
402 c2822499 2012-11-26 rsc 		frsetrects(f, insetrect(flrect(l, r), FLMARGIN(l)), f->b);
403 84b1cb73 2003-09-30 devnull 		if(!move && f->b)
404 84b1cb73 2003-09-30 devnull 			scrdraw(l, scrtotal(l));
405 84b1cb73 2003-09-30 devnull 	}
406 84b1cb73 2003-09-30 devnull 	newvisibilities(1);
407 84b1cb73 2003-09-30 devnull }
408 84b1cb73 2003-09-30 devnull 
409 84b1cb73 2003-09-30 devnull int
410 84b1cb73 2003-09-30 devnull flprepare(Flayer *l)
411 84b1cb73 2003-09-30 devnull {
412 84b1cb73 2003-09-30 devnull 	Frame *f;
413 84b1cb73 2003-09-30 devnull 	ulong n;
414 84b1cb73 2003-09-30 devnull 	Rune *r;
415 7a353351 2007-05-10 devnull 	int ticked;
416 84b1cb73 2003-09-30 devnull 
417 84b1cb73 2003-09-30 devnull 	if(l->visible == None)
418 84b1cb73 2003-09-30 devnull 		return 0;
419 84b1cb73 2003-09-30 devnull 	f = &l->f;
420 84b1cb73 2003-09-30 devnull 	if(f->b == 0){
421 84b1cb73 2003-09-30 devnull 		if(l->visible == All)
422 84b1cb73 2003-09-30 devnull 			f->b = screen;
423 84b1cb73 2003-09-30 devnull 		else if((f->b = allocimage(display, l->entire, screen->chan, 0, 0))==0)
424 84b1cb73 2003-09-30 devnull 			return 0;
425 84b1cb73 2003-09-30 devnull 		draw(f->b, l->entire, f->cols[BACK], nil, ZP);
426 c2822499 2012-11-26 rsc 		border(f->b, l->entire, l==llist[0]? FLMARGIN(l) : 1, f->cols[BORD], ZP);
427 84b1cb73 2003-09-30 devnull 		n = f->nchars;
428 84b1cb73 2003-09-30 devnull 		frinit(f, f->entire, f->font, f->b, 0);
429 84b1cb73 2003-09-30 devnull 		f->maxtab = maxtab*stringwidth(f->font, "0");
430 84b1cb73 2003-09-30 devnull 		r = (*l->textfn)(l, n, &n);
431 84b1cb73 2003-09-30 devnull 		frinsert(f, r, r+n, (ulong)0);
432 84b1cb73 2003-09-30 devnull 		frdrawsel(f, frptofchar(f, f->p0), f->p0, f->p1, 0);
433 7a353351 2007-05-10 devnull 		flfp0p1(l, &f->p0, &f->p1, &ticked);
434 af4c2786 2007-05-10 devnull 		if(f->p0 != f->p1 || ticked)
435 af4c2786 2007-05-10 devnull 			frdrawsel(f, frptofchar(f, f->p0), f->p0, f->p1, 1);
436 84b1cb73 2003-09-30 devnull 		l->lastsr = ZR;
437 84b1cb73 2003-09-30 devnull 		scrdraw(l, scrtotal(l));
438 84b1cb73 2003-09-30 devnull 	}
439 84b1cb73 2003-09-30 devnull 	return 1;
440 84b1cb73 2003-09-30 devnull }
441 84b1cb73 2003-09-30 devnull 
442 84b1cb73 2003-09-30 devnull static	int	somevis, someinvis, justvis;
443 84b1cb73 2003-09-30 devnull 
444 84b1cb73 2003-09-30 devnull Vis
445 84b1cb73 2003-09-30 devnull visibility(Flayer *l)
446 84b1cb73 2003-09-30 devnull {
447 84b1cb73 2003-09-30 devnull 	somevis = someinvis = 0;
448 84b1cb73 2003-09-30 devnull 	justvis = 1;
449 84b1cb73 2003-09-30 devnull 	flrefresh(l, l->entire, 0);
450 84b1cb73 2003-09-30 devnull 	justvis = 0;
451 84b1cb73 2003-09-30 devnull 	if(somevis==0)
452 84b1cb73 2003-09-30 devnull 		return None;
453 84b1cb73 2003-09-30 devnull 	if(someinvis==0)
454 84b1cb73 2003-09-30 devnull 		return All;
455 84b1cb73 2003-09-30 devnull 	return Some;
456 84b1cb73 2003-09-30 devnull }
457 84b1cb73 2003-09-30 devnull 
458 84b1cb73 2003-09-30 devnull void
459 84b1cb73 2003-09-30 devnull flrefresh(Flayer *l, Rectangle r, int i)
460 84b1cb73 2003-09-30 devnull {
461 84b1cb73 2003-09-30 devnull 	Flayer *t;
462 84b1cb73 2003-09-30 devnull 	Rectangle s;
463 84b1cb73 2003-09-30 devnull 
464 84b1cb73 2003-09-30 devnull     Top:
465 84b1cb73 2003-09-30 devnull 	if((t=llist[i++]) == l){
466 84b1cb73 2003-09-30 devnull 		if(!justvis)
467 84b1cb73 2003-09-30 devnull 			draw(screen, r, l->f.b, nil, r.min);
468 84b1cb73 2003-09-30 devnull 		somevis = 1;
469 84b1cb73 2003-09-30 devnull 	}else{
470 84b1cb73 2003-09-30 devnull 		if(!rectXrect(t->entire, r))
471 84b1cb73 2003-09-30 devnull 			goto Top;	/* avoid stacking unnecessarily */
472 84b1cb73 2003-09-30 devnull 		if(t->entire.min.x>r.min.x){
473 84b1cb73 2003-09-30 devnull 			s = r;
474 84b1cb73 2003-09-30 devnull 			s.max.x = t->entire.min.x;
475 84b1cb73 2003-09-30 devnull 			flrefresh(l, s, i);
476 84b1cb73 2003-09-30 devnull 			r.min.x = t->entire.min.x;
477 84b1cb73 2003-09-30 devnull 		}
478 84b1cb73 2003-09-30 devnull 		if(t->entire.min.y>r.min.y){
479 84b1cb73 2003-09-30 devnull 			s = r;
480 84b1cb73 2003-09-30 devnull 			s.max.y = t->entire.min.y;
481 84b1cb73 2003-09-30 devnull 			flrefresh(l, s, i);
482 84b1cb73 2003-09-30 devnull 			r.min.y = t->entire.min.y;
483 84b1cb73 2003-09-30 devnull 		}
484 84b1cb73 2003-09-30 devnull 		if(t->entire.max.x<r.max.x){
485 84b1cb73 2003-09-30 devnull 			s = r;
486 84b1cb73 2003-09-30 devnull 			s.min.x = t->entire.max.x;
487 84b1cb73 2003-09-30 devnull 			flrefresh(l, s, i);
488 84b1cb73 2003-09-30 devnull 			r.max.x = t->entire.max.x;
489 84b1cb73 2003-09-30 devnull 		}
490 84b1cb73 2003-09-30 devnull 		if(t->entire.max.y<r.max.y){
491 84b1cb73 2003-09-30 devnull 			s = r;
492 84b1cb73 2003-09-30 devnull 			s.min.y = t->entire.max.y;
493 84b1cb73 2003-09-30 devnull 			flrefresh(l, s, i);
494 84b1cb73 2003-09-30 devnull 			r.max.y = t->entire.max.y;
495 84b1cb73 2003-09-30 devnull 		}
496 84b1cb73 2003-09-30 devnull 		/* remaining piece of r is blocked by t; forget about it */
497 84b1cb73 2003-09-30 devnull 		someinvis = 1;
498 84b1cb73 2003-09-30 devnull 	}
499 84b1cb73 2003-09-30 devnull }
500 c2822499 2012-11-26 rsc 
501 c2822499 2012-11-26 rsc int
502 c2822499 2012-11-26 rsc flscale(Flayer *l, int n)
503 c2822499 2012-11-26 rsc {
504 c2822499 2012-11-26 rsc 	if(l == nil)
505 c2822499 2012-11-26 rsc 		return n;
506 c2822499 2012-11-26 rsc 	return scalesize(l->f.display, n);
507 c2822499 2012-11-26 rsc }