Subversion Repositories filter_foundry

Rev

Rev 2 | Rev 9 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
2 toby 1
/*
2
        This file is part of "Filter Foundry", a filter plugin for Adobe Photoshop
3
    Copyright (C) 2003-5 Toby Thain, toby@telegraphics.com.au
4
 
5
    This program is free software; you can redistribute it and/or modify
6
    it under the terms of the GNU General Public License as published by  
7
    the Free Software Foundation; either version 2 of the License, or
8
    (at your option) any later version.
9
 
10
    This program is distributed in the hope that it will be useful,
11
    but WITHOUT ANY WARRANTY; without even the implied warranty of
12
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
    GNU General Public License for more details.
14
 
15
    You should have received a copy of the GNU General Public License  
16
    along with this program; if not, write to the Free Software
17
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18
*/
19
 
20
/* This is PLATFORM INDEPENDENT user interface code - mainly dialog logic */
21
 
22
#include "ff.h"
23
 
24
#include "node.h"
25
#include "funcs.h"
26
#include "y.tab.h"
27
#include "choosefile.h"
28
#include "sprintf_tiny.h"
29
 
30
#ifdef MAC_ENV
31
        #include <files.h>
32
        #include <plstringfuncs.h>
33
 
34
        #define GETSLIDERVALUE GetDlgControlValue
35
        #define SETSLIDERVALUE SetDlgControlValue
36
        #define GETCTLTEXT getctltext
37
        #define SETCTLTEXT setctltext
38
        #define GETCTLTEXTINT getctltextint
39
        #define SETCTLTEXTINT setctltextint
40
        #define SELECTCTLTEXT selectctltext
41
#else
42
        #include <commctrl.h>
43
        #include "compat_string.h"
44
 
45
        #define GETSLIDERVALUE(d,i) SendDlgItemMessage(d,i,TBM_GETPOS,0,0)
46
        #define SETSLIDERVALUE(d,i,v) SendDlgItemMessage(d,i,TBM_SETPOS,TRUE,v)
47
        #define GETCTLTEXT GetDlgItemText
48
        #define SETCTLTEXT SetDlgItemText
49
        #define SELECTCTLTEXT SELECTDLGITEMTEXT
50
        #define GETCTLTEXTINT GetDlgItemInt
51
        #define SETCTLTEXTINT SetDlgItemInt
52
#endif
53
 
54
Boolean doupdates = true;
55
double zoomfactor,fitzoom;
56
 
57
void updateglobals(DIALOGREF dp);
58
struct node *updateexpr(DIALOGREF dp,int i);
59
void updatedialog(DIALOGREF dp);
60
void slidertextchanged(DIALOGREF dp,int item);
61
void updatezoom(DIALOGREF dp);
62
 
63
void updatedialog(DIALOGREF dp){
64
        int i;
65
 
66
        doupdates = false;
67
 
68
        for( i=0 ; i<8 ; ++i ){
69
                SETSLIDERVALUE(dp,FIRSTCTLITEM+i,slider[i]);
70
                SETCTLTEXTINT(dp,FIRSTCTLTEXTITEM+i,slider[i],false);
71
        }
72
 
73
        for( i=0 ; i<4 ; ++i ){
74
                if(!gdata->standalone) SETCTLTEXT(dp,FIRSTEXPRITEM+i,expr[i] ? expr[i] : "oups! expr[i] is nil!");
75
                if(i<nplanes)
76
                        updateexpr(dp,FIRSTEXPRITEM+i);
77
        }
78
 
79
        if(!gdata->standalone) SELECTCTLTEXT(dp,FIRSTEXPRITEM,0,-1);
80
 
81
        doupdates = true;
82
}
83
 
84
/* copy dialog settings to global variables (sliders, expressions) */
85
 
86
void updateglobals(DIALOGREF dp){
87
        int i;
88
        char s[MAXEXPR+1];
89
 
90
        for( i=0 ; i<8 ; ++i )
91
                slider[i] = GETSLIDERVALUE(dp,FIRSTCTLITEM+i);
92
 
93
        if(!gdata->standalone)
94
                for( i=0 ; i<4 ; ++i ){
95
                        /* stash expression strings */
96
                        if(GETCTLTEXT(dp,FIRSTEXPRITEM+i,s,MAXEXPR)){
97
                                if(expr[i])
98
                                        free(expr[i]);
99
                                if(!(expr[i] = my_strdup(s)))
100
                                        dbg("updateglobals: my_strdup returned zero??");
101
                        }else
102
                                dbg("updateglobals: GETCTLTEXT returned zero??");
103
                }
104
}
105
 
