uncrustify! now the code is only ugly on the *inside*
[xonotic/netradiant.git] / contrib / bkgrnd2d / bkgrnd2d.cpp
1 /*
2    Copyright (C) 1999-2007 id Software, Inc. and contributors.
3    For a list of contributors, see the accompanying CONTRIBUTORS file.
4
5    This file is part of GtkRadiant.
6
7    GtkRadiant is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11
12    GtkRadiant is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16
17    You should have received a copy of the GNU General Public License
18    along with GtkRadiant; if not, write to the Free Software
19    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
20  */
21
22 //
23 // bkgrnd2d Plugin
24 //
25 // Code by reyalP aka Reed Mideke
26 //
27 // Based on various other plugins
28 //
29
30 #include "bkgrnd2d.h"
31
32 CBackgroundRender render;
33
34 CBackgroundImage backgroundXY( XY ),backgroundXZ( XZ ),backgroundYZ( YZ );
35
36 CBackgroundRender::CBackgroundRender(){
37         refCount = 1;
38 }
39
40 CBackgroundRender::~CBackgroundRender(){
41 }
42
43 void CBackgroundRender::Register(){
44         g_QglTable.m_pfnHookGL2DWindow( this );
45 }
46
47 void CBackgroundRender::Draw2D( VIEWTYPE vt ){
48         switch ( vt )
49         {
50         case XY:
51                 backgroundXY.Render();
52                 break;
53         case XZ:
54                 backgroundXZ.Render();
55                 break;
56         case YZ:
57                 backgroundYZ.Render();
58                 break;
59         }
60 }
61
62
63 CBackgroundImage::CBackgroundImage( VIEWTYPE vt ){
64         m_tex = NULL;
65         m_alpha = 0.5;
66
67         // TODO, sensible defaults ? Or not show until we have extents ?
68         m_xmin = m_ymin = 0.0f;
69         m_xmax = m_ymax = 0.0f;
70
71         m_bActive = false;
72
73         m_vt = vt;
74
75         switch ( m_vt )
76         {
77         case XY:
78                 m_ix = 0;
79                 m_iy = 1;
80                 break;
81         case XZ:
82                 m_ix = 0;
83                 m_iy = 2;
84                 break;
85         case YZ:
86                 m_ix = 1;
87                 m_iy = 2;
88                 break;
89         }
90 }
91
92 /*
93  * should cleanup, but I don't think we can be sure it happens before our
94  * interfaces are gone
95    CBackgroundImage::~CBackgroundImage()
96    {
97    }
98  */
99
100 void CBackgroundImage::Cleanup(){
101         if ( m_tex ) {
102                 g_QglTable.m_pfn_qglDeleteTextures( 1,&m_tex->texture_number );
103                 g_free( m_tex );
104                 m_tex = NULL;
105         }
106 }
107
108 void CBackgroundImage::Render(){
109         if ( !m_bActive || !Valid() ) {
110                 return;
111         }
112         g_QglTable.m_pfn_qglPushAttrib( GL_ALL_ATTRIB_BITS );
113
114         g_QglTable.m_pfn_qglEnable( GL_TEXTURE_2D );
115         g_QglTable.m_pfn_qglEnable( GL_BLEND );
116         g_QglTable.m_pfn_qglBlendFunc( GL_SRC_ALPHA, GL_ONE_MINUS_SRC_ALPHA );
117         g_QglTable.m_pfn_qglTexEnvf( GL_TEXTURE_ENV, GL_TEXTURE_ENV_MODE, GL_MODULATE );
118         g_QglTable.m_pfn_qglTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_S, GL_CLAMP );
119         g_QglTable.m_pfn_qglTexParameterf( GL_TEXTURE_2D, GL_TEXTURE_WRAP_T, GL_CLAMP );
120
121         g_QglTable.m_pfn_qglPolygonMode( GL_FRONT,GL_FILL );
122         // TODO, just so we can tell if we end up going the wrong way
123         // g_QglTable.m_pfn_qglPolygonMode(GL_BACK,GL_LINE);
124         // TODO any other state we should not assume ?
125
126         g_QglTable.m_pfn_qglBindTexture( GL_TEXTURE_2D, m_tex->texture_number );
127         g_QglTable.m_pfn_qglBegin( GL_QUADS );
128
129         g_QglTable.m_pfn_qglColor4f( 1.0,1.0,1.0,m_alpha );
130         g_QglTable.m_pfn_qglTexCoord2f( 0.0,1.0 );
131         g_QglTable.m_pfn_qglVertex2f( m_xmin,m_ymin );
132
133         g_QglTable.m_pfn_qglTexCoord2f( 1.0,1.0 );
134         g_QglTable.m_pfn_qglVertex2f( m_xmax,m_ymin );
135
136         g_QglTable.m_pfn_qglTexCoord2f( 1.0,0.0 );
137         g_QglTable.m_pfn_qglVertex2f( m_xmax,m_ymax );
138
139         g_QglTable.m_pfn_qglTexCoord2f( 0.0,0.0 );
140         g_QglTable.m_pfn_qglVertex2f( m_xmin,m_ymax );
141
142         g_QglTable.m_pfn_qglEnd();
143         g_QglTable.m_pfn_qglBindTexture( GL_TEXTURE_2D, 0 );
144
145         g_QglTable.m_pfn_qglPopAttrib();
146 }
147
148 bool CBackgroundImage::Load( const char *filename ){
149         qtexture_t *newtex;
150
151         unsigned char *image = NULL; // gets allocated with what ? g_malloc
152         int width = 0, height = 0;
153
154         g_FuncTable.m_pfnLoadImage( filename,&image,&width,&height );
155
156         if ( !image ) {
157                 Syn_Printf( MSG_WARN "load %s failed\n",filename );
158                 return false;
159         }
160
161 // just in case we want to build for an old version
162 #ifdef BKGRND2D_JPG_WORKAROUND
163         if ( strlen( filename ) > 4 && !strcmp( ".jpg",filename + strlen( filename ) - 4 ) ) {
164                 Syn_Printf( MSG_PREFIX ".jpg workaround, clearing alpha channel\n" );
165                 int size = width * height * 4;
166                 int i;
167                 for ( i = 3; i < size; i += 4 ) {
168                         image[i] = 255;
169                 }
170         }
171 #endif
172
173         //TODO bug for stored texture size
174         //TODO whose gl context are we in, anyway ?
175         newtex = g_FuncTable.m_pfnLoadTextureRGBA( image,width,height );
176
177         g_free( image );
178
179         if ( !newtex ) {
180                 Syn_Printf( MSG_WARN "image to texture failed\n" );
181                 return false;
182         }
183
184         Cleanup();
185         m_tex = newtex;
186
187         g_FuncTable.m_pfnSysUpdateWindows( W_XY );
188
189         return true;
190 }
191
192 bool CBackgroundImage::SetExtentsMM(){
193         entity_s *worldentity;
194         const char *val;
195         int xmin = 0, ymin = 0, xmax = 0, ymax = 0;
196
197         worldentity = (entity_s *)g_FuncTable.m_pfnGetEntityHandle( 0 );
198         if ( !worldentity ) {
199                 Syn_Printf( MSG_WARN "SetExtentsMM worldspawn not found\n" );
200                 return false;
201         }
202         //TODO val is not NULL even if key does not exist
203         val = g_EntityTable.m_pfnValueForKey( worldentity,"mapcoordsmins" );
204         if ( !val || !val[0] ) {
205                 Syn_Printf( MSG_WARN "SetExtentsMM mapcoordsmins not found\n" );
206                 return false;
207         }
208 // we could be more robust
209 // note contortions due to splashs strange idea of min and max
210         if ( sscanf( val, "%d %d",&xmin,&ymax ) != 2 ) {
211                 Syn_Printf( MSG_WARN "SetExtentsMM mapcoordsmins malformed\n" );
212                 return false;
213         }
214
215         val = g_EntityTable.m_pfnValueForKey( worldentity,"mapcoordsmaxs" );
216         if ( !val || !val[0] ) {
217                 Syn_Printf( MSG_WARN "SetExtentsMM mapcoordsmaxs not found\n" );
218                 return false;
219         }
220         if ( sscanf( val, "%d %d",&xmax,&ymin ) != 2 ) {
221                 Syn_Printf( MSG_WARN "SetExtentsMM mapcoordsmaxs malformed\n" );
222                 return false;
223         }
224         //might do sanity check before we commit
225         m_xmin = (float)xmin;
226         m_ymin = (float)ymin;
227         m_xmax = (float)xmax;
228         m_ymax = (float)ymax;
229
230         g_FuncTable.m_pfnSysUpdateWindows( W_XY );
231         return true;
232 }
233
234 // TODO, this should just be exported from core
235 // ripped directly from radiant/select.cpp:Select_GetBounds
236 //
237 static bool get_selection_bounds( vec3_t mins, vec3_t maxs ){
238         brush_t *b;
239         int i;
240         brush_t *selected_brushes = g_DataTable.m_pfnSelectedBrushes();
241         //TODO should never happen
242         if ( !selected_brushes ) {
243                 Sys_Printf( MSG_PREFIX "selected_brushes = NULL\n" );
244                 return false;
245         }
246         // this should mean no selection
247         if ( selected_brushes == selected_brushes->next ) {
248                 Sys_Printf( MSG_PREFIX "nothing selected\n" );
249
250                 return false;
251         }
252
253         for ( i = 0 ; i < 3 ; i++ )
254         {
255                 mins[i] = 99999;
256                 maxs[i] = -99999;
257         }
258
259         for ( b = selected_brushes->next ; b != selected_brushes ; b = b->next )
260         {
261                 if ( b->owner->eclass->fixedsize ) {
262                         for ( i = 0 ; i < 3 ; i++ )
263                         {
264                                 if ( b->owner->origin[i] < mins[i] ) {
265                                         mins[i] = b->owner->origin[i];
266                                 }
267                                 if ( b->owner->origin[i] > maxs[i] ) {
268                                         maxs[i] = b->owner->origin[i];
269                                 }
270                         }
271                 }
272                 else
273                 {
274                         for ( i = 0 ; i < 3 ; i++ )
275                         {
276                                 if ( b->mins[i] < mins[i] ) {
277                                         mins[i] = b->mins[i];
278                                 }
279                                 if ( b->maxs[i] > maxs[i] ) {
280                                         maxs[i] = b->maxs[i];
281                                 }
282                         }
283                 }
284         }
285         return true;
286 }
287
288 bool CBackgroundImage::SetExtentsSel(){
289         vec3_t mins,maxs;
290
291         if ( !get_selection_bounds( mins,maxs ) ) {
292                 return false;
293         }
294
295         if ( ( (int)mins[m_ix] == (int)maxs[m_ix] ) ||
296                  ( (int)mins[m_iy] == (int)maxs[m_iy] ) ) {
297                 Syn_Printf( MSG_PREFIX "tiny selection\n" );
298                 return false;
299         }
300
301         m_xmin = mins[m_ix];
302         m_ymin = mins[m_iy];
303         m_xmax = maxs[m_ix];
304         m_ymax = maxs[m_iy];
305
306         g_FuncTable.m_pfnSysUpdateWindows( W_XY );
307
308         return true;
309 }