some more tests for CreateProcess

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

 



ChangeLog says it all
A+
--
Eric Pouech
Name:          tst_pcs
ChangeLog:     added tests for environment variables, debug and suspend flags
License:       X11
GenDate:       2003/01/11 21:23:51 UTC
ModifiedFiles: dlls/kernel/tests/process.c
AddedFiles:    
===================================================================
RCS file: /home/cvs/cvsroot/wine/wine/dlls/kernel/tests/process.c,v
retrieving revision 1.7
diff -u -u -r1.7 process.c
--- dlls/kernel/tests/process.c	18 Dec 2002 20:51:33 -0000	1.7
+++ dlls/kernel/tests/process.c	11 Jan 2003 21:22:35 -0000
@@ -33,9 +33,14 @@
 static int      myARGC;
 static char**   myARGV;
 
+/* as some environment variables get very long on Unix, we only test for
+ * the first 127 bytes
+ */
+#define MAX_LISTED_ENV_VAR      128
+
 /* ---------------- portable memory allocation thingie */
 
-static char     memory[16384];
+static char     memory[1024*32];
 static char*    memory_index = memory;
 
 static char*    grab_memory(size_t len)
@@ -250,36 +255,38 @@
     ptrA = GetEnvironmentStringsA();
     if (ptrA)
     {
+        char    env_var[MAX_LISTED_ENV_VAR];
+
         childPrintf(hFile, "[EnvironmentA]\n");
         i = 0;
         while (*ptrA)
         {
-            if (strlen(ptrA) < 128)
-            {
-                childPrintf(hFile, "env%d=%s\n", i, encodeA(ptrA));
-                i++;
-            }
+            strncpy(env_var, ptrA, MAX_LISTED_ENV_VAR - 1);
+            env_var[MAX_LISTED_ENV_VAR - 1] = '\0';
+            childPrintf(hFile, "env%d=%s\n", i, encodeA(env_var));
+            i++;
             ptrA += strlen(ptrA) + 1;
         }
-        childPrintf(hFile, "\n");
+        childPrintf(hFile, "len=%d\n\n", i);
     }
 
     /* output of environment (Unicode) */
     ptrW = GetEnvironmentStringsW();
     if (ptrW)
     {
+        WCHAR   env_var[MAX_LISTED_ENV_VAR];
+
         childPrintf(hFile, "[EnvironmentW]\n");
         i = 0;
         while (*ptrW)
         {
-            if (lstrlenW(ptrW) < 128)
-            {
-                childPrintf(hFile, "env%d=%s\n", i, encodeW(ptrW));
-                i++;
-            }
+            lstrcpynW(env_var, ptrW, MAX_LISTED_ENV_VAR - 1);
+            env_var[MAX_LISTED_ENV_VAR - 1] = '\0';
+            childPrintf(hFile, "env%d=%s\n", i, encodeW(ptrW));
+            i++;
             ptrW += lstrlenW(ptrW) + 1;
         }
-        childPrintf(hFile, "\n");
+        childPrintf(hFile, "len=%d\n\n", i);
     }
 
     childPrintf(hFile, "[Misc]\n");
@@ -697,6 +704,232 @@
     assert(DeleteFileA(resfile) != 0);
 }
 
