4 * Copyright 2006 Jeff Latimer
5 * Copyright 2006 Hans Leidekker
6 * Copyright 2010 CodeWeavers, Aric Stewart
8 * This library is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU Lesser General Public
10 * License as published by the Free Software Foundation; either
11 * version 2.1 of the License, or (at your option) any later version.
13 * This library is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
16 * Lesser General Public License for more details.
18 * You should have received a copy of the GNU Lesser General Public
19 * License along with this library; if not, write to the Free Software
20 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
23 * Uniscribe allows for processing of complex scripts such as joining
24 * and filtering characters and bi-directional text with custom line breaks.
30 #include <wine/test.h>
34 typedef struct _itemTest
{
43 typedef struct _shapeTest_char
{
45 SCRIPT_CHARPROP CharProp
;
48 typedef struct _shapeTest_glyph
{
50 SCRIPT_GLYPHPROP GlyphProp
;
53 /* Uniscribe 1.6 calls */
54 static HRESULT (WINAPI
*pScriptItemizeOpenType
)( const WCHAR
*pwcInChars
, int cInChars
, int cMaxItems
, const SCRIPT_CONTROL
*psControl
, const SCRIPT_STATE
*psState
, SCRIPT_ITEM
*pItems
, ULONG
*pScriptTags
, int *pcItems
);
56 static HRESULT (WINAPI
*pScriptShapeOpenType
)( HDC hdc
, SCRIPT_CACHE
*psc
, SCRIPT_ANALYSIS
*psa
, OPENTYPE_TAG tagScript
, OPENTYPE_TAG tagLangSys
, int *rcRangeChars
, TEXTRANGE_PROPERTIES
**rpRangeProperties
, int cRanges
, const WCHAR
*pwcChars
, int cChars
, int cMaxGlyphs
, WORD
*pwLogClust
, SCRIPT_CHARPROP
*pCharProps
, WORD
*pwOutGlyphs
, SCRIPT_GLYPHPROP
*pOutGlyphProps
, int *pcGlyphs
);
58 static DWORD (WINAPI
*pGetGlyphIndicesW
)(HDC hdc
, LPCWSTR lpstr
, INT count
, LPWORD pgi
, DWORD flags
);
60 static inline void _test_items_ok(LPCWSTR string
, DWORD cchString
,
61 SCRIPT_CONTROL
*Control
, SCRIPT_STATE
*State
,
62 DWORD nItems
, const itemTest
* items
, BOOL nItemsToDo
,
67 SCRIPT_ITEM outpItems
[15];
68 ULONG tags
[15] = {-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1};
70 if (pScriptItemizeOpenType
)
71 hr
= pScriptItemizeOpenType(string
, cchString
, 15, Control
, State
, outpItems
, tags
, &outnItems
);
73 hr
= ScriptItemize(string
, cchString
, 15, Control
, State
, outpItems
, &outnItems
);
75 winetest_ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
76 if (nItemsBroken
&& broken(nItemsBroken
== outnItems
))
78 winetest_win_skip("This test broken on this platform\n");
82 todo_wine
winetest_ok(outnItems
== nItems
, "Wrong number of items\n");
84 winetest_ok(outnItems
== nItems
, "Wrong number of items\n");
85 for (x
= 0; x
<= outnItems
; x
++)
87 if (items
[x
].todo_flag
[0])
88 todo_wine
winetest_ok(outpItems
[x
].iCharPos
== items
[x
].iCharPos
, "%i:Wrong CharPos\n",x
);
90 winetest_ok(outpItems
[x
].iCharPos
== items
[x
].iCharPos
, "%i:Wrong CharPos (%i)\n",x
,outpItems
[x
].iCharPos
);
92 if (items
[x
].todo_flag
[1])
93 todo_wine
winetest_ok(outpItems
[x
].a
.fRTL
== items
[x
].fRTL
, "%i:Wrong fRTL\n",x
);
95 winetest_ok(outpItems
[x
].a
.fRTL
== items
[x
].fRTL
, "%i:Wrong fRTL(%i)\n",x
,outpItems
[x
].a
.fRTL
);
96 if (items
[x
].todo_flag
[2])
97 todo_wine
winetest_ok(outpItems
[x
].a
.fLayoutRTL
== items
[x
].fLayoutRTL
, "%i:Wrong fLayoutRTL\n",x
);
99 winetest_ok(outpItems
[x
].a
.fLayoutRTL
== items
[x
].fLayoutRTL
, "%i:Wrong fLayoutRTL(%i)\n",x
,outpItems
[x
].a
.fLayoutRTL
);
100 if (items
[x
].todo_flag
[3])
101 todo_wine
winetest_ok(outpItems
[x
].a
.s
.uBidiLevel
== items
[x
].uBidiLevel
, "%i:Wrong BidiLevel\n",x
);
103 winetest_ok(outpItems
[x
].a
.s
.uBidiLevel
== items
[x
].uBidiLevel
, "%i:Wrong BidiLevel(%i)\n",x
,outpItems
[x
].a
.s
.uBidiLevel
);
105 winetest_ok(outpItems
[x
].a
.eScript
!= SCRIPT_UNDEFINED
, "%i: Undefined script\n",x
);
106 if (pScriptItemizeOpenType
)
108 if (items
[x
].todo_flag
[4])
109 todo_wine
winetest_ok(tags
[x
] == items
[x
].scriptTag
,"%i:Incorrect Script Tag %x != %x\n",x
,tags
[x
],items
[x
].scriptTag
);
111 winetest_ok(tags
[x
] == items
[x
].scriptTag
,"%i:Incorrect Script Tag %x != %x\n",x
,tags
[x
],items
[x
].scriptTag
);
116 #define test_items_ok(a,b,c,d,e,f,g,h) (winetest_set_location(__FILE__,__LINE__), 0) ? 0 : _test_items_ok(a,b,c,d,e,f,g,h)
118 #define MS_MAKE_TAG( _x1, _x2, _x3, _x4 ) \
119 ( ( (ULONG)_x4 << 24 ) | \
120 ( (ULONG)_x3 << 16 ) | \
121 ( (ULONG)_x2 << 8 ) | \
124 #define latn_tag MS_MAKE_TAG('l','a','t','n')
125 #define arab_tag MS_MAKE_TAG('a','r','a','b')
126 #define thai_tag MS_MAKE_TAG('t','h','a','i')
127 #define hebr_tag MS_MAKE_TAG('h','e','b','r')
128 #define syrc_tag MS_MAKE_TAG('s','y','r','c')
129 #define deva_tag MS_MAKE_TAG('d','e','v','a')
130 #define beng_tag MS_MAKE_TAG('b','e','n','g')
131 #define guru_tag MS_MAKE_TAG('g','u','r','u')
132 #define gujr_tag MS_MAKE_TAG('g','u','j','r')
133 #define orya_tag MS_MAKE_TAG('o','r','y','a')
134 #define taml_tag MS_MAKE_TAG('t','a','m','l')
135 #define telu_tag MS_MAKE_TAG('t','e','l','u')
136 #define knda_tag MS_MAKE_TAG('k','n','d','a')
137 #define mlym_tag MS_MAKE_TAG('m','l','y','m')
139 static void test_ScriptItemize( void )
141 static const WCHAR test1
[] = {'t', 'e', 's', 't',0};
142 static const itemTest t11
[2] = {{{0,0,0,0,0},0,0,0,0,latn_tag
},{{0,0,0,0,0},4,0,0,0,-1}};
143 static const itemTest t12
[2] = {{{0,0,0,0,0},0,0,0,2,latn_tag
},{{0,0,0,0,0},4,0,0,0,-1}};
145 static const WCHAR test1b
[] = {' ', ' ', ' ', ' ',0};
146 static const itemTest t1b1
[2] = {{{0,0,0,0,0},0,0,0,0,0},{{0,0,0,0,0},4,0,0,0,-1}};
147 static const itemTest t1b2
[2] = {{{0,0,0,0,0},0,1,1,1,0},{{0,0,0,0,0},4,0,0,0,-1}};
149 static const WCHAR test1c
[] = {' ', ' ', ' ', '1', '2', ' ',0};
150 static const itemTest t1c1
[2] = {{{0,0,0,0,0},0,0,0,0,0},{{0,0,0,0,0},6,0,0,0,-1}};
151 static const itemTest t1c2
[4] = {{{0,0,0,0,0},0,1,1,1,0},{{0,0,1,0,0},3,0,1,2,0},{{0,0,0,0,0},5,1,1,1,0},{{0,0,0,0,0},6,0,0,0,-1}};
154 static const WCHAR test2
[] = {'1','2','3','-','5','2',0x064a,0x064f,0x0633,0x0627,0x0648,0x0650,0x064a,'7','1','.',0};
155 static const itemTest t21
[7] = {{{0,0,0,0,0},0,0,0,0,0},{{0,0,0,0,0},3,0,0,0,0},{{0,0,0,0,0},4,0,0,0,0},{{0,0,0,0,0},6,1,1,1,arab_tag
},{{0,0,0,0,0},13,0,0,0,0},{{0,0,0,0,0},15,0,0,0,0},{{0,0,0,0,0},16,0,0,0,-1}};
156 static const itemTest t22
[5] = {{{0,0,0,1,0},0,0,0,2,0},{{0,0,0,0,0},6,1,1,1,arab_tag
},{{0,0,1,0,0},13,0,1,2,0},{{0,0,0,0,0},15,0,0,0,0},{{0,0,0,0,0},16,0,0,0,-1}};
157 static const itemTest t23
[5] = {{{0,0,1,0,0},0,0,1,2,0},{{0,0,0,0,0},6,1,1,1,arab_tag
},{{0,0,1,0,0},13,0,1,2,0},{{0,0,0,0,0},15,1,1,1,0},{{0,0,0,0,0},16,0,0,0,-1}};
159 static const WCHAR test2b
[] = {'A','B','C','-','D','E','F',' ',0x0621,0x0623,0x0624,0};
160 static const itemTest t2b1
[5] = {{{0,0,0,0,0},0,0,0,0,latn_tag
},{{0,0,0,0,0},3,0,0,0,0},{{0,0,0,0,0},4,0,0,0,latn_tag
},{{0,0,0,0,0},8,1,1,1,arab_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
161 static const itemTest t2b2
[5] = {{{0,0,0,0,0},0,0,0,2,latn_tag
},{{0,0,0,0,0},3,0,0,2,0},{{0,0,0,0,0},4,0,0,2,latn_tag
},{{0,0,0,0,0},7,1,1,1,arab_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
162 static const itemTest t2b3
[3] = {{{0,0,0,0,0},0,0,0,2,latn_tag
},{{0,0,0,0,0},7,1,1,1,arab_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
165 static const WCHAR test2c
[] = {' ',0x0621,0x0623,0x0624,'A','B','C','-','D','E','F',0};
166 static const itemTest t2c1
[5] = {{{0,0,0,0,0},0,1,1,1,arab_tag
},{{0,0,0,0,0},4,0,0,0,latn_tag
},{{0,0,0,0,0},7,0,0,0,0},{{0,0,0,0,0},8,0,0,0,latn_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
167 static const itemTest t2c2
[6] = {{{0,0,0,0,1},0,0,0,0,0},{{0,0,0,0,0},1,1,1,1,arab_tag
},{{0,0,0,0,0},4,0,0,0,latn_tag
},{{0,0,0,0,0},7,0,0,0,0},{{0,0,0,0,0},8,0,0,0,latn_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
168 static const itemTest t2c3
[5] = {{{0,0,0,0,0},0,1,1,1,arab_tag
},{{0,0,0,0,0},4,0,0,2,latn_tag
},{{0,0,0,0,0},7,0,0,2,0},{{0,0,0,0,0},8,0,0,2,latn_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
169 static const itemTest t2c4
[3] = {{{0,0,0,0,0},0,1,1,1,arab_tag
},{{0,0,0,0,0},4,0,0,2,latn_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
172 static const WCHAR test2d
[] = {'A','B','C','-','D','E','F',0x0621,0x0623,0x0624,' ',0};
173 static const itemTest t2d1
[5] = {{{0,0,0,0,0},0,0,0,0,latn_tag
},{{0,0,0,0,0},3,0,0,0,0},{{0,0,0,0,0},4,0,0,0,latn_tag
},{{0,0,0,0,0},7,1,1,1,arab_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
174 static const itemTest t2d2
[6] = {{{0,0,0,0,0},0,0,0,0,latn_tag
},{{0,0,0,0,0},3,0,0,0,0},{{0,0,0,0,0},4,0,0,0,latn_tag
},{{0,0,0,0,0},7,1,1,1,arab_tag
},{{0,0,0,0,0},10,0,0,0,0},{{0,0,0,0,0},11,0,0,0,-1}};
175 static const itemTest t2d3
[5] = {{{0,0,0,0,0},0,0,0,2,latn_tag
},{{0,0,0,0,0},3,0,0,2,0},{{0,0,0,0,0},4,0,0,2,latn_tag
},{{0,0,0,0,0},7,1,1,1,arab_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
176 static const itemTest t2d4
[3] = {{{0,0,0,0,0},0,0,0,2,latn_tag
},{{0,0,0,0,0},7,1,1,1,arab_tag
},{{0,0,0,0,0},11,0,0,0,-1}};
179 static const WCHAR test3
[] =
180 {0x0e04,0x0e27,0x0e32,0x0e21,0x0e1e,0x0e22,0x0e32,0x0e22,0x0e32, 0x0e21
181 ,0x0e2d,0x0e22,0x0e39,0x0e48,0x0e17,0x0e35,0x0e48,0x0e44,0x0e2b,0x0e19
182 ,0x0e04,0x0e27,0x0e32,0x0e21,0x0e2a, 0x0e33,0x0e40,0x0e23,0x0e47,0x0e08,
183 0x0e2d,0x0e22,0x0e39,0x0e48,0x0e17,0x0e35,0x0e48,0x0e19,0x0e31,0x0e48,0x0e19,0};
185 static const itemTest t31
[2] = {{{0,0,0,0,0},0,0,0,0,thai_tag
},{{0,0,0,0,0},41,0,0,0,-1}};
186 static const itemTest t32
[2] = {{{0,0,0,0,0},0,0,0,2,thai_tag
},{{0,0,0,0,0},41,0,0,0,-1}};
188 static const WCHAR test4
[] = {'1','2','3','-','5','2',' ','i','s',' ','7','1','.',0};
190 static const itemTest t41
[6] = {{{0,0,0,0,0},0,0,0,0,0},{{0,0,0,0,0},3,0,0,0,0},{{0,0,0,0,0},4,0,0,0,0},{{0,0,0,0,0},7,0,0,0,latn_tag
},{{0,0,0,0,0},10,0,0,0,0},{{0,0,0,0,0},12,0,0,0,-1}};
191 static const itemTest t42
[5] = {{{0,0,1,0,0},0,0,1,2,0},{{0,0,0,0,1},6,1,1,1,0},{{0,0,0,0,0},7,0,0,2,latn_tag
},{{0,0,0,0,0},10,0,0,2,0},{{0,0,0,0,0},12,0,0,0,-1}};
192 static const itemTest t43
[4] = {{{0,0,1,0,0},0,0,1,2,0},{{0,0,0,0,1},6,1,1,1,0},{{0,0,0,0,0},7,0,0,2,latn_tag
},{{0,0,0,0,0},12,0,0,0,-1}};
195 static const WCHAR test5
[] =
196 {0x0627,0x0644,0x0635,0x0651,0x0650,0x062d,0x0629,0x064f,' ',0x062a,0x064e,
197 0x0627,0x062c,0x064c,' ',0x0639,0x064e,0x0644,0x0649,' ',
198 0x0631,0x064f,0x0624,0x0648,0x0633,0x0650,' ',0x0627,0x0644
199 ,0x0623,0x0635,0x0650,0x062d,0x0651,0x064e,0x0627,0x0621,0x0650,0};
200 static const itemTest t51
[2] = {{{0,0,0,0,0},0,1,1,1,arab_tag
},{{0,0,0,0,0},38,0,0,0,-1}};
203 static const WCHAR test6
[] = {0x05e9, 0x05dc, 0x05d5, 0x05dd, '.',0};
204 static const itemTest t61
[3] = {{{0,0,0,0,0},0,1,1,1,hebr_tag
},{{0,0,0,0,0},4,0,0,0,0},{{0,0,0,0,0},5,0,0,0,-1}};
205 static const itemTest t62
[3] = {{{0,0,0,0,0},0,1,1,1,hebr_tag
},{{0,0,0,0,0},4,1,1,1,0},{{0,0,0,0,0},5,0,0,0,-1}};
206 static const itemTest t63
[2] = {{{0,0,0,0,0},0,1,1,1,hebr_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
207 static const WCHAR test7
[] = {'p','a','r','t',' ','o','n','e',' ',0x05d7, 0x05dc, 0x05e7, ' ', 0x05e9, 0x05ea, 0x05d9, 0x05d9, 0x05dd, ' ','p','a','r','t',' ','t','h','r','e','e', 0};
208 static const itemTest t71
[4] = {{{0,0,0,0,0},0,0,0,0,latn_tag
},{{0,0,0,0,0},9,1,1,1,hebr_tag
},{{0,0,0,0,0},19,0,0,0,latn_tag
},{{0,0,0,0,0},29,0,0,0,-1}};
209 static const itemTest t72
[4] = {{{0,0,0,0,0},0,0,0,0,latn_tag
},{{0,0,0,0,0},9,1,1,1,hebr_tag
},{{0,0,0,0,0},18,0,0,0,latn_tag
},{{0,0,0,0,0},29,0,0,0,-1}};
210 static const itemTest t73
[4] = {{{0,0,0,0,0},0,0,0,2,latn_tag
},{{0,0,0,0,0},8,1,1,1,hebr_tag
},{{0,0,0,0,0},19,0,0,2,latn_tag
},{{0,0,0,0,0},29,0,0,0,-1}};
211 static const WCHAR test8
[] = {0x0633, 0x0644, 0x0627, 0x0645,0};
212 static const itemTest t81
[2] = {{{0,0,0,0,0},0,1,1,1,arab_tag
},{{0,0,0,0,0},4,0,0,0,-1}};
214 /* Syriac (Like Arabic )*/
215 static const WCHAR test9
[] = {0x0710, 0x0712, 0x0712, 0x0714, '.',0};
216 static const itemTest t91
[3] = {{{0,0,0,0,0},0,1,1,1,syrc_tag
},{{0,0,0,0,0},4,0,0,0,0},{{0,0,0,0,0},5,0,0,0,-1}};
217 static const itemTest t92
[3] = {{{0,0,0,0,0},0,1,1,1,syrc_tag
},{{0,0,0,0,0},4,1,1,1,0},{{0,0,0,0,0},5,0,0,0,-1}};
218 static const itemTest t93
[2] = {{{0,0,0,0,0},0,1,1,1,syrc_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
220 static const WCHAR test10
[] = {0x0717, 0x0718, 0x071a, 0x071b,0};
221 static const itemTest t101
[2] = {{{0,0,0,0,0},0,1,1,1,syrc_tag
},{{0,0,0,0,0},4,0,0,0,-1}};
224 static const WCHAR test11
[] = {0x0926, 0x0947, 0x0935, 0x0928, 0x093e, 0x0917, 0x0930, 0x0940};
225 static const itemTest t111
[2] = {{{0,0,0,0,0},0,0,0,0,deva_tag
},{{0,0,0,0,0},8,0,0,0,-1}};
226 static const itemTest t112
[2] = {{{0,0,0,0,0},0,0,0,2,deva_tag
},{{0,0,0,0,0},8,0,0,0,-1}};
229 static const WCHAR test12
[] = {0x09ac, 0x09be, 0x0982, 0x09b2, 0x09be};
230 static const itemTest t121
[2] = {{{0,0,0,0,0},0,0,0,0,beng_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
231 static const itemTest t122
[2] = {{{0,0,0,0,0},0,0,0,2,beng_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
234 static const WCHAR test13
[] = {0x0a17, 0x0a41, 0x0a30, 0x0a2e, 0x0a41, 0x0a16, 0x0a40};
235 static const itemTest t131
[2] = {{{0,0,0,0,0},0,0,0,0,guru_tag
},{{0,0,0,0,0},7,0,0,0,-1}};
236 static const itemTest t132
[2] = {{{0,0,0,0,0},0,0,0,2,guru_tag
},{{0,0,0,0,0},7,0,0,0,-1}};
239 static const WCHAR test14
[] = {0x0a97, 0x0ac1, 0x0a9c, 0x0ab0, 0x0abe, 0x0aa4, 0x0ac0};
240 static const itemTest t141
[2] = {{{0,0,0,0,0},0,0,0,0,gujr_tag
},{{0,0,0,0,0},7,0,0,0,-1}};
241 static const itemTest t142
[2] = {{{0,0,0,0,0},0,0,0,2,gujr_tag
},{{0,0,0,0,0},7,0,0,0,-1}};
244 static const WCHAR test15
[] = {0x0b13, 0x0b21, 0x0b3c, 0x0b3f, 0x0b06};
245 static const itemTest t151
[2] = {{{0,0,0,0,0},0,0,0,0,orya_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
246 static const itemTest t152
[2] = {{{0,0,0,0,0},0,0,0,2,orya_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
249 static const WCHAR test16
[] = {0x0ba4, 0x0bae, 0x0bbf, 0x0bb4, 0x0bcd};
250 static const itemTest t161
[2] = {{{0,0,0,0,0},0,0,0,0,taml_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
251 static const itemTest t162
[2] = {{{0,0,0,0,0},0,0,0,2,taml_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
254 static const WCHAR test17
[] = {0x0c24, 0x0c46, 0x0c32, 0x0c41, 0x0c17, 0x0c41};
255 static const itemTest t171
[2] = {{{0,0,0,0,0},0,0,0,0,telu_tag
},{{0,0,0,0,0},6,0,0,0,-1}};
256 static const itemTest t172
[2] = {{{0,0,0,0,0},0,0,0,2,telu_tag
},{{0,0,0,0,0},6,0,0,0,-1}};
259 static const WCHAR test18
[] = {0x0c95, 0x0ca8, 0x0ccd, 0x0ca8, 0x0ca1};
260 static const itemTest t181
[2] = {{{0,0,0,0,0},0,0,0,0,knda_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
261 static const itemTest t182
[2] = {{{0,0,0,0,0},0,0,0,2,knda_tag
},{{0,0,0,0,0},5,0,0,0,-1}};
264 static const WCHAR test19
[] = {0x0d2e, 0x0d32, 0x0d2f, 0x0d3e, 0x0d33, 0x0d02};
265 static const itemTest t191
[2] = {{{0,0,0,0,0},0,0,0,0,mlym_tag
},{{0,0,0,0,0},6,0,0,0,-1}};
266 static const itemTest t192
[2] = {{{0,0,0,0,0},0,0,0,2,mlym_tag
},{{0,0,0,0,0},6,0,0,0,-1}};
268 SCRIPT_ITEM items
[15];
269 SCRIPT_CONTROL Control
;
275 usp10
= LoadLibraryA("usp10.dll");
276 ok (usp10
!= 0,"Unable to LoadLibrary on usp10.dll\n");
277 pScriptItemizeOpenType
= (void*)GetProcAddress(usp10
, "ScriptItemizeOpenType");
278 pScriptShapeOpenType
= (void*)GetProcAddress(usp10
, "ScriptShapeOpenType");
279 pGetGlyphIndicesW
= (void*)GetProcAddress(GetModuleHandleA("gdi32.dll"), "GetGlyphIndicesW");
281 memset(&Control
, 0, sizeof(Control
));
282 memset(&State
, 0, sizeof(State
));
284 hr
= ScriptItemize(NULL
, 4, 10, &Control
, &State
, items
, NULL
);
285 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if pwcInChars is NULL\n");
287 hr
= ScriptItemize(test1
, 4, 10, &Control
, &State
, NULL
, NULL
);
288 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if pItems is NULL\n");
290 hr
= ScriptItemize(test1
, 4, 1, &Control
, &State
, items
, NULL
);
291 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if cMaxItems < 2.\n");
293 hr
= ScriptItemize(test1
, 0, 10, NULL
, NULL
, items
, &nItems
);
294 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if cInChars is 0\n");
296 test_items_ok(test1
,4,NULL
,NULL
,1,t11
,FALSE
,0);
297 test_items_ok(test1b
,4,NULL
,NULL
,1,t1b1
,FALSE
,0);
298 test_items_ok(test1c
,6,NULL
,NULL
,1,t1c1
,FALSE
,0);
299 test_items_ok(test2
,16,NULL
,NULL
,6,t21
,FALSE
,0);
300 test_items_ok(test2b
,11,NULL
,NULL
,4,t2b1
,FALSE
,0);
301 test_items_ok(test2c
,11,NULL
,NULL
,4,t2c1
,FALSE
,0);
302 test_items_ok(test2d
,11,NULL
,NULL
,4,t2d1
,FALSE
,0);
303 test_items_ok(test3
,41,NULL
,NULL
,1,t31
,FALSE
,0);
304 test_items_ok(test4
,12,NULL
,NULL
,5,t41
,FALSE
,0);
305 test_items_ok(test5
,38,NULL
,NULL
,1,t51
,FALSE
,0);
306 test_items_ok(test6
,5,NULL
,NULL
,2,t61
,FALSE
,0);
307 test_items_ok(test7
,29,NULL
,NULL
,3,t71
,FALSE
,0);
308 test_items_ok(test8
,4,NULL
,NULL
,1,t81
,FALSE
,0);
309 test_items_ok(test9
,5,NULL
,NULL
,2,t91
,FALSE
,0);
310 test_items_ok(test10
,4,NULL
,NULL
,1,t101
,FALSE
,0);
311 test_items_ok(test11
,8,NULL
,NULL
,1,t111
,FALSE
,0);
312 test_items_ok(test12
,5,NULL
,NULL
,1,t121
,FALSE
,0);
313 test_items_ok(test13
,7,NULL
,NULL
,1,t131
,FALSE
,0);
314 test_items_ok(test14
,7,NULL
,NULL
,1,t141
,FALSE
,0);
315 test_items_ok(test15
,5,NULL
,NULL
,1,t151
,FALSE
,0);
316 test_items_ok(test16
,5,NULL
,NULL
,1,t161
,FALSE
,0);
317 test_items_ok(test17
,6,NULL
,NULL
,1,t171
,FALSE
,0);
318 test_items_ok(test18
,5,NULL
,NULL
,1,t181
,FALSE
,0);
319 test_items_ok(test19
,6,NULL
,NULL
,1,t191
,FALSE
,0);
321 State
.uBidiLevel
= 0;
322 test_items_ok(test1
,4,&Control
,&State
,1,t11
,FALSE
,0);
323 test_items_ok(test1b
,4,&Control
,&State
,1,t1b1
,FALSE
,0);
324 test_items_ok(test1c
,6,&Control
,&State
,1,t1c1
,FALSE
,0);
325 test_items_ok(test2
,16,&Control
,&State
,4,t22
,FALSE
,0);
326 test_items_ok(test2b
,11,&Control
,&State
,4,t2b1
,FALSE
,0);
327 test_items_ok(test2c
,11,&Control
,&State
,5,t2c2
,FALSE
,0);
328 test_items_ok(test2d
,11,&Control
,&State
,5,t2d2
,FALSE
,0);
329 test_items_ok(test3
,41,&Control
,&State
,1,t31
,FALSE
,0);
330 test_items_ok(test4
,12,&Control
,&State
,5,t41
,FALSE
,0);
331 test_items_ok(test5
,38,&Control
,&State
,1,t51
,FALSE
,0);
332 test_items_ok(test6
,5,&Control
,&State
,2,t61
,FALSE
,0);
333 test_items_ok(test7
,29,&Control
,&State
,3,t72
,FALSE
,0);
334 test_items_ok(test8
,4,&Control
,&State
,1,t81
,FALSE
,0);
335 test_items_ok(test9
,5,&Control
,&State
,2,t91
,FALSE
,0);
336 test_items_ok(test10
,4,&Control
,&State
,1,t101
,FALSE
,0);
337 test_items_ok(test11
,8,&Control
,&State
,1,t111
,FALSE
,0);
338 test_items_ok(test12
,5,&Control
,&State
,1,t121
,FALSE
,0);
339 test_items_ok(test13
,7,&Control
,&State
,1,t131
,FALSE
,0);
340 test_items_ok(test14
,7,&Control
,&State
,1,t141
,FALSE
,0);
341 test_items_ok(test15
,5,&Control
,&State
,1,t151
,FALSE
,0);
342 test_items_ok(test16
,5,&Control
,&State
,1,t161
,FALSE
,0);
343 test_items_ok(test17
,6,&Control
,&State
,1,t171
,FALSE
,0);
344 test_items_ok(test18
,5,&Control
,&State
,1,t181
,FALSE
,0);
345 test_items_ok(test19
,6,&Control
,&State
,1,t191
,FALSE
,0);
347 State
.uBidiLevel
= 1;
348 test_items_ok(test1
,4,&Control
,&State
,1,t12
,FALSE
,0);
349 test_items_ok(test1b
,4,&Control
,&State
,1,t1b2
,FALSE
,0);
350 test_items_ok(test1c
,6,&Control
,&State
,3,t1c2
,FALSE
,0);
351 test_items_ok(test2
,16,&Control
,&State
,4,t23
,FALSE
,0);
352 test_items_ok(test2b
,11,&Control
,&State
,4,t2b2
,FALSE
,0);
353 test_items_ok(test2c
,11,&Control
,&State
,4,t2c3
,FALSE
,0);
354 test_items_ok(test2d
,11,&Control
,&State
,4,t2d3
,FALSE
,0);
355 test_items_ok(test3
,41,&Control
,&State
,1,t32
,FALSE
,0);
356 test_items_ok(test4
,12,&Control
,&State
,4,t42
,FALSE
,0);
357 test_items_ok(test5
,38,&Control
,&State
,1,t51
,FALSE
,0);
358 test_items_ok(test6
,5,&Control
,&State
,2,t62
,FALSE
,0);
359 test_items_ok(test7
,29,&Control
,&State
,3,t73
,FALSE
,0);
360 test_items_ok(test8
,4,&Control
,&State
,1,t81
,FALSE
,0);
361 test_items_ok(test9
,5,&Control
,&State
,2,t92
,FALSE
,0);
362 test_items_ok(test10
,4,&Control
,&State
,1,t101
,FALSE
,0);
363 test_items_ok(test11
,8,&Control
,&State
,1,t112
,FALSE
,0);
364 test_items_ok(test12
,5,&Control
,&State
,1,t122
,FALSE
,0);
365 test_items_ok(test13
,7,&Control
,&State
,1,t132
,FALSE
,0);
366 test_items_ok(test14
,7,&Control
,&State
,1,t142
,FALSE
,0);
367 test_items_ok(test15
,5,&Control
,&State
,1,t152
,FALSE
,0);
368 test_items_ok(test16
,5,&Control
,&State
,1,t162
,FALSE
,0);
369 test_items_ok(test17
,6,&Control
,&State
,1,t172
,FALSE
,0);
370 test_items_ok(test18
,5,&Control
,&State
,1,t182
,FALSE
,0);
371 test_items_ok(test19
,6,&Control
,&State
,1,t192
,FALSE
,0);
373 State
.uBidiLevel
= 1;
374 Control
.fMergeNeutralItems
= TRUE
;
375 test_items_ok(test1
,4,&Control
,&State
,1,t12
,FALSE
,0);
376 test_items_ok(test1b
,4,&Control
,&State
,1,t1b2
,FALSE
,0);
377 test_items_ok(test1c
,6,&Control
,&State
,3,t1c2
,FALSE
,0);
378 test_items_ok(test2
,16,&Control
,&State
,4,t23
,FALSE
,0);
379 test_items_ok(test2b
,11,&Control
,&State
,2,t2b3
,FALSE
,4);
380 test_items_ok(test2c
,11,&Control
,&State
,2,t2c4
,FALSE
,4);
381 test_items_ok(test2d
,11,&Control
,&State
,2,t2d4
,FALSE
,4);
382 test_items_ok(test3
,41,&Control
,&State
,1,t32
,FALSE
,0);
383 test_items_ok(test4
,12,&Control
,&State
,3,t43
,FALSE
,4);
384 test_items_ok(test5
,38,&Control
,&State
,1,t51
,FALSE
,0);
385 test_items_ok(test6
,5,&Control
,&State
,1,t63
,FALSE
,2);
386 test_items_ok(test7
,29,&Control
,&State
,3,t73
,FALSE
,0);
387 test_items_ok(test8
,4,&Control
,&State
,1,t81
,FALSE
,0);
388 test_items_ok(test9
,5,&Control
,&State
,1,t93
,FALSE
,2);
389 test_items_ok(test10
,4,&Control
,&State
,1,t101
,FALSE
,0);
390 test_items_ok(test11
,8,&Control
,&State
,1,t112
,FALSE
,0);
391 test_items_ok(test12
,5,&Control
,&State
,1,t122
,FALSE
,0);
392 test_items_ok(test13
,7,&Control
,&State
,1,t132
,FALSE
,0);
393 test_items_ok(test14
,7,&Control
,&State
,1,t142
,FALSE
,0);
394 test_items_ok(test15
,5,&Control
,&State
,1,t152
,FALSE
,0);
395 test_items_ok(test16
,5,&Control
,&State
,1,t162
,FALSE
,0);
396 test_items_ok(test17
,6,&Control
,&State
,1,t172
,FALSE
,0);
397 test_items_ok(test18
,5,&Control
,&State
,1,t182
,FALSE
,0);
398 test_items_ok(test19
,6,&Control
,&State
,1,t192
,FALSE
,0);
401 static inline void _test_shape_ok(int valid
, HDC hdc
, LPCWSTR string
,
402 DWORD cchString
, SCRIPT_CONTROL
*Control
,
403 SCRIPT_STATE
*State
, DWORD item
, DWORD nGlyphs
,
404 const shapeTest_char
* charItems
,
405 const shapeTest_glyph
* glyphItems
)
408 int x
, outnItems
=0, outnGlyphs
=0;
409 SCRIPT_ITEM outpItems
[15];
410 SCRIPT_CACHE sc
= NULL
;
413 int maxGlyphs
= cchString
* 1.5;
414 SCRIPT_GLYPHPROP
*glyphProp
;
415 SCRIPT_CHARPROP
*charProp
;
418 hr
= pScriptItemizeOpenType(string
, cchString
, 15, Control
, State
, outpItems
, tags
, &outnItems
);
419 if (hr
== USP_E_SCRIPT_NOT_IN_FONT
)
422 winetest_win_skip("Select font does not support script\n");
424 winetest_trace("Select font does not support script\n");
428 winetest_ok(!hr
, "ScriptItemizeOpenType should return S_OK not %08x\n", hr
);
430 winetest_trace("ScriptItemizeOpenType should return S_OK not %08x\n", hr
);
433 if (outnItems
<= item
)
436 winetest_win_skip("Did not get enough items\n");
438 winetest_trace("Did not get enough items\n");
442 logclust
= HeapAlloc(GetProcessHeap(), 0, sizeof(WORD
) * cchString
);
443 memset(logclust
,'a',sizeof(WORD
) * cchString
);
444 charProp
= HeapAlloc(GetProcessHeap(), 0, sizeof(SCRIPT_CHARPROP
) * cchString
);
445 memset(charProp
,'a',sizeof(SCRIPT_CHARPROP
) * cchString
);
446 glyphs
= HeapAlloc(GetProcessHeap(), 0, sizeof(WORD
) * maxGlyphs
);
447 memset(glyphs
,'a',sizeof(WORD
) * cchString
);
448 glyphProp
= HeapAlloc(GetProcessHeap(), 0, sizeof(SCRIPT_GLYPHPROP
) * maxGlyphs
);
449 memset(glyphProp
,'a',sizeof(SCRIPT_GLYPHPROP
) * cchString
);
451 hr
= pScriptShapeOpenType(hdc
, &sc
, &outpItems
[item
].a
, tags
[item
], 0x00000000, NULL
, NULL
, 0, string
, cchString
, maxGlyphs
, logclust
, charProp
, glyphs
, glyphProp
, &outnGlyphs
);
453 winetest_ok(hr
== S_OK
, "ScriptShapeOpenType failed (%x)\n",hr
);
455 winetest_trace("ScriptShapeOpenType failed (%x)\n",hr
);
459 for (x
= 0; x
< cchString
; x
++)
462 winetest_ok(logclust
[x
] == charItems
[x
].wLogClust
, "%i: invalid LogClust(%i)\n",x
,logclust
[x
]);
463 else if (logclust
[x
] != charItems
[x
].wLogClust
)
464 winetest_trace("%i: invalid LogClust(%i)\n",x
,logclust
[x
]);
466 winetest_ok(charProp
[x
].fCanGlyphAlone
== charItems
[x
].CharProp
.fCanGlyphAlone
, "%i: invalid fCanGlyphAlone\n",x
);
467 else if (charProp
[x
].fCanGlyphAlone
!= charItems
[x
].CharProp
.fCanGlyphAlone
)
468 winetest_trace("%i: invalid fCanGlyphAlone\n",x
);
472 winetest_ok(nGlyphs
== outnGlyphs
, "got incorrect number of glyphs (%i)\n",outnGlyphs
);
473 else if (nGlyphs
!= outnGlyphs
)
474 winetest_trace("got incorrect number of glyphs (%i)\n",outnGlyphs
);
475 for (x
= 0; x
< outnGlyphs
; x
++)
477 if (glyphItems
[x
].Glyph
)
480 winetest_ok(glyphs
[x
]!=0, "%i: Glyph not present when it should be\n",x
);
481 else if (glyphs
[x
]==0)
482 winetest_trace("%i: Glyph not present when it should be\n",x
);
487 winetest_ok(glyphs
[x
]==0, "%i: Glyph present when it should not be\n",x
);
488 else if (glyphs
[x
]!=0)
489 winetest_trace("%i: Glyph present when it should not be\n",x
);
492 winetest_ok(glyphProp
[x
].sva
.uJustification
== glyphItems
[x
].GlyphProp
.sva
.uJustification
, "%i: uJustification incorrect (%i)\n",x
,glyphProp
[x
].sva
.uJustification
);
493 else if (glyphProp
[x
].sva
.uJustification
!= glyphItems
[x
].GlyphProp
.sva
.uJustification
)
494 winetest_trace("%i: uJustification incorrect (%i)\n",x
,glyphProp
[x
].sva
.uJustification
);
496 winetest_ok(glyphProp
[x
].sva
.fClusterStart
== glyphItems
[x
].GlyphProp
.sva
.fClusterStart
, "%i: fClusterStart incorrect (%i)\n",x
,glyphProp
[x
].sva
.fClusterStart
);
497 else if (glyphProp
[x
].sva
.fClusterStart
!= glyphItems
[x
].GlyphProp
.sva
.fClusterStart
)
498 winetest_trace("%i: fClusterStart incorrect (%i)\n",x
,glyphProp
[x
].sva
.fClusterStart
);
500 winetest_ok(glyphProp
[x
].sva
.fDiacritic
== glyphItems
[x
].GlyphProp
.sva
.fDiacritic
, "%i: fDiacritic incorrect (%i)\n",x
,glyphProp
[x
].sva
.fDiacritic
);
501 else if (glyphProp
[x
].sva
.fDiacritic
!= glyphItems
[x
].GlyphProp
.sva
.fDiacritic
)
502 winetest_trace("%i: fDiacritic incorrect (%i)\n",x
,glyphProp
[x
].sva
.fDiacritic
);
504 winetest_ok(glyphProp
[x
].sva
.fZeroWidth
== glyphItems
[x
].GlyphProp
.sva
.fZeroWidth
, "%i: fZeroWidth incorrect (%i)\n",x
,glyphProp
[x
].sva
.fZeroWidth
);
505 else if (glyphProp
[x
].sva
.fZeroWidth
!= glyphItems
[x
].GlyphProp
.sva
.fZeroWidth
)
506 winetest_trace("%i: fZeroWidth incorrect (%i)\n",x
,glyphProp
[x
].sva
.fZeroWidth
);
509 HeapFree(GetProcessHeap(),0,logclust
);
510 HeapFree(GetProcessHeap(),0,charProp
);
511 HeapFree(GetProcessHeap(),0,glyphs
);
512 HeapFree(GetProcessHeap(),0,glyphProp
);
513 ScriptFreeCache(&sc
);
516 #define test_shape_ok(a,b,c,d,e,f,g,h,i) (winetest_set_location(__FILE__,__LINE__), 0) ? 0 : _test_shape_ok(1,a,b,c,d,e,f,g,h,i)
518 #define test_shape_ok_valid(v,a,b,c,d,e,f,g,h,i) (winetest_set_location(__FILE__,__LINE__), 0) ? 0 : _test_shape_ok(v,a,b,c,d,e,f,g,h,i)
520 typedef struct tagRangeP
{
525 static int CALLBACK
enumFontProc( const LOGFONT
*lpelfe
, const TEXTMETRIC
*lpntme
,
526 DWORD FontType
, LPARAM lParam
)
528 NEWTEXTMETRICEX
*ntme
= (NEWTEXTMETRICEX
*)lpntme
;
529 fontEnumParam
*rp
= (fontEnumParam
*) lParam
;
534 if (FontType
!= TRUETYPE_FONTTYPE
)
538 while (i
> sizeof(DWORD
)*8)
541 i
-= (sizeof(DWORD
)*8);
548 if (ntme
->ntmFontSig
.fsUsb
[idx
] & mask
)
550 memcpy(&(rp
->lf
),lpelfe
,sizeof(LOGFONT
));
556 static int _find_font_for_range(HDC hdc
, const CHAR
*recommended
, BYTE range
, const WCHAR check
, HFONT
*hfont
, HFONT
*origFont
)
559 fontEnumParam lParam
;
561 lParam
.range
= range
;
562 memset(&lParam
.lf
,0,sizeof(LOGFONT
));
567 lstrcpyA(lParam
.lf
.lfFaceName
, recommended
);
568 if (!EnumFontFamiliesExA(hdc
, &lParam
.lf
, enumFontProc
, (LPARAM
)&lParam
, 0))
570 *hfont
= CreateFontIndirectA(&lParam
.lf
);
573 winetest_trace("using font %s\n",lParam
.lf
.lfFaceName
);
581 memset(&lParam
.lf
,0,sizeof(LOGFONT
));
582 lParam
.lf
.lfCharSet
= DEFAULT_CHARSET
;
584 if (!EnumFontFamiliesExA(hdc
, &lParam
.lf
, enumFontProc
, (LPARAM
)&lParam
, 0) && lParam
.lf
.lfFaceName
[0])
586 *hfont
= CreateFontIndirectA(&lParam
.lf
);
588 winetest_trace("trying font %s: failures will only be warnings\n",lParam
.lf
.lfFaceName
);
596 *origFont
= SelectObject(hdc
,*hfont
);
597 if (pGetGlyphIndicesW
&& (pGetGlyphIndicesW(hdc
, &check
, 1, &glyph
, 0) == GDI_ERROR
|| glyph
==0))
599 winetest_trace(" Font fails to contain required glyphs\n");
600 SelectObject(hdc
,*origFont
);
601 DeleteObject(*hfont
);
609 winetest_trace("Failed to find usable font\n");
614 #define find_font_for_range(a,b,c,d,e,f) (winetest_set_location(__FILE__,__LINE__), 0) ? 0 : _find_font_for_range(a,b,c,d,e,f)
616 static void test_ScriptShapeOpenType(HDC hdc
)
619 SCRIPT_CACHE sc
= NULL
;
620 WORD glyphs
[4], logclust
[4];
621 SCRIPT_GLYPHPROP glyphProp
[4];
622 SCRIPT_ITEM items
[2];
624 SCRIPT_CONTROL Control
;
627 HFONT hfont
, hfont_orig
;
630 static const WCHAR test1
[] = {'w', 'i', 'n', 'e',0};
631 static const shapeTest_char t1_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{3,{0,0}}};
632 static const shapeTest_glyph t1_g
[] = {
633 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
634 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
635 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
636 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}} };
638 static const WCHAR test2
[] = {0x202B, 'i', 'n', 0x202C,0};
639 static const shapeTest_char t2_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{3,{0,0}}};
640 static const shapeTest_glyph t2_g
[] = {
641 {0,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
642 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
643 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
644 {0,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}} };
647 static const WCHAR test_hebrew
[] = {0x05e9, 0x05dc, 0x05d5, 0x05dd,0};
648 static const shapeTest_char hebrew_c
[] = {{3,{0,0}},{2,{0,0}},{1,{0,0}},{0,{0,0}}};
649 static const shapeTest_glyph hebrew_g
[] = {
650 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
651 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
652 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
653 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}} };
656 static const WCHAR test_arabic
[] = {0x0633,0x0644,0x0627,0x0645,0};
657 static const shapeTest_char arabic_c
[] = {{2,{0,0}},{1,{0,0}},{1,{0,0}},{0,{0,0}}};
658 static const shapeTest_glyph arabic_g
[] = {
659 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
660 {1,{{SCRIPT_JUSTIFY_ARABIC_NORMAL
,1,0,0,0,0},0}},
661 {1,{{SCRIPT_JUSTIFY_ARABIC_SEEN
,1,0,0,0,0},0}} };
664 static const WCHAR test_thai
[] = {0x0e2a, 0x0e04, 0x0e23, 0x0e34, 0x0e1b, 0x0e15, 0x0e4c, 0x0e44, 0x0e17, 0x0e22,};
665 static const shapeTest_char thai_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{2,{0,0}},{4,{0,0}},{5,{0,0}},{5,{0,0}},{7,{0,0}},{8,{0,0}},{9,{0,0}}};
666 static const shapeTest_glyph thai_g
[] = {
667 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
668 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
669 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
670 {1,{{SCRIPT_JUSTIFY_CHARACTER
,0,1,1,0,0},0}},
671 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
672 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
673 {1,{{SCRIPT_JUSTIFY_CHARACTER
,0,1,1,0,0},0}},
674 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
675 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
676 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}}};
679 static const WCHAR test_syriac
[] = {0x0710, 0x0710, 0x0710, 0x0728, 0x0718, 0x0723,0};
680 static const shapeTest_char syriac_c
[] = {{5,{0,0}},{4,{0,0}},{3,{0,0}},{2,{0,0}},{1,{0,0}},{0,{0,0}}};
681 static const shapeTest_glyph syriac_g
[] = {
682 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
683 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
684 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
685 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
686 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
687 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
690 static const WCHAR test_thaana
[] = {0x078a, 0x07ae, 0x0792, 0x07b0, 0x0020, 0x0796, 0x07aa, 0x0789, 0x07b0, 0x0795, 0x07ac, 0x0791, 0x07b0};
691 static const shapeTest_char thaana_c
[] = {{12,{0,0}},{12,{0,0}},{10,{0,0}},{10,{0,0}},{8,{1,0}},{7,{0,0}},{7,{0,0}},{5,{0,0}},{5,{0,0}},{3,{0,0}},{3,{0,0}},{1,{0,0}},{1,{0,0}}};
692 static const shapeTest_glyph thaana_g
[] = {
693 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
694 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
695 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
696 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
697 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
698 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
699 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
700 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
701 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
702 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
703 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
704 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
705 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
708 static const WCHAR test_phagspa
[] = {0xa84f, 0xa861, 0xa843, 0x0020, 0xa863, 0xa861, 0xa859, 0x0020, 0xa850, 0xa85c, 0xa85e};
709 static const shapeTest_char phagspa_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{3,{1,0}},{4,{0,0}},{5,{0,0}},{6,{0,0}},{7,{1,0}},{8,{0,0}},{9,{0,0}},{10,{0,0}}};
710 static const shapeTest_glyph phagspa_g
[] = {
711 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
712 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
713 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
714 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
715 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
716 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
717 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
718 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
719 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
720 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
721 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
724 static const WCHAR test_lao
[] = {0x0ead, 0x0eb1, 0x0e81, 0x0eaa, 0x0ead, 0x0e99, 0x0ea5, 0x0eb2, 0x0ea7, 0};
725 static const shapeTest_char lao_c
[] = {{0,{0,0}},{0,{0,0}},{2,{0,0}},{3,{0,0}},{4,{0,0}},{5,{0,0}},{6,{0,0}},{7,{0,0}},{8,{0,0}}};
726 static const shapeTest_glyph lao_g
[] = {
727 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
728 {1,{{SCRIPT_JUSTIFY_CHARACTER
,0,1,1,0,0},0}},
729 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
730 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
731 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
732 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
733 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
734 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
735 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
738 static const WCHAR test_tibetan
[] = {0x0f04, 0x0f05, 0x0f0e, 0x0020, 0x0f51, 0x0f7c, 0x0f53, 0x0f0b, 0x0f5a, 0x0f53, 0x0f0b, 0x0f51, 0x0f44, 0x0f0b, 0x0f54, 0x0f7c, 0x0f0d};
739 static const shapeTest_char tibetan_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{3,{1,0}},{4,{0,0}},{4,{0,0}},{6,{0,0}},{7,{0,0}},{8,{0,0}},{9,{0,0}},{10,{0,0}},{11,{0,0}},{12,{0,0}},{13,{0,0}},{14,{0,0}},{14,{0,0}},{16,{0,0}}};
740 static const shapeTest_glyph tibetan_g
[] = {
741 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
742 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
743 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
744 {1,{{SCRIPT_JUSTIFY_BLANK
,1,0,0,0,0},0}},
745 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
746 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
747 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
748 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
749 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
750 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
751 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
752 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
753 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
754 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
755 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
756 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
757 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
760 static const WCHAR test_devanagari
[] = {0x0926, 0x0947, 0x0935, 0x0928, 0x093e, 0x0917, 0x0930, 0x0940};
761 static const shapeTest_char devanagari_c
[] = {{0,{0,0}},{0,{0,0}},{2,{0,0}},{3,{0,0}},{3,{0,0}},{5,{0,0}},{6,{0,0}},{6,{0,0}}};
762 static const shapeTest_glyph devanagari_g
[] = {
763 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
764 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
765 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
766 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
767 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
768 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
769 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
770 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
773 static const WCHAR test_bengali
[] = {0x09ac, 0x09be, 0x0982, 0x09b2, 0x09be};
774 static const shapeTest_char bengali_c
[] = {{0,{0,0}},{0,{0,0}},{0,{0,0}},{3,{0,0}},{3,{0,0}}};
775 static const shapeTest_glyph bengali_g
[] = {
776 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
777 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
778 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
779 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
780 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
783 static const WCHAR test_gurmukhi
[] = {0x0a17, 0x0a41, 0x0a30, 0x0a2e, 0x0a41, 0x0a16, 0x0a40};
784 static const shapeTest_char gurmukhi_c
[] = {{0,{0,0}},{0,{0,0}},{2,{0,0}},{3,{0,0}},{3,{0,0}},{5,{0,0}},{5,{0,0}}};
785 static const shapeTest_glyph gurmukhi_g
[] = {
786 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
787 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
788 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
789 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
790 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
791 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
792 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
795 static const WCHAR test_gujarati
[] = {0x0a97, 0x0ac1, 0x0a9c, 0x0ab0, 0x0abe, 0x0aa4, 0x0ac0};
796 static const shapeTest_char gujarati_c
[] = {{0,{0,0}},{0,{0,0}},{2,{0,0}},{3,{0,0}},{3,{0,0}},{5,{0,0}},{5,{0,0}}};
797 static const shapeTest_glyph gujarati_g
[] = {
798 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
799 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
800 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
801 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
802 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
803 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
804 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
807 static const WCHAR test_oriya
[] = {0x0b13, 0x0b21, 0x0b3c, 0x0b3f, 0x0b06};
808 static const shapeTest_char oriya_c
[] = {{0,{0,0}},{1,{0,0}},{1,{0,0}},{1,{0,0}},{3,{0,0}}};
809 static const shapeTest_glyph oriya_g
[] = {
810 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
811 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
812 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
813 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
816 static const WCHAR test_tamil
[] = {0x0ba4, 0x0bae, 0x0bbf, 0x0bb4, 0x0bcd};
817 static const shapeTest_char tamil_c
[] = {{0,{0,0}},{1,{0,0}},{1,{0,0}},{3,{0,0}},{3,{0,0}}};
818 static const shapeTest_glyph tamil_g
[] = {
819 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
820 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
821 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
822 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
825 static const WCHAR test_telugu
[] = {0x0c24, 0x0c46, 0x0c32, 0x0c41, 0x0c17, 0x0c41};
826 static const shapeTest_char telugu_c
[] = {{0,{0,0}},{0,{0,0}},{2,{0,0}},{2,{0,0}},{4,{0,0}},{4,{0,0}}};
827 static const shapeTest_glyph telugu_g
[] = {
828 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
829 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
830 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
831 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
832 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
833 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
836 static const WCHAR test_malayalam
[] = {0x0d2e, 0x0d32, 0x0d2f, 0x0d3e, 0x0d33, 0x0d02};
837 static const shapeTest_char malayalam_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{2,{0,0}},{4,{0,0}},{4,{0,0}}};
838 static const shapeTest_glyph malayalam_g
[] = {
839 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
840 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
841 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
842 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
843 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
844 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
847 static const WCHAR test_kannada
[] = {0x0c95, 0x0ca8, 0x0ccd, 0x0ca8, 0x0ca1};
848 static const shapeTest_char kannada_c
[] = {{0,{0,0}},{1,{0,0}},{1,{0,0}},{1,{0,0}},{3,{0,0}}};
849 static const shapeTest_glyph kannada_g
[] = {
850 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
851 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
852 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
853 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
854 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
856 if (!pScriptItemizeOpenType
|| !pScriptShapeOpenType
)
858 win_skip("ScriptShapeOpenType not available on this platform\n");
862 memset(&Control
, 0 , sizeof(Control
));
863 memset(&State
, 0 , sizeof(State
));
865 hr
= pScriptItemizeOpenType(test1
, 4, 2, &Control
, &State
, items
, tags
, &outnItems
);
866 ok(!hr
, "ScriptItemizeOpenType should return S_OK not %08x\n", hr
);
867 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
869 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, NULL
, &nb
);
870 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_INVALIDARG not %08x\n", hr
);
872 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, glyphProp
, NULL
);
873 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_INVALIDARG not %08x\n", hr
);
875 hr
= pScriptShapeOpenType(NULL
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, glyphProp
, &nb
);
876 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_PENDING not %08x\n", hr
);
878 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, glyphProp
, &nb
);
879 ok( hr
== E_INVALIDARG
,
880 "ScriptShapeOpenType should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
881 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, logclust
, NULL
, glyphs
, glyphProp
, &nb
);
882 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_INVALIDARG not %08x\n", hr
);
884 ScriptFreeCache(&sc
);
886 test_shape_ok(hdc
, test1
, 4, &Control
, &State
, 0, 4, t1_c
, t1_g
);
887 test_shape_ok(hdc
, test2
, 4, &Control
, &State
, 1, 4, t2_c
, t2_g
);
889 test_valid
= find_font_for_range(hdc
, "Microsoft Sans Serif", 11, test_hebrew
[0], &hfont
, &hfont_orig
);
892 test_shape_ok_valid(test_valid
, hdc
, test_hebrew
, 4, &Control
, &State
, 0, 4, hebrew_c
, hebrew_g
);
893 SelectObject(hdc
, hfont_orig
);
897 test_valid
= find_font_for_range(hdc
, "Microsoft Sans Serif", 13, test_arabic
[0], &hfont
, &hfont_orig
);
900 test_shape_ok_valid(test_valid
, hdc
, test_arabic
, 4, &Control
, &State
, 0, 3, arabic_c
, arabic_g
);
901 SelectObject(hdc
, hfont_orig
);
905 test_valid
= find_font_for_range(hdc
, "Microsoft Sans Serif", 24, test_thai
[0], &hfont
, &hfont_orig
);
908 test_shape_ok_valid(test_valid
, hdc
, test_thai
, 10, &Control
, &State
, 0, 10, thai_c
, thai_g
);
909 SelectObject(hdc
, hfont_orig
);
913 test_valid
= find_font_for_range(hdc
, "Estrangelo Edessa", 71, test_syriac
[0], &hfont
, &hfont_orig
);
916 test_shape_ok_valid(test_valid
, hdc
, test_syriac
, 6, &Control
, &State
, 0, 6, syriac_c
, syriac_g
);
917 SelectObject(hdc
, hfont_orig
);
921 test_valid
= find_font_for_range(hdc
, "MV Boli", 72, test_thaana
[0], &hfont
, &hfont_orig
);
924 test_shape_ok_valid(test_valid
, hdc
, test_thaana
, 13, &Control
, &State
, 0, 13, thaana_c
, thaana_g
);
925 SelectObject(hdc
, hfont_orig
);
929 test_valid
= find_font_for_range(hdc
, "Microsoft PhagsPa", 53, test_phagspa
[0], &hfont
, &hfont_orig
);
932 test_shape_ok_valid(test_valid
, hdc
, test_phagspa
, 11, &Control
, &State
, 0, 11, phagspa_c
, phagspa_g
);
933 SelectObject(hdc
, hfont_orig
);
937 test_valid
= find_font_for_range(hdc
, "DokChampa", 25, test_lao
[0], &hfont
, &hfont_orig
);
940 test_shape_ok_valid(test_valid
, hdc
, test_lao
, 9, &Control
, &State
, 0, 9, lao_c
, lao_g
);
941 SelectObject(hdc
, hfont_orig
);
945 test_valid
= find_font_for_range(hdc
, "Microsoft Himalaya", 70, test_tibetan
[0], &hfont
, &hfont_orig
);
948 test_shape_ok_valid(test_valid
, hdc
, test_tibetan
, 17, &Control
, &State
, 0, 17, tibetan_c
, tibetan_g
);
949 SelectObject(hdc
, hfont_orig
);
953 test_valid
= find_font_for_range(hdc
, "Mangal", 15, test_devanagari
[0], &hfont
, &hfont_orig
);
956 test_shape_ok_valid(test_valid
, hdc
, test_devanagari
, 8, &Control
, &State
, 0, 8, devanagari_c
, devanagari_g
);
957 SelectObject(hdc
, hfont_orig
);
961 test_valid
= find_font_for_range(hdc
, "Vrinda", 16, test_bengali
[0], &hfont
, &hfont_orig
);
964 test_shape_ok_valid(test_valid
, hdc
, test_bengali
, 5, &Control
, &State
, 0, 5, bengali_c
, bengali_g
);
965 SelectObject(hdc
, hfont_orig
);
969 test_valid
= find_font_for_range(hdc
, "Raavi", 17, test_gurmukhi
[0], &hfont
, &hfont_orig
);
972 test_shape_ok_valid(test_valid
, hdc
, test_gurmukhi
, 7, &Control
, &State
, 0, 7, gurmukhi_c
, gurmukhi_g
);
973 SelectObject(hdc
, hfont_orig
);
977 test_valid
= find_font_for_range(hdc
, "Shruti", 18, test_gujarati
[0], &hfont
, &hfont_orig
);
980 test_shape_ok_valid(test_valid
, hdc
, test_gujarati
, 7, &Control
, &State
, 0, 7, gujarati_c
, gujarati_g
);
981 SelectObject(hdc
, hfont_orig
);
985 test_valid
= find_font_for_range(hdc
, "Kalinga", 19, test_oriya
[0], &hfont
, &hfont_orig
);
988 test_shape_ok_valid(test_valid
, hdc
, test_oriya
, 5, &Control
, &State
, 0, 4, oriya_c
, oriya_g
);
989 SelectObject(hdc
, hfont_orig
);
993 test_valid
= find_font_for_range(hdc
, "Latha", 20, test_tamil
[0], &hfont
, &hfont_orig
);
996 test_shape_ok_valid(test_valid
, hdc
, test_tamil
, 5, &Control
, &State
, 0, 4, tamil_c
, tamil_g
);
997 SelectObject(hdc
, hfont_orig
);
1001 test_valid
= find_font_for_range(hdc
, "Gautami", 21, test_telugu
[0], &hfont
, &hfont_orig
);
1004 test_shape_ok_valid(test_valid
, hdc
, test_telugu
, 6, &Control
, &State
, 0, 6, telugu_c
, telugu_g
);
1005 SelectObject(hdc
, hfont_orig
);
1006 DeleteObject(hfont
);
1009 test_valid
= find_font_for_range(hdc
, "Kartika", 23, test_malayalam
[0], &hfont
, &hfont_orig
);
1012 test_shape_ok_valid(test_valid
, hdc
, test_malayalam
, 6, &Control
, &State
, 0, 6, malayalam_c
, malayalam_g
);
1013 SelectObject(hdc
, hfont_orig
);
1014 DeleteObject(hfont
);
1017 test_valid
= find_font_for_range(hdc
, "Tunga", 22, test_kannada
[0], &hfont
, &hfont_orig
);
1020 test_shape_ok_valid(test_valid
, hdc
, test_kannada
, 5, &Control
, &State
, 0, 4, kannada_c
, kannada_g
);
1021 SelectObject(hdc
, hfont_orig
);
1022 DeleteObject(hfont
);
1026 static void test_ScriptShape(HDC hdc
)
1028 static const WCHAR test1
[] = {'w', 'i', 'n', 'e',0};
1029 static const WCHAR test2
[] = {0x202B, 'i', 'n', 0x202C,0};
1031 SCRIPT_CACHE sc
= NULL
;
1032 WORD glyphs
[4], glyphs2
[4], logclust
[4];
1033 SCRIPT_VISATTR attrs
[4];
1034 SCRIPT_ITEM items
[2];
1037 hr
= ScriptItemize(test1
, 4, 2, NULL
, NULL
, items
, NULL
);
1038 ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
1039 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1041 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, NULL
, &nb
);
1042 ok(hr
== E_INVALIDARG
, "ScriptShape should return E_INVALIDARG not %08x\n", hr
);
1044 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, attrs
, NULL
);
1045 ok(hr
== E_INVALIDARG
, "ScriptShape should return E_INVALIDARG not %08x\n", hr
);
1047 hr
= ScriptShape(NULL
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, attrs
, &nb
);
1048 ok(hr
== E_PENDING
, "ScriptShape should return E_PENDING not %08x\n", hr
);
1050 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, attrs
, &nb
);
1051 ok(broken(hr
== S_OK
) ||
1052 hr
== E_INVALIDARG
|| /* Vista, W2K8 */
1053 hr
== E_FAIL
, /* WIN7 */
1054 "ScriptShape should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
1055 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1057 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, logclust
, attrs
, &nb
);
1058 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1059 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1062 memset(glyphs
,-1,sizeof(glyphs
));
1063 memset(logclust
,-1,sizeof(logclust
));
1064 memset(attrs
,-1,sizeof(attrs
));
1065 hr
= ScriptShape(NULL
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, logclust
, attrs
, &nb
);
1066 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1067 ok(nb
== 4, "Wrong number of items\n");
1068 ok(logclust
[0] == 0, "clusters out of order\n");
1069 ok(logclust
[1] == 1, "clusters out of order\n");
1070 ok(logclust
[2] == 2, "clusters out of order\n");
1071 ok(logclust
[3] == 3, "clusters out of order\n");
1072 ok(attrs
[0].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1073 ok(attrs
[1].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1074 ok(attrs
[2].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1075 ok(attrs
[3].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1076 ok(attrs
[0].fClusterStart
== 1, "fClusterStart incorrect\n");
1077 ok(attrs
[1].fClusterStart
== 1, "fClusterStart incorrect\n");
1078 ok(attrs
[2].fClusterStart
== 1, "fClusterStart incorrect\n");
1079 ok(attrs
[3].fClusterStart
== 1, "fClusterStart incorrect\n");
1080 ok(attrs
[0].fDiacritic
== 0, "fDiacritic incorrect\n");
1081 ok(attrs
[1].fDiacritic
== 0, "fDiacritic incorrect\n");
1082 ok(attrs
[2].fDiacritic
== 0, "fDiacritic incorrect\n");
1083 ok(attrs
[3].fDiacritic
== 0, "fDiacritic incorrect\n");
1084 ok(attrs
[0].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1085 ok(attrs
[1].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1086 ok(attrs
[2].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1087 ok(attrs
[3].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1089 ScriptFreeCache(&sc
);
1092 memset(glyphs2
,-1,sizeof(glyphs2
));
1093 memset(logclust
,-1,sizeof(logclust
));
1094 memset(attrs
,-1,sizeof(attrs
));
1095 hr
= ScriptShape(hdc
, &sc
, test2
, 4, 4, &items
[0].a
, glyphs2
, logclust
, attrs
, &nb
);
1096 ok(hr
== S_OK
, "ScriptShape should return S_OK not %08x\n", hr
);
1097 ok(nb
== 4, "Wrong number of items\n");
1098 ok(glyphs2
[0] == 0 || broken(glyphs2
[0] == 0x80), "Incorrect glyph for 0x202B\n");
1099 ok(glyphs2
[3] == 0 || broken(glyphs2
[3] == 0x80), "Incorrect glyph for 0x202C\n");
1100 ok(logclust
[0] == 0, "clusters out of order\n");
1101 ok(logclust
[1] == 1, "clusters out of order\n");
1102 ok(logclust
[2] == 2, "clusters out of order\n");
1103 ok(logclust
[3] == 3, "clusters out of order\n");
1104 ok(attrs
[0].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1105 ok(attrs
[1].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1106 ok(attrs
[2].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1107 ok(attrs
[3].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1108 ok(attrs
[0].fClusterStart
== 1, "fClusterStart incorrect\n");
1109 ok(attrs
[1].fClusterStart
== 1, "fClusterStart incorrect\n");
1110 ok(attrs
[2].fClusterStart
== 1, "fClusterStart incorrect\n");
1111 ok(attrs
[3].fClusterStart
== 1, "fClusterStart incorrect\n");
1112 ok(attrs
[0].fDiacritic
== 0, "fDiacritic incorrect\n");
1113 ok(attrs
[1].fDiacritic
== 0, "fDiacritic incorrect\n");
1114 ok(attrs
[2].fDiacritic
== 0, "fDiacritic incorrect\n");
1115 ok(attrs
[3].fDiacritic
== 0, "fDiacritic incorrect\n");
1116 ok(attrs
[0].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1117 ok(attrs
[1].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1118 ok(attrs
[2].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1119 ok(attrs
[3].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1121 /* modify LTR to RTL */
1122 items
[0].a
.fRTL
= 1;
1123 memset(glyphs2
,-1,sizeof(glyphs2
));
1124 memset(logclust
,-1,sizeof(logclust
));
1125 memset(attrs
,-1,sizeof(attrs
));
1126 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs2
, logclust
, attrs
, &nb
);
1127 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1128 ok(nb
== 4, "Wrong number of items\n");
1129 ok(glyphs2
[0] == glyphs
[3], "Glyphs not reordered properly\n");
1130 ok(glyphs2
[1] == glyphs
[2], "Glyphs not reordered properly\n");
1131 ok(glyphs2
[2] == glyphs
[1], "Glyphs not reordered properly\n");
1132 ok(glyphs2
[3] == glyphs
[0], "Glyphs not reordered properly\n");
1133 ok(logclust
[0] == 3, "clusters out of order\n");
1134 ok(logclust
[1] == 2, "clusters out of order\n");
1135 ok(logclust
[2] == 1, "clusters out of order\n");
1136 ok(logclust
[3] == 0, "clusters out of order\n");
1137 ok(attrs
[0].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1138 ok(attrs
[1].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1139 ok(attrs
[2].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1140 ok(attrs
[3].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1141 ok(attrs
[0].fClusterStart
== 1, "fClusterStart incorrect\n");
1142 ok(attrs
[1].fClusterStart
== 1, "fClusterStart incorrect\n");
1143 ok(attrs
[2].fClusterStart
== 1, "fClusterStart incorrect\n");
1144 ok(attrs
[3].fClusterStart
== 1, "fClusterStart incorrect\n");
1145 ok(attrs
[0].fDiacritic
== 0, "fDiacritic incorrect\n");
1146 ok(attrs
[1].fDiacritic
== 0, "fDiacritic incorrect\n");
1147 ok(attrs
[2].fDiacritic
== 0, "fDiacritic incorrect\n");
1148 ok(attrs
[3].fDiacritic
== 0, "fDiacritic incorrect\n");
1149 ok(attrs
[0].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1150 ok(attrs
[1].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1151 ok(attrs
[2].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1152 ok(attrs
[3].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1154 ScriptFreeCache(&sc
);
1157 static void test_ScriptPlace(HDC hdc
)
1159 static const WCHAR test1
[] = {'t', 'e', 's', 't',0};
1162 SCRIPT_CACHE sc
= NULL
;
1163 WORD glyphs
[4], logclust
[4];
1164 SCRIPT_VISATTR attrs
[4];
1165 SCRIPT_ITEM items
[2];
1170 hr
= ScriptItemize(test1
, 4, 2, NULL
, NULL
, items
, NULL
);
1171 ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
1172 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1174 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, logclust
, attrs
, &nb
);
1175 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1176 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1178 hr
= ScriptPlace(hdc
, &sc
, glyphs
, 4, NULL
, &items
[0].a
, widths
, NULL
, NULL
);
1179 ok(hr
== E_INVALIDARG
, "ScriptPlace should return E_INVALIDARG not %08x\n", hr
);
1181 hr
= ScriptPlace(NULL
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, NULL
, NULL
);
1182 ok(broken(hr
== E_PENDING
) ||
1183 hr
== E_INVALIDARG
|| /* Vista, W2K8 */
1184 hr
== E_FAIL
, /* WIN7 */
1185 "ScriptPlace should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
1187 hr
= ScriptPlace(NULL
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, offset
, NULL
);
1188 ok(hr
== E_PENDING
, "ScriptPlace should return E_PENDING not %08x\n", hr
);
1190 hr
= ScriptPlace(NULL
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, NULL
, abc
);
1191 ok(broken(hr
== E_PENDING
) ||
1192 hr
== E_INVALIDARG
|| /* Vista, W2K8 */
1193 hr
== E_FAIL
, /* WIN7 */
1194 "ScriptPlace should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
1196 hr
= ScriptPlace(hdc
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, offset
, NULL
);
1197 ok(!hr
, "ScriptPlace should return S_OK not %08x\n", hr
);
1198 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1200 ret
= ExtTextOutW(hdc
, 1, 1, 0, NULL
, glyphs
, 4, widths
);
1201 ok(ret
, "ExtTextOutW should return TRUE\n");
1203 ScriptFreeCache(&sc
);
1206 static void test_ScriptItemIzeShapePlace(HDC hdc
, unsigned short pwOutGlyphs
[256])
1210 const SCRIPT_PROPERTIES
**ppSp
;
1214 SCRIPT_ITEM pItem
[255];
1216 WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1217 WCHAR TestItem2
[] = {'T', 'e', 's', 't', 'b', 0};
1218 WCHAR TestItem3
[] = {'T', 'e', 's', 't', 'c',' ','1','2','3',' ',' ','e','n','d',0};
1219 WCHAR TestItem4
[] = {'T', 'e', 's', 't', 'd',' ',0x0684,0x0694,0x06a4,' ',' ','\r','\n','e','n','d',0};
1220 WCHAR TestItem5
[] = {0x0684,'T','e','s','t','e',' ',0x0684,0x0694,0x06a4,' ',' ','e','n','d',0};
1221 WCHAR TestItem6
[] = {'T', 'e', 's', 't', 'f',' ',' ',' ','\r','\n','e','n','d',0};
1226 unsigned short pwOutGlyphs1
[256];
1227 unsigned short pwOutGlyphs2
[256];
1228 unsigned short pwLogClust
[256];
1229 SCRIPT_VISATTR psva
[256];
1232 GOFFSET pGoffset
[256];
1236 /* Start testing usp10 functions */
1237 /* This test determines that the pointer returned by ScriptGetProperties is valid
1238 * by checking a known value in the table */
1239 hr
= ScriptGetProperties(&ppSp
, &iMaxProps
);
1240 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
1241 trace("number of script properties %d\n", iMaxProps
);
1242 ok (iMaxProps
> 0, "Number of scripts returned should not be 0\n");
1244 ok( ppSp
[0]->langid
== 0, "Langid[0] not = to 0\n"); /* Check a known value to ensure */
1247 /* This is a valid test that will cause parsing to take place */
1250 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1251 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1252 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1254 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1256 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1257 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1258 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1260 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1261 * ie. ScriptItemize has succeeded and that pItem has been set */
1264 psc
= NULL
; /* must be null on first call */
1266 cMaxGlyphs
= cInChars
;
1267 hr
= ScriptShape(NULL
, &psc
, TestItem1
, cChars
,
1268 cMaxGlyphs
, &pItem
[0].a
,
1269 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1270 ok (hr
== E_PENDING
, "If psc is NULL (%08x) the E_PENDING should be returned\n", hr
);
1272 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1273 cMaxGlyphs
, &pItem
[0].a
,
1274 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1275 ok (hr
== E_OUTOFMEMORY
, "If not enough output area cChars (%d) is > than CMaxGlyphs "
1276 "(%d) but not E_OUTOFMEMORY\n",
1277 cChars
, cMaxGlyphs
);
1279 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1280 cMaxGlyphs
, &pItem
[0].a
,
1281 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1282 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1283 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1284 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1286 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1288 ok (hr
== 0, "ScriptPlace should return 0 not (%08x)\n", hr
);
1289 hr
= ScriptPlace(NULL
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1291 ok (hr
== 0, "ScriptPlace should return 0 not (%08x)\n", hr
);
1292 for (cnt
=0; cnt
< pcGlyphs
; cnt
++)
1293 pwOutGlyphs
[cnt
] = pwOutGlyphs1
[cnt
]; /* Send to next function */
1296 /* This test will check to make sure that SCRIPT_CACHE is reused and that not translation *
1297 * takes place if fNoGlyphIndex is set. */
1301 hr
= ScriptItemize(TestItem2
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1302 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1303 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1305 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1306 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1307 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1308 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue */
1312 pItem
[0].a
.fNoGlyphIndex
= 1; /* say no translate */
1313 hr
= ScriptShape(NULL
, &psc
, TestItem2
, cChars
,
1314 cMaxGlyphs
, &pItem
[0].a
,
1315 pwOutGlyphs2
, pwLogClust
, psva
, &pcGlyphs
);
1316 ok (hr
!= E_PENDING
, "If psc should not be NULL (%08x) and the E_PENDING should be returned\n", hr
);
1317 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1318 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1319 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1320 for (cnt
=0; cnt
< cChars
&& TestItem2
[cnt
] == pwOutGlyphs2
[cnt
]; cnt
++) {}
1321 ok (cnt
== cChars
, "Translation to place when told not to. WCHAR %d - %04x != %04x\n",
1322 cnt
, TestItem2
[cnt
], pwOutGlyphs2
[cnt
]);
1324 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs2
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1326 ok (hr
== 0, "ScriptPlace should return 0 not (%08x)\n", hr
);
1329 ScriptFreeCache( &psc
);
1330 ok (!psc
, "psc is not null after ScriptFreeCache\n");
1334 /* This is a valid test that will cause parsing to take place and create 3 script_items */
1335 cInChars
= (sizeof(TestItem3
)/2)-1;
1337 hr
= ScriptItemize(TestItem3
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1338 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1341 ok (pcItems
== 3, "The number of SCRIPT_ITEMS should be 3 not %d\n", pcItems
);
1344 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== 6,
1345 "Start pos [0] not = 0 (%d) or end pos [1] not = %d\n",
1346 pItem
[0].iCharPos
, pItem
[1].iCharPos
);
1347 ok (pItem
[1].iCharPos
== 6 && pItem
[2].iCharPos
== 11,
1348 "Start pos [1] not = 6 (%d) or end pos [2] not = 11 (%d)\n",
1349 pItem
[1].iCharPos
, pItem
[2].iCharPos
);
1350 ok (pItem
[2].iCharPos
== 11 && pItem
[3].iCharPos
== cInChars
,
1351 "Start pos [2] not = 11 (%d) or end [3] pos not = 14 (%d), cInChars = %d\n",
1352 pItem
[2].iCharPos
, pItem
[3].iCharPos
, cInChars
);
1356 /* This is a valid test that will cause parsing to take place and create 5 script_items */
1357 cInChars
= (sizeof(TestItem4
)/2)-1;
1359 hr
= ScriptItemize(TestItem4
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1360 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1363 ok (pcItems
== 5, "The number of SCRIPT_ITEMS should be 5 not %d\n", pcItems
);
1366 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== 6,
1367 "Start pos [0] not = 0 (%d) or end pos [1] not = %d\n",
1368 pItem
[0].iCharPos
, pItem
[1].iCharPos
);
1369 ok (pItem
[0].a
.s
.uBidiLevel
== 0, "Should have been bidi=0 not %d\n",
1370 pItem
[0].a
.s
.uBidiLevel
);
1371 ok (pItem
[1].iCharPos
== 6 && pItem
[2].iCharPos
== 11,
1372 "Start pos [1] not = 6 (%d) or end pos [2] not = 11 (%d)\n",
1373 pItem
[1].iCharPos
, pItem
[2].iCharPos
);
1374 ok (pItem
[1].a
.s
.uBidiLevel
== 1, "Should have been bidi=1 not %d\n",
1375 pItem
[1].a
.s
.uBidiLevel
);
1376 ok (pItem
[2].iCharPos
== 11 && pItem
[3].iCharPos
== 12,
1377 "Start pos [2] not = 11 (%d) or end [3] pos not = 12 (%d)\n",
1378 pItem
[2].iCharPos
, pItem
[3].iCharPos
);
1379 ok (pItem
[2].a
.s
.uBidiLevel
== 0, "Should have been bidi=0 not %d\n",
1380 pItem
[2].a
.s
.uBidiLevel
);
1381 ok (pItem
[3].iCharPos
== 12 && pItem
[4].iCharPos
== 13,
1382 "Start pos [3] not = 12 (%d) or end [4] pos not = 13 (%d)\n",
1383 pItem
[3].iCharPos
, pItem
[4].iCharPos
);
1384 ok (pItem
[3].a
.s
.uBidiLevel
== 0, "Should have been bidi=0 not %d\n",
1385 pItem
[3].a
.s
.uBidiLevel
);
1386 ok (pItem
[4].iCharPos
== 13 && pItem
[5].iCharPos
== cInChars
,
1387 "Start pos [4] not = 13 (%d) or end [5] pos not = 16 (%d), cInChars = %d\n",
1388 pItem
[4].iCharPos
, pItem
[5].iCharPos
, cInChars
);
1393 * This test is for when the first unicode character requires bidi support
1395 cInChars
= (sizeof(TestItem5
)-1)/sizeof(WCHAR
);
1396 hr
= ScriptItemize(TestItem5
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1397 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1398 ok (pcItems
== 4, "There should have been 4 items, found %d\n", pcItems
);
1399 ok (pItem
[0].a
.s
.uBidiLevel
== 1, "The first character should have been bidi=1 not %d\n",
1400 pItem
[0].a
.s
.uBidiLevel
);
1402 /* This test checks to make sure that the test to see if there are sufficient buffers to store *
1403 * the pointer to the last char works. Note that windows often needs a greater number of *
1404 * SCRIPT_ITEMS to process a string than is returned in pcItems. */
1405 cInChars
= (sizeof(TestItem6
)/2)-1;
1407 hr
= ScriptItemize(TestItem6
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1408 ok (hr
== E_OUTOFMEMORY
, "ScriptItemize should return E_OUTOFMEMORY, returned %08x\n", hr
);
1412 static void test_ScriptGetCMap(HDC hdc
, unsigned short pwOutGlyphs
[256])
1415 SCRIPT_CACHE psc
= NULL
;
1418 unsigned short pwOutGlyphs2
[256];
1419 unsigned short pwOutGlyphs3
[256];
1423 static const WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1424 static const WCHAR TestItem2
[] = {0x202B, 'i', 'n', 0x202C,0};
1425 static const WCHAR TestItem3
[] = {'a','b','c','d','(','<','{','[',0x2039,0};
1426 static const WCHAR TestItem3b
[] = {'a','b','c','d',')','>','}',']',0x203A,0};
1428 /* Check to make sure that SCRIPT_CACHE gets allocated ok */
1430 cInChars
= cChars
= 5;
1431 /* Some sanity checks for ScriptGetCMap */
1433 hr
= ScriptGetCMap(NULL
, NULL
, NULL
, 0, 0, NULL
);
1434 ok( hr
== E_INVALIDARG
, "(NULL,NULL,NULL,0,0,NULL), "
1435 "expected E_INVALIDARG, got %08x\n", hr
);
1437 hr
= ScriptGetCMap(NULL
, NULL
, TestItem1
, cInChars
, dwFlags
, pwOutGlyphs3
);
1438 ok( hr
== E_INVALIDARG
, "(NULL,NULL,TestItem1, cInChars, dwFlags, pwOutGlyphs3), "
1439 "expected E_INVALIDARG, got %08x\n", hr
);
1441 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1443 hr
= ScriptGetCMap(NULL
, &psc
, TestItem1
, cInChars
, 0, pwOutGlyphs3
);
1444 ok( hr
== E_PENDING
, "(NULL,&psc,NULL,0,0,NULL), expected E_PENDING, "
1446 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1448 /* Set psc to NULL but add hdc, to be able to check if a pointer is returned in psc */
1450 hr
= ScriptGetCMap(hdc
, &psc
, TestItem1
, cInChars
, 0, pwOutGlyphs3
);
1451 ok( hr
== S_OK
, "ScriptGetCMap(NULL,&psc,NULL,0,0,NULL), expected S_OK, "
1453 ok( psc
!= NULL
, "ScritpGetCMap expected psc to be not NULL\n");
1454 ScriptFreeCache( &psc
);
1456 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1458 hr
= ScriptGetCMap(NULL
, &psc
, TestItem1
, cInChars
, dwFlags
, pwOutGlyphs3
);
1459 ok( hr
== E_PENDING
, "(NULL,&psc,), expected E_PENDING, got %08x\n", hr
);
1460 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1461 /* Check to see if the results are the same as those returned by ScriptShape */
1462 hr
= ScriptGetCMap(hdc
, &psc
, TestItem1
, cInChars
, dwFlags
, pwOutGlyphs3
);
1463 ok (hr
== 0, "ScriptGetCMap should return 0 not (%08x)\n", hr
);
1464 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1465 for (cnt
=0; cnt
< cChars
&& pwOutGlyphs
[cnt
] == pwOutGlyphs3
[cnt
]; cnt
++) {}
1466 ok (cnt
== cInChars
, "Translation not correct. WCHAR %d - %04x != %04x\n",
1467 cnt
, pwOutGlyphs
[cnt
], pwOutGlyphs3
[cnt
]);
1469 ScriptFreeCache( &psc
);
1470 ok (!psc
, "psc is not null after ScriptFreeCache\n");
1472 cInChars
= cChars
= 4;
1473 hr
= ScriptGetCMap(hdc
, &psc
, TestItem2
, cInChars
, dwFlags
, pwOutGlyphs3
);
1474 ok (hr
== S_FALSE
, "ScriptGetCMap should return S_FALSE not (%08x)\n", hr
);
1475 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1476 ok(pwOutGlyphs3
[0] == 0 || broken(pwOutGlyphs3
[0] == 0x80), "Glyph 0 should be default glyph\n");
1477 ok(pwOutGlyphs3
[3] == 0 || broken(pwOutGlyphs3
[0] == 0x80), "Glyph 0 should be default glyph\n");
1480 cInChars
= cChars
= 9;
1481 hr
= ScriptGetCMap(hdc
, &psc
, TestItem3b
, cInChars
, dwFlags
, pwOutGlyphs2
);
1482 ok (hr
== S_OK
, "ScriptGetCMap should return S_OK not (%08x)\n", hr
);
1483 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1485 cInChars
= cChars
= 9;
1487 hr
= ScriptGetCMap(hdc
, &psc
, TestItem3
, cInChars
, dwFlags
, pwOutGlyphs3
);
1488 ok (hr
== S_OK
, "ScriptGetCMap should return S_OK not (%08x)\n", hr
);
1489 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1490 ok(pwOutGlyphs3
[0] == pwOutGlyphs2
[0], "glyph incorrectly altered\n");
1491 ok(pwOutGlyphs3
[1] == pwOutGlyphs2
[1], "glyph incorreclty altered\n");
1492 ok(pwOutGlyphs3
[2] == pwOutGlyphs2
[2], "glyph incorreclty altered\n");
1493 ok(pwOutGlyphs3
[3] == pwOutGlyphs2
[3], "glyph incorreclty altered\n");
1494 ok(pwOutGlyphs3
[4] == pwOutGlyphs2
[4], "glyph not mirrored correctly\n");
1495 ok(pwOutGlyphs3
[5] == pwOutGlyphs2
[5], "glyph not mirrored correctly\n");
1496 ok(pwOutGlyphs3
[6] == pwOutGlyphs2
[6], "glyph not mirrored correctly\n");
1497 ok(pwOutGlyphs3
[7] == pwOutGlyphs2
[7], "glyph not mirrored correctly\n");
1498 ok(pwOutGlyphs3
[8] == pwOutGlyphs2
[8], "glyph not mirrored correctly\n");
1500 ScriptFreeCache( &psc
);
1501 ok (!psc
, "psc is not null after ScriptFreeCache\n");
1504 static void test_ScriptGetFontProperties(HDC hdc
)
1507 SCRIPT_CACHE psc
,old_psc
;
1508 SCRIPT_FONTPROPERTIES sfp
;
1510 /* Some sanity checks for ScriptGetFontProperties */
1512 hr
= ScriptGetFontProperties(NULL
,NULL
,NULL
);
1513 ok( hr
== E_INVALIDARG
, "(NULL,NULL,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1515 hr
= ScriptGetFontProperties(NULL
,NULL
,&sfp
);
1516 ok( hr
== E_INVALIDARG
, "(NULL,NULL,&sfp), expected E_INVALIDARG, got %08x\n", hr
);
1518 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1520 hr
= ScriptGetFontProperties(NULL
,&psc
,NULL
);
1521 ok( hr
== E_INVALIDARG
, "(NULL,&psc,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1522 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1524 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1526 hr
= ScriptGetFontProperties(NULL
,&psc
,&sfp
);
1527 ok( hr
== E_PENDING
, "(NULL,&psc,&sfp), expected E_PENDING, got %08x\n", hr
);
1528 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1530 hr
= ScriptGetFontProperties(hdc
,NULL
,NULL
);
1531 ok( hr
== E_INVALIDARG
, "(hdc,NULL,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1533 hr
= ScriptGetFontProperties(hdc
,NULL
,&sfp
);
1534 ok( hr
== E_INVALIDARG
, "(hdc,NULL,&sfp), expected E_INVALIDARG, got %08x\n", hr
);
1536 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1538 hr
= ScriptGetFontProperties(hdc
,&psc
,NULL
);
1539 ok( hr
== E_INVALIDARG
, "(hdc,&psc,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1540 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1542 /* Pass an invalid sfp */
1544 sfp
.cBytes
= sizeof(SCRIPT_FONTPROPERTIES
) - 1;
1545 hr
= ScriptGetFontProperties(hdc
,&psc
,&sfp
);
1546 ok( hr
== E_INVALIDARG
, "(hdc,&psc,&sfp) invalid, expected E_INVALIDARG, got %08x\n", hr
);
1547 ok( psc
!= NULL
, "Expected a pointer in psc, got NULL\n");
1548 ScriptFreeCache(&psc
);
1549 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1551 /* Give it the correct cBytes, we don't care about what's coming back */
1552 sfp
.cBytes
= sizeof(SCRIPT_FONTPROPERTIES
);
1554 hr
= ScriptGetFontProperties(hdc
,&psc
,&sfp
);
1555 ok( hr
== S_OK
, "(hdc,&psc,&sfp) partly initialized, expected S_OK, got %08x\n", hr
);
1556 ok( psc
!= NULL
, "Expected a pointer in psc, got NULL\n");
1558 /* Save the psc pointer */
1560 /* Now a NULL hdc again */
1561 hr
= ScriptGetFontProperties(NULL
,&psc
,&sfp
);
1562 ok( hr
== S_OK
, "(NULL,&psc,&sfp), expected S_OK, got %08x\n", hr
);
1563 ok( psc
== old_psc
, "Expected psc not to be changed, was %p is now %p\n", old_psc
, psc
);
1564 ScriptFreeCache(&psc
);
1565 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1568 static void test_ScriptTextOut(HDC hdc
)
1574 SCRIPT_ITEM pItem
[255];
1576 WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1581 unsigned short pwOutGlyphs1
[256];
1582 WORD pwLogClust
[256];
1583 SCRIPT_VISATTR psva
[256];
1586 GOFFSET pGoffset
[256];
1591 BOOL fTrailing
= FALSE
;
1592 SCRIPT_LOGATTR
*psla
;
1593 SCRIPT_LOGATTR sla
[256];
1595 /* This is a valid test that will cause parsing to take place */
1598 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1599 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1600 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1602 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1604 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1605 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1606 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1608 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1609 * ie. ScriptItemize has succeeded and that pItem has been set */
1612 psc
= NULL
; /* must be null on first call */
1615 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1616 cMaxGlyphs
, &pItem
[0].a
,
1617 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1618 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1619 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1620 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1622 /* Note hdc is needed as glyph info is not yet in psc */
1623 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1625 ok (hr
== 0, "Should return 0 not (%08x)\n", hr
);
1626 ScriptFreeCache(&psc
); /* Get rid of psc for next test set */
1627 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1629 hr
= ScriptTextOut(NULL
, NULL
, 0, 0, 0, NULL
, NULL
, NULL
, 0, NULL
, 0, NULL
, NULL
, NULL
);
1630 ok (hr
== E_INVALIDARG
, "Should return 0 not (%08x)\n", hr
);
1632 hr
= ScriptTextOut(NULL
, NULL
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1633 piAdvance
, NULL
, pGoffset
);
1634 ok( hr
== E_INVALIDARG
, "(NULL,NULL,TestItem1, cInChars, dwFlags, pwOutGlyphs3), "
1635 "expected E_INVALIDARG, got %08x\n", hr
);
1637 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1639 hr
= ScriptTextOut(NULL
, &psc
, 0, 0, 0, NULL
, NULL
, NULL
, 0, NULL
, 0,
1641 ok( hr
== E_INVALIDARG
, "(NULL,&psc,NULL,0,0,0,NULL,), expected E_INVALIDARG, "
1643 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1645 /* hdc is required for this one rather than the usual optional */
1647 hr
= ScriptTextOut(NULL
, &psc
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1648 piAdvance
, NULL
, pGoffset
);
1649 ok( hr
== E_INVALIDARG
, "(NULL,&psc,), expected E_INVALIDARG, got %08x\n", hr
);
1650 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1652 /* Set that it returns 0 status */
1653 hr
= ScriptTextOut(hdc
, &psc
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1654 piAdvance
, NULL
, pGoffset
);
1655 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1657 /* Test Rect Rgn is acceptable */
1662 hr
= ScriptTextOut(hdc
, &psc
, 0, 0, 0, &rect
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1663 piAdvance
, NULL
, pGoffset
);
1664 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1667 hr
= ScriptCPtoX(iCP
, fTrailing
, cChars
, pcGlyphs
, (const WORD
*) &pwLogClust
,
1668 (const SCRIPT_VISATTR
*) &psva
, (const int *)&piAdvance
, &pItem
[0].a
, &piX
);
1669 ok(hr
== S_OK
, "ScriptCPtoX Stub should return S_OK not %08x\n", hr
);
1671 psla
= (SCRIPT_LOGATTR
*)&sla
;
1672 hr
= ScriptBreak(TestItem1
, cChars
, &pItem
[0].a
, psla
);
1673 ok(hr
== S_OK
, "ScriptBreak Stub should return S_OK not %08x\n", hr
);
1675 /* Clean up and go */
1676 ScriptFreeCache(&psc
);
1677 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1682 static void test_ScriptTextOut2(HDC hdc
)
1684 /* Intent is to validate that the HDC passed into ScriptTextOut is
1685 * used instead of the (possibly) invalid cached one
1692 SCRIPT_ITEM pItem
[255];
1694 WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1699 unsigned short pwOutGlyphs1
[256];
1700 WORD pwLogClust
[256];
1701 SCRIPT_VISATTR psva
[256];
1704 GOFFSET pGoffset
[256];
1707 /* Create an extra DC that will be used until the ScriptTextOut */
1708 hdc1
= CreateCompatibleDC(hdc
);
1709 ok (hdc1
!= 0, "CreateCompatibleDC failed to create a DC\n");
1710 hdc2
= CreateCompatibleDC(hdc
);
1711 ok (hdc2
!= 0, "CreateCompatibleDC failed to create a DC\n");
1713 /* This is a valid test that will cause parsing to take place */
1716 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1717 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1718 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1720 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1722 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1723 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1724 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1726 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1727 * ie. ScriptItemize has succeeded and that pItem has been set */
1730 psc
= NULL
; /* must be null on first call */
1733 hr
= ScriptShape(hdc2
, &psc
, TestItem1
, cChars
,
1734 cMaxGlyphs
, &pItem
[0].a
,
1735 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1736 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1737 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1738 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1740 /* Note hdc is needed as glyph info is not yet in psc */
1741 hr
= ScriptPlace(hdc2
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1743 ok (hr
== 0, "Should return 0 not (%08x)\n", hr
);
1745 /* key part!!! cached dc is being deleted */
1746 hr
= DeleteDC(hdc2
);
1747 ok(hr
== 1, "DeleteDC should return 1 not %08x\n", hr
);
1749 /* At this point the cached hdc (hdc2) has been destroyed,
1750 * however, we are passing in a *real* hdc (the original hdc).
1751 * The text should be written to that DC
1753 hr
= ScriptTextOut(hdc1
, &psc
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1754 piAdvance
, NULL
, pGoffset
);
1755 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1756 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1760 /* Clean up and go */
1761 ScriptFreeCache(&psc
);
1762 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1767 static void test_ScriptTextOut3(HDC hdc
)
1773 SCRIPT_ITEM pItem
[255];
1775 WCHAR TestItem1
[] = {' ','\r', 0};
1780 unsigned short pwOutGlyphs1
[256];
1781 WORD pwLogClust
[256];
1782 SCRIPT_VISATTR psva
[256];
1785 GOFFSET pGoffset
[256];
1789 /* This is to ensure that nonexistent glyphs are translated into a valid glyph number */
1792 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1793 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1794 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1796 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1798 ok (pItem
[0].iCharPos
== 0 && pItem
[2].iCharPos
== cInChars
,
1799 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1800 pItem
[0].iCharPos
, cInChars
, pItem
[2].iCharPos
);
1802 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1803 * ie. ScriptItemize has succeeded and that pItem has been set */
1806 psc
= NULL
; /* must be null on first call */
1809 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1810 cMaxGlyphs
, &pItem
[0].a
,
1811 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1812 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1813 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1814 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1816 /* Note hdc is needed as glyph info is not yet in psc */
1817 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1819 ok (hr
== 0, "Should return 0 not (%08x)\n", hr
);
1821 /* Test Rect Rgn is acceptable */
1826 hr
= ScriptTextOut(hdc
, &psc
, 0, 0, 0, &rect
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1827 piAdvance
, NULL
, pGoffset
);
1828 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1831 /* Clean up and go */
1832 ScriptFreeCache(&psc
);
1833 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1837 #define test_item_ScriptXtoX(a,b,c,d,e,f) (winetest_set_location(__FILE__,__LINE__), 0) ? 0 : _test_item_ScriptXtoX(a,b,c,d,e,f)
1839 static void _test_item_ScriptXtoX(SCRIPT_ANALYSIS
*psa
, int cChars
, int cGlyphs
, const int* offsets
, const WORD
*pwLogClust
, const int* piAdvance
)
1842 int icChars
, icGlyphs
;
1845 SCRIPT_VISATTR psva
[10];
1850 memset(psva
,0,sizeof(psva
));
1851 direction
= (psa
->fRTL
)?-1:+1;
1853 for(iCP
= 0; iCP
< cChars
; iCP
++)
1858 hr
= ScriptXtoCP(iX
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piCP
, &piTrailing
);
1859 winetest_ok(hr
== S_OK
, "ScriptXtoCP: should return S_OK not %08x\n", hr
);
1860 winetest_ok(piCP
== iCP
, "ScriptXtoCP: iX=%d should return piCP=%d not %d\n", iX
, iCP
, piCP
);
1861 winetest_ok(piTrailing
== 0, "ScriptXtoCP: iX=%d should return piTrailing=0 not %d\n", iX
, piTrailing
);
1864 for(iCP
= 0; iCP
< cChars
; iCP
++)
1866 iX
= offsets
[iCP
]+direction
;
1869 hr
= ScriptXtoCP(iX
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piCP
, &piTrailing
);
1870 winetest_ok(hr
== S_OK
, "ScriptXtoCP leading: should return S_OK not %08x\n", hr
);
1871 winetest_ok(piCP
== iCP
, "ScriptXtoCP leading: iX=%d should return piCP=%d not %d\n", iX
, iCP
, piCP
);
1872 winetest_ok(piTrailing
== 0, "ScriptXtoCP leading: iX=%d should return piTrailing=0 not %d\n", iX
, piTrailing
);
1875 for(iCP
= 0; iCP
< cChars
; iCP
++)
1877 iX
= offsets
[iCP
+1]-direction
;
1880 hr
= ScriptXtoCP(iX
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piCP
, &piTrailing
);
1881 winetest_ok(hr
== S_OK
, "ScriptXtoCP trailing: should return S_OK not %08x\n", hr
);
1882 winetest_ok(piCP
== iCP
, "ScriptXtoCP trailing: iX=%d should return piCP=%d not %d\n", iX
, iCP
, piCP
);
1883 winetest_ok(piTrailing
== 1, "ScriptXtoCP trailing: iX=%d should return piTrailing=1 not %d\n", iX
, piTrailing
);
1886 for(iCP
= 0; iCP
<= cChars
+1; iCP
++)
1891 hr
= ScriptCPtoX(iCP
, fTrailing
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piX
);
1892 winetest_ok(hr
== S_OK
, "ScriptCPtoX: should return S_OK not %08x\n", hr
);
1893 winetest_ok(piX
== offsets
[iCP
],
1894 "ScriptCPtoX: iCP=%d should return piX=%d not %d\n", iCP
, offsets
[iCP
], piX
);
1897 for(iCP
= 0; iCP
<= cChars
+1; iCP
++)
1902 hr
= ScriptCPtoX(iCP
, fTrailing
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piX
);
1903 winetest_ok(hr
== S_OK
, "ScriptCPtoX trailing: should return S_OK not %08x\n", hr
);
1904 winetest_ok(piX
== offsets
[iCP
+1],
1905 "ScriptCPtoX trailing: iCP=%d should return piX=%d not %d\n", iCP
, offsets
[iCP
+1], piX
);
1909 static void test_ScriptXtoX(void)
1910 /****************************************************************************************
1911 * This routine tests the ScriptXtoCP and ScriptCPtoX functions using static variables *
1912 ****************************************************************************************/
1914 WORD pwLogClust
[10] = {0, 0, 0, 1, 1, 2, 2, 3, 3, 3};
1915 WORD pwLogClust_RTL
[10] = {3, 3, 3, 2, 2, 1, 1, 0, 0, 0};
1916 WORD pwLogClust_2
[7] = {4, 3, 3, 2, 1, 0 ,0};
1917 int piAdvance
[10] = {201, 190, 210, 180, 170, 204, 189, 195, 212, 203};
1918 int piAdvance_2
[5] = {39, 26, 19, 17, 11};
1919 static const int offsets
[13] = {0, 67, 134, 201, 296, 391, 496, 601, 1052, 1503, 1954, 1954, 1954};
1920 static const int offsets_RTL
[13] = {781, 721, 661, 601, 496, 391, 296, 201, 134, 67, 0, 0, 0};
1921 static const int offsets_2
[10] = {112, 101, 92, 84, 65, 39, 19, 0, 0, 0};
1922 SCRIPT_VISATTR psva
[10];
1929 memset(&sa
, 0 , sizeof(SCRIPT_ANALYSIS
));
1930 memset(psva
, 0, sizeof(psva
));
1933 hr
= ScriptXtoCP(-1, 10, 10, pwLogClust
, psva
, piAdvance
, &sa
, &piCP
, &piTrailing
);
1934 ok(hr
== S_OK
, "ScriptXtoCP should return S_OK not %08x\n", hr
);
1936 ok(piCP
== -1, "Negative iX should return piCP=-1 not %d\n", piCP
);
1938 ok(piCP
== 10, "Negative iX should return piCP=10 not %d\n", piCP
);
1940 for (iX
= 0; iX
<= 7; iX
++)
1944 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1945 ok(piCP
==0 && piTrailing
==0,"%i should return 0(%i) and 0(%i)\n",iX
, piCP
,piTrailing
);
1947 for (iX
= 8; iX
< 16; iX
++)
1951 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1952 ok(piCP
==0 && piTrailing
==1,"%i should return 0(%i) and 1(%i)\n",iX
, piCP
,piTrailing
);
1956 hr
= ScriptXtoCP(-1, 10, 10, pwLogClust_RTL
, psva
, piAdvance
, &sa
, &piCP
, &piTrailing
);
1957 ok(hr
== S_OK
, "ScriptXtoCP should return S_OK not %08x\n", hr
);
1959 ok(piCP
== -1, "Negative iX should return piCP=-1 not %d\n", piCP
);
1961 ok(piCP
== 10, "Negative iX should return piCP=10 not %d\n", piCP
);
1964 hr
= ScriptXtoCP(1954, 10, 10, pwLogClust_RTL
, psva
, piAdvance
, &sa
, &piCP
, &piTrailing
);
1965 ok(hr
== S_OK
, "ScriptXtoCP should return S_OK not %08x\n", hr
);
1966 ok(piCP
== -1, "iX=%d should return piCP=-1 not %d\n", iX
, piCP
);
1967 ok(piTrailing
== 1, "iX=%d should return piTrailing=1 not %d\n", iX
, piTrailing
);
1969 for (iX
= 1; iX
<= 8; iX
++)
1973 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1974 ok(piCP
==0 && piTrailing
==1,"%i should return 0(%i) and 1(%i)\n",iX
,piCP
,piTrailing
);
1976 for (iX
= 9; iX
< 16; iX
++)
1980 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1981 ok(piCP
==0 && piTrailing
==0,"%i should return 0(%i) and 0(%i)\n",iX
,piCP
,piTrailing
);
1985 test_item_ScriptXtoX(&sa
, 10, 10, offsets
, pwLogClust
, piAdvance
);
1987 test_item_ScriptXtoX(&sa
, 10, 10, offsets_RTL
, pwLogClust_RTL
, piAdvance
);
1988 test_item_ScriptXtoX(&sa
, 7, 5, offsets_2
, pwLogClust_2
, piAdvance_2
);
1991 static void test_ScriptString(HDC hdc
)
1993 /*******************************************************************************************
1995 * This set of tests are for the string functions of uniscribe. The ScriptStringAnalyse
1996 * function allocates memory pointed to by the SCRIPT_STRING_ANALYSIS ssa pointer. This
1997 * memory is freed by ScriptStringFree. There needs to be a valid hdc for this as
1998 * ScriptStringAnalyse calls ScriptSItemize, ScriptShape and ScriptPlace which require it.
2003 WCHAR teststr
[] = {'T','e','s','t','1',' ','a','2','b','3', '\0'};
2004 int len
= (sizeof(teststr
) / sizeof(WCHAR
)) - 1;
2005 int Glyphs
= len
* 2 + 16;
2007 DWORD Flags
= SSA_GLYPHS
;
2009 const int Dx
[5] = {10, 10, 10, 10, 10};
2010 const BYTE InClass
= 0;
2011 SCRIPT_STRING_ANALYSIS ssa
= NULL
;
2016 const RECT rc
= {0, 50, 100, 100};
2019 BOOL Disabled
= FALSE
;
2020 const int *clip_len
;
2025 Charset
= -1; /* this flag indicates unicode input */
2026 /* Test without hdc to get E_PENDING */
2027 hr
= ScriptStringAnalyse( NULL
, teststr
, len
, Glyphs
, Charset
, Flags
,
2028 ReqWidth
, NULL
, NULL
, Dx
, NULL
,
2030 ok(hr
== E_PENDING
, "ScriptStringAnalyse Stub should return E_PENDING not %08x\n", hr
);
2032 /* test with hdc, this should be a valid test */
2033 hr
= ScriptStringAnalyse( hdc
, teststr
, len
, Glyphs
, Charset
, Flags
,
2034 ReqWidth
, NULL
, NULL
, Dx
, NULL
,
2036 ok(hr
== S_OK
, "ScriptStringAnalyse should return S_OK not %08x\n", hr
);
2037 ScriptStringFree(&ssa
);
2039 /* test makes sure that a call with a valid pssa still works */
2040 hr
= ScriptStringAnalyse( hdc
, teststr
, len
, Glyphs
, Charset
, Flags
,
2041 ReqWidth
, NULL
, NULL
, Dx
, NULL
,
2043 ok(hr
== S_OK
, "ScriptStringAnalyse should return S_OK not %08x\n", hr
);
2044 ok(ssa
!= NULL
, "ScriptStringAnalyse pssa should not be NULL\n");
2048 hr
= ScriptStringOut(ssa
, X
, Y
, Options
, &rc
, MinSel
, MaxSel
, Disabled
);
2049 ok(hr
== S_OK
, "ScriptStringOut should return S_OK not %08x\n", hr
);
2052 clip_len
= ScriptString_pcOutChars(ssa
);
2053 ok(*clip_len
== len
, "ScriptString_pcOutChars failed, got %d, expected %d\n", *clip_len
, len
);
2055 order
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, *clip_len
* sizeof(UINT
));
2056 hr
= ScriptStringGetOrder(ssa
, order
);
2057 ok(hr
== S_OK
, "ScriptStringGetOrder failed, got %08x, expected S_OK\n", hr
);
2059 for (i
= 0; i
< *clip_len
; i
++) ok(order
[i
] == i
, "%d: got %d expected %d\n", i
, order
[i
], i
);
2060 HeapFree(GetProcessHeap(), 0, order
);
2062 hr
= ScriptStringFree(&ssa
);
2063 ok(hr
== S_OK
, "ScriptStringFree should return S_OK not %08x\n", hr
);
2066 static void test_ScriptStringXtoCP_CPtoX(HDC hdc
)
2068 /*****************************************************************************************
2070 * This test is for the ScriptStringXtoCP and ScriptStringXtoCP functions. Due to the
2071 * nature of the fonts between Windows and Wine, the test is implemented by generating
2072 * values using one one function then checking the output of the second. In this way
2073 * the validity of the functions is established using Windows as a base and confirming
2074 * similar behaviour in wine.
2078 static const WCHAR teststr1
[] = {0x05e9, 'i', 0x05dc, 'n', 0x05d5, 'e', 0x05dd, '.',0};
2079 static const BOOL rtl
[] = {1, 0, 1, 0, 1, 0, 1, 0};
2080 void *String
= (WCHAR
*) &teststr1
; /* ScriptStringAnalysis needs void */
2081 int String_len
= (sizeof(teststr1
)/sizeof(WCHAR
))-1;
2082 int Glyphs
= String_len
* 2 + 16; /* size of buffer as recommended */
2083 int Charset
= -1; /* unicode */
2084 DWORD Flags
= SSA_GLYPHS
;
2086 const BYTE InClass
= 0;
2087 SCRIPT_STRING_ANALYSIS ssa
= NULL
;
2089 int Ch
; /* Character position in string */
2091 int Cp
; /* Character position in string */
2096 /* Test with hdc, this should be a valid test
2097 * Here we generate an SCRIPT_STRING_ANALYSIS that will be used as input to the
2098 * following character positions to X and X to character position functions.
2101 hr
= ScriptStringAnalyse( hdc
, String
, String_len
, Glyphs
, Charset
, Flags
,
2102 ReqWidth
, NULL
, NULL
, NULL
, NULL
,
2105 hr
== E_INVALIDARG
, /* NT */
2106 "ScriptStringAnalyse should return S_OK or E_INVALIDARG not %08x\n", hr
);
2110 ok(ssa
!= NULL
, "ScriptStringAnalyse ssa should not be NULL\n");
2113 * Loop to generate character positions to provide starting positions for the
2114 * ScriptStringCPtoX and ScriptStringXtoCP functions
2116 for (Cp
= 0; Cp
< String_len
; Cp
++)
2118 /* The fTrailing flag is used to indicate whether the X being returned is at
2119 * the beginning or the end of the character. What happens here is that if
2120 * fTrailing indicates the end of the character, ie. FALSE, then ScriptStringXtoCP
2121 * returns the beginning of the next character and iTrailing is FALSE. So for this
2122 * loop iTrailing will be FALSE in both cases.
2124 hr
= ScriptStringCPtoX(ssa
, Cp
, TRUE
, &trail
);
2125 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2126 hr
= ScriptStringCPtoX(ssa
, Cp
, FALSE
, &lead
);
2127 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2129 ok(lead
> trail
, "Leading values should be after trailing for rtl characters(%i)\n",Cp
);
2131 ok(lead
< trail
, "Trailing values should be after leading for ltr characters(%i)\n",Cp
);
2133 /* move by 1 pixel so that we are not inbetween 2 characters. That could result in being the lead of a rtl and
2134 at the same time the trail of an ltr */
2136 /* inside the leading edge */
2138 if (rtl
[Cp
]) X
--; else X
++;
2139 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2140 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2141 ok(Cp
== Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
, Ch
, trail
);
2142 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = %d\n",
2145 /* inside the trailing edge */
2147 if (rtl
[Cp
]) X
++; else X
--;
2148 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2149 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2150 ok(Cp
== Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
, Ch
, trail
);
2151 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = %d\n",
2154 /* outside the "trailing" edge */
2155 if (Cp
< String_len
-1)
2157 if (rtl
[Cp
]) X
= lead
; else X
= trail
;
2159 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2160 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2161 ok(Cp
+ 1 == Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
+ 1, Ch
, trail
);
2163 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = %d\n",
2166 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = %d\n",
2170 /* outside the "leading" edge */
2173 if (rtl
[Cp
]) X
= trail
; else X
= lead
;
2175 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2176 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2177 ok(Cp
- 1 == Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
- 1, Ch
, trail
);
2178 if (Cp
!= 0 && rtl
[Cp
-1])
2179 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = %d\n",
2182 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = %d\n",
2187 /* Check beyond the leading boundary of the whole string */
2190 /* having a leading rtl character seems to confuse usp */
2191 /* this looks to be a windows bug we should emulate */
2192 hr
= ScriptStringCPtoX(ssa
, 0, TRUE
, &X
);
2193 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2195 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2196 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2197 ok(Ch
== 1, "ScriptStringXtoCP should return Ch = 1 not %d for X outside leading edge when rtl\n", Ch
);
2198 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = outside leading edge when rtl\n",
2203 hr
= ScriptStringCPtoX(ssa
, 0, FALSE
, &X
);
2204 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2206 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2207 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2208 ok(Ch
== -1, "ScriptStringXtoCP should return Ch = -1 not %d for X outside leading edge\n", Ch
);
2209 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = outside leading edge\n",
2213 /* Check beyond the end boundary of the whole string */
2214 if (rtl
[String_len
-1])
2216 hr
= ScriptStringCPtoX(ssa
, String_len
-1, FALSE
, &X
);
2217 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2221 hr
= ScriptStringCPtoX(ssa
, String_len
-1, TRUE
, &X
);
2222 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2225 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2226 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2227 ok(Ch
== String_len
, "ScriptStringXtoCP should return Ch = %i not %d for X outside trailing edge\n", String_len
, Ch
);
2228 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = outside trailing edge\n",
2232 * Cleanup the SSA for the next round of tests
2234 hr
= ScriptStringFree(&ssa
);
2235 ok(hr
== S_OK
, "ScriptStringFree should return S_OK not %08x\n", hr
);
2238 * Test to see that exceeding the number of chars returns E_INVALIDARG. First
2239 * generate an SSA for the subsequent tests.
2241 hr
= ScriptStringAnalyse( hdc
, String
, String_len
, Glyphs
, Charset
, Flags
,
2242 ReqWidth
, NULL
, NULL
, NULL
, NULL
,
2244 ok(hr
== S_OK
, "ScriptStringAnalyse should return S_OK not %08x\n", hr
);
2247 * When ScriptStringCPtoX is called with a character position Cp that exceeds the
2248 * string length, return E_INVALIDARG. This also invalidates the ssa so a
2249 * ScriptStringFree should also fail.
2252 Cp
= String_len
+ 1;
2253 hr
= ScriptStringCPtoX(ssa
, Cp
, fTrailing
, &X
);
2254 ok(hr
== E_INVALIDARG
, "ScriptStringCPtoX should return E_INVALIDARG not %08x\n", hr
);
2256 ScriptStringFree(&ssa
);
2260 static void test_ScriptCacheGetHeight(HDC hdc
)
2263 SCRIPT_CACHE sc
= NULL
;
2266 hr
= ScriptCacheGetHeight(NULL
, NULL
, NULL
);
2267 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2269 hr
= ScriptCacheGetHeight(NULL
, &sc
, NULL
);
2270 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2272 hr
= ScriptCacheGetHeight(NULL
, &sc
, &height
);
2273 ok(hr
== E_PENDING
, "expected E_PENDING, got 0x%08x\n", hr
);
2277 hr
= ScriptCacheGetHeight(hdc
, &sc
, &height
);
2278 ok(hr
== S_OK
, "expected S_OK, got 0x%08x\n", hr
);
2279 ok(height
> 0, "expected height > 0\n");
2281 ScriptFreeCache(&sc
);
2284 static void test_ScriptGetGlyphABCWidth(HDC hdc
)
2287 SCRIPT_CACHE sc
= NULL
;
2290 hr
= ScriptGetGlyphABCWidth(NULL
, NULL
, 'a', NULL
);
2291 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2293 hr
= ScriptGetGlyphABCWidth(NULL
, &sc
, 'a', NULL
);
2294 ok(broken(hr
== E_PENDING
) ||
2295 hr
== E_INVALIDARG
, /* WIN7 */
2296 "expected E_INVALIDARG, got 0x%08x\n", hr
);
2298 hr
= ScriptGetGlyphABCWidth(NULL
, &sc
, 'a', &abc
);
2299 ok(hr
== E_PENDING
, "expected E_PENDING, got 0x%08x\n", hr
);
2301 if (0) { /* crashes on WinXP */
2302 hr
= ScriptGetGlyphABCWidth(hdc
, &sc
, 'a', NULL
);
2303 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2306 hr
= ScriptGetGlyphABCWidth(hdc
, &sc
, 'a', &abc
);
2307 ok(hr
== S_OK
, "expected S_OK, got 0x%08x\n", hr
);
2309 ScriptFreeCache(&sc
);
2312 static void test_ScriptLayout(void)
2315 static const BYTE levels
[][10] =
2317 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
2318 { 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 },
2319 { 2, 2, 2, 2, 2, 2, 2, 2, 2, 2 },
2320 { 3, 3, 3, 3, 3, 3, 3, 3, 3, 3 },
2322 { 0, 0, 0, 0, 0, 1, 1, 1, 1, 1},
2323 { 1, 1, 1, 2, 2, 2, 1, 1, 1, 1 },
2324 { 2, 2, 2, 1, 1, 1, 2, 2, 2, 2 },
2325 { 0, 0, 1, 1, 2, 2, 1, 1, 0, 0 },
2326 { 1, 1, 2, 2, 3, 3, 2, 2, 1, 1 },
2328 { 0, 0, 1, 1, 2, 2, 1, 1, 0, 1 },
2329 { 1, 0, 1, 2, 2, 1, 2, 1, 0, 1 },
2331 static const int expect_l2v
[][10] =
2333 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2334 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2335 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2336 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2338 { 0, 1, 2, 3, 4, 9, 8 ,7 ,6, 5},
2339 /**/ { 9, 8, 7, 4, 5, 6, 3 ,2 ,1, 0},
2340 /**/ { 7, 8, 9, 6, 5, 4, 0 ,1 ,2, 3},
2341 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2342 { 9, 8, 2, 3, 5, 4, 6 ,7 ,1, 0},
2344 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2345 /**/ { 0, 1, 7, 5, 6, 4, 3 ,2 ,8, 9},
2347 static const int expect_v2l
[][10] =
2349 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2350 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2351 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2352 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2354 { 0, 1, 2, 3, 4, 9, 8 ,7 ,6, 5},
2355 { 9, 8, 7, 6, 3, 4, 5 ,2 ,1, 0},
2356 { 6, 7, 8, 9, 5, 4, 3 ,0 ,1, 2},
2357 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2358 { 9, 8, 2, 3, 5, 4, 6 ,7 ,1, 0},
2360 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2361 { 0, 1, 7, 6, 5, 3, 4 ,2 ,8, 9},
2364 int i
, j
, vistolog
[sizeof(levels
[0])], logtovis
[sizeof(levels
[0])];
2366 hr
= ScriptLayout(sizeof(levels
[0]), NULL
, vistolog
, logtovis
);
2367 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2369 hr
= ScriptLayout(sizeof(levels
[0]), levels
[0], NULL
, NULL
);
2370 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2372 for (i
= 0; i
< sizeof(levels
)/sizeof(levels
[0]); i
++)
2374 hr
= ScriptLayout(sizeof(levels
[0]), levels
[i
], vistolog
, logtovis
);
2375 ok(hr
== S_OK
, "expected S_OK, got 0x%08x\n", hr
);
2377 for (j
= 0; j
< sizeof(levels
[i
]); j
++)
2379 ok(expect_v2l
[i
][j
] == vistolog
[j
],
2380 "failure: levels[%d][%d] = %d, vistolog[%d] = %d\n",
2381 i
, j
, levels
[i
][j
], j
, vistolog
[j
] );
2384 for (j
= 0; j
< sizeof(levels
[i
]); j
++)
2386 ok(expect_l2v
[i
][j
] == logtovis
[j
],
2387 "failure: levels[%d][%d] = %d, logtovis[%d] = %d\n",
2388 i
, j
, levels
[i
][j
], j
, logtovis
[j
] );
2393 static BOOL CALLBACK
enum_proc(LGRPID group
, LCID lcid
, LPSTR locale
, LONG_PTR lparam
)
2396 SCRIPT_DIGITSUBSTITUTE sds
;
2401 if (!IsValidLocale(lcid
, LCID_INSTALLED
)) return TRUE
;
2403 memset(&sds
, 0, sizeof(sds
));
2404 memset(&sc
, 0, sizeof(sc
));
2405 memset(&ss
, 0, sizeof(ss
));
2407 lcid_old
= GetThreadLocale();
2408 if (!SetThreadLocale(lcid
)) return TRUE
;
2410 hr
= ScriptRecordDigitSubstitution(lcid
, &sds
);
2411 ok(hr
== S_OK
, "ScriptRecordDigitSubstitution failed: 0x%08x\n", hr
);
2413 hr
= ScriptApplyDigitSubstitution(&sds
, &sc
, &ss
);
2414 ok(hr
== S_OK
, "ScriptApplyDigitSubstitution failed: 0x%08x\n", hr
);
2416 SetThreadLocale(lcid_old
);
2420 static void test_digit_substitution(void)
2424 static const LGRPID groups
[] =
2426 LGRPID_WESTERN_EUROPE
,
2427 LGRPID_CENTRAL_EUROPE
,
2434 LGRPID_TRADITIONAL_CHINESE
,
2435 LGRPID_SIMPLIFIED_CHINESE
,
2445 static BOOL (WINAPI
* pEnumLanguageGroupLocalesA
)(LANGGROUPLOCALE_ENUMPROCA
,LGRPID
,DWORD
,LONG_PTR
);
2447 hKernel32
= GetModuleHandleA("kernel32.dll");
2448 pEnumLanguageGroupLocalesA
= (void*)GetProcAddress(hKernel32
, "EnumLanguageGroupLocalesA");
2450 if (!pEnumLanguageGroupLocalesA
)
2452 win_skip("EnumLanguageGroupLocalesA not available on this platform\n");
2456 for (i
= 0; i
< sizeof(groups
)/sizeof(groups
[0]); i
++)
2458 ret
= pEnumLanguageGroupLocalesA(enum_proc
, groups
[i
], 0, 0);
2459 if (!ret
&& GetLastError() == ERROR_CALL_NOT_IMPLEMENTED
)
2461 win_skip("EnumLanguageGroupLocalesA not implemented on this platform\n");
2465 ok(ret
, "EnumLanguageGroupLocalesA failed unexpectedly: %u\n", GetLastError());
2469 static void test_ScriptGetProperties(void)
2471 const SCRIPT_PROPERTIES
**props
;
2475 hr
= ScriptGetProperties(NULL
, NULL
);
2476 ok(hr
== E_INVALIDARG
, "ScriptGetProperties succeeded\n");
2478 hr
= ScriptGetProperties(NULL
, &num
);
2479 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
2481 hr
= ScriptGetProperties(&props
, NULL
);
2482 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
2484 hr
= ScriptGetProperties(&props
, &num
);
2485 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
2488 static void test_ScriptBreak(void)
2490 static const WCHAR test
[] = {' ','\r','\n',0};
2491 SCRIPT_ITEM items
[4];
2495 hr
= ScriptItemize(test
, 3, 4, NULL
, NULL
, items
, NULL
);
2496 ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
2498 memset(&la
, 0, sizeof(la
));
2499 hr
= ScriptBreak(test
, 1, &items
[0].a
, &la
);
2500 ok(!hr
, "ScriptBreak should return S_OK not %08x\n", hr
);
2502 ok(!la
.fSoftBreak
, "fSoftBreak set\n");
2503 ok(la
.fWhiteSpace
, "fWhiteSpace not set\n");
2504 ok(la
.fCharStop
, "fCharStop not set\n");
2505 ok(!la
.fWordStop
, "fWordStop set\n");
2506 ok(!la
.fInvalid
, "fInvalid set\n");
2507 ok(!la
.fReserved
, "fReserved set\n");
2509 memset(&la
, 0, sizeof(la
));
2510 hr
= ScriptBreak(test
+ 1, 1, &items
[1].a
, &la
);
2511 ok(!hr
, "ScriptBreak should return S_OK not %08x\n", hr
);
2513 ok(!la
.fSoftBreak
, "fSoftBreak set\n");
2514 ok(!la
.fWhiteSpace
, "fWhiteSpace set\n");
2515 ok(la
.fCharStop
, "fCharStop not set\n");
2516 ok(!la
.fWordStop
, "fWordStop set\n");
2517 ok(!la
.fInvalid
, "fInvalid set\n");
2518 ok(!la
.fReserved
, "fReserved set\n");
2520 memset(&la
, 0, sizeof(la
));
2521 hr
= ScriptBreak(test
+ 2, 1, &items
[2].a
, &la
);
2522 ok(!hr
, "ScriptBreak should return S_OK not %08x\n", hr
);
2524 ok(!la
.fSoftBreak
, "fSoftBreak set\n");
2525 ok(!la
.fWhiteSpace
, "fWhiteSpace set\n");
2526 ok(la
.fCharStop
, "fCharStop not set\n");
2527 ok(!la
.fWordStop
, "fWordStop set\n");
2528 ok(!la
.fInvalid
, "fInvalid set\n");
2529 ok(!la
.fReserved
, "fReserved set\n");
2532 static void test_newlines(void)
2534 static const WCHAR test1
[] = {'t','e','x','t','\r','t','e','x','t',0};
2535 static const WCHAR test2
[] = {'t','e','x','t','\n','t','e','x','t',0};
2536 static const WCHAR test3
[] = {'t','e','x','t','\r','\n','t','e','x','t',0};
2537 static const WCHAR test4
[] = {'t','e','x','t','\n','\r','t','e','x','t',0};
2538 static const WCHAR test5
[] = {'1','2','3','4','\n','\r','1','2','3','4',0};
2539 SCRIPT_ITEM items
[5];
2544 hr
= ScriptItemize(test1
, lstrlenW(test1
), 5, NULL
, NULL
, items
, &count
);
2545 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2546 ok(count
== 3, "got %d expected 3\n", count
);
2549 hr
= ScriptItemize(test2
, lstrlenW(test2
), 5, NULL
, NULL
, items
, &count
);
2550 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2551 ok(count
== 3, "got %d expected 3\n", count
);
2554 hr
= ScriptItemize(test3
, lstrlenW(test3
), 5, NULL
, NULL
, items
, &count
);
2555 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2556 ok(count
== 4, "got %d expected 4\n", count
);
2559 hr
= ScriptItemize(test4
, lstrlenW(test4
), 5, NULL
, NULL
, items
, &count
);
2560 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2561 ok(count
== 4, "got %d expected 4\n", count
);
2564 hr
= ScriptItemize(test5
, lstrlenW(test5
), 5, NULL
, NULL
, items
, &count
);
2565 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2566 ok(count
== 4, "got %d expected 4\n", count
);
2576 unsigned short pwOutGlyphs
[256];
2578 /* We need a valid HDC to drive a lot of Script functions which requires the following *
2579 * to set up for the tests. */
2580 hwnd
= CreateWindowExA(0, "static", "", WS_POPUP
, 0,0,100,100,
2583 ShowWindow(hwnd
, SW_SHOW
);
2586 hdc
= GetDC(hwnd
); /* We now have a hdc */
2587 ok( hdc
!= NULL
, "HDC failed to be created %p\n", hdc
);
2589 memset(&lf
, 0, sizeof(LOGFONTA
));
2590 lstrcpyA(lf
.lfFaceName
, "Tahoma");
2595 hfont
= SelectObject(hdc
, CreateFontIndirectA(&lf
));
2596 ok(hfont
!= NULL
, "SelectObject failed: %p\n", hfont
);
2598 test_ScriptItemize();
2599 test_ScriptItemIzeShapePlace(hdc
,pwOutGlyphs
);
2600 test_ScriptGetCMap(hdc
, pwOutGlyphs
);
2601 test_ScriptCacheGetHeight(hdc
);
2602 test_ScriptGetGlyphABCWidth(hdc
);
2603 test_ScriptShape(hdc
);
2604 test_ScriptShapeOpenType(hdc
);
2605 test_ScriptPlace(hdc
);
2607 test_ScriptGetFontProperties(hdc
);
2608 test_ScriptTextOut(hdc
);
2609 test_ScriptTextOut2(hdc
);
2610 test_ScriptTextOut3(hdc
);
2612 test_ScriptString(hdc
);
2613 test_ScriptStringXtoCP_CPtoX(hdc
);
2615 test_ScriptLayout();
2616 test_digit_substitution();
2617 test_ScriptGetProperties();
2621 ReleaseDC(hwnd
, hdc
);
2622 DestroyWindow(hwnd
);