Subversion Repositories filter_foundry

Rev

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

Rev Author Line No. Line
259 daniel-mar 1
/*
2
    This file is part of "Filter Foundry", a filter plugin for Adobe Photoshop
3
    Copyright (C) 2003-2009 Toby Thain, toby@telegraphics.com.au
4
    Copyright (C) 2018-2021 Daniel Marschall, ViaThinkSoft
5
 
6
    This program is free software; you can redistribute it and/or modify
7
    it under the terms of the GNU General Public License as published by
8
    the Free Software Foundation; either version 2 of the License, or
9
    (at your option) any later version.
10
 
11
    This program is distributed in the hope that it will be useful,
12
    but WITHOUT ANY WARRANTY; without even the implied warranty of
13
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14
    GNU General Public License for more details.
15
 
16
    You should have received a copy of the GNU General Public License
17
    along with this program; if not, write to the Free Software
18
    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19
*/
20
 
21
/* This is PLATFORM INDEPENDENT user interface code - mainly dialog logic */
22
 
23
#include "ff.h"
24
 
25
#include "node.h"
26
#include "funcs.h"
27
#include "y.tab.h"
28
#include "choosefile.h"
29
#include "sprintf_tiny.h"
30
#include "compat_string.h"
31
 
32
#ifdef MAC_ENV
33
        #include <plstringfuncs.h>
34
#endif
35
 
36
Boolean doupdates = true;
37
 
38
void updateglobals(DIALOGREF dp);
39
struct node *updateexpr(DIALOGREF dp,int i);
40
void updatedialog(DIALOGREF dp);
41
void slidertextchanged(DIALOGREF dp,int item);
42
void updatezoom(DIALOGREF dp);
43
 
44
void updatedialog(DIALOGREF dp){
45
        int i;
46
 
47
        doupdates = false;
48
 
49
        for(i = 0; i < 8; ++i){
50
                SETSLIDERVALUE(dp,FIRSTCTLITEM+i,slider[i]);
51
                SETCTLTEXTINT(dp,FIRSTCTLTEXTITEM+i,slider[i],false);
52
        }
53
 
54
        for(i = 0; i < 4; ++i){
55
                if(!gdata->standalone)
56
                        SETCTLTEXT(dp,FIRSTEXPRITEM+i,expr[i] ? expr[i] : "");
57
                if(i < nplanes)
58
                        updateexpr(dp,FIRSTEXPRITEM+i);
59
        }
60
 
61
        if(!gdata->standalone)
62
                SELECTCTLTEXT(dp,FIRSTEXPRITEM,0,-1);
63
 
64
        doupdates = true;
65
}
66
 
67
/* copy dialog settings to global variables (sliders, expressions) */
68
 
69
void updateglobals(DIALOGREF dp){
70
        int i;
71
        char s[MAXEXPR+1];
72
 
73
        for(i = 0; i < 8; ++i)
74
                slider[i] = (value_type)(GETSLIDERVALUE(dp,FIRSTCTLITEM+i));
75
 
76
        if(!gdata->standalone)
77
                for(i = 0; i < 4; ++i){
78
                        /* stash expression strings */
79
                        if(GETCTLTEXT(dp,FIRSTEXPRITEM+i,s,MAXEXPR)){
80
                                if(expr[i])
81
                                        free(expr[i]);
82
                                expr[i] = _strdup(s);
83
                        }
84
                        if(!expr[i])
85
                                expr[i] = _strdup("c");
86
                }
87
}
88
 
89
struct node *updateexpr(DIALOGREF dp,int item){
90
        char s[MAXEXPR+1];
91
        int i;
92
 
93
        i = item - FIRSTEXPRITEM;
94
 
95
        freetree(tree[i]);
96
 
97
        if(!gdata->standalone){
98
                GETCTLTEXT(dp,item,s,MAXEXPR);
99
 
100
                if(expr[i])
101
                        free(expr[i]);
102
                expr[i] = _strdup(s);
103
        }
104
 
105
        tree[i] = parseexpr(expr[i]);
106
 
107
        if(!gdata->standalone){
108
                if(tree[i])
109
                        HideDialogItem(dp,FIRSTICONITEM+i);
110
                else{
111
                        err[i] = errstr;
112
                        errstart[i] = tokstart;
113
                        errpos[i] = tokpos;
114
                        ShowDialogItem(dp,FIRSTICONITEM+i);
115
                }
116
        }
117
        return tree[i];
118
}
119
 
