Allowing recent change to build on older versions of MSVC per e-mail from Eero Pajarr...
[freeglut] / src / freeglut_misc.c
1 /*
2  * freeglut_misc.c
3  *
4  * Functions that didn't fit anywhere else...
5  *
6  * Copyright (c) 1999-2000 Pawel W. Olszta. All Rights Reserved.
7  * Written by Pawel W. Olszta, <olszta@sourceforge.net>
8  * Creation date: Thu Dec 9 1999
9  *
10  * Permission is hereby granted, free of charge, to any person obtaining a
11  * copy of this software and associated documentation files (the "Software"),
12  * to deal in the Software without restriction, including without limitation
13  * the rights to use, copy, modify, merge, publish, distribute, sublicense,
14  * and/or sell copies of the Software, and to permit persons to whom the
15  * Software is furnished to do so, subject to the following conditions:
16  *
17  * The above copyright notice and this permission notice shall be included
18  * in all copies or substantial portions of the Software.
19  *
20  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
21  * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
22  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
23  * PAWEL W. OLSZTA BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
24  * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
25  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
26  */
27
28 #include <GL/freeglut.h>
29 #include "freeglut_internal.h"
30
31 /*
32  * TODO BEFORE THE STABLE RELEASE:
33  *
34  *  glutSetColor()     --
35  *  glutGetColor()     --
36  *  glutCopyColormap() --
37  *  glutSetKeyRepeat() -- this is evil and should be removed from API
38  */
39
40 /* -- INTERFACE FUNCTIONS -------------------------------------------------- */
41
42 /*
43  * This functions checks if an OpenGL extension is supported or not
44  *
45  * XXX Wouldn't this be simpler and clearer if we used strtok()?
46  */
47 int FGAPIENTRY glutExtensionSupported( const char* extension )
48 {
49   const char *extensions, *start;
50   const size_t len = strlen( extension );
51
52   /* Make sure there is a current window, and thus a current context available */
53   FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutExtensionSupported" );
54   freeglut_return_val_if_fail( fgStructure.CurrentWindow != NULL, 0 );
55
56   if (strchr(extension, ' '))
57     return 0;
58   start = extensions = (const char *) glGetString(GL_EXTENSIONS);
59
60   /* XXX consider printing a warning to stderr that there's no current
61    * rendering context.
62    */
63   freeglut_return_val_if_fail( extensions != NULL, 0 );
64
65   while (1) {
66      const char *p = strstr(extensions, extension);
67      if (!p)
68         return 0;  /* not found */
69      /* check that the match isn't a super string */
70      if ((p == start || p[-1] == ' ') && (p[len] == ' ' || p[len] == 0))
71         return 1;
72      /* skip the false match and continue */
73      extensions = p + len;
74   }
75
76   return 0 ;
77 }
78
79 #ifndef GL_INVALID_FRAMEBUFFER_OPERATION
80 #ifdef GL_INVALID_FRAMEBUFFER_OPERATION_EXT
81 #define GL_INVALID_FRAMEBUFFER_OPERATION GL_INVALID_FRAMEBUFFER_OPERATION_EXT
82 #else
83 #define GL_INVALID_FRAMEBUFFER_OPERATION 0x0506
84 #endif
85 #endif
86
87 #ifndef GL_TABLE_TOO_LARGE
88 #ifdef GL_TABLE_TOO_LARGE_EXT
89 #define GL_TABLE_TOO_LARGE GL_TABLE_TOO_LARGE_EXT
90 #else
91 #define GL_TABLE_TOO_LARGE 0x8031
92 #endif
93 #endif
94
95 #ifndef GL_TEXTURE_TOO_LARGE
96 #ifdef GL_TEXTURE_TOO_LARGE_EXT
97 #define GL_TEXTURE_TOO_LARGE GL_TEXTURE_TOO_LARGE_EXT
98 #else
99 #define GL_TEXTURE_TOO_LARGE 0x8065
100 #endif
101 #endif
102
103 /*
104  * A cut-down local version of gluErrorString to avoid depending on GLU.
105  */
106 static const char* fghErrorString( GLenum error )
107 {
108   switch ( error ) {
109   case GL_INVALID_ENUM: return "invalid enumerant";
110   case GL_INVALID_VALUE: return "invalid value";
111   case GL_INVALID_OPERATION: return "invalid operation";
112   case GL_STACK_OVERFLOW: return "stack overflow";
113   case GL_STACK_UNDERFLOW: return "stack underflow";
114   case GL_OUT_OF_MEMORY: return "out of memory";
115   case GL_TABLE_TOO_LARGE: return "table too large";
116   case GL_INVALID_FRAMEBUFFER_OPERATION: return "invalid framebuffer operation";
117   case GL_TEXTURE_TOO_LARGE: return "texture too large";
118   default: return "unknown GL error";
119   }
120 }
121
122 /*
123  * This function reports all the OpenGL errors that happened till now
124  */
125 void FGAPIENTRY glutReportErrors( void )
126 {
127     GLenum error;
128     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutReportErrors" );
129     while( ( error = glGetError() ) != GL_NO_ERROR )
130         fgWarning( "GL error: %s", fghErrorString( error ) );
131 }
132
133 /*
134  * Control the auto-repeat of keystrokes to the current window
135  */
136 void FGAPIENTRY glutIgnoreKeyRepeat( int ignore )
137 {
138     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutIgnoreKeyRepeat" );
139     FREEGLUT_EXIT_IF_NO_WINDOW ( "glutIgnoreKeyRepeat" );
140
141     fgStructure.CurrentWindow->State.IgnoreKeyRepeat = ignore ? GL_TRUE : GL_FALSE;
142 }
143
144 /*
145  * Set global auto-repeat of keystrokes
146  *
147  * RepeatMode should be either:
148  *    GLUT_KEY_REPEAT_OFF
149  *    GLUT_KEY_REPEAT_ON
150  *    GLUT_KEY_REPEAT_DEFAULT
151  */
152 void FGAPIENTRY glutSetKeyRepeat( int repeatMode )
153 {
154     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutSetKeyRepeat" );
155
156     switch( repeatMode )
157     {
158     case GLUT_KEY_REPEAT_OFF:
159     case GLUT_KEY_REPEAT_ON:
160      fgState.KeyRepeat = repeatMode;
161      break;
162
163     case GLUT_KEY_REPEAT_DEFAULT:
164      fgState.KeyRepeat = GLUT_KEY_REPEAT_ON;
165      break;
166
167     default:
168         fgError ("Invalid glutSetKeyRepeat mode: %d", repeatMode);
169         break;
170     }
171 }
172
173 /*
174  * Forces the joystick callback to be executed
175  */
176 void FGAPIENTRY glutForceJoystickFunc( void )
177 {
178     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutForceJoystickFunc" );
179 #if !defined(_WIN32_WCE)
180     freeglut_return_if_fail( fgStructure.CurrentWindow != NULL );
181     freeglut_return_if_fail( FETCH_WCB( *( fgStructure.CurrentWindow ), Joystick ) );
182     fgJoystickPollWindow( fgStructure.CurrentWindow );
183 #endif /* !defined(_WIN32_WCE) */
184 }
185
186 /*
187  *
188  */
189 void FGAPIENTRY glutSetColor( int nColor, GLfloat red, GLfloat green, GLfloat blue )
190 {
191     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutSetColor" );
192     /* We really need to do something here. */
193 }
194
195 /*
196  *
197  */
198 GLfloat FGAPIENTRY glutGetColor( int color, int component )
199 {
200     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutGetColor" );
201     /* We really need to do something here. */
202     return( 0.0f );
203 }
204
205 /*
206  *
207  */
208 void FGAPIENTRY glutCopyColormap( int window )
209 {
210     FREEGLUT_EXIT_IF_NOT_INITIALISED ( "glutCopyColormap" );
211     /* We really need to do something here. */
212 }
213
214 /*** END OF FILE ***/