/*

 * Copyright © 2009  Red Hat, Inc.

 * Copyright © 2012  Google, Inc.

 *

 *  This is part of HarfBuzz, a text shaping library.

 *

 * Permission is hereby granted, without written agreement and without

 * license or royalty fees, to use, copy, modify, and distribute this

 * software and its documentation for any purpose, provided that the

 * above copyright notice and the following two paragraphs appear in

 * all copies of this software.

 *

 * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR

 * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES

 * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN

 * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH

 * DAMAGE.

 *

 * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING,

 * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND

 * FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS

 * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO

 * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.

 *

 * Red Hat Author(s): Behdad Esfahbod

 * Google Author(s): Behdad Esfahbod

 */

#include "hb-private.hh"

#include "hb-ot-layout-private.hh"

#include "hb-font-private.hh"

#include "hb-open-file-private.hh"

#include "hb-ot-head-table.hh"

#include "hb-ot-maxp-table.hh"

#include "hb-cache-private.hh"

#include <string.h>

/*

 * hb_font_funcs_t

 */

static hb_bool_t

hb_font_get_glyph_nil (hb_font_t *font,

                       void *font_data HB_UNUSED,

                       hb_codepoint_t unicode,

                       hb_codepoint_t variation_selector,

                       hb_codepoint_t *glyph,

                       void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent->get_glyph (unicode, variation_selector, glyph);

  *glyph = 0;

  return false;

}

static hb_position_t

hb_font_get_glyph_h_advance_nil (hb_font_t *font,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t glyph,

                                 void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent_scale_x_distance (font->parent->get_glyph_h_advance (glyph));

  return font->x_scale;

}

static hb_position_t

hb_font_get_glyph_v_advance_nil (hb_font_t *font,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t glyph,

                                 void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent_scale_y_distance (font->parent->get_glyph_v_advance (glyph));

  return font->y_scale;

}

static hb_bool_t

hb_font_get_glyph_h_origin_nil (hb_font_t *font,

                                void *font_data HB_UNUSED,

                                hb_codepoint_t glyph,

                                hb_position_t *x,

                                hb_position_t *y,

                                void *user_data HB_UNUSED)

{

  if (font->parent) {

    hb_bool_t ret = font->parent->get_glyph_h_origin (glyph, x, y);

    if (ret)

      font->parent_scale_position (x, y);

    return ret;

  }

  *x = *y = 0;

  return false;

}

static hb_bool_t

hb_font_get_glyph_v_origin_nil (hb_font_t *font,

                                void *font_data HB_UNUSED,

                                hb_codepoint_t glyph,

                                hb_position_t *x,

                                hb_position_t *y,

                                void *user_data HB_UNUSED)

{

  if (font->parent) {

    hb_bool_t ret = font->parent->get_glyph_v_origin (glyph, x, y);

    if (ret)

      font->parent_scale_position (x, y);

    return ret;

  }

  *x = *y = 0;

  return false;

}

static hb_position_t

hb_font_get_glyph_h_kerning_nil (hb_font_t *font,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t left_glyph,

                                 hb_codepoint_t right_glyph,

                                 void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent_scale_x_distance (font->parent->get_glyph_h_kerning (left_glyph, right_glyph));

  return 0;

}

static hb_position_t

hb_font_get_glyph_v_kerning_nil (hb_font_t *font,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t top_glyph,

                                 hb_codepoint_t bottom_glyph,

                                 void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent_scale_y_distance (font->parent->get_glyph_v_kerning (top_glyph, bottom_glyph));

  return 0;

}

static hb_bool_t

hb_font_get_glyph_extents_nil (hb_font_t *font,

                               void *font_data HB_UNUSED,

                               hb_codepoint_t glyph,

                               hb_glyph_extents_t *extents,

                               void *user_data HB_UNUSED)

{

  if (font->parent) {

    hb_bool_t ret = font->parent->get_glyph_extents (glyph, extents);

    if (ret) {

      font->parent_scale_position (&extents->x_bearing, &extents->y_bearing);

      font->parent_scale_distance (&extents->width, &extents->height);

    }

    return ret;

  }

  memset (extents, 0, sizeof (*extents));

  return false;

}

