2 * Copyright 2007 Vijay Kiran Kamuju
3 * Copyright 2007 David Adam
5 * This library is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU Lesser General Public
7 * License as published by the Free Software Foundation; either
8 * version 2.1 of the License, or (at your option) any later version.
10 * This library is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
13 * Lesser General Public License for more details.
15 * You should have received a copy of the GNU Lesser General Public
16 * License along with this library; if not, write to the Free Software
17 * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
24 #include "wine/test.h"
26 #define PI (4.0f*atanf(1.0f))
27 #define admit_error 0.000001f
29 #define expect_mat( expectedmat, gotmat)\
36 if (fabs(expectedmat[i][j]-gotmat[i][j])>admit_error)\
42 ok(equal, "Expected matrix=\n(%f,%f,%f,%f\n %f,%f,%f,%f\n %f,%f,%f,%f\n %f,%f,%f,%f\n)\n\n" \
43 "Got matrix=\n(%f,%f,%f,%f\n %f,%f,%f,%f\n %f,%f,%f,%f\n %f,%f,%f,%f)\n", \
44 expectedmat[0][0],expectedmat[0][1],expectedmat[0][2],expectedmat[0][3], \
45 expectedmat[1][0],expectedmat[1][1],expectedmat[1][2],expectedmat[1][3], \
46 expectedmat[2][0],expectedmat[2][1],expectedmat[2][2],expectedmat[2][3], \
47 expectedmat[3][0],expectedmat[3][1],expectedmat[3][2],expectedmat[3][3], \
48 gotmat[0][0],gotmat[0][1],gotmat[0][2],gotmat[0][3], \
49 gotmat[1][0],gotmat[1][1],gotmat[1][2],gotmat[1][3], \
50 gotmat[2][0],gotmat[2][1],gotmat[2][2],gotmat[2][3], \
51 gotmat[3][0],gotmat[3][1],gotmat[3][2],gotmat[3][3] ); \
54 #define expect_quat(expectedquat,gotquat) \
55 ok( (fabs(U1(expectedquat.v).x-U1(gotquat.v).x)<admit_error) && \
56 (fabs(U2(expectedquat.v).y-U2(gotquat.v).y)<admit_error) && \
57 (fabs(U3(expectedquat.v).z-U3(gotquat.v).z)<admit_error) && \
58 (fabs(expectedquat.s-gotquat.s)<admit_error), \
59 "Expected Quaternion %f %f %f %f , Got Quaternion %f %f %f %f\n", \
60 expectedquat.s,U1(expectedquat.v).x,U2(expectedquat.v).y,U3(expectedquat.v).z, \
61 gotquat.s,U1(gotquat.v).x,U2(gotquat.v).y,U3(gotquat.v).z);
63 #define expect_vec(expectedvec,gotvec) \
64 ok( ((fabs(U1(expectedvec).x-U1(gotvec).x)<admit_error)&&(fabs(U2(expectedvec).y-U2(gotvec).y)<admit_error)&&(fabs(U3(expectedvec).z-U3(gotvec).z)<admit_error)), \
65 "Expected Vector= (%f, %f, %f)\n , Got Vector= (%f, %f, %f)\n", \
66 U1(expectedvec).x,U2(expectedvec).y,U3(expectedvec).z, U1(gotvec).x, U2(gotvec).y, U3(gotvec).z);
68 static HMODULE d3drm_handle
= 0;
70 static void (WINAPI
* pD3DRMMatrixFromQuaternion
)(D3DRMMATRIX4D
, D3DRMQUATERNION
*);
71 static D3DVECTOR
*(WINAPI
*pD3DRMVectorAdd
)(D3DVECTOR
*, D3DVECTOR
*, D3DVECTOR
*);
72 static D3DVECTOR
*(WINAPI
*pD3DRMVectorCrossProduct
)(D3DVECTOR
*, D3DVECTOR
*, D3DVECTOR
*);
73 static D3DVALUE (WINAPI
*pD3DRMVectorDotProduct
)(D3DVECTOR
*, D3DVECTOR
*);
74 static D3DVALUE (WINAPI
*pD3DRMVectorModulus
)(D3DVECTOR
*);
75 static D3DVECTOR
*(WINAPI
*pD3DRMVectorNormalize
)(D3DVECTOR
*);
76 static D3DVECTOR
*(WINAPI
*pD3DRMVectorReflect
)(D3DVECTOR
*, D3DVECTOR
*, D3DVECTOR
*);
77 static D3DVECTOR
*(WINAPI
*pD3DRMVectorRotate
)(D3DVECTOR
*, D3DVECTOR
*, D3DVECTOR
*, D3DVALUE
);
78 static D3DVECTOR
*(WINAPI
*pD3DRMVectorScale
)(D3DVECTOR
*, D3DVECTOR
*, D3DVALUE
);
79 static D3DVECTOR
*(WINAPI
*pD3DRMVectorSubtract
)(D3DVECTOR
*, D3DVECTOR
*, D3DVECTOR
*);
80 static D3DRMQUATERNION
*(WINAPI
*pD3DRMQuaternionFromRotation
)(D3DRMQUATERNION
*, D3DVECTOR
*, D3DVALUE
);
81 static D3DRMQUATERNION
*(WINAPI
* pD3DRMQuaternionSlerp
)(D3DRMQUATERNION
*,
82 D3DRMQUATERNION
*, D3DRMQUATERNION
*, D3DVALUE
);
83 static D3DCOLOR (WINAPI
* pD3DRMCreateColorRGB
)(D3DVALUE
, D3DVALUE
, D3DVALUE
);
84 static D3DCOLOR (WINAPI
* pD3DRMCreateColorRGBA
)(D3DVALUE
, D3DVALUE
, D3DVALUE
, D3DVALUE
);
85 static D3DVALUE (WINAPI
* pD3DRMColorGetAlpha
)(D3DCOLOR
);
86 static D3DVALUE (WINAPI
* pD3DRMColorGetBlue
)(D3DCOLOR
);
87 static D3DVALUE (WINAPI
* pD3DRMColorGetGreen
)(D3DCOLOR
);
88 static D3DVALUE (WINAPI
* pD3DRMColorGetRed
)(D3DCOLOR
);
90 #define D3DRM_GET_PROC(func) \
91 p ## func = (void*)GetProcAddress(d3drm_handle, #func); \
93 trace("GetProcAddress(%s) failed\n", #func); \
94 FreeLibrary(d3drm_handle); \
98 static BOOL
InitFunctionPtrs(void)
100 d3drm_handle
= LoadLibraryA("d3drm.dll");
104 skip("Could not load d3drm.dll\n");
108 D3DRM_GET_PROC(D3DRMMatrixFromQuaternion
)
109 D3DRM_GET_PROC(D3DRMVectorAdd
)
110 D3DRM_GET_PROC(D3DRMVectorCrossProduct
)
111 D3DRM_GET_PROC(D3DRMVectorDotProduct
)
112 D3DRM_GET_PROC(D3DRMVectorModulus
)
113 D3DRM_GET_PROC(D3DRMVectorNormalize
)
114 D3DRM_GET_PROC(D3DRMVectorReflect
)
115 D3DRM_GET_PROC(D3DRMVectorRotate
)
116 D3DRM_GET_PROC(D3DRMVectorScale
)
117 D3DRM_GET_PROC(D3DRMVectorSubtract
)
118 D3DRM_GET_PROC(D3DRMQuaternionFromRotation
)
119 D3DRM_GET_PROC(D3DRMQuaternionSlerp
)
120 D3DRM_GET_PROC(D3DRMCreateColorRGB
)
121 D3DRM_GET_PROC(D3DRMCreateColorRGBA
)
122 D3DRM_GET_PROC(D3DRMColorGetAlpha
)
123 D3DRM_GET_PROC(D3DRMColorGetBlue
)
124 D3DRM_GET_PROC(D3DRMColorGetGreen
)
125 D3DRM_GET_PROC(D3DRMColorGetRed
)
131 static void VectorTest(void)
133 D3DVALUE mod
,par
,theta
;
134 D3DVECTOR e
,r
,u
,v
,w
,axis
,casnul
,norm
,ray
,self
;
136 U1(u
).x
=2.0f
; U2(u
).y
=2.0f
; U3(u
).z
=1.0f
;
137 U1(v
).x
=4.0f
; U2(v
).y
=4.0f
; U3(v
).z
=0.0f
;
140 /*______________________VectorAdd_________________________________*/
141 pD3DRMVectorAdd(&r
,&u
,&v
);
142 U1(e
).x
=6.0f
; U2(e
).y
=6.0f
; U3(e
).z
=1.0f
;
145 U1(self
).x
=9.0f
; U2(self
).y
=18.0f
; U3(self
).z
=27.0f
;
146 pD3DRMVectorAdd(&self
,&self
,&u
);
147 U1(e
).x
=11.0f
; U2(e
).y
=20.0f
; U3(e
).z
=28.0f
;
150 /*_______________________VectorSubtract__________________________*/
151 pD3DRMVectorSubtract(&r
,&u
,&v
);
152 U1(e
).x
=-2.0f
; U2(e
).y
=-2.0f
; U3(e
).z
=1.0f
;
155 U1(self
).x
=9.0f
; U2(self
).y
=18.0f
; U3(self
).z
=27.0f
;
156 pD3DRMVectorSubtract(&self
,&self
,&u
);
157 U1(e
).x
=7.0f
; U2(e
).y
=16.0f
; U3(e
).z
=26.0f
;
160 /*_______________________VectorCrossProduct_______________________*/
161 pD3DRMVectorCrossProduct(&r
,&u
,&v
);
162 U1(e
).x
=-4.0f
; U2(e
).y
=4.0f
; U3(e
).z
=0.0f
;
165 U1(self
).x
=9.0f
; U2(self
).y
=18.0f
; U3(self
).z
=27.0f
;
166 pD3DRMVectorCrossProduct(&self
,&self
,&u
);
167 U1(e
).x
=-36.0f
; U2(e
).y
=45.0f
; U3(e
).z
=-18.0f
;
170 /*_______________________VectorDotProduct__________________________*/
171 mod
=pD3DRMVectorDotProduct(&u
,&v
);
172 ok((mod
== 16.0f
), "Expected 16.0f, Got %f\n", mod
);
174 /*_______________________VectorModulus_____________________________*/
175 mod
=pD3DRMVectorModulus(&u
);
176 ok((mod
== 3.0f
), "Expected 3.0f, Got %f\n", mod
);
178 /*_______________________VectorNormalize___________________________*/
179 pD3DRMVectorNormalize(&u
);
180 U1(e
).x
=2.0f
/3.0f
; U2(e
).y
=2.0f
/3.0f
; U3(e
).z
=1.0f
/3.0f
;
183 /* If u is the NULL vector, MSDN says that the return vector is NULL. In fact, the returned vector is (1,0,0). The following test case prove it. */
185 U1(casnul
).x
=0.0f
; U2(casnul
).y
=0.0f
; U3(casnul
).z
=0.0f
;
186 pD3DRMVectorNormalize(&casnul
);
187 U1(e
).x
=1.0f
; U2(e
).y
=0.0f
; U3(e
).z
=0.0f
;
188 expect_vec(e
,casnul
);
190 /*____________________VectorReflect_________________________________*/
191 U1(ray
).x
=3.0f
; U2(ray
).y
=-4.0f
; U3(ray
).z
=5.0f
;
192 U1(norm
).x
=1.0f
; U2(norm
).y
=-2.0f
; U3(norm
).z
=6.0f
;
193 U1(e
).x
=79.0f
; U2(e
).y
=-160.0f
; U3(e
).z
=487.0f
;
194 pD3DRMVectorReflect(&r
,&ray
,&norm
);
197 /*_______________________VectorRotate_______________________________*/
198 U1(w
).x
=3.0f
; U2(w
).y
=4.0f
; U3(w
).z
=0.0f
;
199 U1(axis
).x
=0.0f
; U2(axis
).y
=0.0f
; U3(axis
).z
=1.0f
;
201 pD3DRMVectorRotate(&r
,&w
,&axis
,theta
);
202 U1(e
).x
=-0.3f
-0.4f
*sqrtf(3.0f
); U2(e
).y
=0.3f
*sqrtf(3.0f
)-0.4f
; U3(e
).z
=0.0f
;
205 /* The same formula gives D3DRMVectorRotate, for theta in [-PI/2;+PI/2] or not. The following test proves this fact.*/
207 pD3DRMVectorRotate(&r
,&w
,&axis
,theta
);
208 U1(e
).x
=1.4f
/sqrtf(2.0f
); U2(e
).y
=0.2f
/sqrtf(2.0f
); U3(e
).z
=0.0f
;
212 pD3DRMVectorRotate(&self
,&self
,&axis
,theta
);
213 U1(e
).x
=0.989950; U2(e
).y
=0.141421f
; U3(e
).z
=0.0f
;
216 /*_______________________VectorScale__________________________*/
218 pD3DRMVectorScale(&r
,&v
,par
);
219 U1(e
).x
=10.0f
; U2(e
).y
=10.0f
; U3(e
).z
=0.0f
;
222 U1(self
).x
=9.0f
; U2(self
).y
=18.0f
; U3(self
).z
=27.0f
;
223 pD3DRMVectorScale(&self
,&self
,2);
224 U1(e
).x
=18.0f
; U2(e
).y
=36.0f
; U3(e
).z
=54.0f
;
228 static void MatrixTest(void)
231 D3DRMMATRIX4D exp
,mat
;
233 exp
[0][0]=-49.0f
; exp
[0][1]=4.0f
; exp
[0][2]=22.0f
; exp
[0][3]=0.0f
;
234 exp
[1][0]=20.0f
; exp
[1][1]=-39.0f
; exp
[1][2]=20.0f
; exp
[1][3]=0.0f
;
235 exp
[2][0]=10.0f
; exp
[2][1]=28.0f
; exp
[2][2]=-25.0f
; exp
[2][3]=0.0f
;
236 exp
[3][0]=0.0f
; exp
[3][1]=0.0f
; exp
[3][2]=0.0f
; exp
[3][3]=1.0f
;
237 q
.s
=1.0f
; U1(q
.v
).x
=2.0f
; U2(q
.v
).y
=3.0f
; U3(q
.v
).z
=4.0f
;
239 pD3DRMMatrixFromQuaternion(mat
,&q
);
243 static void QuaternionTest(void)
247 D3DRMQUATERNION q
,q1
,q1final
,q2
,q2final
,r
;
249 /*_________________QuaternionFromRotation___________________*/
250 U1(axis
).x
=1.0f
; U2(axis
).y
=1.0f
; U3(axis
).z
=1.0f
;
252 pD3DRMQuaternionFromRotation(&r
,&axis
,theta
);
253 q
.s
=0.5f
; U1(q
.v
).x
=0.5f
; U2(q
.v
).y
=0.5f
; U3(q
.v
).z
=0.5f
;
256 /*_________________QuaternionSlerp_________________________*/
257 /* If the angle of the two quaternions is in ]PI/2;3PI/2[, QuaternionSlerp
258 * interpolates between the first quaternion and the opposite of the second one.
259 * The test proves this fact. */
261 q1
.s
=1.0f
; U1(q1
.v
).x
=2.0f
; U2(q1
.v
).y
=3.0f
; U3(q1
.v
).z
=50.0f
;
262 q2
.s
=-4.0f
; U1(q2
.v
).x
=6.0f
; U2(q2
.v
).y
=7.0f
; U3(q2
.v
).z
=8.0f
;
263 /* The angle between q1 and q2 is in [-PI/2,PI/2]. So, one interpolates between q1 and q2. */
264 q
.s
= -0.55f
; U1(q
.v
).x
=3.24f
; U2(q
.v
).y
=4.24f
; U3(q
.v
).z
=36.98f
;
265 pD3DRMQuaternionSlerp(&r
,&q1
,&q2
,par
);
268 q1
.s
=1.0f
; U1(q1
.v
).x
=2.0f
; U2(q1
.v
).y
=3.0f
; U3(q1
.v
).z
=50.0f
;
269 q2
.s
=-94.0f
; U1(q2
.v
).x
=6.0f
; U2(q2
.v
).y
=7.0f
; U3(q2
.v
).z
=-8.0f
;
270 /* The angle between q1 and q2 is not in [-PI/2,PI/2]. So, one interpolates between q1 and -q2. */
271 q
.s
=29.83f
; U1(q
.v
).x
=-0.48f
; U2(q
.v
).y
=-0.10f
; U3(q
.v
).z
=36.98f
;
272 pD3DRMQuaternionSlerp(&r
,&q1
,&q2
,par
);
275 /* Test the spherical interpolation part */
276 q1
.s
=0.1f
; U1(q1
.v
).x
=0.2f
; U2(q1
.v
).y
=0.3f
; U3(q1
.v
).z
=0.4f
;
277 q2
.s
=0.5f
; U1(q2
.v
).x
=0.6f
; U2(q2
.v
).y
=0.7f
; U3(q2
.v
).z
=0.8f
;
278 q
.s
= 0.243943f
; U1(q
.v
).x
= 0.351172f
; U2(q
.v
).y
= 0.458401f
; U3(q
.v
).z
= 0.565629f
;
282 pD3DRMQuaternionSlerp(&r
,&q1
,&q2
,par
);
285 /* Test to show that the input quaternions are not changed */
286 expect_quat(q1
,q1final
);
287 expect_quat(q2
,q2final
);
290 static void ColorTest(void)
292 D3DCOLOR color
, expected_color
, got_color
;
293 D3DVALUE expected
, got
, red
, green
, blue
, alpha
;
295 /*___________D3DRMCreateColorRGB_________________________*/
299 expected_color
=0xffcc4c8c;
300 got_color
=pD3DRMCreateColorRGB(red
,green
,blue
);
301 ok((expected_color
==got_color
),"Expected color=%x, Got color=%x\n",expected_color
,got_color
);
303 /*___________D3DRMCreateColorRGBA________________________*/
308 expected_color
=0x931966b2;
309 got_color
=pD3DRMCreateColorRGBA(red
,green
,blue
,alpha
);
310 ok((expected_color
==got_color
),"Expected color=%x, Got color=%x\n",expected_color
,got_color
);
312 /* if a component is <0 then, then one considers this component as 0. The following test proves this fact (test only with the red component). */
317 expected_color
=0x68006699;
318 got_color
=pD3DRMCreateColorRGBA(red
,green
,blue
,alpha
);
319 ok((expected_color
==got_color
),"Expected color=%x, Got color=%x\n",expected_color
,got_color
);
321 /* if a component is >1 then, then one considers this component as 1. The following test proves this fact (test only with the red component). */
326 expected_color
=0x68ff6699;
327 got_color
=pD3DRMCreateColorRGBA(red
,green
,blue
,alpha
);
328 ok((expected_color
==got_color
),"Expected color=%x, Got color=%x\n",expected_color
,got_color
);
330 /*___________D3DRMColorGetAlpha_________________________*/
332 expected
=14.0f
/255.0f
;
333 got
=pD3DRMColorGetAlpha(color
);
334 ok((fabs(expected
-got
)<admit_error
),"Expected=%f, Got=%f\n",expected
,got
);
336 /*___________D3DRMColorGetBlue__________________________*/
339 got
=pD3DRMColorGetBlue(color
);
340 ok((fabs(expected
-got
)<admit_error
),"Expected=%f, Got=%f\n",expected
,got
);
342 /*___________D3DRMColorGetGreen_________________________*/
345 got
=pD3DRMColorGetGreen(color
);
346 ok((fabs(expected
-got
)<admit_error
),"Expected=%f, Got=%f\n",expected
,got
);
348 /*___________D3DRMColorGetRed__________________________*/
351 got
=pD3DRMColorGetRed(color
);
352 ok((fabs(expected
-got
)<admit_error
),"Expected=%f, Got=%f\n",expected
,got
);
357 if(!InitFunctionPtrs())
365 FreeLibrary(d3drm_handle
);