tor-browser

The Tor Browser
git clone https://git.dasho.dev/tor-browser.git
Log | Files | Refs | README | LICENSE

hb-buffer-deserialize-json.rl (4125B)

      1 /*
      2 * Copyright © 2013  Google, Inc.
      3 *
      4 *  This is part of HarfBuzz, a text shaping library.
      5 *
      6 * Permission is hereby granted, without written agreement and without
      7 * license or royalty fees, to use, copy, modify, and distribute this
      8 * software and its documentation for any purpose, provided that the
      9 * above copyright notice and the following two paragraphs appear in
     10 * all copies of this software.
     11 *
     12 * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR
     13 * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
     14 * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN
     15 * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
     16 * DAMAGE.
     17 *
     18 * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING,
     19 * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
     20 * FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS
     21 * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO
     22 * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
     23 *
     24 * Google Author(s): Behdad Esfahbod
     25 */
     26 
     27 #ifndef HB_BUFFER_DESERIALIZE_JSON_HH
     28 #define HB_BUFFER_DESERIALIZE_JSON_HH
     29 
     30 #include "hb.hh"
     31 
     32 %%{
     33 
     34 machine deserialize_json;
     35 alphtype unsigned char;
     36 write data;
     37 
     38 action clear_item {
     39 hb_memset (&info, 0, sizeof (info));
     40 hb_memset (&pos , 0, sizeof (pos ));
     41 }
     42 
     43 action add_item {
     44 buffer->add_info (info);
     45 if (unlikely (!buffer->successful))
     46   return false;
     47 buffer->pos[buffer->len - 1] = pos;
     48 *end_ptr = p;
     49 }
     50 
     51 action tok {
     52 tok = p;
     53 }
     54 
     55 action ensure_glyphs { if (unlikely (!buffer->ensure_glyphs ())) return false; }
     56 action ensure_unicode { if (unlikely (!buffer->ensure_unicode ())) return false; }
     57 
     58 action parse_glyph_name {
     59 /* TODO Unescape \" and \\ if found. */
     60 if (!hb_font_glyph_from_string (font,
     61 				tok+1, p - tok - 2, /* Skip "" */
     62 				&info.codepoint))
     63   return false;
     64 }
     65 
     66 action parse_codepoint	{ if (!parse_uint (tok, p, &info.codepoint)) return false; }
     67 action parse_cluster	{ if (!parse_uint (tok, p, &info.cluster )) return false; }
     68 action parse_x_offset	{ if (!parse_int  (tok, p, &pos.x_offset )) return false; }
     69 action parse_y_offset	{ if (!parse_int  (tok, p, &pos.y_offset )) return false; }
     70 action parse_x_advance	{ if (!parse_int  (tok, p, &pos.x_advance)) return false; }
     71 action parse_y_advance	{ if (!parse_int  (tok, p, &pos.y_advance)) return false; }
     72 action parse_glyph_flags{ if (!parse_uint (tok, p, &info.mask    )) return false; }
     73 
     74 unum	= '0' | [1-9] digit*;
     75 num	= '-'? unum;
     76 
     77 comma = space* ',' space*;
     78 colon = space* ':' space*;
     79 
     80 codepoint = unum;
     81 glyph_name = '"' ([^\\"] | '\\' [\\"])* '"';
     82 
     83 parse_glyph_name   = (glyph_name >tok %parse_glyph_name);
     84 parse_codepoint = (codepoint >tok %parse_codepoint);
     85 
     86 glyph	=  "\"g\""  colon (parse_glyph_name | parse_codepoint);
     87 unicode	=  "\"u\""  colon parse_codepoint;
     88 cluster	=  "\"cl\"" colon (unum >tok %parse_cluster);
     89 xoffset	=  "\"dx\"" colon (num  >tok %parse_x_offset);
     90 yoffset	=  "\"dy\"" colon (num  >tok %parse_y_offset);
     91 xadvance=  "\"ax\"" colon (num  >tok %parse_x_advance);
     92 yadvance=  "\"ay\"" colon (num  >tok %parse_y_advance);
     93 glyphflags="\"fl\"" colon (unum >tok %parse_glyph_flags);
     94 # Not parsed. Ignored.
     95 glyphextents="\""("xb"|"yb"|"w"|"h")"\"" colon (num >tok);
     96 
     97 element = glyph @ensure_glyphs
     98 | unicode @ensure_unicode
     99 | cluster
    100 | xoffset
    101 | yoffset
    102 | xadvance
    103 | yadvance
    104 | glyphflags
    105 | glyphextents
    106 ;
    107 item	=
    108 ( '{' space* element (comma element)* space* '}' space* (','|']') space* )
    109 >clear_item
    110 @add_item
    111 ;
    112 
    113 main := space* '['? space* item*;
    114 
    115 }%%
    116 
    117 static hb_bool_t
    118 _hb_buffer_deserialize_json (hb_buffer_t *buffer,
    119 			    const char *buf,
    120 			    unsigned int buf_len,
    121 			    const char **end_ptr,
    122 			    hb_font_t *font)
    123 {
    124  const char *p = buf, *pe = buf + buf_len;
    125 
    126  /* Ensure we have positions. */
    127  (void) hb_buffer_get_glyph_positions (buffer, nullptr);
    128 
    129  const char *tok = nullptr;
    130  int cs;
    131  hb_glyph_info_t info = {0};
    132  hb_glyph_position_t pos = {0};
    133  %%{
    134    write init;
    135    write exec;
    136  }%%
    137 
    138  *end_ptr = p;
    139 
    140  return p == pe;
    141 }
    142 
    143 #endif /* HB_BUFFER_DESERIALIZE_JSON_HH */