static hb_bool_t

hb_font_get_glyph_contour_point_nil (hb_font_t *font,

                                     void *font_data HB_UNUSED,

                                     hb_codepoint_t glyph,

                                     unsigned int point_index,

                                     hb_position_t *x,

                                     hb_position_t *y,

                                     void *user_data HB_UNUSED)

{

  if (font->parent) {

    hb_bool_t ret = font->parent->get_glyph_contour_point (glyph, point_index, x, y);

    if (ret)

      font->parent_scale_position (x, y);

    return ret;

  }

  *x = *y = 0;

  return false;

}

static hb_bool_t

hb_font_get_glyph_name_nil (hb_font_t *font,

                            void *font_data HB_UNUSED,

                            hb_codepoint_t glyph,

                            char *name, unsigned int size,

                            void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent->get_glyph_name (glyph, name, size);

  if (size) *name = '\0';

  return false;

}

static hb_bool_t

hb_font_get_glyph_from_name_nil (hb_font_t *font,

                                 void *font_data HB_UNUSED,

                                 const char *name, int len, /* -1 means nul-terminated */

                                 hb_codepoint_t *glyph,

                                 void *user_data HB_UNUSED)

{

  if (font->parent)

    return font->parent->get_glyph_from_name (name, len, glyph);

  *glyph = 0;

  return false;

}

static const hb_font_funcs_t _hb_font_funcs_nil = {

  HB_OBJECT_HEADER_STATIC,

  true, /* immutable */

  {

#define HB_FONT_FUNC_IMPLEMENT(name) hb_font_get_##name##_nil,

    HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

  }

};

/**

 * hb_font_funcs_create: (Xconstructor)

 *

 *

 *

 * Return value: (transfer full):

 *

 * Since: 0.9.2

 **/

hb_font_funcs_t *

hb_font_funcs_create (void)

{

  hb_font_funcs_t *ffuncs;

  if (!(ffuncs = hb_object_create<hb_font_funcs_t> ()))

    return hb_font_funcs_get_empty ();

  ffuncs->get = _hb_font_funcs_nil.get;

  return ffuncs;

}

/**

 * hb_font_funcs_get_empty:

 *

 *

 *

 * Return value: (transfer full):

 *

 * Since: 0.9.2

 **/

hb_font_funcs_t *

hb_font_funcs_get_empty (void)

{

  return const_cast<hb_font_funcs_t *> (&_hb_font_funcs_nil);

}

/**

 * hb_font_funcs_reference: (skip)

 * @ffuncs: font functions.

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_font_funcs_t *

hb_font_funcs_reference (hb_font_funcs_t *ffuncs)

{

  return hb_object_reference (ffuncs);

}

/**

 * hb_font_funcs_destroy: (skip)

 * @ffuncs: font functions.

 *

 *

 *

 * Since: 0.9.2

 **/

void

hb_font_funcs_destroy (hb_font_funcs_t *ffuncs)

{

  if (!hb_object_destroy (ffuncs)) return;

#define HB_FONT_FUNC_IMPLEMENT(name) if (ffuncs->destroy.name) \

  ffuncs->destroy.name (ffuncs->user_data.name);

  HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

  free (ffuncs);

}

/**

 * hb_font_funcs_set_user_data: (skip)

 * @ffuncs: font functions.

 * @key:

 * @data:

 * @destroy:

 * @replace:

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_bool_t

hb_font_funcs_set_user_data (hb_font_funcs_t    *ffuncs,

                             hb_user_data_key_t *key,

                             void *              data,

                             hb_destroy_func_t   destroy,

                             hb_bool_t           replace)

{

  return hb_object_set_user_data (ffuncs, key, data, destroy, replace);

}

/**

 * hb_font_funcs_get_user_data: (skip)

 * @ffuncs: font functions.

 * @key:

 *

 *

 *

 * Return value: (transfer none):

 *

 * Since: 0.9.2

 **/

