1 files changed, 424 insertions, 0 deletions

diff --git a/libraries/edje/src/lib/edje_textblock_styles.c b/libraries/edje/src/lib/edje_textblock_styles.c
new file mode 100644
index 0000000..13a68ad
--- /dev/null
+++ b/libraries/edje/src/lib/edje_textblock_styles.c
@@ -0,0 +1,424 @@
+#include "edje_private.h"
+
+static int
+_edje_font_is_embedded(Edje_File *edf, char *font)
+{
+   if (!eina_hash_find(edf->fonts, font)) return 0;
+   return 1;
+}
+
+static void
+_edje_format_param_parse(char *item, char **key, char **val)
+{
+   char *p, *k, *v;
+
+   p = strchr(item, '=');
+   k = malloc(p - item + 1);
+   strncpy(k, item, p - item);
+   k[p - item] = 0;
+   *key = k;
+   p++;
+   v = strdup(p);
+   *val = v;
+}
+
+static char *
+_edje_format_parse(const char **s)
+{
+   char *item, *ds;
+   const char *p, *ss;
+   const char *s1 = NULL;
+   const char *s2 = NULL;
+
+   p = *s;
+   if ((!p) || (*p == 0)) return NULL;
+   for (;;)
+     {
+        if (!s1)
+          {
+             if (*p != ' ') s1 = p;
+             if (*p == 0) break;
+          }
+        else if (!s2)
+          {
+             if ((p > *s) && (p[-1] != '\\'))
+               {
+                  if (*p == ' ') s2 = p;
+               }
+             if (*p == 0) s2 = p;
+          }
+        p++;
+        if (s1 && s2)
+          {
+             item = malloc(s2 - s1 + 1);
+             if (item)
+               {
+                  for (ds = item, ss = s1; ss < s2; ss++, ds++)
+                    {
+                       if ((*ss == '\\') && (ss < (s2 - 1))) ss++;
+                       *ds = *ss;
+                    }
+                  *ds = 0;
+               }
+             *s = s2;
+             return item;
+          }
+     }
+   *s = p;
+   return NULL;
+}
+
+static int
+_edje_format_is_param(char *item)
+{
+   if (strchr(item, '=')) return 1;
+   return 0;
+}
+
+static char *
+_edje_format_reparse(Edje_File *edf, const char *str, Edje_Style_Tag **tag_ret)
+{
+   Eina_Strbuf *txt, *tmp = NULL;
+   char *s2, *item, *ret;
+   const char *s;
+
+   txt = eina_strbuf_new();
+   s = str;
+   while ((item = _edje_format_parse(&s)))
+     {
+        if (_edje_format_is_param(item))
+          {
+             char *key = NULL, *val = NULL;
+
+             _edje_format_param_parse(item, &key, &val);
+             if (!strcmp(key, "font_source"))
+               {
+                  /* dont allow font sources */
+               }
+             else if (!strcmp(key, "text_class"))
+               {
+                  if (tag_ret)
+                    (*tag_ret)->text_class = eina_stringshare_add(val);
+               }
+             else if (!strcmp(key, "font_size"))
+               {
+                  if (tag_ret)
+                    (*tag_ret)->font_size = atof(val);
+               }
+             else if (!strcmp(key, "font")) /* Fix fonts */
+               {
+                  if (tag_ret)
+                    {
+                       if (_edje_font_is_embedded(edf, val))
+                         {
+                            if (!tmp)
+                              tmp = eina_strbuf_new();
+                            eina_strbuf_append(tmp, "edje/fonts/");
+                            eina_strbuf_append(tmp, val);
+                            (*tag_ret)->font = eina_stringshare_add(eina_strbuf_string_get(tmp));
+                            eina_strbuf_reset(tmp);
+                         }
+                       else
+                         {
+                            (*tag_ret)->font = eina_stringshare_add(val);
+                         }
+                    }
+               }
+             else /* Otherwise add to tag buffer */
+               {
+                  s2 = eina_str_escape(item);
+                  if (s2)
+                    {
+                       if (eina_strbuf_length_get(txt)) eina_strbuf_append(txt, " ");
+                       eina_strbuf_append(txt, s2);
+                       free(s2);
+                    }
+               }
+             free(key);
+             free(val);
+          }
+        else
+          {
+             if (eina_strbuf_length_get(txt)) eina_strbuf_append(txt, " ");
+             eina_strbuf_append(txt, item);
+          }
+        free(item);
+     }
+   if (tmp)
+     eina_strbuf_free(tmp);
+   ret = eina_strbuf_string_steal(txt);
+   eina_strbuf_free(txt);
+   return ret;
+}
+
+/* Update all evas_styles which are in an edje
+ *
+ * @param ed    The edje containing styles which need to be updated
+ */
+void
+_edje_textblock_style_all_update(Edje *ed)
+{
+   Eina_List *l, *ll;
+   Edje_Style *stl;
+   Eina_Strbuf *txt = NULL;
+
+   if (!ed->file) return;
+
+   EINA_LIST_FOREACH(ed->file->styles, l, stl)
+     {
+        Edje_Style_Tag *tag;
+        Edje_Text_Class *tc;
+        int found = 0;
+        char *fontset = NULL, *fontsource = NULL;
+
+        /* Make sure the style is already defined */
+        if (!stl->style) break;
+
+        /* Make sure the style contains a text_class */
+        EINA_LIST_FOREACH(stl->tags, ll, tag)
+          if (tag->text_class) found = 1;
+
+        /* No text classes , goto next style */
+        if (!found) continue;
+        found = 0;
+        if (!txt)
+          txt = eina_strbuf_new();
+
+        if (_edje_fontset_append)
+          fontset = eina_str_escape(_edje_fontset_append);
+        fontsource = eina_str_escape(ed->file->path);
+
+        /* Build the style from each tag */
+        EINA_LIST_FOREACH(stl->tags, ll, tag)
+          {
+             if (!tag->key) continue;
+
+             /* Add Tag Key */
+             eina_strbuf_append(txt, tag->key);
+             eina_strbuf_append(txt, "='");
+
+             /* Configure fonts from text class if it exists */
+             if ((tc = _edje_text_class_find(ed, tag->text_class)))
+               {
+                  /* Only update if not clearing, If clear leave it at zero */
+                  if (tc->font) found = 1;
+               }
+
+             /* Add and Ha`ndle tag parsed data */
+             eina_strbuf_append(txt, tag->value);
+
+             if (!strcmp(tag->key, "DEFAULT"))
+               {
+                  if (fontset)
+                    {
+                       eina_strbuf_append(txt, " ");
+                       eina_strbuf_append(txt, "font_fallbacks=");
+                       eina_strbuf_append(txt, fontset);
+                    }
+                  eina_strbuf_append(txt, " ");
+                  eina_strbuf_append(txt, "font_source=");
+                  eina_strbuf_append(txt, fontsource);
+               }
+             if (tag->font_size != 0)
+               {
+                  char font_size[32];
+
+                  if (found)
+                    snprintf(font_size, sizeof(font_size), "%f", (double) _edje_text_size_calc(tag->font_size, tc));
+                  else
+                    snprintf(font_size, sizeof(font_size), "%f", tag->font_size);
+
+                  eina_strbuf_append(txt, " ");
+                  eina_strbuf_append(txt, "font_size=");
+                  eina_strbuf_append(txt, font_size);
+               }
+             /* Add font name last to save evas from multiple loads */
+             if (tag->font)
+               {
+                  const char *f;
+
+                  eina_strbuf_append(txt, " ");
+                  eina_strbuf_append(txt, "font=");
+
+                  f = (found) ? tc->font : tag->font;
+                  eina_strbuf_append_escaped(txt, f);
+               }
+             found = 0;
+
+             eina_strbuf_append(txt, "'");
+          }
+        if (fontset) free(fontset);
+        if (fontsource) free(fontsource);
+
+        /* Configure the style */
+        evas_textblock_style_set(stl->style, eina_strbuf_string_get(txt));
+        eina_strbuf_reset(txt);
+     }
+   if (txt)
+     eina_strbuf_free(txt);
+}
+
+void
+_edje_textblock_styles_add(Edje *ed)
+{
+   Eina_List *l, *ll;
+   Edje_Style *stl;
+
+   if (!ed->file) return;
+
+   EINA_LIST_FOREACH(ed->file->styles, l, stl)
+     {
+        Edje_Style_Tag *tag;
+
+        /* Make sure the style contains the text_class */
+        EINA_LIST_FOREACH(stl->tags, ll, tag)
+          {
+            if (!tag->text_class) continue;
+            _edje_text_class_member_add(ed, tag->text_class);
+          }
+     }
+}
+
+void
+_edje_textblock_styles_del(Edje *ed)
+{
+   Eina_List *l, *ll;
+   Edje_Style *stl;
+
+   if (!ed->file) return;
+
+   EINA_LIST_FOREACH(ed->file->styles, l, stl)
+     {
+        Edje_Style_Tag *tag;
+
+        /* Make sure the style contains the text_class */
+        EINA_LIST_FOREACH(stl->tags, ll, tag)
+          {
+             if (!tag->text_class) continue;
+             _edje_text_class_member_del(ed, tag->text_class);
+          }
+     }
+}
+
+/* When we get to here the edje file had been read into memory
+ * the name of the style is established as well as the name and
+ * data for the tags.  This function will create the Evas_Style
+ * object for each style. The style is composed of a base style
+ * followed by a list of tags.
+ */
+void
+_edje_textblock_style_parse_and_fix(Edje_File *edf)
+{
+   Eina_Strbuf *txt = NULL;
+   Eina_List *l, *ll;
+   Edje_Style *stl;
+
+   EINA_LIST_FOREACH(edf->styles, l, stl)
+     {
+        Edje_Style_Tag *tag;
+        char *fontset = NULL, *fontsource = NULL, *ts;
+
+        if (stl->style) break;
+
+        if (!txt)
+          txt = eina_strbuf_new();
+
+        stl->style = evas_textblock_style_new();
+        evas_textblock_style_set(stl->style, NULL);
+
+        if (_edje_fontset_append)
+          fontset = eina_str_escape(_edje_fontset_append);
+        fontsource = eina_str_escape(edf->path);
+
+        /* Build the style from each tag */
+        EINA_LIST_FOREACH(stl->tags, ll, tag)
+          {
+             if (!tag->key) continue;
+
+             /* Add Tag Key */
+             eina_strbuf_append(txt, tag->key);
+             eina_strbuf_append(txt, "='");
+
+             ts = _edje_format_reparse(edf, tag->value, &(tag));
+
+             /* Add and Handle tag parsed data */
+             if (ts)
+               {
+                  if (eet_dictionary_string_check(eet_dictionary_get(edf->ef), tag->value) == 0)
+                    eina_stringshare_del(tag->value);
+                  tag->value = eina_stringshare_add(ts);
+                  eina_strbuf_append(txt, tag->value);
+                  free(ts);
+               }
+
+             if (!strcmp(tag->key, "DEFAULT"))
+               {
+                  if (fontset)
+                    {
+                       eina_strbuf_append(txt, " ");
+                       eina_strbuf_append(txt, "font_fallbacks=");
+                       eina_strbuf_append(txt, fontset);
+                    }
+                  eina_strbuf_append(txt, " ");
+                  eina_strbuf_append(txt, "font_source=");
+                  eina_strbuf_append(txt, fontsource);
+               }
+             if (tag->font_size > 0)
+               {
+                  char font_size[32];
+
+                  snprintf(font_size, sizeof(font_size), "%f", tag->font_size);
+                  eina_strbuf_append(txt, " ");
+                  eina_strbuf_append(txt, "font_size=");
+                  eina_strbuf_append(txt, font_size);
+               }
+             /* Add font name last to save evas from multiple loads */
+             if (tag->font)
+               {
+                  eina_strbuf_append(txt, " ");
+                  eina_strbuf_append(txt, "font=");
+                  eina_strbuf_append_escaped(txt, tag->font);
+               }
+             eina_strbuf_append(txt, "'");
+          }
+        if (fontset) free(fontset);
+        if (fontsource) free(fontsource);
+
+        /* Configure the style */
+        evas_textblock_style_set(stl->style, eina_strbuf_string_get(txt));
+        eina_strbuf_reset(txt);
+     }
+   if (txt)
+     eina_strbuf_free(txt);
+}
+
+void
+_edje_textblock_style_cleanup(Edje_File *edf)
+{
+   while (edf->styles)
+     {
+        Edje_Style *stl;
+
+        stl = edf->styles->data;
+        edf->styles = eina_list_remove_list(edf->styles, edf->styles);
+        while (stl->tags)
+          {
+             Edje_Style_Tag *tag;
+
+             tag = stl->tags->data;
+             stl->tags = eina_list_remove_list(stl->tags, stl->tags);
+             if (edf->free_strings)
+               {
+                  if (tag->key) eina_stringshare_del(tag->key);
+/*                FIXME: Find a proper way to handle it. */
+                  if (tag->value) eina_stringshare_del(tag->value);
+                  if (tag->text_class) eina_stringshare_del(tag->text_class);
+                  if (tag->font) eina_stringshare_del(tag->font);
+               }
+             free(tag);
+          }
+        if (edf->free_strings && stl->name) eina_stringshare_del(stl->name);
+        if (stl->style) evas_textblock_style_free(stl->style);
+        free(stl);
+     }
+}