Subversion Repositories filter_foundry

/*

    This file is part of "Filter Foundry", a filter plugin for Adobe Photoshop

    Copyright (C) 2003-2019 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

*/

/* Portions Copyright 1996 - 1999 Adobe Systems Incorporated                */

/* All Rights Reserved.                                            */

//#include <stdio.h>

//#include "world.h" // must come before Photoshop includes

#include "ff.h"

#include "scripting.h"

//#include "ui.h"

#include "dbg.h"

//extern FilterRecordPtr gpb;

OSErr put_cstring(PIWriteDescriptor token,DescriptorKeyID key,char *s){

        int n = strlen(s);

        Ptr p;

        Handle h = PINEWHANDLE(n);

        p = PILOCKHANDLE(h,false);

        memcpy(p,s,n);

        PIUNLOCKHANDLE(h);

        return PIPutText(token,key,h);

        /* FIXME: not sure if we are supposed to dispose of handle */

}

char *get_cstring(PIReadDescriptor token){

        int n;

        Ptr p;

        char *str = NULL;

        Handle h;

        OSErr e = PIGetText(token,&h);

        if(!e && h){

                n = PIGETHANDLESIZE(h);

                p = PILOCKHANDLE(h,false);

                //sprintf(str,"get_cstring: token=%#x s=%#x h=%#x p=%#x n=%d",token,s,h,p,n); dbg(str);

                if( (str = malloc(n+1)) ){

                        memcpy(str,p,n);

                        str[n] = 0;

                }

                PIUNLOCKHANDLE(h);

                /* FIXME: not sure if we are supposed to dispose of handle */

        }

        return str;

}

/* return true if dialog should be shown */

Boolean ReadScriptParamsOnRead(void)

{

        PIReadDescriptor token;

        DescriptorKeyID key;

        DescriptorTypeID type;

        DescriptorKeyIDArray array = { NULLID };

        int32 flags;

        OSErr stickyError;

        long v;

        if (DescriptorAvailable(NULL)){ /* playing back.  Do our thing. */

                token = OpenReader(array);

                if (token){

                        while (PIGetKey(token, &key, &type, &flags)){

                                switch (key){

                                        case PARAM_R_KEY: expr[0] = get_cstring(token); break;

                                        case PARAM_G_KEY: expr[1] = get_cstring(token); break;

                                        case PARAM_B_KEY: expr[2] = get_cstring(token); break;

                                        case PARAM_A_KEY: expr[3] = get_cstring(token); break;

                                        default:

                                                if(key >= PARAM_CTL0_KEY && key <= PARAM_CTL7_KEY){

                                                        PIGetInt(token,&v);

                                                        slider[key - PARAM_CTL0_KEY] = v;

                                                }

                                                break;

                                }

                        }

                        stickyError = CloseReader(&token); // closes & disposes.

                        // all Filter Foundry parameters are optional,

                        // so we needn't worry if any are missing

                }

                return gpb->descriptorParameters->playInfo == plugInDialogDisplay; /* TRUE if want to show our Dialog */

        }

        return false;

}

OSErr WriteScriptParamsOnRead(void)

{

        PIWriteDescriptor token;

        OSErr gotErr = noErr;

        extern int ctls[],maps[];

        int i,allctls;

        if (DescriptorAvailable(NULL)){ /* recording.  Do our thing. */

                token = OpenWriter();

                if (token){

                        // write keys here

                        if(!gdata->standalone){

                                put_cstring(token, PARAM_R_KEY, expr[0]);

                                put_cstring(token, PARAM_G_KEY, expr[1]);

                                put_cstring(token, PARAM_B_KEY, expr[2]);

                                put_cstring(token, PARAM_A_KEY, expr[3]);

                        }

                        /* only write values for the sliders that are actually used! */

                        allctls = checksliders(4,ctls,maps);

                        for(i = 0; i < 8; ++i)

                                if(allctls || ctls[i])

                                        PIPutInt(token, PARAM_CTL0_KEY+i, slider[i]);

                        gotErr = CloseWriter(&token); /* closes and sets dialog optional */

                        /* done.  Now pass handle on to Photoshop */

                }

        }

        return gotErr;

}

//-------------------------------------------------------------------------------

//

//      HostDescriptorAvailable

//

//      Determines whether the PIDescriptorParameters callback is available.

//

//      Check for valid suite version, routine suite version, and routine count.

//      Also check that the subset of routines we actually use is actually present.

//

//-------------------------------------------------------------------------------

Boolean HostDescriptorAvailable (PIDescriptorParameters *procs,

                                                                 Boolean *outNewerVersion)

