src/hb-buffer-deserialize-text-unicode.rl

   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_TEXT_UNICODE_HH
  28 #define HB_BUFFER_DESERIALIZE_TEXT_UNICODE_HH
  29
  30 #include "hb.hh"
  31
  32 %%{
  33
  34 machine deserialize_text_unicode;
  35 alphtype unsigned char;
  36 write data;
  37
  38 action clear_item {
  39         hb_memset (&info, 0, sizeof (info));
  40 }
  41
  42 action add_item {
  43         buffer->add_info (info);
  44         if (unlikely (!buffer->successful))
  45           return false;
  46         if (buffer->have_positions)
  47           buffer->pos[buffer->len - 1] = pos;
  48         *end_ptr = p;
  49 }
  50
  51 action tok {
  52         tok = p;
  53 }
  54
  55 action parse_hexdigits  {if (!parse_hex (tok, p, &info.codepoint )) return false; }
  56
  57 action parse_cluster    { if (!parse_uint (tok, p, &info.cluster )) return false; }
  58
  59 unum  = '0' | [1-9] digit*;
  60 num     = '-'? unum;
  61
  62 cluster = '=' (unum >tok %parse_cluster);
  63
  64 unicode = [Uu] '+'? xdigit+ >tok %parse_hexdigits;
  65
  66 unicode_item    =
  67         (
  68                 unicode
  69                 cluster?
  70         )
  71         >clear_item
  72         %add_item
  73         ;
  74
  75 unicodes = unicode_item (space* '|' space* unicode_item)* space*;
  76
  77 main := space* unicodes;
  78
  79 }%%
  80
  81 static hb_bool_t
  82 _hb_buffer_deserialize_text_unicode (hb_buffer_t *buffer,
  83                                      const char *buf,
  84                                      unsigned int buf_len,
  85                                      const char **end_ptr,
  86                                      hb_font_t *font)
  87 {
  88   const char *p = buf, *pe = buf + buf_len, *eof = pe, *orig_pe = pe;
  89
  90   while (p < pe && ISSPACE (*p))
  91     p++;
  92   if (p < pe && *p == (buffer->len ? '|' : '<'))
  93     *end_ptr = ++p;
  94
  95   const char *end = strchr ((char *) p, '>');
  96   if (end)
  97     pe = eof = end;
  98   else
  99   {
 100     end = strrchr ((char *) p, '|');
 101     if (end)
 102       pe = eof = end;
 103     else
 104       pe = eof = p;
 105   }
 106
 107
 108   const char *tok = nullptr;
 109   int cs;
 110   hb_glyph_info_t info = {0};
 111   const hb_glyph_position_t pos = {0};
 112   %%{
 113     write init;
 114     write exec;
 115   }%%
 116
 117   if (pe < orig_pe && *pe == '>')
 118   {
 119     pe++;
 120     if (p == pe)
 121       p++;
 122   }
 123
 124   *end_ptr = p;
 125
 126   return p == pe;
 127 }
 128
 129 #endif /* HB_BUFFER_DESERIALIZE_TEXT_UNICODE_HH */