106
struct node *updateexpr(DIALOGREF dp,int item){
107
        char s[MAXEXPR+1];
108
        int i;
109
 
110
//dbg("updateexpr");
111
 
112
        i = item - FIRSTEXPRITEM;
113
 
114
        freetree(tree[i]);
115
 
116
        if(!gdata->standalone){
117
                GETCTLTEXT(dp,item,s,MAXEXPR);
118
 
119
                if(expr[i])
120
                        free(expr[i]);
121
                expr[i] = my_strdup(s);
122
        }
123
 
124
        tree[i] = parseexpr(expr[i]);
125
 
126
        if(!gdata->standalone){
127
                if(tree[i])
128
                        HideDialogItem(dp,FIRSTICONITEM+i);
129
                else{
130
                        err[i] = errstr;
131
                        errstart[i] = tokstart;
132
                        errpos[i] = tokpos;
133
                        ShowDialogItem(dp,FIRSTICONITEM+i);
134
                }
135
        }
136
        return tree[i];
137
}
138
 
139
void updatezoom(DIALOGREF dp){
140
        char s[10],*q = int_str(s,(int)(100./zoomfactor),10);
141
        *q++ = '%';
142
        *q = 0;
143
        SETCTLTEXT(dp,ZOOMLEVELITEM,s);
144
        zoomfactor > 1. ? ShowDialogItem(dp,ZOOMINITEM) : HideDialogItem(dp,ZOOMINITEM);
145
        zoomfactor < fitzoom ? ShowDialogItem(dp,ZOOMOUTITEM) : HideDialogItem(dp,ZOOMOUTITEM);
146
}
147
 
148
/* traverse expression tree, looking for constant references to sliders */
149
 
150
int checksl(struct node*p,int ctlflags[],int mapflags[]);
151
int checksl(struct node*p,int ctlflags[],int mapflags[]){
152
        if(p){
153
                int s;
154
                if( (p->kind==TOK_FN1 && p->v.sym->fn == (pfunc_type)ff_ctl)
155
                 || (p->kind==TOK_FN3 && p->v.sym->fn == (pfunc_type)ff_val) ){
156
                        if(p->child[0]->kind == TOK_NUM){
157
                                s = p->child[0]->v.value;
158
                                if(s>=0 && s<=7)
159
                                        ctlflags[s] = 1;
160
                        }else
161
                                return true; /* can't determine which ctl() */
162
                }else if( p->kind==TOK_FN2 && p->v.sym->fn == (pfunc_type)ff_map )
163
                        if(p->child[0]->kind == TOK_NUM){
164
                                s = p->child[0]->v.value;
165
                                if(s>=0 && s<=3){
166
                                        mapflags[s] = 1;
167
                                        ctlflags[s*2] = ctlflags[s*2+1] = 1;
168
                                }
169
                        }else
170
                                return true; /* can't determine which map() */
171
 
172
                return checksl(p->child[0],ctlflags,mapflags)
173
                        || checksl(p->child[1],ctlflags,mapflags)
174
                        || checksl(p->child[2],ctlflags,mapflags)
175
                        || checksl(p->child[3],ctlflags,mapflags)
176
                        || checksl(p->child[4],ctlflags,mapflags);     
177
        }else return false;
178
}
179
 
180
Boolean checksliders(int exprs,int ctlflags[],int mapflags[]){
181
        int i,f = false;
182
 
183
        for(i=4;i--;)
184
                mapflags[i] = 0;
185
        for(i=8;i--;)
186
                ctlflags[i] = 0;
187
 
188
        for(i=0;i<exprs;i++)
189
                if(checksl(tree[i],ctlflags,mapflags))
190
                        f = true;
191
 
192
        return f;
193
}
194
 
195
void slidermoved(DIALOGREF dp,int i){
196
        int v = GETSLIDERVALUE(dp,i);
197
        i -= FIRSTCTLITEM;
198
        slider[i] = v;
199
        SETCTLTEXTINT(dp,i+FIRSTCTLTEXTITEM,v,false);
200
}
201
 
202
void slidertextchanged(DIALOGREF dp,int i){
203
        int v = GETCTLTEXTINT(dp,i,NULL,false);
204
        i -= FIRSTCTLTEXTITEM;
205
        SETSLIDERVALUE(dp,i+FIRSTCTLITEM,v);
206
        slider[i] = v;
207
}
208
 
