1 #include "mupdf/fitz.h"
2
3 #include <string.h>
4
5 fz_text *
fz_new_text(fz_context * ctx)6 fz_new_text(fz_context *ctx)
7 {
8 fz_text *text = fz_malloc_struct(ctx, fz_text);
9 text->refs = 1;
10 return text;
11 }
12
13 fz_text *
fz_keep_text(fz_context * ctx,const fz_text * textc)14 fz_keep_text(fz_context *ctx, const fz_text *textc)
15 {
16 fz_text *text = (fz_text *)textc; /* Explicit cast away of const */
17
18 return fz_keep_imp(ctx, text, &text->refs);
19 }
20
21 void
fz_drop_text(fz_context * ctx,const fz_text * textc)22 fz_drop_text(fz_context *ctx, const fz_text *textc)
23 {
24 fz_text *text = (fz_text *)textc; /* Explicit cast away of const */
25
26 if (fz_drop_imp(ctx, text, &text->refs))
27 {
28 fz_text_span *span = text->head;
29 while (span)
30 {
31 fz_text_span *next = span->next;
32 fz_drop_font(ctx, span->font);
33 fz_free(ctx, span->items);
34 fz_free(ctx, span);
35 span = next;
36 }
37 fz_free(ctx, text);
38 }
39 }
40
41 static fz_text_span *
fz_new_text_span(fz_context * ctx,fz_font * font,int wmode,int bidi_level,fz_bidi_direction markup_dir,fz_text_language language,fz_matrix trm)42 fz_new_text_span(fz_context *ctx, fz_font *font, int wmode, int bidi_level, fz_bidi_direction markup_dir, fz_text_language language, fz_matrix trm)
43 {
44 fz_text_span *span = fz_malloc_struct(ctx, fz_text_span);
45 span->font = fz_keep_font(ctx, font);
46 span->wmode = wmode;
47 span->bidi_level = bidi_level;
48 span->markup_dir = markup_dir;
49 span->language = language;
50 span->trm = trm;
51 span->trm.e = 0;
52 span->trm.f = 0;
53 return span;
54 }
55
56 static fz_text_span *
fz_add_text_span(fz_context * ctx,fz_text * text,fz_font * font,int wmode,int bidi_level,fz_bidi_direction markup_dir,fz_text_language language,fz_matrix trm)57 fz_add_text_span(fz_context *ctx, fz_text *text, fz_font *font, int wmode, int bidi_level, fz_bidi_direction markup_dir, fz_text_language language, fz_matrix trm)
58 {
59 if (!text->tail)
60 {
61 text->head = text->tail = fz_new_text_span(ctx, font, wmode, bidi_level, markup_dir, language, trm);
62 }
63 else if (text->tail->font != font ||
64 text->tail->wmode != wmode ||
65 text->tail->bidi_level != bidi_level ||
66 text->tail->markup_dir != markup_dir ||
67 text->tail->language != language ||
68 text->tail->trm.a != trm.a ||
69 text->tail->trm.b != trm.b ||
70 text->tail->trm.c != trm.c ||
71 text->tail->trm.d != trm.d)
72 {
73 text->tail = text->tail->next = fz_new_text_span(ctx, font, wmode, bidi_level, markup_dir, language, trm);
74 }
75 return text->tail;
76 }
77
78 static void
fz_grow_text_span(fz_context * ctx,fz_text_span * span,int n)79 fz_grow_text_span(fz_context *ctx, fz_text_span *span, int n)
80 {
81 int new_cap = span->cap;
82 if (span->len + n < new_cap)
83 return;
84 while (span->len + n > new_cap)
85 new_cap = new_cap + 36;
86 span->items = fz_realloc_array(ctx, span->items, new_cap, fz_text_item);
87 span->cap = new_cap;
88 }
89
90 void
fz_show_glyph(fz_context * ctx,fz_text * text,fz_font * font,fz_matrix trm,int gid,int ucs,int wmode,int bidi_level,fz_bidi_direction markup_dir,fz_text_language lang)91 fz_show_glyph(fz_context *ctx, fz_text *text, fz_font *font, fz_matrix trm, int gid, int ucs, int wmode, int bidi_level, fz_bidi_direction markup_dir, fz_text_language lang)
92 {
93 fz_text_span *span;
94
95 if (text->refs != 1)
96 fz_throw(ctx, FZ_ERROR_GENERIC, "cannot modify shared text objects");
97
98 span = fz_add_text_span(ctx, text, font, wmode, bidi_level, markup_dir, lang, trm);
99
100 fz_grow_text_span(ctx, span, 1);
101
102 span->items[span->len].ucs = ucs;
103 span->items[span->len].gid = gid;
104 span->items[span->len].x = trm.e;
105 span->items[span->len].y = trm.f;
106 span->len++;
107 }
108
109 fz_matrix
fz_show_string(fz_context * ctx,fz_text * text,fz_font * user_font,fz_matrix trm,const char * s,int wmode,int bidi_level,fz_bidi_direction markup_dir,fz_text_language language)110 fz_show_string(fz_context *ctx, fz_text *text, fz_font *user_font, fz_matrix trm, const char *s,
111 int wmode, int bidi_level, fz_bidi_direction markup_dir, fz_text_language language)
112 {
113 fz_font *font;
114 int gid, ucs;
115 float adv;
116
117 while (*s)
118 {
119 s += fz_chartorune(&ucs, s);
120 gid = fz_encode_character_with_fallback(ctx, user_font, ucs, 0, language, &font);
121 fz_show_glyph(ctx, text, font, trm, gid, ucs, wmode, bidi_level, markup_dir, language);
122 adv = fz_advance_glyph(ctx, font, gid, wmode);
123 if (wmode == 0)
124 trm = fz_pre_translate(trm, adv, 0);
125 else
126 trm = fz_pre_translate(trm, 0, -adv);
127 }
128
129 return trm;
130 }
131
132 fz_matrix
fz_measure_string(fz_context * ctx,fz_font * user_font,fz_matrix trm,const char * s,int wmode,int bidi_level,fz_bidi_direction markup_dir,fz_text_language language)133 fz_measure_string(fz_context *ctx, fz_font *user_font, fz_matrix trm, const char *s,
134 int wmode, int bidi_level, fz_bidi_direction markup_dir, fz_text_language language)
135 {
136 fz_font *font;
137 int gid, ucs;
138 float adv;
139
140 while (*s)
141 {
142 s += fz_chartorune(&ucs, s);
143 gid = fz_encode_character_with_fallback(ctx, user_font, ucs, 0, language, &font);
144 adv = fz_advance_glyph(ctx, font, gid, wmode);
145 if (wmode == 0)
146 trm = fz_pre_translate(trm, adv, 0);
147 else
148 trm = fz_pre_translate(trm, 0, -adv);
149 }
150
151 return trm;
152 }
153
154 fz_rect
fz_bound_text(fz_context * ctx,const fz_text * text,const fz_stroke_state * stroke,fz_matrix ctm)155 fz_bound_text(fz_context *ctx, const fz_text *text, const fz_stroke_state *stroke, fz_matrix ctm)
156 {
157 fz_text_span *span;
158 fz_matrix tm, trm;
159 fz_rect gbox;
160 fz_rect bbox;
161 int i;
162
163 bbox = fz_empty_rect;
164
165 for (span = text->head; span; span = span->next)
166 {
167 if (span->len > 0)
168 {
169 tm = span->trm;
170 for (i = 0; i < span->len; i++)
171 {
172 if (span->items[i].gid >= 0)
173 {
174 tm.e = span->items[i].x;
175 tm.f = span->items[i].y;
176 trm = fz_concat(tm, ctm);
177 gbox = fz_bound_glyph(ctx, span->font, span->items[i].gid, trm);
178 bbox = fz_union_rect(bbox, gbox);
179 }
180 }
181 }
182 }
183
184 if (!fz_is_empty_rect(bbox))
185 {
186 if (stroke)
187 bbox = fz_adjust_rect_for_stroke(ctx, bbox, stroke, ctm);
188
189 /* Compensate for the glyph cache limited positioning precision */
190 bbox.x0 -= 1;
191 bbox.y0 -= 1;
192 bbox.x1 += 1;
193 bbox.y1 += 1;
194 }
195
196 return bbox;
197 }
198
fz_text_language_from_string(const char * str)199 fz_text_language fz_text_language_from_string(const char *str)
200 {
201 fz_text_language lang;
202
203 if (str == NULL)
204 return FZ_LANG_UNSET;
205
206 if (!strcmp(str, "zh-Hant") ||
207 !strcmp(str, "zh-HK") ||
208 !strcmp(str, "zh-MO") ||
209 !strcmp(str, "zh-SG") ||
210 !strcmp(str, "zh-TW"))
211 return FZ_LANG_zh_Hant;
212 if (!strcmp(str, "zh-Hans") ||
213 !strcmp(str, "zh-CN"))
214 return FZ_LANG_zh_Hans;
215
216 /* 1st char */
217 if (str[0] >= 'a' && str[0] <= 'z')
218 lang = str[0] - 'a' + 1;
219 else if (str[0] >= 'A' && str[0] <= 'Z')
220 lang = str[0] - 'A' + 1;
221 else
222 return 0;
223
224 /* 2nd char */
225 if (str[1] >= 'a' && str[1] <= 'z')
226 lang += 27*(str[1] - 'a' + 1);
227 else if (str[1] >= 'A' && str[1] <= 'Z')
228 lang += 27*(str[1] - 'A' + 1);
229 else
230 return 0; /* There are no valid 1 char language codes */
231
232 /* 3nd char */
233 if (str[2] >= 'a' && str[2] <= 'z')
234 lang += 27*27*(str[2] - 'a' + 1);
235 else if (str[2] >= 'A' && str[2] <= 'Z')
236 lang += 27*27*(str[2] - 'A' + 1);
237
238 /* We don't support iso 639-6 4 char codes, cos the standard
239 * has been withdrawn, and no one uses them. */
240 return lang;
241 }
242
fz_string_from_text_language(char str[8],fz_text_language lang)243 char *fz_string_from_text_language(char str[8], fz_text_language lang)
244 {
245 int c;
246
247 /* str is supposed to be at least 8 chars in size */
248 if (str == NULL)
249 return NULL;
250
251 if (lang == FZ_LANG_zh_Hant)
252 fz_strlcpy(str, "zh-Hant", 8);
253 else if (lang == FZ_LANG_zh_Hans)
254 fz_strlcpy(str, "zh-Hans", 8);
255 else
256 {
257 c = lang % 27;
258 lang = lang / 27;
259 str[0] = c == 0 ? 0 : c - 1 + 'a';
260 c = lang % 27;
261 lang = lang / 27;
262 str[1] = c == 0 ? 0 : c - 1 + 'a';
263 c = lang % 27;
264 str[2] = c == 0 ? 0 : c - 1 + 'a';
265 str[3] = 0;
266 }
267
268 return str;
269 }
270