+static BOOL is_str_env_drive_dir(const char* str)
+{
+    return str[0] == '=' && str[1] >= 'A' && str[1] <= 'Z' && str[2] == ':' &&
+        str[3] == '=' && str[4] == str[1];
+}
+
+/* compared expected child's environment (in gesA) from actual
+ * environment our child got
+ */
+static void cmpEnvironment(const char* gesA)
+{
+    int                 i, clen;
+    const char*         ptrA;
+    char*               res;
+    char                key[32];
+    BOOL                found;
+
+    clen = GetPrivateProfileIntA("EnvironmentA", "len", 0, resfile);
+    
+    /* now look each parent env in child */
+    if ((ptrA = gesA) != NULL)
+    {
+        while (*ptrA)
+        {
+            for (i = 0; i < clen; i++)
+            {
+                sprintf(key, "env%d", i);
+                res = getChildString("EnvironmentA", key);
+                if (strncmp(ptrA, res, MAX_LISTED_ENV_VAR - 1) == 0)
+                    break;
+            }
+            found = i < clen;
+            ok(found, "Parent-env string %s isn't in child process", ptrA);
+            
+            ptrA += strlen(ptrA) + 1;
+            release_memory();
+        }
+    }
+    /* and each child env in parent */
+    for (i = 0; i < clen; i++)
+    {
+        sprintf(key, "env%d", i);
+        res = getChildString("EnvironmentA", key);
+        if ((ptrA = gesA) != NULL)
+        {
+            while (*ptrA)
+            {
+                if (strncmp(res, ptrA, MAX_LISTED_ENV_VAR - 1) == 0)
+                    break;
+                ptrA += strlen(ptrA) + 1;
+            }
+            if (!*ptrA) ptrA = NULL;
+        }
+
+        if (!is_str_env_drive_dir(res))
+        {
+            found = ptrA != NULL;
+            ok(found, "Child-env string %s isn't in parent process", res);
+        }
+        /* else => should also test we get the right per drive default directory here... */
+    }
+}
+
+static void test_Environment(void)
+{
+    char                buffer[MAX_PATH];
+    PROCESS_INFORMATION	info;
+    STARTUPINFOA	startup;
+    char                child_env[4096];
+    char*               ptr;
+    char*               env;
+
+    memset(&startup, 0, sizeof(startup));
+    startup.cb = sizeof(startup);
+    startup.dwFlags = STARTF_USESHOWWINDOW;
+    startup.wShowWindow = SW_SHOWNORMAL;
+
+    /* the basics */
+    get_file_name(resfile);
+    sprintf(buffer, "%s tests/process.c %s", selfname, resfile);
+    ok(CreateProcessA(NULL, buffer, NULL, NULL, FALSE, 0L, NULL, NULL, &startup, &info), "CreateProcess");
+    /* wait for child to terminate */
+    ok(WaitForSingleObject(info.hProcess, 30000) == WAIT_OBJECT_0, "Child process termination");
+    /* child process has changed result file, so let profile functions know about it */
+    WritePrivateProfileStringA(NULL, NULL, NULL, resfile);
+    
+    cmpEnvironment(GetEnvironmentStringsA());
+    release_memory();
+    assert(DeleteFileA(resfile) != 0);
+
+    memset(&startup, 0, sizeof(startup));
+    startup.cb = sizeof(startup);
+    startup.dwFlags = STARTF_USESHOWWINDOW;
+    startup.wShowWindow = SW_SHOWNORMAL;
+
+    /* the basics */
+    get_file_name(resfile);
+    sprintf(buffer, "%s tests/process.c %s", selfname, resfile);
+    ptr = child_env;
+    sprintf(ptr, "=%c:=%s", 'C', "C:\\FOO\\BAR");
+    ptr += strlen(ptr) + 1;
+    strcpy(ptr, "PATH=C:\\WINDOWS;C:\\WINDOWS\\SYSTEM;C:\\MY\\OWN\\DIR");
+    ptr += strlen(ptr) + 1;
+    strcpy(ptr, "FOO=BAR");
+    ptr += strlen(ptr) + 1;
+    strcpy(ptr, "BAR=FOOBAR");
+    ptr += strlen(ptr) + 1;
+    /* copy all existing variables except:
+     * - WINELOADER
+     * - PATH (already set above)
+     * - the directory definitions (=[A-Z]:=)
+     */
+    for (env = GetEnvironmentStringsA(); *env; env += strlen(env) + 1)
+    {
+        if (strncmp(env, "PATH=", 5) != 0 &&
+            strncmp(env, "WINELOADER=", 11) != 0 &&
+            !is_str_env_drive_dir(env))
+        {
+            strcpy(ptr, env);
+            ptr += strlen(ptr) + 1;
+        }
+    }
+    *ptr = '\0';
+    ok(CreateProcessA(NULL, buffer, NULL, NULL, FALSE, 0L, child_env, NULL, &startup, &info), "CreateProcess");
+    /* wait for child to terminate */
+    ok(WaitForSingleObject(info.hProcess, 30000) == WAIT_OBJECT_0, "Child process termination");
+    /* child process has changed result file, so let profile functions know about it */
+    WritePrivateProfileStringA(NULL, NULL, NULL, resfile);
+    
+    cmpEnvironment(child_env);
+
+    release_memory();
+    assert(DeleteFileA(resfile) != 0);
+}
+
+static  void    test_SuspendFlag(void)
+{
+    char                buffer[MAX_PATH];
+    PROCESS_INFORMATION	info;
+    STARTUPINFOA	startup;
+    DWORD               exit_status;
+
+    /* let's start simplistic */
+    memset(&startup, 0, sizeof(startup));
+    startup.cb = sizeof(startup);
+    startup.dwFlags = STARTF_USESHOWWINDOW;
+    startup.wShowWindow = SW_SHOWNORMAL;
+
+    get_file_name(resfile);
+    sprintf(buffer, "%s tests/process.c %s", selfname, resfile);
+    ok(CreateProcessA(NULL, buffer, NULL, NULL, FALSE, CREATE_SUSPENDED, NULL, NULL, &startup, &info), "CreateProcess");
+
+    ok(GetExitCodeThread(info.hThread, &exit_status) && exit_status == STILL_ACTIVE, "thread still running");
+    Sleep(8000);
+    ok(GetExitCodeThread(info.hThread, &exit_status) && exit_status == STILL_ACTIVE, "thread still running");
+    ok(ResumeThread(info.hThread) == 1, "Resuming thread\n");
+
+    /* wait for child to terminate */
+    ok(WaitForSingleObject(info.hProcess, 30000) == WAIT_OBJECT_0, "Child process termination");
+    /* child process has changed result file, so let profile functions know about it */
+    WritePrivateProfileStringA(NULL, NULL, NULL, resfile);
+
+    okChildInt("StartupInfoA", "cb", startup.cb);
+    okChildString("StartupInfoA", "lpDesktop", startup.lpDesktop);
+    okChildString("StartupInfoA", "lpTitle", startup.lpTitle);
+    okChildInt("StartupInfoA", "dwX", startup.dwX);
+    okChildInt("StartupInfoA", "dwY", startup.dwY);
+    okChildInt("StartupInfoA", "dwXSize", startup.dwXSize);
+    okChildInt("StartupInfoA", "dwYSize", startup.dwYSize);
+    okChildInt("StartupInfoA", "dwXCountChars", startup.dwXCountChars);
+    okChildInt("StartupInfoA", "dwYCountChars", startup.dwYCountChars);
+    okChildInt("StartupInfoA", "dwFillAttribute", startup.dwFillAttribute);
+    okChildInt("StartupInfoA", "dwFlags", startup.dwFlags);
+    okChildInt("StartupInfoA", "wShowWindow", startup.wShowWindow);
+    release_memory();
+    assert(DeleteFileA(resfile) != 0);
+}
+
+static  void    test_DebuggingFlag(void)
+{
+    char                buffer[MAX_PATH];
+    PROCESS_INFORMATION	info;
+    STARTUPINFOA	startup;
+    DEBUG_EVENT         de;
+    unsigned            dbg = 0;
+
+    /* let's start simplistic */
+    memset(&startup, 0, sizeof(startup));
+    startup.cb = sizeof(startup);
+    startup.dwFlags = STARTF_USESHOWWINDOW;
+    startup.wShowWindow = SW_SHOWNORMAL;
+
+    get_file_name(resfile);
+    sprintf(buffer, "%s tests/process.c %s", selfname, resfile);
+    ok(CreateProcessA(NULL, buffer, NULL, NULL, FALSE, DEBUG_PROCESS, NULL, NULL, &startup, &info), "CreateProcess");
+
+    /* get all startup events up to the entry point break exception */
+    do 
+    {
+        ok(WaitForDebugEvent(&de, INFINITE), "reading debug event");
+        ContinueDebugEvent(de.dwProcessId, de.dwThreadId, DBG_CONTINUE);
+        if (de.dwDebugEventCode != EXCEPTION_DEBUG_EVENT) dbg++;
+    } while (de.dwDebugEventCode != EXIT_PROCESS_DEBUG_EVENT);
+
+    ok(dbg, "I have seen a debug event");
+    /* wait for child to terminate */
+    ok(WaitForSingleObject(info.hProcess, 30000) == WAIT_OBJECT_0, "Child process termination");
+    /* child process has changed result file, so let profile functions know about it */
+    WritePrivateProfileStringA(NULL, NULL, NULL, resfile);
+
+    okChildInt("StartupInfoA", "cb", startup.cb);
+    okChildString("StartupInfoA", "lpDesktop", startup.lpDesktop);
+    okChildString("StartupInfoA", "lpTitle", startup.lpTitle);
+    okChildInt("StartupInfoA", "dwX", startup.dwX);
+    okChildInt("StartupInfoA", "dwY", startup.dwY);
+    okChildInt("StartupInfoA", "dwXSize", startup.dwXSize);
+    okChildInt("StartupInfoA", "dwYSize", startup.dwYSize);
+    okChildInt("StartupInfoA", "dwXCountChars", startup.dwXCountChars);
+    okChildInt("StartupInfoA", "dwYCountChars", startup.dwYCountChars);
+    okChildInt("StartupInfoA", "dwFillAttribute", startup.dwFillAttribute);
+    okChildInt("StartupInfoA", "dwFlags", startup.dwFlags);
+    okChildInt("StartupInfoA", "wShowWindow", startup.wShowWindow);
+    release_memory();
+    assert(DeleteFileA(resfile) != 0);
+}
+
 START_TEST(process)
 {
     int b = init();
@@ -711,10 +944,11 @@
     test_Startup();
     test_CommandLine();
     test_Directory();
-
+    test_Environment();
+    test_SuspendFlag();
+    test_DebuggingFlag();
     /* things that can be tested:
      *  lookup:         check the way program to be executed is searched
-     *  environment:    check environment string passing
      *  handles:        check the handle inheritance stuff (+sec options)
      *  console:        check if console creation parameters work
      */

[Index of Archives]     [Gimp for Windows]     [Red Hat]     [Samba]     [Yosemite Camping]     [Graphics Cards]     [Wine Home]

  Powered by Linux