209
void maindlgupdate(DIALOGREF dp){
210
        int i,unknown,ctls[8],maps[4];
211
 
212
        unknown = checksliders(nplanes,ctls,maps);
213
 
214
        for(i=0;i<8;i++)
215
                if(unknown || ctls[i]){
216
                        ENABLEDLGITEM(dp,FIRSTCTLITEM+i);
217
                        ShowDialogItem(dp,FIRSTCTLTEXTITEM+i); /* FIXME: this changes keyboard focus */
218
                }else{
219
                        DISABLEDLGITEM(dp,FIRSTCTLITEM+i);
220
                        HideDialogItem(dp,FIRSTCTLTEXTITEM+i); /* FIXME: this changes keyboard focus */
221
                }
222
 
223
        for( i=0 ; i<nplanes ; i++ )
224
                if(!tree[i]){
225
                        /* uh oh, couldn't parse one of the saved expressions...this is fatal */
226
                        DISABLEDLGITEM(dp,IDOK);
227
                        if(gdata->standalone){
228
                                alertuser("Can't run this filter (there is a problem with the saved expressions).","");
229
                        }else{
230
                                DISABLEDLGITEM(dp,SAVEITEM);
231
                                DISABLEDLGITEM(dp,MAKEITEM);
232
                        }
233
                        return;
234
                }
235
 
236
        /* we have valid expression trees in all slots...proceed! */
237
        updateglobals(dp);
238
        if(setup(gpb))
239
                recalc_preview(gpb,dp);
240
 
241
        ENABLEDLGITEM(dp,IDOK);
242
        if(!gdata->standalone){
243
                ENABLEDLGITEM(dp,SAVEITEM);
244
                ENABLEDLGITEM(dp,MAKEITEM);
245
        }
246
}
247
 
248
/* one-time initialisation of dialog box */
249
 
250
void maindlginit(DIALOGREF dp){
251
        char s[0x100];
252
        extern char *defaultexpr[];
253
        int i;
254
 
255
        /* hide unused expression items */
256
        if(gdata->standalone){
257
                myp2cstrcpy(s,gdata->parm.author); SetDlgItemText(dp,PARAMAUTHORITEM,s);
258
                myp2cstrcpy(s,gdata->parm.copyright); SetDlgItemText(dp,PARAMCOPYITEM,s);
259
                for(i=0;i<8;++i){
260
                        if(gdata->parm.ctl_used[i]){
261
                                myp2cstrcpy(s,gdata->parm.ctl[i]); SetDlgItemText(dp,FIRSTCTLLABELITEM+i,s);
262
                        }else if(gdata->parm.map_used[i/2]){
263
                                if(i&1)
264
                                        HideDialogItem(dp,FIRSTCTLLABELITEM+i);
265
                                else{
266
                                        myp2cstrcpy(s,gdata->parm.map[i/2]); SetDlgItemText(dp,FIRSTCTLLABELITEM+i,s);
267
                                }
268
                        }else{
269
                                HideDialogItem(dp,FIRSTCTLITEM+i);
270
                                HideDialogItem(dp,FIRSTCTLTEXTITEM+i);
271
                                HideDialogItem(dp,FIRSTCTLLABELITEM+i);
272
                        }
273
                }
274
        }else
275
                for(i=nplanes;i<4;++i){
276
                        HideDialogItem(dp,FIRSTICONITEM+i);
277
                        HideDialogItem(dp,FIRSTEXPRITEM+i);
278
                        HideDialogItem(dp,FIRSTLABELITEM+i);
279
                }
280
 
281
        if(setup_preview(gpb)){
282
                extern int preview_w,preview_h;
283
                double zh = (gpb->filterRect.right-gpb->filterRect.left)/(double)preview_w,
284
                           zv = (gpb->filterRect.bottom-gpb->filterRect.top)/(double)preview_h;
285
                fitzoom = zh > zv ? zh : zv;
286
                zoomfactor = fitzoom;
287
                updatezoom(dp);
288
        }else{
289
                HideDialogItem(dp,ZOOMINITEM);
290
                HideDialogItem(dp,ZOOMOUTITEM);
291
                HideDialogItem(dp,ZOOMLEVELITEM);
292
        }
293
 
294
#ifdef WIN_ENV
295
        // can't build standalone filter on less than NT platform :-(
296
        // due to absence of resource editing API (UpdateResource etc)
297
        if(!isWin32NT())
298
                HideDialogItem(dp,MAKEITEM);
299
#endif
300
 
301
        updatedialog(dp);
302
        maindlgupdate(dp);
303
}
304
 
305
 
306
/* process an item hit. return false if the dialog is finished; otherwise return true. */
307
 