120
void updatezoom(DIALOGREF dp){
121
        char s[10];
122
        sprintf(s, "%d%%", (int)(100./zoomfactor));
123
        SETCTLTEXT(dp,ZOOMLEVELITEM,s);
124
        if(zoomfactor > 1.)
125
                ShowDialogItem(dp,ZOOMINITEM);
126
        else
127
                HideDialogItem(dp,ZOOMINITEM);
128
        if(zoomfactor < fitzoom)
129
                ShowDialogItem(dp,ZOOMOUTITEM);
130
        else
131
                HideDialogItem(dp,ZOOMOUTITEM);
132
}
133
 
134
/* traverse expression tree, looking for constant references to sliders/maps */
135
 
136
static int _checksl(struct node*p,int ctlflags[],int mapflags[]){
137
        int s, i, result;
138
 
139
        result = 0;
140
        if(p){
141
                if( (p->kind==TOK_FN1 && p->v.sym->fn == (pfunc_type)ff_ctl)
142
                 || (p->kind==TOK_FN3 && p->v.sym->fn == (pfunc_type)ff_val) ){
143
                        if(p->child[0]->kind == TOK_NUM){
144
                                s = p->child[0]->v.value;
145
                                if(s>=0 && s<=7)
146
                                        ctlflags[s] = 1;
147
                        }else
148
                                result |= CHECKSLIDERS_CTL_AMBIGUOUS; /* can't determine which ctl() */
149
                }else if(p->kind==TOK_FN2 && p->v.sym->fn == (pfunc_type)ff_map){
150
                        if(p->child[0]->kind == TOK_NUM){
151
                                s = p->child[0]->v.value;
152
                                if(s>=0 && s<=3){
153
                                        mapflags[s] = 1;
154
                                        ctlflags[s*2] = ctlflags[s*2+1] = 1;
155
                                }
156
                        }else
157
                                result |= CHECKSLIDERS_MAP_AMBIGUOUS; /* can't determine which map() */
158
                 }
159
 
160
                for( i = 0 ; i < MAXCHILDREN ; ++i )
161
                        result |= _checksl(p->child[i],ctlflags,mapflags);
162
        }
163
 
164
        return result;
165
}
166
 
167
int checksliders(int exprs,int ctlflags[],int mapflags[]){
168
        int i, result;
169
 
170
        result = 0;
171
 
172
        for(i = 4; i--;)
173
                mapflags[i] = 0;
174
        for(i = 8; i--;)
175
                ctlflags[i] = 0;
176
 
177
        for(i = 0; i < exprs; i++)
178
                result |= _checksl(tree[i],ctlflags,mapflags);
179
 
180
        return result;
181
}
182
 
183
void slidermoved(DIALOGREF dp,int i){
184
        int v = GETSLIDERVALUE(dp,i);
185
        i -= FIRSTCTLITEM;
186
        slider[i] = v;
187
        SETCTLTEXTINT(dp,i+FIRSTCTLTEXTITEM,v,false);
188
}
189
 
190
void slidertextchanged(DIALOGREF dp,int i){
191
        int v = GETCTLTEXTINT(dp,i,NULL,false);
192
        i -= FIRSTCTLTEXTITEM;
193
        SETSLIDERVALUE(dp,i+FIRSTCTLITEM,v);
194
        slider[i] = v;
195
}
196
 
