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_CFF1_INTERP_CS_HH
27#define HB_CFF1_INTERP_CS_HH
28
29#include "hb.hh"
30#include "hb-cff-interp-cs-common.hh"
31
32namespace CFF {
33
34using namespace OT;
35
36typedef biased_subrs_t<CFF1Subrs> cff1_biased_subrs_t;
37
38struct cff1_cs_interp_env_t : cs_interp_env_t<number_t, CFF1Subrs>
39{
40 template <typename ACC>
41 cff1_cs_interp_env_t (const hb_ubytes_t &str, ACC &acc, unsigned int fd,
42 const int *coords_=nullptr, unsigned int num_coords_=0)
43 : SUPER (str, acc.globalSubrs, acc.privateDicts[fd].localSubrs)
44 {
45 processed_width = false;
46 has_width = false;
47 arg_start = 0;
48 in_seac = false;
49 }
50
51 void set_width (bool has_width_)
52 {
53 if (likely (!processed_width && (SUPER::argStack.get_count () > 0)))
54 {
55 if (has_width_)
56 {
57 width = SUPER::argStack[0];
58 has_width = true;
59 arg_start = 1;
60 }
61 }
62 processed_width = true;
63 }
64
65 void clear_args ()
66 {
67 arg_start = 0;
68 SUPER::clear_args ();
69 }
70
71 void set_in_seac (bool _in_seac) { in_seac = _in_seac; }
72
73 bool processed_width;
74 bool has_width;
75 unsigned int arg_start;
76 number_t width;
77 bool in_seac;
78
79 private:
80 typedef cs_interp_env_t<number_t, CFF1Subrs> SUPER;
81};
82
83template <typename OPSET, typename PARAM, typename PATH=path_procs_null_t<cff1_cs_interp_env_t, PARAM>>
84struct cff1_cs_opset_t : cs_opset_t<number_t, OPSET, cff1_cs_interp_env_t, PARAM, PATH>
85{
86 /* PostScript-originated legacy opcodes (OpCode_add etc) are unsupported */
87 /* Type 1-originated deprecated opcodes, seac behavior of endchar and dotsection are supported */
88
89 static void process_op (op_code_t op, cff1_cs_interp_env_t &env, PARAM& param)
90 {
91 switch (op) {
92 case OpCode_dotsection:
93 SUPER::flush_args_and_op (op, env, param);
94 break;
95
96 case OpCode_endchar:
97 OPSET::check_width (op, env, param);
98 if (env.argStack.get_count () >= 4)
99 {
100 OPSET::process_seac (env, param);
101 }
102 OPSET::flush_args_and_op (op, env, param);
103 env.set_endchar (true);
104 break;
105
106 default:
107 SUPER::process_op (op, env, param);
108 }
109 }
110
111 static void check_width (op_code_t op, cff1_cs_interp_env_t &env, PARAM& param)
112 {
113 if (!env.processed_width)
114 {
115 bool has_width = false;
116 switch (op)
117 {
118 case OpCode_endchar:
119 case OpCode_hstem:
120 case OpCode_hstemhm:
121 case OpCode_vstem:
122 case OpCode_vstemhm:
123 case OpCode_hintmask:
124 case OpCode_cntrmask:
125 has_width = ((env.argStack.get_count () & 1) != 0);
126 break;
127 case OpCode_hmoveto:
128 case OpCode_vmoveto:
129 has_width = (env.argStack.get_count () > 1);
130 break;
131 case OpCode_rmoveto:
132 has_width = (env.argStack.get_count () > 2);
133 break;
134 default:
135 return;
136 }
137 env.set_width (has_width);
138 }
139 }
140
141 static void process_seac (cff1_cs_interp_env_t &env, PARAM& param)
142 {
143 }
144
145 static void flush_args (cff1_cs_interp_env_t &env, PARAM& param)
146 {
147 SUPER::flush_args (env, param);
148 env.clear_args (); /* pop off width */
149 }
150
151 private:
152 typedef cs_opset_t<number_t, OPSET, cff1_cs_interp_env_t, PARAM, PATH> SUPER;
153};
154
155template <typename OPSET, typename PARAM>
156using cff1_cs_interpreter_t = cs_interpreter_t<cff1_cs_interp_env_t, OPSET, PARAM>;
157
158} /* namespace CFF */
159
160#endif /* HB_CFF1_INTERP_CS_HH */
161