Revert "Upstream merge"
[framework/uifw/evas.git] / src / lib / engines / common / evas_font_ot.c
index 15bfcb1..a907831 100644 (file)
@@ -1,6 +1,6 @@
 #include "evas_font_ot.h"
 
-#ifdef OT_SUPPORT
+#ifdef USE_HARFBUZZ
 # include <hb.h>
 # include <hb-ft.h>
 #endif
 #include <Eina.h>
 #include "evas_font_private.h"
 
-EAPI Eina_Bool
-evas_common_font_ot_is_enabled(void)
+#ifdef USE_HARFBUZZ
+static const hb_script_t
+_evas_script_to_harfbuzz[] =
 {
-#ifdef OT_SUPPORT
-   static int ret = -1;
-   const char *env;
-   if (ret != -1)
-     {
-        return ret;
-     }
+  HB_SCRIPT_COMMON,
+  HB_SCRIPT_INHERITED,
+  HB_SCRIPT_ARABIC,
+  HB_SCRIPT_ARMENIAN,
+  HB_SCRIPT_BENGALI,
+  HB_SCRIPT_BOPOMOFO,
+  HB_SCRIPT_CHEROKEE,
+  HB_SCRIPT_COPTIC,
+  HB_SCRIPT_CYRILLIC,
+  HB_SCRIPT_DESERET,
+  HB_SCRIPT_DEVANAGARI,
+  HB_SCRIPT_ETHIOPIC,
+  HB_SCRIPT_GEORGIAN,
+  HB_SCRIPT_GOTHIC,
+  HB_SCRIPT_GREEK,
+  HB_SCRIPT_GUJARATI,
+  HB_SCRIPT_GURMUKHI,
+  HB_SCRIPT_HAN,
+  HB_SCRIPT_HANGUL,
+  HB_SCRIPT_HEBREW,
+  HB_SCRIPT_HIRAGANA,
+  HB_SCRIPT_KANNADA,
+  HB_SCRIPT_KATAKANA,
+  HB_SCRIPT_KHMER,
+  HB_SCRIPT_LAO,
+  HB_SCRIPT_LATIN,
+  HB_SCRIPT_MALAYALAM,
+  HB_SCRIPT_MONGOLIAN,
+  HB_SCRIPT_MYANMAR,
+  HB_SCRIPT_OGHAM,
+  HB_SCRIPT_OLD_ITALIC,
+  HB_SCRIPT_ORIYA,
+  HB_SCRIPT_RUNIC,
+  HB_SCRIPT_SINHALA,
+  HB_SCRIPT_SYRIAC,
+  HB_SCRIPT_TAMIL,
+  HB_SCRIPT_TELUGU,
+  HB_SCRIPT_THAANA,
+  HB_SCRIPT_THAI,
+  HB_SCRIPT_TIBETAN,
+  HB_SCRIPT_CANADIAN_ABORIGINAL,
+  HB_SCRIPT_YI,
+  HB_SCRIPT_TAGALOG,
+  HB_SCRIPT_HANUNOO,
+  HB_SCRIPT_BUHID,
+  HB_SCRIPT_TAGBANWA,
 
-   env = getenv("EVAS_USE_OT");
-   if (env && atoi(env))
-     {
-        ret = EINA_TRUE;
-        return ret;
-     }
+  /* Unicode-4.0 additions */
+  HB_SCRIPT_BRAILLE,
+  HB_SCRIPT_CYPRIOT,
+  HB_SCRIPT_LIMBU,
+  HB_SCRIPT_OSMANYA,
+  HB_SCRIPT_SHAVIAN,
+  HB_SCRIPT_LINEAR_B,
+  HB_SCRIPT_TAI_LE,
+  HB_SCRIPT_UGARITIC,
+
+  /* Unicode-4.1 additions */
+  HB_SCRIPT_NEW_TAI_LUE,
+  HB_SCRIPT_BUGINESE,
+  HB_SCRIPT_GLAGOLITIC,
+  HB_SCRIPT_TIFINAGH,
+  HB_SCRIPT_SYLOTI_NAGRI,
+  HB_SCRIPT_OLD_PERSIAN,
+  HB_SCRIPT_KHAROSHTHI,
+
+  /* Unicode-5.0 additions */
+  HB_SCRIPT_UNKNOWN,
+  HB_SCRIPT_BALINESE,
+  HB_SCRIPT_CUNEIFORM,
+  HB_SCRIPT_PHOENICIAN,
+  HB_SCRIPT_PHAGS_PA,
+  HB_SCRIPT_NKO,
+
+  /* Unicode-5.1 additions */
+  HB_SCRIPT_KAYAH_LI,
+  HB_SCRIPT_LEPCHA,
+  HB_SCRIPT_REJANG,
+  HB_SCRIPT_SUNDANESE,
+  HB_SCRIPT_SAURASHTRA,
+  HB_SCRIPT_CHAM,
+  HB_SCRIPT_OL_CHIKI,
+  HB_SCRIPT_VAI,
+  HB_SCRIPT_CARIAN,
+  HB_SCRIPT_LYCIAN,
+  HB_SCRIPT_LYDIAN,
+
+  /* Unicode-5.2 additions */
+  HB_SCRIPT_AVESTAN,
+  HB_SCRIPT_BAMUM,
+  HB_SCRIPT_EGYPTIAN_HIEROGLYPHS,
+  HB_SCRIPT_IMPERIAL_ARAMAIC,
+  HB_SCRIPT_INSCRIPTIONAL_PAHLAVI,
+  HB_SCRIPT_INSCRIPTIONAL_PARTHIAN,
+  HB_SCRIPT_JAVANESE,
+  HB_SCRIPT_KAITHI,
+  HB_SCRIPT_TAI_THAM,
+  HB_SCRIPT_LISU,
+  HB_SCRIPT_MEETEI_MAYEK,
+  HB_SCRIPT_OLD_SOUTH_ARABIAN,
+  HB_SCRIPT_OLD_TURKIC,
+  HB_SCRIPT_SAMARITAN,
+  HB_SCRIPT_TAI_VIET,
+
+  /* Unicode-6.0 additions */
+  HB_SCRIPT_BATAK,
+  HB_SCRIPT_BRAHMI,
+  HB_SCRIPT_MANDAIC
+};
 #endif