197
void maindlgupdate(DIALOGREF dp){
198
        int i,unknown,ctls[8],maps[4];
199
 
200
        unknown = checksliders(nplanes,ctls,maps);
201
 
202
        for(i = 0; i < 8; i++)
203
                if(unknown || ctls[i]){
204
                        ENABLEDLGITEM(dp,FIRSTCTLITEM+i);
205
                        ENABLEDLGITEM(dp,FIRSTCTLLABELITEM+i);
206
                        ShowDialogItem(dp,FIRSTCTLTEXTITEM+i); /* FIXME: this changes keyboard focus */
207
                }else{
208
                        DISABLEDLGITEM(dp,FIRSTCTLITEM+i);
209
                        DISABLEDLGITEM(dp,FIRSTCTLLABELITEM+i);
210
                        HideDialogItem(dp,FIRSTCTLTEXTITEM+i); /* FIXME: this changes keyboard focus */
211
                }
212
 
213
        for(i = 0; i < nplanes; i++)
214
                if(!tree[i]){
215
                        /* uh oh, couldn't parse one of the saved expressions...this is fatal */
216
                        DISABLEDLGITEM(dp,IDOK);
217
                        if(gdata->standalone){
218
                                alertuser(_strdup("Can't run this filter (there is a problem with the saved expressions)."),_strdup(""));
219
                        }else{
220
                                DISABLEDLGITEM(dp,SAVEITEM);
221
                                DISABLEDLGITEM(dp,MAKEITEM);
222
                        }
223
                        return;
224
                }
225
 
226
        /* we have valid expression trees in all slots...proceed! */
227
        updateglobals(dp);
228
        if(setup(gpb))
229
                recalc_preview(gpb,dp);
230
 
231
        ENABLEDLGITEM(dp,IDOK);
232
        if(!gdata->standalone){
233
                ENABLEDLGITEM(dp,SAVEITEM);
234
                ENABLEDLGITEM(dp,MAKEITEM);
235
        }
236
}
237
 
238
/* one-time initialisation of dialog box */
239
 
240
void maindlginit(DIALOGREF dp){
241
        char s[0x100];
242
        int i;
243
        const char *channelsuffixes[] = {
244
                "", "KA", "I", "RGBA",
245
                "CMYK", "HSL", "HSB", "1234",
246
                "DA", "LabA"
247
        };
248
 
249
        /* hide unused expression items */
250
        if(gdata->standalone){
251
                myp2cstrcpy(s,gdata->parm.author);
252
                SetDlgItemText(dp,PARAMAUTHORITEM,s);
253
                myp2cstrcpy(s,gdata->parm.copyright);
254
                SetDlgItemText(dp,PARAMCOPYITEM,s);
255
 
256
                // update labels for map() or ctl() sliders
257
                for(i = 0; i < 8; ++i){
258
                        if(gdata->parm.map_used[i/2]){
259
                                if((i&1) == 0){
260
                                        // even (0, 2, 4, 6)
261
                                        myp2cstrcpy(s,gdata->parm.map[i/2]);
262
                                        SetDlgItemText(dp, FIRSTMAPLABELITEM+(i/2),s);
263
                                        HideDialogItem(dp, FIRSTCTLLABELITEM + i);
264
                                        HideDialogItem(dp, FIRSTCTLLABELITEM + i + 1);
265
                                }
266
                        } else if(gdata->parm.ctl_used[i]){
267
                                myp2cstrcpy(s,gdata->parm.ctl[i]);
268
                                SetDlgItemText(dp,FIRSTCTLLABELITEM+i,s);
269
                                HideDialogItem(dp, FIRSTMAPLABELITEM + i/2);
270
                        }else{
271
                                HideDialogItem(dp,FIRSTCTLITEM+i);
272
                                HideDialogItem(dp,FIRSTCTLTEXTITEM+i);
273
                                HideDialogItem(dp, FIRSTCTLLABELITEM + i);
274
                                HideDialogItem(dp, FIRSTMAPLABELITEM + i/2);
275
                        }
276
                }
277
        }
278
 
279
        strcpy(s,"X =");
280
        for(i = 0; i < 4; ++i){
281
                if(i >= nplanes){
282
                        HideDialogItem(dp,FIRSTICONITEM+i);
283
                        HideDialogItem(dp,FIRSTEXPRITEM+i);
284
                        HideDialogItem(dp,FIRSTLABELITEM+i);
285
                }else{
286
                        s[0] = channelsuffixes[gpb->imageMode][i];
287
                        SetDlgItemText(dp,FIRSTLABELITEM+i,s);
288
                }
289
        }
290
 
291
        if(setup_preview(gpb,nplanes)){
292
                // On very large images, processing a fully zoomed out preview (the initial default)
293
                // can cause out of memory errors, because Photoshop can't page in all data
294
                // during advanceState. To prevent this problem, zoom in until we aren't
295
                // previewing more than say 10% of Photoshop's indicated maxSpace.
296
                // (e.g., on a 1GB WinXP system, PS CS2 reports 520MB maxSpace, so this will let us
297
                // preview about 50MB of image data.)
298
 
299
                /* Workaround: GIMP/PSPI sets maxSpace to 100 MB hardcoded, so the zoom is not adjusted correctly. */
300
                int disable_zoom_memory_check;
301
                disable_zoom_memory_check = !maxspace_available();
302
 
303
                if (!disable_zoom_memory_check) {
304
                        zoomfactor = sqrt(maxspace()/(10.*preview_w*preview_h*nplanes));
305
                        if(zoomfactor > fitzoom)
306
                                zoomfactor = fitzoom;
307
                        if(zoomfactor < 1.)
308
                                zoomfactor = 1.;
309
                } else {
310
                        zoomfactor = fitzoom;
311
                }
312
 
313
                updatezoom(dp);
314
        }else{
315
                HideDialogItem(dp,ZOOMINITEM);
316
                HideDialogItem(dp,ZOOMOUTITEM);
317
                HideDialogItem(dp,ZOOMLEVELITEM);
318
        }
319
 
320
        updatedialog(dp);
321
        maindlgupdate(dp);
322
}
323
 
