j.max.stencil.cpp

Go to the documentation of this file.

/** @file
 *
 * @ingroup implementationMaxExternalsJitter
 *
 * @brief j.stencil% : Perform operations on a stencil of points in a matrix
 *
 * @details This is the max wrapper
 *
 * @authors Tim Place, Trond Lossius
 *
 * @copyright © 2011 by Timothy Place @n
 * This code is licensed under the terms of the "New BSD License" @n
 * http://creativecommons.org/licenses/BSD/
 */


#include "jit.common.h"
#include "max.jit.mop.h"
#include "TTClassWrapperMax.h"


// types and structures
typedef struct _jcom_max_stencil {
    Object  ob;
    Ptr     obex;
} MaxStencilObject;

typedef MaxStencilObject* MaxStencilObjectPtr;


// method prototypes
t_jit_err   StencilClassInit    (void);
TTPtr       MaxStencilNew       (t_symbol *s, long argc, t_atom *argv);
void        MaxStencilFree      (MaxStencilObjectPtr self);


// globals
static ClassPtr sMaxStencilClass = NULL;


/************************************************************************************/

int TTCLASSWRAPPERMAX_EXPORT main(void)
{
    void *p, *q;
    
    TTFoundationInit();
    StencilClassInit(); 
    setup((t_messlist**)&sMaxStencilClass, (method)MaxStencilNew, (method)MaxStencilFree, sizeof(MaxStencilObject), 0, A_GIMME, 0);
    
    p = max_jit_classex_setup(calcoffset(MaxStencilObject, obex));
    q = jit_class_findbyname(gensym("j_stencil"));    
    max_jit_classex_mop_wrap(p, q, 0);                          // attrs & methods for name, type, dim, planecount, bang, outputmatrix, etc
    max_jit_classex_standard_wrap(p, q, 0);                     // attrs & methods for getattributes, dumpout, maxjitclassaddmethods, etc
    addmess((method)max_jit_mop_assist, (char*)"assist", A_CANT, 0);    // standard matrix-operator (mop) assist fn
    return 0;
}



/************************************************************************************/
// Object Life Cycle

void *MaxStencilNew(t_symbol *s, long argc, t_atom *argv)
{
    MaxStencilObjectPtr self;
    void                *o;
    
    self = (MaxStencilObjectPtr)max_jit_obex_new(sMaxStencilClass, gensym("j_stencil"));
    if (self) {
        o = jit_object_new(gensym("j_stencil"));
        if (o) {
            max_jit_mop_setup_simple(self, o, argc, argv);          
            max_jit_attr_args(self, argc, argv);
        } 
        else {
            jit_object_error(SELF, (char*)"could not allocate object");
            object_free(SELF);
            self = NULL;
        }
    }
    return self;
}


void MaxStencilFree(MaxStencilObjectPtr self)
{
    max_jit_mop_free(self);
    jit_object_free(max_jit_obex_jitob_get(self));
    max_jit_obex_free(self);
}