~mdw / ssr / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
Initial revision
[ssr] / StraySrc / Glass / !Glass / c / editWin
1 /*
2 * editWindow.c
3 *
4 * Edit window dialogue box
5 *
6 * © 1994-1998 Straylight
7 */
8
9 /*----- Licensing note ----------------------------------------------------*
10 *
11 * This file is part of Straylight's Glass.
12 *
13 * Glass is free software; you can redistribute it and/or modify
14 * it under the terms of the GNU General Public License as published by
15 * the Free Software Foundation; either version 2, or (at your option)
16 * any later version.
17 *
18 * Glass is distributed in the hope that it will be useful,
19 * but WITHOUT ANY WARRANTY; without even the implied warranty of
20 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21 * GNU General Public License for more details.
22 *
23 * You should have received a copy of the GNU General Public License
24 * along with Glass. If not, write to the Free Software Foundation,
25 * 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
26 */
27
28 /*----- Header files ------------------------------------------------------*/
29
30 /*
31 * ANSI standard headers
32 */
33
34 #include <stdio.h>
35 #include <stdlib.h>
36 #include <string.h>
37
38 /*
39 * Steel headers
40 */
41
42 #define _STDAPP
43 #define _LOWLVL
44 #include "steel/Steel.h"
45
46 #include "steel/buttons.h"
47 #include "steel/fontMenu.h"
48 #include "steel/akbd.h"
49 #include "steel/buffer.h"
50 #include "steel/font.h"
51
52 /*
53 * Glass headers
54 */
55
56 #include "glass.h"
57 #include "tfile.h"
58 #include "window.h"
59 #include "intMsgs.h"
60 #include "editWin.h"
61 #include "colSelect.h"
62 #include "indir.h"
63 #include "gPrefs.h"
64
65 #include "gStruct.h"
66 #include "gMenus.h"
67 #include "gIcons.h"
68
69 /*----- Static variables --------------------------------------------------*/
70
71 static char *editWindow__panels[]=
72 {
73 "windChars",
74 "windGadgets",
75 "windButton",
76 "iconData",
77 "iconAppear",
78 "windColours",
79 "windSize",
80 };
81
82 #define editWindow__ICAPPHEIGHT -504
83
84 /*----- New RISC OS 3 window flags ----------------------------------------*/
85
86 #define wimp_WONSCREEN (1<<13)
87 #define wimp_WRUBBERH (1<<14)
88 #define wimp_WRUBBERV (1<<15)
89
90 /*----- Support routines --------------------------------------------------*/
91
92 #define max2(a,b) ((a)>(b) ? (a) : (b))
93 #define min2(a,b) ((a)<(b) ? (a) : (b))
94
95 /*
96 * void editWindow__checkExtents(glass_editWindow *ed,BOOL redraw,
97 * BOOL read)
98 *
99 * Use
100 * Ensures that the window extents are correctly set according to window
101 * size etc.
102 *
103 * Parameters
104 * glass_editWindow *ed == the edit
105 * BOOL rbl == whether to redraw the bottom left setting
106 * BOOL rtr == whether to redraw the top right setting
107 * BOOL read == whether to read settings from dbox
108 */
109
110 static void editWindow__checkExtents(glass_editWindow *ed,BOOL rbl,
111 BOOL rtr,BOOL read)
112 {
113 BOOL bl=rbl;
114 BOOL tr=rtr;
115 int x,y;
116 if (ed->e.panel==glass_EWWORKAREA && read)
117 {
118 dbox_scanfield(ed->e.pd,
119 glass_EWSBOTTOMLEFT,
120 "%d,%d",
121 &ed->wdef.ex.x0,
122 &ed->wdef.ex.y0);
123 dbox_scanfield(ed->e.pd,
124 glass_EWSTOPRIGHT,
125 "%d,%d",
126 &ed->wdef.ex.x1,
127 &ed->wdef.ex.y1);
128 }
129 if (ed->e.panel==glass_EWWORKAREA)
130 {
131 dbox_scanfield(ed->e.pd,glass_EWSMINWIDTH,"%d",&x);
132 dbox_scanfield(ed->e.pd,glass_EWSMINHEIGHT,"%d",&y);
133 }
134 else
135 {
136 x=ed->wdef.minsize & 0xffff;
137 y=(ed->wdef.minsize>>16) & 0xffff;
138 }
139
140 if (gPrefs_current()->mVisInWork)
141 {
142 if (ed->wdef.ex.x0>ed->w->def->desc.w.scx)
143 {
144 ed->wdef.ex.x0=ed->w->def->desc.w.scx;
145 bl=TRUE;
146 }
147 if (ed->wdef.ex.y0>ed->w->def->desc.w.scy+
148 ed->w->def->desc.w.box.y0-
149 ed->w->def->desc.w.box.y1)
150 {
151 ed->wdef.ex.y0=ed->w->def->desc.w.scy+
152 ed->w->def->desc.w.box.y0-
153 ed->w->def->desc.w.box.y1;
154 bl=TRUE;
155 }
156 if (ed->wdef.ex.x1<ed->w->def->desc.w.scx+
157 ed->w->def->desc.w.box.x1-
158 ed->w->def->desc.w.box.x0)
159 {
160 ed->wdef.ex.x1=ed->w->def->desc.w.scx+
161 ed->w->def->desc.w.box.x1-
162 ed->w->def->desc.w.box.x0;
163 tr=TRUE;
164 }
165 if (ed->wdef.ex.y1<ed->w->def->desc.w.scy)
166 {
167 ed->wdef.ex.y1=ed->w->def->desc.w.scy;
168 tr=TRUE;
169 }
170 }
171 if (bl && ed->e.panel==glass_EWWORKAREA)
172 {
173 dbox_setfield(ed->e.pd,
174 glass_EWSBOTTOMLEFT,
175 "%i,%i",
176 ed->wdef.ex.x0,
177 ed->wdef.ex.y0);
178 }
179 if (tr && ed->e.panel==glass_EWWORKAREA)
180 {
181 dbox_setfield(ed->e.pd,
182 glass_EWSTOPRIGHT,
183 "%i,%i",
184 ed->wdef.ex.x1,
185 ed->wdef.ex.y1);
186 }
187 bl=rbl;
188 tr=rtr;
189 if (gPrefs_current()->mVisInWork)
190 {
191 if (x>ed->w->def->desc.w.box.x1-ed->w->def->desc.w.box.x0)
192 {
193 x=ed->w->def->desc.w.box.x1-ed->w->def->desc.w.box.x0;
194 bl=TRUE;
195 }
196 if (y>ed->w->def->desc.w.box.y1-ed->w->def->desc.w.box.y0)
197 {
198 y=ed->w->def->desc.w.box.y1-ed->w->def->desc.w.box.y0;
199 tr=TRUE;
200 }
201 }
202 else
203 {
204 if (x>ed->wdef.ex.x1-ed->wdef.ex.x0)
205 {
206 x=ed->wdef.ex.x1-ed->wdef.ex.x0;
207 bl=TRUE;
208 }
209 if (y>ed->wdef.ex.y1-ed->wdef.ex.y0)
210 {
211 y=ed->wdef.ex.y1-ed->wdef.ex.y0;
212 tr=TRUE;
213 }
214 }
215 ed->wdef.minsize=x+(y<<16);
216 if (bl && ed->e.panel==glass_EWWORKAREA)
217 dbox_setfield(ed->e.pd,glass_EWSMINWIDTH,"%i",x);
218 if (tr && ed->e.panel==glass_EWWORKAREA)
219 dbox_setfield(ed->e.pd,glass_EWSMINHEIGHT,"%i",y);
220 }
221
222 /*
223 * void editWindow__setupPanel(glass_editWindow *ed)
224 *
225 * Use
226 * Sets up a panel from the icon description given.
227 *
228 * Parameters
229 * glass_editWindow *ed == the edit to handle.
230 */
231
232 static void editWindow__setupPanel(glass_editWindow *ed)
233 {
234 char *buf=buffer_find();
235
236 switch (ed->e.panel)
237 {
238 case glass_EWCHARS:
239 dbox_selecticon(ed->e.pd,
240 glass_EWCMOVE,
241 !!(ed->wdef.flags & wimp_WMOVEABLE));
242 dbox_selecticon(ed->e.pd,
243 glass_EWCREDRAW,
244 !!(ed->wdef.flags & wimp_REDRAW_OK));
245 dbox_selecticon(ed->e.pd,
246 glass_EWCPANE,
247 !!(ed->wdef.flags & wimp_WPANE));
248 dbox_selecticon(ed->e.pd,
249 glass_EWCNOBOUNDS,
250 !!(ed->wdef.flags & wimp_WTRESPASS));
251 dbox_selecticon(ed->e.pd,
252 glass_EWCONSCREEN,
253 !!(ed->wdef.flags & wimp_WONSCREEN));
254 if (ed->wdef.flags & wimp_WSCROLL_R1)
255 {
256 dbox_selecticon(ed->e.pd,glass_EWCSCRLREP,TRUE);
257 dbox_selecticon(ed->e.pd,glass_EWCSCRLDEB,FALSE);
258 dbox_selecticon(ed->e.pd,glass_EWCSCRLQ,FALSE);
259 }
260 else if (ed->wdef.flags & wimp_SCROLL_R2)
261 {
262 dbox_selecticon(ed->e.pd,glass_EWCSCRLREP,FALSE);
263 dbox_selecticon(ed->e.pd,glass_EWCSCRLDEB,TRUE);
264 dbox_selecticon(ed->e.pd,glass_EWCSCRLQ,FALSE);
265 }
266 else
267 {
268 dbox_selecticon(ed->e.pd,glass_EWCSCRLREP,FALSE);
269 dbox_selecticon(ed->e.pd,glass_EWCSCRLDEB,FALSE);
270 dbox_selecticon(ed->e.pd,glass_EWCSCRLQ,TRUE);
271 }
272 dbox_selecticon(ed->e.pd,
273 glass_EWCGCOL,
274 !!(ed->wdef.flags & wimp_REAL_COLOURS));
275 dbox_selecticon(ed->e.pd,
276 glass_EWCBACK,
277 !!(ed->wdef.flags & wimp_BACK_WINDOW));
278 dbox_selecticon(ed->e.pd,
279 glass_EWCHOTKEYS,
280 !!(ed->wdef.flags & wimp_HOT_KEYS));
281 break;
282 case glass_EWGADGETS:
283 if (tst(ed->wdef.flags,31))
284 {
285 dbox_shadeicon(ed->e.pd,glass_EWGOTITLE,TRUE);
286 dbox_shadeicon(ed->e.pd,glass_EWGOCLOSEBACK,TRUE);
287 dbox_shadeicon(ed->e.pd,glass_EWGOHORIZ,TRUE);
288 dbox_shadeicon(ed->e.pd,glass_EWGOVERT,TRUE);
289 dbox_shadeicon(ed->e.pd,glass_EWGNTITLE,FALSE);
290 dbox_shadeicon(ed->e.pd,glass_EWGNHORIZ,FALSE);
291 dbox_shadeicon(ed->e.pd,glass_EWGNVERT,FALSE);
292 dbox_selecticon(ed->e.pd,glass_EWGNEW,TRUE);
293 dbox_selecticon(ed->e.pd,glass_EWGOLD,FALSE);
294 dbox_selecticon(ed->e.pd,glass_EWGOTITLE,tst(ed->wdef.flags,26));
295 dbox_selecticon(ed->e.pd,
296 glass_EWGOCLOSEBACK,
297 tst(ed->wdef.flags,24) || tst(ed->wdef.flags,25));
298 dbox_selecticon(ed->e.pd,glass_EWGOHORIZ,tst(ed->wdef.flags,30));
299 dbox_selecticon(ed->e.pd,glass_EWGOVERT,tst(ed->wdef.flags,28));
300 dbox_selecticon(ed->e.pd,glass_EWGNTITLE,tst(ed->wdef.flags,26));
301 dbox_selecticon(ed->e.pd,glass_EWGNCLOSE,tst(ed->wdef.flags,25));
302 dbox_shadeicon(ed->e.pd,glass_EWGNCLOSE,!tst(ed->wdef.flags,26));
303 dbox_selecticon(ed->e.pd,glass_EWGNRESIZE,tst(ed->wdef.flags,29));
304 dbox_shadeicon(ed->e.pd,
305 glass_EWGNRESIZE,
306 !(tst(ed->wdef.flags,28) || tst(ed->wdef.flags,30)));
307 dbox_selecticon(ed->e.pd,glass_EWGNBACK,tst(ed->wdef.flags,24));
308 dbox_shadeicon(ed->e.pd,glass_EWGNBACK,!tst(ed->wdef.flags,26));
309 dbox_selecticon(ed->e.pd,glass_EWGNTOGGLE,tst(ed->wdef.flags,27));
310 dbox_shadeicon(ed->e.pd,
311 glass_EWGNTOGGLE,
312 !(tst(ed->wdef.flags,26) || tst(ed->wdef.flags,28)));
313 dbox_selecticon(ed->e.pd,glass_EWGNHORIZ,tst(ed->wdef.flags,30));
314 dbox_selecticon(ed->e.pd,glass_EWGNVERT,tst(ed->wdef.flags,28));
315 }
316 else
317 {
318 dbox_shadeicon(ed->e.pd,glass_EWGOTITLE,FALSE);
319 dbox_shadeicon(ed->e.pd,glass_EWGOHORIZ,FALSE);
320 dbox_shadeicon(ed->e.pd,glass_EWGOVERT,FALSE);
321 dbox_shadeicon(ed->e.pd,glass_EWGNTITLE,TRUE);
322 dbox_shadeicon(ed->e.pd,glass_EWGNCLOSE,TRUE);
323 dbox_shadeicon(ed->e.pd,glass_EWGNRESIZE,TRUE);
324 dbox_shadeicon(ed->e.pd,glass_EWGNBACK,TRUE);
325 dbox_shadeicon(ed->e.pd,glass_EWGNTOGGLE,TRUE);
326 dbox_shadeicon(ed->e.pd,glass_EWGNHORIZ,TRUE);
327 dbox_shadeicon(ed->e.pd,glass_EWGNVERT,TRUE);
328 dbox_selecticon(ed->e.pd,glass_EWGNEW,FALSE);
329 dbox_selecticon(ed->e.pd,glass_EWGOLD,TRUE);
330 dbox_selecticon(ed->e.pd,glass_EWGOTITLE,tst(ed->wdef.flags,0));
331 dbox_selecticon(ed->e.pd,
332 glass_EWGOCLOSEBACK,
333 !tst(ed->wdef.flags,7));
334 dbox_shadeicon(ed->e.pd,
335 glass_EWGOCLOSEBACK,
336 !tst(ed->wdef.flags,0));
337 dbox_selecticon(ed->e.pd,glass_EWGOHORIZ,tst(ed->wdef.flags,3));
338 dbox_selecticon(ed->e.pd,glass_EWGOVERT,tst(ed->wdef.flags,2));
339 dbox_selecticon(ed->e.pd,glass_EWGNTITLE,tst(ed->wdef.flags,0));
340 dbox_selecticon(ed->e.pd,glass_EWGNCLOSE,!tst(ed->wdef.flags,7));
341 dbox_selecticon(ed->e.pd,
342 glass_EWGNRESIZE,
343 tst(ed->wdef.flags,2) || tst(ed->wdef.flags,3));
344 dbox_selecticon(ed->e.pd,glass_EWGNBACK,!tst(ed->wdef.flags,7));
345 dbox_selecticon(ed->e.pd,glass_EWGNTOGGLE,tst(ed->wdef.flags,2));
346 dbox_selecticon(ed->e.pd,glass_EWGNHORIZ,tst(ed->wdef.flags,3));
347 dbox_selecticon(ed->e.pd,glass_EWGNVERT,tst(ed->wdef.flags,2));
348 }
349 break;
350 case glass_EWBTYPE:
351 sprintf(buf,"ewBTYPE%i",(ed->wdef.workflags>>12) & 0x0f);
352 dbox_setfield(ed->e.pd,glass_EWBBTDISP,"%s",msgs_lookup(buf));
353 break;
354 case glass_EWTDATA:
355 dbox_setfield(ed->e.pd,glass_EIDVALSTRING,"%s",ed->valid);
356 dbox_setfield(ed->e.pd,glass_EIDDATA,"%s",ed->data);
357 if (!(ed->wdef.titleflags & 3))
358 {
359 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,TRUE);
360 dbox_shadeicon(ed->e.pd,glass_EIDDATA,TRUE);
361 dbox_selecticon(ed->e.pd,glass_EIDINDIR,FALSE);
362 dbox_selecticon(ed->e.pd,glass_EIDVALID,FALSE);
363 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,TRUE);
364 dbox_shadeicon(ed->e.pd,glass_EIDVALID,TRUE);
365 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,TRUE);
366 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,TRUE);
367 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,TRUE);
368 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,TRUE);
369 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,TRUE);
370 dbox_setfield(ed->e.pd,glass_EIDINDSIZE,"%i",12);
371 }
372 else if (ed->wdef.titleflags & wimp_INDIRECT)
373 {
374 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,FALSE);
375 dbox_shadeicon(ed->e.pd,glass_EIDDATA,FALSE);
376 dbox_selecticon(ed->e.pd,glass_EIDINDIR,TRUE);
377 dbox_selecticon(ed->e.pd,glass_EIDVALID,ed->hasValid);
378 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,!ed->hasValid);
379 dbox_shadeicon(ed->e.pd,
380 glass_EIDVALID,
381 !(ed->wdef.titleflags&wimp_ITEXT));
382 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,FALSE);
383 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,FALSE);
384 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,FALSE);
385 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,FALSE);
386 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,FALSE);
387 dbox_setfield(ed->e.pd,glass_EIDINDSIZE,"%i",ed->indLen);
388 }
389 else
390 {
391 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,FALSE);
392 dbox_shadeicon(ed->e.pd,glass_EIDDATA,FALSE);
393 dbox_selecticon(ed->e.pd,glass_EIDINDIR,FALSE);
394 dbox_selecticon(ed->e.pd,glass_EIDVALID,FALSE);
395 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,TRUE);
396 dbox_shadeicon(ed->e.pd,glass_EIDVALID,TRUE);
397 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,TRUE);
398 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,TRUE);
399 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,TRUE);
400 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,TRUE);
401 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,TRUE);
402 dbox_setfield(ed->e.pd,glass_EIDINDSIZE,"%i",12);
403 }
404 dbox_selecticon(ed->e.pd,
405 glass_EIDTEXT,
406 !!(ed->wdef.titleflags&wimp_ITEXT));
407 dbox_selecticon(ed->e.pd,
408 glass_EIDSPRITE,
409 !!(ed->wdef.titleflags&wimp_ISPRITE));
410 break;
411 case glass_EWTAPPEAR:
412 dbox_setfield(ed->e.pd,glass_EIAFONTNAME,"%.%s",ed->font);
413 dbox_setfield(ed->e.pd,glass_EIAFSIZEWRITE,"%i",ed->fontSize);
414 if (ed->wdef.titleflags & wimp_ITEXT)
415 {
416 if (ed->wdef.titleflags & wimp_IFONT)
417 {
418 dbox_selecticon(ed->e.pd,glass_EIAFONT,TRUE);
419 dbox_shadeicon(ed->e.pd,glass_EIAFONTNAME,FALSE);
420 dbox_shadeicon(ed->e.pd,glass_EIAFONTMENU,FALSE);
421 dbox_shadeicon(ed->e.pd,glass_EIAFONT,FALSE);
422 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEUP,FALSE);
423 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEDOWN,FALSE);
424 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEWRITE,FALSE);
425 }
426 else
427 {
428 dbox_selecticon(ed->e.pd,glass_EIAFONT,FALSE);
429 dbox_shadeicon(ed->e.pd,glass_EIAFONT,FALSE);
430 dbox_shadeicon(ed->e.pd,glass_EIAFONTNAME,TRUE);
431 dbox_shadeicon(ed->e.pd,glass_EIAFONTMENU,TRUE);
432 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEUP,TRUE);
433 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEDOWN,TRUE);
434 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEWRITE,TRUE);
435 }
436 }
437 else
438 {
439 dbox_selecticon(ed->e.pd,glass_EIAFONT,FALSE);
440 dbox_shadeicon(ed->e.pd,glass_EIAFONT,TRUE);
441 dbox_shadeicon(ed->e.pd,glass_EIAFONTNAME,TRUE);
442 dbox_shadeicon(ed->e.pd,glass_EIAFONTMENU,TRUE);
443 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEUP,TRUE);
444 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEDOWN,TRUE);
445 dbox_shadeicon(ed->e.pd,glass_EIAFSIZEWRITE,TRUE);
446 }
447 dbox_selecticon(ed->e.pd,
448 glass_EIAHCENTRE,
449 !!(ed->wdef.titleflags & wimp_IHCENTRE));
450 dbox_selecticon(ed->e.pd,
451 glass_EIAVCENTRE,
452 !!(ed->wdef.titleflags & wimp_IVCENTRE));
453 dbox_selecticon(ed->e.pd,
454 glass_EIARALIGN,
455 !!(ed->wdef.titleflags & wimp_IRJUST));
456 if (ed->wdef.titleflags & wimp_ISPRITE)
457 {
458 dbox_selecticon(ed->e.pd,
459 glass_EIAHALFSIZE,
460 !!(ed->wdef.titleflags & wimp_IHALVESPRITE));
461 dbox_shadeicon(ed->e.pd,glass_EIAHALFSIZE,FALSE);
462 }
463 else
464 {
465 dbox_selecticon(ed->e.pd,glass_EIAHALFSIZE,FALSE);
466 dbox_shadeicon(ed->e.pd,glass_EIAHALFSIZE,TRUE);
467 }
468 dbox_selecticon(ed->e.pd,glass_EIABORDER,FALSE);
469 dbox_selecticon(ed->e.pd,glass_EIAFILL,FALSE);
470 dbox_selecticon(ed->e.pd,glass_EIANEEDSHELP,FALSE);
471 dbox_shadeicon(ed->e.pd,glass_EIABORDER,TRUE);
472 dbox_shadeicon(ed->e.pd,glass_EIAFILL,TRUE);
473 dbox_shadeicon(ed->e.pd,glass_EIANEEDSHELP,TRUE);
474 /* The above aren't relevant to a window title */
475 break;
476 case glass_EWCOLOURS:
477 colSelect_setColourButton(ed->e.pd,
478 glass_EWCTBFORE,
479 ed->wdef.colours[0]);
480 colSelect_setColourButton(ed->e.pd,
481 glass_EWCTBBACK,
482 ed->wdef.colours[1]);
483 colSelect_setColourButton(ed->e.pd,
484 glass_EWCWAFORE,
485 ed->wdef.colours[2]);
486 colSelect_setColourButton(ed->e.pd,
487 glass_EWCWABACK,
488 ed->wdef.colours[3]);
489 colSelect_setColourButton(ed->e.pd,
490 glass_EWCSCFORE,
491 ed->wdef.colours[5]);
492 colSelect_setColourButton(ed->e.pd,
493 glass_EWCSCBACK,
494 ed->wdef.colours[4]);
495 colSelect_setColourButton(ed->e.pd,
496 glass_EWCHIGH,
497 ed->wdef.colours[6]);
498 break;
499 case glass_EWWORKAREA:
500 dbox_setfield(ed->e.pd,
501 glass_EWSMINWIDTH,
502 "%i",
503 ed->wdef.minsize & 0xffff);
504 dbox_setfield(ed->e.pd,
505 glass_EWSMINHEIGHT,
506 "%i",
507 (ed->wdef.minsize>>16) & 0xffff);
508 editWindow__checkExtents(ed,TRUE,TRUE,FALSE);
509 dbox_selecticon(ed->e.pd,
510 glass_EWSRUBBERH,
511 !!(ed->wdef.flags & wimp_WRUBBERH));
512 dbox_selecticon(ed->e.pd,
513 glass_EWSRUBBERV,
514 !!(ed->wdef.flags & wimp_WRUBBERV));
515 break;
516 }
517 }
518
519 /*
520 * void editWindow__closePanel(glass_editWindow *ed)
521 *
522 * Use
523 * Records the settings in a panel for future reference, for example when
524 * the panel is being replaced by a different one.
525 *
526 * Parameters
527 * glass_editWindow *ed == the edit box we're talking about
528 */
529
530 #define Q dbox_READSTATE
531
532 static void editWindow__closePanel(glass_editWindow *ed)
533 {
534 switch (ed->e.panel)
535 {
536 case glass_EWCHARS:
537 ed->wdef.flags&=~0x00003f72;
538 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCMOVE,Q)<<1;
539 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCREDRAW,Q)<<4;
540 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCPANE,Q)<<5;
541 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCNOBOUNDS,Q)<<6;
542 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCONSCREEN,Q)<<13;
543 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCSCRLREP,Q)<<8;
544 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCSCRLDEB,Q)<<9;
545 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCGCOL,Q)<<10;
546 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCBACK,Q)<<11;
547 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWCHOTKEYS,Q)<<12;
548 break;
549 case glass_EWGADGETS:
550 ed->wdef.flags&=~0xff00008d;
551 if (dbox_selecticon(ed->e.pd,glass_EWGOLD,Q))
552 {
553 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGOTITLE,Q)<<0;
554 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGOVERT,Q)<<2;
555 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGOHORIZ,Q)<<3;
556 ed->wdef.flags|=(!dbox_selecticon(ed->e.pd,
557 glass_EWGOCLOSEBACK,
558 Q))<<7;
559 }
560 else
561 {
562 ed->wdef.flags|=wimp_WNEW;
563 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNBACK,Q)<<24;
564 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNCLOSE,Q)<<25;
565 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNTITLE,Q)<<26;
566 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNTOGGLE,Q)<<27;
567 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNVERT,Q)<<28;
568 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNRESIZE,Q)<<29;
569 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWGNHORIZ,Q)<<30;
570 }
571 break;
572 case glass_EWTDATA:
573 dbox_getfield(ed->e.pd,glass_EIDDATA,ed->data,256);
574 dbox_getfield(ed->e.pd,glass_EIDVALSTRING,ed->valid,256);
575 dbox_scanfield(ed->e.pd,glass_EIDINDSIZE,"%d",&ed->indLen);
576 ed->hasValid=dbox_selecticon(ed->e.pd,glass_EIDVALID,Q);
577 ed->wdef.titleflags&=~0x00000103;
578 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIDTEXT,Q)<<0;
579 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIDSPRITE,Q)<<1;
580 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIDINDIR,Q)<<8;
581 break;
582 case glass_EWTAPPEAR:
583 ed->wdef.titleflags&=~0x00000afc;
584 dbox_scanfield(ed->e.pd,glass_EIAFSIZEWRITE,"%d",&ed->fontSize);
585 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,
586 glass_EIAHCENTRE,
587 Q)<<3;
588 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIAVCENTRE,Q)<<4;
589 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIAFONT,Q)<<6;
590 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIARALIGN,Q)<<9;
591 ed->wdef.titleflags|=dbox_selecticon(ed->e.pd,glass_EIAHALFSIZE,Q)<<11;
592 break;
593 case glass_EWWORKAREA:
594 ed->wdef.flags&=~0x0000c000;
595 editWindow__checkExtents(ed,FALSE,FALSE,TRUE);
596 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWSRUBBERH,Q)<<14;
597 ed->wdef.flags|=dbox_selecticon(ed->e.pd,glass_EWSRUBBERV,Q)<<15;
598 break;
599 }
600 }
601
602 #undef Q
603
604 /*
605 * void editWindow__setPanel(glass_editWindow *ed,dbox_field f)
606 *
607 * Use
608 * Creates a new panel based on a radio button click or some-such.
609 *
610 * Parameters
611 * glass_editWindow *ed == the edit window to change panel
612 * dbox_field f == the radio button associated with the desired panel
613 */
614
615 static void editWindow__panelHandler(dbox d,dbox_field f,void *handle);
616 static BOOL editWindow__panelRaw(dbox d,wimp_eventstr *e,void *handle);
617
618 static void editWindow__setPanel(glass_editWindow *ed,dbox_field f)
619 {
620 dbox d;
621 wimp_wstate s;
622 wimp_icon i;
623 int width,height;
624 int ox,oy;
625 wimp_w behind;
626 wimp_caretstr c;
627 wimp_redrawstr r;
628 BOOL ownCaret=TRUE;
629
630 if (f==ed->e.panel)
631 return;
632 editWindow__closePanel(ed);
633 wimpt_noerr(wimp_get_wind_state(dbox_syshandle(ed->e.d),&s));
634 wimpt_noerr(wimp_get_icon_info(dbox_syshandle(ed->e.d),
635 glass_EWPOSN,&i));
636 ox=s.o.box.x0-s.o.x;
637 oy=s.o.box.y1-s.o.y;
638 mem_useUser(indir_alloc,indir_free);
639 if (f==-1)
640 d=dbox_create("iconNowt");
641 else
642 d=dbox_create(editWindow__panels[f-glass_EWCHARS]);
643 if (!d)
644 {
645 mem_useMalloc();
646 return;
647 }
648 dbox_eventHandler(d,editWindow__panelHandler,ed);
649 dbox_rawEventHandler(d,editWindow__panelRaw,ed);
650 if (ed->e.panel)
651 {
652 wimpt_noerr(wimp_get_caret_pos(&c));
653 ownCaret=(c.w==dbox_syshandle(ed->e.pd));
654 dbox_selecticon(ed->e.d,ed->e.panel,dbox_RESETSTATE);
655 wimpt_noerr(wimp_get_wind_state(dbox_syshandle(ed->e.pd),&s));
656 pane_removePane(ed->e.p,dbox_syshandle(ed->e.pd));
657 dbox_delete(ed->e.pd);
658 }
659 dbox_selecticon(ed->e.d,f,dbox_SETSTATE);
660 behind=s.o.behind;
661 wimpt_noerr(wimp_get_wind_state(dbox_syshandle(d),&s));
662 width=s.o.box.x1-s.o.box.x0;
663 height=s.o.box.y1-s.o.box.y0;
664 s.o.box.x0=i.box.x0+ox+wimpt_dx();
665 s.o.box.y0=i.box.y0+oy+wimpt_dy();
666 s.o.box.x1=s.o.box.x0+width;
667 s.o.box.y1=s.o.box.y0+height;
668 s.o.y=10000;
669 s.o.behind=behind;
670 ed->e.pd=d;
671 ed->e.panel=f;
672 editWindow__setupPanel(ed);
673 if (f==glass_EWTAPPEAR)
674 {
675 r.w=s.o.w;
676 r.box.x0=0;
677 r.box.x1=s.o.box.x1-s.o.box.x0;
678 r.box.y1=0;
679 r.box.y0=editWindow__ICAPPHEIGHT;
680 wimpt_noerr(wimp_set_extent(&r));
681 }
682 wimpt_noerr(wimp_open_wind(&s.o));
683 if (ownCaret)
684 {
685 c.w=dbox_syshandle(d);
686 c.i=-1;
687 c.x=-500000;
688 c.y=0;
689 c.height=0x02000000;
690 wimpt_noerr(wimp_set_caret_pos(&c));
691 }
692 pane_addPane(ed->e.p,dbox_syshandle(d));
693 mem_useMalloc();
694 }
695
696 /*
697 * void editWindow__recreate(glass_editWindow *ed)
698 *
699 * Use
700 * Recreates the icon from the dialogue box settings
701 *
702 * Parameters
703 * glass_editWindow *ed == info about the edit
704 */
705
706 static void editWindow__recreate(glass_editWindow *ed)
707 {
708 char *p=0;
709 char *q=0;
710 char newname[15];
711 int fhandle;
712 ed->w->edit=0; /* Delink temporarily */
713
714 editWindow__checkExtents(ed,FALSE,FALSE,TRUE);
715 if (!(ed->wdef.titleflags & wimp_INDIRECT))
716 {
717 ed->indLen=12;
718 ed->hasValid=FALSE;
719 }
720 if (strlen(ed->data)>=ed->indLen)
721 {
722 ed->wdef.titleflags|=wimp_INDIRECT;
723 ed->indLen=strlen(ed->data)+1;
724 }
725 if (ed->wdef.titleflags & wimp_INDIRECT)
726 {
727 if (p=indir_alloc(ed->indLen),!p)
728 {
729 werr(FALSE,msgs_lookup("ewNEMUW"));
730 return;
731 }
732 if (ed->hasValid && (ed->wdef.titleflags & wimp_ITEXT))
733 {
734 if (q=indir_alloc(strlen(ed->valid)+1),!q)
735 {
736 indir_free(p);
737 werr(FALSE,
738 msgs_lookup("ewNEMUW"));
739 return;
740 }
741 strcpy(q,ed->valid);
742 ed->w->size+=strlen(ed->valid)+1;
743 }
744 strcpy(p,ed->data);
745 ed->w->size+=ed->indLen;
746 }
747
748 if (ed->w->def->desc.w.titleflags & wimp_IFONT) /* Was old antialiased? */
749 {
750 fhandle=(ed->w->def->desc.w.titleflags >> 24) & 255;
751 wimpt_noerr(font_lose(fhandle));
752 ed->w->fonts[fhandle]--;
753 }
754 if (ed->wdef.titleflags & wimp_IFONT) /* Is new title antialiased? */
755 {
756 if (font_find(ed->font,ed->fontSize*16,ed->fontSize*16,0,0,&fhandle))
757 {
758 werr(FALSE,msgs_lookup("ewCFF"),ed->font);
759 ed->wdef.titleflags&=~wimp_IFONT;
760 }
761 else
762 {
763 ed->w->antiAliased=TRUE;
764 ed->w->fonts[fhandle]++;
765 ed->wdef.titleflags=(ed->wdef.titleflags & 0x00ffffff) | (fhandle<<24);
766 }
767 }
768
769 if (ed->w->def->desc.w.titleflags & wimp_INDIRECT)
770 {
771 indir_free(ed->w->def->desc.w.title.indirecttext.buffer);
772 ed->w->size-=ed->w->def->desc.w.title.indirecttext.bufflen;
773 if ((ed->w->def->desc.w.titleflags & wimp_ITEXT) &&
774 (ed->w->def->desc.w.title.indirecttext.validstring!=(char *)-1))
775 {
776 ed->w->size-=
777 strlen(ed->w->def->desc.w.title.indirecttext.validstring)+1;
778 indir_free(ed->w->def->desc.w.title.indirecttext.validstring);
779 }
780 }
781
782 if (p)
783 {
784 ed->wdef.title.indirecttext.buffer=p;
785 ed->wdef.title.indirecttext.bufflen=ed->indLen;
786 if (q)
787 ed->wdef.title.indirecttext.validstring=q;
788 else if (ed->wdef.titleflags & wimp_ITEXT)
789 ed->wdef.title.indirecttext.validstring=(char *)-1;
790 else
791 ed->wdef.title.indirectsprite.spritearea=ed->w->t->s;
792 }
793 else
794 memcpy(ed->wdef.title.text,ed->data,12);
795
796 ed->wdef.box=ed->w->def->desc.w.box;
797 ed->wdef.scx=ed->w->def->desc.w.scx;
798 ed->wdef.scy=ed->w->def->desc.w.scy;
799 ed->wdef.behind=ed->w->def->desc.w.behind;
800 ed->wdef.nicons=ed->w->def->desc.w.nicons;
801 ed->w->def->desc.w=ed->wdef;
802 dbox_getfield(ed->e.d,glass_EWIDWRITE,newname,15);
803 tfile_rename(newname,ed->w);
804 dbox_setfield(ed->e.d,glass_EWIDWRITE,"%s",ed->w->id);
805
806 ed->w->edit=ed; /* Relink again */
807 window_recreate(ed->w);
808 tfile_markAsAltered(ed->w->t);
809 }
810
811 /*
812 * void editWindow__nextPanel(glass_editWindow *ed,int dir)
813 *
814 * Use
815 * Changes panel to the next one in the given direction. Skips shaded
816 * panels and handles everything nicely.
817 *
818 * Parameters
819 * glass_editWindow *ed == the edit dialogue box to move about in
820 * int dir == the direction (-1 for up, 1 for down)
821 */
822
823 static void editWindow__nextPanel(glass_editWindow *ed,int dir)
824 {
825 int i=ed->e.panel;
826
827 if (i==-1)
828 i=(dir==1 ? glass_EWCHARS : glass_EWWORKAREA);
829 else
830 i+=dir;
831
832 for (;i>=glass_EWCHARS && i<=glass_EWWORKAREA;i+=dir)
833 {
834 if (!dbox_shadeicon(ed->e.d,i,dbox_READSTATE))
835 {
836 editWindow__setPanel(ed,i);
837 break;
838 }
839 }
840 }
841
842 /*----- Event handlers ----------------------------------------------------*/
843
844 /*
845 * void editWindow__dboxHandler(dbox d,dbox_field f,void *handle)
846 *
847 * Use
848 * Handles any and all events directed at the dbox. Well, almost all...
849 *
850 * Parameters
851 * dbox d == the dbox handle
852 * dbox_field f == the event that happened
853 * void *handle == pointer to the dialogue box control info
854 */
855
856 static void editWindow__dboxHandler(dbox d,dbox_field f,void *handle)
857 {
858 glass_editWindow *ed=handle;
859 switch (f)
860 {
861 case dbox_CLOSE:
862 editWindow_close(ed->w);
863 break;
864 case dbox_HELP:
865 help_startHelp();
866 help_addLine(msgs_lookup("ewhEIDB"));
867 help_readFromIcon();
868 help_endHelp();
869 break;
870 case glass_EWCAN:
871 dbox_clickicon(d,f);
872 if (!dbox_wasAdjustClick())
873 pane_close(ed->e.p);
874 else
875 {
876 /* --- set up for old window --- */
877 ed->wdef=ed->w->def->desc.w;
878 editWindow_readData(ed->w);
879 dbox_setfield(ed->e.d,glass_EWIDWRITE,"%s",ed->w->id);
880 editWindow__setupPanel(ed);
881 }
882 dbox_unclick();
883 if (!dbox_wasAdjustClick())
884 editWindow_close(ed->w);
885 break;
886 case glass_EWOK:
887 dbox_clickicon(d,f);
888 editWindow__closePanel(ed);
889 if (!dbox_wasAdjustClick())
890 {
891 pane_close(ed->e.p);
892 editWindow__recreate(ed);
893 dbox_unclick();
894 editWindow_close(ed->w);
895 }
896 else
897 {
898 editWindow__recreate(ed);
899 editWindow_readData(ed->w);
900 editWindow__setupPanel(ed);
901 dbox_unclick();
902 }
903 break;
904 case glass_EWDEL:
905 dbox_clickicon(d,f);
906 if (gPrefs_current()->cDelWind)
907 {
908 if (!warning(msgs_lookup("ewCDWP"),
909 msgs_lookup("ewCDW")))
910 {
911 dbox_unclick();
912 return;
913 }
914 }
915 pane_close(ed->e.p);
916 dbox_unclick();
917 tfile_markAsAltered(ed->w->t);
918 tfile_deleteWindow(ed->w->i,ed->w); /* This causes a close for us */
919 break;
920 case glass_EWSAVE:
921 dbox_clickicon(d,f);
922 dbox_unclick();
923 tfile_saveWindow(ed->w);
924 break;
925 case glass_EWCHARS:
926 case glass_EWGADGETS:
927 case glass_EWBTYPE:
928 case glass_EWTDATA:
929 case glass_EWTAPPEAR:
930 case glass_EWCOLOURS:
931 case glass_EWWORKAREA:
932 editWindow__setPanel(ed,f);
933 break;
934 }
935 }
936
937 /*
938 * BOOL editWindow__dboxRaw(dbox d,wimp_eventstr *e,void *handle)
939 *
940 * Use
941 * Handles open window requests and things for the main Preferences dbox.
942 *
943 * Parameters
944 * dbox d == the dbox handle
945 * wimp_eventstr *e == the event that happened
946 * void *handle == a unused pointer
947 *
948 * Returns
949 * TRUE if the event has been handled;
950 */
951
952 static BOOL editWindow__dboxRaw(dbox d,wimp_eventstr *e,void *handle)
953 {
954 BOOL handled=FALSE;
955 glass_editWindow *ed=handle;
956 glass_intMsgstr *m;
957 unused(d);
958 switch (e->e)
959 {
960 case wimp_EOPEN:
961 pane_moved(ed->e.p);
962 handled=TRUE;
963 break;
964 case wimp_EKEY:
965 switch (e->data.key.chcode)
966 {
967 case akbd_UpK+akbd_Sh:
968 editWindow__nextPanel(ed,-1);
969 handled=TRUE;
970 break;
971 case akbd_DownK+akbd_Sh:
972 editWindow__nextPanel(ed,+1);
973 handled=TRUE;
974 break;
975 }
976 break;
977 case wimp_ESEND:
978 case wimp_ESENDWANTACK:
979 switch (e->data.msg.hdr.action)
980 {
981 case wimp_MINTERNAL:
982 m=intMsgs_receive(e);
983 switch(e->data.msg.data.words[0])
984 {
985 case glass_DELETEFILE:
986 if (m->df.t==ed->w->t)
987 editWindow_close(ed->w);
988 break;
989 case glass_SAVEFILE:
990 if (m->df.t==ed->w->t)
991 dbox_setfield(ed->e.d,glass_EWFILEDISP,"%.%s",
992 ed->w->t->filename);
993 break;
994 case glass_DELETEWINDOW:
995 if (m->dw.w==ed->w)
996 editWindow_close(ed->w);
997 break;
998 case glass_RENAME:
999 if (m->rn.w==ed->w)
1000 dbox_setfield(ed->e.d,glass_EWIDWRITE,"%s",ed->w->id);
1001 break;
1002 }
1003 break;
1004 }
1005 break;
1006 }
1007 return (handled);
1008 }
1009
1010 /*
1011 * menu editWindow__fontMaker(void *handle)
1012 *
1013 * Use
1014 * Sets up the font menu.
1015 *
1016 * Parameters
1017 * void *handle == pointer to this edit
1018 *
1019 * Returns
1020 * A menu to display
1021 */
1022
1023 static menu editWindow__fontMaker(void *handle)
1024 {
1025 glass_editWindow *ed=handle;
1026 menu m=fontMenu_createFontMenu(FALSE);
1027 fontMenu_tickGivenName(ed->font);
1028 return (m);
1029 }
1030
1031 /*
1032 * void editWindow__fontHandler(int hit[],void *handle)
1033 *
1034 * Use
1035 * Gets the font chosen from the font menu.
1036 *
1037 * Parameters
1038 * int hit[] == the hit string
1039 * void *handle == pointer to this edit
1040 */
1041
1042 static void editWindow__fontHandler(int hit[],void *handle)
1043 {
1044 glass_editWindow *ed=handle;
1045 if (hit[0])
1046 {
1047 strcpy(ed->font,fontMenu_fontname(hit[0],hit[1]));
1048 dbox_setfield(ed->e.pd,glass_EIAFONTNAME,"%.%s",ed->font);
1049 }
1050 }
1051
1052 /*
1053 * void editWindow__fontHelp(int hit[],void *handle)
1054 *
1055 * Use
1056 * Gives help on a font menu item
1057 *
1058 * Parameters
1059 * int hit[] == the hit string
1060 * void *handle == pointer to this edit
1061 */
1062
1063 static void editWindow__fontHelp(int hit[],void *handle)
1064 {
1065 unused(handle);
1066 if (hit[0])
1067 {
1068 help_startHelp();
1069 help_addLine(msgs_lookup("ewmhFONT"),fontMenu_fontname(hit[0],hit[1]));
1070 help_endHelp();
1071 }
1072 }
1073
1074 /*
1075 * menu editWindow__btypeMaker(void *handle)
1076 *
1077 * Use
1078 * Generates and sets up a button type menu for an edit dialogue box
1079 *
1080 * Parameters
1081 * void *handle == pointer to the edit
1082 *
1083 * Returns
1084 * The menu to use
1085 */
1086
1087 static menu editWindow__btypeMaker(void *handle)
1088 {
1089 static menu m;
1090 static int ticked;
1091 glass_editWindow *ed=handle;
1092 int i;
1093 char *buf=buffer_find();
1094
1095 if (!m)
1096 {
1097 m=menu_new(msgs_lookup("eiBTMT"),msgs_lookup("ewBTYPE0"));
1098 for (i=1;i<=15;i++)
1099 {
1100 sprintf(buf,"ewBTYPE%i",i);
1101 menu_extend(m,msgs_lookup(buf));
1102 }
1103 }
1104 if (ticked)
1105 menu_setflags(m,ticked,FALSE,FALSE);
1106 ticked=((ed->wdef.workflags>>12)&0x0f)+1;
1107 menu_setflags(m,ticked,TRUE,FALSE);
1108 return (m);
1109 }
1110
1111 /*
1112 * void editWindow__btypeHandler(int hit[],void *handle)
1113 *
1114 * Use
1115 * Handles a click on the button type menu.
1116 *
1117 * Parameters
1118 * int hit[] == the mouse click info
1119 * void *handle == pointer to edit information
1120 */
1121
1122 static void editWindow__btypeHandler(int hit[],void *handle)
1123 {
1124 glass_editWindow *ed=handle;
1125 char *buf=buffer_find();
1126
1127 if (hit[0])
1128 {
1129 ed->wdef.workflags&=~0x0000f000;
1130 ed->wdef.workflags+=(hit[0]-1)<<12;
1131 sprintf(buf,"ewBTYPE%i",hit[0]-1);
1132 dbox_setfield(ed->e.pd,glass_EIABTYPE,"%s",msgs_lookup(buf));
1133 }
1134 }
1135
1136 /*
1137 * void editWindow__colProc(dbox d,dbox_field f,int colour, void *handle)
1138 *
1139 * Use
1140 * This routine is called when a colour is selected in the colours panel.
1141 *
1142 * Parameters
1143 * dbox d == the panel's handle
1144 * dbox_field f == the colour button that has changed
1145 * int colour == the new colour for the button
1146 * void *handle == pointer to this edit
1147 */
1148
1149 static void editWindow__colProc(dbox d,dbox_field f,int colour,void *handle)
1150 {
1151 glass_editWindow *ed=handle;
1152 unused(d);
1153 switch (f)
1154 {
1155 case glass_EWCTBFORE:
1156 ed->wdef.colours[0]=colour;
1157 dbox_shadeicon(ed->e.d,glass_EWGADGETS,colour==255);
1158 if ((tst(ed->wdef.flags,31) && tst(ed->wdef.flags,26))
1159 || (!tst(ed->wdef.flags,31) && tst(ed->wdef.flags,0)))
1160 {
1161 dbox_shadeicon(ed->e.d,glass_EWTDATA,colour==255);
1162 dbox_shadeicon(ed->e.d,glass_EWTAPPEAR,colour==255);
1163 }
1164 break;
1165 case glass_EWCTBBACK:
1166 ed->wdef.colours[1]=colour;
1167 break;
1168 case glass_EWCWAFORE:
1169 ed->wdef.colours[2]=colour;
1170 break;
1171 case glass_EWCWABACK:
1172 ed->wdef.colours[3]=colour;
1173 break;
1174 case glass_EWCSCFORE:
1175 ed->wdef.colours[5]=colour;
1176 break;
1177 case glass_EWCSCBACK:
1178 ed->wdef.colours[4]=colour;
1179 break;
1180 case glass_EWCHIGH:
1181 ed->wdef.colours[6]=colour;
1182 break;
1183 }
1184 }
1185
1186 /*
1187 * void editWindow__btypeHelp(int hit[],void *handle)
1188 *
1189 * Use
1190 * Handles a help request for the button type menu.
1191 *
1192 * Parameters
1193 * int hit[] == the helpq info
1194 * void *handle == pointer to edit information
1195 */
1196
1197 static void editWindow__btypeHelp(int hit[],void *handle)
1198 {
1199 char *buf=buffer_find();
1200 unused(handle);
1201 if (hit[0])
1202 {
1203 help_startHelp();
1204 sprintf(buf,"ewBTYPE%i",hit[0]-1);
1205 help_addLine(msgs_lookup("ewmhBTYPE"),msgs_lookup(buf));
1206 help_endHelp();
1207 }
1208 }
1209
1210 /*
1211 * void editWindow__extArrows(dbox d,dbox_field f,int diff,void *handle)
1212 *
1213 * Use
1214 * Handles a click on one of the (many!) arrow buttons in the extends panel.
1215 */
1216
1217 typedef struct
1218 {
1219 BOOL xOrY;
1220 BOOL topOrBottom;
1221 glass_editWindow *ed;
1222 }
1223 editWindow__extArrowstr;
1224
1225 static void editWindow__extArrows(dbox d,dbox_field f,int diff,void *handle)
1226 {
1227 editWindow__extArrowstr *a=handle;
1228 wimp_box *b=&a->ed->wdef.ex;
1229 int *v;
1230 unused(f);
1231
1232 if (a->xOrY)
1233 v=(a->topOrBottom ? &b->x1 : &b->x0);
1234 else
1235 v=(a->topOrBottom ? &b->y1 : &b->y0);
1236
1237 dbox_scanfield(d,glass_EWSBOTTOMLEFT,"%d,%d",&b->x0,&b->y0);
1238 dbox_scanfield(d,glass_EWSTOPRIGHT,"%d,%d",&b->x1,&b->y1);
1239
1240 *v+=diff;
1241
1242 editWindow__checkExtents(a->ed,!a->topOrBottom,a->topOrBottom,FALSE);
1243 }
1244
1245 /*
1246 * void editWindow__panelHandler(dbox d,dbox_field f,void *handle)
1247 *
1248 * Use
1249 * Handles simple click events for the current panel in an edit dbox
1250 *
1251 * Parameters
1252 * dbox d == the panel's dbox handle
1253 * dbox_field f == the icon that was clicked
1254 * void *handle == pointer to edit information
1255 */
1256
1257 static void editWindow__panelHandler(dbox d,dbox_field f,void *handle)
1258 {
1259 glass_editWindow *ed=handle;
1260 int on;
1261 buttons_simpleArrow sa={0,9999,FALSE};
1262 editWindow__extArrowstr eas;
1263 BOOL indon;
1264
1265 switch (f)
1266 {
1267 case dbox_CLOSE:
1268 case dbox_HELP:
1269 case glass_EIOK:
1270 case glass_EICAN:
1271 editWindow__dboxHandler(ed->e.d,f,ed);
1272 return;
1273 break;
1274 }
1275 switch (ed->e.panel)
1276 {
1277 case glass_EWGADGETS:
1278 on=!dbox_selecticon(d,f,dbox_READSTATE);
1279 switch (f)
1280 {
1281 case glass_EWGOLD:
1282 if (on)
1283 {
1284 dbox_selecticon(d,glass_EWGOLD,TRUE);
1285 dbox_selecticon(d,glass_EWGNEW,FALSE);
1286 dbox_shadeicon(d,glass_EWGOTITLE,FALSE);
1287 dbox_shadeicon(d,glass_EWGOCLOSEBACK,
1288 !dbox_selecticon(d,glass_EWGOTITLE,dbox_READSTATE));
1289 dbox_shadeicon(d,glass_EWGOHORIZ,FALSE);
1290 dbox_shadeicon(d,glass_EWGOVERT,FALSE);
1291 dbox_shadeicon(d,glass_EWGNTITLE,TRUE);
1292 dbox_shadeicon(d,glass_EWGNCLOSE,TRUE);
1293 dbox_shadeicon(d,glass_EWGNBACK,TRUE);
1294 dbox_shadeicon(d,glass_EWGNTOGGLE,TRUE);
1295 dbox_shadeicon(d,glass_EWGNRESIZE,TRUE);
1296 dbox_shadeicon(d,glass_EWGNHORIZ,TRUE);
1297 dbox_shadeicon(d,glass_EWGNVERT,TRUE);
1298 }
1299 break;
1300 case glass_EWGNEW:
1301 if (on)
1302 {
1303 dbox_selecticon(d,glass_EWGOLD,FALSE);
1304 dbox_selecticon(d,glass_EWGNEW,TRUE);
1305 dbox_shadeicon(d,glass_EWGOTITLE,TRUE);
1306 dbox_shadeicon(d,glass_EWGOCLOSEBACK,TRUE);
1307 dbox_shadeicon(d,glass_EWGOHORIZ,TRUE);
1308 dbox_shadeicon(d,glass_EWGOVERT,TRUE);
1309 dbox_shadeicon(d,glass_EWGNTITLE,FALSE);
1310 dbox_shadeicon(d,glass_EWGNCLOSE,
1311 !dbox_selecticon(d,glass_EWGNTITLE,dbox_READSTATE));
1312 dbox_shadeicon(d,glass_EWGNBACK,
1313 !dbox_selecticon(d,glass_EWGNTITLE,dbox_READSTATE));
1314 dbox_shadeicon(d,glass_EWGNTOGGLE,
1315 !(dbox_selecticon(d,glass_EWGNTITLE,dbox_READSTATE)
1316 || dbox_selecticon(d,glass_EWGNVERT,dbox_READSTATE)));
1317 dbox_shadeicon(d,glass_EWGNRESIZE,
1318 !(dbox_selecticon(d,glass_EWGNHORIZ,dbox_READSTATE)
1319 || dbox_selecticon(d,glass_EWGNVERT,dbox_READSTATE)));
1320 dbox_shadeicon(d,glass_EWGNHORIZ,FALSE);
1321 dbox_shadeicon(d,glass_EWGNVERT,FALSE);
1322 }
1323 break;
1324 case glass_EWGOTITLE:
1325 dbox_selecticon(d,f,on);
1326 dbox_selecticon(d,glass_EWGNTITLE,on);
1327 dbox_shadeicon(d,glass_EWGOCLOSEBACK,!on);
1328 dbox_shadeicon(ed->e.d,glass_EWTDATA,!on);
1329 dbox_shadeicon(ed->e.d,glass_EWTAPPEAR,!on);
1330 break;
1331 case glass_EWGOCLOSEBACK:
1332 dbox_selecticon(d,f,on);
1333 dbox_selecticon(d,glass_EWGNCLOSE,on);
1334 dbox_selecticon(d,glass_EWGNBACK,on);
1335 break;
1336 case glass_EWGOHORIZ:
1337 dbox_selecticon(d,f,on);
1338 dbox_selecticon(d,glass_EWGNHORIZ,on);
1339 dbox_selecticon(d,glass_EWGNRESIZE,
1340 (on || dbox_selecticon(d,glass_EWGOVERT,dbox_READSTATE)));
1341 break;
1342 case glass_EWGOVERT:
1343 dbox_selecticon(d,f,on);
1344 dbox_selecticon(d,glass_EWGNVERT,on);
1345 dbox_selecticon(d,glass_EWGNTOGGLE,on);
1346 dbox_selecticon(d,glass_EWGNRESIZE,
1347 (on || dbox_selecticon(d,glass_EWGOHORIZ,dbox_READSTATE)));
1348 break;
1349 case glass_EWGNTITLE:
1350 dbox_selecticon(d,f,on);
1351 dbox_selecticon(d,glass_EWGOTITLE,on);
1352 dbox_shadeicon(d,glass_EWGNCLOSE,!on);
1353 dbox_shadeicon(d,glass_EWGNBACK,!on);
1354 dbox_shadeicon(d,glass_EWGNTOGGLE,
1355 !(on || dbox_selecticon(d,glass_EWGNVERT,dbox_READSTATE)));
1356 dbox_shadeicon(ed->e.d,glass_EWTDATA,!on);
1357 dbox_shadeicon(ed->e.d,glass_EWTAPPEAR,!on);
1358 break;
1359 case glass_EWGNCLOSE:
1360 dbox_selecticon(d,f,on);
1361 dbox_selecticon(d,glass_EWGOCLOSEBACK,
1362 (on || dbox_selecticon(d,glass_EWGNBACK,dbox_READSTATE)));
1363 break;
1364 case glass_EWGNBACK:
1365 dbox_selecticon(d,f,on);
1366 dbox_selecticon(d,glass_EWGOCLOSEBACK,
1367 (on || dbox_selecticon(d,glass_EWGNCLOSE,dbox_READSTATE)));
1368 break;
1369 case glass_EWGNTOGGLE:
1370 case glass_EWGNRESIZE:
1371 dbox_selecticon(d,f,on);
1372 break;
1373 case glass_EWGNHORIZ:
1374 dbox_selecticon(d,f,on);
1375 dbox_selecticon(d,glass_EWGOHORIZ,on);
1376 dbox_shadeicon(d,glass_EWGNRESIZE,
1377 !(on || dbox_selecticon(d,glass_EWGNVERT,dbox_READSTATE)));
1378 break;
1379 case glass_EWGNVERT:
1380 dbox_selecticon(d,f,on);
1381 dbox_selecticon(d,glass_EWGOVERT,on);
1382 dbox_shadeicon(d,glass_EWGNRESIZE,
1383 !(on || dbox_selecticon(d,glass_EWGNHORIZ,dbox_READSTATE)));
1384 dbox_shadeicon(d,glass_EWGNTOGGLE,
1385 !(on || dbox_selecticon(d,glass_EWGNTITLE,dbox_READSTATE)));
1386 break;
1387 }
1388 break;
1389 case glass_EWTDATA:
1390 switch (f)
1391 {
1392 case glass_EIDINDIR:
1393 if (dbox_selecticon(d,f,dbox_READSTATE))
1394 {
1395 if (dbox_selecticon(ed->e.pd,glass_EIDTEXT,dbox_READSTATE))
1396 {
1397 dbox_shadeicon(ed->e.pd,glass_EIDVALID,FALSE);
1398 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,
1399 !dbox_selecticon(ed->e.pd,glass_EIDVALID,dbox_READSTATE));
1400 }
1401 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,FALSE);
1402 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,FALSE);
1403 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,FALSE);
1404 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,FALSE);
1405 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,FALSE);
1406 }
1407 else
1408 {
1409 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,TRUE);
1410 dbox_shadeicon(ed->e.pd,glass_EIDVALID,TRUE);
1411 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,TRUE);
1412 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,TRUE);
1413 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,TRUE);
1414 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,TRUE);
1415 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,TRUE);
1416 }
1417 break;
1418 case glass_EIDINDUP:
1419 buttons_arrow(d,f,d,glass_EIDINDSIZE,0,+1,&sa);
1420 break;
1421 case glass_EIDINDDOWN:
1422 buttons_arrow(d,f,d,glass_EIDINDSIZE,0,-1,&sa);
1423 break;
1424 case glass_EIDVALID:
1425 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,dbox_TOGGLESTATE);
1426 break;
1427 case glass_EIDMINIMISE:
1428 dbox_clickicon(d,f);
1429 dbox_getfield(d,glass_EIDDATA,ed->data,256);
1430 dbox_setfield(d,glass_EIDINDSIZE,"%i",strlen(ed->data)+1);
1431 dbox_unclick();
1432 break;
1433 case glass_EIDTEXT:
1434 if (dbox_selecticon(ed->e.pd,glass_EIDTEXT,dbox_READSTATE))
1435 {
1436 dbox_shadeicon(ed->e.pd,glass_EIDDATA,FALSE);
1437 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,FALSE);
1438 if (dbox_selecticon(d,glass_EIDINDIR,dbox_READSTATE))
1439 {
1440 dbox_shadeicon(ed->e.pd,glass_EIDVALID,FALSE);
1441 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,
1442 !dbox_selecticon(ed->e.pd,glass_EIDVALID,dbox_READSTATE));
1443 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,FALSE);
1444 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,FALSE);
1445 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,FALSE);
1446 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,FALSE);
1447 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,FALSE);
1448 }
1449 else
1450 {
1451 dbox_shadeicon(ed->e.pd,glass_EIDVALID,TRUE);
1452 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,TRUE);
1453 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,TRUE);
1454 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,TRUE);
1455 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,TRUE);
1456 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,TRUE);
1457 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,TRUE);
1458 }
1459 }
1460 else
1461 {
1462 dbox_shadeicon(ed->e.pd,glass_EIDVALID,TRUE);
1463 dbox_shadeicon(ed->e.pd,glass_EIDVALSTRING,TRUE);
1464 if (dbox_selecticon(d,glass_EIDSPRITE,dbox_READSTATE))
1465 {
1466 dbox_shadeicon(ed->e.pd,glass_EIDDATA,FALSE);
1467 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,FALSE);
1468 indon=dbox_selecticon(d,glass_EIDINDIR,dbox_READSTATE);
1469 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,!indon);
1470 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,!indon);
1471 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,!indon);
1472 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,!indon);
1473 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,!indon);
1474 }
1475 else
1476 {
1477 dbox_shadeicon(ed->e.pd,glass_EIDDATA,TRUE);
1478 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,TRUE);
1479 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,TRUE);
1480 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,TRUE);
1481 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,TRUE);
1482 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,TRUE);
1483 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,TRUE);
1484 }
1485 }
1486 break;
1487 case glass_EIDSPRITE:
1488 if (dbox_selecticon(ed->e.pd,glass_EIDSPRITE,dbox_READSTATE))
1489 {
1490 dbox_shadeicon(ed->e.pd,glass_EIDDATA,FALSE);
1491 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,FALSE);
1492 indon=dbox_selecticon(d,glass_EIDINDIR,dbox_READSTATE);
1493 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,!indon);
1494 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,!indon);
1495 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,!indon);
1496 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,!indon);
1497 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,!indon);
1498 }
1499 else if (!dbox_selecticon(ed->e.pd,glass_EIDTEXT,dbox_READSTATE))
1500 {
1501 dbox_shadeicon(ed->e.pd,glass_EIDDATA,TRUE);
1502 dbox_shadeicon(ed->e.pd,glass_EIDINDIR,TRUE);
1503 dbox_shadeicon(ed->e.pd,glass_EIDINDSIZE,TRUE);
1504 dbox_shadeicon(ed->e.pd,glass_EIDINDUP,TRUE);
1505 dbox_shadeicon(ed->e.pd,glass_EIDINDDOWN,TRUE);
1506 dbox_shadeicon(ed->e.pd,glass_EIDMINIMISE,TRUE);
1507 dbox_shadeicon(ed->e.pd,glass_EIDINDPART,TRUE);
1508 }
1509 break;
1510 }
1511 break;
1512 case glass_EWTAPPEAR:
1513 switch (f)
1514 {
1515 case glass_EIAFONT:
1516 if (dbox_selecticon(d,f,dbox_READSTATE) ||
1517 fontMenu_createFontMenu(FALSE))
1518 {
1519 dbox_selecticon(d,f,dbox_TOGGLESTATE);
1520 dbox_shadeicon(d,glass_EIAFONTNAME,dbox_TOGGLESTATE);
1521 dbox_shadeicon(d,glass_EIAFONTMENU,dbox_TOGGLESTATE);
1522 dbox_shadeicon(d,glass_EIAFSIZEUP,dbox_TOGGLESTATE);
1523 dbox_shadeicon(d,glass_EIAFSIZEDOWN,dbox_TOGGLESTATE);
1524 dbox_shadeicon(d,glass_EIAFSIZEWRITE,dbox_TOGGLESTATE);
1525 }
1526 break;
1527 case glass_EIAFSIZEUP:
1528 buttons_arrow(d,f,d,glass_EIAFSIZEWRITE,0,+1,&sa);
1529 break;
1530 case glass_EIAFSIZEDOWN:
1531 buttons_arrow(d,f,d,glass_EIAFSIZEWRITE,0,-1,&sa);
1532 break;
1533 }
1534 break;
1535 case glass_EWWORKAREA:
1536 eas.ed=ed;
1537 switch (f)
1538 {
1539 case glass_EWSTOPUP:
1540 eas.xOrY=FALSE;
1541 eas.topOrBottom=TRUE;
1542 buttons_arrow(d,f,d,0,editWindow__extArrows,+wimpt_dy(),&eas);
1543 break;
1544 case glass_EWSTOPDOWN:
1545 eas.xOrY=FALSE;
1546 eas.topOrBottom=TRUE;
1547 buttons_arrow(d,f,d,0,editWindow__extArrows,-wimpt_dy(),&eas);
1548 break;
1549 case glass_EWSLEFTLEFT:
1550 eas.xOrY=TRUE;
1551 eas.topOrBottom=FALSE;
1552 buttons_arrow(d,f,d,0,editWindow__extArrows,-wimpt_dx(),&eas);
1553 break;
1554 case glass_EWSLEFTRIGHT:
1555 eas.xOrY=TRUE;
1556 eas.topOrBottom=FALSE;
1557 buttons_arrow(d,f,d,0,editWindow__extArrows,+wimpt_dx(),&eas);
1558 break;
1559 case glass_EWSRIGHTLEFT:
1560 eas.xOrY=TRUE;
1561 eas.topOrBottom=TRUE;
1562 buttons_arrow(d,f,d,0,editWindow__extArrows,-wimpt_dx(),&eas);
1563 break;
1564 case glass_EWSRIGHTRIGHT:
1565 eas.xOrY=TRUE;
1566 eas.topOrBottom=TRUE;
1567 buttons_arrow(d,f,d,0,editWindow__extArrows,+wimpt_dx(),&eas);
1568 break;
1569 case glass_EWSBOTTOMUP:
1570 eas.xOrY=FALSE;
1571 eas.topOrBottom=FALSE;
1572 buttons_arrow(d,f,d,0,editWindow__extArrows,+wimpt_dy(),&eas);
1573 break;
1574 case glass_EWSBOTTOMDOWN:
1575 eas.xOrY=FALSE;
1576 eas.topOrBottom=FALSE;
1577 buttons_arrow(d,f,d,0,editWindow__extArrows,-wimpt_dy(),&eas);
1578 break;
1579 case glass_EWSEXTLOCK:
1580 dbox_clickicon(d,f);
1581 ed->wdef.ex.x0=ed->w->def->desc.w.scx;
1582 ed->wdef.ex.x1=ed->w->def->desc.w.scx+
1583 ed->w->def->desc.w.box.x1-ed->w->def->desc.w.box.x0;
1584 ed->wdef.ex.y0=ed->w->def->desc.w.scy+
1585 ed->w->def->desc.w.box.y0-ed->w->def->desc.w.box.y1;
1586 ed->wdef.ex.y1=ed->w->def->desc.w.scy;
1587 editWindow__checkExtents(ed,TRUE,TRUE,FALSE);
1588 dbox_unclick();
1589 break;
1590 case glass_EWSTLLARGE:
1591 dbox_clickicon(d,f);
1592 ed->wdef.ex.x0=(ed->wdef.ex.x0 - 2000) / 2000 * 2000;
1593 ed->wdef.ex.y1=(ed->wdef.ex.y1 + 2000) / 2000 * 2000;
1594 editWindow__checkExtents(ed,TRUE,TRUE,FALSE);
1595 dbox_unclick();
1596 break;
1597 case glass_EWSBRLARGE:
1598 dbox_clickicon(d,f);
1599 ed->wdef.ex.x1=(ed->wdef.ex.x1 + 2000) / 2000 * 2000;
1600 ed->wdef.ex.y0=(ed->wdef.ex.y0 - 2000) / 2000 * 2000;
1601 editWindow__checkExtents(ed,TRUE,TRUE,FALSE);
1602 dbox_unclick();
1603 break;
1604 case glass_EWSMINWSET:
1605 dbox_clickicon(d,f);
1606 dbox_setfield(d,glass_EWSMINWIDTH,"%i",
1607 ed->w->def->desc.w.box.x1-ed->w->def->desc.w.box.x0);
1608 dbox_unclick();
1609 break;
1610 case glass_EWSMINHSET:
1611 dbox_clickicon(d,f);
1612 dbox_setfield(d,glass_EWSMINHEIGHT,"%i",
1613 ed->w->def->desc.w.box.y1-ed->w->def->desc.w.box.y0);
1614 dbox_unclick();
1615 break;
1616 }
1617 break;
1618 }
1619 }
1620
1621 /*
1622 * BOOL editWindow__panelRaw(dbox d,wimp_eventstr *e,void *handle)
1623 *
1624 * Use
1625 * Handles the more wierd events for a particular panel.
1626 *
1627 * Parameters
1628 * dbox d == the dbox handle of the panel
1629 * wimp_eventstr *e == the event to look at
1630 * void *handle == pointer to the current edit
1631 *
1632 * Returns
1633 * TRUE if the event is dead (long live the event...)
1634 */
1635
1636 static BOOL editWindow__panelRaw(dbox d,wimp_eventstr *e,void *handle)
1637 {
1638 BOOL handled=FALSE;
1639 glass_editWindow *ed=handle;
1640 if (e->e==wimp_EKEY)
1641 {
1642 switch (e->data.key.chcode)
1643 {
1644 case akbd_UpK+akbd_Sh:
1645 editWindow__nextPanel(ed,-1);
1646 handled=TRUE;
1647 break;
1648 case akbd_DownK+akbd_Sh:
1649 editWindow__nextPanel(ed,+1);
1650 handled=TRUE;
1651 break;
1652 }
1653 }
1654 if (!handled) switch (ed->e.panel)
1655 {
1656 case glass_EWTDATA:
1657 /* Nothin' doing */
1658 break;
1659 case glass_EWTAPPEAR:
1660 switch (e->e)
1661 {
1662 case wimp_EBUT:
1663 switch (e->data.but.m.i)
1664 {
1665 case glass_EIAFONTNAME:
1666 menu_make(editWindow__fontMaker,editWindow__fontHandler,
1667 editWindow__fontHelp,ed);
1668 handled=TRUE;
1669 break;
1670 case glass_EIAFONTMENU:
1671 dbox_clickicon(d,glass_EIAFONTMENU);
1672 menu_make(editWindow__fontMaker,editWindow__fontHandler,
1673 editWindow__fontHelp,ed);
1674 dbox_unclick();
1675 handled=TRUE;
1676 break;
1677 }
1678 break;
1679 }
1680 break;
1681 case glass_EWBTYPE:
1682 switch (e->e)
1683 {
1684 case wimp_EBUT:
1685 switch (e->data.but.m.i)
1686 {
1687 case glass_EWBBTDISP:
1688 menu_make(editWindow__btypeMaker,editWindow__btypeHandler,
1689 editWindow__btypeHelp,ed);
1690 handled=TRUE;
1691 break;
1692 case glass_EWBBTMENU:
1693 dbox_clickicon(d,glass_EWBBTMENU);
1694 menu_make(editWindow__btypeMaker,editWindow__btypeHandler,
1695 editWindow__btypeHelp,ed);
1696 dbox_unclick();
1697 handled=TRUE;
1698 break;
1699 }
1700 break;
1701 }
1702 break;
1703 case glass_EWCOLOURS:
1704 switch (e->e)
1705 {
1706 case wimp_EBUT:
1707 switch (e->data.but.m.i)
1708 {
1709 case glass_EWCTBFORE:
1710 colSelect(ed->e.pd,glass_EWCTBFORE,e->data.but.m.bbits,
1711 msgs_lookup("ewTBFG"),TRUE,editWindow__colProc,ed);
1712 break;
1713 case glass_EWCTBBACK:
1714 colSelect(ed->e.pd,glass_EWCTBBACK,e->data.but.m.bbits,
1715 msgs_lookup("ewTBBG"),FALSE,editWindow__colProc,ed);
1716 break;
1717 case glass_EWCWAFORE:
1718 colSelect(ed->e.pd,glass_EWCWAFORE,e->data.but.m.bbits,
1719 msgs_lookup("ewWAFG"),FALSE,editWindow__colProc,ed);
1720 break;
1721 case glass_EWCWABACK:
1722 colSelect(ed->e.pd,glass_EWCWABACK,e->data.but.m.bbits,
1723 msgs_lookup("ewWABG"),TRUE,editWindow__colProc,ed);
1724 break;
1725 case glass_EWCSCFORE:
1726 colSelect(ed->e.pd,glass_EWCSCFORE,e->data.but.m.bbits,
1727 msgs_lookup("ewSCFG"),FALSE,editWindow__colProc,ed);
1728 break;
1729 case glass_EWCSCBACK:
1730 colSelect(ed->e.pd,glass_EWCSCBACK,e->data.but.m.bbits,
1731 msgs_lookup("ewSCBG"),FALSE,editWindow__colProc,ed);
1732 break;
1733 case glass_EWCHIGH:
1734 colSelect(ed->e.pd,glass_EWCHIGH,e->data.but.m.bbits,
1735 msgs_lookup("ewTBHI"),FALSE,editWindow__colProc,ed);
1736 }
1737 break;
1738 }
1739 break;
1740 }
1741 return (FALSE);
1742 }
1743
1744 /*----- External routines -------------------------------------------------*/
1745
1746 /*
1747 * void editWindow_windowMoved(glass_windPointer *w)
1748 *
1749 * Use
1750 * Informs an edit dialogue that a window has been moved.
1751 *
1752 * Parameters
1753 * glass_windPointer *w == the window containing the icon
1754 */
1755
1756 void editWindow_windowMoved(glass_windPointer *w)
1757 {
1758 glass_editWindow *ed=w->edit;
1759 if (!ed)
1760 return;
1761 editWindow__checkExtents(ed,FALSE,FALSE,TRUE);
1762 }
1763
1764 /*
1765 * void editWindow_readData(glass_windPointer *w)
1766 *
1767 * Use
1768 * Forces a re-read of the title data for the given window edit. Since
1769 * this is called on setting up an edit and cancelling one, it also does
1770 * some
1771 *
1772 * Parameters
1773 * glass_windPointer *w == the window containing the icon
1774 */
1775
1776 void editWindow_readData(glass_windPointer *w)
1777 {
1778 glass_editWindow *ed=w->edit;
1779 if (!ed)
1780 return;
1781 ed->wdef.title=ed->w->def->desc.w.title;
1782 if (ed->wdef.titleflags & wimp_INDIRECT)
1783 {
1784 utils_ctermToNterm(ed->wdef.title.indirecttext.buffer);
1785 strcpy(ed->data,ed->wdef.title.indirecttext.buffer);
1786 ed->indLen=ed->wdef.title.indirecttext.bufflen;
1787 if (ed->wdef.titleflags & wimp_ITEXT &&
1788 ed->wdef.title.indirecttext.validstring!=(char *)-1)
1789 {
1790 utils_ctermToNterm(ed->wdef.title.indirecttext.validstring);
1791 strcpy(ed->valid,ed->wdef.title.indirecttext.validstring);
1792 ed->hasValid=TRUE;
1793 }
1794 else
1795 {
1796 ed->valid[0]=0;
1797 ed->hasValid=FALSE;
1798 }
1799 }
1800 else
1801 {
1802 ed->data[12]=0;
1803 memcpy(ed->data,ed->wdef.title.text,12);
1804 utils_ctermToNterm(ed->data);
1805 ed->valid[0]=0;
1806 ed->indLen=12;
1807 }
1808
1809 if (ed->wdef.colours[0]==255) /* If no system area */
1810 {
1811 dbox_shadeicon(ed->e.d,glass_EWTDATA,TRUE);
1812 dbox_shadeicon(ed->e.d,glass_EWTAPPEAR,TRUE);
1813 dbox_shadeicon(ed->e.d,glass_EWGADGETS,TRUE);
1814 if (ed->e.panel==glass_EWTDATA
1815 || ed->e.panel==glass_EWTAPPEAR
1816 || ed->e.panel==glass_EWGADGETS)
1817 editWindow__setPanel(ed,-1);
1818 }
1819 else if ((tst(ed->wdef.flags,31) && !tst(ed->wdef.flags,26))
1820 || (!tst(ed->wdef.flags,31) && !tst(ed->wdef.flags,0)))
1821 {
1822 dbox_shadeicon(ed->e.d,glass_EWTDATA,TRUE);
1823 dbox_shadeicon(ed->e.d,glass_EWTAPPEAR,TRUE);
1824 dbox_shadeicon(ed->e.d,glass_EWGADGETS,FALSE);
1825 if (ed->e.panel==glass_EWTDATA
1826 || ed->e.panel==glass_EWTAPPEAR)
1827 editWindow__setPanel(ed,-1);
1828 }
1829 else
1830 {
1831 dbox_shadeicon(ed->e.d,glass_EWTDATA,FALSE);
1832 dbox_shadeicon(ed->e.d,glass_EWTAPPEAR,FALSE);
1833 dbox_shadeicon(ed->e.d,glass_EWGADGETS,FALSE);
1834 }
1835
1836 if (ed->e.panel==glass_EWTDATA)
1837 editWindow__setupPanel(ed);
1838 }
1839
1840 /*
1841 * void editWindow_close(glass_windPointer *w)
1842 *
1843 * Use
1844 * Closes an edit window
1845 *
1846 * Parameters
1847 * glass_windPointer *w == the window containing the icon
1848 */
1849
1850 void editWindow_close(glass_windPointer *w)
1851 {
1852 glass_editWindow *ed=w->edit;
1853 if (ed)
1854 {
1855 if (ed->e.pd)
1856 dbox_deleteNoUpdate(ed->e.pd);
1857 pane_delete(ed->e.p);
1858 dbox_deleteNoUpdate(ed->e.d);
1859 ed->w->edit=0;
1860 mem_free(ed);
1861 }
1862 }
1863
1864 /*
1865 * void editWindow(glass_windPointer *w)
1866 *
1867 * Use
1868 * Edits the given window in a dialogue box.
1869 *
1870 * Parameters
1871 * glass_windPointer *w == the window to edit
1872 */
1873
1874 void editWindow(glass_windPointer *w)
1875 {
1876 glass_editWindow *ed;
1877 os_regset r;
1878 if (w->edit)
1879 {
1880 dbox_display(w->edit->e.d,TRUE);
1881 pane_front(w->edit->e.p);
1882 return;
1883 }
1884 mem_useUser(indir_alloc,indir_free);
1885 ed=mem_alloc(sizeof(glass_editWindow));
1886 if (!ed)
1887 {
1888 mem_useMalloc();
1889 werr(FALSE,msgs_lookup("ewNEM"));
1890 return;
1891 }
1892 if (ed->e.d=dbox_create("editWindow"),!ed->e.d)
1893 {
1894 mem_free(ed);
1895 mem_useMalloc();
1896 return;
1897 }
1898 if (ed->e.p=pane_create(dbox_syshandle(ed->e.d)),!ed->e.p)
1899 {
1900 dbox_delete(ed->e.d);
1901 mem_useMalloc();
1902 mem_free(ed);
1903 return;
1904 }
1905 ed->w=w;
1906 ed->wdef=w->def->desc.w;
1907 w->edit=ed;
1908 ed->e.panel=0;
1909
1910 /* --- Set up icon data now --- */
1911 editWindow_readData(w);
1912 if (ed->wdef.titleflags & wimp_IFONT)
1913 {
1914 r.r[0]=ed->wdef.titleflags >> 24;
1915 r.r[1]=(int)(ed->font);
1916 wimpt_noerr(os_swix(XFont_ReadDefn,&r));
1917 utils_ctermToNterm(ed->font);
1918 ed->fontSize=r.r[2]/16;
1919 }
1920 else
1921 {
1922 strcpy(ed->font,"Homerton.Medium");
1923 ed->fontSize=12;
1924 }
1925
1926 /* --- Now do handlers, and final setting up --- */
1927 dbox_setfield(ed->e.d,glass_EWIDWRITE,"%s",w->id);
1928 dbox_setfield(ed->e.d,glass_EWFILEDISP,"%.%s",w->t->filename);
1929 dbox_eventHandler(ed->e.d,editWindow__dboxHandler,ed);
1930 dbox_rawEventHandler(ed->e.d,editWindow__dboxRaw,ed);
1931 dbox_openDisplaced(ed->e.d);
1932 editWindow__setPanel(ed,glass_EWCHARS);
1933 mem_useMalloc();
1934 }
The Straylight Source Distribution (obsolete software for RISC OS)