commit d131a17ee0da0e7a8284d586522e97240f5f83e2
author Alexandre Julliard <julliard@winehq.org> Sun May 23 20:02:04 1999 +0000
committer Alexandre Julliard <julliard@winehq.org> Sun May 23 20:02:04 1999 +0000
tree f6f6019d22da72cd83daaa3641754304f99b692c
parent 4cc1b339cfa4ce33f6d6154ee31fdf637162f7cf

Use the new debug functions to send debug events at appropriate places.
Pass the process creation flags to PROCESS_Create.

loader/module.c

diff --git a/loader/module.c b/loader/module.c
index 618ec5e..0c4cdb2 100644
--- a/loader/module.c
+++ b/loader/module.c
@@ -1069,10 +1069,6 @@
 
     /* Warn if unsupported features are used */
 
-    if (dwCreationFlags & DEBUG_PROCESS)
-        FIXME_(module)("(%s,...): DEBUG_PROCESS ignored\n", name);
-    if (dwCreationFlags & DEBUG_ONLY_THIS_PROCESS)
-        FIXME_(module)("(%s,...): DEBUG_ONLY_THIS_PROCESS ignored\n", name);
     if (dwCreationFlags & CREATE_SUSPENDED)
         FIXME_(module)("(%s,...): CREATE_SUSPENDED ignored\n", name);
     if (dwCreationFlags & DETACHED_PROCESS)
@@ -1141,7 +1137,8 @@
     lstrcpynA( ofs.szPathName, name, sizeof( ofs.szPathName ) );
     retv = NE_CreateProcess( HFILE_ERROR, &ofs, cmdline, lpEnvironment, 
                              lpProcessAttributes, lpThreadAttributes,
-                             bInheritHandles, lpStartupInfo, lpProcessInfo );
+                             bInheritHandles, dwCreationFlags,
+                             lpStartupInfo, lpProcessInfo );
 
     /* Load file and create process */
 
@@ -1176,19 +1173,22 @@
         case SCS_32BIT_BINARY:
             retv = PE_CreateProcess( hFile, &ofs, cmdline, lpEnvironment, 
                                      lpProcessAttributes, lpThreadAttributes,
-                                     bInheritHandles, lpStartupInfo, lpProcessInfo );
+                                     bInheritHandles, dwCreationFlags,
+                                     lpStartupInfo, lpProcessInfo );
             break;
     
         case SCS_DOS_BINARY:
             retv = MZ_CreateProcess( hFile, &ofs, cmdline, lpEnvironment, 
                                      lpProcessAttributes, lpThreadAttributes,
-                                     bInheritHandles, lpStartupInfo, lpProcessInfo );
+                                     bInheritHandles, dwCreationFlags,
+                                     lpStartupInfo, lpProcessInfo );
             break;
 
         case SCS_WOW_BINARY:
             retv = NE_CreateProcess( hFile, &ofs, cmdline, lpEnvironment, 
                                      lpProcessAttributes, lpThreadAttributes,
-                                     bInheritHandles, lpStartupInfo, lpProcessInfo );
+                                     bInheritHandles, dwCreationFlags,
+                                     lpStartupInfo, lpProcessInfo );
             break;
 
         case SCS_PIF_BINARY:
@@ -1440,6 +1440,10 @@
 			pwm->refCount++;
 
 			LeaveCriticalSection(&PROCESS_Current()->crit_section);
+
+                        if (PROCESS_Current()->flags & PDB32_DEBUGGED)
+                            DEBUG_SendLoadDLLEvent( -1 /*FIXME*/, pwm->module, pwm->modname );
+                        
 			return pwm;
 		}
 
@@ -1591,7 +1595,11 @@
 
     /* Call process detach notifications */
     if ( PROCESS_Current()->free_lib_count <= 1 )
+    {
         MODULE_DllProcessDetach( FALSE, NULL );
+        if (PROCESS_Current()->flags & PDB32_DEBUGGED)
+            DEBUG_SendUnloadDLLEvent( wm->module );
+    }
 
     MODULE_FlushModrefs();