{

        if(outNewerVersion)

                *outNewerVersion = procs->descriptorParametersVersion > kCurrentDescriptorParametersVersion

                        || procs->readDescriptorProcs->readDescriptorProcsVersion > kCurrentReadDescriptorProcsVersion

                        || procs->writeDescriptorProcs->writeDescriptorProcsVersion > kCurrentWriteDescriptorProcsVersion ;

        return procs != NULL

                && procs->descriptorParametersVersion == kCurrentDescriptorParametersVersion

                && procs->readDescriptorProcs != NULL

                && procs->readDescriptorProcs->readDescriptorProcsVersion == kCurrentReadDescriptorProcsVersion

                && procs->readDescriptorProcs->numReadDescriptorProcs >= kCurrentReadDescriptorProcsCount

                && procs->readDescriptorProcs->openReadDescriptorProc != NULL

                && procs->readDescriptorProcs->closeReadDescriptorProc != NULL

                && procs->readDescriptorProcs->getKeyProc != NULL

                && procs->readDescriptorProcs->getTextProc != NULL

                && procs->readDescriptorProcs->getIntegerProc != NULL

                && procs->writeDescriptorProcs != NULL

                && procs->writeDescriptorProcs->writeDescriptorProcsVersion == kCurrentWriteDescriptorProcsVersion

                && procs->writeDescriptorProcs->numWriteDescriptorProcs >= kCurrentWriteDescriptorProcsCount

                && procs->writeDescriptorProcs->openWriteDescriptorProc != NULL

                && procs->writeDescriptorProcs->closeWriteDescriptorProc != NULL

                && procs->writeDescriptorProcs->putTextProc != NULL

                && procs->writeDescriptorProcs->putIntegerProc != NULL ;

}

//-------------------------------------------------------------------------------

//

//      HostCloseReader

//

//      Closes a read token, disposes its handle, sets the token to NULL, and

//      sets the parameter blocks' descriptor to NULL.

//

//      The Descriptor Parameters suite are callbacks designed for

//      scripting and automation.  See PIActions.h.

//

//      Inputs:

//              PIDescriptorParameters *procs   Pointer to Descriptor Parameters suite.

//

//              HandleProcs *hProcs                             Pointer to HandleProcs callback.

//

//              PIReadDescriptor *token                 Pointer to token to close.

//

//              procs->descriptor                               Pointer to original read handle.

//

//      Outputs:

//              PIReadDescriptor *token                 Set to NULL.

//

//              procs->descriptor                               Disposed then set to NULL.

//

//              returns OSErr                                   noErr or error if one occurred.

//

//-------------------------------------------------------------------------------

OSErr HostCloseReader (PIDescriptorParameters *procs,

                                           HandleProcs *hProcs,

                                           PIReadDescriptor *token)

{

        // Close token:

        OSErr err = procs->readDescriptorProcs->closeReadDescriptorProc(*token);

        // Dispose the parameter block descriptor:

        hProcs->disposeProc(procs->descriptor);

        // Set the descriptor and the read token to NULL:

        procs->descriptor = NULL;

        *token = NULL;

        return err;

} // end HostCloseReader

//-------------------------------------------------------------------------------

//

//      HostCloseWriter

//

//      Closes a write token, stores its handle in the global parameter block for

//      the host to use, sets the token to NULL, and sets the recordInfo to

//      plugInDialogOptional (the default).

//

//      The Descriptor Parameters suite are callbacks designed for

//      scripting and automation.  See PIActions.h.

//

//      Inputs:

//              PIDescriptorParameters *procs   Pointer to Descriptor Parameters suite.

//

//              HandleProcs *hProcs                             Pointer to HandleProcs callback.

//

//              PIWriteDescriptor *token                Pointer to token to close and pass on.

//

//              procs->descriptor                               Should be NULL.  If not, its contents

//                                                                              will be disposed and replaced.

//

//      Outputs:

//              PIWriteDescriptor *token                Set to NULL.

//

//              procs->descriptor                               Set to descriptor handle.

//

//              returns OSErr                                   noErr or error if one occurred.

//

//-------------------------------------------------------------------------------

OSErr   HostCloseWriter(PIDescriptorParameters *procs,

                                                HandleProcs *hProcs,

                                                PIWriteDescriptor *token)

{

        OSErr err = noErr; // assume no error

        PIDescriptorHandle h = NULL;

        if (procs->descriptor != NULL) // don't need descriptor passed to us

                hProcs->disposeProc(procs->descriptor); // dispose.

        procs->writeDescriptorProcs->closeWriteDescriptorProc(*token, &h);

        procs->descriptor = h;

        // Set recordInfo to default.  Options are: plugInDialogOptional,

        // plugInDialogRequire, plugInDialogNone:

        procs->recordInfo = plugInDialogOptional;

        *token = NULL;

        return err;

} // end HostCloseWriter