Upgrade to latest harfbuzz
[framework/uifw/harfbuzz.git] / src / hb-shape.cc
index 368abfc..163a5bf 100644 (file)
@@ -1,5 +1,5 @@
 /*
- * Copyright (C) 2009  Red Hat, Inc.
+ * Copyright © 2009  Red Hat, Inc.
  *
  *  This is part of HarfBuzz, a text shaping library.
  *
  * Red Hat Author(s): Behdad Esfahbod
  */
 
-#include "hb-private.h"
+#include "hb-private.hh"
 
 #include "hb-shape.h"
 
 #include "hb-buffer-private.hh"
 
-#include "hb-ot-shape.h"
-
 #ifdef HAVE_GRAPHITE
-#include "hb-graphite.h"
+#include "hb-graphite2-private.hh"
+#endif
+#ifdef HAVE_UNISCRIBE
+# include "hb-uniscribe-private.hh"
+#endif
+#ifdef HAVE_OT
+# include "hb-ot-shape-private.hh"
+#endif
+#include "hb-fallback-shape-private.hh"
+
+typedef hb_bool_t (*hb_shape_func_t) (hb_font_t          *font,
+                                     hb_buffer_t        *buffer,
+                                     const hb_feature_t *features,
+                                     unsigned int        num_features);
+
+#define HB_SHAPER_IMPLEMENT(name) {#name, _hb_##name##_shape}
+static const struct hb_shaper_pair_t {
+  char name[16];
+  hb_shape_func_t func;
+} all_shapers[] = {
+  /* v--- Add new shapers in the right place here */
+#ifdef HAVE_GRAPHITE
+  HB_SHAPER_IMPLEMENT (graphite2),
+#endif
+#ifdef HAVE_UNISCRIBE
+  HB_SHAPER_IMPLEMENT (uniscribe),
 #endif
+#ifdef HAVE_OT
+  HB_SHAPER_IMPLEMENT (ot),
+#endif
+  HB_SHAPER_IMPLEMENT (fallback) /* should be last */
+};
+#undef HB_SHAPER_IMPLEMENT
+
+
+/* Thread-safe, lock-free, shapers */
 
-HB_BEGIN_DECLS
+static hb_shaper_pair_t *static_shapers;
 
+static
+void free_static_shapers (void)
+{
+  if (unlikely (static_shapers != all_shapers))
+    free (static_shapers);
+}
 
-static void
-hb_shape_internal (hb_font_t          *font,
-                  hb_face_t          *face,
-                  hb_buffer_t        *buffer,
-                  const hb_feature_t *features,
-                  unsigned int        num_features)
+static const hb_shaper_pair_t *
+get_shapers (void)
 {
-#if 0 && defined(HAVE_GRAPHITE)
-  hb_blob_t *silf_blob;
-  silf_blob = hb_face_get_table (face, HB_GRAPHITE_TAG_Silf);
-  if (hb_blob_get_length(silf_blob))
+retry:
+  hb_shaper_pair_t *shapers = (hb_shaper_pair_t *) hb_atomic_ptr_get (&static_shapers);
+
+  if (unlikely (!shapers))
   {
-    hb_graphite_shape(font, face, buffer, features, num_features);
-    hb_blob_destroy(silf_blob);
-    return;
-  }
-  hb_blob_destroy(silf_blob);
+    char *env = getenv ("HB_SHAPER_LIST");
+    if (!env || !*env) {
+      hb_atomic_ptr_cmpexch (&static_shapers, NULL, (const hb_shaper_pair_t *) all_shapers);
+      return (const hb_shaper_pair_t *) all_shapers;
+    }
+
+    /* Not found; allocate one. */
+    shapers = (hb_shaper_pair_t *) malloc (sizeof (all_shapers));
+    if (unlikely (!shapers))
+      return (const hb_shaper_pair_t *) all_shapers;
+     memcpy (shapers, all_shapers, sizeof (all_shapers));
+
+     /* Reorder shaper list to prefer requested shapers. */
+    unsigned int i = 0;
+    char *end, *p = env;
+    for (;;) {
+      end = strchr (p, ',');
+      if (!end)
+       end = p + strlen (p);
+
+      for (unsigned int j = i; j < ARRAY_LENGTH (all_shapers); j++)
+       if (end - p == (int) strlen (shapers[j].name) &&
+           0 == strncmp (shapers[j].name, p, end - p))
+       {
+         /* Reorder this shaper to position i */
+        struct hb_shaper_pair_t t = shapers[j];
+        memmove (&shapers[i + 1], &shapers[i], sizeof (shapers[i]) * (j - i));
+        shapers[i] = t;
+        i++;
+       }
+
+      if (!*end)
+       break;
+      else
+       p = end + 1;
+    }
+
+    if (!hb_atomic_ptr_cmpexch (&static_shapers, NULL, shapers)) {
+      free (shapers);
+      goto retry;
+    }
+
+#ifdef HAVE_ATEXIT
+    atexit (free_static_shapers); /* First person registers atexit() callback. */
 #endif
+  }
 
