efl/legacy/evas/src/evas_image.c

#include "Evas_private.h"
#include "Evas.h"
#include <stdio.h>
#include <stdlib.h>
#include <unistd.h>
#include <string.h>

static void
_evas_free_image(Evas_Object o)
{
   Evas_Object_Image oo;
   
   IF_OBJ(o, OBJECT_IMAGE) return;
   oo = o;
   if (oo->current.file) free(oo->current.file);
   free(o);
}

static void
_evas_free_image_renderer_data(Evas e, Evas_Object o)
{
   switch (e->current.render_method)
     {
     case RENDER_METHOD_ALPHA_SOFTWARE:
	if (o->renderer_data.method[e->current.render_method])
	  __evas_imlib_image_free((void *)o->renderer_data.method[e->current.render_method]);
	break;
     case RENDER_METHOD_BASIC_HARDWARE:
	if (o->renderer_data.method[e->current.render_method])
	  __evas_x11_image_free((void *)o->renderer_data.method[e->current.render_method]);
	break;
     case RENDER_METHOD_3D_HARDWARE:
	if (o->renderer_data.method[e->current.render_method])
	  __evas_gl_image_free((void *)o->renderer_data.method[e->current.render_method]);
	break;
     case RENDER_METHOD_ALPHA_HARDWARE:
	if (o->renderer_data.method[e->current.render_method])
	  __evas_render_image_free((void *)o->renderer_data.method[e->current.render_method]);
	break;
     case RENDER_METHOD_IMAGE:
	if (o->renderer_data.method[e->current.render_method])
	  __evas_image_image_free((void *)o->renderer_data.method[e->current.render_method]);
	break;
     default:
	break;
     }
   o->renderer_data.method[e->current.render_method] = NULL;
}

/* adding objects */
Evas_Object
evas_add_image_from_file(Evas e, char *file)
{
   Evas_Object_Image oo;
   Evas_Object_Any   o;
   Evas_List         l;
   Evas_Layer        layer;

   if (!e) return NULL;
   o = oo = malloc(sizeof(struct _Evas_Object_Image));
   memset(o, 0, sizeof(struct _Evas_Object_Image));
   o->type = OBJECT_IMAGE;
   o->object_free = _evas_free_image;
   o->object_renderer_data_free = _evas_free_image_renderer_data;

   oo->load_error = IMLIB_LOAD_ERROR_NONE;
   
   if (file)
     {
	oo->current.file = strdup(file);
	  {
	     Imlib_Image im;
	     
	     im = imlib_load_image_with_error_return(file, &(oo->load_error));
	     if (im)
	       {
		  imlib_context_set_image(im);
		  oo->current.image.w = imlib_image_get_width();
		  oo->current.image.h = imlib_image_get_height();
		  oo->current.alpha = imlib_image_has_alpha();
		  imlib_free_image();
	       }
	     else
	       {
		  oo->current.alpha = 1;		  
	       }
	  }
     }
   oo->current.fill.x = 0;
   oo->current.fill.y = 0;
   oo->current.fill.w = (double)oo->current.image.w;
   oo->current.fill.h = (double)oo->current.image.h;
   oo->current.color.r = 255;
   oo->current.color.g = 255;
   oo->current.color.b = 255;
   oo->current.color.a = 255;
   o->current.x = 0;
   o->current.y = 0;
   o->current.w = (double)oo->current.image.w;
   o->current.h = (double)oo->current.image.h;
	
   for (l = e->layers; l; l = l->next)
     {
	layer = l->data;
	if (layer->layer == o->current.layer)
	  {
	     layer->objects = evas_list_append(layer->objects, o);
	     return o;
	  }
     }
   
   layer = malloc(sizeof(struct _Evas_Layer));
   memset(layer, 0, sizeof(struct _Evas_Layer));
   e->layers = evas_list_append(e->layers, layer);
   layer->objects = evas_list_append(layer->objects, o);
   
   return o;
}

Evas_Object
evas_add_image_from_data(Evas e, void *data, Evas_Image_Format format, int w, int h)
{
   /* FIXME: not implimented */
   return NULL;
}

