gdiplus: Added GdipTranslateMatrix.
[wine] / dlls / gdiplus / matrix.c
1 /*
2  * Copyright (C) 2007 Google (Evan Stade)
3  *
4  * This library is free software; you can redistribute it and/or
5  * modify it under the terms of the GNU Lesser General Public
6  * License as published by the Free Software Foundation; either
7  * version 2.1 of the License, or (at your option) any later version.
8  *
9  * This library is distributed in the hope that it will be useful,
10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12  * Lesser General Public License for more details.
13  *
14  * You should have received a copy of the GNU Lesser General Public
15  * License along with this library; if not, write to the Free Software
16  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
17  */
18
19 #include <stdarg.h>
20
21 #include "windef.h"
22 #include "winbase.h"
23 #include "wingdi.h"
24
25 #include "gdiplus.h"
26 #include "gdiplus_private.h"
27
28 /* Multiplies two matrices of the form
29  *
30  * idx:0 idx:1     0
31  * idx:2 idx:3     0
32  * idx:4 idx:5     1
33  *
34  * and puts the output in out.
35  * */
36 static void matrix_multiply(GDIPCONST REAL * left, GDIPCONST REAL * right, REAL * out)
37 {
38     REAL temp[6];
39     int i, odd;
40
41     for(i = 0; i < 6; i++){
42         odd = i % 2;
43         temp[i] = left[i - odd] * right[odd] + left[i - odd + 1] * right[odd + 2] +
44                   (i >= 4 ? right[odd + 4] : 0.0);
45     }
46
47     memcpy(out, temp, 6 * sizeof(REAL));
48 }
49
50 GpStatus WINGDIPAPI GdipCreateMatrix2(REAL m11, REAL m12, REAL m21, REAL m22,
51     REAL dx, REAL dy, GpMatrix **matrix)
52 {
53     if(!matrix)
54         return InvalidParameter;
55
56     *matrix = GdipAlloc(sizeof(GpMatrix));
57     if(!*matrix)    return OutOfMemory;
58
59     /* first row */
60     (*matrix)->matrix[0] = m11;
61     (*matrix)->matrix[1] = m12;
62     /* second row */
63     (*matrix)->matrix[2] = m21;
64     (*matrix)->matrix[3] = m22;
65     /* third row */
66     (*matrix)->matrix[4] = dx;
67     (*matrix)->matrix[5] = dy;
68
69     return Ok;
70 }
71
72 GpStatus WINGDIPAPI GdipDeleteMatrix(GpMatrix *matrix)
73 {
74     if(!matrix)
75         return InvalidParameter;
76
77     GdipFree(matrix);
78
79     return Ok;
80 }
81
82 GpStatus WINGDIPAPI GdipMultiplyMatrix(GpMatrix *matrix, GpMatrix* matrix2,
83     GpMatrixOrder order)
84 {
85     if(!matrix || !matrix2)
86         return InvalidParameter;
87
88     if(order == MatrixOrderAppend)
89         matrix_multiply(matrix->matrix, matrix2->matrix, matrix->matrix);
90     else
91         matrix_multiply(matrix2->matrix, matrix->matrix, matrix->matrix);
92
93     return Ok;
94 }
95
96 GpStatus WINGDIPAPI GdipScaleMatrix(GpMatrix *matrix, REAL scaleX, REAL scaleY,
97     GpMatrixOrder order)
98 {
99     REAL scale[6];
100
101     if(!matrix)
102         return InvalidParameter;
103
104     scale[0] = scaleX;
105     scale[1] = 0.0;
106     scale[2] = 0.0;
107     scale[3] = scaleY;
108     scale[4] = 0.0;
109     scale[5] = 0.0;
110
111     if(order == MatrixOrderAppend)
112         matrix_multiply(matrix->matrix, scale, matrix->matrix);
113     else
114         matrix_multiply(scale, matrix->matrix, matrix->matrix);
115
116     return Ok;
117 }
118
119 GpStatus WINGDIPAPI GdipTransformMatrixPoints(GpMatrix *matrix, GpPointF *pts,
120                                               INT count)
121 {
122     REAL x, y;
123     INT i;
124
125     if(!matrix || !pts)
126         return InvalidParameter;
127
128     for(i = 0; i < count; i++)
129     {
130         x = pts[i].X;
131         y = pts[i].Y;
132
133         pts[i].X = x * matrix->matrix[0] + y * matrix->matrix[2] + matrix->matrix[4];
134         pts[i].Y = x * matrix->matrix[1] + y * matrix->matrix[3] + matrix->matrix[5];
135     }
136
137     return Ok;
138 }
139
140 GpStatus WINGDIPAPI GdipTranslateMatrix(GpMatrix *matrix, REAL offsetX,
141     REAL offsetY, GpMatrixOrder order)
142 {
143     REAL translate[6];
144
145     if(!matrix)
146         return InvalidParameter;
147
148     translate[0] = 1.0;
149     translate[1] = 0.0;
150     translate[2] = 0.0;
151     translate[3] = 1.0;
152     translate[4] = offsetX;
153     translate[5] = offsetY;
154
155     if(order == MatrixOrderAppend)
156         matrix_multiply(matrix->matrix, translate, matrix->matrix);
157     else
158         matrix_multiply(translate, matrix->matrix, matrix->matrix);
159
160     return Ok;
161 }