-  hb_ot_shape (font, face, buffer, features, num_features);
+  return shapers;
 }
 
-void
-hb_shape (hb_font_t          *font,
-         hb_face_t          *face,
-         hb_buffer_t        *buffer,
-         const hb_feature_t *features,
-         unsigned int        num_features)
+
+static const char **static_shaper_list;
+
+static
+void free_static_shaper_list (void)
+{
+  free (static_shaper_list);
+}
+
+const char **
+hb_shape_list_shapers (void)
 {
-  hb_segment_properties_t orig_props;
-
-  orig_props = buffer->props;
-
-  /* If script is set to INVALID, guess from buffer contents */
-  if (buffer->props.script == HB_SCRIPT_INVALID) {
-    hb_unicode_get_script_func_t get_script = buffer->unicode->v.get_script;
-    unsigned int count = buffer->len;
-    for (unsigned int i = 0; i < count; i++) {
-      hb_script_t script = get_script (buffer->info[i].codepoint);
-      if (likely (script != HB_SCRIPT_COMMON &&
-                 script != HB_SCRIPT_INHERITED &&
-                 script != HB_SCRIPT_UNKNOWN)) {
-        buffer->props.script = script;
-        break;
-      }
+retry:
+  const char **shaper_list = (const char **) hb_atomic_ptr_get (&static_shaper_list);
+
+  if (unlikely (!shaper_list))
+  {
+    /* Not found; allocate one. */
+    shaper_list = (const char **) calloc (1 + ARRAY_LENGTH (all_shapers), sizeof (const char *));
+    if (unlikely (!shaper_list)) {
+      static const char *nil_shaper_list[] = {NULL};
+      return nil_shaper_list;
     }
-  }
 
-  /* If direction is set to INVALID, guess from script */
-  if (buffer->props.direction == HB_DIRECTION_INVALID) {
-    buffer->props.direction = hb_script_get_horizontal_direction (buffer->props.script);
-  }
+    const hb_shaper_pair_t *shapers = get_shapers ();
+    unsigned int i;
+    for (i = 0; i < ARRAY_LENGTH (all_shapers); i++)
+      shaper_list[i] = shapers[i].name;
+    shaper_list[i] = NULL;
 
-  /* If language is not set, use default language from locale */
-  if (buffer->props.language == NULL) {
-    /* TODO get_default_for_script? using $LANGUAGE */
-    //buffer->props.language = hb_language_get_default ();
-  }
+    if (!hb_atomic_ptr_cmpexch (&static_shaper_list, NULL, shaper_list)) {
+      free (shaper_list);
+      goto retry;
+    }
 
-  hb_shape_internal (font, face, buffer, features, num_features);
+#ifdef HAVE_ATEXIT
+    atexit (free_static_shaper_list); /* First person registers atexit() callback. */
+#endif
+  }
 
-  buffer->props = orig_props;
+  return shaper_list;
 }
 
 
-HB_END_DECLS
+hb_bool_t
+hb_shape_full (hb_font_t          *font,
+              hb_buffer_t        *buffer,
+              const hb_feature_t *features,
+              unsigned int        num_features,
+              const char * const *shaper_list)
+{
+  hb_font_make_immutable (font); /* So we can safely cache stuff on it */
+
+  if (likely (!shaper_list)) {
+    const hb_shaper_pair_t *shapers = get_shapers ();
+    for (unsigned int i = 0; i < ARRAY_LENGTH (all_shapers); i++)
+      if (likely (shapers[i].func (font, buffer, features, num_features)))
+        return true;
+  } else {
+    while (*shaper_list) {
+      for (unsigned int i = 0; i < ARRAY_LENGTH (all_shapers); i++)
+       if (0 == strcmp (*shaper_list, all_shapers[i].name)) {
+         if (likely (all_shapers[i].func (font, buffer, features, num_features)))
+           return true;
+         break;
+       }
+      shaper_list++;
+    }
+  }
+  return false;
+}
+
+void
+hb_shape (hb_font_t           *font,
+         hb_buffer_t         *buffer,
+         const hb_feature_t  *features,
+         unsigned int         num_features)
+{
+  hb_shape_full (font, buffer, features, num_features, NULL);
+}