324
 
325
/* process an item hit. return false if the dialog is finished; otherwise return true. */
326
 
327
Boolean maindlgitem(DIALOGREF dp,int item){
328
        extern int previewerr;
329
 
330
        StandardFileReply sfr;
331
        NavReplyRecord reply;
332
        static OSType types[] = {TEXT_FILETYPE,PS_FILTER_FILETYPE};
333
        char *reason;
334
        Str255 fname;
335
        Boolean bak_obfusc, bak_standalone, bak_parmloaded;
336
        PARM_T bak_parm;
337
 
338
        switch(item){
339
        case IDOK:
340
        case IDCANCEL:
341
                dispose_preview();
342
                return false; // end dialog
343
        case OPENITEM:
344
                if(!gdata->standalone && choosefiletypes(
345
                                        #ifdef MAC_ENV
346
                                        (StringPtr)_strdup("\pChoose filter settings"), // "\p" means "Pascal string"
347
                                        #else
348
                                        (StringPtr)_strdup("\026Choose filter settings"),
349
                                        #endif
350
                                        &sfr,&reply,types,2,
351
                                        "All supported files (*.afs, *.8bf, *.pff, *.prm, *.bin, *.txt)\0*.afs;*.8bf;*.pff;*.prm;*.bin;*.txt\0Filter Factory Settings (*.afs, *.txt)\0*.afs;*.txt\0Filter Factory for Windows, Standalone Filter (*.8bf)\0*.8bf\0Premiere TF/FF Settings (*.pff, *.txt)\0*.pff;*.txt\0Premiere TT/FF for Windows, Standalone Filter (*.prm)\0*.prm\0FilterFactory for MacOS, Standalone Filter (*.bin)\0*.bin\0All files (*.*)\0*.*\0\0"
352
                                        #ifdef _WIN32
353
                                        ,gdata->hWndMainDlg
354
                                        #endif /* _WIN32 */
355
                                        )){
356
                        if(loadfile(&sfr,&reason)){
357
                                updatedialog(dp);
358
                                maindlgupdate(dp);
359
                        }else
360
                                alertuser(_strdup("Cannot load settings."),reason);
361
                }
362
                break;
363
        case SAVEITEM:
364
                if(!gdata->standalone && putfile(
365
                                                                                #ifdef MAC_ENV
366
                                                                                (StringPtr)_strdup("\pSave filter settings"), // "\p" means "Pascal string"
367
                                                                                #else
368
                                                                                (StringPtr)_strdup("\024Save filter settings"),
369
                                                                                #endif
370
                                                                                (StringPtr)_strdup("\0"),
371
                                                                                TEXT_FILETYPE,SIG_SIMPLETEXT,&reply,&sfr,
372
                                                                                "afs","Settings file (.afs, .txt)\0*.afs;*.txt\0\0",1
373
                                                                                #ifdef _WIN32
374
                                                                                ,gdata->hWndMainDlg
375
                                                                                #endif /* _WIN32 */
376
                                                                                )){
377
                        if(savefile(&sfr))
378
                                completesave(&reply);
379
                }
380
                break;
381
        case MAKEITEM:
382
                bak_obfusc = gdata->obfusc;
383
                bak_standalone = gdata->standalone;
384
                bak_parmloaded = gdata->parmloaded;
385
                memcpy(&bak_parm,&gdata->parm,sizeof(PARM_T));
386
 
387
                if( !gdata->standalone && builddialog(gpb) ){
388
                        PLstrcpy(fname,gdata->parm.title);
389
#ifdef MACMACHO
390
                        PLstrcat(fname,(StringPtr)"\p.plugin"); // "\p" means "Pascal string"
391
#endif
392
                        if( putfile(
393
                                                #ifdef MAC_ENV
394
                                                (StringPtr)_strdup("\pMake standalone filter"), // "\p" means "Pascal string"
395
                                                #else
396
                                                (StringPtr)_strdup("\026Make standalone filter"),
397
                                                #endif
398
                                                fname,
399
                                                PS_FILTER_FILETYPE,kPhotoshopSignature,&reply,&sfr,
400
                                                "8bf","Filter plugin file (.8bf)\0*.8bf\0\0",1
401
                                                #ifdef _WIN32
402
                                                ,gdata->hWndMainDlg
403
                                                #endif /* _WIN32 */
404
                                                ))
405
                                make_standalone(&sfr);
406
                }
407
 
408
                gdata->obfusc = bak_obfusc;
409
                gdata->standalone = bak_standalone;
410
                gdata->parmloaded = bak_parmloaded;
411
                memcpy(&gdata->parm, &bak_parm, sizeof(PARM_T));
412
 
413
                break;
414
        case ZOOMINITEM:
415
                zoomfactor = zoomfactor > 2. ? zoomfactor/2. : 1.;
416
                updatezoom(dp);
417
                previewerr = false;
418
                recalc_preview(gpb,dp);
419
                break;
420
        case ZOOMOUTITEM:
421
                zoomfactor *= 2.;
422
                if(zoomfactor > fitzoom)
423
                        zoomfactor = fitzoom;
424
                updatezoom(dp);
425
                previewerr = false;
426
                recalc_preview(gpb,dp);
427
                break;
428
        case ZOOMLEVELITEM:
429
                zoomfactor = zoomfactor > 1. ? 1. : (fitzoom < 1. ? 1. : fitzoom);
430
                updatezoom(dp);
431
                previewerr = false;
432
                recalc_preview(gpb,dp);
433
                break;
434
        case FIRSTCTLITEM:
435
        case FIRSTCTLITEM+1:
436
        case FIRSTCTLITEM+2:
437
        case FIRSTCTLITEM+3:
438
        case FIRSTCTLITEM+4:
439
        case FIRSTCTLITEM+5:
440
        case FIRSTCTLITEM+6:
441
        case FIRSTCTLITEM+7:
442
                slidermoved(dp,item);
443
                recalc_preview(gpb,dp);
444
                break;
445
        case FIRSTCTLTEXTITEM:
446
        case FIRSTCTLTEXTITEM+1:
447
        case FIRSTCTLTEXTITEM+2:
448
        case FIRSTCTLTEXTITEM+3:
449
        case FIRSTCTLTEXTITEM+4:
450
        case FIRSTCTLTEXTITEM+5:
451
        case FIRSTCTLTEXTITEM+6:
452
        case FIRSTCTLTEXTITEM+7:
453
                slidertextchanged(dp,item);
454
                recalc_preview(gpb,dp);
455
                break;
456
        case FIRSTICONITEM:
457
        case FIRSTICONITEM+1:
458
        case FIRSTICONITEM+2:
459
        case FIRSTICONITEM+3:
460
                item -= FIRSTICONITEM;
461
                alertuser(err[item],_strdup(""));
462
                SELECTCTLTEXT(dp,FIRSTEXPRITEM+item,errstart[item],errpos[item]);
463
                break;
464
        case FIRSTEXPRITEM:
465
        case FIRSTEXPRITEM+1:
466
        case FIRSTEXPRITEM+2:
467
        case FIRSTEXPRITEM+3:
468
                if((item-FIRSTEXPRITEM) < nplanes){
469
                        updateexpr(dp,item);
470
                        maindlgupdate(dp);
471
                }
472
                break;
473
        }
474
 
475
        return true; // keep going
476
}
477
 
478
Boolean alertuser(char *err,char *more){
479
        char *s = (char*)malloc(strlen(err)+strlen(more)+2),*q;
480
        Boolean res;
481
 
482
        q = cat(s,err);
483
        *q++ = '\n';
484
        q = cat(q,more);
485
        *q = 0;
486
        res = simplealert(s);
487
        free(s);
488
        return res;
489
}