Mercurial > sdl-ios-xcode
annotate test/automated/surface/surface.c @ 3728:97e9704fc267 gsoc2009_unit_tests
Using common infrastructure.
author | Edgar Simo <bobbens@gmail.com> |
---|---|
date | Sat, 11 Jul 2009 19:21:48 +0000 |
parents | 48e2b67bb2de |
children | b7590cd5969d |
rev | line source |
---|---|
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
1 /** |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
2 * Automated SDL_Surface test. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
3 * |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
4 * Written by Edgar Simo "bobbens" |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
5 * |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
6 * Released under Public Domain. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
7 */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
8 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
9 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
10 #include "SDL.h" |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
11 #include "SDL_surface.h" |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
12 #include "SDL_video.h" |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
13 #include "SDL_at.h" |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
14 |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
15 #include "common/common.h" |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
16 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
17 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
18 /* |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
19 * Pull in images for testcases. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
20 */ |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
21 #include "common/images.h" |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
22 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
23 |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
24 /* |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
25 * Prototypes. |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
26 */ |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
27 /* Testcases. */ |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
28 static void surface_testLoad( SDL_Surface *testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
29 static void surface_testPrimitives( SDL_Surface *testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
30 static void surface_testPrimitivesBlend( SDL_Surface *testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
31 static void surface_testBlit( SDL_Surface *testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
32 static int surface_testBlitBlendMode( SDL_Surface *testsur, SDL_Surface *face, int mode ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
33 static void surface_testBlitBlend( SDL_Surface *testsur ); |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
34 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
35 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
36 /** |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
37 * @brief Tests sprite loading. |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
38 */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
39 static void surface_testLoad( SDL_Surface *testsur ) |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
40 { |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
41 int ret; |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
42 SDL_Surface *face, *rface; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
43 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
44 SDL_ATbegin( "Load Test" ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
45 |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
46 /* Clear surface. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
47 ret = SDL_FillRect( testsur, NULL, |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
48 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
49 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
50 return; |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
51 |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
52 /* Create the blit surface. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
53 face = SDL_LoadBMP("../icon.bmp"); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
54 if (SDL_ATassert( "SDL_CreateLoadBmp", face != NULL)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
55 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
56 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
57 /* Set transparent pixel as the pixel at (0,0) */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
58 if (face->format->palette) { |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
59 ret = SDL_SetColorKey(face, (SDL_SRCCOLORKEY | SDL_RLEACCEL), |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
60 *(Uint8 *) face->pixels); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
61 if (SDL_ATassert( "SDL_SetColorKey", ret == 0)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
62 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
63 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
64 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
65 /* Convert to 32 bit to compare. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
66 rface = SDL_ConvertSurface( face, testsur->format, 0 ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
67 if (SDL_ATassert( "SDL_ConvertSurface", rface != NULL)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
68 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
69 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
70 /* See if it's the same. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
71 if (SDL_ATassert( "Primitives output not the same.", |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
72 surface_compare( rface, &img_face)==0 )) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
73 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
74 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
75 /* Clean up. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
76 SDL_FreeSurface( rface ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
77 SDL_FreeSurface( face ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
78 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
79 SDL_ATend(); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
80 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
81 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
82 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
83 /** |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
84 * @brief Tests the SDL primitives for rendering. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
85 */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
86 static void surface_testPrimitives( SDL_Surface *testsur ) |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
87 { |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
88 int ret; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
89 int x, y; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
90 SDL_Rect rect; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
91 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
92 SDL_ATbegin( "Primitives Test" ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
93 |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
94 /* Clear surface. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
95 ret = SDL_FillRect( testsur, NULL, |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
96 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
97 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
98 return; |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
99 |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
100 /* Create the surface. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
101 testsur = SDL_CreateRGBSurface( 0, 80, 60, 32, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
102 RMASK, GMASK, BMASK, AMASK ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
103 if (SDL_ATassert( "SDL_CreateRGBSurface", testsur != NULL)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
104 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
105 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
106 /* Draw a rectangle. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
107 rect.x = 40; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
108 rect.y = 0; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
109 rect.w = 40; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
110 rect.h = 80; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
111 ret = SDL_FillRect( testsur, &rect, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
112 SDL_MapRGB( testsur->format, 13, 73, 200 ) ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
113 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
114 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
115 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
116 /* Draw a rectangle. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
117 rect.x = 10; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
118 rect.y = 10; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
119 rect.w = 60; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
120 rect.h = 40; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
121 ret = SDL_FillRect( testsur, &rect, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
122 SDL_MapRGB( testsur->format, 200, 0, 100 ) ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
123 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
124 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
125 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
126 /* Draw some points like so: |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
127 * X.X.X.X.. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
128 * .X.X.X.X. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
129 * X.X.X.X.. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
130 for (y=0; y<3; y++) { |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
131 x = y % 2; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
132 for (; x<80; x+=2) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
133 ret = SDL_DrawPoint( testsur, x, y, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
134 SDL_MapRGB( testsur->format, x*y, x*y/2, x*y/3 ) ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
135 if (SDL_ATassert( "SDL_DrawPoint", ret == 0)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
136 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
137 } |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
138 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
139 /* Draw some lines. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
140 ret = SDL_DrawLine( testsur, 0, 30, 80, 30, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
141 SDL_MapRGB( testsur->format, 0, 255, 0 ) ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
142 if (SDL_ATassert( "SDL_DrawLine", ret == 0)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
143 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
144 ret = SDL_DrawLine( testsur, 40, 30, 40, 60, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
145 SDL_MapRGB( testsur->format, 55, 55, 5 ) ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
146 if (SDL_ATassert( "SDL_DrawLine", ret == 0)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
147 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
148 ret = SDL_DrawLine( testsur, 0, 60, 80, 0, |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
149 SDL_MapRGB( testsur->format, 5, 105, 105 ) ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
150 if (SDL_ATassert( "SDL_DrawLine", ret == 0)) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
151 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
152 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
153 /* See if it's the same. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
154 if (SDL_ATassert( "Primitives output not the same.", |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
155 surface_compare( testsur, &img_primitives )==0 )) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
156 return; |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
157 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
158 SDL_ATend(); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
159 } |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
160 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
161 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
162 /** |
3716
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
163 * @brief Tests the SDL primitives with alpha for rendering. |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
164 */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
165 static void surface_testPrimitivesBlend( SDL_Surface *testsur ) |
3716
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
166 { |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
167 int ret; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
168 int i, j; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
169 SDL_Rect rect; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
170 |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
171 SDL_ATbegin( "Primitives Blend Test" ); |
3716
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
172 |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
173 /* Clear surface. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
174 ret = SDL_FillRect( testsur, NULL, |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
175 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
176 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
177 return; |
3716
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
178 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
179 /* Create some rectangles for each blend mode. */ |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
180 ret = SDL_BlendRect( testsur, NULL, SDL_BLENDMODE_NONE, 255, 255, 255, 0 ); |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
181 if (SDL_ATassert( "SDL_BlendRect", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
182 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
183 rect.x = 10; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
184 rect.y = 25; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
185 rect.w = 40; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
186 rect.h = 25; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
187 ret = SDL_BlendRect( testsur, &rect, SDL_BLENDMODE_ADD, 240, 10, 10, 75 ); |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
188 if (SDL_ATassert( "SDL_BlendRect", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
189 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
190 rect.x = 30; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
191 rect.y = 40; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
192 rect.w = 45; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
193 rect.h = 15; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
194 ret = SDL_BlendRect( testsur, &rect, SDL_BLENDMODE_BLEND, 10, 240, 10, 100 ); |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
195 if (SDL_ATassert( "SDL_BlendRect", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
196 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
197 rect.x = 25; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
198 rect.y = 25; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
199 rect.w = 25; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
200 rect.h = 25; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
201 ret = SDL_BlendRect( testsur, &rect, SDL_BLENDMODE_MOD, 10, 10, 240, 125 ); |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
202 if (SDL_ATassert( "SDL_BlendRect", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
203 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
204 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
205 /* Draw blended lines, lines for everyone. */ |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
206 for (i=0; i<testsur->w; i+=2) { |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
207 ret = SDL_BlendLine( testsur, 0, 0, i, 59, |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
208 (((i/2)%3)==0) ? SDL_BLENDMODE_BLEND : |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
209 (((i/2)%3)==1) ? SDL_BLENDMODE_ADD : SDL_BLENDMODE_MOD, |
3722
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
210 60+2*i, 240-2*i, 50, 3*i ); |
3716
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
211 if (SDL_ATassert( "SDL_BlendLine", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
212 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
213 } |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
214 for (i=0; i<testsur->h; i+=2) { |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
215 ret = SDL_BlendLine( testsur, 0, 0, 79, i, |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
216 (((i/2)%3)==0) ? SDL_BLENDMODE_BLEND : |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
217 (((i/2)%3)==1) ? SDL_BLENDMODE_ADD : SDL_BLENDMODE_MOD, |
3722
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
218 60+2*i, 240-2*i, 50, 3*i ); |
3716
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
219 if (SDL_ATassert( "SDL_BlendLine", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
220 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
221 } |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
222 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
223 /* Draw points. */ |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
224 for (j=0; j<testsur->h; j+=3) { |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
225 for (i=0; i<testsur->w; i+=3) { |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
226 ret = SDL_BlendPoint( testsur, i, j, |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
227 ((((i+j)/3)%3)==0) ? SDL_BLENDMODE_BLEND : |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
228 ((((i+j)/3)%3)==1) ? SDL_BLENDMODE_ADD : SDL_BLENDMODE_MOD, |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
229 j*4, i*3, j*4, i*3 ); |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
230 if (SDL_ATassert( "SDL_BlendPoint", ret == 0)) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
231 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
232 } |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
233 } |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
234 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
235 /* See if it's the same. */ |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
236 if (SDL_ATassert( "Primitives output not the same.", |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
237 surface_compare( testsur, &img_blend )==0 )) |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
238 return; |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
239 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
240 SDL_ATend(); |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
241 } |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
242 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
243 |
ac6bc19a2dfb
Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents:
3715
diff
changeset
|
244 /** |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
245 * @brief Tests some blitting routines. |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
246 */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
247 static void surface_testBlit( SDL_Surface *testsur ) |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
248 { |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
249 int ret; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
250 SDL_Rect rect; |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
251 SDL_Surface *face; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
252 int i, j, ni, nj; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
253 |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
254 SDL_ATbegin( "Blit Tests" ); |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
255 |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
256 /* Clear surface. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
257 ret = SDL_FillRect( testsur, NULL, |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
258 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
259 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
260 return; |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
261 |
3719 | 262 /* Create face surface. */ |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
263 face = SDL_CreateRGBSurfaceFrom( (void*)img_face.pixel_data, |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
264 img_face.width, img_face.height, 32, img_face.width*4, |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
265 RMASK, GMASK, BMASK, AMASK ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
266 if (SDL_ATassert( "SDL_CreateRGBSurfaceFrom", face != NULL)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
267 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
268 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
269 /* Constant values. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
270 rect.w = face->w; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
271 rect.h = face->h; |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
272 ni = testsur->w - face->w; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
273 nj = testsur->h - face->h; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
274 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
275 /* Loop blit. */ |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
276 for (j=0; j <= nj; j+=4) { |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
277 for (i=0; i <= ni; i+=4) { |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
278 /* Blitting. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
279 rect.x = i; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
280 rect.y = j; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
281 ret = SDL_BlitSurface( face, NULL, testsur, &rect ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
282 if (SDL_ATassert( "SDL_BlitSurface", ret == 0)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
283 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
284 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
285 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
286 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
287 /* See if it's the same. */ |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
288 if (SDL_ATassert( "Blitting output not the same (normal blit).", |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
289 surface_compare( testsur, &img_blit )==0 )) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
290 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
291 |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
292 /* Clear surface. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
293 ret = SDL_FillRect( testsur, NULL, |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
294 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
295 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
296 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
297 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
298 /* Test blitting with colour mod. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
299 for (j=0; j <= nj; j+=4) { |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
300 for (i=0; i <= ni; i+=4) { |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
301 /* Set colour mod. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
302 ret = SDL_SetSurfaceColorMod( face, (255/nj)*j, (255/ni)*i, (255/nj)*j ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
303 if (SDL_ATassert( "SDL_SetSurfaceColorMod", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
304 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
305 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
306 /* Blitting. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
307 rect.x = i; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
308 rect.y = j; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
309 ret = SDL_BlitSurface( face, NULL, testsur, &rect ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
310 if (SDL_ATassert( "SDL_BlitSurface", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
311 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
312 } |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
313 } |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
314 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
315 /* See if it's the same. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
316 if (SDL_ATassert( "Blitting output not the same (using SDL_SetSurfaceColorMod).", |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
317 surface_compare( testsur, &img_blitColour )==0 )) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
318 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
319 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
320 /* Clear surface. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
321 ret = SDL_FillRect( testsur, NULL, |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
322 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
323 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
324 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
325 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
326 /* Restore colour. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
327 ret = SDL_SetSurfaceColorMod( face, 255, 255, 255 ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
328 if (SDL_ATassert( "SDL_SetSurfaceColorMod", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
329 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
330 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
331 /* Test blitting with colour mod. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
332 for (j=0; j <= nj; j+=4) { |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
333 for (i=0; i <= ni; i+=4) { |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
334 /* Set alpha mod. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
335 ret = SDL_SetSurfaceAlphaMod( face, (255/ni)*i ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
336 if (SDL_ATassert( "SDL_SetSurfaceAlphaMod", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
337 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
338 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
339 /* Blitting. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
340 rect.x = i; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
341 rect.y = j; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
342 ret = SDL_BlitSurface( face, NULL, testsur, &rect ); |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
343 if (SDL_ATassert( "SDL_BlitSurface", ret == 0)) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
344 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
345 } |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
346 } |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
347 |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
348 /* See if it's the same. */ |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
349 if (SDL_ATassert( "Blitting output not the same (using SDL_SetSurfaceAlphaMod).", |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
350 surface_compare( testsur, &img_blitAlpha )==0 )) |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
351 return; |
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
352 |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
353 /* Clean up. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
354 SDL_FreeSurface( face ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
355 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
356 SDL_ATend(); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
357 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
358 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
359 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
360 /** |
3721
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
361 * @brief Tests a blend mode. |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
362 */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
363 static int surface_testBlitBlendMode( SDL_Surface *testsur, SDL_Surface *face, int mode ) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
364 { |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
365 int ret; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
366 int i, j, ni, nj; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
367 SDL_Rect rect; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
368 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
369 /* Clear surface. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
370 ret = SDL_FillRect( testsur, NULL, |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
371 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
372 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
373 return 1; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
374 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
375 /* Steps to take. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
376 ni = testsur->w - face->w; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
377 nj = testsur->h - face->h; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
378 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
379 /* Constant values. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
380 rect.w = face->w; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
381 rect.h = face->h; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
382 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
383 /* Test blend mode. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
384 for (j=0; j <= nj; j+=4) { |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
385 for (i=0; i <= ni; i+=4) { |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
386 /* Set blend mode. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
387 ret = SDL_SetSurfaceBlendMode( face, mode ); |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
388 if (SDL_ATassert( "SDL_SetSurfaceBlendMode", ret == 0)) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
389 return 1; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
390 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
391 /* Blitting. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
392 rect.x = i; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
393 rect.y = j; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
394 ret = SDL_BlitSurface( face, NULL, testsur, &rect ); |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
395 if (SDL_ATassert( "SDL_BlitSurface", ret == 0)) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
396 return 1; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
397 } |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
398 } |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
399 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
400 return 0; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
401 } |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
402 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
403 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
404 /** |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
405 * @brief Tests some more blitting routines. |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
406 */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
407 static void surface_testBlitBlend( SDL_Surface *testsur ) |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
408 { |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
409 int ret; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
410 SDL_Rect rect; |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
411 SDL_Surface *face; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
412 int i, j, ni, nj; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
413 int mode; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
414 |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
415 SDL_ATbegin( "Blit Blending Tests" ); |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
416 |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
417 /* Clear surface. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
418 ret = SDL_FillRect( testsur, NULL, |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
419 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
420 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
421 return; |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
422 |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
423 /* Create the blit surface. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
424 face = SDL_CreateRGBSurfaceFrom( (void*)img_face.pixel_data, |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
425 img_face.width, img_face.height, 32, img_face.width*4, |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
426 RMASK, GMASK, BMASK, AMASK ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
427 if (SDL_ATassert( "SDL_CreateRGBSurfaceFrom", face != NULL)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
428 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
429 |
3721
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
430 /* Set alpha mod. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
431 ret = SDL_SetSurfaceAlphaMod( face, 100 ); |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
432 if (SDL_ATassert( "SDL_SetSurfaceAlphaMod", ret == 0)) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
433 return; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
434 |
3722
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
435 /* Steps to take. */ |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
436 ni = testsur->w - face->w; |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
437 nj = testsur->h - face->h; |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
438 |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
439 /* Constant values. */ |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
440 rect.w = face->w; |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
441 rect.h = face->h; |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
442 |
3721
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
443 /* Test None. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
444 if (surface_testBlitBlendMode( testsur, face, SDL_BLENDMODE_NONE )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
445 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
446 if (SDL_ATassert( "Blitting blending output not the same (using SDL_BLENDMODE_NONE).", |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
447 surface_compare( testsur, &img_blendNone )==0 )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
448 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
449 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
450 /* Test Mask. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
451 if (surface_testBlitBlendMode( testsur, face, SDL_BLENDMODE_MASK )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
452 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
453 if (SDL_ATassert( "Blitting blending output not the same (using SDL_BLENDMODE_MASK).", |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
454 surface_compare( testsur, &img_blendMask )==0 )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
455 return; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
456 |
3721
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
457 /* Test Blend. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
458 if (surface_testBlitBlendMode( testsur, face, SDL_BLENDMODE_BLEND )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
459 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
460 if (SDL_ATassert( "Blitting blending output not the same (using SDL_BLENDMODE_BLEND).", |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
461 surface_compare( testsur, &img_blendBlend )==0 )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
462 return; |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
463 |
3721
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
464 /* Test Add. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
465 if (surface_testBlitBlendMode( testsur, face, SDL_BLENDMODE_ADD )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
466 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
467 if (SDL_ATassert( "Blitting blending output not the same (using SDL_BLENDMODE_ADD).", |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
468 surface_compare( testsur, &img_blendAdd )==0 )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
469 return; |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
470 |
3721
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
471 /* Test Mod. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
472 if (surface_testBlitBlendMode( testsur, face, SDL_BLENDMODE_MOD )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
473 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
474 if (SDL_ATassert( "Blitting blending output not the same (using SDL_BLENDMODE_MOD).", |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
475 surface_compare( testsur, &img_blendMod )==0 )) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
476 return; |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
477 |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
478 /* Clear surface. */ |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
479 ret = SDL_FillRect( testsur, NULL, |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
480 SDL_MapRGB( testsur->format, 0, 0, 0 ) ); |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
481 if (SDL_ATassert( "SDL_FillRect", ret == 0)) |
9bb7758a9741
Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3720
diff
changeset
|
482 return; |
3720
09bbf9dc41ed
Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents:
3719
diff
changeset
|
483 |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
484 /* Loop blit. */ |
3723
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
485 for (j=0; j <= nj; j+=4) { |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
486 for (i=0; i <= ni; i+=4) { |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
487 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
488 /* Set colour mod. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
489 ret = SDL_SetSurfaceColorMod( face, (255/nj)*j, (255/ni)*i, (255/nj)*j ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
490 if (SDL_ATassert( "SDL_SetSurfaceColorMod", ret == 0)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
491 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
492 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
493 /* Set alpha mod. */ |
3723
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
494 ret = SDL_SetSurfaceAlphaMod( face, (100/ni)*i ); |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
495 if (SDL_ATassert( "SDL_SetSurfaceAlphaMod", ret == 0)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
496 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
497 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
498 /* Crazy blending mode magic. */ |
3723
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
499 mode = (i/4*j/4) % 4; |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
500 if (mode==0) mode = SDL_BLENDMODE_MASK; |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
501 else if (mode==1) mode = SDL_BLENDMODE_BLEND; |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
502 else if (mode==2) mode = SDL_BLENDMODE_ADD; |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
503 else if (mode==3) mode = SDL_BLENDMODE_MOD; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
504 ret = SDL_SetSurfaceBlendMode( face, mode ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
505 if (SDL_ATassert( "SDL_SetSurfaceBlendMode", ret == 0)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
506 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
507 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
508 /* Blitting. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
509 rect.x = i; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
510 rect.y = j; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
511 ret = SDL_BlitSurface( face, NULL, testsur, &rect ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
512 if (SDL_ATassert( "SDL_BlitSurface", ret == 0)) |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
513 return; |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
514 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
515 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
516 |
3723
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
517 /* Check to see if matches. */ |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
518 if (SDL_ATassert( "Blitting blending output not the same (using SDL_BLEND_*).", |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
519 surface_compare( testsur, &img_blendAll )==0 )) |
1496cdbb6055
* Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents:
3722
diff
changeset
|
520 return; |
3718
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
521 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
522 /* Clean up. */ |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
523 SDL_FreeSurface( face ); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
524 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
525 SDL_ATend(); |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
526 } |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
527 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
528 |
9d71382713b5
Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents:
3716
diff
changeset
|
529 /** |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
530 * @brief Runs all the tests on the surface. |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
531 * |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
532 * @param testsur Surface to run tests on. |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
533 */ |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
534 void surface_runTests( SDL_Surface *testsur ) |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
535 { |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
536 /* Software surface blitting. */ |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
537 surface_testPrimitives( testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
538 surface_testPrimitivesBlend( testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
539 surface_testBlit( testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
540 surface_testBlitBlend( testsur ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
541 } |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
542 |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
543 |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
544 /** |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
545 * @brief Entry point. |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
546 */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
547 int main( int argc, const char *argv[] ) |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
548 { |
3722
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
549 (void) argc; |
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
550 (void) argv; |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
551 int ret; |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
552 SDL_Surface *testsur; |
3722
d8772964e402
Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents:
3721
diff
changeset
|
553 |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
554 SDL_ATinit( "SDL_Surface" ); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
555 |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
556 SDL_ATbegin( "Initializing" ); |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
557 /* Initializes the SDL subsystems. */ |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
558 ret = SDL_Init(0); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
559 if (SDL_ATassert( "SDL_Init(0)", ret == 0)) |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
560 goto err; |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
561 |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
562 /* Now run on the video mode. */ |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
563 ret = SDL_InitSubSystem( SDL_INIT_VIDEO ); |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
564 if (SDL_ATassert( "SDL_InitSubSystem( SDL_INIT_VIDEO )", ret == 0)) |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
565 goto err; |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
566 |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
567 /* |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
568 * Surface on surface tests. |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
569 */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
570 /* Create the test surface. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
571 testsur = SDL_CreateRGBSurface( 0, 80, 60, 32, |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
572 RMASK, GMASK, BMASK, AMASK ); |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
573 if (SDL_ATassert( "SDL_CreateRGBSurface", testsur != NULL)) |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
574 goto err; |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
575 SDL_ATend(); |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
576 /* Run surface on surface tests. */ |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
577 surface_testLoad( testsur ); |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
578 surface_runTests( testsur ); |
3724
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
579 /* Clean up. */ |
48e2b67bb2de
Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents:
3723
diff
changeset
|
580 SDL_FreeSurface( testsur ); |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
581 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
582 /* Exit SDL. */ |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
583 SDL_Quit(); |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
584 |
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
585 return SDL_ATfinish(1); |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
586 |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
587 err: |
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
588 return SDL_ATfinish(1); |
3715
3c9d9c052c8f
Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff
changeset
|
589 } |
3728
97e9704fc267
Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents:
3724
diff
changeset
|
590 |