aboutsummaryrefslogtreecommitdiff
path: root/gem2pdp/gem2pdp.cpp
diff options
context:
space:
mode:
authorHans-Christoph Steiner <eighthave@users.sourceforge.net>2003-08-11 04:43:58 +0000
committerHans-Christoph Steiner <eighthave@users.sourceforge.net>2003-08-11 04:43:58 +0000
commit1c2854727070e6a3edbc4cbd3a88ee60979ffc50 (patch)
tree51e2bd7d79b2e9476212fcad2c15b9caba0562e5 /gem2pdp/gem2pdp.cpp
parenta4a7431b8103f42464fd401572cff76551896467 (diff)
added sources from gem2pdp-0.4 for Linux
svn path=/trunk/externals/unauthorized/; revision=839
Diffstat (limited to 'gem2pdp/gem2pdp.cpp')
-rw-r--r--gem2pdp/gem2pdp.cpp156
1 files changed, 156 insertions, 0 deletions
diff --git a/gem2pdp/gem2pdp.cpp b/gem2pdp/gem2pdp.cpp
new file mode 100644
index 0000000..e2d2167
--- /dev/null
+++ b/gem2pdp/gem2pdp.cpp
@@ -0,0 +1,156 @@
+/*
+ * gem2pdp : gem to pdp bridge
+ *
+ * Capture the contents of the Gem window and transform it to a PDP Packet whenever a bang is received
+ *
+ * Copyright (c) 2003 Yves Degoyon
+ *
+ */
+
+
+#include "gem2pdp.h"
+#include "yuv.h"
+
+#include "Base/GemMan.h"
+#include "Base/GemCache.h"
+
+CPPEXTERN_NEW(gem2pdp)
+
+gem2pdp :: gem2pdp(void)
+{
+ m_x = GemMan::m_xoffset;
+ m_y = GemMan::m_yoffset;
+ m_width = GemMan::m_width;
+ m_height = GemMan::m_height;
+ m_image = NULL;
+ m_pdpoutlet = outlet_new(this->x_obj, &s_anything);
+}
+
+gem2pdp :: ~gem2pdp()
+{
+ if (m_image) cleanImage();
+}
+
+void gem2pdp :: bangMess()
+{
+ t_int needNew=0, pbuffers;
+ t_int psize, px, py;
+ short int *pY, *pU, *pV;
+ unsigned char r,g,b,a;
+ t_int cpt;
+ void *idontknowwhatitis=NULL;
+
+ if ( !GemMan::windowExists() )
+ {
+ post("gem2pdp : no gem image to snap");
+ return;
+ }
+
+ // update image dimensions
+ m_x = GemMan::m_xoffset;
+ m_y = GemMan::m_yoffset;
+ m_width = GemMan::m_width;
+ m_height = GemMan::m_height;
+ pbuffers = GemMan::m_buffer;
+ GemMan::m_buffer = 1;
+ GemMan::render(idontknowwhatitis);
+ // post("gem2pdp : got dimensions : x=%d y=%d w=%d h=%d", m_x, m_y, m_width, m_height);
+
+ if (m_width <= 0 || m_height <= 0)
+ {
+ post("gem2pdp : illegal size : x=%d y=%d w=%d h=%d", m_x, m_y, m_width, m_height);
+ return;
+ }
+ if (m_image)
+ {
+ if (m_image->xsize != m_width ||
+ m_image->ysize != m_height)
+ {
+ delete [] m_image->data;
+ delete m_image;
+ m_image = NULL;
+ needNew = 1;
+ }
+ }
+ else
+ {
+ needNew = 1;
+ }
+ if ( needNew )
+ {
+ m_image = new imageStruct;
+ m_image->xsize = m_width;
+ m_image->ysize = m_height;
+ m_image->csize = 4;
+ m_image->type = GL_UNSIGNED_BYTE;
+ m_image->format = GL_RGBA;
+ m_image->data = new unsigned char[m_image->xsize * m_image->ysize * m_image->csize];
+ post( "gem2pdp : allocated image : w=%d h=%d", m_image->xsize, m_image->ysize );
+ }
+
+ glReadPixels(m_x, m_y, m_image->xsize, m_image->ysize,
+ m_image->format, m_image->type, m_image->data);
+
+ // post( "gem2pdp : packet : w=%d h=%d", m_image->xsize, m_image->ysize );
+ psize = m_image->xsize*m_image->ysize;
+ m_packet0 = pdp_packet_new_image_YCrCb( m_image->xsize, m_image->ysize);
+ m_header = pdp_packet_header(m_packet0);
+ m_data = (short int *)pdp_packet_data(m_packet0);
+
+ pY = m_data;
+ pV = m_data+psize;
+ pU = m_data+psize+(psize>>2);
+
+ for ( py=0; py<m_image->ysize; py++)
+ {
+ for ( px=0; px<m_image->xsize; px++)
+ {
+ cpt=((m_image->ysize-py)*m_image->xsize+px)*4;
+ r=m_image->data[cpt++];
+ g=m_image->data[cpt++];
+ b=m_image->data[cpt++];
+ a=m_image->data[cpt];
+ // if ( (r!=0) || (g!=0) || (b!=0) ) post( "gem2rgb : r=%d g=%d b=%d", r, g, b );
+ *(pY) = yuv_RGBtoY( (r<<16) + (g<<8) + b ) << 7;
+ *(pV) = ( yuv_RGBtoV( (r<<16) + (g<<8) + b ) - 128 ) << 8;
+ *(pU) = ( yuv_RGBtoU( (r<<16) + (g<<8) + b ) - 128 ) << 8;
+ pY++;
+ if ( (px%2==0) && (py%2==0) )
+ {
+ pV++; pU++;
+ }
+ }
+ }
+
+ pdp_packet_pass_if_valid(m_pdpoutlet, &m_packet0);
+
+ // restore buffer state
+ GemMan::m_buffer = pbuffers;
+ GemMan::render(idontknowwhatitis);
+
+ // post("gem2pdp : read image");
+}
+
+void gem2pdp :: cleanImage()
+{
+ delete [] m_image->data;
+ m_image->data = NULL;
+}
+
+void gem2pdp :: obj_setupCallback(t_class *classPtr)
+{
+ post( "gem2pdp : a bridge between GEM and PDP/PiDiP v"GEM2PDP_VERSION" (ydegoyon@free.fr)" );
+ class_addmethod(classPtr, (t_method)&gem2pdp::bangMessCallback,
+ gensym("bang"), A_NULL);
+}
+
+void gem2pdp :: bangMessCallback(void *data)
+{
+ GetMyClass(data)->bangMess();
+}
+
+// stubs just to make gem happy
+void gem2pdp :: render(GemState *state)
+{
+ return;
+}