/* set object settings */
void
evas_set_image_file(Evas e, Evas_Object o, char *file)
{
   Evas_Object_Image oo;
   
   if (!e) return;
   if (!o) return;
   IF_OBJ(o, OBJECT_IMAGE) return;
   oo = o;
   if (((oo->current.file) && (file) && (strcmp(file, oo->current.file))) ||
       ((!oo->current.file) && (file)) ||
       (oo->current.image.w == 0) ||
       (oo->current.image.h == 0)
       )
     {
	_evas_free_image_renderer_data(e, o);
	if (oo->current.file)
	   free(oo->current.file);
	oo->previous.file = NULL;
	oo->current.file = strdup(file);
	  {
	     Imlib_Image im;
	     
	     im = imlib_load_image_with_error_return(file, &oo->load_error);
	     if (im)
	       {
		  imlib_context_set_image(im);
		  oo->current.image.w = imlib_image_get_width();
		  oo->current.image.h = imlib_image_get_height();
		  oo->current.alpha = imlib_image_has_alpha();
		  imlib_free_image();
		  evas_resize(e, o, 
			      (double)oo->current.image.w,
			      (double)oo->current.image.h);
		  oo->current.fill.x = 0;
		  oo->current.fill.y = 0;
		  oo->current.fill.w = (double)oo->current.image.w;
		  oo->current.fill.h = (double)oo->current.image.h;
	       }
	     else
	       {
		  oo->current.image.w = 0;
		  oo->current.image.h = 0;
		  evas_resize(e, o, 
			      (double)oo->current.image.w,
			      (double)oo->current.image.h);
		  oo->current.fill.x = 0;
		  oo->current.fill.y = 0;
		  oo->current.fill.w = (double)oo->current.image.w;
		  oo->current.fill.h = (double)oo->current.image.h;
		  oo->current.alpha = 1;		  
	       }
	  }
	o->changed = 1;
	e->changed = 1;
     }
   else if (!file)
     {
        if (oo->current.file)
	  free(oo->current.file);
	oo->previous.file = NULL;
	oo->current.file = NULL;
	oo->current.image.w = 0;
	oo->current.image.h = 0;
	oo->current.alpha = 1;
	evas_resize(e, o, 
		    (double)oo->current.image.w,
		    (double)oo->current.image.h);
	oo->current.fill.x = 0;
	oo->current.fill.y = 0;
	oo->current.fill.w = (double)oo->current.image.w;
	oo->current.fill.h = (double)oo->current.image.h;
	oo->load_error = IMLIB_LOAD_ERROR_NONE;
	o->changed = 1;
	e->changed = 1;
     }
   else
     {
     }
}

void
evas_set_image_data(Evas e, Evas_Object o, void *data, Evas_Image_Format format, int w, int h)
{
   /* FIXME: not implimented */
}

void
evas_set_image_fill(Evas e, Evas_Object o, double x, double y, double w, double h)
{
   Evas_Object_Image oo;
   
   if (!e) return;
   if (!o) return;
   IF_OBJ(o, OBJECT_IMAGE) return;
   oo = o;
   oo->current.fill.x = x;
   oo->current.fill.y = y;
   oo->current.fill.w = w;
   oo->current.fill.h = h;
   o->changed = 1;
   e->changed = 1;
}

/* image query ops */
int
evas_get_image_alpha(Evas e, Evas_Object o)
{
   Evas_Object_Image oo;
   
   if (!e) return 0;
   if (!o) return 0;
   IF_OBJ(o, OBJECT_IMAGE) return 0;
   oo = o;
   return oo->current.alpha;
}

void
evas_get_image_size(Evas e, Evas_Object o, int *w, int *h)
{
   Evas_Object_Image oo;
   
   if (!e) return;
   if (!o) return;
   IF_OBJ(o, OBJECT_IMAGE) return;
   oo = o;
   if (w) *w = oo->current.image.w;
   if (h) *h = oo->current.image.h;
}

void
evas_set_image_border(Evas e, Evas_Object o, int l, int r, int t, int b)
{
   Evas_Object_Image oo;
   
   if (!e) return;
   if (!o) return;
   IF_OBJ(o, OBJECT_IMAGE) return;
   oo = o;
   if (l < 0) l = 0;
   if (r < 0) r = 0;
   if (t < 0) t = 0;
   if (b < 0) b = 0;
   oo->current.border.l = l;
   oo->current.border.r = r;
   oo->current.border.t = t;
   oo->current.border.b = b;
   o->changed = 1;
   e->changed = 1;   
}

void
evas_get_image_border(Evas e, Evas_Object o, int *l, int *r, int *t, int *b)
{
   Evas_Object_Image oo;
   
   if (!e) return;
   if (!o) return;
   IF_OBJ(o, OBJECT_IMAGE) return;
   oo = o;
   if (l) *l = oo->current.border.l;
   if (r) *r = oo->current.border.r;
   if (t) *t = oo->current.border.t;
   if (b) *b = oo->current.border.b;
}

Imlib_Load_Error
evas_get_image_load_error(Evas e, Evas_Object o)
{
   Evas_Object_Image oo;
   
   if (!e) return IMLIB_LOAD_ERROR_NONE;
   if (!o) return IMLIB_LOAD_ERROR_NONE;
   IF_OBJ(o, OBJECT_IMAGE) return IMLIB_LOAD_ERROR_NONE;
   oo = o;
   
   return oo->load_error;
}