/*
This file is part of "Filter Foundry", a filter plugin for Adobe Photoshop
Copyright (C) 2003-5 Toby Thain, toby@telegraphics.com.au
This program is free software; you can redistribute it and/or modify
it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2 of the License, or
(at your option) any later version.
This program is distributed in the hope that it will be useful,
but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with this program; if not, write to the Free Software
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
*/
//#include <stdio.h>
//#include <sound.h>
#include "ff.h"
#include "node.h"
#include "y.tab.h"
#include "scripting.h"
struct node *tree[4];
char *err[4];
int errpos[4],errstart[4],nplanes,srcradused,chunksize,toprow;
value_type slider[8],cell[0x100],map[4][0x100];
char *expr[4],*defaultexpr[]={"r","g","b","a"};
#ifdef MAC_ENV
#define hDllInstance NULL /* fake this Windows-only global */
#endif
extern struct sym_rec predefs[];
extern int nplanes,varused[],srcradused;
globals_t *gdata;
FilterRecordPtr gpb;
int checkandinitparams(Handle params);
DLLEXPORT MACPASCAL
void ENTRYPOINT(short selector,FilterRecordPtr pb,long *data,short *result){
OSErr e = noErr;
static Boolean wantdialog = false;
EnterCodeResource();
gpb = pb;
if(!*data){
gdata
= (globals_t
*)( *data
= (long)malloc(sizeof(globals_t
)) ) ; gdata->standalone = gdata->parmloaded = false;
}else
gdata = (globals_t*)*data;
nplanes = MIN(pb->planes,4);
switch (selector){
case filterSelectorAbout:
DoAbout((AboutRecordPtr)pb);
break;
case filterSelectorParameters:
// dbg("filterSelectorParameters");
wantdialog = true;
break;
case filterSelectorPrepare:
// dbg("filterSelectorPrepare");
DoPrepare(pb);
init_symtab(predefs); // ready for parser calls
break;
case filterSelectorStart:
// dbg("filterSelectorStart");
if(!pb->parameters){
//dbg("pb->parameters = PINEWHANDLE(0)"),
pb->parameters = PINEWHANDLE(0); /* initialise the parameter handle that Photoshop keeps for us */
if(!pb->parameters) dbg("filterSelectorStart NULL handle @ PINEWHANDLE(0)");
}
wantdialog |= checkandinitparams(pb->parameters);
/* wantdialog = false means that we never got a Parameters call, so we're not supposed to ask user */
if( wantdialog && (!gdata->standalone || gdata->parm.popDialog) ){
if( maindialog(pb) ){
//dbg("maindialog OK!");
/* update stored parameters from new user settings */
saveparams(pb->parameters);
}else
e = userCanceledErr;
}
wantdialog = false;
if(!e){
if(setup(pb)){
DoStart(pb);
}else{
SYSBEEP(1);
e = filterBadParameters;
}
}
break;
case filterSelectorContinue:
e = DoContinue(pb);
break;
case filterSelectorFinish:
DoFinish(pb);
break;
default:
e = filterBadParameters;
}
*result = e;
ExitCodeResource();
}
int checkandinitparams(Handle params){
char *reasonstr,*reason;
int i,f;
if( f = !(params && readparams(params,false,&reasonstr)) ){
/* either the parameter handle was uninitialised,
or the parameter data couldn't be read; set default values */
if(readPARMresource(hDllInstance,&reason))
gdata->standalone = true;
else{
//dbg("checkandinitparams: setting DEFAULTS!");
/* no scripted parameters - dialog wanted */
for(i=0;i<8;++i)
slider[i] = i*10+100;
for(i=4;i--;)
expr[i] = my_strdup(defaultexpr[i]);
}
}
/* sanity check for NULL expression pointers (?) */
for(i=4;i--;)
if(!expr[i]) expr[i] = my_strdup(defaultexpr[i]);
saveparams(params); /* keep what we got */
return f;
}
void DoPrepare(FilterRecordPtr pb){
int i;
for(i=4;i--;){
if(expr[i]||tree[i]) DBG("expr[] or tree[] non-NULL in Prepare!");
expr[i] = NULL;
tree[i] = NULL;
}
// pb->maxSpace = 256L<<10; /* nominal memory, neither here nor there */
}
void RequestNext(FilterRecordPtr pb,long toprow){
/* Request next block of the image */
pb->inLoPlane = pb->outLoPlane = 0;
pb->inHiPlane = pb->outHiPlane = nplanes-1;
if(srcradused){
SETRECT(pb->inRect,0,0,pb->imageSize.h,pb->imageSize.v);
}else{
pb->inRect.left = pb->filterRect.left;
pb->inRect.right = pb->filterRect.right;
pb->inRect.top = toprow;
pb->inRect.bottom = MIN(toprow + chunksize,pb->filterRect.bottom);
}
pb->outRect = pb->inRect;
/*
{char s[0x100];sprintf(s,"RequestNext srcradused=%d inRect=(%d,%d,%d,%d) filterRect=(%d,%d,%d,%d)",
srcradused,
pb->inRect.left,pb->inRect.top,pb->inRect.right,pb->inRect.bottom,
pb->filterRect.left,pb->filterRect.top,pb->filterRect.right,pb->filterRect.bottom);dbg(s);}
*/
}
void DoStart(FilterRecordPtr pb){
//dbg("DoStart");
/* if src() or rad() functions are used, random access to the image data is required,
so we must request the entire image in a single chunk. */
chunksize = srcradused ? (pb->filterRect.bottom - pb->filterRect.top) : CHUNK_ROWS;
toprow = pb->filterRect.top;
RequestNext(pb,toprow);
}
OSErr DoContinue(FilterRecordPtr pb){
OSErr e = noErr;
Rect *fr = srcradused ? &pb->filterRect : &pb->inRect;
long outoffset = (long)pb->outRowBytes*(fr->top - pb->outRect.top)
+ (long)nplanes*(fr->left - pb->outRect.left);
// {char s[0x100];sprintf(s,"DoContinue: outoffset=%d\n",outoffset);dbg(s);}
if(!(e = process_scaled(pb,true,
&pb->inRect,
fr,
fr,//&pb->outRect,
(Ptr)pb->outData+outoffset,pb->outRowBytes, 1.))){
toprow += chunksize;
if(toprow < pb->filterRect.bottom)
RequestNext(pb,toprow);
else{
SETRECT(pb->inRect,0,0,0,0);
pb->outRect = pb->maskRect = pb->inRect;
}
}
return e;
}
void DoFinish(FilterRecordPtr pb){
int i;
WriteScriptParamsOnRead();
for(i=4;i--;){
freetree(tree[i]);
if(expr
[i
]) free(expr
[i
]); }
}