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}};
150 static const WCHAR test2
[] = {'1','2','3','-','5','2',0x064a,0x064f,0x0633,0x0627,0x0648,0x0650,0x064a,'7','1','.',0};
151 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}};
152 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}};
153 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}};
155 static const WCHAR test2b
[] = {'A','B','C','-','D','E','F',' ',0x0621,0x0623,0x0624,0};
156 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}};
157 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}};
158 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}};
161 static const WCHAR test2c
[] = {' ',0x0621,0x0623,0x0624,'A','B','C','-','D','E','F',0};
162 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}};
163 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}};
164 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}};
165 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}};
168 static const WCHAR test2d
[] = {'A','B','C','-','D','E','F',0x0621,0x0623,0x0624,' ',0};
169 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}};
170 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}};
171 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}};
172 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}};
175 static const WCHAR test3
[] =
176 {0x0e04,0x0e27,0x0e32,0x0e21,0x0e1e,0x0e22,0x0e32,0x0e22,0x0e32, 0x0e21
177 ,0x0e2d,0x0e22,0x0e39,0x0e48,0x0e17,0x0e35,0x0e48,0x0e44,0x0e2b,0x0e19
178 ,0x0e04,0x0e27,0x0e32,0x0e21,0x0e2a, 0x0e33,0x0e40,0x0e23,0x0e47,0x0e08,
179 0x0e2d,0x0e22,0x0e39,0x0e48,0x0e17,0x0e35,0x0e48,0x0e19,0x0e31,0x0e48,0x0e19,0};
181 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}};
182 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}};
184 static const WCHAR test4
[] = {'1','2','3','-','5','2',' ','i','s',' ','7','1','.',0};
186 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}};
187 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}};
188 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}};
191 static const WCHAR test5
[] =
192 {0x0627,0x0644,0x0635,0x0651,0x0650,0x062d,0x0629,0x064f,' ',0x062a,0x064e,
193 0x0627,0x062c,0x064c,' ',0x0639,0x064e,0x0644,0x0649,' ',
194 0x0631,0x064f,0x0624,0x0648,0x0633,0x0650,' ',0x0627,0x0644
195 ,0x0623,0x0635,0x0650,0x062d,0x0651,0x064e,0x0627,0x0621,0x0650,0};
196 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}};
199 static const WCHAR test6
[] = {0x05e9, 0x05dc, 0x05d5, 0x05dd, '.',0};
200 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}};
201 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}};
202 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}};
203 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};
204 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}};
205 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}};
206 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}};
207 static const WCHAR test8
[] = {0x0633, 0x0644, 0x0627, 0x0645,0};
208 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}};
210 /* Syriac (Like Arabic )*/
211 static const WCHAR test9
[] = {0x0710, 0x0712, 0x0712, 0x0714, '.',0};
212 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}};
213 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}};
214 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}};
216 static const WCHAR test10
[] = {0x0717, 0x0718, 0x071a, 0x071b,0};
217 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}};
220 static const WCHAR test11
[] = {0x0926, 0x0947, 0x0935, 0x0928, 0x093e, 0x0917, 0x0930, 0x0940};
221 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}};
222 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}};
225 static const WCHAR test12
[] = {0x09ac, 0x09be, 0x0982, 0x09b2, 0x09be};
226 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}};
227 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}};
230 static const WCHAR test13
[] = {0x0a17, 0x0a41, 0x0a30, 0x0a2e, 0x0a41, 0x0a16, 0x0a40};
231 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}};
232 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}};
235 static const WCHAR test14
[] = {0x0a97, 0x0ac1, 0x0a9c, 0x0ab0, 0x0abe, 0x0aa4, 0x0ac0};
236 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}};
237 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}};
240 static const WCHAR test15
[] = {0x0b13, 0x0b21, 0x0b3c, 0x0b3f, 0x0b06};
241 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}};
242 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}};
245 static const WCHAR test16
[] = {0x0ba4, 0x0bae, 0x0bbf, 0x0bb4, 0x0bcd};
246 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}};
247 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}};
250 static const WCHAR test17
[] = {0x0c24, 0x0c46, 0x0c32, 0x0c41, 0x0c17, 0x0c41};
251 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}};
252 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}};
255 static const WCHAR test18
[] = {0x0c95, 0x0ca8, 0x0ccd, 0x0ca8, 0x0ca1};
256 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}};
257 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}};
260 static const WCHAR test19
[] = {0x0d2e, 0x0d32, 0x0d2f, 0x0d3e, 0x0d33, 0x0d02};
261 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}};
262 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}};
264 SCRIPT_ITEM items
[15];
265 SCRIPT_CONTROL Control
;
271 usp10
= LoadLibraryA("usp10.dll");
272 ok (usp10
!= 0,"Unable to LoadLibrary on usp10.dll\n");
273 pScriptItemizeOpenType
= (void*)GetProcAddress(usp10
, "ScriptItemizeOpenType");
274 pScriptShapeOpenType
= (void*)GetProcAddress(usp10
, "ScriptShapeOpenType");
275 pGetGlyphIndicesW
= (void*)GetProcAddress(GetModuleHandleA("gdi32.dll"), "GetGlyphIndicesW");
277 memset(&Control
, 0, sizeof(Control
));
278 memset(&State
, 0, sizeof(State
));
280 hr
= ScriptItemize(NULL
, 4, 10, &Control
, &State
, items
, NULL
);
281 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if pwcInChars is NULL\n");
283 hr
= ScriptItemize(test1
, 4, 10, &Control
, &State
, NULL
, NULL
);
284 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if pItems is NULL\n");
286 hr
= ScriptItemize(test1
, 4, 1, &Control
, &State
, items
, NULL
);
287 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if cMaxItems < 2.\n");
289 hr
= ScriptItemize(test1
, 0, 10, NULL
, NULL
, items
, &nItems
);
290 ok (hr
== E_INVALIDARG
, "ScriptItemize should return E_INVALIDARG if cInChars is 0\n");
292 test_items_ok(test1
,4,NULL
,NULL
,1,t11
,FALSE
,0);
293 test_items_ok(test1b
,4,NULL
,NULL
,1,t1b1
,FALSE
,0);
294 test_items_ok(test2
,16,NULL
,NULL
,6,t21
,FALSE
,0);
295 test_items_ok(test2b
,11,NULL
,NULL
,4,t2b1
,FALSE
,0);
296 test_items_ok(test2c
,11,NULL
,NULL
,4,t2c1
,FALSE
,0);
297 test_items_ok(test2d
,11,NULL
,NULL
,4,t2d1
,FALSE
,0);
298 test_items_ok(test3
,41,NULL
,NULL
,1,t31
,FALSE
,0);
299 test_items_ok(test4
,12,NULL
,NULL
,5,t41
,FALSE
,0);
300 test_items_ok(test5
,38,NULL
,NULL
,1,t51
,FALSE
,0);
301 test_items_ok(test6
,5,NULL
,NULL
,2,t61
,FALSE
,0);
302 test_items_ok(test7
,29,NULL
,NULL
,3,t71
,FALSE
,0);
303 test_items_ok(test8
,4,NULL
,NULL
,1,t81
,FALSE
,0);
304 test_items_ok(test9
,5,NULL
,NULL
,2,t91
,FALSE
,0);
305 test_items_ok(test10
,4,NULL
,NULL
,1,t101
,FALSE
,0);
306 test_items_ok(test11
,8,NULL
,NULL
,1,t111
,FALSE
,0);
307 test_items_ok(test12
,5,NULL
,NULL
,1,t121
,FALSE
,0);
308 test_items_ok(test13
,7,NULL
,NULL
,1,t131
,FALSE
,0);
309 test_items_ok(test14
,7,NULL
,NULL
,1,t141
,FALSE
,0);
310 test_items_ok(test15
,5,NULL
,NULL
,1,t151
,FALSE
,0);
311 test_items_ok(test16
,5,NULL
,NULL
,1,t161
,FALSE
,0);
312 test_items_ok(test17
,6,NULL
,NULL
,1,t171
,FALSE
,0);
313 test_items_ok(test18
,5,NULL
,NULL
,1,t181
,FALSE
,0);
314 test_items_ok(test19
,6,NULL
,NULL
,1,t191
,FALSE
,0);
316 State
.uBidiLevel
= 0;
317 test_items_ok(test1
,4,&Control
,&State
,1,t11
,FALSE
,0);
318 test_items_ok(test1b
,4,&Control
,&State
,1,t1b1
,FALSE
,0);
319 test_items_ok(test2
,16,&Control
,&State
,4,t22
,FALSE
,0);
320 test_items_ok(test2b
,11,&Control
,&State
,4,t2b1
,FALSE
,0);
321 test_items_ok(test2c
,11,&Control
,&State
,5,t2c2
,FALSE
,0);
322 test_items_ok(test2d
,11,&Control
,&State
,5,t2d2
,FALSE
,0);
323 test_items_ok(test3
,41,&Control
,&State
,1,t31
,FALSE
,0);
324 test_items_ok(test4
,12,&Control
,&State
,5,t41
,FALSE
,0);
325 test_items_ok(test5
,38,&Control
,&State
,1,t51
,FALSE
,0);
326 test_items_ok(test6
,5,&Control
,&State
,2,t61
,FALSE
,0);
327 test_items_ok(test7
,29,&Control
,&State
,3,t72
,FALSE
,0);
328 test_items_ok(test8
,4,&Control
,&State
,1,t81
,FALSE
,0);
329 test_items_ok(test9
,5,&Control
,&State
,2,t91
,FALSE
,0);
330 test_items_ok(test10
,4,&Control
,&State
,1,t101
,FALSE
,0);
331 test_items_ok(test11
,8,&Control
,&State
,1,t111
,FALSE
,0);
332 test_items_ok(test12
,5,&Control
,&State
,1,t121
,FALSE
,0);
333 test_items_ok(test13
,7,&Control
,&State
,1,t131
,FALSE
,0);
334 test_items_ok(test14
,7,&Control
,&State
,1,t141
,FALSE
,0);
335 test_items_ok(test15
,5,&Control
,&State
,1,t151
,FALSE
,0);
336 test_items_ok(test16
,5,&Control
,&State
,1,t161
,FALSE
,0);
337 test_items_ok(test17
,6,&Control
,&State
,1,t171
,FALSE
,0);
338 test_items_ok(test18
,5,&Control
,&State
,1,t181
,FALSE
,0);
339 test_items_ok(test19
,6,&Control
,&State
,1,t191
,FALSE
,0);
341 State
.uBidiLevel
= 1;
342 test_items_ok(test1
,4,&Control
,&State
,1,t12
,FALSE
,0);
343 test_items_ok(test1b
,4,&Control
,&State
,1,t1b2
,FALSE
,0);
344 test_items_ok(test2
,16,&Control
,&State
,4,t23
,FALSE
,0);
345 test_items_ok(test2b
,11,&Control
,&State
,4,t2b2
,FALSE
,0);
346 test_items_ok(test2c
,11,&Control
,&State
,4,t2c3
,FALSE
,0);
347 test_items_ok(test2d
,11,&Control
,&State
,4,t2d3
,FALSE
,0);
348 test_items_ok(test3
,41,&Control
,&State
,1,t32
,FALSE
,0);
349 test_items_ok(test4
,12,&Control
,&State
,4,t42
,FALSE
,0);
350 test_items_ok(test5
,38,&Control
,&State
,1,t51
,FALSE
,0);
351 test_items_ok(test6
,5,&Control
,&State
,2,t62
,FALSE
,0);
352 test_items_ok(test7
,29,&Control
,&State
,3,t73
,FALSE
,0);
353 test_items_ok(test8
,4,&Control
,&State
,1,t81
,FALSE
,0);
354 test_items_ok(test9
,5,&Control
,&State
,2,t92
,FALSE
,0);
355 test_items_ok(test10
,4,&Control
,&State
,1,t101
,FALSE
,0);
356 test_items_ok(test11
,8,&Control
,&State
,1,t112
,FALSE
,0);
357 test_items_ok(test12
,5,&Control
,&State
,1,t122
,FALSE
,0);
358 test_items_ok(test13
,7,&Control
,&State
,1,t132
,FALSE
,0);
359 test_items_ok(test14
,7,&Control
,&State
,1,t142
,FALSE
,0);
360 test_items_ok(test15
,5,&Control
,&State
,1,t152
,FALSE
,0);
361 test_items_ok(test16
,5,&Control
,&State
,1,t162
,FALSE
,0);
362 test_items_ok(test17
,6,&Control
,&State
,1,t172
,FALSE
,0);
363 test_items_ok(test18
,5,&Control
,&State
,1,t182
,FALSE
,0);
364 test_items_ok(test19
,6,&Control
,&State
,1,t192
,FALSE
,0);
366 State
.uBidiLevel
= 1;
367 Control
.fMergeNeutralItems
= TRUE
;
368 test_items_ok(test1
,4,&Control
,&State
,1,t12
,FALSE
,0);
369 test_items_ok(test1b
,4,&Control
,&State
,1,t1b2
,FALSE
,0);
370 test_items_ok(test2
,16,&Control
,&State
,4,t23
,FALSE
,0);
371 test_items_ok(test2b
,11,&Control
,&State
,2,t2b3
,FALSE
,4);
372 test_items_ok(test2c
,11,&Control
,&State
,2,t2c4
,FALSE
,4);
373 test_items_ok(test2d
,11,&Control
,&State
,2,t2d4
,FALSE
,4);
374 test_items_ok(test3
,41,&Control
,&State
,1,t32
,FALSE
,0);
375 test_items_ok(test4
,12,&Control
,&State
,3,t43
,FALSE
,4);
376 test_items_ok(test5
,38,&Control
,&State
,1,t51
,FALSE
,0);
377 test_items_ok(test6
,5,&Control
,&State
,1,t63
,FALSE
,2);
378 test_items_ok(test7
,29,&Control
,&State
,3,t73
,FALSE
,0);
379 test_items_ok(test8
,4,&Control
,&State
,1,t81
,FALSE
,0);
380 test_items_ok(test9
,5,&Control
,&State
,1,t93
,FALSE
,2);
381 test_items_ok(test10
,4,&Control
,&State
,1,t101
,FALSE
,0);
382 test_items_ok(test11
,8,&Control
,&State
,1,t112
,FALSE
,0);
383 test_items_ok(test12
,5,&Control
,&State
,1,t122
,FALSE
,0);
384 test_items_ok(test13
,7,&Control
,&State
,1,t132
,FALSE
,0);
385 test_items_ok(test14
,7,&Control
,&State
,1,t142
,FALSE
,0);
386 test_items_ok(test15
,5,&Control
,&State
,1,t152
,FALSE
,0);
387 test_items_ok(test16
,5,&Control
,&State
,1,t162
,FALSE
,0);
388 test_items_ok(test17
,6,&Control
,&State
,1,t172
,FALSE
,0);
389 test_items_ok(test18
,5,&Control
,&State
,1,t182
,FALSE
,0);
390 test_items_ok(test19
,6,&Control
,&State
,1,t192
,FALSE
,0);
393 static inline void _test_shape_ok(int valid
, HDC hdc
, LPCWSTR string
,
394 DWORD cchString
, SCRIPT_CONTROL
*Control
,
395 SCRIPT_STATE
*State
, DWORD item
, DWORD nGlyphs
,
396 const shapeTest_char
* charItems
,
397 const shapeTest_glyph
* glyphItems
)
400 int x
, outnItems
=0, outnGlyphs
=0;
401 SCRIPT_ITEM outpItems
[15];
402 SCRIPT_CACHE sc
= NULL
;
405 int maxGlyphs
= cchString
* 1.5;
406 SCRIPT_GLYPHPROP
*glyphProp
;
407 SCRIPT_CHARPROP
*charProp
;
410 hr
= pScriptItemizeOpenType(string
, cchString
, 15, Control
, State
, outpItems
, tags
, &outnItems
);
411 if (hr
== USP_E_SCRIPT_NOT_IN_FONT
)
414 winetest_win_skip("Select font does not support script\n");
416 winetest_trace("Select font does not support script\n");
420 winetest_ok(!hr
, "ScriptItemizeOpenType should return S_OK not %08x\n", hr
);
422 winetest_trace("ScriptItemizeOpenType should return S_OK not %08x\n", hr
);
425 if (outnItems
<= item
)
428 winetest_win_skip("Did not get enough items\n");
430 winetest_trace("Did not get enough items\n");
434 logclust
= HeapAlloc(GetProcessHeap(), 0, sizeof(WORD
) * cchString
);
435 memset(logclust
,'a',sizeof(WORD
) * cchString
);
436 charProp
= HeapAlloc(GetProcessHeap(), 0, sizeof(SCRIPT_CHARPROP
) * cchString
);
437 memset(charProp
,'a',sizeof(SCRIPT_CHARPROP
) * cchString
);
438 glyphs
= HeapAlloc(GetProcessHeap(), 0, sizeof(WORD
) * maxGlyphs
);
439 memset(glyphs
,'a',sizeof(WORD
) * cchString
);
440 glyphProp
= HeapAlloc(GetProcessHeap(), 0, sizeof(SCRIPT_GLYPHPROP
) * maxGlyphs
);
441 memset(glyphProp
,'a',sizeof(SCRIPT_GLYPHPROP
) * cchString
);
443 hr
= pScriptShapeOpenType(hdc
, &sc
, &outpItems
[item
].a
, tags
[item
], 0x00000000, NULL
, NULL
, 0, string
, cchString
, maxGlyphs
, logclust
, charProp
, glyphs
, glyphProp
, &outnGlyphs
);
445 winetest_ok(hr
== S_OK
, "ScriptShapeOpenType failed (%x)\n",hr
);
447 winetest_trace("ScriptShapeOpenType failed (%x)\n",hr
);
451 for (x
= 0; x
< cchString
; x
++)
454 winetest_ok(logclust
[x
] == charItems
[x
].wLogClust
, "%i: invalid LogClust(%i)\n",x
,logclust
[x
]);
455 else if (logclust
[x
] != charItems
[x
].wLogClust
)
456 winetest_trace("%i: invalid LogClust(%i)\n",x
,logclust
[x
]);
458 winetest_ok(charProp
[x
].fCanGlyphAlone
== charItems
[x
].CharProp
.fCanGlyphAlone
, "%i: invalid fCanGlyphAlone\n",x
);
459 else if (charProp
[x
].fCanGlyphAlone
!= charItems
[x
].CharProp
.fCanGlyphAlone
)
460 winetest_trace("%i: invalid fCanGlyphAlone\n",x
);
464 winetest_ok(nGlyphs
== outnGlyphs
, "got incorrect number of glyphs (%i)\n",outnGlyphs
);
465 else if (nGlyphs
!= outnGlyphs
)
466 winetest_trace("got incorrect number of glyphs (%i)\n",outnGlyphs
);
467 for (x
= 0; x
< outnGlyphs
; x
++)
469 if (glyphItems
[x
].Glyph
)
472 winetest_ok(glyphs
[x
]!=0, "%i: Glyph not present when it should be\n",x
);
473 else if (glyphs
[x
]==0)
474 winetest_trace("%i: Glyph not present when it should be\n",x
);
479 winetest_ok(glyphs
[x
]==0, "%i: Glyph present when it should not be\n",x
);
480 else if (glyphs
[x
]!=0)
481 winetest_trace("%i: Glyph present when it should not be\n",x
);
484 winetest_ok(glyphProp
[x
].sva
.uJustification
== glyphItems
[x
].GlyphProp
.sva
.uJustification
, "%i: uJustification incorrect (%i)\n",x
,glyphProp
[x
].sva
.uJustification
);
485 else if (glyphProp
[x
].sva
.uJustification
!= glyphItems
[x
].GlyphProp
.sva
.uJustification
)
486 winetest_trace("%i: uJustification incorrect (%i)\n",x
,glyphProp
[x
].sva
.uJustification
);
488 winetest_ok(glyphProp
[x
].sva
.fClusterStart
== glyphItems
[x
].GlyphProp
.sva
.fClusterStart
, "%i: fClusterStart incorrect (%i)\n",x
,glyphProp
[x
].sva
.fClusterStart
);
489 else if (glyphProp
[x
].sva
.fClusterStart
!= glyphItems
[x
].GlyphProp
.sva
.fClusterStart
)
490 winetest_trace("%i: fClusterStart incorrect (%i)\n",x
,glyphProp
[x
].sva
.fClusterStart
);
492 winetest_ok(glyphProp
[x
].sva
.fDiacritic
== glyphItems
[x
].GlyphProp
.sva
.fDiacritic
, "%i: fDiacritic incorrect (%i)\n",x
,glyphProp
[x
].sva
.fDiacritic
);
493 else if (glyphProp
[x
].sva
.fDiacritic
!= glyphItems
[x
].GlyphProp
.sva
.fDiacritic
)
494 winetest_trace("%i: fDiacritic incorrect (%i)\n",x
,glyphProp
[x
].sva
.fDiacritic
);
496 winetest_ok(glyphProp
[x
].sva
.fZeroWidth
== glyphItems
[x
].GlyphProp
.sva
.fZeroWidth
, "%i: fZeroWidth incorrect (%i)\n",x
,glyphProp
[x
].sva
.fZeroWidth
);
497 else if (glyphProp
[x
].sva
.fZeroWidth
!= glyphItems
[x
].GlyphProp
.sva
.fZeroWidth
)
498 winetest_trace("%i: fZeroWidth incorrect (%i)\n",x
,glyphProp
[x
].sva
.fZeroWidth
);
501 HeapFree(GetProcessHeap(),0,logclust
);
502 HeapFree(GetProcessHeap(),0,charProp
);
503 HeapFree(GetProcessHeap(),0,glyphs
);
504 HeapFree(GetProcessHeap(),0,glyphProp
);
505 ScriptFreeCache(&sc
);
508 #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)
510 #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)
512 typedef struct tagRangeP
{
517 static int CALLBACK
enumFontProc( const LOGFONT
*lpelfe
, const TEXTMETRIC
*lpntme
,
518 DWORD FontType
, LPARAM lParam
)
520 NEWTEXTMETRICEX
*ntme
= (NEWTEXTMETRICEX
*)lpntme
;
521 fontEnumParam
*rp
= (fontEnumParam
*) lParam
;
526 if (FontType
!= TRUETYPE_FONTTYPE
)
530 while (i
> sizeof(DWORD
)*8)
533 i
-= (sizeof(DWORD
)*8);
540 if (ntme
->ntmFontSig
.fsUsb
[idx
] & mask
)
542 memcpy(&(rp
->lf
),lpelfe
,sizeof(LOGFONT
));
548 static int _find_font_for_range(HDC hdc
, const CHAR
*recommended
, BYTE range
, const WCHAR check
, HFONT
*hfont
, HFONT
*origFont
)
551 fontEnumParam lParam
;
553 lParam
.range
= range
;
554 memset(&lParam
.lf
,0,sizeof(LOGFONT
));
559 lstrcpyA(lParam
.lf
.lfFaceName
, recommended
);
560 if (!EnumFontFamiliesExA(hdc
, &lParam
.lf
, enumFontProc
, (LPARAM
)&lParam
, 0))
562 *hfont
= CreateFontIndirectA(&lParam
.lf
);
565 winetest_trace("using font %s\n",lParam
.lf
.lfFaceName
);
573 memset(&lParam
.lf
,0,sizeof(LOGFONT
));
574 lParam
.lf
.lfCharSet
= DEFAULT_CHARSET
;
576 if (!EnumFontFamiliesExA(hdc
, &lParam
.lf
, enumFontProc
, (LPARAM
)&lParam
, 0) && lParam
.lf
.lfFaceName
[0])
578 *hfont
= CreateFontIndirectA(&lParam
.lf
);
580 winetest_trace("trying font %s: failures will only be warnings\n",lParam
.lf
.lfFaceName
);
588 *origFont
= SelectObject(hdc
,*hfont
);
589 if (pGetGlyphIndicesW
&& (pGetGlyphIndicesW(hdc
, &check
, 1, &glyph
, 0) == GDI_ERROR
|| glyph
==0))
591 winetest_trace(" Font fails to contain required glyphs\n");
592 SelectObject(hdc
,*origFont
);
593 DeleteObject(*hfont
);
601 winetest_trace("Failed to find usable font\n");
606 #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)
608 static void test_ScriptShapeOpenType(HDC hdc
)
611 SCRIPT_CACHE sc
= NULL
;
612 WORD glyphs
[4], logclust
[4];
613 SCRIPT_GLYPHPROP glyphProp
[4];
614 SCRIPT_ITEM items
[2];
616 SCRIPT_CONTROL Control
;
619 HFONT hfont
, hfont_orig
;
622 static const WCHAR test1
[] = {'w', 'i', 'n', 'e',0};
623 static const shapeTest_char t1_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{3,{0,0}}};
624 static const shapeTest_glyph t1_g
[] = {
625 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
626 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
627 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
628 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}} };
630 static const WCHAR test2
[] = {0x202B, 'i', 'n', 0x202C,0};
631 static const shapeTest_char t2_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{3,{0,0}}};
632 static const shapeTest_glyph t2_g
[] = {
633 {0,{{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 {0,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}} };
639 static const WCHAR test_hebrew
[] = {0x05e9, 0x05dc, 0x05d5, 0x05dd,0};
640 static const shapeTest_char hebrew_c
[] = {{3,{0,0}},{2,{0,0}},{1,{0,0}},{0,{0,0}}};
641 static const shapeTest_glyph hebrew_g
[] = {
642 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
643 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
644 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
645 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}} };
648 static const WCHAR test_arabic
[] = {0x0633,0x0644,0x0627,0x0645,0};
649 static const shapeTest_char arabic_c
[] = {{2,{0,0}},{1,{0,0}},{1,{0,0}},{0,{0,0}}};
650 static const shapeTest_glyph arabic_g
[] = {
651 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
652 {1,{{SCRIPT_JUSTIFY_ARABIC_NORMAL
,1,0,0,0,0},0}},
653 {1,{{SCRIPT_JUSTIFY_ARABIC_SEEN
,1,0,0,0,0},0}} };
656 static const WCHAR test_thai
[] = {0x0e2a, 0x0e04, 0x0e23, 0x0e34, 0x0e1b, 0x0e15, 0x0e4c, 0x0e44, 0x0e17, 0x0e22,};
657 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}}};
658 static const shapeTest_glyph thai_g
[] = {
659 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
660 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
661 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
662 {1,{{SCRIPT_JUSTIFY_CHARACTER
,0,1,1,0,0},0}},
663 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
664 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
665 {1,{{SCRIPT_JUSTIFY_CHARACTER
,0,1,1,0,0},0}},
666 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
667 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
668 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}}};
671 static const WCHAR test_syriac
[] = {0x0710, 0x0710, 0x0710, 0x0728, 0x0718, 0x0723,0};
672 static const shapeTest_char syriac_c
[] = {{5,{0,0}},{4,{0,0}},{3,{0,0}},{2,{0,0}},{1,{0,0}},{0,{0,0}}};
673 static const shapeTest_glyph syriac_g
[] = {
674 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
675 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
676 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
677 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
678 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
679 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
682 static const WCHAR test_thaana
[] = {0x078a, 0x07ae, 0x0792, 0x07b0, 0x0020, 0x0796, 0x07aa, 0x0789, 0x07b0, 0x0795, 0x07ac, 0x0791, 0x07b0};
683 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}}};
684 static const shapeTest_glyph thaana_g
[] = {
685 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
686 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
687 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
688 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
689 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
690 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
691 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
692 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
693 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
694 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
695 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
696 {1,{{SCRIPT_JUSTIFY_NONE
,0,1,1,0,0},0}},
697 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
700 static const WCHAR test_phagspa
[] = {0xa84f, 0xa861, 0xa843, 0x0020, 0xa863, 0xa861, 0xa859, 0x0020, 0xa850, 0xa85c, 0xa85e};
701 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}}};
702 static const shapeTest_glyph phagspa_g
[] = {
703 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
704 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
705 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
706 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
707 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
708 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
709 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
710 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
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_NONE
,1,0,0,0,0},0}} };
716 static const WCHAR test_lao
[] = {0x0ead, 0x0eb1, 0x0e81, 0x0eaa, 0x0ead, 0x0e99, 0x0ea5, 0x0eb2, 0x0ea7, 0};
717 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}}};
718 static const shapeTest_glyph lao_g
[] = {
719 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
720 {1,{{SCRIPT_JUSTIFY_CHARACTER
,0,1,1,0,0},0}},
721 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
722 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
723 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
724 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
725 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
726 {1,{{SCRIPT_JUSTIFY_CHARACTER
,1,0,0,0,0},0}},
727 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
730 static const WCHAR test_tibetan
[] = {0x0f04, 0x0f05, 0x0f0e, 0x0020, 0x0f51, 0x0f7c, 0x0f53, 0x0f0b, 0x0f5a, 0x0f53, 0x0f0b, 0x0f51, 0x0f44, 0x0f0b, 0x0f54, 0x0f7c, 0x0f0d};
731 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}}};
732 static const shapeTest_glyph tibetan_g
[] = {
733 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
734 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
735 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
736 {1,{{SCRIPT_JUSTIFY_BLANK
,1,0,0,0,0},0}},
737 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
738 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
739 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
740 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
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_NONE
,1,0,0,0,0},0}},
745 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
746 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
747 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
748 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
749 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
752 static const WCHAR test_devanagari
[] = {0x0926, 0x0947, 0x0935, 0x0928, 0x093e, 0x0917, 0x0930, 0x0940};
753 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}}};
754 static const shapeTest_glyph devanagari_g
[] = {
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}},
758 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
759 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
760 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
761 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
762 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
765 static const WCHAR test_bengali
[] = {0x09ac, 0x09be, 0x0982, 0x09b2, 0x09be};
766 static const shapeTest_char bengali_c
[] = {{0,{0,0}},{0,{0,0}},{0,{0,0}},{3,{0,0}},{3,{0,0}}};
767 static const shapeTest_glyph bengali_g
[] = {
768 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
769 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
770 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
771 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
772 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
775 static const WCHAR test_gurmukhi
[] = {0x0a17, 0x0a41, 0x0a30, 0x0a2e, 0x0a41, 0x0a16, 0x0a40};
776 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}}};
777 static const shapeTest_glyph gurmukhi_g
[] = {
778 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
779 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
780 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
781 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
782 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
783 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
784 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
787 static const WCHAR test_gujarati
[] = {0x0a97, 0x0ac1, 0x0a9c, 0x0ab0, 0x0abe, 0x0aa4, 0x0ac0};
788 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}}};
789 static const shapeTest_glyph gujarati_g
[] = {
790 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
791 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
792 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
793 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
794 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
795 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
796 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
799 static const WCHAR test_oriya
[] = {0x0b13, 0x0b21, 0x0b3c, 0x0b3f, 0x0b06};
800 static const shapeTest_char oriya_c
[] = {{0,{0,0}},{1,{0,0}},{1,{0,0}},{1,{0,0}},{3,{0,0}}};
801 static const shapeTest_glyph oriya_g
[] = {
802 {1,{{SCRIPT_JUSTIFY_NONE
,1,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}},
805 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
808 static const WCHAR test_tamil
[] = {0x0ba4, 0x0bae, 0x0bbf, 0x0bb4, 0x0bcd};
809 static const shapeTest_char tamil_c
[] = {{0,{0,0}},{1,{0,0}},{1,{0,0}},{3,{0,0}},{3,{0,0}}};
810 static const shapeTest_glyph tamil_g
[] = {
811 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
812 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
813 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
814 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}} };
817 static const WCHAR test_telugu
[] = {0x0c24, 0x0c46, 0x0c32, 0x0c41, 0x0c17, 0x0c41};
818 static const shapeTest_char telugu_c
[] = {{0,{0,0}},{0,{0,0}},{2,{0,0}},{2,{0,0}},{4,{0,0}},{4,{0,0}}};
819 static const shapeTest_glyph telugu_g
[] = {
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}},
823 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
824 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
825 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
828 static const WCHAR test_malayalam
[] = {0x0d2e, 0x0d32, 0x0d2f, 0x0d3e, 0x0d33, 0x0d02};
829 static const shapeTest_char malayalam_c
[] = {{0,{0,0}},{1,{0,0}},{2,{0,0}},{2,{0,0}},{4,{0,0}},{4,{0,0}}};
830 static const shapeTest_glyph malayalam_g
[] = {
831 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
832 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
833 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
834 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}},
835 {1,{{SCRIPT_JUSTIFY_NONE
,1,0,0,0,0},0}},
836 {1,{{SCRIPT_JUSTIFY_NONE
,0,0,0,0,0},0}} };
838 if (!pScriptItemizeOpenType
|| !pScriptShapeOpenType
)
840 win_skip("ScriptShapeOpenType not available on this platform\n");
844 memset(&Control
, 0 , sizeof(Control
));
845 memset(&State
, 0 , sizeof(State
));
847 hr
= pScriptItemizeOpenType(test1
, 4, 2, &Control
, &State
, items
, tags
, &outnItems
);
848 ok(!hr
, "ScriptItemizeOpenType should return S_OK not %08x\n", hr
);
849 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
851 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, NULL
, &nb
);
852 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_INVALIDARG not %08x\n", hr
);
854 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, glyphProp
, NULL
);
855 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_INVALIDARG not %08x\n", hr
);
857 hr
= pScriptShapeOpenType(NULL
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, glyphProp
, &nb
);
858 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_PENDING not %08x\n", hr
);
860 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, NULL
, NULL
, glyphs
, glyphProp
, &nb
);
861 ok( hr
== E_INVALIDARG
,
862 "ScriptShapeOpenType should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
863 hr
= pScriptShapeOpenType(hdc
, &sc
, &items
[0].a
, tags
[0], 0x00000000, NULL
, NULL
, 0, test1
, 4, 4, logclust
, NULL
, glyphs
, glyphProp
, &nb
);
864 ok(hr
== E_INVALIDARG
, "ScriptShapeOpenType should return E_INVALIDARG not %08x\n", hr
);
866 ScriptFreeCache(&sc
);
868 test_shape_ok(hdc
, test1
, 4, &Control
, &State
, 0, 4, t1_c
, t1_g
);
869 test_shape_ok(hdc
, test2
, 4, &Control
, &State
, 1, 4, t2_c
, t2_g
);
871 test_valid
= find_font_for_range(hdc
, "Microsoft Sans Serif", 11, test_hebrew
[0], &hfont
, &hfont_orig
);
874 test_shape_ok_valid(test_valid
, hdc
, test_hebrew
, 4, &Control
, &State
, 0, 4, hebrew_c
, hebrew_g
);
875 SelectObject(hdc
, hfont_orig
);
879 test_valid
= find_font_for_range(hdc
, "Microsoft Sans Serif", 13, test_arabic
[0], &hfont
, &hfont_orig
);
882 test_shape_ok_valid(test_valid
, hdc
, test_arabic
, 4, &Control
, &State
, 0, 3, arabic_c
, arabic_g
);
883 SelectObject(hdc
, hfont_orig
);
887 test_valid
= find_font_for_range(hdc
, "Microsoft Sans Serif", 24, test_thai
[0], &hfont
, &hfont_orig
);
890 test_shape_ok_valid(test_valid
, hdc
, test_thai
, 10, &Control
, &State
, 0, 10, thai_c
, thai_g
);
891 SelectObject(hdc
, hfont_orig
);
895 test_valid
= find_font_for_range(hdc
, "Estrangelo Edessa", 71, test_syriac
[0], &hfont
, &hfont_orig
);
898 test_shape_ok_valid(test_valid
, hdc
, test_syriac
, 6, &Control
, &State
, 0, 6, syriac_c
, syriac_g
);
899 SelectObject(hdc
, hfont_orig
);
903 test_valid
= find_font_for_range(hdc
, "MV Boli", 72, test_thaana
[0], &hfont
, &hfont_orig
);
906 test_shape_ok_valid(test_valid
, hdc
, test_thaana
, 13, &Control
, &State
, 0, 13, thaana_c
, thaana_g
);
907 SelectObject(hdc
, hfont_orig
);
911 test_valid
= find_font_for_range(hdc
, "Microsoft PhagsPa", 53, test_phagspa
[0], &hfont
, &hfont_orig
);
914 test_shape_ok_valid(test_valid
, hdc
, test_phagspa
, 11, &Control
, &State
, 0, 11, phagspa_c
, phagspa_g
);
915 SelectObject(hdc
, hfont_orig
);
919 test_valid
= find_font_for_range(hdc
, "DokChampa", 25, test_lao
[0], &hfont
, &hfont_orig
);
922 test_shape_ok_valid(test_valid
, hdc
, test_lao
, 9, &Control
, &State
, 0, 9, lao_c
, lao_g
);
923 SelectObject(hdc
, hfont_orig
);
927 test_valid
= find_font_for_range(hdc
, "Microsoft Himalaya", 70, test_tibetan
[0], &hfont
, &hfont_orig
);
930 test_shape_ok_valid(test_valid
, hdc
, test_tibetan
, 17, &Control
, &State
, 0, 17, tibetan_c
, tibetan_g
);
931 SelectObject(hdc
, hfont_orig
);
935 test_valid
= find_font_for_range(hdc
, "Mangal", 15, test_devanagari
[0], &hfont
, &hfont_orig
);
938 test_shape_ok_valid(test_valid
, hdc
, test_devanagari
, 8, &Control
, &State
, 0, 8, devanagari_c
, devanagari_g
);
939 SelectObject(hdc
, hfont_orig
);
943 test_valid
= find_font_for_range(hdc
, "Vrinda", 16, test_bengali
[0], &hfont
, &hfont_orig
);
946 test_shape_ok_valid(test_valid
, hdc
, test_bengali
, 5, &Control
, &State
, 0, 5, bengali_c
, bengali_g
);
947 SelectObject(hdc
, hfont_orig
);
951 test_valid
= find_font_for_range(hdc
, "Raavi", 17, test_gurmukhi
[0], &hfont
, &hfont_orig
);
954 test_shape_ok_valid(test_valid
, hdc
, test_gurmukhi
, 7, &Control
, &State
, 0, 7, gurmukhi_c
, gurmukhi_g
);
955 SelectObject(hdc
, hfont_orig
);
959 test_valid
= find_font_for_range(hdc
, "Shruti", 18, test_gujarati
[0], &hfont
, &hfont_orig
);
962 test_shape_ok_valid(test_valid
, hdc
, test_gujarati
, 7, &Control
, &State
, 0, 7, gujarati_c
, gujarati_g
);
963 SelectObject(hdc
, hfont_orig
);
967 test_valid
= find_font_for_range(hdc
, "Kalinga", 19, test_oriya
[0], &hfont
, &hfont_orig
);
970 test_shape_ok_valid(test_valid
, hdc
, test_oriya
, 5, &Control
, &State
, 0, 4, oriya_c
, oriya_g
);
971 SelectObject(hdc
, hfont_orig
);
975 test_valid
= find_font_for_range(hdc
, "Latha", 20, test_tamil
[0], &hfont
, &hfont_orig
);
978 test_shape_ok_valid(test_valid
, hdc
, test_tamil
, 5, &Control
, &State
, 0, 4, tamil_c
, tamil_g
);
979 SelectObject(hdc
, hfont_orig
);
983 test_valid
= find_font_for_range(hdc
, "Gautami", 21, test_telugu
[0], &hfont
, &hfont_orig
);
986 test_shape_ok_valid(test_valid
, hdc
, test_telugu
, 6, &Control
, &State
, 0, 6, telugu_c
, telugu_g
);
987 SelectObject(hdc
, hfont_orig
);
991 test_valid
= find_font_for_range(hdc
, "Kartika", 23, test_malayalam
[0], &hfont
, &hfont_orig
);
994 test_shape_ok_valid(test_valid
, hdc
, test_malayalam
, 6, &Control
, &State
, 0, 6, malayalam_c
, malayalam_g
);
995 SelectObject(hdc
, hfont_orig
);
1000 static void test_ScriptShape(HDC hdc
)
1002 static const WCHAR test1
[] = {'w', 'i', 'n', 'e',0};
1003 static const WCHAR test2
[] = {0x202B, 'i', 'n', 0x202C,0};
1005 SCRIPT_CACHE sc
= NULL
;
1006 WORD glyphs
[4], glyphs2
[4], logclust
[4];
1007 SCRIPT_VISATTR attrs
[4];
1008 SCRIPT_ITEM items
[2];
1011 hr
= ScriptItemize(test1
, 4, 2, NULL
, NULL
, items
, NULL
);
1012 ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
1013 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1015 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, NULL
, &nb
);
1016 ok(hr
== E_INVALIDARG
, "ScriptShape should return E_INVALIDARG not %08x\n", hr
);
1018 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, attrs
, NULL
);
1019 ok(hr
== E_INVALIDARG
, "ScriptShape should return E_INVALIDARG not %08x\n", hr
);
1021 hr
= ScriptShape(NULL
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, attrs
, &nb
);
1022 ok(hr
== E_PENDING
, "ScriptShape should return E_PENDING not %08x\n", hr
);
1024 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, NULL
, attrs
, &nb
);
1025 ok(broken(hr
== S_OK
) ||
1026 hr
== E_INVALIDARG
|| /* Vista, W2K8 */
1027 hr
== E_FAIL
, /* WIN7 */
1028 "ScriptShape should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
1029 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1031 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, logclust
, attrs
, &nb
);
1032 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1033 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1036 memset(glyphs
,-1,sizeof(glyphs
));
1037 memset(logclust
,-1,sizeof(logclust
));
1038 memset(attrs
,-1,sizeof(attrs
));
1039 hr
= ScriptShape(NULL
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, logclust
, attrs
, &nb
);
1040 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1041 ok(nb
== 4, "Wrong number of items\n");
1042 ok(logclust
[0] == 0, "clusters out of order\n");
1043 ok(logclust
[1] == 1, "clusters out of order\n");
1044 ok(logclust
[2] == 2, "clusters out of order\n");
1045 ok(logclust
[3] == 3, "clusters out of order\n");
1046 ok(attrs
[0].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1047 ok(attrs
[1].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1048 ok(attrs
[2].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1049 ok(attrs
[3].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1050 ok(attrs
[0].fClusterStart
== 1, "fClusterStart incorrect\n");
1051 ok(attrs
[1].fClusterStart
== 1, "fClusterStart incorrect\n");
1052 ok(attrs
[2].fClusterStart
== 1, "fClusterStart incorrect\n");
1053 ok(attrs
[3].fClusterStart
== 1, "fClusterStart incorrect\n");
1054 ok(attrs
[0].fDiacritic
== 0, "fDiacritic incorrect\n");
1055 ok(attrs
[1].fDiacritic
== 0, "fDiacritic incorrect\n");
1056 ok(attrs
[2].fDiacritic
== 0, "fDiacritic incorrect\n");
1057 ok(attrs
[3].fDiacritic
== 0, "fDiacritic incorrect\n");
1058 ok(attrs
[0].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1059 ok(attrs
[1].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1060 ok(attrs
[2].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1061 ok(attrs
[3].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1063 ScriptFreeCache(&sc
);
1066 memset(glyphs2
,-1,sizeof(glyphs2
));
1067 memset(logclust
,-1,sizeof(logclust
));
1068 memset(attrs
,-1,sizeof(attrs
));
1069 hr
= ScriptShape(hdc
, &sc
, test2
, 4, 4, &items
[0].a
, glyphs2
, logclust
, attrs
, &nb
);
1070 ok(hr
== S_OK
, "ScriptShape should return S_OK not %08x\n", hr
);
1071 ok(nb
== 4, "Wrong number of items\n");
1072 ok(glyphs2
[0] == 0 || broken(glyphs2
[0] == 0x80), "Incorrect glyph for 0x202B\n");
1073 ok(glyphs2
[3] == 0 || broken(glyphs2
[3] == 0x80), "Incorrect glyph for 0x202C\n");
1074 ok(logclust
[0] == 0, "clusters out of order\n");
1075 ok(logclust
[1] == 1, "clusters out of order\n");
1076 ok(logclust
[2] == 2, "clusters out of order\n");
1077 ok(logclust
[3] == 3, "clusters out of order\n");
1078 ok(attrs
[0].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1079 ok(attrs
[1].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1080 ok(attrs
[2].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1081 ok(attrs
[3].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1082 ok(attrs
[0].fClusterStart
== 1, "fClusterStart incorrect\n");
1083 ok(attrs
[1].fClusterStart
== 1, "fClusterStart incorrect\n");
1084 ok(attrs
[2].fClusterStart
== 1, "fClusterStart incorrect\n");
1085 ok(attrs
[3].fClusterStart
== 1, "fClusterStart incorrect\n");
1086 ok(attrs
[0].fDiacritic
== 0, "fDiacritic incorrect\n");
1087 ok(attrs
[1].fDiacritic
== 0, "fDiacritic incorrect\n");
1088 ok(attrs
[2].fDiacritic
== 0, "fDiacritic incorrect\n");
1089 ok(attrs
[3].fDiacritic
== 0, "fDiacritic incorrect\n");
1090 ok(attrs
[0].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1091 ok(attrs
[1].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1092 ok(attrs
[2].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1093 ok(attrs
[3].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1095 /* modify LTR to RTL */
1096 items
[0].a
.fRTL
= 1;
1097 memset(glyphs2
,-1,sizeof(glyphs2
));
1098 memset(logclust
,-1,sizeof(logclust
));
1099 memset(attrs
,-1,sizeof(attrs
));
1100 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs2
, logclust
, attrs
, &nb
);
1101 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1102 ok(nb
== 4, "Wrong number of items\n");
1103 ok(glyphs2
[0] == glyphs
[3], "Glyphs not reordered properly\n");
1104 ok(glyphs2
[1] == glyphs
[2], "Glyphs not reordered properly\n");
1105 ok(glyphs2
[2] == glyphs
[1], "Glyphs not reordered properly\n");
1106 ok(glyphs2
[3] == glyphs
[0], "Glyphs not reordered properly\n");
1107 ok(logclust
[0] == 3, "clusters out of order\n");
1108 ok(logclust
[1] == 2, "clusters out of order\n");
1109 ok(logclust
[2] == 1, "clusters out of order\n");
1110 ok(logclust
[3] == 0, "clusters out of order\n");
1111 ok(attrs
[0].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1112 ok(attrs
[1].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1113 ok(attrs
[2].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1114 ok(attrs
[3].uJustification
== SCRIPT_JUSTIFY_CHARACTER
, "uJustification incorrect\n");
1115 ok(attrs
[0].fClusterStart
== 1, "fClusterStart incorrect\n");
1116 ok(attrs
[1].fClusterStart
== 1, "fClusterStart incorrect\n");
1117 ok(attrs
[2].fClusterStart
== 1, "fClusterStart incorrect\n");
1118 ok(attrs
[3].fClusterStart
== 1, "fClusterStart incorrect\n");
1119 ok(attrs
[0].fDiacritic
== 0, "fDiacritic incorrect\n");
1120 ok(attrs
[1].fDiacritic
== 0, "fDiacritic incorrect\n");
1121 ok(attrs
[2].fDiacritic
== 0, "fDiacritic incorrect\n");
1122 ok(attrs
[3].fDiacritic
== 0, "fDiacritic incorrect\n");
1123 ok(attrs
[0].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1124 ok(attrs
[1].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1125 ok(attrs
[2].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1126 ok(attrs
[3].fZeroWidth
== 0, "fZeroWidth incorrect\n");
1128 ScriptFreeCache(&sc
);
1131 static void test_ScriptPlace(HDC hdc
)
1133 static const WCHAR test1
[] = {'t', 'e', 's', 't',0};
1136 SCRIPT_CACHE sc
= NULL
;
1137 WORD glyphs
[4], logclust
[4];
1138 SCRIPT_VISATTR attrs
[4];
1139 SCRIPT_ITEM items
[2];
1144 hr
= ScriptItemize(test1
, 4, 2, NULL
, NULL
, items
, NULL
);
1145 ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
1146 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1148 hr
= ScriptShape(hdc
, &sc
, test1
, 4, 4, &items
[0].a
, glyphs
, logclust
, attrs
, &nb
);
1149 ok(!hr
, "ScriptShape should return S_OK not %08x\n", hr
);
1150 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1152 hr
= ScriptPlace(hdc
, &sc
, glyphs
, 4, NULL
, &items
[0].a
, widths
, NULL
, NULL
);
1153 ok(hr
== E_INVALIDARG
, "ScriptPlace should return E_INVALIDARG not %08x\n", hr
);
1155 hr
= ScriptPlace(NULL
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, NULL
, NULL
);
1156 ok(broken(hr
== E_PENDING
) ||
1157 hr
== E_INVALIDARG
|| /* Vista, W2K8 */
1158 hr
== E_FAIL
, /* WIN7 */
1159 "ScriptPlace should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
1161 hr
= ScriptPlace(NULL
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, offset
, NULL
);
1162 ok(hr
== E_PENDING
, "ScriptPlace should return E_PENDING not %08x\n", hr
);
1164 hr
= ScriptPlace(NULL
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, NULL
, abc
);
1165 ok(broken(hr
== E_PENDING
) ||
1166 hr
== E_INVALIDARG
|| /* Vista, W2K8 */
1167 hr
== E_FAIL
, /* WIN7 */
1168 "ScriptPlace should return E_FAIL or E_INVALIDARG, not %08x\n", hr
);
1170 hr
= ScriptPlace(hdc
, &sc
, glyphs
, 4, attrs
, &items
[0].a
, widths
, offset
, NULL
);
1171 ok(!hr
, "ScriptPlace should return S_OK not %08x\n", hr
);
1172 ok(items
[0].a
.fNoGlyphIndex
== FALSE
, "fNoGlyphIndex TRUE\n");
1174 ret
= ExtTextOutW(hdc
, 1, 1, 0, NULL
, glyphs
, 4, widths
);
1175 ok(ret
, "ExtTextOutW should return TRUE\n");
1177 ScriptFreeCache(&sc
);
1180 static void test_ScriptItemIzeShapePlace(HDC hdc
, unsigned short pwOutGlyphs
[256])
1184 const SCRIPT_PROPERTIES
**ppSp
;
1188 SCRIPT_ITEM pItem
[255];
1190 WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1191 WCHAR TestItem2
[] = {'T', 'e', 's', 't', 'b', 0};
1192 WCHAR TestItem3
[] = {'T', 'e', 's', 't', 'c',' ','1','2','3',' ',' ','e','n','d',0};
1193 WCHAR TestItem4
[] = {'T', 'e', 's', 't', 'd',' ',0x0684,0x0694,0x06a4,' ',' ','\r','\n','e','n','d',0};
1194 WCHAR TestItem5
[] = {0x0684,'T','e','s','t','e',' ',0x0684,0x0694,0x06a4,' ',' ','e','n','d',0};
1195 WCHAR TestItem6
[] = {'T', 'e', 's', 't', 'f',' ',' ',' ','\r','\n','e','n','d',0};
1200 unsigned short pwOutGlyphs1
[256];
1201 unsigned short pwOutGlyphs2
[256];
1202 unsigned short pwLogClust
[256];
1203 SCRIPT_VISATTR psva
[256];
1206 GOFFSET pGoffset
[256];
1210 /* Start testing usp10 functions */
1211 /* This test determines that the pointer returned by ScriptGetProperties is valid
1212 * by checking a known value in the table */
1213 hr
= ScriptGetProperties(&ppSp
, &iMaxProps
);
1214 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
1215 trace("number of script properties %d\n", iMaxProps
);
1216 ok (iMaxProps
> 0, "Number of scripts returned should not be 0\n");
1218 ok( ppSp
[0]->langid
== 0, "Langid[0] not = to 0\n"); /* Check a known value to ensure */
1221 /* This is a valid test that will cause parsing to take place */
1224 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1225 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1226 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1228 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1230 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1231 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1232 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1234 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1235 * ie. ScriptItemize has succeeded and that pItem has been set */
1238 psc
= NULL
; /* must be null on first call */
1240 cMaxGlyphs
= cInChars
;
1241 hr
= ScriptShape(NULL
, &psc
, TestItem1
, cChars
,
1242 cMaxGlyphs
, &pItem
[0].a
,
1243 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1244 ok (hr
== E_PENDING
, "If psc is NULL (%08x) the E_PENDING should be returned\n", hr
);
1246 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1247 cMaxGlyphs
, &pItem
[0].a
,
1248 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1249 ok (hr
== E_OUTOFMEMORY
, "If not enough output area cChars (%d) is > than CMaxGlyphs "
1250 "(%d) but not E_OUTOFMEMORY\n",
1251 cChars
, cMaxGlyphs
);
1253 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1254 cMaxGlyphs
, &pItem
[0].a
,
1255 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1256 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1257 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1258 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1260 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1262 ok (hr
== 0, "ScriptPlace should return 0 not (%08x)\n", hr
);
1263 hr
= ScriptPlace(NULL
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1265 ok (hr
== 0, "ScriptPlace should return 0 not (%08x)\n", hr
);
1266 for (cnt
=0; cnt
< pcGlyphs
; cnt
++)
1267 pwOutGlyphs
[cnt
] = pwOutGlyphs1
[cnt
]; /* Send to next function */
1270 /* This test will check to make sure that SCRIPT_CACHE is reused and that not translation *
1271 * takes place if fNoGlyphIndex is set. */
1275 hr
= ScriptItemize(TestItem2
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1276 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1277 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1279 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1280 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1281 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1282 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue */
1286 pItem
[0].a
.fNoGlyphIndex
= 1; /* say no translate */
1287 hr
= ScriptShape(NULL
, &psc
, TestItem2
, cChars
,
1288 cMaxGlyphs
, &pItem
[0].a
,
1289 pwOutGlyphs2
, pwLogClust
, psva
, &pcGlyphs
);
1290 ok (hr
!= E_PENDING
, "If psc should not be NULL (%08x) and the E_PENDING should be returned\n", hr
);
1291 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1292 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1293 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1294 for (cnt
=0; cnt
< cChars
&& TestItem2
[cnt
] == pwOutGlyphs2
[cnt
]; cnt
++) {}
1295 ok (cnt
== cChars
, "Translation to place when told not to. WCHAR %d - %04x != %04x\n",
1296 cnt
, TestItem2
[cnt
], pwOutGlyphs2
[cnt
]);
1298 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs2
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1300 ok (hr
== 0, "ScriptPlace should return 0 not (%08x)\n", hr
);
1303 ScriptFreeCache( &psc
);
1304 ok (!psc
, "psc is not null after ScriptFreeCache\n");
1308 /* This is a valid test that will cause parsing to take place and create 3 script_items */
1309 cInChars
= (sizeof(TestItem3
)/2)-1;
1311 hr
= ScriptItemize(TestItem3
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1312 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1315 ok (pcItems
== 3, "The number of SCRIPT_ITEMS should be 3 not %d\n", pcItems
);
1318 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== 6,
1319 "Start pos [0] not = 0 (%d) or end pos [1] not = %d\n",
1320 pItem
[0].iCharPos
, pItem
[1].iCharPos
);
1321 ok (pItem
[1].iCharPos
== 6 && pItem
[2].iCharPos
== 11,
1322 "Start pos [1] not = 6 (%d) or end pos [2] not = 11 (%d)\n",
1323 pItem
[1].iCharPos
, pItem
[2].iCharPos
);
1324 ok (pItem
[2].iCharPos
== 11 && pItem
[3].iCharPos
== cInChars
,
1325 "Start pos [2] not = 11 (%d) or end [3] pos not = 14 (%d), cInChars = %d\n",
1326 pItem
[2].iCharPos
, pItem
[3].iCharPos
, cInChars
);
1330 /* This is a valid test that will cause parsing to take place and create 5 script_items */
1331 cInChars
= (sizeof(TestItem4
)/2)-1;
1333 hr
= ScriptItemize(TestItem4
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1334 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1337 ok (pcItems
== 5, "The number of SCRIPT_ITEMS should be 5 not %d\n", pcItems
);
1340 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== 6,
1341 "Start pos [0] not = 0 (%d) or end pos [1] not = %d\n",
1342 pItem
[0].iCharPos
, pItem
[1].iCharPos
);
1343 ok (pItem
[0].a
.s
.uBidiLevel
== 0, "Should have been bidi=0 not %d\n",
1344 pItem
[0].a
.s
.uBidiLevel
);
1345 ok (pItem
[1].iCharPos
== 6 && pItem
[2].iCharPos
== 11,
1346 "Start pos [1] not = 6 (%d) or end pos [2] not = 11 (%d)\n",
1347 pItem
[1].iCharPos
, pItem
[2].iCharPos
);
1348 ok (pItem
[1].a
.s
.uBidiLevel
== 1, "Should have been bidi=1 not %d\n",
1349 pItem
[1].a
.s
.uBidiLevel
);
1350 ok (pItem
[2].iCharPos
== 11 && pItem
[3].iCharPos
== 12,
1351 "Start pos [2] not = 11 (%d) or end [3] pos not = 12 (%d)\n",
1352 pItem
[2].iCharPos
, pItem
[3].iCharPos
);
1353 ok (pItem
[2].a
.s
.uBidiLevel
== 0, "Should have been bidi=0 not %d\n",
1354 pItem
[2].a
.s
.uBidiLevel
);
1355 ok (pItem
[3].iCharPos
== 12 && pItem
[4].iCharPos
== 13,
1356 "Start pos [3] not = 12 (%d) or end [4] pos not = 13 (%d)\n",
1357 pItem
[3].iCharPos
, pItem
[4].iCharPos
);
1358 ok (pItem
[3].a
.s
.uBidiLevel
== 0, "Should have been bidi=0 not %d\n",
1359 pItem
[3].a
.s
.uBidiLevel
);
1360 ok (pItem
[4].iCharPos
== 13 && pItem
[5].iCharPos
== cInChars
,
1361 "Start pos [4] not = 13 (%d) or end [5] pos not = 16 (%d), cInChars = %d\n",
1362 pItem
[4].iCharPos
, pItem
[5].iCharPos
, cInChars
);
1367 * This test is for when the first unicode character requires bidi support
1369 cInChars
= (sizeof(TestItem5
)-1)/sizeof(WCHAR
);
1370 hr
= ScriptItemize(TestItem5
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1371 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1372 ok (pcItems
== 4, "There should have been 4 items, found %d\n", pcItems
);
1373 ok (pItem
[0].a
.s
.uBidiLevel
== 1, "The first character should have been bidi=1 not %d\n",
1374 pItem
[0].a
.s
.uBidiLevel
);
1376 /* This test checks to make sure that the test to see if there are sufficient buffers to store *
1377 * the pointer to the last char works. Note that windows often needs a greater number of *
1378 * SCRIPT_ITEMS to process a string than is returned in pcItems. */
1379 cInChars
= (sizeof(TestItem6
)/2)-1;
1381 hr
= ScriptItemize(TestItem6
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1382 ok (hr
== E_OUTOFMEMORY
, "ScriptItemize should return E_OUTOFMEMORY, returned %08x\n", hr
);
1386 static void test_ScriptGetCMap(HDC hdc
, unsigned short pwOutGlyphs
[256])
1389 SCRIPT_CACHE psc
= NULL
;
1392 unsigned short pwOutGlyphs2
[256];
1393 unsigned short pwOutGlyphs3
[256];
1397 static const WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1398 static const WCHAR TestItem2
[] = {0x202B, 'i', 'n', 0x202C,0};
1399 static const WCHAR TestItem3
[] = {'a','b','c','d','(','<','{','[',0x2039,0};
1400 static const WCHAR TestItem3b
[] = {'a','b','c','d',')','>','}',']',0x203A,0};
1402 /* Check to make sure that SCRIPT_CACHE gets allocated ok */
1404 cInChars
= cChars
= 5;
1405 /* Some sanity checks for ScriptGetCMap */
1407 hr
= ScriptGetCMap(NULL
, NULL
, NULL
, 0, 0, NULL
);
1408 ok( hr
== E_INVALIDARG
, "(NULL,NULL,NULL,0,0,NULL), "
1409 "expected E_INVALIDARG, got %08x\n", hr
);
1411 hr
= ScriptGetCMap(NULL
, NULL
, TestItem1
, cInChars
, dwFlags
, pwOutGlyphs3
);
1412 ok( hr
== E_INVALIDARG
, "(NULL,NULL,TestItem1, cInChars, dwFlags, pwOutGlyphs3), "
1413 "expected E_INVALIDARG, got %08x\n", hr
);
1415 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1417 hr
= ScriptGetCMap(NULL
, &psc
, TestItem1
, cInChars
, 0, pwOutGlyphs3
);
1418 ok( hr
== E_PENDING
, "(NULL,&psc,NULL,0,0,NULL), expected E_PENDING, "
1420 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1422 /* Set psc to NULL but add hdc, to be able to check if a pointer is returned in psc */
1424 hr
= ScriptGetCMap(hdc
, &psc
, TestItem1
, cInChars
, 0, pwOutGlyphs3
);
1425 ok( hr
== S_OK
, "ScriptGetCMap(NULL,&psc,NULL,0,0,NULL), expected S_OK, "
1427 ok( psc
!= NULL
, "ScritpGetCMap expected psc to be not NULL\n");
1428 ScriptFreeCache( &psc
);
1430 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1432 hr
= ScriptGetCMap(NULL
, &psc
, TestItem1
, cInChars
, dwFlags
, pwOutGlyphs3
);
1433 ok( hr
== E_PENDING
, "(NULL,&psc,), expected E_PENDING, got %08x\n", hr
);
1434 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1435 /* Check to see if the results are the same as those returned by ScriptShape */
1436 hr
= ScriptGetCMap(hdc
, &psc
, TestItem1
, cInChars
, dwFlags
, pwOutGlyphs3
);
1437 ok (hr
== 0, "ScriptGetCMap should return 0 not (%08x)\n", hr
);
1438 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1439 for (cnt
=0; cnt
< cChars
&& pwOutGlyphs
[cnt
] == pwOutGlyphs3
[cnt
]; cnt
++) {}
1440 ok (cnt
== cInChars
, "Translation not correct. WCHAR %d - %04x != %04x\n",
1441 cnt
, pwOutGlyphs
[cnt
], pwOutGlyphs3
[cnt
]);
1443 ScriptFreeCache( &psc
);
1444 ok (!psc
, "psc is not null after ScriptFreeCache\n");
1446 cInChars
= cChars
= 4;
1447 hr
= ScriptGetCMap(hdc
, &psc
, TestItem2
, cInChars
, dwFlags
, pwOutGlyphs3
);
1448 ok (hr
== S_FALSE
, "ScriptGetCMap should return S_FALSE not (%08x)\n", hr
);
1449 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1450 ok(pwOutGlyphs3
[0] == 0 || broken(pwOutGlyphs3
[0] == 0x80), "Glyph 0 should be default glyph\n");
1451 ok(pwOutGlyphs3
[3] == 0 || broken(pwOutGlyphs3
[0] == 0x80), "Glyph 0 should be default glyph\n");
1454 cInChars
= cChars
= 9;
1455 hr
= ScriptGetCMap(hdc
, &psc
, TestItem3b
, cInChars
, dwFlags
, pwOutGlyphs2
);
1456 ok (hr
== S_OK
, "ScriptGetCMap should return S_OK not (%08x)\n", hr
);
1457 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1459 cInChars
= cChars
= 9;
1461 hr
= ScriptGetCMap(hdc
, &psc
, TestItem3
, cInChars
, dwFlags
, pwOutGlyphs3
);
1462 ok (hr
== S_OK
, "ScriptGetCMap should return S_OK not (%08x)\n", hr
);
1463 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1464 ok(pwOutGlyphs3
[0] == pwOutGlyphs2
[0], "glyph incorrectly altered\n");
1465 ok(pwOutGlyphs3
[1] == pwOutGlyphs2
[1], "glyph incorreclty altered\n");
1466 ok(pwOutGlyphs3
[2] == pwOutGlyphs2
[2], "glyph incorreclty altered\n");
1467 ok(pwOutGlyphs3
[3] == pwOutGlyphs2
[3], "glyph incorreclty altered\n");
1468 ok(pwOutGlyphs3
[4] == pwOutGlyphs2
[4], "glyph not mirrored correctly\n");
1469 ok(pwOutGlyphs3
[5] == pwOutGlyphs2
[5], "glyph not mirrored correctly\n");
1470 ok(pwOutGlyphs3
[6] == pwOutGlyphs2
[6], "glyph not mirrored correctly\n");
1471 ok(pwOutGlyphs3
[7] == pwOutGlyphs2
[7], "glyph not mirrored correctly\n");
1472 ok(pwOutGlyphs3
[8] == pwOutGlyphs2
[8], "glyph not mirrored correctly\n");
1474 ScriptFreeCache( &psc
);
1475 ok (!psc
, "psc is not null after ScriptFreeCache\n");
1478 static void test_ScriptGetFontProperties(HDC hdc
)
1481 SCRIPT_CACHE psc
,old_psc
;
1482 SCRIPT_FONTPROPERTIES sfp
;
1484 /* Some sanity checks for ScriptGetFontProperties */
1486 hr
= ScriptGetFontProperties(NULL
,NULL
,NULL
);
1487 ok( hr
== E_INVALIDARG
, "(NULL,NULL,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1489 hr
= ScriptGetFontProperties(NULL
,NULL
,&sfp
);
1490 ok( hr
== E_INVALIDARG
, "(NULL,NULL,&sfp), expected E_INVALIDARG, got %08x\n", hr
);
1492 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1494 hr
= ScriptGetFontProperties(NULL
,&psc
,NULL
);
1495 ok( hr
== E_INVALIDARG
, "(NULL,&psc,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1496 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1498 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1500 hr
= ScriptGetFontProperties(NULL
,&psc
,&sfp
);
1501 ok( hr
== E_PENDING
, "(NULL,&psc,&sfp), expected E_PENDING, got %08x\n", hr
);
1502 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1504 hr
= ScriptGetFontProperties(hdc
,NULL
,NULL
);
1505 ok( hr
== E_INVALIDARG
, "(hdc,NULL,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1507 hr
= ScriptGetFontProperties(hdc
,NULL
,&sfp
);
1508 ok( hr
== E_INVALIDARG
, "(hdc,NULL,&sfp), expected E_INVALIDARG, got %08x\n", hr
);
1510 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1512 hr
= ScriptGetFontProperties(hdc
,&psc
,NULL
);
1513 ok( hr
== E_INVALIDARG
, "(hdc,&psc,NULL), expected E_INVALIDARG, got %08x\n", hr
);
1514 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1516 /* Pass an invalid sfp */
1518 sfp
.cBytes
= sizeof(SCRIPT_FONTPROPERTIES
) - 1;
1519 hr
= ScriptGetFontProperties(hdc
,&psc
,&sfp
);
1520 ok( hr
== E_INVALIDARG
, "(hdc,&psc,&sfp) invalid, expected E_INVALIDARG, got %08x\n", hr
);
1521 ok( psc
!= NULL
, "Expected a pointer in psc, got NULL\n");
1522 ScriptFreeCache(&psc
);
1523 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1525 /* Give it the correct cBytes, we don't care about what's coming back */
1526 sfp
.cBytes
= sizeof(SCRIPT_FONTPROPERTIES
);
1528 hr
= ScriptGetFontProperties(hdc
,&psc
,&sfp
);
1529 ok( hr
== S_OK
, "(hdc,&psc,&sfp) partly initialized, expected S_OK, got %08x\n", hr
);
1530 ok( psc
!= NULL
, "Expected a pointer in psc, got NULL\n");
1532 /* Save the psc pointer */
1534 /* Now a NULL hdc again */
1535 hr
= ScriptGetFontProperties(NULL
,&psc
,&sfp
);
1536 ok( hr
== S_OK
, "(NULL,&psc,&sfp), expected S_OK, got %08x\n", hr
);
1537 ok( psc
== old_psc
, "Expected psc not to be changed, was %p is now %p\n", old_psc
, psc
);
1538 ScriptFreeCache(&psc
);
1539 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1542 static void test_ScriptTextOut(HDC hdc
)
1548 SCRIPT_ITEM pItem
[255];
1550 WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1555 unsigned short pwOutGlyphs1
[256];
1556 WORD pwLogClust
[256];
1557 SCRIPT_VISATTR psva
[256];
1560 GOFFSET pGoffset
[256];
1565 BOOL fTrailing
= FALSE
;
1566 SCRIPT_LOGATTR
*psla
;
1567 SCRIPT_LOGATTR sla
[256];
1569 /* This is a valid test that will cause parsing to take place */
1572 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1573 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1574 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1576 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1578 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1579 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1580 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1582 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1583 * ie. ScriptItemize has succeeded and that pItem has been set */
1586 psc
= NULL
; /* must be null on first call */
1589 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1590 cMaxGlyphs
, &pItem
[0].a
,
1591 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1592 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1593 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1594 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1596 /* Note hdc is needed as glyph info is not yet in psc */
1597 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1599 ok (hr
== 0, "Should return 0 not (%08x)\n", hr
);
1600 ScriptFreeCache(&psc
); /* Get rid of psc for next test set */
1601 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1603 hr
= ScriptTextOut(NULL
, NULL
, 0, 0, 0, NULL
, NULL
, NULL
, 0, NULL
, 0, NULL
, NULL
, NULL
);
1604 ok (hr
== E_INVALIDARG
, "Should return 0 not (%08x)\n", hr
);
1606 hr
= ScriptTextOut(NULL
, NULL
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1607 piAdvance
, NULL
, pGoffset
);
1608 ok( hr
== E_INVALIDARG
, "(NULL,NULL,TestItem1, cInChars, dwFlags, pwOutGlyphs3), "
1609 "expected E_INVALIDARG, got %08x\n", hr
);
1611 /* Set psc to NULL, to be able to check if a pointer is returned in psc */
1613 hr
= ScriptTextOut(NULL
, &psc
, 0, 0, 0, NULL
, NULL
, NULL
, 0, NULL
, 0,
1615 ok( hr
== E_INVALIDARG
, "(NULL,&psc,NULL,0,0,0,NULL,), expected E_INVALIDARG, "
1617 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1619 /* hdc is required for this one rather than the usual optional */
1621 hr
= ScriptTextOut(NULL
, &psc
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1622 piAdvance
, NULL
, pGoffset
);
1623 ok( hr
== E_INVALIDARG
, "(NULL,&psc,), expected E_INVALIDARG, got %08x\n", hr
);
1624 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1626 /* Set that it returns 0 status */
1627 hr
= ScriptTextOut(hdc
, &psc
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1628 piAdvance
, NULL
, pGoffset
);
1629 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1631 /* Test Rect Rgn is acceptable */
1636 hr
= ScriptTextOut(hdc
, &psc
, 0, 0, 0, &rect
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1637 piAdvance
, NULL
, pGoffset
);
1638 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1641 hr
= ScriptCPtoX(iCP
, fTrailing
, cChars
, pcGlyphs
, (const WORD
*) &pwLogClust
,
1642 (const SCRIPT_VISATTR
*) &psva
, (const int *)&piAdvance
, &pItem
[0].a
, &piX
);
1643 ok(hr
== S_OK
, "ScriptCPtoX Stub should return S_OK not %08x\n", hr
);
1645 psla
= (SCRIPT_LOGATTR
*)&sla
;
1646 hr
= ScriptBreak(TestItem1
, cChars
, &pItem
[0].a
, psla
);
1647 ok(hr
== S_OK
, "ScriptBreak Stub should return S_OK not %08x\n", hr
);
1649 /* Clean up and go */
1650 ScriptFreeCache(&psc
);
1651 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1656 static void test_ScriptTextOut2(HDC hdc
)
1658 /* Intent is to validate that the HDC passed into ScriptTextOut is
1659 * used instead of the (possibly) invalid cached one
1666 SCRIPT_ITEM pItem
[255];
1668 WCHAR TestItem1
[] = {'T', 'e', 's', 't', 'a', 0};
1673 unsigned short pwOutGlyphs1
[256];
1674 WORD pwLogClust
[256];
1675 SCRIPT_VISATTR psva
[256];
1678 GOFFSET pGoffset
[256];
1681 /* Create an extra DC that will be used until the ScriptTextOut */
1682 hdc1
= CreateCompatibleDC(hdc
);
1683 ok (hdc1
!= 0, "CreateCompatibleDC failed to create a DC\n");
1684 hdc2
= CreateCompatibleDC(hdc
);
1685 ok (hdc2
!= 0, "CreateCompatibleDC failed to create a DC\n");
1687 /* This is a valid test that will cause parsing to take place */
1690 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1691 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1692 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1694 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1696 ok (pItem
[0].iCharPos
== 0 && pItem
[1].iCharPos
== cInChars
,
1697 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1698 pItem
[0].iCharPos
, cInChars
, pItem
[1].iCharPos
);
1700 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1701 * ie. ScriptItemize has succeeded and that pItem has been set */
1704 psc
= NULL
; /* must be null on first call */
1707 hr
= ScriptShape(hdc2
, &psc
, TestItem1
, cChars
,
1708 cMaxGlyphs
, &pItem
[0].a
,
1709 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1710 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1711 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1712 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1714 /* Note hdc is needed as glyph info is not yet in psc */
1715 hr
= ScriptPlace(hdc2
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1717 ok (hr
== 0, "Should return 0 not (%08x)\n", hr
);
1719 /* key part!!! cached dc is being deleted */
1720 hr
= DeleteDC(hdc2
);
1721 ok(hr
== 1, "DeleteDC should return 1 not %08x\n", hr
);
1723 /* At this point the cached hdc (hdc2) has been destroyed,
1724 * however, we are passing in a *real* hdc (the original hdc).
1725 * The text should be written to that DC
1727 hr
= ScriptTextOut(hdc1
, &psc
, 0, 0, 0, NULL
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1728 piAdvance
, NULL
, pGoffset
);
1729 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1730 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1734 /* Clean up and go */
1735 ScriptFreeCache(&psc
);
1736 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1741 static void test_ScriptTextOut3(HDC hdc
)
1747 SCRIPT_ITEM pItem
[255];
1749 WCHAR TestItem1
[] = {' ','\r', 0};
1754 unsigned short pwOutGlyphs1
[256];
1755 WORD pwLogClust
[256];
1756 SCRIPT_VISATTR psva
[256];
1759 GOFFSET pGoffset
[256];
1763 /* This is to ensure that nonexistent glyphs are translated into a valid glyph number */
1766 hr
= ScriptItemize(TestItem1
, cInChars
, cMaxItems
, NULL
, NULL
, pItem
, &pcItems
);
1767 ok (hr
== 0, "ScriptItemize should return 0, returned %08x\n", hr
);
1768 /* This test is for the interim operation of ScriptItemize where only one SCRIPT_ITEM is *
1770 ok (pcItems
> 0, "The number of SCRIPT_ITEMS should be greater than 0\n");
1772 ok (pItem
[0].iCharPos
== 0 && pItem
[2].iCharPos
== cInChars
,
1773 "Start pos not = 0 (%d) or end pos not = %d (%d)\n",
1774 pItem
[0].iCharPos
, cInChars
, pItem
[2].iCharPos
);
1776 /* It would appear that we have a valid SCRIPT_ANALYSIS and can continue
1777 * ie. ScriptItemize has succeeded and that pItem has been set */
1780 psc
= NULL
; /* must be null on first call */
1783 hr
= ScriptShape(hdc
, &psc
, TestItem1
, cChars
,
1784 cMaxGlyphs
, &pItem
[0].a
,
1785 pwOutGlyphs1
, pwLogClust
, psva
, &pcGlyphs
);
1786 ok (hr
== 0, "ScriptShape should return 0 not (%08x)\n", hr
);
1787 ok (psc
!= NULL
, "psc should not be null and have SCRIPT_CACHE buffer address\n");
1788 ok (pcGlyphs
== cChars
, "Chars in (%d) should equal Glyphs out (%d)\n", cChars
, pcGlyphs
);
1790 /* Note hdc is needed as glyph info is not yet in psc */
1791 hr
= ScriptPlace(hdc
, &psc
, pwOutGlyphs1
, pcGlyphs
, psva
, &pItem
[0].a
, piAdvance
,
1793 ok (hr
== 0, "Should return 0 not (%08x)\n", hr
);
1795 /* Test Rect Rgn is acceptable */
1800 hr
= ScriptTextOut(hdc
, &psc
, 0, 0, 0, &rect
, &pItem
[0].a
, NULL
, 0, pwOutGlyphs1
, pcGlyphs
,
1801 piAdvance
, NULL
, pGoffset
);
1802 ok (hr
== 0, "ScriptTextOut should return 0 not (%08x)\n", hr
);
1805 /* Clean up and go */
1806 ScriptFreeCache(&psc
);
1807 ok( psc
== NULL
, "Expected psc to be NULL, got %p\n", psc
);
1811 #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)
1813 static void _test_item_ScriptXtoX(SCRIPT_ANALYSIS
*psa
, int cChars
, int cGlyphs
, const int* offsets
, const WORD
*pwLogClust
, const int* piAdvance
)
1816 int icChars
, icGlyphs
;
1819 SCRIPT_VISATTR psva
[10];
1824 memset(psva
,0,sizeof(psva
));
1825 direction
= (psa
->fRTL
)?-1:+1;
1827 for(iCP
= 0; iCP
< cChars
; iCP
++)
1832 hr
= ScriptXtoCP(iX
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piCP
, &piTrailing
);
1833 winetest_ok(hr
== S_OK
, "ScriptXtoCP: should return S_OK not %08x\n", hr
);
1834 winetest_ok(piCP
== iCP
, "ScriptXtoCP: iX=%d should return piCP=%d not %d\n", iX
, iCP
, piCP
);
1835 winetest_ok(piTrailing
== 0, "ScriptXtoCP: iX=%d should return piTrailing=0 not %d\n", iX
, piTrailing
);
1838 for(iCP
= 0; iCP
< cChars
; iCP
++)
1840 iX
= offsets
[iCP
]+direction
;
1843 hr
= ScriptXtoCP(iX
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piCP
, &piTrailing
);
1844 winetest_ok(hr
== S_OK
, "ScriptXtoCP leading: should return S_OK not %08x\n", hr
);
1845 winetest_ok(piCP
== iCP
, "ScriptXtoCP leading: iX=%d should return piCP=%d not %d\n", iX
, iCP
, piCP
);
1846 winetest_ok(piTrailing
== 0, "ScriptXtoCP leading: iX=%d should return piTrailing=0 not %d\n", iX
, piTrailing
);
1849 for(iCP
= 0; iCP
< cChars
; iCP
++)
1851 iX
= offsets
[iCP
+1]-direction
;
1854 hr
= ScriptXtoCP(iX
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piCP
, &piTrailing
);
1855 winetest_ok(hr
== S_OK
, "ScriptXtoCP trailing: should return S_OK not %08x\n", hr
);
1856 winetest_ok(piCP
== iCP
, "ScriptXtoCP trailing: iX=%d should return piCP=%d not %d\n", iX
, iCP
, piCP
);
1857 winetest_ok(piTrailing
== 1, "ScriptXtoCP trailing: iX=%d should return piTrailing=1 not %d\n", iX
, piTrailing
);
1860 for(iCP
= 0; iCP
<= cChars
+1; iCP
++)
1865 hr
= ScriptCPtoX(iCP
, fTrailing
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piX
);
1866 winetest_ok(hr
== S_OK
, "ScriptCPtoX: should return S_OK not %08x\n", hr
);
1867 winetest_ok(piX
== offsets
[iCP
],
1868 "ScriptCPtoX: iCP=%d should return piX=%d not %d\n", iCP
, offsets
[iCP
], piX
);
1871 for(iCP
= 0; iCP
<= cChars
+1; iCP
++)
1876 hr
= ScriptCPtoX(iCP
, fTrailing
, icChars
, icGlyphs
, pwLogClust
, psva
, piAdvance
, psa
, &piX
);
1877 winetest_ok(hr
== S_OK
, "ScriptCPtoX trailing: should return S_OK not %08x\n", hr
);
1878 winetest_ok(piX
== offsets
[iCP
+1],
1879 "ScriptCPtoX trailing: iCP=%d should return piX=%d not %d\n", iCP
, offsets
[iCP
+1], piX
);
1883 static void test_ScriptXtoX(void)
1884 /****************************************************************************************
1885 * This routine tests the ScriptXtoCP and ScriptCPtoX functions using static variables *
1886 ****************************************************************************************/
1888 WORD pwLogClust
[10] = {0, 0, 0, 1, 1, 2, 2, 3, 3, 3};
1889 WORD pwLogClust_RTL
[10] = {3, 3, 3, 2, 2, 1, 1, 0, 0, 0};
1890 WORD pwLogClust_2
[7] = {4, 3, 3, 2, 1, 0 ,0};
1891 int piAdvance
[10] = {201, 190, 210, 180, 170, 204, 189, 195, 212, 203};
1892 int piAdvance_2
[5] = {39, 26, 19, 17, 11};
1893 static const int offsets
[13] = {0, 67, 134, 201, 296, 391, 496, 601, 1052, 1503, 1954, 1954, 1954};
1894 static const int offsets_RTL
[13] = {781, 721, 661, 601, 496, 391, 296, 201, 134, 67, 0, 0, 0};
1895 static const int offsets_2
[10] = {112, 101, 92, 84, 65, 39, 19, 0, 0, 0};
1896 SCRIPT_VISATTR psva
[10];
1903 memset(&sa
, 0 , sizeof(SCRIPT_ANALYSIS
));
1904 memset(psva
, 0, sizeof(psva
));
1907 hr
= ScriptXtoCP(-1, 10, 10, pwLogClust
, psva
, piAdvance
, &sa
, &piCP
, &piTrailing
);
1908 ok(hr
== S_OK
, "ScriptXtoCP should return S_OK not %08x\n", hr
);
1910 ok(piCP
== -1, "Negative iX should return piCP=-1 not %d\n", piCP
);
1912 ok(piCP
== 10, "Negative iX should return piCP=10 not %d\n", piCP
);
1914 for (iX
= 0; iX
<= 7; iX
++)
1918 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1919 ok(piCP
==0 && piTrailing
==0,"%i should return 0(%i) and 0(%i)\n",iX
, piCP
,piTrailing
);
1921 for (iX
= 8; iX
< 16; iX
++)
1925 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1926 ok(piCP
==0 && piTrailing
==1,"%i should return 0(%i) and 1(%i)\n",iX
, piCP
,piTrailing
);
1930 hr
= ScriptXtoCP(-1, 10, 10, pwLogClust_RTL
, psva
, piAdvance
, &sa
, &piCP
, &piTrailing
);
1931 ok(hr
== S_OK
, "ScriptXtoCP should return S_OK not %08x\n", hr
);
1933 ok(piCP
== -1, "Negative iX should return piCP=-1 not %d\n", piCP
);
1935 ok(piCP
== 10, "Negative iX should return piCP=10 not %d\n", piCP
);
1938 hr
= ScriptXtoCP(1954, 10, 10, pwLogClust_RTL
, psva
, piAdvance
, &sa
, &piCP
, &piTrailing
);
1939 ok(hr
== S_OK
, "ScriptXtoCP should return S_OK not %08x\n", hr
);
1940 ok(piCP
== -1, "iX=%d should return piCP=-1 not %d\n", iX
, piCP
);
1941 ok(piTrailing
== 1, "iX=%d should return piTrailing=1 not %d\n", iX
, piTrailing
);
1943 for (iX
= 1; iX
<= 8; iX
++)
1947 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1948 ok(piCP
==0 && piTrailing
==1,"%i should return 0(%i) and 1(%i)\n",iX
,piCP
,piTrailing
);
1950 for (iX
= 9; iX
< 16; iX
++)
1954 hr
= ScriptXtoCP(iX
, 1, 1, &clust
, psva
, &advance
, &sa
, &piCP
, &piTrailing
);
1955 ok(piCP
==0 && piTrailing
==0,"%i should return 0(%i) and 0(%i)\n",iX
,piCP
,piTrailing
);
1959 test_item_ScriptXtoX(&sa
, 10, 10, offsets
, pwLogClust
, piAdvance
);
1961 test_item_ScriptXtoX(&sa
, 10, 10, offsets_RTL
, pwLogClust_RTL
, piAdvance
);
1962 test_item_ScriptXtoX(&sa
, 7, 5, offsets_2
, pwLogClust_2
, piAdvance_2
);
1965 static void test_ScriptString(HDC hdc
)
1967 /*******************************************************************************************
1969 * This set of tests are for the string functions of uniscribe. The ScriptStringAnalyse
1970 * function allocates memory pointed to by the SCRIPT_STRING_ANALYSIS ssa pointer. This
1971 * memory is freed by ScriptStringFree. There needs to be a valid hdc for this as
1972 * ScriptStringAnalyse calls ScriptSItemize, ScriptShape and ScriptPlace which require it.
1977 WCHAR teststr
[] = {'T','e','s','t','1',' ','a','2','b','3', '\0'};
1978 int len
= (sizeof(teststr
) / sizeof(WCHAR
)) - 1;
1979 int Glyphs
= len
* 2 + 16;
1981 DWORD Flags
= SSA_GLYPHS
;
1983 const int Dx
[5] = {10, 10, 10, 10, 10};
1984 const BYTE InClass
= 0;
1985 SCRIPT_STRING_ANALYSIS ssa
= NULL
;
1990 const RECT rc
= {0, 50, 100, 100};
1993 BOOL Disabled
= FALSE
;
1994 const int *clip_len
;
1999 Charset
= -1; /* this flag indicates unicode input */
2000 /* Test without hdc to get E_PENDING */
2001 hr
= ScriptStringAnalyse( NULL
, teststr
, len
, Glyphs
, Charset
, Flags
,
2002 ReqWidth
, NULL
, NULL
, Dx
, NULL
,
2004 ok(hr
== E_PENDING
, "ScriptStringAnalyse Stub should return E_PENDING not %08x\n", hr
);
2006 /* test with hdc, this should be a valid test */
2007 hr
= ScriptStringAnalyse( hdc
, teststr
, len
, Glyphs
, Charset
, Flags
,
2008 ReqWidth
, NULL
, NULL
, Dx
, NULL
,
2010 ok(hr
== S_OK
, "ScriptStringAnalyse should return S_OK not %08x\n", hr
);
2011 ScriptStringFree(&ssa
);
2013 /* test makes sure that a call with a valid pssa still works */
2014 hr
= ScriptStringAnalyse( hdc
, teststr
, len
, Glyphs
, Charset
, Flags
,
2015 ReqWidth
, NULL
, NULL
, Dx
, NULL
,
2017 ok(hr
== S_OK
, "ScriptStringAnalyse should return S_OK not %08x\n", hr
);
2018 ok(ssa
!= NULL
, "ScriptStringAnalyse pssa should not be NULL\n");
2022 hr
= ScriptStringOut(ssa
, X
, Y
, Options
, &rc
, MinSel
, MaxSel
, Disabled
);
2023 ok(hr
== S_OK
, "ScriptStringOut should return S_OK not %08x\n", hr
);
2026 clip_len
= ScriptString_pcOutChars(ssa
);
2027 ok(*clip_len
== len
, "ScriptString_pcOutChars failed, got %d, expected %d\n", *clip_len
, len
);
2029 order
= HeapAlloc(GetProcessHeap(), HEAP_ZERO_MEMORY
, *clip_len
* sizeof(UINT
));
2030 hr
= ScriptStringGetOrder(ssa
, order
);
2031 ok(hr
== S_OK
, "ScriptStringGetOrder failed, got %08x, expected S_OK\n", hr
);
2033 for (i
= 0; i
< *clip_len
; i
++) ok(order
[i
] == i
, "%d: got %d expected %d\n", i
, order
[i
], i
);
2034 HeapFree(GetProcessHeap(), 0, order
);
2036 hr
= ScriptStringFree(&ssa
);
2037 ok(hr
== S_OK
, "ScriptStringFree should return S_OK not %08x\n", hr
);
2040 static void test_ScriptStringXtoCP_CPtoX(HDC hdc
)
2042 /*****************************************************************************************
2044 * This test is for the ScriptStringXtoCP and ScriptStringXtoCP functions. Due to the
2045 * nature of the fonts between Windows and Wine, the test is implemented by generating
2046 * values using one one function then checking the output of the second. In this way
2047 * the validity of the functions is established using Windows as a base and confirming
2048 * similar behaviour in wine.
2052 static const WCHAR teststr1
[] = {0x05e9, 'i', 0x05dc, 'n', 0x05d5, 'e', 0x05dd, '.',0};
2053 static const BOOL rtl
[] = {1, 0, 1, 0, 1, 0, 1, 0};
2054 void *String
= (WCHAR
*) &teststr1
; /* ScriptStringAnalysis needs void */
2055 int String_len
= (sizeof(teststr1
)/sizeof(WCHAR
))-1;
2056 int Glyphs
= String_len
* 2 + 16; /* size of buffer as recommended */
2057 int Charset
= -1; /* unicode */
2058 DWORD Flags
= SSA_GLYPHS
;
2060 const BYTE InClass
= 0;
2061 SCRIPT_STRING_ANALYSIS ssa
= NULL
;
2063 int Ch
; /* Character position in string */
2065 int Cp
; /* Character position in string */
2070 /* Test with hdc, this should be a valid test
2071 * Here we generate an SCRIPT_STRING_ANALYSIS that will be used as input to the
2072 * following character positions to X and X to character position functions.
2075 hr
= ScriptStringAnalyse( hdc
, String
, String_len
, Glyphs
, Charset
, Flags
,
2076 ReqWidth
, NULL
, NULL
, NULL
, NULL
,
2079 hr
== E_INVALIDARG
, /* NT */
2080 "ScriptStringAnalyse should return S_OK or E_INVALIDARG not %08x\n", hr
);
2084 ok(ssa
!= NULL
, "ScriptStringAnalyse ssa should not be NULL\n");
2087 * Loop to generate character positions to provide starting positions for the
2088 * ScriptStringCPtoX and ScriptStringXtoCP functions
2090 for (Cp
= 0; Cp
< String_len
; Cp
++)
2092 /* The fTrailing flag is used to indicate whether the X being returned is at
2093 * the beginning or the end of the character. What happens here is that if
2094 * fTrailing indicates the end of the character, ie. FALSE, then ScriptStringXtoCP
2095 * returns the beginning of the next character and iTrailing is FALSE. So for this
2096 * loop iTrailing will be FALSE in both cases.
2098 hr
= ScriptStringCPtoX(ssa
, Cp
, TRUE
, &trail
);
2099 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2100 hr
= ScriptStringCPtoX(ssa
, Cp
, FALSE
, &lead
);
2101 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2103 ok(lead
> trail
, "Leading values should be after trailing for rtl characters(%i)\n",Cp
);
2105 ok(lead
< trail
, "Trailing values should be after leading for ltr characters(%i)\n",Cp
);
2107 /* move by 1 pixel so that we are not inbetween 2 characters. That could result in being the lead of a rtl and
2108 at the same time the trail of an ltr */
2110 /* inside the leading edge */
2112 if (rtl
[Cp
]) X
--; else X
++;
2113 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2114 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2115 ok(Cp
== Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
, Ch
, trail
);
2116 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = %d\n",
2119 /* inside the trailing edge */
2121 if (rtl
[Cp
]) X
++; else X
--;
2122 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2123 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2124 ok(Cp
== Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
, Ch
, trail
);
2125 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = %d\n",
2128 /* outside the "trailing" edge */
2129 if (Cp
< String_len
-1)
2131 if (rtl
[Cp
]) X
= lead
; else X
= trail
;
2133 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2134 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2135 ok(Cp
+ 1 == Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
+ 1, Ch
, trail
);
2137 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = %d\n",
2140 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = %d\n",
2144 /* outside the "leading" edge */
2147 if (rtl
[Cp
]) X
= trail
; else X
= lead
;
2149 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2150 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2151 ok(Cp
- 1 == Ch
, "ScriptStringXtoCP should return Ch = %d not %d for X = %d\n", Cp
- 1, Ch
, trail
);
2152 if (Cp
!= 0 && rtl
[Cp
-1])
2153 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = %d\n",
2156 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = %d\n",
2161 /* Check beyond the leading boundary of the whole string */
2164 /* having a leading rtl character seems to confuse usp */
2165 /* this looks to be a windows bug we should emulate */
2166 hr
= ScriptStringCPtoX(ssa
, 0, TRUE
, &X
);
2167 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2169 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2170 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2171 ok(Ch
== 1, "ScriptStringXtoCP should return Ch = 1 not %d for X outside leading edge when rtl\n", Ch
);
2172 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = outside leading edge when rtl\n",
2177 hr
= ScriptStringCPtoX(ssa
, 0, FALSE
, &X
);
2178 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2180 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2181 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2182 ok(Ch
== -1, "ScriptStringXtoCP should return Ch = -1 not %d for X outside leading edge\n", Ch
);
2183 ok(iTrailing
== TRUE
, "ScriptStringXtoCP should return iTrailing = 1 not %d for X = outside leading edge\n",
2187 /* Check beyond the end boundary of the whole string */
2188 if (rtl
[String_len
-1])
2190 hr
= ScriptStringCPtoX(ssa
, String_len
-1, FALSE
, &X
);
2191 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2195 hr
= ScriptStringCPtoX(ssa
, String_len
-1, TRUE
, &X
);
2196 ok(hr
== S_OK
, "ScriptStringCPtoX should return S_OK not %08x\n", hr
);
2199 hr
= ScriptStringXtoCP(ssa
, X
, &Ch
, &iTrailing
);
2200 ok(hr
== S_OK
, "ScriptStringXtoCP should return S_OK not %08x\n", hr
);
2201 ok(Ch
== String_len
, "ScriptStringXtoCP should return Ch = %i not %d for X outside trailing edge\n", String_len
, Ch
);
2202 ok(iTrailing
== FALSE
, "ScriptStringXtoCP should return iTrailing = 0 not %d for X = outside trailing edge\n",
2206 * Cleanup the SSA for the next round of tests
2208 hr
= ScriptStringFree(&ssa
);
2209 ok(hr
== S_OK
, "ScriptStringFree should return S_OK not %08x\n", hr
);
2212 * Test to see that exceeding the number of chars returns E_INVALIDARG. First
2213 * generate an SSA for the subsequent tests.
2215 hr
= ScriptStringAnalyse( hdc
, String
, String_len
, Glyphs
, Charset
, Flags
,
2216 ReqWidth
, NULL
, NULL
, NULL
, NULL
,
2218 ok(hr
== S_OK
, "ScriptStringAnalyse should return S_OK not %08x\n", hr
);
2221 * When ScriptStringCPtoX is called with a character position Cp that exceeds the
2222 * string length, return E_INVALIDARG. This also invalidates the ssa so a
2223 * ScriptStringFree should also fail.
2226 Cp
= String_len
+ 1;
2227 hr
= ScriptStringCPtoX(ssa
, Cp
, fTrailing
, &X
);
2228 ok(hr
== E_INVALIDARG
, "ScriptStringCPtoX should return E_INVALIDARG not %08x\n", hr
);
2230 ScriptStringFree(&ssa
);
2234 static void test_ScriptCacheGetHeight(HDC hdc
)
2237 SCRIPT_CACHE sc
= NULL
;
2240 hr
= ScriptCacheGetHeight(NULL
, NULL
, NULL
);
2241 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2243 hr
= ScriptCacheGetHeight(NULL
, &sc
, NULL
);
2244 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2246 hr
= ScriptCacheGetHeight(NULL
, &sc
, &height
);
2247 ok(hr
== E_PENDING
, "expected E_PENDING, got 0x%08x\n", hr
);
2251 hr
= ScriptCacheGetHeight(hdc
, &sc
, &height
);
2252 ok(hr
== S_OK
, "expected S_OK, got 0x%08x\n", hr
);
2253 ok(height
> 0, "expected height > 0\n");
2255 ScriptFreeCache(&sc
);
2258 static void test_ScriptGetGlyphABCWidth(HDC hdc
)
2261 SCRIPT_CACHE sc
= NULL
;
2264 hr
= ScriptGetGlyphABCWidth(NULL
, NULL
, 'a', NULL
);
2265 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2267 hr
= ScriptGetGlyphABCWidth(NULL
, &sc
, 'a', NULL
);
2268 ok(broken(hr
== E_PENDING
) ||
2269 hr
== E_INVALIDARG
, /* WIN7 */
2270 "expected E_INVALIDARG, got 0x%08x\n", hr
);
2272 hr
= ScriptGetGlyphABCWidth(NULL
, &sc
, 'a', &abc
);
2273 ok(hr
== E_PENDING
, "expected E_PENDING, got 0x%08x\n", hr
);
2275 if (0) { /* crashes on WinXP */
2276 hr
= ScriptGetGlyphABCWidth(hdc
, &sc
, 'a', NULL
);
2277 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2280 hr
= ScriptGetGlyphABCWidth(hdc
, &sc
, 'a', &abc
);
2281 ok(hr
== S_OK
, "expected S_OK, got 0x%08x\n", hr
);
2283 ScriptFreeCache(&sc
);
2286 static void test_ScriptLayout(void)
2289 static const BYTE levels
[][10] =
2291 { 0, 0, 0, 0, 0, 0, 0, 0, 0, 0 },
2292 { 1, 1, 1, 1, 1, 1, 1, 1, 1, 1 },
2293 { 2, 2, 2, 2, 2, 2, 2, 2, 2, 2 },
2294 { 3, 3, 3, 3, 3, 3, 3, 3, 3, 3 },
2296 { 0, 0, 0, 0, 0, 1, 1, 1, 1, 1},
2297 { 1, 1, 1, 2, 2, 2, 1, 1, 1, 1 },
2298 { 2, 2, 2, 1, 1, 1, 2, 2, 2, 2 },
2299 { 0, 0, 1, 1, 2, 2, 1, 1, 0, 0 },
2300 { 1, 1, 2, 2, 3, 3, 2, 2, 1, 1 },
2302 { 0, 0, 1, 1, 2, 2, 1, 1, 0, 1 },
2303 { 1, 0, 1, 2, 2, 1, 2, 1, 0, 1 },
2305 static const int expect_l2v
[][10] =
2307 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2308 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2309 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2310 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2312 { 0, 1, 2, 3, 4, 9, 8 ,7 ,6, 5},
2313 /**/ { 9, 8, 7, 4, 5, 6, 3 ,2 ,1, 0},
2314 /**/ { 7, 8, 9, 6, 5, 4, 0 ,1 ,2, 3},
2315 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2316 { 9, 8, 2, 3, 5, 4, 6 ,7 ,1, 0},
2318 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2319 /**/ { 0, 1, 7, 5, 6, 4, 3 ,2 ,8, 9},
2321 static const int expect_v2l
[][10] =
2323 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2324 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2325 { 0, 1, 2, 3, 4, 5, 6, 7, 8, 9 },
2326 { 9, 8, 7, 6, 5, 4, 3, 2, 1, 0 },
2328 { 0, 1, 2, 3, 4, 9, 8 ,7 ,6, 5},
2329 { 9, 8, 7, 6, 3, 4, 5 ,2 ,1, 0},
2330 { 6, 7, 8, 9, 5, 4, 3 ,0 ,1, 2},
2331 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2332 { 9, 8, 2, 3, 5, 4, 6 ,7 ,1, 0},
2334 { 0, 1, 7, 6, 4, 5, 3 ,2 ,8, 9},
2335 { 0, 1, 7, 6, 5, 3, 4 ,2 ,8, 9},
2338 int i
, j
, vistolog
[sizeof(levels
[0])], logtovis
[sizeof(levels
[0])];
2340 hr
= ScriptLayout(sizeof(levels
[0]), NULL
, vistolog
, logtovis
);
2341 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2343 hr
= ScriptLayout(sizeof(levels
[0]), levels
[0], NULL
, NULL
);
2344 ok(hr
== E_INVALIDARG
, "expected E_INVALIDARG, got 0x%08x\n", hr
);
2346 for (i
= 0; i
< sizeof(levels
)/sizeof(levels
[0]); i
++)
2348 hr
= ScriptLayout(sizeof(levels
[0]), levels
[i
], vistolog
, logtovis
);
2349 ok(hr
== S_OK
, "expected S_OK, got 0x%08x\n", hr
);
2351 for (j
= 0; j
< sizeof(levels
[i
]); j
++)
2353 ok(expect_v2l
[i
][j
] == vistolog
[j
],
2354 "failure: levels[%d][%d] = %d, vistolog[%d] = %d\n",
2355 i
, j
, levels
[i
][j
], j
, vistolog
[j
] );
2358 for (j
= 0; j
< sizeof(levels
[i
]); j
++)
2360 ok(expect_l2v
[i
][j
] == logtovis
[j
],
2361 "failure: levels[%d][%d] = %d, logtovis[%d] = %d\n",
2362 i
, j
, levels
[i
][j
], j
, logtovis
[j
] );
2367 static BOOL CALLBACK
enum_proc(LGRPID group
, LCID lcid
, LPSTR locale
, LONG_PTR lparam
)
2370 SCRIPT_DIGITSUBSTITUTE sds
;
2375 if (!IsValidLocale(lcid
, LCID_INSTALLED
)) return TRUE
;
2377 memset(&sds
, 0, sizeof(sds
));
2378 memset(&sc
, 0, sizeof(sc
));
2379 memset(&ss
, 0, sizeof(ss
));
2381 lcid_old
= GetThreadLocale();
2382 if (!SetThreadLocale(lcid
)) return TRUE
;
2384 hr
= ScriptRecordDigitSubstitution(lcid
, &sds
);
2385 ok(hr
== S_OK
, "ScriptRecordDigitSubstitution failed: 0x%08x\n", hr
);
2387 hr
= ScriptApplyDigitSubstitution(&sds
, &sc
, &ss
);
2388 ok(hr
== S_OK
, "ScriptApplyDigitSubstitution failed: 0x%08x\n", hr
);
2390 SetThreadLocale(lcid_old
);
2394 static void test_digit_substitution(void)
2398 static const LGRPID groups
[] =
2400 LGRPID_WESTERN_EUROPE
,
2401 LGRPID_CENTRAL_EUROPE
,
2408 LGRPID_TRADITIONAL_CHINESE
,
2409 LGRPID_SIMPLIFIED_CHINESE
,
2419 static BOOL (WINAPI
* pEnumLanguageGroupLocalesA
)(LANGGROUPLOCALE_ENUMPROCA
,LGRPID
,DWORD
,LONG_PTR
);
2421 hKernel32
= GetModuleHandleA("kernel32.dll");
2422 pEnumLanguageGroupLocalesA
= (void*)GetProcAddress(hKernel32
, "EnumLanguageGroupLocalesA");
2424 if (!pEnumLanguageGroupLocalesA
)
2426 win_skip("EnumLanguageGroupLocalesA not available on this platform\n");
2430 for (i
= 0; i
< sizeof(groups
)/sizeof(groups
[0]); i
++)
2432 ret
= pEnumLanguageGroupLocalesA(enum_proc
, groups
[i
], 0, 0);
2433 if (!ret
&& GetLastError() == ERROR_CALL_NOT_IMPLEMENTED
)
2435 win_skip("EnumLanguageGroupLocalesA not implemented on this platform\n");
2439 ok(ret
, "EnumLanguageGroupLocalesA failed unexpectedly: %u\n", GetLastError());
2443 static void test_ScriptGetProperties(void)
2445 const SCRIPT_PROPERTIES
**props
;
2449 hr
= ScriptGetProperties(NULL
, NULL
);
2450 ok(hr
== E_INVALIDARG
, "ScriptGetProperties succeeded\n");
2452 hr
= ScriptGetProperties(NULL
, &num
);
2453 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
2455 hr
= ScriptGetProperties(&props
, NULL
);
2456 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
2458 hr
= ScriptGetProperties(&props
, &num
);
2459 ok(hr
== S_OK
, "ScriptGetProperties failed: 0x%08x\n", hr
);
2462 static void test_ScriptBreak(void)
2464 static const WCHAR test
[] = {' ','\r','\n',0};
2465 SCRIPT_ITEM items
[4];
2469 hr
= ScriptItemize(test
, 3, 4, NULL
, NULL
, items
, NULL
);
2470 ok(!hr
, "ScriptItemize should return S_OK not %08x\n", hr
);
2472 memset(&la
, 0, sizeof(la
));
2473 hr
= ScriptBreak(test
, 1, &items
[0].a
, &la
);
2474 ok(!hr
, "ScriptBreak should return S_OK not %08x\n", hr
);
2476 ok(!la
.fSoftBreak
, "fSoftBreak set\n");
2477 ok(la
.fWhiteSpace
, "fWhiteSpace not set\n");
2478 ok(la
.fCharStop
, "fCharStop not set\n");
2479 ok(!la
.fWordStop
, "fWordStop set\n");
2480 ok(!la
.fInvalid
, "fInvalid set\n");
2481 ok(!la
.fReserved
, "fReserved set\n");
2483 memset(&la
, 0, sizeof(la
));
2484 hr
= ScriptBreak(test
+ 1, 1, &items
[1].a
, &la
);
2485 ok(!hr
, "ScriptBreak should return S_OK not %08x\n", hr
);
2487 ok(!la
.fSoftBreak
, "fSoftBreak set\n");
2488 ok(!la
.fWhiteSpace
, "fWhiteSpace set\n");
2489 ok(la
.fCharStop
, "fCharStop not set\n");
2490 ok(!la
.fWordStop
, "fWordStop set\n");
2491 ok(!la
.fInvalid
, "fInvalid set\n");
2492 ok(!la
.fReserved
, "fReserved set\n");
2494 memset(&la
, 0, sizeof(la
));
2495 hr
= ScriptBreak(test
+ 2, 1, &items
[2].a
, &la
);
2496 ok(!hr
, "ScriptBreak should return S_OK not %08x\n", hr
);
2498 ok(!la
.fSoftBreak
, "fSoftBreak set\n");
2499 ok(!la
.fWhiteSpace
, "fWhiteSpace set\n");
2500 ok(la
.fCharStop
, "fCharStop not set\n");
2501 ok(!la
.fWordStop
, "fWordStop set\n");
2502 ok(!la
.fInvalid
, "fInvalid set\n");
2503 ok(!la
.fReserved
, "fReserved set\n");
2506 static void test_newlines(void)
2508 static const WCHAR test1
[] = {'t','e','x','t','\r','t','e','x','t',0};
2509 static const WCHAR test2
[] = {'t','e','x','t','\n','t','e','x','t',0};
2510 static const WCHAR test3
[] = {'t','e','x','t','\r','\n','t','e','x','t',0};
2511 static const WCHAR test4
[] = {'t','e','x','t','\n','\r','t','e','x','t',0};
2512 static const WCHAR test5
[] = {'1','2','3','4','\n','\r','1','2','3','4',0};
2513 SCRIPT_ITEM items
[5];
2518 hr
= ScriptItemize(test1
, lstrlenW(test1
), 5, NULL
, NULL
, items
, &count
);
2519 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2520 ok(count
== 3, "got %d expected 3\n", count
);
2523 hr
= ScriptItemize(test2
, lstrlenW(test2
), 5, NULL
, NULL
, items
, &count
);
2524 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2525 ok(count
== 3, "got %d expected 3\n", count
);
2528 hr
= ScriptItemize(test3
, lstrlenW(test3
), 5, NULL
, NULL
, items
, &count
);
2529 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2530 ok(count
== 4, "got %d expected 4\n", count
);
2533 hr
= ScriptItemize(test4
, lstrlenW(test4
), 5, NULL
, NULL
, items
, &count
);
2534 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2535 ok(count
== 4, "got %d expected 4\n", count
);
2538 hr
= ScriptItemize(test5
, lstrlenW(test5
), 5, NULL
, NULL
, items
, &count
);
2539 ok(hr
== S_OK
, "ScriptItemize failed: 0x%08x\n", hr
);
2540 ok(count
== 4, "got %d expected 4\n", count
);
2550 unsigned short pwOutGlyphs
[256];
2552 /* We need a valid HDC to drive a lot of Script functions which requires the following *
2553 * to set up for the tests. */
2554 hwnd
= CreateWindowExA(0, "static", "", WS_POPUP
, 0,0,100,100,
2557 ShowWindow(hwnd
, SW_SHOW
);
2560 hdc
= GetDC(hwnd
); /* We now have a hdc */
2561 ok( hdc
!= NULL
, "HDC failed to be created %p\n", hdc
);
2563 memset(&lf
, 0, sizeof(LOGFONTA
));
2564 lstrcpyA(lf
.lfFaceName
, "Tahoma");
2569 hfont
= SelectObject(hdc
, CreateFontIndirectA(&lf
));
2570 ok(hfont
!= NULL
, "SelectObject failed: %p\n", hfont
);
2572 test_ScriptItemize();
2573 test_ScriptItemIzeShapePlace(hdc
,pwOutGlyphs
);
2574 test_ScriptGetCMap(hdc
, pwOutGlyphs
);
2575 test_ScriptCacheGetHeight(hdc
);
2576 test_ScriptGetGlyphABCWidth(hdc
);
2577 test_ScriptShape(hdc
);
2578 test_ScriptShapeOpenType(hdc
);
2579 test_ScriptPlace(hdc
);
2581 test_ScriptGetFontProperties(hdc
);
2582 test_ScriptTextOut(hdc
);
2583 test_ScriptTextOut2(hdc
);
2584 test_ScriptTextOut3(hdc
);
2586 test_ScriptString(hdc
);
2587 test_ScriptStringXtoCP_CPtoX(hdc
);
2589 test_ScriptLayout();
2590 test_digit_substitution();
2591 test_ScriptGetProperties();
2595 ReleaseDC(hwnd
, hdc
);
2596 DestroyWindow(hwnd
);