---

image_Pnm_mod.c

Go to the documentation of this file.

/*
 *    gui - [gega user interface] the flexible solution for user interface problems
 *    Copyright (C) 2002  Gergely Gati
 *
 *    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; version 2 of the License.
 *
 *    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., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
 *
 *    Gergely Gati
 *      email:           g.gati@freemail.hu
 *      AIM screenname:  GatiGergely
 *      ICQ number:      93131690
 *
 */
#include <stdlib.h>
#include <string.h>

#define __IMAGE_MODULE

#include "Bases.h"
#include "Module.h"
#include "Gui.h"
#include "Memory.h"
#include "Common.h"
#include "images/image_Pnm.h"
#include "debug.h"


#define PNM_ST_INVALID 0
#define PNM_ST_PPM     1
#define PNM_ST_PGM     2



typedef struct pnm_CustomData_s
{
  Image_t *img;
  int width,height;
  int maxval;
  int offset;
  int subtype;
} pnm_CustomData_t;


static bases_Modules_t *api;
VERSION("Pnm.image_mod",1,0,"Gergely Gati","g.gati@freemail.hu");


// ez kitolti az image struktura hianyzo mezoit
// ha az input struktura format mezoje ki van toltve,
// es az nem "pnm", akkor FALSE,
// ha NULL akkor egy statikus "pnm"-re allitja, ha
// a data egy valid png-nek latszik.
// kitolti a meret mezoket is.
static int pnm_ImgInit(Image_t *img, void (*update)(void *),void *userdata)
{
  int ret=-1;
  pnm_CustomData_t *cdata;
  char *p;

  debug_Begin();

  if(img!=NULL&&img->iim.data[0]=='P')
  {
    if(NULL!=(cdata=mem_malloc(sizeof(pnm_CustomData_t))))
    {
      img->formatdata=cdata;
      cdata->img=img;
      if('6'==img->iim.data[1]) cdata->subtype=PNM_ST_PPM;
      else if('5'==img->iim.data[1]) cdata->subtype=PNM_ST_PGM;
      else cdata->subtype=PNM_ST_INVALID;
      p=(char *)&img->iim.data[2];
//      sscanf(p," %d %d %d",&cdata->width,&cdata->height,&cdata->maxval);
      while(*p=='\n'||*p==' '||*p=='\t'||*p==0xa||*p==0xd) p++;
      cdata->width=atoi(p);
      while(*p>='0'&&*p<='9') p++;
      while(*p=='\n'||*p==' '||*p=='\t'||*p==0xa||*p==0xd) p++;
      cdata->height=atoi(p);
      while(*p>='0'&&*p<='9') p++;
      while(*p=='\n'||*p==' '||*p=='\t'||*p==0xa||*p==0xd) p++;
      cdata->maxval=atoi(p);
      while(*p>='0'&&*p<='9') p++;
      while(*p=='\n'||*p==' '||*p=='\t'||*p==0xa||*p==0xd) p++;
      cdata->offset=((u8 *)p)-&img->iim.data[0];
      img->minwidth=img->maxwidth=cdata->width;
      img->minheight=img->maxheight=cdata->height;
      debug_Message("%d %d %d (offset=%d)",cdata->width,cdata->height,cdata->maxval,cdata->offset);
      ret=0;
    }
  }

  debug_End();

  return(ret);
}


static void pnm_ImgCleanUp(Image_t *img)
{
  pnm_CustomData_t *cdata;

  debug_Begin();

  if(img!=NULL)
  {
    cdata=(pnm_CustomData_t *)img->formatdata;
    if(cdata!=NULL) mem_free(cdata);
  }

  debug_End();
}


// a dest memoriat a hivo prezentalja destsize
// meretben, ha kicsi, hiba (-1)
// a rendereles 32bitesen tortenik, az atlatszo
// pixelek helyere 0xffffffff kerul (formatum: AARRGGBB)
static int pnm_ImgRender(Image_t *img, u8 *dest, int destsize, int width, int height)
{
  pnm_CustomData_t *cdata;
  int i,size;
  u8 *p,*d;

  debug_Begin();

  if(img!=NULL&&img->formatdata!=NULL&&dest!=NULL&&destsize>=(width*height*4)&&width==img->minwidth&&height==img->minheight)
  {
    cdata=(pnm_CustomData_t *)img->formatdata;
    size=cdata->width*cdata->height;
    p=&img->iim.data[cdata->offset];
    d=dest;
    if(cdata->subtype==PNM_ST_PPM)
    {
      for(i=0;i<size;i++)
      {
        *d++=0x00;      // A
        *d++=*p++;      // R
        *d++=*p++;      // G
        *d++=*p++;      // B
      }
    }
    else if(cdata->subtype==PNM_ST_PGM)
    {
      for(i=0;i<size;i++)
      {
        *d++=0x00;      // A
        *d++=*p;        // R
        *d++=*p;        // G
        *d++=*p++;      // B
      }
    }
    else debug_Error("invalid subtype");
  }

  debug_End();

  return(0);
}


static int pnm_PutImage(Image_t *img, u32 window, Rect_t *rect)
{
  Vector_t buff;

  debug_Begin();

  buff.size=(rect->width*rect->height*4)+1;
  if(NULL!=(buff.data=mem_malloc(buff.size)))
  {
    if(0==(pnm_ImgRender(img,buff.data,buff.size,rect->width,rect->height)))
    {
      api->glw_Call(GLW_PUTIMAGE,TAG_GLW_WINDOW,window,TAG_GLW_PIXELS,&buff,TAG_GLW_CLIPRECT,rect,TAG_GLW_LEFT,rect->left,TAG_GLW_TOP,rect->top,TAG_GLW_WIDTH,rect->width,TAG_GLW_HEIGHT,rect->height,TAG_DONE);
    }
    mem_free(buff.data);
  }

  debug_End();

  return(0);
}


static void pnm_CleanUp(void)
{
  debug_Begin();
  debug_End();
}


static int pnm_Init(u32 module)
{
  int ret=-1;

  debug_Begin();

  ret=api->img_Call(IMG_REGISTERFORMATCODE,
                TAG_IMG_NAME,(u32)"pnm",
                TAG_IMG_IMG_INIT,(u32)pnm_ImgInit,
                TAG_IMG_IMG_RENDER,(u32)pnm_ImgRender,
                TAG_IMG_IMG_PUTIMAGE,(u32)pnm_PutImage,
                TAG_IMG_IMG_CLEAN,(u32)pnm_ImgCleanUp,
                TAG_IMG_CLEANUP,(u32)pnm_CleanUp,
                TAG_IMG_MODULE,module,
                TAG_DONE);

  debug_End();

  return(ret);
}

EXPORT int module_Init(u32 module, bases_Modules_t *bases)
{
    api=bases;
    return(pnm_Init(module));
}

---