| 1 | /* |
| 2 | * Copyright © 2018 Adobe 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 | * Adobe Author(s): Michiharu Ariza |
| 25 | */ |
| 26 | #ifndef HB_CFF_INTERP_COMMON_HH |
| 27 | #define HB_CFF_INTERP_COMMON_HH |
| 28 | |
| 29 | extern HB_INTERNAL const unsigned char *endchar_str; |
| 30 | |
| 31 | namespace CFF { |
| 32 | |
| 33 | using namespace OT; |
| 34 | |
| 35 | typedef unsigned int op_code_t; |
| 36 | |
| 37 | |
| 38 | /* === Dict operators === */ |
| 39 | |
| 40 | /* One byte operators (0-31) */ |
| 41 | #define OpCode_version 0 /* CFF Top */ |
| 42 | #define OpCode_Notice 1 /* CFF Top */ |
| 43 | #define OpCode_FullName 2 /* CFF Top */ |
| 44 | #define OpCode_FamilyName 3 /* CFF Top */ |
| 45 | #define OpCode_Weight 4 /* CFF Top */ |
| 46 | #define OpCode_FontBBox 5 /* CFF Top */ |
| 47 | #define OpCode_BlueValues 6 /* CFF Private, CFF2 Private */ |
| 48 | #define OpCode_OtherBlues 7 /* CFF Private, CFF2 Private */ |
| 49 | #define OpCode_FamilyBlues 8 /* CFF Private, CFF2 Private */ |
| 50 | #define OpCode_FamilyOtherBlues 9 /* CFF Private, CFF2 Private */ |
| 51 | #define OpCode_StdHW 10 /* CFF Private, CFF2 Private */ |
| 52 | #define OpCode_StdVW 11 /* CFF Private, CFF2 Private */ |
| 53 | #define OpCode_escape 12 /* All. Shared with CS */ |
| 54 | #define OpCode_UniqueID 13 /* CFF Top */ |
| 55 | #define OpCode_XUID 14 /* CFF Top */ |
| 56 | #define OpCode_charset 15 /* CFF Top (0) */ |
| 57 | #define OpCode_Encoding 16 /* CFF Top (0) */ |
| 58 | #define OpCode_CharStrings 17 /* CFF Top, CFF2 Top */ |
| 59 | #define OpCode_Private 18 /* CFF Top, CFF2 FD */ |
| 60 | #define OpCode_Subrs 19 /* CFF Private, CFF2 Private */ |
| 61 | #define OpCode_defaultWidthX 20 /* CFF Private (0) */ |
| 62 | #define OpCode_nominalWidthX 21 /* CFF Private (0) */ |
| 63 | #define OpCode_vsindexdict 22 /* CFF2 Private/CS */ |
| 64 | #define OpCode_blenddict 23 /* CFF2 Private/CS */ |
| 65 | #define OpCode_vstore 24 /* CFF2 Top */ |
| 66 | #define OpCode_reserved25 25 |
| 67 | #define OpCode_reserved26 26 |
| 68 | #define OpCode_reserved27 27 |
| 69 | |
| 70 | /* Numbers */ |
| 71 | #define OpCode_shortint 28 /* 16-bit integer, All */ |
| 72 | #define OpCode_longintdict 29 /* 32-bit integer, All */ |
| 73 | #define OpCode_BCD 30 /* Real number, CFF2 Top/FD */ |
| 74 | #define OpCode_reserved31 31 |
| 75 | |
| 76 | /* 1-byte integers */ |
| 77 | #define OpCode_OneByteIntFirst 32 /* All. beginning of the range of first byte ints */ |
| 78 | #define OpCode_OneByteIntLast 246 /* All. ending of the range of first byte int */ |
| 79 | |
| 80 | /* 2-byte integers */ |
| 81 | #define OpCode_TwoBytePosInt0 247 /* All. first byte of two byte positive int (+108 to +1131) */ |
| 82 | #define OpCode_TwoBytePosInt1 248 |
| 83 | #define OpCode_TwoBytePosInt2 249 |
| 84 | #define OpCode_TwoBytePosInt3 250 |
| 85 | |
| 86 | #define OpCode_TwoByteNegInt0 251 /* All. first byte of two byte negative int (-1131 to -108) */ |
| 87 | #define OpCode_TwoByteNegInt1 252 |
| 88 | #define OpCode_TwoByteNegInt2 253 |
| 89 | #define OpCode_TwoByteNegInt3 254 |
| 90 | |
| 91 | /* Two byte escape operators 12, (0-41) */ |
| 92 | #define OpCode_ESC_Base 256 |
| 93 | #define Make_OpCode_ESC(byte2) ((op_code_t)(OpCode_ESC_Base + (byte2))) |
| 94 | |
| 95 | inline op_code_t Unmake_OpCode_ESC (op_code_t op) { return (op_code_t)(op - OpCode_ESC_Base); } |
| 96 | inline bool Is_OpCode_ESC (op_code_t op) { return op >= OpCode_ESC_Base; } |
| 97 | inline unsigned int OpCode_Size (op_code_t op) { return Is_OpCode_ESC (op) ? 2: 1; } |
| 98 | |
| 99 | #define OpCode_Copyright Make_OpCode_ESC(0) /* CFF Top */ |
| 100 | #define OpCode_isFixedPitch Make_OpCode_ESC(1) /* CFF Top (false) */ |
| 101 | #define OpCode_ItalicAngle Make_OpCode_ESC(2) /* CFF Top (0) */ |
| 102 | #define OpCode_UnderlinePosition Make_OpCode_ESC(3) /* CFF Top (-100) */ |
| 103 | #define OpCode_UnderlineThickness Make_OpCode_ESC(4) /* CFF Top (50) */ |
| 104 | #define OpCode_PaintType Make_OpCode_ESC(5) /* CFF Top (0) */ |
| 105 | #define OpCode_CharstringType Make_OpCode_ESC(6) /* CFF Top (2) */ |
| 106 | #define OpCode_FontMatrix Make_OpCode_ESC(7) /* CFF Top, CFF2 Top (.001 0 0 .001 0 0)*/ |
| 107 | #define OpCode_StrokeWidth Make_OpCode_ESC(8) /* CFF Top (0) */ |
| 108 | #define OpCode_BlueScale Make_OpCode_ESC(9) /* CFF Private, CFF2 Private (0.039625) */ |
| 109 | #define OpCode_BlueShift Make_OpCode_ESC(10) /* CFF Private, CFF2 Private (7) */ |
| 110 | #define OpCode_BlueFuzz Make_OpCode_ESC(11) /* CFF Private, CFF2 Private (1) */ |
| 111 | #define OpCode_StemSnapH Make_OpCode_ESC(12) /* CFF Private, CFF2 Private */ |
| 112 | #define OpCode_StemSnapV Make_OpCode_ESC(13) /* CFF Private, CFF2 Private */ |
| 113 | #define OpCode_ForceBold Make_OpCode_ESC(14) /* CFF Private (false) */ |
| 114 | #define OpCode_reservedESC15 Make_OpCode_ESC(15) |
| 115 | #define OpCode_reservedESC16 Make_OpCode_ESC(16) |
| 116 | #define OpCode_LanguageGroup Make_OpCode_ESC(17) /* CFF Private, CFF2 Private (0) */ |
| 117 | #define OpCode_ExpansionFactor Make_OpCode_ESC(18) /* CFF Private, CFF2 Private (0.06) */ |
| 118 | #define OpCode_initialRandomSeed Make_OpCode_ESC(19) /* CFF Private (0) */ |
| 119 | #define OpCode_SyntheticBase Make_OpCode_ESC(20) /* CFF Top */ |
| 120 | #define OpCode_PostScript Make_OpCode_ESC(21) /* CFF Top */ |
| 121 | #define OpCode_BaseFontName Make_OpCode_ESC(22) /* CFF Top */ |
| 122 | #define OpCode_BaseFontBlend Make_OpCode_ESC(23) /* CFF Top */ |
| 123 | #define OpCode_reservedESC24 Make_OpCode_ESC(24) |
| 124 | #define OpCode_reservedESC25 Make_OpCode_ESC(25) |
| 125 | #define OpCode_reservedESC26 Make_OpCode_ESC(26) |
| 126 | #define OpCode_reservedESC27 Make_OpCode_ESC(27) |
| 127 | #define OpCode_reservedESC28 Make_OpCode_ESC(28) |
| 128 | #define OpCode_reservedESC29 Make_OpCode_ESC(29) |
| 129 | #define OpCode_ROS Make_OpCode_ESC(30) /* CFF Top_CID */ |
| 130 | #define OpCode_CIDFontVersion Make_OpCode_ESC(31) /* CFF Top_CID (0) */ |
| 131 | #define OpCode_CIDFontRevision Make_OpCode_ESC(32) /* CFF Top_CID (0) */ |
| 132 | #define OpCode_CIDFontType Make_OpCode_ESC(33) /* CFF Top_CID (0) */ |
| 133 | #define OpCode_CIDCount Make_OpCode_ESC(34) /* CFF Top_CID (8720) */ |
| 134 | #define OpCode_UIDBase Make_OpCode_ESC(35) /* CFF Top_CID */ |
| 135 | #define OpCode_FDArray Make_OpCode_ESC(36) /* CFF Top_CID, CFF2 Top */ |
| 136 | #define OpCode_FDSelect Make_OpCode_ESC(37) /* CFF Top_CID, CFF2 Top */ |
| 137 | #define OpCode_FontName Make_OpCode_ESC(38) /* CFF Top_CID */ |
| 138 | |
| 139 | |
| 140 | /* === CharString operators === */ |
| 141 | |
| 142 | #define OpCode_hstem 1 /* CFF, CFF2 */ |
| 143 | #define OpCode_Reserved2 2 |
| 144 | #define OpCode_vstem 3 /* CFF, CFF2 */ |
| 145 | #define OpCode_vmoveto 4 /* CFF, CFF2 */ |
| 146 | #define OpCode_rlineto 5 /* CFF, CFF2 */ |
| 147 | #define OpCode_hlineto 6 /* CFF, CFF2 */ |
| 148 | #define OpCode_vlineto 7 /* CFF, CFF2 */ |
| 149 | #define OpCode_rrcurveto 8 /* CFF, CFF2 */ |
| 150 | #define OpCode_Reserved9 9 |
| 151 | #define OpCode_callsubr 10 /* CFF, CFF2 */ |
| 152 | #define OpCode_return 11 /* CFF */ |
| 153 | //#define OpCode_escape 12 /* CFF, CFF2 */ |
| 154 | #define OpCode_Reserved13 13 |
| 155 | #define OpCode_endchar 14 /* CFF */ |
| 156 | #define OpCode_vsindexcs 15 /* CFF2 */ |
| 157 | #define OpCode_blendcs 16 /* CFF2 */ |
| 158 | #define OpCode_Reserved17 17 |
| 159 | #define OpCode_hstemhm 18 /* CFF, CFF2 */ |
| 160 | #define OpCode_hintmask 19 /* CFF, CFF2 */ |
| 161 | #define OpCode_cntrmask 20 /* CFF, CFF2 */ |
| 162 | #define OpCode_rmoveto 21 /* CFF, CFF2 */ |
| 163 | #define OpCode_hmoveto 22 /* CFF, CFF2 */ |
| 164 | #define OpCode_vstemhm 23 /* CFF, CFF2 */ |
| 165 | #define OpCode_rcurveline 24 /* CFF, CFF2 */ |
| 166 | #define OpCode_rlinecurve 25 /* CFF, CFF2 */ |
| 167 | #define OpCode_vvcurveto 26 /* CFF, CFF2 */ |
| 168 | #define OpCode_hhcurveto 27 /* CFF, CFF2 */ |
| 169 | //#define OpCode_shortint 28 /* CFF, CFF2 */ |
| 170 | #define OpCode_callgsubr 29 /* CFF, CFF2 */ |
| 171 | #define OpCode_vhcurveto 30 /* CFF, CFF2 */ |
| 172 | #define OpCode_hvcurveto 31 /* CFF, CFF2 */ |
| 173 | |
| 174 | #define OpCode_fixedcs 255 /* 32-bit fixed */ |
| 175 | |
| 176 | /* Two byte escape operators 12, (0-41) */ |
| 177 | #define OpCode_dotsection Make_OpCode_ESC(0) /* CFF (obsoleted) */ |
| 178 | #define OpCode_ReservedESC1 Make_OpCode_ESC(1) |
| 179 | #define OpCode_ReservedESC2 Make_OpCode_ESC(2) |
| 180 | #define OpCode_and Make_OpCode_ESC(3) /* CFF */ |
| 181 | #define OpCode_or Make_OpCode_ESC(4) /* CFF */ |
| 182 | #define OpCode_not Make_OpCode_ESC(5) /* CFF */ |
| 183 | #define OpCode_ReservedESC6 Make_OpCode_ESC(6) |
| 184 | #define OpCode_ReservedESC7 Make_OpCode_ESC(7) |
| 185 | #define OpCode_ReservedESC8 Make_OpCode_ESC(8) |
| 186 | #define OpCode_abs Make_OpCode_ESC(9) /* CFF */ |
| 187 | #define OpCode_add Make_OpCode_ESC(10) /* CFF */ |
| 188 | #define OpCode_sub Make_OpCode_ESC(11) /* CFF */ |
| 189 | #define OpCode_div Make_OpCode_ESC(12) /* CFF */ |
| 190 | #define OpCode_ReservedESC13 Make_OpCode_ESC(13) |
| 191 | #define OpCode_neg Make_OpCode_ESC(14) /* CFF */ |
| 192 | #define OpCode_eq Make_OpCode_ESC(15) /* CFF */ |
| 193 | #define OpCode_ReservedESC16 Make_OpCode_ESC(16) |
| 194 | #define OpCode_ReservedESC17 Make_OpCode_ESC(17) |
| 195 | #define OpCode_drop Make_OpCode_ESC(18) /* CFF */ |
| 196 | #define OpCode_ReservedESC19 Make_OpCode_ESC(19) |
| 197 | #define OpCode_put Make_OpCode_ESC(20) /* CFF */ |
| 198 | #define OpCode_get Make_OpCode_ESC(21) /* CFF */ |
| 199 | #define OpCode_ifelse Make_OpCode_ESC(22) /* CFF */ |
| 200 | #define OpCode_random Make_OpCode_ESC(23) /* CFF */ |
| 201 | #define OpCode_mul Make_OpCode_ESC(24) /* CFF */ |
| 202 | //#define OpCode_reservedESC25 Make_OpCode_ESC(25) |
| 203 | #define OpCode_sqrt Make_OpCode_ESC(26) /* CFF */ |
| 204 | #define OpCode_dup Make_OpCode_ESC(27) /* CFF */ |
| 205 | #define OpCode_exch Make_OpCode_ESC(28) /* CFF */ |
| 206 | #define OpCode_index Make_OpCode_ESC(29) /* CFF */ |
| 207 | #define OpCode_roll Make_OpCode_ESC(30) /* CFF */ |
| 208 | #define OpCode_reservedESC31 Make_OpCode_ESC(31) |
| 209 | #define OpCode_reservedESC32 Make_OpCode_ESC(32) |
| 210 | #define OpCode_reservedESC33 Make_OpCode_ESC(33) |
| 211 | #define OpCode_hflex Make_OpCode_ESC(34) /* CFF, CFF2 */ |
| 212 | #define OpCode_flex Make_OpCode_ESC(35) /* CFF, CFF2 */ |
| 213 | #define OpCode_hflex1 Make_OpCode_ESC(36) /* CFF, CFF2 */ |
| 214 | #define OpCode_flex1 Make_OpCode_ESC(37) /* CFF, CFF2 */ |
| 215 | |
| 216 | |
| 217 | #define OpCode_Invalid 0xFFFFu |
| 218 | |
| 219 | |
| 220 | struct number_t |
| 221 | { |
| 222 | void set_int (int v) { value = v; } |
| 223 | int to_int () const { return value; } |
| 224 | |
| 225 | void set_fixed (int32_t v) { value = v / 65536.0; } |
| 226 | int32_t to_fixed () const { return value * 65536.0; } |
| 227 | |
| 228 | void set_real (double v) { value = v; } |
| 229 | double to_real () const { return value; } |
| 230 | |
| 231 | bool in_int_range () const |
| 232 | { return ((double) (int16_t) to_int () == value); } |
| 233 | |
| 234 | bool operator > (const number_t &n) const { return value > n.to_real (); } |
| 235 | bool operator < (const number_t &n) const { return n > *this; } |
| 236 | bool operator >= (const number_t &n) const { return !(*this < n); } |
| 237 | bool operator <= (const number_t &n) const { return !(*this > n); } |
| 238 | |
| 239 | const number_t &operator += (const number_t &n) |
| 240 | { |
| 241 | set_real (to_real () + n.to_real ()); |
| 242 | |
| 243 | return *this; |
| 244 | } |
| 245 | |
| 246 | protected: |
| 247 | double value = 0.; |
| 248 | }; |
| 249 | |
| 250 | /* byte string */ |
| 251 | struct UnsizedByteStr : UnsizedArrayOf <HBUINT8> |
| 252 | { |
| 253 | hb_ubytes_t as_ubytes (unsigned l) const |
| 254 | { return hb_ubytes_t ((const unsigned char *) this, l); } |
| 255 | |
| 256 | // encode 2-byte int (Dict/CharString) or 4-byte int (Dict) |
| 257 | template <typename T, typename V> |
| 258 | static bool serialize_int (hb_serialize_context_t *c, op_code_t intOp, V value) |
| 259 | { |
| 260 | TRACE_SERIALIZE (this); |
| 261 | |
| 262 | HBUINT8 *p = c->allocate_size<HBUINT8> (1); |
| 263 | if (unlikely (!p)) return_trace (false); |
| 264 | *p = intOp; |
| 265 | |
| 266 | T *ip = c->allocate_size<T> (T::static_size); |
| 267 | if (unlikely (!ip)) return_trace (false); |
| 268 | return_trace (c->check_assign (*ip, value, HB_SERIALIZE_ERROR_INT_OVERFLOW)); |
| 269 | } |
| 270 | |
| 271 | template <typename V> |
| 272 | static bool serialize_int4 (hb_serialize_context_t *c, V value) |
| 273 | { return serialize_int<HBINT32> (c, OpCode_longintdict, value); } |
| 274 | |
| 275 | template <typename V> |
| 276 | static bool serialize_int2 (hb_serialize_context_t *c, V value) |
| 277 | { return serialize_int<HBINT16> (c, OpCode_shortint, value); } |
| 278 | |
| 279 | /* Defining null_size allows a Null object may be created. Should be safe because: |
| 280 | * A descendent struct Dict uses a Null pointer to indicate a missing table, |
| 281 | * checked before access. |
| 282 | */ |
| 283 | DEFINE_SIZE_MIN(0); |
| 284 | }; |
| 285 | |
| 286 | /* A byte string associated with the current offset and an error condition */ |
| 287 | struct byte_str_ref_t |
| 288 | { |
| 289 | byte_str_ref_t () |
| 290 | : str () {} |
| 291 | |
| 292 | byte_str_ref_t (const hb_ubytes_t &str_, unsigned int offset_ = 0) |
| 293 | : str (str_) { set_offset (offset_); } |
| 294 | |
| 295 | void reset (const hb_ubytes_t &str_, unsigned int offset_ = 0) |
| 296 | { |
| 297 | str = str_; |
| 298 | set_offset (offset_); |
| 299 | } |
| 300 | |
| 301 | const unsigned char& operator [] (int i) { |
| 302 | if (unlikely ((unsigned int) (get_offset () + i) >= str.length)) |
| 303 | { |
| 304 | set_error (); |
| 305 | return Null (unsigned char); |
| 306 | } |
| 307 | return str.arrayZ[get_offset () + i]; |
| 308 | } |
| 309 | |
| 310 | unsigned char head_unchecked () const { return str.arrayZ[get_offset ()]; } |
| 311 | |
| 312 | /* Conversion to hb_ubytes_t */ |
| 313 | operator hb_ubytes_t () const { return str.sub_array (get_offset ()); } |
| 314 | |
| 315 | hb_ubytes_t sub_array (unsigned int offset_, unsigned int len_) const |
| 316 | { return str.sub_array (offset_, len_); } |
| 317 | |
| 318 | bool avail (unsigned int count=1) const |
| 319 | { return get_offset () + count <= str.length; } |
| 320 | void inc (unsigned int count=1) |
| 321 | { |
| 322 | /* Automatically puts us in error if count is out-of-range. */ |
| 323 | set_offset (get_offset () + count); |
| 324 | } |
| 325 | |
| 326 | /* We (ab)use ubytes backwards_length as a cursor (called offset), |
| 327 | * as well as to store error condition. */ |
| 328 | |
| 329 | unsigned get_offset () const { return str.backwards_length; } |
| 330 | void set_offset (unsigned offset) { str.backwards_length = offset; } |
| 331 | |
| 332 | void set_error () { str.backwards_length = str.length + 1; } |
| 333 | bool in_error () const { return str.backwards_length > str.length; } |
| 334 | |
| 335 | unsigned total_size () const { return str.length; } |
| 336 | |
| 337 | protected: |
| 338 | hb_ubytes_t str; |
| 339 | }; |
| 340 | |
| 341 | /* stack */ |
| 342 | template <typename ELEM, int LIMIT> |
| 343 | struct cff_stack_t |
| 344 | { |
| 345 | ELEM& operator [] (unsigned int i) |
| 346 | { |
| 347 | if (unlikely (i >= count)) |
| 348 | { |
| 349 | set_error (); |
| 350 | return Crap (ELEM); |
| 351 | } |
| 352 | return elements[i]; |
| 353 | } |
| 354 | |
| 355 | void push (const ELEM &v) |
| 356 | { |
| 357 | if (likely (count < LIMIT)) |
| 358 | elements[count++] = v; |
| 359 | else |
| 360 | set_error (); |
| 361 | } |
| 362 | ELEM &push () |
| 363 | { |
| 364 | if (likely (count < LIMIT)) |
| 365 | return elements[count++]; |
| 366 | else |
| 367 | { |
| 368 | set_error (); |
| 369 | return Crap (ELEM); |
| 370 | } |
| 371 | } |
| 372 | |
| 373 | ELEM& pop () |
| 374 | { |
| 375 | if (likely (count > 0)) |
| 376 | return elements[--count]; |
| 377 | else |
| 378 | { |
| 379 | set_error (); |
| 380 | return Crap (ELEM); |
| 381 | } |
| 382 | } |
| 383 | void pop (unsigned int n) |
| 384 | { |
| 385 | if (likely (count >= n)) |
| 386 | count -= n; |
| 387 | else |
| 388 | set_error (); |
| 389 | } |
| 390 | |
| 391 | const ELEM& peek () |
| 392 | { |
| 393 | if (unlikely (count == 0)) |
| 394 | { |
| 395 | set_error (); |
| 396 | return Null (ELEM); |
| 397 | } |
| 398 | return elements[count - 1]; |
| 399 | } |
| 400 | |
| 401 | void unpop () |
| 402 | { |
| 403 | if (likely (count < LIMIT)) |
| 404 | count++; |
| 405 | else |
| 406 | set_error (); |
| 407 | } |
| 408 | |
| 409 | void clear () { count = 0; } |
| 410 | |
| 411 | bool in_error () const { return (error); } |
| 412 | void set_error () { error = true; } |
| 413 | |
| 414 | unsigned int get_count () const { return count; } |
| 415 | bool is_empty () const { return !count; } |
| 416 | |
| 417 | hb_array_t<const ELEM> sub_array (unsigned start, unsigned length) const |
| 418 | { return hb_array_t<const ELEM> (elements).sub_array (start, length); } |
| 419 | |
| 420 | private: |
| 421 | bool error = false; |
| 422 | unsigned int count = 0; |
| 423 | ELEM elements[LIMIT]; |
| 424 | }; |
| 425 | |
| 426 | /* argument stack */ |
| 427 | template <typename ARG=number_t> |
| 428 | struct arg_stack_t : cff_stack_t<ARG, 513> |
| 429 | { |
| 430 | void push_int (int v) |
| 431 | { |
| 432 | ARG &n = S::push (); |
| 433 | n.set_int (v); |
| 434 | } |
| 435 | |
| 436 | void push_fixed (int32_t v) |
| 437 | { |
| 438 | ARG &n = S::push (); |
| 439 | n.set_fixed (v); |
| 440 | } |
| 441 | |
| 442 | void push_real (double v) |
| 443 | { |
| 444 | ARG &n = S::push (); |
| 445 | n.set_real (v); |
| 446 | } |
| 447 | |
| 448 | ARG& pop_num () { return this->pop (); } |
| 449 | |
| 450 | int pop_int () { return this->pop ().to_int (); } |
| 451 | |
| 452 | unsigned int pop_uint () |
| 453 | { |
| 454 | int i = pop_int (); |
| 455 | if (unlikely (i < 0)) |
| 456 | { |
| 457 | i = 0; |
| 458 | S::set_error (); |
| 459 | } |
| 460 | return (unsigned) i; |
| 461 | } |
| 462 | |
| 463 | void push_longint_from_substr (byte_str_ref_t& str_ref) |
| 464 | { |
| 465 | push_int ((str_ref[0] << 24) | (str_ref[1] << 16) | (str_ref[2] << 8) | (str_ref[3])); |
| 466 | str_ref.inc (4); |
| 467 | } |
| 468 | |
| 469 | bool push_fixed_from_substr (byte_str_ref_t& str_ref) |
| 470 | { |
| 471 | if (unlikely (!str_ref.avail (4))) |
| 472 | return false; |
| 473 | push_fixed ((int32_t)*(const HBUINT32*)&str_ref[0]); |
| 474 | str_ref.inc (4); |
| 475 | return true; |
| 476 | } |
| 477 | |
| 478 | private: |
| 479 | typedef cff_stack_t<ARG, 513> S; |
| 480 | }; |
| 481 | |
| 482 | /* an operator prefixed by its operands in a byte string */ |
| 483 | struct op_str_t |
| 484 | { |
| 485 | /* This used to have a hb_ubytes_t. Using a pointer and length |
| 486 | * in a particular order, saves 8 bytes in this struct and more |
| 487 | * in our parsed_cs_op_t subclass. */ |
| 488 | |
| 489 | const unsigned char *ptr = nullptr; |
| 490 | |
| 491 | op_code_t op = OpCode_Invalid; |
| 492 | |
| 493 | uint8_t length = 0; |
| 494 | }; |
| 495 | |
| 496 | /* base of OP_SERIALIZER */ |
| 497 | struct op_serializer_t |
| 498 | { |
| 499 | protected: |
| 500 | bool copy_opstr (hb_serialize_context_t *c, const op_str_t& opstr) const |
| 501 | { |
| 502 | TRACE_SERIALIZE (this); |
| 503 | |
| 504 | unsigned char *d = c->allocate_size<unsigned char> (opstr.length); |
| 505 | if (unlikely (!d)) return_trace (false); |
| 506 | /* Faster than hb_memcpy for small strings. */ |
| 507 | for (unsigned i = 0; i < opstr.length; i++) |
| 508 | d[i] = opstr.ptr[i]; |
| 509 | return_trace (true); |
| 510 | } |
| 511 | }; |
| 512 | |
| 513 | template <typename VAL> |
| 514 | struct parsed_values_t |
| 515 | { |
| 516 | void init () |
| 517 | { |
| 518 | opStart = 0; |
| 519 | values.init (); |
| 520 | } |
| 521 | void fini () { values.fini (); } |
| 522 | |
| 523 | void alloc (unsigned n) |
| 524 | { |
| 525 | values.alloc (n, true); |
| 526 | } |
| 527 | |
| 528 | void add_op (op_code_t op, const byte_str_ref_t& str_ref = byte_str_ref_t (), const VAL &v = VAL ()) |
| 529 | { |
| 530 | VAL *val = values.push (v); |
| 531 | val->op = op; |
| 532 | auto arr = str_ref.sub_array (opStart, str_ref.get_offset () - opStart); |
| 533 | val->ptr = arr.arrayZ; |
| 534 | val->length = arr.length; |
| 535 | opStart = str_ref.get_offset (); |
| 536 | } |
| 537 | |
| 538 | bool has_op (op_code_t op) const |
| 539 | { |
| 540 | for (const auto& v : values) |
| 541 | if (v.op == op) return true; |
| 542 | return false; |
| 543 | } |
| 544 | |
| 545 | unsigned get_count () const { return values.length; } |
| 546 | const VAL &operator [] (unsigned int i) const { return values[i]; } |
| 547 | |
| 548 | unsigned int opStart; |
| 549 | hb_vector_t<VAL> values; |
| 550 | }; |
| 551 | |
| 552 | template <typename ARG=number_t> |
| 553 | struct interp_env_t |
| 554 | { |
| 555 | interp_env_t () {} |
| 556 | interp_env_t (const hb_ubytes_t &str_) |
| 557 | { |
| 558 | str_ref.reset (str_); |
| 559 | } |
| 560 | bool in_error () const |
| 561 | { return str_ref.in_error () || argStack.in_error (); } |
| 562 | |
| 563 | void set_error () { str_ref.set_error (); } |
| 564 | |
| 565 | op_code_t fetch_op () |
| 566 | { |
| 567 | op_code_t op = OpCode_Invalid; |
| 568 | if (unlikely (!str_ref.avail ())) |
| 569 | return OpCode_Invalid; |
| 570 | op = (op_code_t) str_ref.head_unchecked (); |
| 571 | str_ref.inc (); |
| 572 | if (op == OpCode_escape) { |
| 573 | if (unlikely (!str_ref.avail ())) |
| 574 | return OpCode_Invalid; |
| 575 | op = Make_OpCode_ESC (str_ref.head_unchecked ()); |
| 576 | str_ref.inc (); |
| 577 | } |
| 578 | return op; |
| 579 | } |
| 580 | |
| 581 | const ARG& eval_arg (unsigned int i) { return argStack[i]; } |
| 582 | |
| 583 | ARG& pop_arg () { return argStack.pop (); } |
| 584 | void pop_n_args (unsigned int n) { argStack.pop (n); } |
| 585 | |
| 586 | void clear_args () { pop_n_args (argStack.get_count ()); } |
| 587 | |
| 588 | byte_str_ref_t |
| 589 | str_ref; |
| 590 | arg_stack_t<ARG> |
| 591 | argStack; |
| 592 | }; |
| 593 | |
| 594 | using num_interp_env_t = interp_env_t<>; |
| 595 | |
| 596 | template <typename ARG=number_t> |
| 597 | struct opset_t |
| 598 | { |
| 599 | static void process_op (op_code_t op, interp_env_t<ARG>& env) |
| 600 | { |
| 601 | switch (op) { |
| 602 | case OpCode_shortint: |
| 603 | env.argStack.push_int ((int16_t)((env.str_ref[0] << 8) | env.str_ref[1])); |
| 604 | env.str_ref.inc (2); |
| 605 | break; |
| 606 | |
| 607 | case OpCode_TwoBytePosInt0: case OpCode_TwoBytePosInt1: |
| 608 | case OpCode_TwoBytePosInt2: case OpCode_TwoBytePosInt3: |
| 609 | env.argStack.push_int ((int16_t)((op - OpCode_TwoBytePosInt0) * 256 + env.str_ref[0] + 108)); |
| 610 | env.str_ref.inc (); |
| 611 | break; |
| 612 | |
| 613 | case OpCode_TwoByteNegInt0: case OpCode_TwoByteNegInt1: |
| 614 | case OpCode_TwoByteNegInt2: case OpCode_TwoByteNegInt3: |
| 615 | env.argStack.push_int ((-(int16_t)(op - OpCode_TwoByteNegInt0) * 256 - env.str_ref[0] - 108)); |
| 616 | env.str_ref.inc (); |
| 617 | break; |
| 618 | |
| 619 | default: |
| 620 | /* 1-byte integer */ |
| 621 | if (likely ((OpCode_OneByteIntFirst <= op) && (op <= OpCode_OneByteIntLast))) |
| 622 | { |
| 623 | env.argStack.push_int ((int)op - 139); |
| 624 | } else { |
| 625 | /* invalid unknown operator */ |
| 626 | env.clear_args (); |
| 627 | env.set_error (); |
| 628 | } |
| 629 | break; |
| 630 | } |
| 631 | } |
| 632 | }; |
| 633 | |
| 634 | template <typename ENV> |
| 635 | struct interpreter_t |
| 636 | { |
| 637 | interpreter_t (ENV& env_) : env (env_) {} |
| 638 | ENV& env; |
| 639 | }; |
| 640 | |
| 641 | } /* namespace CFF */ |
| 642 | |
| 643 | #endif /* HB_CFF_INTERP_COMMON_HH */ |
| 644 | |