Updated for PiDiP 0.12.6

svn path=/trunk/externals/pidip/; revision=994

1 files changed, 411 insertions, 5 deletions

diff --git a/modules/pdp_imgloader.c b/modules/pdp_imgloader.c
index 13cae1e..fbc0714 100644
--- a/modules/pdp_imgloader.c
+++ b/modules/pdp_imgloader.c
@@ -28,8 +28,21 @@
 #include <ctype.h>
 #include <Imlib2.h>  // imlib2 is required
 
+#define MAX_ZONES 20
+
 static char   *pdp_imgloader_version = "pdp_imgloader: version 0.1 : image loading object written by ydegoyon@free.fr ";
 
+typedef struct _triangle
+{
+  t_int used;
+  t_int x1, y1;
+  t_int x2, y2;
+  t_int x3, y3;
+  t_float a1, b1;
+  t_float a2, b2;
+  t_float a3, b3;
+} t_triangle;
+
 typedef struct pdp_imgloader_struct
 {
     t_object x_obj;
@@ -56,6 +69,9 @@ typedef struct pdp_imgloader_struct
 
     t_float     x_blend;
 
+    t_triangle  x_hiddenzones[ MAX_ZONES ]; // hide these parts of the image
+    unsigned char *x_mask;
+
 } t_pdp_imgloader;
 
         /* load an image */
@@ -67,6 +83,7 @@ static void pdp_imgloader_load(t_pdp_imgloader *x, t_symbol *filename, t_floatar
 
    if ( x->x_image != NULL ) 
    {
+      imlib_context_set_image(x->x_image);
       imlib_free_image();
    }
    x->x_image = imlib_load_image_with_error_return( filename->s_name, &imliberr );
@@ -103,15 +120,378 @@ static void pdp_imgloader_blend(t_pdp_imgloader *x, t_floatarg fblend )
    }
 }
 