void *

hb_font_funcs_get_user_data (hb_font_funcs_t    *ffuncs,

                             hb_user_data_key_t *key)

{

  return hb_object_get_user_data (ffuncs, key);

}

/**

 * hb_font_funcs_make_immutable:

 * @ffuncs: font functions.

 *

 *

 *

 * Since: 0.9.2

 **/

void

hb_font_funcs_make_immutable (hb_font_funcs_t *ffuncs)

{

  if (unlikely (hb_object_is_inert (ffuncs)))

    return;

  ffuncs->immutable = true;

}

/**

 * hb_font_funcs_is_immutable:

 * @ffuncs: font functions.

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_bool_t

hb_font_funcs_is_immutable (hb_font_funcs_t *ffuncs)

{

  return ffuncs->immutable;

}

#define HB_FONT_FUNC_IMPLEMENT(name) \

                                                                         \

void                                                                     \

hb_font_funcs_set_##name##_func (hb_font_funcs_t             *ffuncs,    \

                                 hb_font_get_##name##_func_t  func,      \

                                 void                        *user_data, \

                                 hb_destroy_func_t            destroy)   \

{                                                                        \

  if (ffuncs->immutable) {                                               \

    if (destroy)                                                         \

      destroy (user_data);                                               \

    return;                                                              \

  }                                                                      \

                                                                         \

  if (ffuncs->destroy.name)                                              \

    ffuncs->destroy.name (ffuncs->user_data.name);                       \

                                                                         \

  if (func) {                                                            \

    ffuncs->get.name = func;                                             \

    ffuncs->user_data.name = user_data;                                  \

    ffuncs->destroy.name = destroy;                                      \

  } else {                                                               \

    ffuncs->get.name = hb_font_get_##name##_nil;                         \

    ffuncs->user_data.name = NULL;                                       \

    ffuncs->destroy.name = NULL;                                         \

  }                                                                      \

}

HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

/* Public getters */

/**

 * hb_font_get_glyph:

 * @font: a font.

 * @unicode:

 * @variation_selector:

 * @glyph: (out):

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_bool_t

hb_font_get_glyph (hb_font_t *font,

                   hb_codepoint_t unicode, hb_codepoint_t variation_selector,

                   hb_codepoint_t *glyph)

{

  return font->get_glyph (unicode, variation_selector, glyph);

}

/**

 * hb_font_get_glyph_h_advance:

 * @font: a font.

 * @glyph:

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_position_t

hb_font_get_glyph_h_advance (hb_font_t *font,

                             hb_codepoint_t glyph)

{

  return font->get_glyph_h_advance (glyph);

}

/**

 * hb_font_get_glyph_v_advance:

 * @font: a font.

 * @glyph:

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_position_t

hb_font_get_glyph_v_advance (hb_font_t *font,

                             hb_codepoint_t glyph)

{

  return font->get_glyph_v_advance (glyph);

}

/**

 * hb_font_get_glyph_h_origin:

 * @font: a font.

 * @glyph:

 * @x: (out):

 * @y: (out):

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_bool_t

hb_font_get_glyph_h_origin (hb_font_t *font,

                            hb_codepoint_t glyph,

                            hb_position_t *x, hb_position_t *y)

{

  return font->get_glyph_h_origin (glyph, x, y);

}

/**

 * hb_font_get_glyph_v_origin:

 * @font: a font.

 * @glyph:

 * @x: (out):

 * @y: (out):

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_bool_t

hb_font_get_glyph_v_origin (hb_font_t *font,

                            hb_codepoint_t glyph,

                            hb_position_t *x, hb_position_t *y)

{

  return font->get_glyph_v_origin (glyph, x, y);

}

/**

 * hb_font_get_glyph_h_kerning:

 * @font: a font.

 * @left_glyph:

 * @right_glyph:

 *

 *

 *

 * Return value:

 *

 * Since: 0.9.2

 **/

hb_position_t

hb_font_get_glyph_h_kerning (hb_font_t *font,