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