-   return EINA_FALSE;
-}
 
 #ifdef OT_SUPPORT
 /* FIXME: doc. returns #items */
 EAPI int
-evas_common_font_ot_cluster_size_get(const Evas_Text_Props *props, size_t char_index, int orig_len)
+evas_common_font_ot_cluster_size_get(const Evas_Text_Props *props, size_t char_index)
 {
    int i;
    int items;
    int left_bound, right_bound;
-   size_t base_cluster = EVAS_FONT_OT_POS_GET(props->ot_data->items[char_index]);
+   size_t base_cluster;
+   char_index += props->start;
+   base_cluster = EVAS_FONT_OT_POS_GET(props->info->ot[char_index]);
    for (i = (int) char_index ;
-         (i >= 0) &&
-         (EVAS_FONT_OT_POS_GET(props->ot_data->items[i]) == base_cluster) ;
+         (i >= (int) props->start) &&
+         (EVAS_FONT_OT_POS_GET(props->info->ot[i]) == base_cluster) ;
          i--)
      ;
    left_bound = i;
    for (i = (int) char_index + 1;
-         (i < (int) props->ot_data->len) &&
-         (EVAS_FONT_OT_POS_GET(props->ot_data->items[i]) == base_cluster) ;
+         (i < (int) (props->start + props->len)) &&
+         (EVAS_FONT_OT_POS_GET(props->info->ot[i]) == base_cluster) ;
          i++)
      ;
    right_bound = i;
+
    if (right_bound == left_bound)
      {
         items = 1;
@@ -60,120 +157,125 @@ evas_common_font_ot_cluster_size_get(const Evas_Text_Props *props, size_t char_i
      {
         if (left_bound < 0)
           {
-             items = orig_len -
-                props->ot_data->items[left_bound + 1].source_cluster;
+             items = props->text_offset + props->text_len - base_cluster;
           }
         else
           {
-             items = props->ot_data->items[left_bound].source_cluster -
-                props->ot_data->items[left_bound + 1].source_cluster;
+             items = props->info->ot[left_bound].source_cluster - base_cluster;
           }
      }
    else
      {
-        if (right_bound == (int) props->ot_data->len)
+        if (right_bound >= (int) (props->text_offset + props->text_len))
           {
-             items = orig_len -
-                props->ot_data->items[right_bound - 1].source_cluster;
+             items = props->text_offset + props->text_len - base_cluster;
           }
         else
           {
-             items = props->ot_data->items[right_bound].source_cluster -
-                props->ot_data->items[right_bound - 1].source_cluster;
+             items = props->info->ot[right_bound].source_cluster - base_cluster;
           }
      }
    return (items > 0) ? items : 1;
 }
 
-EAPI void
-evas_common_font_ot_load_face(void *_font)
+/* Harfbuzz font functions */
+
+static hb_position_t
+_evas_common_font_ot_hb_get_glyph_advance(hb_font_t *font,
+      void *font_data, hb_codepoint_t glyph,
+      void *user_data)
 {
-   RGBA_Font_Source *font = (RGBA_Font_Source *) _font;
-   font->hb.face = hb_ft_face_create(font->ft.face, NULL);
+   /* Use our cache*/
+   RGBA_Font_Int *fi = (RGBA_Font_Int *) font_data;
+   RGBA_Font_Glyph *fg;
+   (void) font;
+   (void) user_data;
+   fg = evas_common_font_int_cache_glyph_get(fi, glyph);
+   if (fg)
+     {
+        return fg->glyph->advance.x >> 10;
+     }
+   return 0;
 }
 
-EAPI void
-evas_common_font_ot_unload_face(void *_font)
+static hb_position_t
+_evas_common_font_ot_hb_get_kerning(hb_font_t *font, void *font_data,
+   hb_codepoint_t first_glyph, hb_codepoint_t second_glyph, void *user_data)
 {
-   RGBA_Font_Source *font = (RGBA_Font_Source *) _font;
-   if (!font->hb.face) return;
-   hb_face_destroy(font->hb.face);
-   font->hb.face = NULL;
+   RGBA_Font_Int *fi = (RGBA_Font_Int *) font_data;
+   int kern;
+   (void) font;
+   (void) user_data;
+   if (evas_common_font_query_kerning(fi, first_glyph, second_glyph, &kern))
+      return kern;
+
+   return 0;
 }
 
-static void
-_evas_common_font_ot_shape(hb_buffer_t *buffer, RGBA_Font_Source *src)
-{
-   hb_font_t   *hb_font;
+/* End of harfbuzz font funcs */
 
-   hb_font = hb_ft_font_create(src->ft.face, NULL);
+static inline hb_font_funcs_t *
+_evas_common_font_ot_font_funcs_get(void)
+{
+   static hb_font_funcs_t *font_funcs = NULL;
+   if (!font_funcs)
+     {
+        font_funcs = hb_font_funcs_create();
+        hb_font_funcs_set_glyph_h_advance_func(font_funcs,
+            _evas_common_font_ot_hb_get_glyph_advance, NULL, NULL);
+        hb_font_funcs_set_glyph_h_kerning_func(font_funcs,
+            _evas_common_font_ot_hb_get_kerning, NULL, NULL);
+     }
 
-   hb_shape(hb_font, src->hb.face, buffer, NULL, 0);
-   hb_font_destroy(hb_font);
+   return font_funcs;
 }
 
-/* Won't work in the middle of ligatures */
-EAPI void
-evas_common_font_ot_cutoff_text_props(Evas_Text_Props *props, int cutoff)
+static inline hb_unicode_funcs_t *
+_evas_common_font_ot_unicode_funcs_get(void)
 {
-   Evas_Font_OT_Data_Item *tmp;
-   if ((cutoff <= 0) || (!props->ot_data) ||
-         (((size_t) cutoff) >= props->ot_data->len))
-     return;
+   static hb_unicode_funcs_t *unicode_funcs = NULL;
+   if (!unicode_funcs)
+     {
+        unicode_funcs = hb_unicode_funcs_get_default();
+     }
+
+   return unicode_funcs;
+}
 
-   if (props->bidi.dir == EVAS_BIDI_DIRECTION_RTL)
+static void
+_evas_common_font_ot_shape(hb_buffer_t *buffer, RGBA_Font_Int *fi)
+{
+   /* Create hb_font if not previously created */
+   if (!fi->ft.hb_font)
      {
-        memmove(props->ot_data->items,
-              props->ot_data->items + (props->ot_data->len - cutoff),
-              cutoff * sizeof(Evas_Font_OT_Data_Item));
+        hb_font_t *hb_ft_font;
+
+        hb_ft_font = hb_ft_font_create(fi->src->ft.face, NULL);
+        fi->ft.hb_font = hb_font_create_sub_font(hb_ft_font);
+        hb_font_destroy(hb_ft_font);
+
+        hb_font_set_funcs(fi->ft.hb_font,
+              _evas_common_font_ot_font_funcs_get(), fi, NULL);
      }
-   tmp = realloc(props->ot_data->items,
-         cutoff * sizeof(Evas_Font_OT_Data_Item));
-   props->ot_data->items = tmp;
-   props->ot_data->len = cutoff;
 
+   hb_shape(fi->ft.hb_font, buffer, NULL, 0);
 }
 
 EAPI Eina_Bool
-evas_common_font_ot_populate_text_props(void *_fn, const Eina_Unicode *text,
+evas_common_font_ot_populate_text_props(const Eina_Unicode *text,
       Evas_Text_Props *props, int len)
 {
-   RGBA_Font *fn = (RGBA_Font *) _fn;
    RGBA_Font_Int *fi;
    hb_buffer_t *buffer;
    hb_glyph_position_t *positions;
    hb_glyph_info_t *infos;
    int slen;
    unsigned int i;
-   if (!evas_common_font_ot_is_enabled()) return EINA_TRUE;
-   if (props->ot_data)
-     {
-        evas_common_font_ot_props_unref(props->ot_data);
-     }
-   props->ot_data = calloc(1, sizeof(Evas_Font_OT_Data));
-   props->ot_data->refcount = 1;
+   Evas_Font_Glyph_Info *gl_itr;
+   Evas_Font_OT_Info *ot_itr;
+   Evas_Coord pen_x = 0;
 
-   fi = fn->fonts->data;
-   /* Load the font needed for this script */
-     {
-        /* Skip common chars */
-        const Eina_Unicode *tmp;
-        for (tmp = text ;
-              *tmp &&
-              evas_common_language_char_script_get(*tmp) == EVAS_SCRIPT_COMMON ;
-              tmp++)
-          ;
-        if (!*tmp && (tmp > text)) tmp--;
-        evas_common_font_glyph_search(fn, &fi, *tmp);
-     }
-   evas_common_font_int_reload(fi);
-   if (fi->src->current_size != fi->size)
-     {
-        FTLOCK();
-        FT_Activate_Size(fi->ft.size);
-        FTUNLOCK();
-        fi->src->current_size = fi->size;
-     }
+   fi = props->font_instance;
 
    if (len < 0)
      {
@@ -184,31 +286,53 @@ evas_common_font_ot_populate_text_props(void *_fn, const Eina_Unicode *text,
         slen = len;
      }
 
+#if HB_VERSION_CHECK(0,7,0)
    buffer = hb_buffer_create(slen);
-   hb_buffer_set_unicode_funcs(buffer, evas_common_language_unicode_funcs_get());
+#else
+   buffer = hb_buffer_create();
+#endif
+   hb_buffer_set_unicode_funcs(buffer, _evas_common_font_ot_unicode_funcs_get());
+#if HB_VERSION_CHECK(0,7,0)
    hb_buffer_set_language(buffer, hb_language_from_string(
             evas_common_language_from_locale_get()));
-   hb_buffer_set_script(buffer, props->script);
+#else
+   hb_buffer_set_language(buffer, hb_language_from_string(
+            evas_common_language_from_locale_get(), -1));
+#endif
+   hb_buffer_set_script(buffer, _evas_script_to_harfbuzz[props->script]);
    hb_buffer_set_direction(buffer,
          (props->bidi.dir == EVAS_BIDI_DIRECTION_RTL) ?
          HB_DIRECTION_RTL : HB_DIRECTION_LTR);
    /* FIXME: add run-time conversions if needed, which is very unlikely */
    hb_buffer_add_utf32(buffer, (const uint32_t *) text, slen, 0, slen);
 
-   _evas_common_font_ot_shape(buffer, fi->src);
+   _evas_common_font_ot_shape(buffer, fi);
 
-   props->ot_data->len = hb_buffer_get_length(buffer);
-   props->ot_data->items = calloc(props->ot_data->len,
-         sizeof(Evas_Font_OT_Data_Item));
-   positions = hb_buffer_get_glyph_positions(buffer);
-   infos = hb_buffer_get_glyph_infos(buffer);
-   for (i = 0 ; i < props->ot_data->len ; i++)
+   props->len = hb_buffer_get_length(buffer);
+   props->info->ot = calloc(props->len,
+         sizeof(Evas_Font_OT_Info));
+   props->info->glyph = calloc(props->len,
+              sizeof(Evas_Font_Glyph_Info));
+   positions = hb_buffer_get_glyph_positions(buffer, NULL);
+   infos = hb_buffer_get_glyph_infos(buffer, NULL);
+   gl_itr = props->info->glyph;
+   ot_itr = props->info->ot;
+   for (i = 0 ; i < props->len ; i++)
      {
-        props->ot_data->items[i].index = infos[i].codepoint;
-        props->ot_data->items[i].source_cluster = infos[i].cluster;
-        props->ot_data->items[i].x_advance = positions[i].x_advance;
-        props->ot_data->items[i].x_offset = positions[i].x_offset;
-        props->ot_data->items[i].y_offset = positions[i].y_offset;
+        Evas_Coord adv;
+        ot_itr->source_cluster = infos->cluster;
+        ot_itr->x_offset = positions->x_offset;
+        ot_itr->y_offset = positions->y_offset;
+        gl_itr->index = infos->codepoint;
+        adv = positions->x_advance;
+
+        pen_x += adv;
+        gl_itr->pen_after = EVAS_FONT_ROUND_26_6_TO_INT(pen_x);
+
+        ot_itr++;
+        gl_itr++;
+        infos++;
+        positions++;
      }
 
    hb_buffer_destroy(buffer);
@@ -217,23 +341,5 @@ evas_common_font_ot_populate_text_props(void *_fn, const Eina_Unicode *text,
    return EINA_FALSE;
 }
 
-EAPI void
-evas_common_font_ot_props_ref(Evas_Font_OT_Data *data)
-{
-   data->refcount++;
-}
-
-EAPI void
-evas_common_font_ot_props_unref(Evas_Font_OT_Data *data)
-{
-   OTLOCK();
-   if (--data->refcount == 0)
-     {
-        if (data->items)
-          free(data->items);
-        free(data);
-     }
-   OTUNLOCK();
-}
 #endif