-static void pdp_imgloader_clear(t_pdp_imgloader *x )
+static t_int pdp_imgloader_isinzone(t_pdp_imgloader *x, t_int px, t_int py, t_int index)
 {
-   if ( x->x_image != NULL ) 
+  t_int c1=0, c2=0, c3=0;
+
+   if ( !x->x_hiddenzones[index].used )
    {
-      imlib_free_image();
+     return 0;
+   }
+   if ( px < x->x_hiddenzones[index].x1 )
+   {
+     return 0;
+   }
+   if ( px > x->x_hiddenzones[index].x3 )
+   {
+     return 0;
    }
+   if ( py < x->x_hiddenzones[index].y1 && 
+        py < x->x_hiddenzones[index].y2 &&
+        py < x->x_hiddenzones[index].y3 )
+   {
+     return 0;
+   }
+   if ( py > x->x_hiddenzones[index].y1 && 
+        py > x->x_hiddenzones[index].y2 &&
+        py > x->x_hiddenzones[index].y3 )
+   {
+     return 0;
+   }
+   if ( ( ( x->x_hiddenzones[index].x2 - x->x_hiddenzones[index].x1 ) == 0 ) && 
+	( px >= x->x_hiddenzones[index].x1 ) )
+   {
+      c1 = 1;
+   }
+   else
+   {
+      if ( x->x_hiddenzones[index].a1 == 0 )
+      {
+	 if ( ( x->x_hiddenzones[index].y3 >= x->x_hiddenzones[index].y1 ) &&
+              ( py >= x->x_hiddenzones[index].y1 ))
+	 {
+            c1 = 1;
+	 }
+	 if ( ( x->x_hiddenzones[index].y3 <= x->x_hiddenzones[index].y1 ) &&
+              ( py <= x->x_hiddenzones[index].y1 ))
+	 {
+            c1 = 1;
+	 }
+      }
+      else
+      {
+         if ( ( ( (float) py ) - ( x->x_hiddenzones[index].a1*((float)px)+ x->x_hiddenzones[index].b1 ) )* 
+              ( ( (float) x->x_hiddenzones[index].y3 ) - 
+		( x->x_hiddenzones[index].a1*((float)x->x_hiddenzones[index].x3)+ 
+		  x->x_hiddenzones[index].b1 ) ) >= 0.0 )
+         {
+            c1 = 1;
+         } 
+      } 
+   }
+   if ( ( ( x->x_hiddenzones[index].x3 - x->x_hiddenzones[index].x2 ) == 0 ) && 
+	( px <= x->x_hiddenzones[index].x2 ) )
+   {
+      c2 = 1;
+   }
+   else
+   {
+      if ( x->x_hiddenzones[index].a2 == 0 )
+      {
+	 if ( ( x->x_hiddenzones[index].y1 >= x->x_hiddenzones[index].y2 ) &&
+              ( py >= x->x_hiddenzones[index].y2 ))
+	 {
+            c2 = 1;
+	 }
+	 if ( ( x->x_hiddenzones[index].y1 <= x->x_hiddenzones[index].y2 ) &&
+              ( py <= x->x_hiddenzones[index].y2 ))
+	 {
+            c2 = 1;
+	 }
+      }
+      else
+      {
+         if ( ( ( (float) py ) - ( x->x_hiddenzones[index].a2*((float)px)+ x->x_hiddenzones[index].b2 ) )* 
+              ( ( (float) x->x_hiddenzones[index].y1 ) - 
+		( x->x_hiddenzones[index].a2*((float)x->x_hiddenzones[index].x1)+ 
+		  x->x_hiddenzones[index].b2 ) ) >= 0.0 )
+         {
+            c2 = 1;
+         } 
+      } 
+   }
+   if ( ( ( x->x_hiddenzones[index].x3 - x->x_hiddenzones[index].x1 ) == 0 ) && 
+	( px >= x->x_hiddenzones[index].x1 ) )
+   {
+      c3 = 1;
+   }
+   else
+   {
+      if ( x->x_hiddenzones[index].a3 == 0 )
+      {
+	 if ( ( x->x_hiddenzones[index].y2 >= x->x_hiddenzones[index].y1 ) &&
+              ( py >= x->x_hiddenzones[index].y1 ))
+	 {
+            c3 = 1;
+	 }
+	 if ( ( x->x_hiddenzones[index].y2 <= x->x_hiddenzones[index].y1 ) &&
+              ( py <= x->x_hiddenzones[index].y1 ))
+	 {
+            c3 = 1;
+	 }
+      }
+      else
+      {
+         if ( ( ( (float) py ) - ( x->x_hiddenzones[index].a3*((float)px)+ x->x_hiddenzones[index].b3 ) )* 
+              ( ( (float) x->x_hiddenzones[index].y2 ) - 
+		( x->x_hiddenzones[index].a3*((float)x->x_hiddenzones[index].x2)+ 
+		  x->x_hiddenzones[index].b3 ) ) >= 0.0 )
+         {
+            c3 = 1;
+         } 
+      } 
+   }
+
+   return c1 && c2 && c3;
+}
+
+static t_int pdp_imgloader_ishidden(t_pdp_imgloader *x, t_int px, t_int py)
+{
+  t_int ti;
+
+    for ( ti=0; ti<MAX_ZONES; ti++ )
+    {
+       if ( x->x_hiddenzones[ti].used )
+       {
+          if ( pdp_imgloader_isinzone( x, px, py, ti ) )
+	  {
+             return 1;
+	  }
+       }
+    }
+    return 0;
+}
+
+static void pdp_imgloader_update_mask(t_pdp_imgloader *x )
+{
+  t_int px, py;
+
+  for ( py=0; py<x->x_vheight; py++ )
+  {
+    for ( px=0; px<x->x_vwidth; px++ )
+    {
+      *(x->x_mask+py*x->x_vwidth+px) = (unsigned char) pdp_imgloader_ishidden( x, px, py );
+    }
+  }
+}
+
+static void pdp_imgloader_hide(t_pdp_imgloader *x, t_symbol *s, int argc, t_atom *argv)
+{
+  t_int ti;
+  t_float fx1, fy1, fx2, fy2, fx3, fy3;
+
+   if ( argc != 6 )
+   {
+     post( "pdp_imgloader : hide : wrong number of arguments : %d", argc );
+     return;
+   }
+   if ( argv[0].a_type != A_FLOAT || argv[1].a_type != A_FLOAT || argv[2].a_type != A_FLOAT ||
+        argv[3].a_type != A_FLOAT || argv[4].a_type != A_FLOAT || argv[5].a_type != A_FLOAT ) {
+     post( "pdp_imgloader : hide : wrong arguments" );
+     return;
+   }
+
+   fx1 = argv[0].a_w.w_float;
+   fy1 = argv[1].a_w.w_float;
+   fx2 = argv[2].a_w.w_float;
+   fy2 = argv[3].a_w.w_float;
+   fx3 = argv[4].a_w.w_float;
+   fy3 = argv[5].a_w.w_float;
+
+   if ( ( (int)fx1 >= 0 ) && ( (int)fx1 < x->x_vwidth ) && 
+        ( (int)fx2 >= 0 ) && ( (int)fx2 < x->x_vwidth ) &&
+        ( (int)fx3 >= 0 ) && ( (int)fx3 < x->x_vwidth ) &&
+        ( (int)fy1 >= 0 ) && ( (int)fy1 < x->x_vheight ) &&
+        ( (int)fy2 >= 0 ) && ( (int)fy2 < x->x_vheight ) &&
+        ( (int)fy3 >= 0 ) && ( (int)fy3 < x->x_vheight ) )
+   {
+     post( "pdp_imgloader : hide : coordinates : %d %d %d %d %d %d",
+                (int)fx1, (int)fy1, (int)fx2, (int)fy2, (int)fx3, (int)fy3 );
+     for ( ti=0; ti<MAX_ZONES; ti++ )
+     {
+        if ( !x->x_hiddenzones[ti].used )
+	{
+           x->x_hiddenzones[ti].used = 1;
+	   if ( (int) fx1 < (int) fx2 )
+	   {
+              if ( (int) fx2 < (int) fx3 )
+              {
+                x->x_hiddenzones[ti].x1 = (int) fx1;
+                x->x_hiddenzones[ti].y1 = (int) fy1;
+                x->x_hiddenzones[ti].x2 = (int) fx2;
+                x->x_hiddenzones[ti].y2 = (int) fy2;
+                x->x_hiddenzones[ti].x3 = (int) fx3;
+                x->x_hiddenzones[ti].y3 = (int) fy3;
+              }
+	      else
+              {
+                if ( (int) fx3 < (int) fx1 )
+                {
+                  x->x_hiddenzones[ti].x1 = (int) fx3;
+                  x->x_hiddenzones[ti].y1 = (int) fy3;
+                  x->x_hiddenzones[ti].x2 = (int) fx1;
+                  x->x_hiddenzones[ti].y2 = (int) fy1;
+                  x->x_hiddenzones[ti].x3 = (int) fx2;
+                  x->x_hiddenzones[ti].y3 = (int) fy2;
+                }
+                else
+                {
+                  x->x_hiddenzones[ti].x1 = (int) fx1;
+                  x->x_hiddenzones[ti].y1 = (int) fy1;
+                  x->x_hiddenzones[ti].x2 = (int) fx3;
+                  x->x_hiddenzones[ti].y2 = (int) fy3;
+                  x->x_hiddenzones[ti].x3 = (int) fx2;
+                  x->x_hiddenzones[ti].y3 = (int) fy2;
+                }
+              }
+	   }
+	   else
+	   {
+              if ( (int) fx2 < (int) fx3 )
+              {
+                if ( (int) fx3 < (int) fx1 )
+                {
+                  x->x_hiddenzones[ti].x1 = (int) fx2;
+                  x->x_hiddenzones[ti].y1 = (int) fy2;
+                  x->x_hiddenzones[ti].x2 = (int) fx3;
+                  x->x_hiddenzones[ti].y2 = (int) fy3;
+                  x->x_hiddenzones[ti].x3 = (int) fx1;
+                  x->x_hiddenzones[ti].y3 = (int) fy1;
+                }
+                else
+                {
+                  x->x_hiddenzones[ti].x1 = (int) fx2;
+                  x->x_hiddenzones[ti].y1 = (int) fy2;
+                  x->x_hiddenzones[ti].x2 = (int) fx1;
+                  x->x_hiddenzones[ti].y2 = (int) fy1;
+                  x->x_hiddenzones[ti].x3 = (int) fx3;
+                  x->x_hiddenzones[ti].y3 = (int) fy3;
+                }
+              }
+	      else
+              {
+                x->x_hiddenzones[ti].x1 = (int) fx3;
+                x->x_hiddenzones[ti].y1 = (int) fy3;
+                x->x_hiddenzones[ti].x2 = (int) fx2;
+                x->x_hiddenzones[ti].y2 = (int) fy2;
+                x->x_hiddenzones[ti].x3 = (int) fx1;
+                x->x_hiddenzones[ti].y3 = (int) fy1;
+              }
+	   }
+	   post( "pdp_imgloader : hiding : [%d,%d]/[%d,%d]/[%d,%d], ", 
+                           x->x_hiddenzones[ti].x1, x->x_hiddenzones[ti].y1,
+                           x->x_hiddenzones[ti].x2, x->x_hiddenzones[ti].y2,
+                           x->x_hiddenzones[ti].x3, x->x_hiddenzones[ti].y3 );
+           if ( (x->x_hiddenzones[ti].x2-x->x_hiddenzones[ti].x1) != 0 )
+	   {
+             x->x_hiddenzones[ti].a1 = 
+		    ( ( (float) x->x_hiddenzones[ti].y2 ) - ( (float) x->x_hiddenzones[ti].y1 ) ) /
+		    ( ( (float) x->x_hiddenzones[ti].x2 ) - ( (float) x->x_hiddenzones[ti].x1 ) );
+             x->x_hiddenzones[ti].b1 = 
+		    ( ( (float) x->x_hiddenzones[ti].y1 )*( (float) x->x_hiddenzones[ti].x2 ) - 
+		      ( (float) x->x_hiddenzones[ti].y2 )*( (float) x->x_hiddenzones[ti].x1 ) ) /
+		    ( ( (float) x->x_hiddenzones[ti].x2 ) - ( (float) x->x_hiddenzones[ti].x1 ) );
+	   }
+           if ( (x->x_hiddenzones[ti].x2-x->x_hiddenzones[ti].x3) != 0 )
+	   {
+             x->x_hiddenzones[ti].a2 = 
+		    ( ( (float) x->x_hiddenzones[ti].y3 ) - ( (float) x->x_hiddenzones[ti].y2 ) ) /
+		    ( ( (float) x->x_hiddenzones[ti].x3 ) - ( (float) x->x_hiddenzones[ti].x2 ) );
+             x->x_hiddenzones[ti].b2 = 
+		    ( ( (float) x->x_hiddenzones[ti].y3 )*( (float) x->x_hiddenzones[ti].x2 ) - 
+		      ( (float) x->x_hiddenzones[ti].y2 )*( (float) x->x_hiddenzones[ti].x3 ) ) /
+		    ( ( (float) x->x_hiddenzones[ti].x2 ) - ( (float) x->x_hiddenzones[ti].x3 ) );
+	   }
+           if ( (x->x_hiddenzones[ti].x3-x->x_hiddenzones[ti].x1) != 0 )
+	   {
+             x->x_hiddenzones[ti].a3 = 
+		    ( ( (float) x->x_hiddenzones[ti].y3 ) - ( (float) x->x_hiddenzones[ti].y1 ) ) /
+		    ( ( (float) x->x_hiddenzones[ti].x3 ) - ( (float) x->x_hiddenzones[ti].x1 ) );
+             x->x_hiddenzones[ti].b3 = 
+		    ( ( (float) x->x_hiddenzones[ti].y1 )*( (float) x->x_hiddenzones[ti].x3 ) - 
+		      ( (float) x->x_hiddenzones[ti].y3 )*( (float) x->x_hiddenzones[ti].x1 ) ) /
+		    ( ( (float) x->x_hiddenzones[ti].x3 ) - ( (float) x->x_hiddenzones[ti].x1 ) );
+	   }
+	   post( "pdp_imgloader : hiding : a1=%f b1=%f",
+			   x->x_hiddenzones[ti].a1, x->x_hiddenzones[ti].b1 );
+	   post( "pdp_imgloader : hiding : a2=%f b2=%f",
+			   x->x_hiddenzones[ti].a2, x->x_hiddenzones[ti].b2 );
+	   post( "pdp_imgloader : hiding : a3=%f b3=%f",
+			   x->x_hiddenzones[ti].a3, x->x_hiddenzones[ti].b3 );
+	   pdp_imgloader_update_mask( x );
+	   return;
+	}
+	if ( x->x_hiddenzones[ti].used && ( ti == MAX_ZONES-1 ) )
+        {
+           post( "pdp_imgloader : hidden zones table is full" );
+           return;
+        }
+     }
+   }
+   else
+   {
+     post( "pdp_imgloader : hide : wrong coordinates : %d %d %d %d %d %d (width=%d) (height=%d)",
+                (int)fx1, (int)fy1, (int)fx2, (int)fy2, (int)fx3, (int)fy3, x->x_vwidth, x->x_vheight );
+     return;
+   }
+}
+
+static void pdp_imgloader_rawhide(t_pdp_imgloader *x, t_symbol *s, int argc, t_atom *argv)
+{
+   if ( (x->x_vwidth == 0) || ( x->x_vheight == 0 ) )
+   {
+     post( "pdp_imgloader : rawhide : no video loaded" );
+     return;
+   }
+
+   argv[0].a_w.w_float *= x->x_vwidth;
+   argv[1].a_w.w_float *= x->x_vheight;
+   argv[2].a_w.w_float *= x->x_vwidth;
+   argv[3].a_w.w_float *= x->x_vheight;
+   argv[4].a_w.w_float *= x->x_vwidth;
+   argv[5].a_w.w_float *= x->x_vheight;
+
+   post( "pdp_imgloader : rawhide : coordinates : %f %f %f %f %f %f (width=%d) (height=%d)",
+         argv[0].a_w.w_float, argv[1].a_w.w_float, argv[2].a_w.w_float,
+         argv[3].a_w.w_float, argv[4].a_w.w_float, argv[5].a_w.w_float,
+	 x->x_vwidth, x->x_vheight );
+
+   pdp_imgloader_hide( x, s, argc, argv );
+}
+
+static void pdp_imgloader_unhide(t_pdp_imgloader *x, t_floatarg findex )
+{
+  if ( ( (int) findex < 0 ) || ( (int) findex >= MAX_ZONES ) )
+  {
+     post( "pdp_imgloader : unhide : wrong index" );
+     return;
+  }
+  x->x_hiddenzones[(int)findex].used = 0;
+  pdp_imgloader_update_mask( x );
+}
+
+static void pdp_imgloader_clear(t_pdp_imgloader *x )
+{
+   //if ( x->x_image != NULL ) 
+   //{
+   //   imlib_free_image();
+   //}
    x->x_image = NULL;
 }
 
