kc3-lang/harfbuzz/src/hb-cairo.c

• Show log

  Commit

• Hash : 767bdd43
  Author :
  Date : 2022-12-25T10:32:33
  

  wip: Add libharfbuzz-cairo
  
  This library will provide integration with cairo
  for font rendering.
  

Download

• src/hb-cairo.c

• /*
   * Copyright © 2022  Red Hat, 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): Matthias Clasen
   */
  
  #include "config.h"
  
  #include <stddef.h>
  
  #include "hb-ot.h"
  
  #include "hb-cairo.h"
  #include "hb-cairo-utils.h"
  
  static void
  move_to (hb_draw_funcs_t *dfuncs,
           cairo_t *cr,
           hb_draw_state_t *st,
           float to_x, float to_y,
           void *)
  {
    cairo_move_to (cr, (double) to_x, (double) to_y);
  }
  
  static void
  line_to (hb_draw_funcs_t *dfuncs,
           cairo_t *cr,
           hb_draw_state_t *st,
           float to_x, float to_y,
           void *)
  {
    cairo_line_to (cr, (double) to_x, (double) to_y);
  }
  
  static void
  cubic_to (hb_draw_funcs_t *dfuncs,
            cairo_t *cr,
            hb_draw_state_t *st,
            float control1_x, float control1_y,
            float control2_x, float control2_y,
            float to_x, float to_y,
            void *)
  {
    cairo_curve_to (cr,
                    (double) control1_x, (double) control1_y,
                    (double) control2_x, (double) control2_y,
                    (double) to_x, (double) to_y);
  }
  
  static void
  close_path (hb_draw_funcs_t *dfuncs,
              cairo_t *cr,
              hb_draw_state_t *st,
              void *)
  {
    cairo_close_path (cr);
  }
  
  static hb_draw_funcs_t *
  get_cairo_draw_funcs (void)
  {
    static hb_draw_funcs_t *funcs;
  
    if (!funcs)
    {
      funcs = hb_draw_funcs_create ();
      hb_draw_funcs_set_move_to_func (funcs, (hb_draw_move_to_func_t) move_to, NULL, NULL);
      hb_draw_funcs_set_line_to_func (funcs, (hb_draw_line_to_func_t) line_to, NULL, NULL);
      hb_draw_funcs_set_cubic_to_func (funcs, (hb_draw_cubic_to_func_t) cubic_to, NULL, NULL);
      hb_draw_funcs_set_close_path_func (funcs, (hb_draw_close_path_func_t) close_path, NULL, NULL);
    }
  
    return funcs;
  }
  
  #ifdef HAVE_CAIRO_USER_FONT_FACE_SET_RENDER_COLOR_GLYPH_FUNC
  
  static void
  push_transform (hb_paint_funcs_t *funcs,
                  void *paint_data,
                  float xx, float yx,
                  float xy, float yy,
                  float dx, float dy,
                  void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
    cairo_matrix_t m;
  
    cairo_save (cr);
    cairo_matrix_init (&m, (double) xx, (double) yx,
                           (double) xy, (double) yy,
                           (double) dx, (double) dy);
    cairo_transform (cr, &m);
  }
  
  static void
  pop_transform (hb_paint_funcs_t *funcs,
                 void *paint_data,
                 void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_restore (cr);
  }
  
  static void
  push_clip_glyph (hb_paint_funcs_t *funcs,
                   void *paint_data,
                   hb_codepoint_t glyph,
                   hb_font_t *font,
                   void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_save (cr);
    cairo_new_path (cr);
    hb_font_draw_glyph (font, glyph, get_cairo_draw_funcs (), cr);
    cairo_close_path (cr);
    cairo_clip (cr);
  }
  
  static void
  push_clip_rectangle (hb_paint_funcs_t *funcs,
                       void *paint_data,
                       float xmin, float ymin, float xmax, float ymax,
                       void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_save (cr);
    cairo_rectangle (cr,
                     (double) xmin, (double) ymin,
                     (double) (xmax - xmin), (double) (ymax - ymin));
    cairo_clip (cr);
  }
  
  static void
  pop_clip (hb_paint_funcs_t *funcs,
            void *paint_data,
            void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_restore (cr);
  }
  
  static void
  push_group (hb_paint_funcs_t *funcs,
              void *paint_data,
              void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_save (cr);
    cairo_push_group (cr);
  }
  
  static void
  pop_group (hb_paint_funcs_t *funcs,
             void *paint_data,
             hb_paint_composite_mode_t mode,
             void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_pop_group_to_source (cr);
    cairo_set_operator (cr, hb_paint_composite_mode_to_cairo (mode));
    cairo_paint (cr);
  
    cairo_restore (cr);
  }
  
  static void
  paint_color (hb_paint_funcs_t *funcs,
               void *paint_data,
               hb_bool_t use_foreground,
               hb_color_t color,
               void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    cairo_set_source_rgba (cr,
                           hb_color_get_red (color) / 255.,
                           hb_color_get_green (color) / 255.,
                           hb_color_get_blue (color) / 255.,
                           hb_color_get_alpha (color) / 255.);
    cairo_paint (cr);
  }
  
  static hb_bool_t
  paint_image (hb_paint_funcs_t *funcs,
               void *paint_data,
               hb_blob_t *blob,
               unsigned width,
               unsigned height,
               hb_tag_t format,
               float slant,
               hb_glyph_extents_t *extents,
               void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    return hb_cairo_paint_glyph_image (cr, blob, width, height, format, slant, extents);
  }
  
  static void
  paint_linear_gradient (hb_paint_funcs_t *funcs,
                         void *paint_data,
                         hb_color_line_t *color_line,
                         float x0, float y0,
                         float x1, float y1,
                         float x2, float y2,
                         void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    hb_cairo_paint_linear_gradient (cr, color_line, x0, y0, x1, y1, x2, y2);
  }
  
  static void
  paint_radial_gradient (hb_paint_funcs_t *funcs,
                         void *paint_data,
                         hb_color_line_t *color_line,
                         float x0, float y0, float r0,
                         float x1, float y1, float r1,
                         void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    hb_cairo_paint_radial_gradient (cr, color_line, x0, y0, r0, x1, y1, r1);
  }
  
  static void
  paint_sweep_gradient (hb_paint_funcs_t *funcs,
                        void *paint_data,
                        hb_color_line_t *color_line,
                        float x0, float y0,
                        float start_angle, float end_angle,
                        void *user_data)
  {
    cairo_t *cr = (cairo_t *)paint_data;
  
    hb_cairo_paint_sweep_gradient (cr, color_line, x0, y0, start_angle, end_angle);
  }
  
  static hb_paint_funcs_t *
  get_cairo_paint_funcs ()
  {
    static hb_paint_funcs_t *funcs;
  
    if (!funcs)
    {
      funcs = hb_paint_funcs_create ();
  
      hb_paint_funcs_set_push_transform_func (funcs, push_transform, NULL, NULL);
      hb_paint_funcs_set_pop_transform_func (funcs, pop_transform, NULL, NULL);
      hb_paint_funcs_set_push_clip_glyph_func (funcs, push_clip_glyph, NULL, NULL);
      hb_paint_funcs_set_push_clip_rectangle_func (funcs, push_clip_rectangle, NULL, NULL);
      hb_paint_funcs_set_pop_clip_func (funcs, pop_clip, NULL, NULL);
      hb_paint_funcs_set_push_group_func (funcs, push_group, NULL, NULL);
      hb_paint_funcs_set_pop_group_func (funcs, pop_group, NULL, NULL);
      hb_paint_funcs_set_color_func (funcs, paint_color, NULL, NULL);
      hb_paint_funcs_set_image_func (funcs, paint_image, NULL, NULL);
      hb_paint_funcs_set_linear_gradient_func (funcs, paint_linear_gradient, NULL, NULL);
      hb_paint_funcs_set_radial_gradient_func (funcs, paint_radial_gradient, NULL, NULL);
      hb_paint_funcs_set_sweep_gradient_func (funcs, paint_sweep_gradient, NULL, NULL);
    }
  
    return funcs;
  }
  
  static cairo_status_t
  render_color_glyph (cairo_scaled_font_t  *scaled_font,
                      unsigned long         glyph,
                      cairo_t              *cr,
                      cairo_text_extents_t *extents);
  #endif
  
  static const cairo_user_data_key_t hb_cairo_font_user_data_key = {0};
  
  static cairo_status_t
  render_glyph (cairo_scaled_font_t  *scaled_font,
                unsigned long         glyph,
                cairo_t              *cr,
                cairo_text_extents_t *extents)
  {
    hb_font_t *font;
    hb_position_t x_scale, y_scale;
  
    font = (hb_font_t *) cairo_font_face_get_user_data (cairo_scaled_font_get_font_face (scaled_font),
                                                        &hb_cairo_font_user_data_key);
  
    hb_font_get_scale (font, &x_scale, &y_scale);
    cairo_scale (cr, +1./x_scale, -1./y_scale);
  
    hb_font_draw_glyph (font, glyph, get_cairo_draw_funcs (), cr);
  
    cairo_fill (cr);
  
    return CAIRO_STATUS_SUCCESS;
  }
  
  #ifdef HAVE_CAIRO_USER_FONT_FACE_SET_RENDER_COLOR_GLYPH_FUNC
  
  static cairo_status_t
  render_color_glyph (cairo_scaled_font_t  *scaled_font,
                      unsigned long         glyph,
                      cairo_t              *cr,
                      cairo_text_extents_t *extents)
  {
    hb_font_t *font;
    unsigned int palette = 0;
    cairo_font_options_t *options;
    hb_color_t color;
    hb_position_t x_scale, y_scale;
  
    font = (hb_font_t *) cairo_font_face_get_user_data (cairo_scaled_font_get_font_face (scaled_font),
                                                        &hb_cairo_font_user_data_key);
  
  #ifdef CAIRO_COLOR_PALETTE_DEFAULT
    options = cairo_font_options_create ();
    cairo_scaled_font_get_font_options (scaled_font, options);
    palette = cairo_font_options_get_color_palette (options);
    cairo_font_options_destroy (options);
  #endif
  
    color = HB_COLOR (0, 0, 0, 255);
    cairo_pattern_t *pattern = cairo_get_source (cr);
    if (cairo_pattern_get_type (pattern) == CAIRO_PATTERN_TYPE_SOLID)
    {
      double r, g, b, a;
      cairo_pattern_get_rgba (pattern, &r, &g, &b, &a);
      color = HB_COLOR ((int)(b * 255.), (int)(g * 255.), (int) (r * 255.), (int)(a * 255.));
    }
  
    hb_font_get_scale (font, &x_scale, &y_scale);
    cairo_scale (cr, +1./x_scale, -1./y_scale);
  
    hb_font_paint_glyph (font, glyph, get_cairo_paint_funcs (), cr, palette, color);
  
    return CAIRO_STATUS_SUCCESS;
  }
  
  #endif
  
  static cairo_font_face_t *
  user_font_face_create (hb_font_t *font)
  {
    hb_face_t *face;
    cairo_font_face_t *cairo_face;
  
    cairo_face = cairo_user_font_face_create ();
    cairo_user_font_face_set_render_glyph_func (cairo_face, render_glyph);
  #ifdef HAVE_CAIRO_USER_FONT_FACE_SET_RENDER_COLOR_GLYPH_FUNC
    face = hb_font_get_face (font);
    if (hb_ot_color_has_png (face) || hb_ot_color_has_layers (face) || hb_ot_color_has_paint (face))
      cairo_user_font_face_set_render_color_glyph_func (cairo_face, render_color_glyph);
  #endif
  
    cairo_font_face_set_user_data (cairo_face,
                                   &hb_cairo_font_user_data_key,
                                   (void *) hb_font_reference (font),
                                   (cairo_destroy_func_t) hb_font_destroy);
  
    return cairo_face;
  }
  
  cairo_scaled_font_t *
  hb_cairo_scaled_font_create (hb_font_t    *font,
                               unsigned int  palette)
  {
    cairo_font_face_t *cairo_face;
    cairo_matrix_t ctm, font_matrix;
    int x_scale, y_scale;
    cairo_font_options_t *font_options;
    cairo_scaled_font_t *scaled_font;
  
    cairo_face = user_font_face_create (font);
  
    hb_font_get_scale (font, &x_scale, &y_scale);
    cairo_matrix_init_identity (&ctm);
    cairo_matrix_init_scale (&font_matrix, x_scale, y_scale);
  
    font_options = cairo_font_options_create ();
    cairo_font_options_set_hint_style (font_options, CAIRO_HINT_STYLE_NONE);
    cairo_font_options_set_hint_metrics (font_options, CAIRO_HINT_METRICS_OFF);
  #ifdef CAIRO_COLOR_PALETTE_DEFAULT
    cairo_font_options_set_color_palette (font_options, palette);
  #endif
  
    scaled_font = cairo_scaled_font_create (cairo_face,
                                            &font_matrix,
                                            &ctm,
                                            font_options);
  
    cairo_font_options_destroy (font_options);
    cairo_font_face_destroy (cairo_face);
  
    return scaled_font;
  }
  
  hb_font_t *
  hb_cairo_scaled_font_get_font (cairo_scaled_font_t *scaled_font)
  {
    cairo_font_face_t *font_face;
  
    font_face = cairo_scaled_font_get_font_face (scaled_font);
  
    return (hb_font_t *) cairo_font_face_get_user_data (font_face, &hb_cairo_font_user_data_key);
  
  }
  

Download