308
Boolean maindlgitem(DIALOGREF dp,int item){
309
        StandardFileReply sfr;
310
        NavReplyRecord reply;
311
        static char filefilters[] =
312
                "All supported files (.AFS, .8BF, .TXT)\0*.AFS;*.8BF;*.TXT\0All files (*.*)\0*.*\0\0";
313
        static OSType types[] = {TEXT_FILETYPE,PS_FILTER_FILETYPE};
314
        Boolean readok = false;
315
        char *reason;
316
        Str255 fname;
317
 
318
        switch(item){
319
        case IDOK:     
320
//              updateglobals(dp);
321
        case IDCANCEL:
322
                dispose_preview();
323
                return false; // end dialog
324
        case OPENITEM:
325
                if(!gdata->standalone && choosefiletypes("\pChoose filter settings",&sfr,&reply,types,2,filefilters)){
326
                        if(loadfile(&sfr,&reason)){
327
                                updatedialog(dp);
328
                                maindlgupdate(dp);
329
                        }else alertuser("Cannot load settings.",reason);
330
                }
331
                break;
332
        case SAVEITEM:
333
                if(!gdata->standalone && putfile("\pSave filter settings","\p",
334
                                                                                 TEXT_FILETYPE,SIG_SIMPLETEXT,&reply,&sfr)){
335
//                      updateglobals(dp);
336
                        if(savefile(&sfr))
337
                                completesave(&reply);
338
                }
339
                break;
340
        case MAKEITEM:
341
                if( !gdata->standalone && builddialog(gpb) ){
342
                        PLstrcpy(fname,gdata->parm.title);
343
#ifdef WIN_ENV
344
                        PLstrcat(fname,(StringPtr)"\p.8bf");
345
#endif
346
                        if( putfile("\pMake standalone filter",fname,
347
                                                PS_FILTER_FILETYPE,kPhotoshopSignature,&reply,&sfr ) )
348
                                make_standalone(&sfr);
349
                }
350
                break;
351
        case ZOOMINITEM:
352
//              zoomfactor = zoomfactor/2.;
353
                zoomfactor = zoomfactor>2. ? zoomfactor/2. : 1.;
354
                updatezoom(dp);
355
                recalc_preview(gpb,dp);
356
                break;
357
        case ZOOMOUTITEM:
358
                zoomfactor *= 2.;
359
                if(zoomfactor > fitzoom)
360
                        zoomfactor = fitzoom;
361
                updatezoom(dp);
362
                recalc_preview(gpb,dp);
363
                break;
364
        case ZOOMLEVELITEM:
365
                zoomfactor = (zoomfactor == fitzoom) ? 1. : fitzoom;
366
                updatezoom(dp);
367
                recalc_preview(gpb,dp);
368
                break;
369
        case FIRSTCTLITEM:
370
        case FIRSTCTLITEM+1:
371
        case FIRSTCTLITEM+2:
372
        case FIRSTCTLITEM+3:
373
        case FIRSTCTLITEM+4:
374
        case FIRSTCTLITEM+5:
375
        case FIRSTCTLITEM+6:
376
        case FIRSTCTLITEM+7:
377
                slidermoved(dp,item);
378
                recalc_preview(gpb,dp);
379
                break;
380
        case FIRSTCTLTEXTITEM:
381
        case FIRSTCTLTEXTITEM+1:
382
        case FIRSTCTLTEXTITEM+2:
383
        case FIRSTCTLTEXTITEM+3:
384
        case FIRSTCTLTEXTITEM+4:
385
        case FIRSTCTLTEXTITEM+5:
386
        case FIRSTCTLTEXTITEM+6:
387
        case FIRSTCTLTEXTITEM+7:
388
                slidertextchanged(dp,item);
389
                recalc_preview(gpb,dp);
390
                break;
391
        case FIRSTICONITEM:
392
        case FIRSTICONITEM+1:
393
        case FIRSTICONITEM+2:
394
        case FIRSTICONITEM+3:
395
                item -= FIRSTICONITEM;
396
                alertuser(err[item],"");
397
                SELECTCTLTEXT(dp,FIRSTEXPRITEM+item,errstart[item],errpos[item]);
398
                break;
399
        case FIRSTEXPRITEM:
400
        case FIRSTEXPRITEM+1:
401
        case FIRSTEXPRITEM+2:
402
        case FIRSTEXPRITEM+3:
403
//              dbg("expritem hit");
404
                if( (item-FIRSTEXPRITEM)<nplanes ){
405
                        updateexpr(dp,item);
406
                        maindlgupdate(dp);
407
                }
408
                break;
409
        }
410
 
411
        return true; // keep going
412
}
413
 
414
Boolean alertuser(char *err,char *more){
415
        char *s = malloc(strlen(err)+strlen(more)+2),*q;
416
        Boolean res;
417
 
418
        q = cat(s,err);
419
        *q++ = '\n';
420
        q = cat(q,more);
421
        *q = 0;
422
        res = simplealert(s);
423
        free(s);
424
        return res;
425
}