458 lines
13 KiB
C++
458 lines
13 KiB
C++
/*
|
|
* Copyright © 2018 Adobe Inc.
|
|
*
|
|
* This is part of HarfBuzz, a text shaping library.
|
|
*
|
|
* Permission is hereby granted, without written agreement and without
|
|
* license or royalty fees, to use, copy, modify, and distribute this
|
|
* software and its documentation for any purpose, provided that the
|
|
* above copyright notice and the following two paragraphs appear in
|
|
* all copies of this software.
|
|
*
|
|
* IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR
|
|
* DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
|
|
* ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN
|
|
* IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
|
|
* DAMAGE.
|
|
*
|
|
* THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING,
|
|
* BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
|
|
* FITNESS FOR A PARTICULAR PURPOSE. THE SOFTWARE PROVIDED HEREUNDER IS
|
|
* ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO
|
|
* PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
|
|
*
|
|
* Adobe Author(s): Michiharu Ariza
|
|
*/
|
|
|
|
#include "hb.hh"
|
|
|
|
#ifndef HB_NO_SUBSET_CFF
|
|
|
|
#include "hb-open-type.hh"
|
|
#include "hb-ot-cff2-table.hh"
|
|
#include "hb-set.h"
|
|
#include "hb-subset-cff2.hh"
|
|
#include "hb-subset-plan.hh"
|
|
#include "hb-subset-cff-common.hh"
|
|
#include "hb-cff2-interp-cs.hh"
|
|
|
|
using namespace CFF;
|
|
|
|
struct cff2_sub_table_info_t : cff_sub_table_info_t
|
|
{
|
|
cff2_sub_table_info_t ()
|
|
: cff_sub_table_info_t (),
|
|
var_store_link (0)
|
|
{}
|
|
|
|
objidx_t var_store_link;
|
|
};
|
|
|
|
struct cff2_top_dict_op_serializer_t : cff_top_dict_op_serializer_t<>
|
|
{
|
|
bool serialize (hb_serialize_context_t *c,
|
|
const op_str_t &opstr,
|
|
const cff2_sub_table_info_t &info) const
|
|
{
|
|
TRACE_SERIALIZE (this);
|
|
|
|
switch (opstr.op)
|
|
{
|
|
case OpCode_vstore:
|
|
return_trace (FontDict::serialize_link4_op(c, opstr.op, info.var_store_link));
|
|
|
|
default:
|
|
return_trace (cff_top_dict_op_serializer_t<>::serialize (c, opstr, info));
|
|
}
|
|
}
|
|
};
|
|
|
|
struct cff2_cs_opset_flatten_t : cff2_cs_opset_t<cff2_cs_opset_flatten_t, flatten_param_t, blend_arg_t>
|
|
{
|
|
static void flush_args_and_op (op_code_t op, cff2_cs_interp_env_t<blend_arg_t> &env, flatten_param_t& param)
|
|
{
|
|
switch (op)
|
|
{
|
|
case OpCode_return:
|
|
case OpCode_endchar:
|
|
/* dummy opcodes in CFF2. ignore */
|
|
break;
|
|
|
|
case OpCode_hstem:
|
|
case OpCode_hstemhm:
|
|
case OpCode_vstem:
|
|
case OpCode_vstemhm:
|
|
case OpCode_hintmask:
|
|
case OpCode_cntrmask:
|
|
if (param.drop_hints)
|
|
{
|
|
env.clear_args ();
|
|
return;
|
|
}
|
|
HB_FALLTHROUGH;
|
|
|
|
default:
|
|
SUPER::flush_args_and_op (op, env, param);
|
|
break;
|
|
}
|
|
}
|
|
|
|
static void flush_args (cff2_cs_interp_env_t<blend_arg_t> &env, flatten_param_t& param)
|
|
{
|
|
for (unsigned int i = 0; i < env.argStack.get_count ();)
|
|
{
|
|
const blend_arg_t &arg = env.argStack[i];
|
|
if (arg.blending ())
|
|
{
|
|
if (unlikely (!((arg.numValues > 0) && (env.argStack.get_count () >= arg.numValues))))
|
|
{
|
|
env.set_error ();
|
|
return;
|
|
}
|
|
flatten_blends (arg, i, env, param);
|
|
i += arg.numValues;
|
|
}
|
|
else
|
|
{
|
|
str_encoder_t encoder (param.flatStr);
|
|
encoder.encode_num (arg);
|
|
i++;
|
|
}
|
|
}
|
|
SUPER::flush_args (env, param);
|
|
}
|
|
|
|
static void flatten_blends (const blend_arg_t &arg, unsigned int i, cff2_cs_interp_env_t<blend_arg_t> &env, flatten_param_t& param)
|
|
{
|
|
/* flatten the default values */
|
|
str_encoder_t encoder (param.flatStr);
|
|
for (unsigned int j = 0; j < arg.numValues; j++)
|
|
{
|
|
const blend_arg_t &arg1 = env.argStack[i + j];
|
|
if (unlikely (!((arg1.blending () && (arg.numValues == arg1.numValues) && (arg1.valueIndex == j) &&
|
|
(arg1.deltas.length == env.get_region_count ())))))
|
|
{
|
|
env.set_error ();
|
|
return;
|
|
}
|
|
encoder.encode_num (arg1);
|
|
}
|
|
/* flatten deltas for each value */
|
|
for (unsigned int j = 0; j < arg.numValues; j++)
|
|
{
|
|
const blend_arg_t &arg1 = env.argStack[i + j];
|
|
for (unsigned int k = 0; k < arg1.deltas.length; k++)
|
|
encoder.encode_num (arg1.deltas[k]);
|
|
}
|
|
/* flatten the number of values followed by blend operator */
|
|
encoder.encode_int (arg.numValues);
|
|
encoder.encode_op (OpCode_blendcs);
|
|
}
|
|
|
|
static void flush_op (op_code_t op, cff2_cs_interp_env_t<blend_arg_t> &env, flatten_param_t& param)
|
|
{
|
|
switch (op)
|
|
{
|
|
case OpCode_return:
|
|
case OpCode_endchar:
|
|
return;
|
|
default:
|
|
str_encoder_t encoder (param.flatStr);
|
|
encoder.encode_op (op);
|
|
}
|
|
}
|
|
|
|
private:
|
|
typedef cff2_cs_opset_t<cff2_cs_opset_flatten_t, flatten_param_t, blend_arg_t> SUPER;
|
|
typedef cs_opset_t<blend_arg_t, cff2_cs_opset_flatten_t, cff2_cs_opset_flatten_t, cff2_cs_interp_env_t<blend_arg_t>, flatten_param_t> CSOPSET;
|
|
};
|
|
|
|
struct cff2_cs_opset_subr_subset_t : cff2_cs_opset_t<cff2_cs_opset_subr_subset_t, subr_subset_param_t, blend_arg_t>
|
|
{
|
|
static void process_op (op_code_t op, cff2_cs_interp_env_t<blend_arg_t> &env, subr_subset_param_t& param)
|
|
{
|
|
switch (op) {
|
|
|
|
case OpCode_return:
|
|
param.current_parsed_str->set_parsed ();
|
|
env.return_from_subr ();
|
|
param.set_current_str (env, false);
|
|
break;
|
|
|
|
case OpCode_endchar:
|
|
param.current_parsed_str->set_parsed ();
|
|
SUPER::process_op (op, env, param);
|
|
break;
|
|
|
|
case OpCode_callsubr:
|
|
process_call_subr (op, CSType_LocalSubr, env, param, env.localSubrs, param.local_closure);
|
|
break;
|
|
|
|
case OpCode_callgsubr:
|
|
process_call_subr (op, CSType_GlobalSubr, env, param, env.globalSubrs, param.global_closure);
|
|
break;
|
|
|
|
default:
|
|
SUPER::process_op (op, env, param);
|
|
param.current_parsed_str->add_op (op, env.str_ref);
|
|
break;
|
|
}
|
|
}
|
|
|
|
protected:
|
|
static void process_call_subr (op_code_t op, cs_type_t type,
|
|
cff2_cs_interp_env_t<blend_arg_t> &env, subr_subset_param_t& param,
|
|
cff2_biased_subrs_t& subrs, hb_set_t *closure)
|
|
{
|
|
byte_str_ref_t str_ref = env.str_ref;
|
|
env.call_subr (subrs, type);
|
|
param.current_parsed_str->add_call_op (op, str_ref, env.context.subr_num);
|
|
closure->add (env.context.subr_num);
|
|
param.set_current_str (env, true);
|
|
}
|
|
|
|
private:
|
|
typedef cff2_cs_opset_t<cff2_cs_opset_subr_subset_t, subr_subset_param_t, blend_arg_t> SUPER;
|
|
};
|
|
|
|
struct cff2_subr_subsetter_t : subr_subsetter_t<cff2_subr_subsetter_t, CFF2Subrs, const OT::cff2::accelerator_subset_t, cff2_cs_interp_env_t<blend_arg_t>, cff2_cs_opset_subr_subset_t>
|
|
{
|
|
cff2_subr_subsetter_t (const OT::cff2::accelerator_subset_t &acc_, const hb_subset_plan_t *plan_)
|
|
: subr_subsetter_t (acc_, plan_) {}
|
|
|
|
static void complete_parsed_str (cff2_cs_interp_env_t<blend_arg_t> &env, subr_subset_param_t& param, parsed_cs_str_t &charstring)
|
|
{
|
|
/* vsindex is inserted at the beginning of the charstring as necessary */
|
|
if (env.seen_vsindex ())
|
|
{
|
|
number_t ivs;
|
|
ivs.set_int ((int)env.get_ivs ());
|
|
charstring.set_prefix (ivs, OpCode_vsindexcs);
|
|
}
|
|
}
|
|
};
|
|
|
|
struct cff2_subset_plan {
|
|
|
|
bool create (const OT::cff2::accelerator_subset_t &acc,
|
|
hb_subset_plan_t *plan)
|
|
{
|
|
orig_fdcount = acc.fdArray->count;
|
|
|
|
drop_hints = plan->flags & HB_SUBSET_FLAGS_NO_HINTING;
|
|
desubroutinize = plan->flags & HB_SUBSET_FLAGS_DESUBROUTINIZE;
|
|
|
|
if (desubroutinize)
|
|
{
|
|
/* Flatten global & local subrs */
|
|
subr_flattener_t<const OT::cff2::accelerator_subset_t, cff2_cs_interp_env_t<blend_arg_t>, cff2_cs_opset_flatten_t>
|
|
flattener(acc, plan);
|
|
if (!flattener.flatten (subset_charstrings))
|
|
return false;
|
|
}
|
|
else
|
|
{
|
|
cff2_subr_subsetter_t subr_subsetter (acc, plan);
|
|
|
|
/* Subset subrs: collect used subroutines, leaving all unused ones behind */
|
|
if (!subr_subsetter.subset ())
|
|
return false;
|
|
|
|
/* encode charstrings, global subrs, local subrs with new subroutine numbers */
|
|
if (!subr_subsetter.encode_charstrings (subset_charstrings))
|
|
return false;
|
|
|
|
if (!subr_subsetter.encode_globalsubrs (subset_globalsubrs))
|
|
return false;
|
|
|
|
/* local subrs */
|
|
if (!subset_localsubrs.resize (orig_fdcount))
|
|
return false;
|
|
for (unsigned int fd = 0; fd < orig_fdcount; fd++)
|
|
{
|
|
subset_localsubrs[fd].init ();
|
|
if (!subr_subsetter.encode_localsubrs (fd, subset_localsubrs[fd]))
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/* FDSelect */
|
|
if (acc.fdSelect != &Null (CFF2FDSelect))
|
|
{
|
|
if (unlikely (!hb_plan_subset_cff_fdselect (plan,
|
|
orig_fdcount,
|
|
*(const FDSelect *)acc.fdSelect,
|
|
subset_fdcount,
|
|
subset_fdselect_size,
|
|
subset_fdselect_format,
|
|
subset_fdselect_ranges,
|
|
fdmap)))
|
|
return false;
|
|
}
|
|
else
|
|
fdmap.identity (1);
|
|
|
|
return true;
|
|
}
|
|
|
|
cff2_sub_table_info_t info;
|
|
|
|
unsigned int orig_fdcount = 0;
|
|
unsigned int subset_fdcount = 1;
|
|
unsigned int subset_fdselect_size = 0;
|
|
unsigned int subset_fdselect_format = 0;
|
|
hb_vector_t<code_pair_t> subset_fdselect_ranges;
|
|
|
|
hb_inc_bimap_t fdmap;
|
|
|
|
str_buff_vec_t subset_charstrings;
|
|
str_buff_vec_t subset_globalsubrs;
|
|
hb_vector_t<str_buff_vec_t> subset_localsubrs;
|
|
|
|
bool drop_hints = false;
|
|
bool desubroutinize = false;
|
|
};
|
|
|
|
static bool _serialize_cff2 (hb_serialize_context_t *c,
|
|
cff2_subset_plan &plan,
|
|
const OT::cff2::accelerator_subset_t &acc,
|
|
unsigned int num_glyphs)
|
|
{
|
|
/* private dicts & local subrs */
|
|
hb_vector_t<table_info_t> private_dict_infos;
|
|
if (unlikely (!private_dict_infos.resize (plan.subset_fdcount))) return false;
|
|
|
|
for (int i = (int)acc.privateDicts.length; --i >= 0 ;)
|
|
{
|
|
if (plan.fdmap.has (i))
|
|
{
|
|
objidx_t subrs_link = 0;
|
|
|
|
if (plan.subset_localsubrs[i].length > 0)
|
|
{
|
|
CFF2Subrs *dest = c->start_embed <CFF2Subrs> ();
|
|
if (unlikely (!dest)) return false;
|
|
c->push ();
|
|
if (likely (dest->serialize (c, plan.subset_localsubrs[i])))
|
|
subrs_link = c->pop_pack ();
|
|
else
|
|
{
|
|
c->pop_discard ();
|
|
return false;
|
|
}
|
|
}
|
|
PrivateDict *pd = c->start_embed<PrivateDict> ();
|
|
if (unlikely (!pd)) return false;
|
|
c->push ();
|
|
cff_private_dict_op_serializer_t privSzr (plan.desubroutinize, plan.drop_hints);
|
|
if (likely (pd->serialize (c, acc.privateDicts[i], privSzr, subrs_link)))
|
|
{
|
|
unsigned fd = plan.fdmap[i];
|
|
private_dict_infos[fd].size = c->length ();
|
|
private_dict_infos[fd].link = c->pop_pack ();
|
|
}
|
|
else
|
|
{
|
|
c->pop_discard ();
|
|
return false;
|
|
}
|
|
}
|
|
}
|
|
|
|
/* CharStrings */
|
|
{
|
|
CFF2CharStrings *cs = c->start_embed<CFF2CharStrings> ();
|
|
if (unlikely (!cs)) return false;
|
|
c->push ();
|
|
if (likely (cs->serialize (c, plan.subset_charstrings)))
|
|
plan.info.char_strings_link = c->pop_pack ();
|
|
else
|
|
{
|
|
c->pop_discard ();
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/* FDSelect */
|
|
if (acc.fdSelect != &Null (CFF2FDSelect))
|
|
{
|
|
c->push ();
|
|
if (likely (hb_serialize_cff_fdselect (c, num_glyphs, *(const FDSelect *)acc.fdSelect, plan.orig_fdcount,
|
|
plan.subset_fdselect_format, plan.subset_fdselect_size,
|
|
plan.subset_fdselect_ranges)))
|
|
plan.info.fd_select.link = c->pop_pack ();
|
|
else
|
|
{
|
|
c->pop_discard ();
|
|
return false;
|
|
}
|
|
}
|
|
|
|
/* FDArray (FD Index) */
|
|
{
|
|
c->push ();
|
|
CFF2FDArray *fda = c->start_embed<CFF2FDArray> ();
|
|
if (unlikely (!fda)) return false;
|
|
cff_font_dict_op_serializer_t fontSzr;
|
|
auto it =
|
|
+ hb_zip (+ hb_iter (acc.fontDicts)
|
|
| hb_filter ([&] (const cff2_font_dict_values_t &_)
|
|
{ return plan.fdmap.has (&_ - &acc.fontDicts[0]); }),
|
|
hb_iter (private_dict_infos))
|
|
;
|
|
if (unlikely (!fda->serialize (c, it, fontSzr))) return false;
|
|
plan.info.fd_array_link = c->pop_pack ();
|
|
}
|
|
|
|
/* variation store */
|
|
if (acc.varStore != &Null (CFF2VariationStore))
|
|
{
|
|
c->push ();
|
|
CFF2VariationStore *dest = c->start_embed<CFF2VariationStore> ();
|
|
if (unlikely (!dest || !dest->serialize (c, acc.varStore))) return false;
|
|
plan.info.var_store_link = c->pop_pack ();
|
|
}
|
|
|
|
OT::cff2 *cff2 = c->allocate_min<OT::cff2> ();
|
|
if (unlikely (!cff2)) return false;
|
|
|
|
/* header */
|
|
cff2->version.major = 0x02;
|
|
cff2->version.minor = 0x00;
|
|
cff2->topDict = OT::cff2::static_size;
|
|
|
|
/* top dict */
|
|
{
|
|
TopDict &dict = cff2 + cff2->topDict;
|
|
cff2_top_dict_op_serializer_t topSzr;
|
|
if (unlikely (!dict.serialize (c, acc.topDict, topSzr, plan.info))) return false;
|
|
cff2->topDictSize = c->head - (const char *)&dict;
|
|
}
|
|
|
|
/* global subrs */
|
|
{
|
|
CFF2Subrs *dest = c->start_embed <CFF2Subrs> ();
|
|
if (unlikely (!dest)) return false;
|
|
return dest->serialize (c, plan.subset_globalsubrs);
|
|
}
|
|
}
|
|
|
|
static bool
|
|
_hb_subset_cff2 (const OT::cff2::accelerator_subset_t &acc,
|
|
hb_subset_context_t *c)
|
|
{
|
|
cff2_subset_plan cff2_plan;
|
|
|
|
if (unlikely (!cff2_plan.create (acc, c->plan))) return false;
|
|
return _serialize_cff2 (c->serializer, cff2_plan, acc, c->plan->num_output_glyphs ());
|
|
}
|
|
|
|
bool
|
|
hb_subset_cff2 (hb_subset_context_t *c)
|
|
{
|
|
OT::cff2::accelerator_subset_t acc (c->plan->source);
|
|
return acc.is_valid () && _hb_subset_cff2 (acc, c);
|
|
}
|
|
|
|
#endif
|