diff options
Diffstat (limited to 'gem2pdp/gem2pdp.cpp')
| -rw-r--r-- | gem2pdp/gem2pdp.cpp | 156 |
1 files changed, 0 insertions, 156 deletions
diff --git a/gem2pdp/gem2pdp.cpp b/gem2pdp/gem2pdp.cpp deleted file mode 100644 index e2d2167..0000000 --- a/gem2pdp/gem2pdp.cpp +++ /dev/null @@ -1,156 +0,0 @@ -/* - * 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; -} |