1 /*
2 * Copyright (c) 2015, Oracle and/or its affiliates. All rights reserved.
3 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
4 *
5 * This code is free software; you can redistribute it and/or modify it
6 * under the terms of the GNU General Public License version 2 only, as
7 * published by the Free Software Foundation. Oracle designates this
8 * particular file as subject to the "Classpath" exception as provided
9 * by Oracle in the LICENSE file that accompanied this code.
10 *
11 * This code is distributed in the hope that it will be useful, but WITHOUT
12 * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
13 * FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
14 * version 2 for more details (a copy is included in the LICENSE file that
15 * accompanied this code).
16 *
17 * You should have received a copy of the GNU General Public License version
18 * 2 along with this work; if not, write to the Free Software Foundation,
19 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA.
20 *
21 * Please contact Oracle, 500 Oracle Parkway, Redwood Shores, CA 94065 USA
22 * or visit www.oracle.com if you need additional information or have any
23 * questions.
24 */
25
26 #include <jni_util.h>
27 #include <stdlib.h>
28 #include "hb.h"
29 #include "hb-jdk.h"
30 #include "hb-ot.h"
31 #ifdef MACOSX
32 #include "hb-coretext.h"
33 #endif
34 #include "scriptMapping.h"
35
36 static jclass gvdClass = 0;
37 static const char* gvdClassName = "sun/font/GlyphLayout$GVData";
38 static jfieldID gvdCountFID = 0;
39 static jfieldID gvdFlagsFID = 0;
40 static jfieldID gvdGlyphsFID = 0;
41 static jfieldID gvdPositionsFID = 0;
42 static jfieldID gvdIndicesFID = 0;
43 static jmethodID gvdGrowMID = 0;
44 static int jniInited = 0;
45
46 static void getFloat(JNIEnv* env, jobject pt, jfloat *x, jfloat *y) {
47 *x = (*env)->GetFloatField(env, pt, sunFontIDs.xFID);
48 *y = (*env)->GetFloatField(env, pt, sunFontIDs.yFID);
49 }
50
51 static void putFloat(JNIEnv* env, jobject pt, jfloat x, jfloat y) {
52 (*env)->SetFloatField(env, pt, sunFontIDs.xFID, x);
53 (*env)->SetFloatField(env, pt, sunFontIDs.yFID, y);
54 }
55
56 static int init_JNI_IDs(JNIEnv *env) {
57 if (jniInited) {
58 return jniInited;
59 }
60 CHECK_NULL_RETURN(gvdClass = (*env)->FindClass(env, gvdClassName), 0);
61 CHECK_NULL_RETURN(gvdClass = (jclass)(*env)->NewGlobalRef(env, gvdClass), 0);
62 CHECK_NULL_RETURN(gvdCountFID = (*env)->GetFieldID(env, gvdClass, "_count", "I"), 0);
63 CHECK_NULL_RETURN(gvdFlagsFID = (*env)->GetFieldID(env, gvdClass, "_flags", "I"), 0);
64 CHECK_NULL_RETURN(gvdGlyphsFID = (*env)->GetFieldID(env, gvdClass, "_glyphs", "[I"), 0);
65 CHECK_NULL_RETURN(gvdPositionsFID = (*env)->GetFieldID(env, gvdClass, "_positions", "[F"), 0);
66 CHECK_NULL_RETURN(gvdIndicesFID = (*env)->GetFieldID(env, gvdClass, "_indices", "[I"), 0);
67 CHECK_NULL_RETURN(gvdGrowMID = (*env)->GetMethodID(env, gvdClass, "grow", "()V"), 0);
68 jniInited = 1;
69 return jniInited;
70 }
71
72 // gmask is the composite font slot mask
73 // baseindex is to be added to the character (code point) index.
74 jboolean storeGVData(JNIEnv* env,
75 jobject gvdata, jint slot,
76 jint baseIndex, int offset, jobject startPt,
77 int charCount, int glyphCount, hb_glyph_info_t *glyphInfo,
78 hb_glyph_position_t *glyphPos, float devScale) {
79
80 int i, needToGrow;
81 float x=0, y=0;
82 float startX, startY, advX, advY;
83 float scale = 1.0f / HBFloatToFixedScale / devScale;
84 unsigned int* glyphs;
85 float* positions;
86 int initialCount, glyphArrayLen, posArrayLen, maxGlyphs, storeadv, maxStore;
87 unsigned int* indices;
88 jarray glyphArray, posArray, inxArray;
89
90 if (!init_JNI_IDs(env)) {
91 return JNI_FALSE;
92 }
93
94 initialCount = (*env)->GetIntField(env, gvdata, gvdCountFID);
95 do {
96 glyphArray = (jarray)(*env)->GetObjectField(env, gvdata, gvdGlyphsFID);
97 posArray = (jarray)(*env)->GetObjectField(env, gvdata, gvdPositionsFID);
98 inxArray = (jarray)(*env)->GetObjectField(env, gvdata, gvdIndicesFID);
99 if (glyphArray == NULL || posArray == NULL || inxArray == NULL) {
100 JNU_ThrowArrayIndexOutOfBoundsException(env, "");
101 return JNI_FALSE;
102 }
103 glyphArrayLen = (*env)->GetArrayLength(env, glyphArray);
104 posArrayLen = (*env)->GetArrayLength(env, posArray);
105 maxGlyphs = (charCount > glyphCount) ? charCount : glyphCount;
106 maxStore = maxGlyphs + initialCount;
107 needToGrow = (maxStore > glyphArrayLen) ||
108 (maxStore * 2 + 2 > posArrayLen);
109 if (needToGrow) {
110 (*env)->CallVoidMethod(env, gvdata, gvdGrowMID);
111 if ((*env)->ExceptionCheck(env)) {
112 return JNI_FALSE;
113 }
114 }
115 } while (needToGrow);
116
117 getFloat(env, startPt, &startX, &startY);
118
119 glyphs =
120 (unsigned int*)(*env)->GetPrimitiveArrayCritical(env, glyphArray, NULL);
121 if (glyphs == NULL) {
122 return JNI_FALSE;
123 }
124 positions = (jfloat*)(*env)->GetPrimitiveArrayCritical(env, posArray, NULL);
125 if (positions == NULL) {
126 (*env)->ReleasePrimitiveArrayCritical(env, glyphArray, glyphs, 0);
127 return JNI_FALSE;
128 }
129 indices =
130 (unsigned int*)(*env)->GetPrimitiveArrayCritical(env, inxArray, NULL);
131 if (indices == NULL) {
132 (*env)->ReleasePrimitiveArrayCritical(env, glyphArray, glyphs, 0);
133 (*env)->ReleasePrimitiveArrayCritical(env, posArray, positions, 0);
134 return JNI_FALSE;
135 }
136
137 for (i = 0; i < glyphCount; i++) {
138 int storei = i + initialCount;
139 int cluster = glyphInfo[i].cluster - offset;
140 indices[storei] = baseIndex + cluster;
141 glyphs[storei] = (unsigned int)(glyphInfo[i].codepoint | slot);
142 positions[storei*2] = startX + x + glyphPos[i].x_offset * scale;
143 positions[(storei*2)+1] = startY + y - glyphPos[i].y_offset * scale;
144 x += glyphPos[i].x_advance * scale;
145 y += glyphPos[i].y_advance * scale;
146 storei++;
147 }
148 storeadv = initialCount + glyphCount;
149 // The final slot in the positions array is important
150 // because when the GlyphVector is created from this
151 // data it determines the overall advance of the glyphvector
152 // and this is used in positioning the next glyphvector
153 // during rendering where text is broken into runs.
154 // We also need to report it back into "pt", so layout can
155 // pass it back down for that next run in this code.
156 advX = startX + x;
157 advY = startY + y;
158 positions[(storeadv*2)] = advX;
159 positions[(storeadv*2)+1] = advY;
160 (*env)->ReleasePrimitiveArrayCritical(env, glyphArray, glyphs, 0);
161 (*env)->ReleasePrimitiveArrayCritical(env, posArray, positions, 0);
162 (*env)->ReleasePrimitiveArrayCritical(env, inxArray, indices, 0);
163 putFloat(env, startPt, advX, advY);
164 (*env)->SetIntField(env, gvdata, gvdCountFID, storeadv);
165
166 return JNI_TRUE;
167 }
168
169 static float euclidianDistance(float a, float b)
170 {
171 float root;
172 if (a < 0) {
173 a = -a;
174 }
175
176 if (b < 0) {
177 b = -b;
178 }
179
180 if (a == 0) {
181 return b;
182 }
183
184 if (b == 0) {
185 return a;
186 }
187
188 /* Do an initial approximation, in root */
189 root = a > b ? a + (b / 2) : b + (a / 2);
190
191 /* An unrolled Newton-Raphson iteration sequence */
192 root = (root + (a * (a / root)) + (b * (b / root)) + 1) / 2;
193 root = (root + (a * (a / root)) + (b * (b / root)) + 1) / 2;
194 root = (root + (a * (a / root)) + (b * (b / root)) + 1) / 2;
195
196 return root;
197 }
198
199 JDKFontInfo*
200 createJDKFontInfo(JNIEnv *env,
201 jobject font2D,
202 jobject fontStrike,
203 jfloat ptSize,
204 jlong pScaler,
205 jlong pNativeFont,
206 jlong layoutTables,
207 jfloatArray matrix,
208 jboolean aat) {
209
210
211 JDKFontInfo *fi = (JDKFontInfo*)malloc(sizeof(JDKFontInfo));
212 if (!fi) {
213 return NULL;
214 }
215 fi->env = env; // this is valid only for the life of this JNI call.
216 fi->font2D = font2D;
217 fi->fontStrike = fontStrike;
218 fi->nativeFont = pNativeFont;
219 fi->layoutTables = (TTLayoutTableCache*)layoutTables;
220 fi->aat = aat;
221 (*env)->GetFloatArrayRegion(env, matrix, 0, 4, fi->matrix);
222 fi->ptSize = ptSize;
223 fi->xPtSize = euclidianDistance(fi->matrix[0], fi->matrix[1]);
224 fi->yPtSize = euclidianDistance(fi->matrix[2], fi->matrix[3]);
225 if (!aat && (getenv("HB_NODEVTX") != NULL)) {
226 fi->devScale = fi->xPtSize / fi->ptSize;
227 } else {
228 fi->devScale = 1.0f;
229 }
230 return fi;
231 }
232
233
234 #define TYPO_KERN 0x00000001
235 #define TYPO_LIGA 0x00000002
236 #define TYPO_RTL 0x80000000
237
238 JNIEXPORT jboolean JNICALL Java_sun_font_SunLayoutEngine_shape
239 (JNIEnv *env, jclass cls,
240 jobject font2D,
241 jobject fontStrike,
242 jfloat ptSize,
243 jfloatArray matrix,
244 jlong pScaler,
245 jlong pNativeFont,
246 jlong layoutTables,
247 jboolean aat,
248 jcharArray text,
249 jobject gvdata,
250 jint script,
251 jint offset,
252 jint limit,
253 jint baseIndex,
254 jobject startPt,
255 jint flags,
256 jint slot) {
257
258 hb_buffer_t *buffer;
259 hb_font_t* hbfont;
260 jchar *chars;
261 jsize len;
262 int glyphCount;
263 hb_glyph_info_t *glyphInfo;
264 hb_glyph_position_t *glyphPos;
265 hb_direction_t direction = HB_DIRECTION_LTR;
266 hb_feature_t *features = NULL;
267 int featureCount = 0;
268 char* kern = (flags & TYPO_KERN) ? "kern" : "-kern";
269 char* liga = (flags & TYPO_LIGA) ? "liga" : "-liga";
270 jboolean ret;
271 unsigned int buflen;
272
273 JDKFontInfo *jdkFontInfo =
274 createJDKFontInfo(env, font2D, fontStrike, ptSize,
275 pScaler, pNativeFont, layoutTables, matrix, aat);
276 if (!jdkFontInfo) {
277 return JNI_FALSE;
278 }
279 jdkFontInfo->env = env; // this is valid only for the life of this JNI call.
280 jdkFontInfo->font2D = font2D;
281 jdkFontInfo->fontStrike = fontStrike;
282
283 hbfont = hb_jdk_font_create(jdkFontInfo, NULL);
284
285 buffer = hb_buffer_create();
286 hb_buffer_set_script(buffer, getHBScriptCode(script));
287 hb_buffer_set_language(buffer,
288 hb_ot_tag_to_language(HB_OT_TAG_DEFAULT_LANGUAGE));
289 if ((flags & TYPO_RTL) != 0) {
290 direction = HB_DIRECTION_RTL;
291 }
292 hb_buffer_set_direction(buffer, direction);
293 hb_buffer_set_cluster_level(buffer,
294 HB_BUFFER_CLUSTER_LEVEL_MONOTONE_CHARACTERS);
295
296 chars = (*env)->GetCharArrayElements(env, text, NULL);
297 if ((*env)->ExceptionCheck(env)) {
298 hb_buffer_destroy(buffer);
299 hb_font_destroy(hbfont);
300 free((void*)jdkFontInfo);
301 return JNI_FALSE;
302 }
303 len = (*env)->GetArrayLength(env, text);
304
305 hb_buffer_add_utf16(buffer, chars, len, offset, limit-offset);
306
307 features = calloc(2, sizeof(hb_feature_t));
308 if (features) {
309 hb_feature_from_string(kern, -1, &features[featureCount++]);
310 hb_feature_from_string(liga, -1, &features[featureCount++]);
311 }
312
313 hb_shape_full(hbfont, buffer, features, featureCount, 0);
314 glyphCount = hb_buffer_get_length(buffer);
315 glyphInfo = hb_buffer_get_glyph_infos(buffer, 0);
316 glyphPos = hb_buffer_get_glyph_positions(buffer, &buflen);
317
318 ret = storeGVData(env, gvdata, slot, baseIndex, offset, startPt,
319 limit - offset, glyphCount, glyphInfo, glyphPos,
320 jdkFontInfo->devScale);
321
322 hb_buffer_destroy (buffer);
323 hb_font_destroy(hbfont);
324 free((void*)jdkFontInfo);
325 if (features != NULL) free(features);
326 (*env)->ReleaseCharArrayElements(env, text, chars, JNI_ABORT);
327 return ret;
328 }
329