Changeset 21802 for branches/gcc-kmk/src/user32/initterm.cpp

Timestamp:

Nov 11, 2011, 9:14:11 PM (14 years ago)

Author:

dmik

Message:

Start porting USER32 to GCC.

File:

• branches/gcc-kmk/src/user32/initterm.cpp (copied) (copied from branches/gcc-kmk/src/user32/inituser32.cpp ) (6 diffs)

branches/gcc-kmk/src/user32/initterm.cpp

@@ -1 @@
-/* $Id: inituser32.cpp,v 1.19 2004-05-03 12:09:01 sandervl Exp $ */
-/*
+/* $Id: initterm.cpp,v 1.34 2003-01-21 11:22:08 sandervl Exp $
+ *
  * USER32 DLL entry point
  *
@@ -6 +6 @@
  * Copyright 1998 Peter Fitzsimmons
  *
- *
  * Project Odin Software License can be found in LICENSE.TXT
- *
  */
 
-/*-------------------------------------------------------------*/
-/* INITERM.C -- Source for a custom dynamic link library       */
-/*              initialization and termination (_DLL_InitTerm) */
-/*              function.                                      */
-/*                                                             */
-/* When called to perform initialization, this sample function */
-/* gets storage for an array of integers, and initializes its  */
-/* elements with random integers.  At termination time, it     */
-/* frees the array.  Substitute your own special processing.   */
-/*-------------------------------------------------------------*/
-
-
-/* Include files */
 #define  INCL_DOSMODULEMGR
 #define  INCL_DOSPROCESS
@@ -30 +15 @@
 #define  INCL_DOSERRORS
 #define  INCL_WINSHELLDATA
-#define  INCL_GPI
 #define  INCL_WINERRORS
 #include <os2wrap.h>    //Odin32 OS/2 api wrappers
@@ -44 +28 @@
 #include <spy.h>
 #include <monitor.h>
-#include <kbdhook.h>
+#include <exitlist.h>
+#include <initdll.h>
+#include <stats.h>
+
 #include "pmwindow.h"
 #include "win32wdesktop.h"
@@ -51 +38 @@
 #include "initterm.h"
 #include "auxthread.h"
-#include <exitlist.h>
-#include <initdll.h>
-#include <stats.h>
 
 #define DBG_LOCALLOG    DBG_initterm
 #include "dbglocal.h"
 
-/*-------------------------------------------------------------------*/
-/* A clean up routine registered with DosExitList must be used if    */
-/* runtime calls are required and the runtime is dynamically linked. */
-/* This will guarantee that this clean up routine is run before the  */
-/* library DLL is terminated.                                        */
-/*-------------------------------------------------------------------*/
-static void APIENTRY cleanup(ULONG reason);
-
-extern "C" {
- //Win32 resource table (produced by wrc)
- extern DWORD user32_PEResTab;
-}
+extern INT __cdecl wsnprintfA(LPSTR,UINT,LPCSTR,...);
+
+// Win32 resource table (produced by wrc)
+extern DWORD user32_PEResTab;
+
 DWORD hInstanceUser32 = 0;
 
-extern INT __cdecl wsnprintfA(LPSTR,UINT,LPCSTR,...);
-
-//******************************************************************************
+BOOL  fVersionWarp3 = FALSE;
+
 #define FONTSDIRECTORY "Fonts"
 #define REGPATH "SOFTWARE\\Microsoft\\Windows NT\\CurrentVersion\\Fonts"
-//******************************************************************************
+
 static void MigrateWindowsFonts()
 {
@@ -148 +124 @@
 }
 
