Updating pdp version to 0.12.2

svn path=/trunk/externals/pdp/; revision=942

1 files changed, 183 insertions, 0 deletions

diff --git a/opengl/modules/pdp_3d_dlist.c b/opengl/modules/pdp_3d_dlist.c
new file mode 100644
index 0000000..9f087e0
--- /dev/null
+++ b/opengl/modules/pdp_3d_dlist.c
@@ -0,0 +1,183 @@
+/*
+ *   Pure Data Packet module.
+ *   Copyright (c) by Tom Schouten <pdp@zzz.kotnet.org>
+ *
+ *   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., 675 Mass Ave, Cambridge, MA 02139, USA.
+ *
+ */
+
+
+#include <GL/gl.h>
+
+#include "pdp_opengl.h"
+#include "pdp_3dp_base.h"
+
+/* gl display list compilation & execution */
+
+typedef struct pdp_3d_dlist_struct
+{
+    t_pdp_3dp_base x_base;
+
+    GLuint x_dlist;
+    int x_compile;
+
+} t_pdp_3d_dlist;
+
+
+
+static void pdp_3d_dlist_complete_notify(t_pdp_3d_dlist *x)
+{
+    /* disable the second outlet */
+    pdp_3dp_base_enable_outlet(x, 0, 0);
+}
+
+static void pdp_3d_dlist_compile(t_pdp_3d_dlist *x)
+{
+    //x->x_compile = 1;
+    /* enable the second outlet */
+    pdp_3dp_base_enable_outlet(x, 0, 1);
+}
+
+static void pdp_3d_dlist_process_start(t_pdp_3d_dlist *x)
+{
+    int p = pdp_3dp_base_get_context_packet(x);
+    if (-1 != p){
+
+	/* check if pbuf */
+	if (pdp_packet_3Dcontext_isvalid(p)){
+
+	    /* set context */
+	    //pdp_pbuf_set_rendering_context(p);
+
+	    /* display list needs to be created in the correct context
+	       if we don't have one yet, create it */
+	    if (!x->x_dlist) x->x_dlist = glGenLists(1);
+
+	    
+
+	    /* start the list */ /* $$$TODO: error checking for recursion */
+	    x->x_compile = 1;
+	    glNewList(x->x_dlist, GL_COMPILE_AND_EXECUTE);
+	    //glNewList(x->x_dlist, GL_COMPILE);
+
+	    //post("compiling");
+
+	    
+	}
+    }
+}
+
+static void pdp_3d_dlist_process_cleanup(t_pdp_3d_dlist *x)
+{
+    int p = pdp_3dp_base_get_context_packet(x);
+    if (-1 != p){
+
+	/* check if pbuf */
+	if (pdp_packet_3Dcontext_isvalid(p)){
+
+	    /* end list if we're compiling */
+	    if (x->x_compile){
+		
+		/* end the list */
+		glEndList();
+		
+		/* use the list next time */
+		x->x_compile = 0;
+
+		//post("ending compile");
+
+	    }
+
+	    /* or execute the old one */
+	    else {
+		if (x->x_dlist) {
+		    //post("calling dlist %d", x->x_dlist);
+		    glCallList(x->x_dlist);
+		}
+		
+	    }
+
+
+	}
+    }
+}
+
+
+
+
+t_class *pdp_3d_dlist_class;
+
+
+
+void pdp_3d_dlist_free(t_pdp_3d_dlist *x)
+{
+    pdp_3dp_base_free(x);
+    if (x->x_dlist) glDeleteLists(x->x_dlist, 1);
+}
+
+void *pdp_3d_dlist_new(t_symbol *s)
+{
+    t_pdp_3d_dlist *x = (t_pdp_3d_dlist *)pd_new(pdp_3d_dlist_class);
+
+    /* super init */
+    pdp_3dp_base_init(x);
+
+
+    /* io & callbacks */
+    pdp_3dp_base_add_outlet(x, (t_pdp_method)pdp_3d_dlist_process_start, 0);
+    pdp_3dp_base_add_cleanup(x, (t_pdp_method)pdp_3d_dlist_process_cleanup, 0);
+    pdp_3dp_base_register_complete_notify(x, (t_pdp_method)pdp_3d_dlist_complete_notify);
+
+    /* disable the second outlet */
+    pdp_3dp_base_enable_outlet(x, 1, 0);
+
+
+    /* create dlist */
+    x->x_dlist = 0;
+    x->x_compile = 0;
+
+    /* compile the first packet */
+    pdp_3d_dlist_compile(x);
+
+    return (void *)x;
+}
+
+
+#ifdef __cplusplus
+extern "C"
+{
+#endif
+
+
+void pdp_3d_dlist_setup(void)
+{
+
+
+    pdp_3d_dlist_class = class_new(gensym("pdp_3d_dlist"), (t_newmethod)pdp_3d_dlist_new,
+    	(t_method)pdp_3d_dlist_free, sizeof(t_pdp_3d_dlist), 0, A_DEFSYMBOL, A_NULL);
+
+    class_addcreator((t_newmethod)pdp_3d_dlist_new, gensym("3dp_dlist"), A_DEFSYMBOL, A_NULL);
+
+    pdp_3dp_base_setup(pdp_3d_dlist_class);
+
+    class_addmethod(pdp_3d_dlist_class, (t_method)pdp_3d_dlist_compile, gensym("compile"), A_NULL);
+
+
+
+}
+
+#ifdef __cplusplus
+}
+#endif