annotate test/automated/surface/surface.c @ 3729:b7590cd5969d gsoc2009_unit_tests

Minor fix.
author Edgar Simo <bobbens@gmail.com>
date Sun, 12 Jul 2009 11:18:59 +0000
parents 97e9704fc267
children e451d5d288e9
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;
3729
b7590cd5969d Minor fix.
Edgar Simo <bobbens@gmail.com>
parents: 3728
diff changeset
132 for (; x<80; x+=2) {
3715
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 ) );
3729
b7590cd5969d Minor fix.
Edgar Simo <bobbens@gmail.com>
parents: 3728
diff changeset
135 if (SDL_ATassert( "SDL_DrawPoint", ret == 0))
b7590cd5969d Minor fix.
Edgar Simo <bobbens@gmail.com>
parents: 3728
diff changeset
136 return;
b7590cd5969d Minor fix.
Edgar Simo <bobbens@gmail.com>
parents: 3728
diff changeset
137 }
3715
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
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
140 /* Draw some lines. */
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
141 ret = SDL_DrawLine( testsur, 0, 30, 80, 30,
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
142 SDL_MapRGB( testsur->format, 0, 255, 0 ) );
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
143 if (SDL_ATassert( "SDL_DrawLine", ret == 0))
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
144 return;
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
145 ret = SDL_DrawLine( testsur, 40, 30, 40, 60,
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
146 SDL_MapRGB( testsur->format, 55, 55, 5 ) );
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
147 if (SDL_ATassert( "SDL_DrawLine", ret == 0))
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
148 return;
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
149 ret = SDL_DrawLine( testsur, 0, 60, 80, 0,
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
150 SDL_MapRGB( testsur->format, 5, 105, 105 ) );
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
151 if (SDL_ATassert( "SDL_DrawLine", ret == 0))
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
152 return;
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
153
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
154 /* See if it's the same. */
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
155 if (SDL_ATassert( "Primitives output not the same.",
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
156 surface_compare( testsur, &img_primitives )==0 ))
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
157 return;
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
158
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
159 SDL_ATend();
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
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
163 /**
3716
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
164 * @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
165 */
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
166 static void surface_testPrimitivesBlend( SDL_Surface *testsur )
3716
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
167 {
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
168 int ret;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
169 int i, j;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
170 SDL_Rect rect;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
171
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
172 SDL_ATbegin( "Primitives Blend Test" );
3716
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
173
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
174 /* Clear surface. */
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
175 ret = SDL_FillRect( testsur, NULL,
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
176 SDL_MapRGB( testsur->format, 0, 0, 0 ) );
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
177 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
178 return;
3716
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
179
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
180 /* Create some rectangles for each blend mode. */
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
181 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
182 if (SDL_ATassert( "SDL_BlendRect", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
183 return;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
184 rect.x = 10;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
185 rect.y = 25;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
186 rect.w = 40;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
187 rect.h = 25;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
188 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
189 if (SDL_ATassert( "SDL_BlendRect", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
190 return;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
191 rect.x = 30;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
192 rect.y = 40;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
193 rect.w = 45;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
194 rect.h = 15;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
195 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
196 if (SDL_ATassert( "SDL_BlendRect", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
197 return;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
198 rect.x = 25;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
199 rect.y = 25;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
200 rect.w = 25;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
201 rect.h = 25;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
202 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
203 if (SDL_ATassert( "SDL_BlendRect", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
204 return;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
205
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
206 /* Draw blended lines, lines for everyone. */
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
207 for (i=0; i<testsur->w; i+=2) {
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
208 ret = SDL_BlendLine( testsur, 0, 0, i, 59,
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
209 (((i/2)%3)==0) ? SDL_BLENDMODE_BLEND :
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
210 (((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
211 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
212 if (SDL_ATassert( "SDL_BlendLine", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
213 return;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
214 }
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
215 for (i=0; i<testsur->h; i+=2) {
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
216 ret = SDL_BlendLine( testsur, 0, 0, 79, i,
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
217 (((i/2)%3)==0) ? SDL_BLENDMODE_BLEND :
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
218 (((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
219 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
220 if (SDL_ATassert( "SDL_BlendLine", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
221 return;
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
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
224 /* Draw points. */
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
225 for (j=0; j<testsur->h; j+=3) {
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
226 for (i=0; i<testsur->w; i+=3) {
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
227 ret = SDL_BlendPoint( testsur, i, j,
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
228 ((((i+j)/3)%3)==0) ? SDL_BLENDMODE_BLEND :
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
229 ((((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
230 j*4, i*3, j*4, i*3 );
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
231 if (SDL_ATassert( "SDL_BlendPoint", ret == 0))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
232 return;
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
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
236 /* See if it's the same. */
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
237 if (SDL_ATassert( "Primitives output not the same.",
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
238 surface_compare( testsur, &img_blend )==0 ))
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
239 return;
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
240
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
241 SDL_ATend();
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
ac6bc19a2dfb Added surfarce blend rendering functions testcase.
Edgar Simo <bobbens@gmail.com>
parents: 3715
diff changeset
245 /**
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
246 * @brief Tests some blitting routines.
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
247 */
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
248 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
249 {
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
250 int ret;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
251 SDL_Rect rect;
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
252 SDL_Surface *face;
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
253 int i, j, ni, nj;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
254
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
255 SDL_ATbegin( "Blit Tests" );
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
256
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
257 /* Clear surface. */
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
258 ret = SDL_FillRect( testsur, NULL,
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
259 SDL_MapRGB( testsur->format, 0, 0, 0 ) );
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
260 if (SDL_ATassert( "SDL_FillRect", ret == 0))
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
261 return;
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
262
3719
15373e31daff Moved some code around.
Edgar Simo <bobbens@gmail.com>
parents: 3718
diff changeset
263 /* Create face surface. */
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
264 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
265 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
266 RMASK, GMASK, BMASK, AMASK );
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
267 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
268 return;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
269
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
270 /* Constant values. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
271 rect.w = face->w;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
272 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
273 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
274 nj = testsur->h - face->h;
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
275
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
276 /* 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
277 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
278 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
279 /* Blitting. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
280 rect.x = i;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
281 rect.y = j;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
282 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
283 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
284 return;
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
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
288 /* 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
289 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
290 surface_compare( testsur, &img_blit )==0 ))
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
291 return;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
292
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
293 /* Clear surface. */
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
294 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
295 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
296 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
297 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
298
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
299 /* 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
300 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
301 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
302 /* 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
303 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
304 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
305 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
306
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
307 /* Blitting. */
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
308 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
309 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
310 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
311 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
312 return;
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
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
316 /* 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
317 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
318 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
319 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
320
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
321 /* Clear surface. */
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
322 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
323 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
324 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
325 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
326
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
327 /* Restore colour. */
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
328 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
329 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
330 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
331
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
332 /* 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
333 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
334 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
335 /* 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
336 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
337 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
338 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
339
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
340 /* Blitting. */
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
341 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
342 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
343 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
344 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
345 return;
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
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
349 /* 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
350 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
351 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
352 return;
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
353
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
354 /* Clean up. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
355 SDL_FreeSurface( face );
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
356
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
357 SDL_ATend();
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
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
361 /**
3721
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
362 * @brief Tests a blend mode.
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
363 */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
364 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
365 {
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
366 int ret;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
367 int i, j, ni, nj;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
368 SDL_Rect rect;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
369
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
370 /* Clear surface. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
371 ret = SDL_FillRect( testsur, NULL,
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
372 SDL_MapRGB( testsur->format, 0, 0, 0 ) );
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
373 if (SDL_ATassert( "SDL_FillRect", ret == 0))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
374 return 1;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
375
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
376 /* Steps to take. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
377 ni = testsur->w - face->w;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
378 nj = testsur->h - face->h;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
379
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
380 /* Constant values. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
381 rect.w = face->w;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
382 rect.h = face->h;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
383
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
384 /* Test blend mode. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
385 for (j=0; j <= nj; j+=4) {
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
386 for (i=0; i <= ni; i+=4) {
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
387 /* Set blend mode. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
388 ret = SDL_SetSurfaceBlendMode( face, mode );
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
389 if (SDL_ATassert( "SDL_SetSurfaceBlendMode", ret == 0))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
390 return 1;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
391
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
392 /* Blitting. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
393 rect.x = i;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
394 rect.y = j;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
395 ret = SDL_BlitSurface( face, NULL, testsur, &rect );
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
396 if (SDL_ATassert( "SDL_BlitSurface", ret == 0))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
397 return 1;
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
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
401 return 0;
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
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
405 /**
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
406 * @brief Tests some more blitting routines.
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
407 */
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
408 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
409 {
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
410 int ret;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
411 SDL_Rect rect;
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
412 SDL_Surface *face;
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
413 int i, j, ni, nj;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
414 int mode;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
415
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
416 SDL_ATbegin( "Blit Blending Tests" );
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
417
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
418 /* Clear surface. */
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
419 ret = SDL_FillRect( testsur, NULL,
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
420 SDL_MapRGB( testsur->format, 0, 0, 0 ) );
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
421 if (SDL_ATassert( "SDL_FillRect", ret == 0))
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
422 return;
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
423
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
424 /* Create the blit surface. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
425 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
426 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
427 RMASK, GMASK, BMASK, AMASK );
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
428 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
429 return;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
430
3721
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
431 /* Set alpha mod. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
432 ret = SDL_SetSurfaceAlphaMod( face, 100 );
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
433 if (SDL_ATassert( "SDL_SetSurfaceAlphaMod", ret == 0))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
434 return;
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
435
3722
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
436 /* Steps to take. */
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
437 ni = testsur->w - face->w;
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
438 nj = testsur->h - face->h;
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
439
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
440 /* Constant values. */
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
441 rect.w = face->w;
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
442 rect.h = face->h;
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
443
3721
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
444 /* Test None. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
445 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
446 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
447 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
448 surface_compare( testsur, &img_blendNone )==0 ))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
449 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
450
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
451 /* Test Mask. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
452 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
453 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
454 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
455 surface_compare( testsur, &img_blendMask )==0 ))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
456 return;
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
457
3721
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
458 /* Test Blend. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
459 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
460 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
461 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
462 surface_compare( testsur, &img_blendBlend )==0 ))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
463 return;
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
464
3721
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
465 /* Test Add. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
466 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
467 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
468 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
469 surface_compare( testsur, &img_blendAdd )==0 ))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
470 return;
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
471
3721
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
472 /* Test Mod. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
473 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
474 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
475 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
476 surface_compare( testsur, &img_blendMod )==0 ))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
477 return;
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
478
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
479 /* Clear surface. */
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
480 ret = SDL_FillRect( testsur, NULL,
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
481 SDL_MapRGB( testsur->format, 0, 0, 0 ) );
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
482 if (SDL_ATassert( "SDL_FillRect", ret == 0))
9bb7758a9741 Doing individual blend mode testing when blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3720
diff changeset
483 return;
3720
09bbf9dc41ed Changed the surface blit test to test colour and alpha mod individually.
Edgar Simo <bobbens@gmail.com>
parents: 3719
diff changeset
484
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
485 /* Loop blit. */
3723
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
486 for (j=0; j <= nj; j+=4) {
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
487 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
488
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
489 /* Set colour mod. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
490 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
491 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
492 return;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
493
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
494 /* Set alpha mod. */
3723
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
495 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
496 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
497 return;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
498
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
499 /* Crazy blending mode magic. */
3723
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
500 mode = (i/4*j/4) % 4;
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
501 if (mode==0) mode = SDL_BLENDMODE_MASK;
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
502 else if (mode==1) mode = SDL_BLENDMODE_BLEND;
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
503 else if (mode==2) mode = SDL_BLENDMODE_ADD;
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
504 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
505 ret = SDL_SetSurfaceBlendMode( face, mode );
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
506 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
507 return;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
508
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
509 /* Blitting. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
510 rect.x = i;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
511 rect.y = j;
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
512 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
513 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
514 return;
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 }
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
517
3723
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
518 /* Check to see if matches. */
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
519 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
520 surface_compare( testsur, &img_blendAll )==0 ))
1496cdbb6055 * Added mixture of blending modes test.
Edgar Simo <bobbens@gmail.com>
parents: 3722
diff changeset
521 return;
3718
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
522
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
523 /* Clean up. */
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
524 SDL_FreeSurface( face );
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
525
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
526 SDL_ATend();
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
9d71382713b5 Added 3 new tests: loadsurface, blitting, alpha blitting.
Edgar Simo <bobbens@gmail.com>
parents: 3716
diff changeset
530 /**
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
531 * @brief Runs all the tests on the surface.
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
532 *
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
533 * @param testsur Surface to run tests on.
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
534 */
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
535 void surface_runTests( SDL_Surface *testsur )
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
536 {
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
537 /* Software surface blitting. */
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
538 surface_testPrimitives( testsur );
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
539 surface_testPrimitivesBlend( testsur );
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
540 surface_testBlit( testsur );
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
541 surface_testBlitBlend( testsur );
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
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
545 /**
3715
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
546 * @brief Entry point.
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
547 */
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
548 int main( int argc, const char *argv[] )
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
549 {
3722
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
550 (void) argc;
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
551 (void) argv;
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
552 int ret;
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
553 SDL_Surface *testsur;
3722
d8772964e402 Added more strict warning flags.
Edgar Simo <bobbens@gmail.com>
parents: 3721
diff changeset
554
3715
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
555 SDL_ATinit( "SDL_Surface" );
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
556
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
557 SDL_ATbegin( "Initializing" );
3715
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
558 /* Initializes the SDL subsystems. */
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
559 ret = SDL_Init(0);
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
560 if (SDL_ATassert( "SDL_Init(0)", ret == 0))
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
561 goto err;
3715
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
562
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
563 /* Now run on the video mode. */
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
564 ret = SDL_InitSubSystem( SDL_INIT_VIDEO );
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
565 if (SDL_ATassert( "SDL_InitSubSystem( SDL_INIT_VIDEO )", ret == 0))
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
566 goto err;
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 /*
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
569 * Surface on surface tests.
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
570 */
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
571 /* Create the test surface. */
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
572 testsur = SDL_CreateRGBSurface( 0, 80, 60, 32,
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
573 RMASK, GMASK, BMASK, AMASK );
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
574 if (SDL_ATassert( "SDL_CreateRGBSurface", testsur != NULL))
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
575 goto err;
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
576 SDL_ATend();
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
577 /* Run surface on surface tests. */
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
578 surface_testLoad( testsur );
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
579 surface_runTests( testsur );
3724
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
580 /* Clean up. */
48e2b67bb2de Use testsur as a parameter.
Edgar Simo <bobbens@gmail.com>
parents: 3723
diff changeset
581 SDL_FreeSurface( testsur );
3715
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
582
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
583 /* Exit SDL. */
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
584 SDL_Quit();
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
585
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
586 return SDL_ATfinish(1);
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
587
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
588 err:
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
589 return SDL_ATfinish(1);
3715
3c9d9c052c8f Initial revision of SDL_Surface testsuite.
Edgar Simo <bobbens@gmail.com>
parents:
diff changeset
590 }
3728
97e9704fc267 Using common infrastructure.
Edgar Simo <bobbens@gmail.com>
parents: 3724
diff changeset
591