-/****************************************************************************/
-/* _DLL_InitTerm is the function that gets called by the operating system   */
-/* loader when it loads and frees this DLL for each process that accesses   */
-/* this DLL.  However, it only gets called the first time the DLL is loaded */
-/* and the last time it is freed for a particular process.  The system      */
-/* linkage convention MUST be used because the operating system loader is   */
-/* calling this function.                                                   */
-/****************************************************************************/
-ULONG APIENTRY inittermUser32(ULONG hModule, ULONG ulFlag)
-{
-   size_t i;
-   APIRET rc;
-   ULONG  version[2];
-
-   /*-------------------------------------------------------------------------*/
-   /* If ulFlag is zero then the DLL is being loaded so initialization should */
-   /* be performed.  If ulFlag is 1 then the DLL is being freed so            */
-   /* termination should be performed.                                        */
-   /*-------------------------------------------------------------------------*/
-
-   switch (ulFlag) {
-      case 0 :
-         STATS_InitializeUSER32 ();
-
-         ParseLogStatusUSER32();
-
-         if (!InitializeKernel32())
-             return 0;
-
-         CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed  98-03-18 05:28:48*/
-
-         hInstanceUser32 = RegisterLxDll(hModule, DllMain, (PVOID)&user32_PEResTab,
-                                         USER32_MAJORIMAGE_VERSION, USER32_MINORIMAGE_VERSION,
-                                         IMAGE_SUBSYSTEM_WINDOWS_GUI);
-         if(hInstanceUser32 == 0)
-                return 0UL;
-
-         dprintf(("user32 init %s %s (%x)", __DATE__, __TIME__, inittermUser32));
-
-         //SvL: Try to start communication with our message spy queue server
-         InitSpyQueue();
-
-         //SvL: Init win32 PM classes
-         //PH:  initializes HAB!
-         if (FALSE == InitPM())
+ULONG SYSTEM DLL_InitUser32(ULONG hModule)
+{
+    APIRET rc;
+
+    ULONG version[2];
+    rc = DosQuerySysInfo(QSV_VERSION_MAJOR, QSV_VERSION_MINOR, version, sizeof(version));
+    if (rc == 0)
+    {
+         if (version[0] >= 20 && version[1] <= 30)
+             fVersionWarp3 = TRUE;
+    }
+
+    STATS_InitializeUSER32();
+
+    ParseLogStatusUSER32();
+
+    if (!InitializeKernel32())
+        return 0;
+
+    CheckVersionFromHMOD(PE2LX_VERSION, hModule); /*PLF Wed  98-03-18 05:28:48*/
+
+    hInstanceUser32 = RegisterLxDll(hModule, DllMain, (PVOID)&user32_PEResTab,
+                                    USER32_MAJORIMAGE_VERSION, USER32_MINORIMAGE_VERSION,
+                                    IMAGE_SUBSYSTEM_WINDOWS_GUI);
+    if(hInstanceUser32 == 0)
            return 0UL;
 
-         InitializeWindowHandles();
-
-         //SvL: 18-7-'98, Register system window classes (button, listbox etc etc)
-         //CB: register internal classes
-         RegisterSystemClasses(hModule);
-
-         //CB: initialize PM monitor driver
-         MONITOR_Initialize(&MONITOR_PrimaryMonitor);
-
-         //PF: migrate windows fonts
-         MigrateWindowsFonts();
-
-         InitClipboardFormats();
-
-         RasEntry (RAS_EVENT_User32InitComplete, &hInstanceUser32, sizeof (hInstanceUser32));
-
-         break;
-
-
-       case 1 :
-         if(hInstanceUser32) {
-            UnregisterLxDll(hInstanceUser32);
-         }
-         STATS_UninitializeUSER32 ();
-         break;
-      default  :
-         return 0UL;
-   }
-
-   /***********************************************************/
-   /* A non-zero value must be returned to indicate success.  */
-   /***********************************************************/
-   return 1UL;
-}
-//******************************************************************************
-//******************************************************************************
-void APIENTRY cleanupUser32(ULONG ulReason)
-{
-  dprintf(("user32 exit\n"));
-
-//SvL: Causes PM hangs on some (a lot?) machines. Reason unknown.
-////   RestoreCursor();
-
-   //Destroy CD notification window
-   WinDestroyWindow(hwndCD);
-   DestroyDesktopWindow();
-   Win32BaseWindow::DestroyAll();
-   UnregisterSystemClasses();
-   Win32WndClass::DestroyAll();
-   MONITOR_Finalize(&MONITOR_PrimaryMonitor);
-   SYSCOLOR_Save();
-   CloseSpyQueue();
-   FinalizeWindowHandles();
-   STATS_DumpStatsUSER32();
-   dprintf(("user32 exit done\n"));
-}
-//******************************************************************************
-//******************************************************************************
+    dprintf(("user32 init %s %s (%x)", __DATE__, __TIME__, inittermUser32));
+
+    //SvL: Try to start communication with our message spy queue server
+    InitSpyQueue();
+
+    //SvL: Init win32 PM classes
+    //PH:  initializes HAB!
+    if (FALSE == InitPM())
+      return 0UL;
+
+    InitializeWindowHandles();
+
+    //SvL: 18-7-'98, Register system window classes (button, listbox etc etc)
+    //CB: register internal classes
+    RegisterSystemClasses(hModule);
+
+    //CB: initialize PM monitor driver
+    MONITOR_Initialize(&MONITOR_PrimaryMonitor);
+
+    //PF: migrate windows fonts
+    MigrateWindowsFonts();
+
+    InitClipboardFormats();
+
+    RasEntry (RAS_EVENT_User32InitComplete, &hInstanceUser32, sizeof (hInstanceUser32));
+
+    return EXITLIST_USER32;
+}
+
+void SYSTEM DLL_TermUser32(ULONG hModule)
+{
+    dprintf(("user32 exit\n"));
+
+ //SvL: Causes PM hangs on some (a lot?) machines. Reason unknown.
+ ////   RestoreCursor();
+
+    //Destroy CD notification window
+    WinDestroyWindow(hwndCD);
+    DestroyDesktopWindow();
+    Win32BaseWindow::DestroyAll();
+    UnregisterSystemClasses();
+    Win32WndClass::DestroyAll();
+    MONITOR_Finalize(&MONITOR_PrimaryMonitor);
+    SYSCOLOR_Save();
+    CloseSpyQueue();
+    FinalizeWindowHandles();
+    STATS_DumpStatsUSER32();
+    dprintf(("user32 exit done\n"));
+
+    if (hInstanceUser32) {
+        UnregisterLxDll(hInstanceUser32);
+    }
+    STATS_UninitializeUSER32();
+}
+
+ULONG SYSTEM DLL_Init(ULONG hModule)
+{
+    if (DLL_InitDefault(hModule) == -1)
+        return -1;
+    return DLL_InitUser32(hModule);
+}
+
+void SYSTEM DLL_Term(ULONG hModule)
+{
+    DLL_TermUser32(hModule);
+    DLL_TermDefault(hModule);
+}