+static void pdp_imgloader_free_ressources(t_pdp_imgloader *x )
+{
+    if ( x->x_mask != NULL )
+    {
+       freebytes( x->x_mask, x->x_vsize );
+    }
+}
+
+static void pdp_imgloader_allocate(t_pdp_imgloader *x )
+{
+    x->x_mask = (unsigned char*)getbytes( x->x_vsize );
+}
+
 static void pdp_imgloader_process_yv12(t_pdp_imgloader *x)
 {
     t_pdp     *header = pdp_packet_header(x->x_packet0);
@@ -126,9 +506,11 @@ static void pdp_imgloader_process_yv12(t_pdp_imgloader *x)
     if ( ( (int)(header->info.image.width) != x->x_vwidth ) ||
          ( (int)(header->info.image.height) != x->x_vheight ) )
     {
+         pdp_imgloader_free_ressources( x );
          x->x_vwidth = header->info.image.width;
          x->x_vheight = header->info.image.height;
          x->x_vsize = x->x_vwidth*x->x_vheight;
+         pdp_imgloader_allocate( x );
     }
 
     newheader->info.image.encoding = header->info.image.encoding;
@@ -137,6 +519,7 @@ static void pdp_imgloader_process_yv12(t_pdp_imgloader *x)
 
     memcpy( newdata, data, (x->x_vsize+(x->x_vsize>>1))<<1 );
 
+    if ( x->x_image != NULL ) imlib_context_set_image(x->x_image);
     pY = newdata;
     pV = newdata+x->x_vsize;
     pU = newdata+x->x_vsize+(x->x_vsize>>2);
@@ -147,6 +530,7 @@ static void pdp_imgloader_process_yv12(t_pdp_imgloader *x)
         if ( ( x->x_image != NULL ) 
              && (px >= x->x_xoffset) && ( px < x->x_xoffset + x->x_iwidth )
 	     && (py >= x->x_yoffset) && ( py < x->x_yoffset + x->x_iheight ) 
+	     && ( !(*(x->x_mask+py*x->x_vwidth+px)) )
            )
         {
             y = yuv_RGBtoY(x->x_imdata[(py-x->x_yoffset)*x->x_iwidth+(px-x->x_xoffset)]);
@@ -171,6 +555,17 @@ static void pdp_imgloader_process_yv12(t_pdp_imgloader *x)
               *(pU) = (int)((1-factor)*(*(pU)) + factor*((u-128)<<8));
             }
         }
