From dd7595a3475407a7fa96a97393bae8c5220e8762 Mon Sep 17 00:00:00 2001
From: David Walter Seikel
Date: Wed, 4 Jan 2012 18:41:13 +1000
Subject: Add the base Enlightenment Foundation Libraries - eina, eet, evas,
 ecore, embryo, and edje.

Note that embryo wont be used, but I'm not sure yet if you can build edje without it.
---
 .../modules/loaders/wbmp/evas_image_load_wbmp.c    | 170 +++++++++++++++++++++
 1 file changed, 170 insertions(+)
 create mode 100644 libraries/evas/src/modules/loaders/wbmp/evas_image_load_wbmp.c

(limited to 'libraries/evas/src/modules/loaders/wbmp/evas_image_load_wbmp.c')

diff --git a/libraries/evas/src/modules/loaders/wbmp/evas_image_load_wbmp.c b/libraries/evas/src/modules/loaders/wbmp/evas_image_load_wbmp.c
new file mode 100644
index 0000000..fa6fab2
--- /dev/null
+++ b/libraries/evas/src/modules/loaders/wbmp/evas_image_load_wbmp.c
@@ -0,0 +1,170 @@
+#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,
+   NULL
+};
+
+
+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
-- 
cgit v1.1