/*

 * 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 <string.h>

/*

 * hb_font_funcs_t

 */

static hb_bool_t

hb_font_get_font_h_extents_nil (hb_font_t *font,

                                void *font_data HB_UNUSED,

                                hb_font_extents_t *metrics,

                                void *user_data HB_UNUSED)

{

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

  return false;

}

static hb_bool_t

hb_font_get_font_h_extents_parent (hb_font_t *font,

                                   void *font_data HB_UNUSED,

                                   hb_font_extents_t *metrics,

                                   void *user_data HB_UNUSED)

{

  hb_bool_t ret = font->parent->get_font_h_extents (metrics);

  if (ret) {

    metrics->ascender = font->parent_scale_y_distance (metrics->ascender);

    metrics->descender = font->parent_scale_y_distance (metrics->descender);

    metrics->line_gap = font->parent_scale_y_distance (metrics->line_gap);

  }

  return ret;

}

static hb_bool_t

hb_font_get_font_v_extents_nil (hb_font_t *font,

                                void *font_data HB_UNUSED,

                                hb_font_extents_t *metrics,

                                void *user_data HB_UNUSED)

{

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

  return false;

}

static hb_bool_t

hb_font_get_font_v_extents_parent (hb_font_t *font,

                                   void *font_data HB_UNUSED,

                                   hb_font_extents_t *metrics,

                                   void *user_data HB_UNUSED)

{

  hb_bool_t ret = font->parent->get_font_v_extents (metrics);

  if (ret) {

    metrics->ascender = font->parent_scale_x_distance (metrics->ascender);

    metrics->descender = font->parent_scale_x_distance (metrics->descender);

    metrics->line_gap = font->parent_scale_x_distance (metrics->line_gap);

  }

  return ret;

}

static hb_bool_t

hb_font_get_nominal_glyph_nil (hb_font_t *font HB_UNUSED,

                               void *font_data HB_UNUSED,

                               hb_codepoint_t unicode,

                               hb_codepoint_t *glyph,

                               void *user_data HB_UNUSED)

{

  *glyph = 0;

  return false;

}

static hb_bool_t

hb_font_get_nominal_glyph_parent (hb_font_t *font,

                                  void *font_data HB_UNUSED,

                                  hb_codepoint_t unicode,

                                  hb_codepoint_t *glyph,

                                  void *user_data HB_UNUSED)

{

  return font->parent->get_nominal_glyph (unicode, glyph);

}

static hb_bool_t

hb_font_get_variation_glyph_nil (hb_font_t *font HB_UNUSED,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t unicode,

                                 hb_codepoint_t variation_selector,

                                 hb_codepoint_t *glyph,

                                 void *user_data HB_UNUSED)

{

  *glyph = 0;

  return false;

}

static hb_bool_t

hb_font_get_variation_glyph_parent (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)

{

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

}

static hb_position_t

hb_font_get_glyph_h_advance_nil (hb_font_t *font HB_UNUSED,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t glyph,

                                 void *user_data HB_UNUSED)

{

  return font->x_scale;

}

static hb_position_t

hb_font_get_glyph_h_advance_parent (hb_font_t *font,

                                    void *font_data HB_UNUSED,

                                    hb_codepoint_t glyph,

                                    void *user_data HB_UNUSED)

{

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

}

static hb_position_t

hb_font_get_glyph_v_advance_nil (hb_font_t *font HB_UNUSED,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t glyph,

                                 void *user_data HB_UNUSED)

{

  /* TODO use font_extents.ascender+descender */

  return font->y_scale;

}

static hb_position_t

hb_font_get_glyph_v_advance_parent (hb_font_t *font,

                                    void *font_data HB_UNUSED,

                                    hb_codepoint_t glyph,

                                    void *user_data HB_UNUSED)

{

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

}

static hb_bool_t

hb_font_get_glyph_h_origin_nil (hb_font_t *font HB_UNUSED,

                                void *font_data HB_UNUSED,

                                hb_codepoint_t glyph,

                                hb_position_t *x,

                                hb_position_t *y,

                                void *user_data HB_UNUSED)

{

  *x = *y = 0;

  return true;

}

static hb_bool_t

hb_font_get_glyph_h_origin_parent (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)

{

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

  if (ret)

    font->parent_scale_position (x, y);

  return ret;

}

static hb_bool_t

hb_font_get_glyph_v_origin_nil (hb_font_t *font HB_UNUSED,

                                void *font_data HB_UNUSED,

                                hb_codepoint_t glyph,

                                hb_position_t *x,

                                hb_position_t *y,

                                void *user_data HB_UNUSED)

{

  *x = *y = 0;

  return false;

}

static hb_bool_t

