moved common files back to src root
[freeglut] / src / mswin / freeglut_init_mswin.c
index 9792632..f80fe78 100644 (file)
-/*\r
- * freeglut_init_mswin.c\r
- *\r
- * The Windows-specific mouse cursor related stuff.\r
- *\r
- * Copyright (c) 2012 Stephen J. Baker. All Rights Reserved.\r
- * Written by John F. Fay, <fayjf@sourceforge.net>\r
- * Creation date: Thu Jan 19, 2012\r
- *\r
- * Permission is hereby granted, free of charge, to any person obtaining a\r
- * copy of this software and associated documentation files (the "Software"),\r
- * to deal in the Software without restriction, including without limitation\r
- * the rights to use, copy, modify, merge, publish, distribute, sublicense,\r
- * and/or sell copies of the Software, and to permit persons to whom the\r
- * Software is furnished to do so, subject to the following conditions:\r
- *\r
- * The above copyright notice and this permission notice shall be included\r
- * in all copies or substantial portions of the Software.\r
- *\r
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS\r
- * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,\r
- * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL\r
- * PAWEL W. OLSZTA BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER\r
- * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN\r
- * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
- */\r
-\r
-#include <GL/freeglut.h>\r
-#include "../Common/freeglut_internal.h"\r
-\r
-\r
-\r
-extern LRESULT CALLBACK fgPlatformWindowProc( HWND hWnd, UINT uMsg,\r
-                               WPARAM wParam, LPARAM lParam );\r
-\r
-\r
-/*\r
- * A call to this function should initialize all the display stuff...\r
- */\r
-void fgPlatformInitialize( const char* displayName )\r
-{\r
-    WNDCLASS wc;\r
-    ATOM atom;\r
-\r
-    /* What we need to do is to initialize the fgDisplay global structure here. */\r
-    fgDisplay.pDisplay.Instance = GetModuleHandle( NULL );\r
-    fgDisplay.pDisplay.DisplayName= displayName ? strdup(displayName) : 0 ;\r
-    atom = GetClassInfo( fgDisplay.pDisplay.Instance, _T("FREEGLUT"), &wc );\r
-\r
-    if( atom == 0 )\r
-    {\r
-        ZeroMemory( &wc, sizeof(WNDCLASS) );\r
-\r
-        /*\r
-         * Each of the windows should have its own device context, and we\r
-         * want redraw events during Vertical and Horizontal Resizes by\r
-         * the user.\r
-         *\r
-         * XXX Old code had "| CS_DBCLCKS" commented out.  Plans for the\r
-         * XXX future?  Dead-end idea?\r
-         */\r
-        wc.lpfnWndProc    = fgPlatformWindowProc;\r
-        wc.cbClsExtra     = 0;\r
-        wc.cbWndExtra     = 0;\r
-        wc.hInstance      = fgDisplay.pDisplay.Instance;\r
-        wc.hIcon          = LoadIcon( fgDisplay.pDisplay.Instance, _T("GLUT_ICON") );\r
-\r
-#if defined(_WIN32_WCE)\r
-        wc.style          = CS_HREDRAW | CS_VREDRAW;\r
-#else\r
-        wc.style          = CS_OWNDC | CS_HREDRAW | CS_VREDRAW;\r
-        if (!wc.hIcon)\r
-          wc.hIcon        = LoadIcon( NULL, IDI_WINLOGO );\r
-#endif\r
-\r
-        wc.hCursor        = LoadCursor( NULL, IDC_ARROW );\r
-        wc.hbrBackground  = NULL;\r
-        wc.lpszMenuName   = NULL;\r
-        wc.lpszClassName  = _T("FREEGLUT");\r
-\r
-        /* Register the window class */\r
-        atom = RegisterClass( &wc );\r
-        FREEGLUT_INTERNAL_ERROR_EXIT ( atom, "Window Class Not Registered", "fgPlatformInitialize" );\r
-    }\r
-\r
-    /* The screen dimensions can be obtained via GetSystemMetrics() calls */\r
-    fgDisplay.ScreenWidth  = GetSystemMetrics( SM_CXSCREEN );\r
-    fgDisplay.ScreenHeight = GetSystemMetrics( SM_CYSCREEN );\r
-\r
-    {\r
-        HWND desktop = GetDesktopWindow( );\r
-        HDC  context = GetDC( desktop );\r
-\r
-        fgDisplay.ScreenWidthMM  = GetDeviceCaps( context, HORZSIZE );\r
-        fgDisplay.ScreenHeightMM = GetDeviceCaps( context, VERTSIZE );\r
-\r
-        ReleaseDC( desktop, context );\r
-    }\r
-    /* If we have a DisplayName try to use it for metrics */\r
-    if( fgDisplay.pDisplay.DisplayName )\r
-    {\r
-        HDC context = CreateDC(fgDisplay.pDisplay.DisplayName,0,0,0);\r
-        if( context )\r
-        {\r
-           fgDisplay.ScreenWidth  = GetDeviceCaps( context, HORZRES );\r
-           fgDisplay.ScreenHeight = GetDeviceCaps( context, VERTRES );\r
-           fgDisplay.ScreenWidthMM  = GetDeviceCaps( context, HORZSIZE );\r
-           fgDisplay.ScreenHeightMM = GetDeviceCaps( context, VERTSIZE );\r
-           DeleteDC(context);\r
-        }\r
-        else\r
-           fgWarning("fgPlatformInitialize: "\r
-                     "CreateDC failed, Screen size info may be incorrect\n"\r
-          "This is quite likely caused by a bad '-display' parameter");\r
-      \r
-    }\r
-    /* Set the timer granularity to 1 ms */\r
-    timeBeginPeriod ( 1 );\r
-\r
-\r
-    fgState.Initialised = GL_TRUE;\r
-\r
-    /* Avoid registering atexit callback on Win32 as it results in an access\r
-     * violation due to calling into a module which has been unloaded.\r
-     * Any cleanup isn't needed on Windows anyway, the OS takes care of it.c\r
-     * see: http://blogs.msdn.com/b/oldnewthing/archive/2012/01/05/10253268.aspx\r
-     */\r
-/*    atexit(fgDeinitialize); */\r
-\r
-    /* InputDevice uses GlutTimerFunc(), so fgState.Initialised must be TRUE */\r
-    fgInitialiseInputDevices();\r
-}\r
-\r
-\r
-\r
-/* Platform-Specific Deinitialization Functions: */\r
-extern void fghCloseInputDevices ( void );\r
-\r
-void fgPlatformDeinitialiseInputDevices ( void )\r
-{\r
-#if !defined(_WIN32_WCE)\r
-       fghCloseInputDevices ();\r
-#endif /* !defined(_WIN32_WCE) */\r
-    fgState.JoysticksInitialised = GL_FALSE;\r
-    fgState.InputDevsInitialised = GL_FALSE;\r
-}\r
-\r
-void fgPlatformCloseDisplay ( void )\r
-{\r
-    if( fgDisplay.pDisplay.DisplayName )\r
-    {\r
-        free( fgDisplay.pDisplay.DisplayName );\r
-        fgDisplay.pDisplay.DisplayName = NULL;\r
-    }\r
-\r
-    /* Reset the timer granularity */\r
-    timeEndPeriod ( 1 );\r
-}\r
-\r
-\r
-\r
-/*\r
- * Everything down to the end of the next two functions is copied from the X sources.\r
- */\r
-\r
-/*\r
-\r
-Copyright 1985, 1986, 1987,1998  The Open Group\r
-\r
-Permission to use, copy, modify, distribute, and sell this software and its\r
-documentation for any purpose is hereby granted without fee, provided that\r
-the above copyright notice appear in all copies and that both that\r
-copyright notice and this permission notice appear in supporting\r
-documentation.\r
-\r
-The above copyright notice and this permission notice shall be included\r
-in all copies or substantial portions of the Software.\r
-\r
-THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS\r
-OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF\r
-MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.\r
-IN NO EVENT SHALL THE OPEN GROUP BE LIABLE FOR ANY CLAIM, DAMAGES OR\r
-OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE,\r
-ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR\r
-OTHER DEALINGS IN THE SOFTWARE.\r
-\r
-Except as contained in this notice, the name of The Open Group shall\r
-not be used in advertising or otherwise to promote the sale, use or\r
-other dealings in this Software without prior written authorization\r
-from The Open Group.\r
-\r
-*/\r
-\r
-#define NoValue         0x0000\r
-#define XValue          0x0001\r
-#define YValue          0x0002\r
-#define WidthValue      0x0004\r
-#define HeightValue     0x0008\r
-#define AllValues       0x000F\r
-#define XNegative       0x0010\r
-#define YNegative       0x0020\r
-\r
-/*\r
- *    XParseGeometry parses strings of the form\r
- *   "=<width>x<height>{+-}<xoffset>{+-}<yoffset>", where\r
- *   width, height, xoffset, and yoffset are unsigned integers.\r
- *   Example:  "=80x24+300-49"\r
- *   The equal sign is optional.\r
- *   It returns a bitmask that indicates which of the four values\r
- *   were actually found in the string.  For each value found,\r
- *   the corresponding argument is updated;  for each value\r
- *   not found, the corresponding argument is left unchanged.\r
- */\r
-\r
-static int\r
-ReadInteger(char *string, char **NextString)\r
-{\r
-    register int Result = 0;\r
-    int Sign = 1;\r
-\r
-    if (*string == '+')\r
-        string++;\r
-    else if (*string == '-')\r
-    {\r
-        string++;\r
-        Sign = -1;\r
-    }\r
-    for (; (*string >= '0') && (*string <= '9'); string++)\r
-    {\r
-        Result = (Result * 10) + (*string - '0');\r
-    }\r
-    *NextString = string;\r
-    if (Sign >= 0)\r
-        return Result;\r
-    else\r
-        return -Result;\r
-}\r
-\r
-int XParseGeometry (\r
-    const char *string,\r
-    int *x,\r
-    int *y,\r
-    unsigned int *width,    /* RETURN */\r
-    unsigned int *height)    /* RETURN */\r
-{\r
-    int mask = NoValue;\r
-    register char *strind;\r
-    unsigned int tempWidth = 0, tempHeight = 0;\r
-    int tempX = 0, tempY = 0;\r
-    char *nextCharacter;\r
-\r
-    if ( (string == NULL) || (*string == '\0'))\r
-      return mask;\r
-    if (*string == '=')\r
-        string++;  /* ignore possible '=' at beg of geometry spec */\r
-\r
-    strind = (char *)string;\r
-    if (*strind != '+' && *strind != '-' && *strind != 'x') {\r
-        tempWidth = ReadInteger(strind, &nextCharacter);\r
-        if (strind == nextCharacter)\r
-            return 0;\r
-        strind = nextCharacter;\r
-        mask |= WidthValue;\r
-    }\r
-\r
-    if (*strind == 'x' || *strind == 'X') {\r
-        strind++;\r
-        tempHeight = ReadInteger(strind, &nextCharacter);\r
-        if (strind == nextCharacter)\r
-            return 0;\r
-        strind = nextCharacter;\r
-        mask |= HeightValue;\r
-    }\r
-\r
-    if ((*strind == '+') || (*strind == '-')) {\r
-        if (*strind == '-') {\r
-            strind++;\r
-            tempX = -ReadInteger(strind, &nextCharacter);\r
-            if (strind == nextCharacter)\r
-                return 0;\r
-            strind = nextCharacter;\r
-            mask |= XNegative;\r
-        }\r
-        else\r
-        {\r
-            strind++;\r
-            tempX = ReadInteger(strind, &nextCharacter);\r
-            if (strind == nextCharacter)\r
-                return 0;\r
-            strind = nextCharacter;\r
-        }\r
-        mask |= XValue;\r
-        if ((*strind == '+') || (*strind == '-')) {\r
-            if (*strind == '-') {\r
-                strind++;\r
-                tempY = -ReadInteger(strind, &nextCharacter);\r
-                if (strind == nextCharacter)\r
-                    return 0;\r
-                strind = nextCharacter;\r
-                mask |= YNegative;\r
-            }\r
-            else\r
-            {\r
-                strind++;\r
-                tempY = ReadInteger(strind, &nextCharacter);\r
-                if (strind == nextCharacter)\r
-                    return 0;\r
-                strind = nextCharacter;\r
-            }\r
-            mask |= YValue;\r
-        }\r
-    }\r
-\r
-    /* If strind isn't at the end of the string the it's an invalid\r
-       geometry specification. */\r
-\r
-    if (*strind != '\0') return 0;\r
-\r
-    if (mask & XValue)\r
-        *x = tempX;\r
-    if (mask & YValue)\r
-        *y = tempY;\r
-    if (mask & WidthValue)\r
-        *width = tempWidth;\r
-    if (mask & HeightValue)\r
-        *height = tempHeight;\r
-    return mask;\r
-}\r
-\r
-\r
-\r
+/*
+ * freeglut_init_mswin.c
+ *
+ * The Windows-specific mouse cursor related stuff.
+ *
+ * Copyright (c) 2012 Stephen J. Baker. All Rights Reserved.
+ * Written by John F. Fay, <fayjf@sourceforge.net>
+ * Creation date: Thu Jan 19, 2012
+ *
+ * Permission is hereby granted, free of charge, to any person obtaining a
+ * copy of this software and associated documentation files (the "Software"),
+ * to deal in the Software without restriction, including without limitation
+ * the rights to use, copy, modify, merge, publish, distribute, sublicense,
+ * and/or sell copies of the Software, and to permit persons to whom the
+ * Software is furnished to do so, subject to the following conditions:
+ *
+ * The above copyright notice and this permission notice shall be included
+ * in all copies or substantial portions of the Software.
+ *
+ * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
+ * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT.  IN NO EVENT SHALL
+ * PAWEL W. OLSZTA BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
+ * IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
+ * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
+ */
+
+#define FREEGLUT_BUILDING_LIB
+#include <GL/freeglut.h>
+#include "../fg_internal.h"
+
+
+
+extern LRESULT CALLBACK fgPlatformWindowProc( HWND hWnd, UINT uMsg,
+                               WPARAM wParam, LPARAM lParam );
+
+
+/*
+ * A call to this function should initialize all the display stuff...
+ */
+void fgPlatformInitialize( const char* displayName )
+{
+    WNDCLASS wc;
+    ATOM atom;
+
+    /* What we need to do is to initialize the fgDisplay global structure here. */
+    fgDisplay.pDisplay.Instance = GetModuleHandle( NULL );
+    fgDisplay.pDisplay.DisplayName= displayName ? strdup(displayName) : 0 ;
+    atom = GetClassInfo( fgDisplay.pDisplay.Instance, _T("FREEGLUT"), &wc );
+
+    if( atom == 0 )
+    {
+        ZeroMemory( &wc, sizeof(WNDCLASS) );
+
+        /*
+         * Each of the windows should have its own device context, and we
+         * want redraw events during Vertical and Horizontal Resizes by
+         * the user.
+         *
+         * XXX Old code had "| CS_DBCLCKS" commented out.  Plans for the
+         * XXX future?  Dead-end idea?
+         */
+        wc.lpfnWndProc    = fgPlatformWindowProc;
+        wc.cbClsExtra     = 0;
+        wc.cbWndExtra     = 0;
+        wc.hInstance      = fgDisplay.pDisplay.Instance;
+        wc.hIcon          = LoadIcon( fgDisplay.pDisplay.Instance, _T("GLUT_ICON") );
+
+#if defined(_WIN32_WCE)
+        wc.style          = CS_HREDRAW | CS_VREDRAW;
+#else
+        wc.style          = CS_OWNDC | CS_HREDRAW | CS_VREDRAW;
+        if (!wc.hIcon)
+          wc.hIcon        = LoadIcon( NULL, IDI_WINLOGO );
+#endif
+
+        wc.hCursor        = LoadCursor( NULL, IDC_ARROW );
+        wc.hbrBackground  = NULL;
+        wc.lpszMenuName   = NULL;
+        wc.lpszClassName  = _T("FREEGLUT");
+
+        /* Register the window class */
+        atom = RegisterClass( &wc );
+        FREEGLUT_INTERNAL_ERROR_EXIT ( atom, "Window Class Not Registered", "fgPlatformInitialize" );
+    }
+
+    /* The screen dimensions can be obtained via GetSystemMetrics() calls */
+    fgDisplay.ScreenWidth  = GetSystemMetrics( SM_CXSCREEN );
+    fgDisplay.ScreenHeight = GetSystemMetrics( SM_CYSCREEN );
+
+    {
+        HWND desktop = GetDesktopWindow( );
+        HDC  context = GetDC( desktop );
+
+        fgDisplay.ScreenWidthMM  = GetDeviceCaps( context, HORZSIZE );
+        fgDisplay.ScreenHeightMM = GetDeviceCaps( context, VERTSIZE );
+
+        ReleaseDC( desktop, context );
+    }
+    /* If we have a DisplayName try to use it for metrics */
+    if( fgDisplay.pDisplay.DisplayName )
+    {
+        HDC context = CreateDC(fgDisplay.pDisplay.DisplayName,0,0,0);
+        if( context )
+        {
+           fgDisplay.ScreenWidth  = GetDeviceCaps( context, HORZRES );
+           fgDisplay.ScreenHeight = GetDeviceCaps( context, VERTRES );
+           fgDisplay.ScreenWidthMM  = GetDeviceCaps( context, HORZSIZE );
+           fgDisplay.ScreenHeightMM = GetDeviceCaps( context, VERTSIZE );
+           DeleteDC(context);
+        }
+        else
+           fgWarning("fgPlatformInitialize: "
+                     "CreateDC failed, Screen size info may be incorrect\n"
+          "This is quite likely caused by a bad '-display' parameter");
+      
+    }
+    /* Set the timer granularity to 1 ms */
+    timeBeginPeriod ( 1 );
+
+
+    fgState.Initialised = GL_TRUE;
+
+    /* Avoid registering atexit callback on Win32 as it can result in an
+     * access violation due to calling into a module which has been
+     * unloaded.
+     * Any cleanup isn't needed on Windows anyway, the OS takes care of it.
+     * see: http://blogs.msdn.com/b/oldnewthing/archive/2012/01/05/10253268.aspx
+     */
+/*    atexit(fgDeinitialize); */
+
+    /* InputDevice uses GlutTimerFunc(), so fgState.Initialised must be TRUE */
+    fgInitialiseInputDevices();
+}
+
+
+
+/* Platform-Specific Deinitialization Functions: */
+extern void fghCloseInputDevices ( void );
+
+void fgPlatformDeinitialiseInputDevices ( void )
+{
+#if !defined(_WIN32_WCE)
+       fghCloseInputDevices ();
+#endif /* !defined(_WIN32_WCE) */
+    fgState.JoysticksInitialised = GL_FALSE;
+    fgState.InputDevsInitialised = GL_FALSE;
+}
+
+void fgPlatformCloseDisplay ( void )
+{
+    if( fgDisplay.pDisplay.DisplayName )
+    {
+        free( fgDisplay.pDisplay.DisplayName );
+        fgDisplay.pDisplay.DisplayName = NULL;
+    }
+
+    /* Reset the timer granularity */
+    timeEndPeriod ( 1 );
+}
+
+void fgPlatformDestroyContext ( SFG_PlatformDisplay pDisplay, SFG_WindowContextType MContext )
+{
+       /* Do nothing -- this is required for X11 */
+}
+
+/* -- PLATFORM-SPECIFIC INTERFACE FUNCTION -------------------------------------------------- */
+
+void (__cdecl *__glutExitFunc)( int return_value ) = NULL;
+
+void FGAPIENTRY __glutInitWithExit( int *pargc, char **argv, void (__cdecl *exit_function)(int) )
+{
+  __glutExitFunc = exit_function;
+  glutInit(pargc, argv);
+}
+