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
15373e31daff Moved some code around.
Edgar Simo <bobbens@gmail.com>
parents: 3718
diff changeset
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