+	// paint it white ( for debugging )
+        /*
+	if ( ( abs( py - x->x_hiddenzones[0].a1*px - x->x_hiddenzones[0].b1 ) < 0.1 ) ||
+             ( abs( py - x->x_hiddenzones[0].a2*px - x->x_hiddenzones[0].b2 ) < 0.1 ) ||
+             ( abs( py - x->x_hiddenzones[0].a3*px - x->x_hiddenzones[0].b3 ) < 0.1 ) )
+        {
+            *(pY) = (0xff<<7);
+            *(pU) = (0xff<<8);
+            *(pV) = (0xff<<8);
+        }
+        */
         pY++;
         if ( (px%2==0) && (py%2==0) )
         {
@@ -245,6 +640,7 @@ static void pdp_imgloader_free(t_pdp_imgloader *x)
 {
   int i;
 
+    pdp_imgloader_free_ressources(x);
     pdp_queue_finish(x->x_queue_id);
     pdp_packet_mark_unused(x->x_packet0);
 }
@@ -253,7 +649,7 @@ t_class *pdp_imgloader_class;
 
 void *pdp_imgloader_new(void)
 {
-    int i;
+  int ti;
 
     t_pdp_imgloader *x = (t_pdp_imgloader *)pd_new(pdp_imgloader_class);
     inlet_new(&x->x_obj, &x->x_obj.ob_pd, &s_float, gensym("xoffset"));
@@ -267,6 +663,12 @@ void *pdp_imgloader_new(void)
     x->x_image = NULL;
 
     x->x_blend = 1;
+    x->x_mask = NULL;
+
+    for ( ti=0; ti<MAX_ZONES; ti++ )
+    {
+       x->x_hiddenzones[ti].used = 0;
+    }
 
     return (void *)x;
 }
@@ -281,7 +683,7 @@ extern "C"
 void pdp_imgloader_setup(void)
 {
 
-    post( pdp_imgloader_version );
+    // post( pdp_imgloader_version );
     pdp_imgloader_class = class_new(gensym("pdp_imgloader"), (t_newmethod)pdp_imgloader_new,
     	(t_method)pdp_imgloader_free, sizeof(t_pdp_imgloader), 0, A_NULL);
 
@@ -292,6 +694,10 @@ void pdp_imgloader_setup(void)
     class_addmethod(pdp_imgloader_class, (t_method)pdp_imgloader_xoffset, gensym("xoffset"),  A_DEFFLOAT, A_NULL);
     class_addmethod(pdp_imgloader_class, (t_method)pdp_imgloader_yoffset, gensym("yoffset"),  A_DEFFLOAT, A_NULL);
     class_addmethod(pdp_imgloader_class, (t_method)pdp_imgloader_blend, gensym("blend"),  A_DEFFLOAT, A_NULL);
+    class_addmethod(pdp_imgloader_class, (t_method)pdp_imgloader_hide, gensym("hide"),  A_GIMME, A_NULL);
+    class_addmethod(pdp_imgloader_class, (t_method)pdp_imgloader_rawhide, gensym("rawhide"),  A_GIMME, A_NULL);
+    class_addmethod(pdp_imgloader_class, (t_method)pdp_imgloader_unhide, gensym("unhide"),  A_DEFFLOAT, A_NULL);
+    class_sethelpsymbol( pdp_imgloader_class, gensym("pdp_imgloader.pd") );
 
 }