1 files changed, 741 insertions, 0 deletions

diff --git a/libraries/evas/src/modules/engines/software_16_x11/evas_engine.c b/libraries/evas/src/modules/engines/software_16_x11/evas_engine.c
new file mode 100644
index 0000000..5378972
--- /dev/null
+++ b/libraries/evas/src/modules/engines/software_16_x11/evas_engine.c
@@ -0,0 +1,741 @@
+#include "evas_common.h"
+#include "evas_private.h"
+#include "evas_engine.h"
+#include "Evas_Engine_Software_16_X11.h"
+#include "evas_common_soft16.h"
+
+int _evas_engine_soft16_x11_log_dom = -1;
+/* function tables - filled in later (func and parent func) */
+static Evas_Func func, pfunc;
+/*
+struct xrdb_user
+{
+   time_t last_stat;
+   time_t last_mtime;
+   XrmDatabase db;
+};
+static struct xrdb_user xrdb_user = {0, 0, NULL};
+
+static Eina_Bool
+xrdb_user_query(const char *name, const char *cls, char **type, XrmValue *val)
+{
+   time_t last = xrdb_user.last_stat, now = time(NULL);
+
+   xrdb_user.last_stat = now;
+   if (last != now) // don't stat() more than once every second
+     {
+        struct stat st;
+        const char *home = getenv("HOME");
+        char tmp[PATH_MAX];
+
+        if (!home) goto failed;
+        snprintf(tmp, sizeof(tmp), "%s/.Xdefaults", home);
+        if (stat(tmp, &st) != 0) goto failed;
+        if (xrdb_user.last_mtime != st.st_mtime)
+          {
+             if (xrdb_user.db) XrmDestroyDatabase(xrdb_user.db);
+             xrdb_user.db = XrmGetFileDatabase(tmp);
+             if (!xrdb_user.db) goto failed;
+             xrdb_user.last_mtime = st.st_mtime;
+          }
+     }
+
+   if (!xrdb_user.db) return EINA_FALSE;
+   return XrmGetResource(xrdb_user.db, name, cls, type, val);
+
+ failed:
+   if (xrdb_user.db)
+     {
+        XrmDestroyDatabase(xrdb_user.db);
+        xrdb_user.db = NULL;
+     }
+   xrdb_user.last_mtime = 0;
+   return EINA_FALSE;
+}
+*/
+
+/* engine struct data */
+typedef struct _Render_Engine Render_Engine;
+
+struct _Render_Engine
+{
+   Display          *disp;
+   Drawable          draw;
+   GC                gc;
+   int               w, h, rot;
+   Tilebuf          *tb;
+   Tilebuf_Rect     *rects;
+   Tilebuf_Rect     *cur_rect;
+/*   
+   XrmDatabase   xrdb; // xres - dpi
+   struct { // xres - dpi
+      int        dpi; // xres - dpi
+   } xr; // xres - dpi
+ */
+   X_Output_Buffer  *shbuf;
+   Soft16_Image     *tmp_out; /* used by indirect render, like rotation */
+   Region            clip_rects;
+   unsigned char     end : 1;
+   unsigned char     shm : 1;
+};
+
+/* prototypes we will use here */
+
+static void *eng_info(Evas *e);
+static void eng_info_free(Evas *e, void *info);
+static int eng_setup(Evas *e, void *info);
+static void eng_output_free(void *data);
+static void eng_output_resize(void *data, int w, int h);
+static void eng_output_tile_size_set(void *data, int w, int h);
+static void eng_output_redraws_rect_add(void *data, int x, int y, int w, int h);
+static void eng_output_redraws_rect_del(void *data, int x, int y, int w, int h);
+static void eng_output_redraws_clear(void *data);
+static void *eng_output_redraws_next_update_get(void *data, int *x, int *y, int *w, int *h, int *cx, int *cy, int *cw, int *ch);
+static void eng_output_redraws_next_update_push(void *data, void *surface, int x, int y, int w, int h);
+static void eng_output_flush(void *data);
+static void eng_output_idle_flush(void *data);
+
+/* engine api this module provides */
+static void *
+eng_info(Evas *e)
+{
+   Evas_Engine_Info_Software_16_X11 *info;
+   
+   info = calloc(1, sizeof(Evas_Engine_Info_Software_16_X11));
+   if (!info) return NULL;
+   info->magic.magic = rand();
+   info->render_mode = EVAS_RENDER_MODE_BLOCKING;
+   return info;
+   e = NULL;
+}
+
+static void
+eng_info_free(Evas *e __UNUSED__, void *info)
+{
+   Evas_Engine_Info_Software_16_X11 *in;
+   in = (Evas_Engine_Info_Software_16_X11 *)info;
+   free(in);
+}
+
+static void
+_tmp_out_alloc(Render_Engine *re)
+{
+   Tilebuf_Rect *r;
+   unsigned int w = 0, h = 0;
+
+   EINA_INLIST_FOREACH(re->rects, r)
+     {
+        if (r->w > (int)w) w = r->w;
+        if (r->h > (int)h) h = r->h;
+     }
+
+   if (re->tmp_out)
+     {
+        if ((re->tmp_out->cache_entry.w < w) || (re->tmp_out->cache_entry.h < h))
+          {
+             evas_cache_image_drop(&re->tmp_out->cache_entry);
+             re->tmp_out = NULL;
+          }
+     }
+
+   if (!re->tmp_out)
+     {
+        Soft16_Image *im;
+
+        im = (Soft16_Image *) evas_cache_image_empty(evas_common_soft16_image_cache_get());
+        im->cache_entry.flags.alpha = 0;
+        evas_cache_image_surface_alloc(&im->cache_entry, w, h);
+
+        re->tmp_out = im;
+     }
+}
+
+
+static int
+eng_setup(Evas *e, void *in)
+{
+   Render_Engine *re;
+   Evas_Engine_Info_Software_16_X11 *info;
+/*    X_Output_Buffer *xob; */
+   XGCValues gcv;
+   
+   info = (Evas_Engine_Info_Software_16_X11 *)in;
+   if (!e->engine.data.output)
+     {
+        /* the only check - simplistic, i know, but enough for this 
+         * "special purpose" engine. Remember it is meant to be used
+         * for limited power devices that have a 16bit display mode
+         * and no real other acceleration, and high resolution so we
+         * can pre-dither into 16bpp. */
+//      if (DefaultDepth(info->info.display, 
+//                       DefaultScreen(info->info.display)) != 16)
+//        return;
+        /* do common routine init - we wil at least use it for core
+         * image loading and font loading/glyph rendering & placement */
+        evas_common_cpu_init();
+        
+        evas_common_blend_init();
+        evas_common_image_init();
+        evas_common_convert_init();
+        evas_common_scale_init();
+        evas_common_rectangle_init();
+        evas_common_polygon_init();
+        evas_common_line_init();
+        evas_common_font_init();
+        evas_common_draw_init();
+        evas_common_tilebuf_init();
+        evas_common_soft16_image_init();
+
+        /* render engine specific data */
+        re = calloc(1, sizeof(Render_Engine));
+        if (!re)
+          return 0;
+        e->engine.data.output = re;
+        re->disp = info->info.display;
+        re->draw = info->info.drawable;
+        re->gc = XCreateGC(re->disp, re->draw, 0, &gcv);
+        re->w = e->output.w;
+        re->h = e->output.h;
+        re->rot = info->info.rotation;
+        re->tb = evas_common_tilebuf_new(e->output.w, e->output.h);
+        if (re->tb)
+          evas_common_tilebuf_set_tile_size(re->tb, TILESIZE, TILESIZE);
+     }
+   else
+     {
+        /* we changed the info after first init - do a re-eval where
+         * appropriate */
+//      if (DefaultDepth(info->info.display, 
+//                       DefaultScreen(info->info.display)) != 16)
+//        return;
+        re = e->engine.data.output;
+        if (re->tb) evas_common_tilebuf_free(re->tb);
+        re->disp = info->info.display;
+        re->draw = info->info.drawable;
+        XFreeGC(re->disp, re->gc);
+        re->gc = XCreateGC(re->disp, re->draw, 0, &gcv);
+        re->w = e->output.w;
+        re->h = e->output.h;
+        re->rot = info->info.rotation;
+        re->tb = evas_common_tilebuf_new(e->output.w, e->output.h);
+        if (re->tb)
+          evas_common_tilebuf_set_tile_size(re->tb, TILESIZE, TILESIZE);
+        if (re->tmp_out)
+          {
+             evas_cache_image_drop(&re->tmp_out->cache_entry);
+             re->tmp_out = NULL;
+          }
+     }
+   if (!e->engine.data.output) return 0;
+   
+/*   
+     {   
+        int status;
+        char *type = NULL;
+        XrmValue val;
+        
+        re->xr.dpi = 75000; // dpy * 1000
+
+        status = xrdb_user_query("Xft.dpi", "Xft.Dpi", &type, &val);
+        if ((!status) || (!type))
+          {
+             if (!re->xrdb) re->xrdb = XrmGetDatabase(re->disp);
+             if (re->xrdb)
+               status = XrmGetResource(re->xrdb,
+                                       "Xft.dpi", "Xft.Dpi", &type, &val);
+          }
+
+        if ((status) && (type))
+          {
+             if (!strcmp(type, "String"))
+               {
+                  const char *str, *dp;
+                  
+                  str = val.addr;
+                  dp = strchr(str, '.');
+                  if (!dp) dp = strchr(str, ',');
+                  
+                  if (dp)
+                    {
+                       int subdpi, len, i;
+                       char *buf;
+                       
+                       buf = alloca(dp - str + 1);
+                       strncpy(buf, str, dp - str);
+                       buf[dp - str] = 0;
+                       len = strlen(dp + 1);
+                       subdpi = atoi(dp + 1);
+                       
+                       if (len < 3)
+                         {
+                            for (i = len; i < 3; i++) subdpi *= 10;
+                         }
+                       else if (len > 3)
+                         {
+                            for (i = len; i > 3; i--) subdpi /= 10;
+                         }
+                       re->xr.dpi = atoi(buf) * 1000;
+                    }
+                  else
+                    re->xr.dpi = atoi(str) * 1000;
+               }
+          }
+        evas_common_font_dpi_set(re->xr.dpi / 1000);
+     }
+ */
+   
+   /* add a draw context if we dont have one */
+   if (!e->engine.data.context)
+     e->engine.data.context =
+     e->engine.func->context_new(e->engine.data.output);
+   /* check if the display can do shm */
+   re->shm = evas_software_16_x11_x_can_do_shm(re->disp);
+
+   return 1;
+}
+
+static void
+eng_output_free(void *data)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   
+// NOTE: XrmGetDatabase() result is shared per connection, do not free it.
+//   if (re->xrdb) XrmDestroyDatabase(re->xrdb);
+   
+   if (re->shbuf) evas_software_16_x11_x_output_buffer_free(re->shbuf, 0);
+   if (re->clip_rects) XDestroyRegion(re->clip_rects);
+   if (re->gc) XFreeGC(re->disp, re->gc);
+   if (re->tb) evas_common_tilebuf_free(re->tb);
+   if (re->rects) evas_common_tilebuf_free_render_rects(re->rects);
+   if (re->tmp_out) evas_cache_image_drop(&re->tmp_out->cache_entry);
+   free(re);
+
+   evas_common_font_shutdown();
+   evas_common_image_shutdown();
+   evas_common_soft16_image_shutdown();
+}
+
+static void
+eng_output_resize(void *data, int w, int h)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+
+   if ((re->w == w) && (re->h == h)) return;
+
+   evas_common_tilebuf_free(re->tb);
+   re->w = w;
+   re->h = h;
+   re->tb = evas_common_tilebuf_new(w, h);
+   if (re->tb)
+     evas_common_tilebuf_set_tile_size(re->tb, TILESIZE, TILESIZE);
+   if (re->shbuf)
+     {
+        evas_software_16_x11_x_output_buffer_free(re->shbuf, 0);
+        re->shbuf = NULL;
+     }
+   if (re->clip_rects)
+     {
+        XDestroyRegion(re->clip_rects);
+        re->clip_rects = NULL;
+     }
+   if (re->tmp_out)
+     {
+        evas_cache_image_drop(&re->tmp_out->cache_entry);
+        re->tmp_out = NULL;
+     }
+}
+
+static void
+eng_output_tile_size_set(void *data, int w, int h)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   evas_common_tilebuf_set_tile_size(re->tb, w, h);
+}
+
+static void
+eng_output_redraws_rect_add(void *data, int x, int y, int w, int h)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   evas_common_tilebuf_add_redraw(re->tb, x, y, w, h);
+}
+
+static void
+eng_output_redraws_rect_del(void *data, int x, int y, int w, int h)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   evas_common_tilebuf_del_redraw(re->tb, x, y, w, h);
+}
+
+static void
+eng_output_redraws_clear(void *data)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   evas_common_tilebuf_clear(re->tb);
+}
+
+static inline void
+_output_buffer_alloc(Render_Engine *re)
+{
+   int w, h;
+   if (re->shbuf) return;
+
+   if ((re->rot == 0) || (re->rot == 180))
+     {
+        w = re->w;
+        h = re->h;
+     }
+   else
+     {
+        w = re->h;
+        h = re->w;
+     }
+
+   re->shbuf = evas_software_16_x11_x_output_buffer_new
+     (re->disp, DefaultVisual(re->disp, DefaultScreen(re->disp)),
+      DefaultDepth(re->disp, DefaultScreen(re->disp)),
+      w, h, 1, NULL);
+}
+
+static void *
+eng_output_redraws_next_update_get(void *data, int *x, int *y, int *w, int *h, int *cx, int *cy, int *cw, int *ch)
+{
+   Render_Engine *re;
+   Tilebuf_Rect *rect;
+   int ux, uy, uw, uh;
+
+   re = (Render_Engine *)data;
+   if (re->end)
+     {
+        re->end = 0;
+        return NULL;
+     }
+   if (!re->rects)
+     {
+        re->rects = evas_common_tilebuf_get_render_rects(re->tb);
+        if (!re->rects) return NULL;
+
+        re->cur_rect = re->rects;
+        _output_buffer_alloc(re);
+        if (re->rot != 0) _tmp_out_alloc(re); /* grows if required */
+     }
+   if (!re->cur_rect)
+     {
+        if (re->rects) evas_common_tilebuf_free_render_rects(re->rects);
+        re->rects = NULL;
+        return NULL;
+     }
+   rect = re->cur_rect;
+   ux = rect->x; uy = rect->y; uw = rect->w; uh = rect->h;
+   re->cur_rect = (Tilebuf_Rect *)((EINA_INLIST_GET(re->cur_rect))->next);
+   if (!re->cur_rect)
+     {
+        evas_common_tilebuf_free_render_rects(re->rects);
+        re->rects = NULL;
+        re->end = 1;
+     }
+
+   *x = ux; *y = uy; *w = uw; *h = uh;
+   if (re->rot == 0)
+     {
+        *cx = ux; *cy = uy; *cw = uw; *ch = uh;
+        return re->shbuf->im;
+     }
+   else
+     {
+        *cx = 0; *cy = 0; *cw = uw; *ch = uh;
+        return re->tmp_out;
+     }
+}
+
+static void
+_blit_rot_90(Soft16_Image *dst, const Soft16_Image *src,
+             int out_x, int out_y, int w, int h)
+{
+   DATA16 *dp, *sp;
+   int x, y;
+
+   sp = src->pixels;
+   dp = dst->pixels + (out_x +
+                       (w + out_y - 1) * dst->stride);
+
+   for (y = 0; y < h; y++)
+     {
+        DATA16 *dp_itr, *sp_itr;
+
+        sp_itr = sp;
+        dp_itr = dp;
+
+        for (x = 0; x < w; x++)
+          {
+             *dp_itr = *sp_itr;
+
+             sp_itr++;
+             dp_itr -= dst->stride;
+          }
+        sp += src->stride;
+        dp++;
+     }
+}
+
+static void
+_blit_rot_180(Soft16_Image *dst, const Soft16_Image *src,
+              int out_x, int out_y, int w, int h)
+{
+   DATA16 *dp, *sp;
+   int x, y;
+
+   sp = src->pixels;
+   dp = dst->pixels + ((w + out_x - 1) +
+                       (h + out_y - 1) * dst->stride);
+
+   for (y = 0; y < h; y++)
+     {
+        DATA16 *dp_itr, *sp_itr;
+
+        sp_itr = sp;
+        dp_itr = dp;
+
+        for (x = 0; x < w; x++)
+          {
+             *dp_itr = *sp_itr;
+
+             sp_itr++;
+             dp_itr--;
+          }
+        sp += src->stride;
+        dp -= dst->stride;
+     }
+}
+
+static void
+_blit_rot_270(Soft16_Image *dst, const Soft16_Image *src,
+              int out_x, int out_y, int w, int h)
+{
+   DATA16 *dp, *sp;
+   int x, y;
+
+   sp = src->pixels;
+   dp = dst->pixels + ((h + out_x - 1) +
+                       out_y * dst->stride);
+
+   for (y = 0; y < h; y++)
+     {
+        DATA16 *dp_itr, *sp_itr;
+
+        sp_itr = sp;
+        dp_itr = dp;
+
+        for (x = 0; x < w; x++)
+          {
+             *dp_itr = *sp_itr;
+
+             sp_itr++;
+             dp_itr += dst->stride;
+          }
+        sp += src->stride;
+        dp--;
+     }
+}
+
+static void
+_tmp_out_process(Render_Engine *re, int out_x, int out_y, int w, int h)
+{
+   Soft16_Image *d, *s;
+
+   d = re->shbuf->im;
+   s = re->tmp_out;
+
+   if ((w < 1) || (h < 1) ||
+       (out_x >= (int)d->cache_entry.w) || (out_y >= (int)d->cache_entry.h))
+     return;
+
+   if (re->rot == 90)
+     _blit_rot_90(d, s, out_x, out_y, w, h);
+   else if (re->rot == 180)
+     _blit_rot_180(d, s, out_x, out_y, w, h);
+   else if (re->rot == 270)
+     _blit_rot_270(d, s, out_x, out_y, w, h);
+}
+
+static void
+eng_output_redraws_next_update_push(void *data, void *surface __UNUSED__, int x, int y, int w, int h)
+{
+   Render_Engine *re;
+   XRectangle r = { 0, 0, 0, 0 };
+
+   re = (Render_Engine *)data;
+
+   if (!re->clip_rects)
+      re->clip_rects = XCreateRegion();
+
+   if (re->rot == 0)
+     {
+        r.x = x;
+        r.y = y;
+        r.width = w;
+        r.height = h;
+     }
+   else if (re->rot == 90)
+     {
+        r.x = y;
+        r.y = re->w - w - x;
+        r.width = h;
+        r.height = w;
+     }
+   else if (re->rot == 180)
+     {
+        r.x = re->w - w - x;
+        r.y = re->h - h - y;
+        r.width = w;
+        r.height = h;
+     }
+   else if (re->rot == 270)
+     {
+        r.x = re->h - h - y;
+        r.y = x;
+        r.width = h;
+        r.height = w;
+     }
+
+   if (re->rot != 0)
+     _tmp_out_process(re, r.x, r.y, w, h);
+   XUnionRectWithRegion(&r, re->clip_rects, re->clip_rects);
+}
+
+static void
+eng_output_flush(void *data)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   if (re->clip_rects)
+     {
+        XSetRegion(re->disp, re->gc, re->clip_rects);
+        XDestroyRegion(re->clip_rects);
+        re->clip_rects = NULL;
+     }
+   else return;
+
+   evas_software_16_x11_x_output_buffer_paste
+     (re->shbuf, re->draw, re->gc, 0, 0, re->shbuf->im->cache_entry.w, re->shbuf->im->cache_entry.h, 1);
+   XSetClipMask(re->disp, re->gc, None);
+}
+
+static void
+eng_output_idle_flush(void *data)
+{
+   Render_Engine *re;
+
+   re = (Render_Engine *)data;
+   if (re->shbuf)
+     {
+        evas_software_16_x11_x_output_buffer_free(re->shbuf, 0);
+        re->shbuf = NULL;
+     }
+   if (re->clip_rects)
+     {
+        XDestroyRegion(re->clip_rects);
+        re->clip_rects = NULL;
+     }
+   if (re->tmp_out)
+     {
+        evas_cache_image_drop(&re->tmp_out->cache_entry);
+        re->tmp_out = NULL;
+     }
+}
+
+static Eina_Bool
+eng_canvas_alpha_get(void *data __UNUSED__, void *context __UNUSED__)
+{
+   return EINA_FALSE;
+}
+
+/* module advertising code */
+static int
+module_open(Evas_Module *em)
+{
+   static Eina_Bool xrm_inited = EINA_FALSE;
+   if (!xrm_inited)
+     {
+        xrm_inited = EINA_TRUE;
+        XrmInitialize();
+     }
+
+   if (!em) return 0;
+   /* get whatever engine module we inherit from */
+   if (!_evas_module_engine_inherit(&pfunc, "software_16")) return 0;
+   _evas_engine_soft16_x11_log_dom = eina_log_domain_register
+     ("evas-software_16_x11", EVAS_DEFAULT_LOG_COLOR);
+   if (_evas_engine_soft16_x11_log_dom < 0)
+     {
+        EINA_LOG_ERR("Can not create a module log domain.");
+        return 0;
+     }
+
+   /* store it for later use */
+   func = pfunc;
+   /* now to override methods */
+#define ORD(f) EVAS_API_OVERRIDE(f, &func, eng_)
+   ORD(info);
+   ORD(info_free);
+   ORD(setup);
+   ORD(canvas_alpha_get);
+   ORD(output_free);
+   ORD(output_resize);
+   ORD(output_tile_size_set);
+   ORD(output_redraws_rect_add);
+   ORD(output_redraws_rect_del);
+   ORD(output_redraws_clear);
+   ORD(output_redraws_next_update_get);
+   ORD(output_redraws_next_update_push);
+   ORD(output_flush);
+   ORD(output_idle_flush);
+   /* now advertise out own api */
+   em->functions = (void *)(&func);
+   return 1;
+}
+
+static void
+module_close(Evas_Module *em __UNUSED__)
+{
+  eina_log_domain_unregister(_evas_engine_soft16_x11_log_dom);
+/*   
+  if (xrdb_user.db)
+    {
+       XrmDestroyDatabase(xrdb_user.db);
+       xrdb_user.last_stat = 0;
+       xrdb_user.last_mtime = 0;
+       xrdb_user.db = NULL;
+    }
+ */
+}
+
+static Evas_Module_Api evas_modapi =
+{
+   EVAS_MODULE_API_VERSION,
+   "software_16_x11",
+   "none",
+   {
+     module_open,
+     module_close
+   }
+};
+
+EVAS_MODULE_DEFINE(EVAS_MODULE_TYPE_ENGINE, engine, software_16_x11);
+
+#ifndef EVAS_STATIC_BUILD_SOFTWARE_16_X11
+EVAS_EINA_MODULE_DEFINE(engine, software_16_x11);
+#endif
+