hb_font_get_glyph_v_origin_parent (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)

{

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

  if (ret)

    font->parent_scale_position (x, y);

  return ret;

}

static hb_position_t

hb_font_get_glyph_h_kerning_nil (hb_font_t *font HB_UNUSED,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t left_glyph,

                                 hb_codepoint_t right_glyph,

                                 void *user_data HB_UNUSED)

{

  return 0;

}

static hb_position_t

hb_font_get_glyph_h_kerning_parent (hb_font_t *font,

                                    void *font_data HB_UNUSED,

                                    hb_codepoint_t left_glyph,

                                    hb_codepoint_t right_glyph,

                                    void *user_data HB_UNUSED)

{

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

}

static hb_position_t

hb_font_get_glyph_v_kerning_nil (hb_font_t *font HB_UNUSED,

                                 void *font_data HB_UNUSED,

                                 hb_codepoint_t top_glyph,

                                 hb_codepoint_t bottom_glyph,

                                 void *user_data HB_UNUSED)

{

  return 0;

}

static hb_position_t

hb_font_get_glyph_v_kerning_parent (hb_font_t *font,

                                    void *font_data HB_UNUSED,

                                    hb_codepoint_t top_glyph,

                                    hb_codepoint_t bottom_glyph,

                                    void *user_data HB_UNUSED)

{

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

}

static hb_bool_t

hb_font_get_glyph_extents_nil (hb_font_t *font HB_UNUSED,

                               void *font_data HB_UNUSED,

                               hb_codepoint_t glyph,

                               hb_glyph_extents_t *extents,

                               void *user_data HB_UNUSED)

{

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

  return false;

}

static hb_bool_t

hb_font_get_glyph_extents_parent (hb_font_t *font,

                                  void *font_data HB_UNUSED,

                                  hb_codepoint_t glyph,

                                  hb_glyph_extents_t *extents,

                                  void *user_data HB_UNUSED)

{

  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;

}

static hb_bool_t

hb_font_get_glyph_contour_point_nil (hb_font_t *font HB_UNUSED,

                                     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)

{

  *x = *y = 0;

  return false;

}

static hb_bool_t

hb_font_get_glyph_contour_point_parent (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)

{

  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;

}

static hb_bool_t

hb_font_get_glyph_name_nil (hb_font_t *font HB_UNUSED,

                            void *font_data HB_UNUSED,

                            hb_codepoint_t glyph,

                            char *name, unsigned int size,

                            void *user_data HB_UNUSED)

{

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

  return false;

}

static hb_bool_t

hb_font_get_glyph_name_parent (hb_font_t *font,

                               void *font_data HB_UNUSED,

                               hb_codepoint_t glyph,

                               char *name, unsigned int size,

                               void *user_data HB_UNUSED)

{

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

}

static hb_bool_t

hb_font_get_glyph_from_name_nil (hb_font_t *font HB_UNUSED,

                                 void *font_data HB_UNUSED,

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

                                 hb_codepoint_t *glyph,

                                 void *user_data HB_UNUSED)

{

  *glyph = 0;

  return false;

}

static hb_bool_t

hb_font_get_glyph_from_name_parent (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)

{

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

}

static const hb_font_funcs_t _hb_font_funcs_nil = {

  HB_OBJECT_HEADER_STATIC,

  true, /* immutable */

  {

#define HB_FONT_FUNC_IMPLEMENT(name) NULL,

    HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

  },

  {

#define HB_FONT_FUNC_IMPLEMENT(name) NULL,

    HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

  },

  {

    {

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

      HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

    }

  }

};

static const hb_font_funcs_t _hb_font_funcs_parent = {

  HB_OBJECT_HEADER_STATIC,

  true, /* immutable */

  {

#define HB_FONT_FUNC_IMPLEMENT(name) NULL,

    HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

  },

  {

#define HB_FONT_FUNC_IMPLEMENT(name) NULL,

    HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

  },

  {

    {

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

      HB_FONT_FUNCS_IMPLEMENT_CALLBACKS

#undef HB_FONT_FUNC_IMPLEMENT

    }

  }

};

/**

 * hb_font_funcs_create: (Xconstructor)

 *

 *

 *

 * 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_parent.get;

  return ffuncs;

}

/**

 * hb_font_funcs_get_empty:

 *

 *

 *

 * Since: 0.9.2

 **/

hb_font_funcs_t *

hb_font_funcs_get_empty (void)

{

  return const_cast<hb_font_funcs_t *> (&_hb_font_funcs_parent);

}

/**

 * hb_font_funcs_reference: (skip)

 * @ffuncs: font functions.

 *

 *

 *

 * 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.

 *

 *

 *

 * 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.

 *

 *

 *

 * Since: 0.9.2