170 lines
3.8 KiB
C
170 lines
3.8 KiB
C
#ifdef HAVE_CONFIG_H
|
|
# include <config.h>
|
|
#endif
|
|
|
|
#include <stdio.h>
|
|
|
|
#ifdef HAVE_EVIL
|
|
# include <Evil.h>
|
|
#endif
|
|
|
|
#include "evas_common.h"
|
|
#include "evas_private.h"
|
|
|
|
static Eina_Bool evas_image_load_file_head_wbmp(Image_Entry *ie, const char *file, const char *key, int *error) EINA_ARG_NONNULL(1, 2, 4);
|
|
static Eina_Bool evas_image_load_file_data_wbmp(Image_Entry *ie, const char *file, const char *key, int *error) EINA_ARG_NONNULL(1, 2, 4);
|
|
|
|
static Evas_Image_Load_Func evas_image_load_wbmp_func =
|
|
{
|
|
EINA_TRUE,
|
|
evas_image_load_file_head_wbmp,
|
|
evas_image_load_file_data_wbmp
|
|
};
|
|
|
|
|
|
static int
|
|
read_mb(unsigned int *data, FILE *f)
|
|
{
|
|
int ac = 0, ct;
|
|
unsigned char buf;
|
|
|
|
for (ct = 0;;)
|
|
{
|
|
if ((ct++) == 5) return -1;
|
|
if ((fread(&buf, 1, 1, f)) < 1)
|
|
return -1;
|
|
ac = (ac << 7) | (buf & 0x7f);
|
|
if ((buf & 0x80) == 0) break;
|
|
}
|
|
*data = ac;
|
|
return 0;
|
|
}
|
|
|
|
static Eina_Bool
|
|
evas_image_load_file_head_wbmp(Image_Entry *ie, const char *file, const char *key __UNUSED__, int *error)
|
|
{
|
|
FILE *f;
|
|
unsigned int type, w, h;
|
|
unsigned char fixed_header;
|
|
struct stat statbuf;
|
|
|
|
*error = EVAS_LOAD_ERROR_GENERIC;
|
|
f = fopen(file, "rb");
|
|
if (!f)
|
|
{
|
|
*error = EVAS_LOAD_ERROR_DOES_NOT_EXIST;
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
if (stat(file, &statbuf) == -1) goto bail;
|
|
if (read_mb(&type, f) < 0) goto bail;
|
|
|
|
if (type != 0)
|
|
{
|
|
*error = EVAS_LOAD_ERROR_UNKNOWN_FORMAT;
|
|
goto bail;
|
|
}
|
|
|
|
if (fread(&fixed_header, 1, 1, f) != 1) goto bail;
|
|
if (read_mb(&w, f) < 0) goto bail;
|
|
if (read_mb(&h, f) < 0) goto bail;
|
|
if ((w < 1) || (h < 1) || (w > IMG_MAX_SIZE) || (h > IMG_MAX_SIZE) ||
|
|
IMG_TOO_BIG(w, h))
|
|
{
|
|
*error = EVAS_LOAD_ERROR_RESOURCE_ALLOCATION_FAILED;
|
|
goto bail;
|
|
}
|
|
|
|
fclose(f);
|
|
ie->w = w;
|
|
ie->h = h;
|
|
|
|
*error = EVAS_LOAD_ERROR_NONE;
|
|
return EINA_TRUE;
|
|
bail:
|
|
fclose(f);
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
static Eina_Bool
|
|
evas_image_load_file_data_wbmp(Image_Entry *ie, const char *file, const char *key __UNUSED__, int *error)
|
|
{
|
|
FILE *f;
|
|
unsigned int dummy, line_length;
|
|
unsigned char *line = NULL;
|
|
int cur = 0, x, y;
|
|
DATA32 *dst_data;
|
|
|
|
*error = EVAS_LOAD_ERROR_GENERIC;
|
|
f = fopen(file, "rb");
|
|
if (!f)
|
|
{
|
|
*error = EVAS_LOAD_ERROR_DOES_NOT_EXIST;
|
|
return EINA_FALSE;
|
|
}
|
|
if (read_mb(&dummy, f) < 0) goto bail;
|
|
if (fread(&dummy, 1, 1, f) != 1) goto bail;
|
|
if (read_mb(&dummy, f) < 0) goto bail;
|
|
if (read_mb(&dummy, f) < 0) goto bail;
|
|
|
|
evas_cache_image_surface_alloc(ie, ie->w, ie->h);
|
|
dst_data = evas_cache_image_pixels(ie);
|
|
if (!dst_data)
|
|
{
|
|
*error = EVAS_LOAD_ERROR_RESOURCE_ALLOCATION_FAILED;
|
|
goto bail;
|
|
}
|
|
|
|
line_length = (ie->w + 7) >> 3;
|
|
line = alloca(line_length);
|
|
|
|
for (y = 0; y < (int)ie->h; y++)
|
|
{
|
|
if (fread(line, 1, line_length, f) != line_length) goto bail;
|
|
for (x = 0; x < (int)ie->w; x++)
|
|
{
|
|
int idx = x >> 3;
|
|
int offset = 1 << (0x07 - (x & 0x07));
|
|
if (line[idx] & offset) dst_data[cur] = 0xffffffff;
|
|
else dst_data[cur] = 0xff000000;
|
|
cur++;
|
|
}
|
|
}
|
|
fclose(f);
|
|
*error = EVAS_LOAD_ERROR_NONE;
|
|
return EINA_TRUE;
|
|
bail:
|
|
fclose(f);
|
|
return EINA_FALSE;
|
|
}
|
|
|
|
static int
|
|
module_open(Evas_Module *em)
|
|
{
|
|
if (!em) return 0;
|
|
em->functions = (void *)(&evas_image_load_wbmp_func);
|
|
return 1;
|
|
}
|
|
|
|
static void
|
|
module_close(Evas_Module *em __UNUSED__)
|
|
{
|
|
}
|
|
|
|
static Evas_Module_Api evas_modapi =
|
|
{
|
|
EVAS_MODULE_API_VERSION,
|
|
"wbmp",
|
|
"none",
|
|
{
|
|
module_open,
|
|
module_close
|
|
}
|
|
};
|
|
|
|
EVAS_MODULE_DEFINE(EVAS_MODULE_TYPE_IMAGE_LOADER, image_loader, wbmp);
|
|
|
|
#ifndef EVAS_STATIC_BUILD_WBMP
|
|
EVAS_EINA_MODULE_DEFINE(image_loader, wbmp);
|
|
#endif
|