glib/tests/child-test.c
changeset 18 47c74d1534e1
child 49 e5d77a29bdca
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/glib/tests/child-test.c	Fri Apr 16 16:46:38 2010 +0300
@@ -0,0 +1,240 @@
+/* GLIB - Library of useful routines for C programming
+ * Copyright (C) 1995-1997  Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * Portions copyright (c) 2009 Nokia Corporation.  All rights reserved.
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Lesser General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+ * Lesser General Public License for more details.
+ *
+ * You should have received a copy of the GNU Lesser General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GLib Team and others 1997-2000.  See the AUTHORS
+ * file for a list of people on the GLib Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GLib at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#include "config.h"
+
+#include <sys/types.h>
+#ifdef HAVE_UNISTD_H
+#include <unistd.h>
+#endif
+#include <stdlib.h>
+#include <spawn.h>
+#include <sys/wait.h>
+#include <glib.h>
+
+#ifdef __SYMBIAN32__
+#include "mrt2_glib2_test.h"
+#endif /*__SYMBIAN32__*/
+
+#ifdef G_OS_WIN32
+#include <windows.h>
+#endif
+
+#ifdef G_OS_WIN32
+#define GPID_FORMAT "%p"
+#else
+#define GPID_FORMAT "%d"
+#endif
+
+GMainLoop *main_loop;
+gint alive;
+
+#ifdef G_OS_WIN32
+char *argv0;
+#endif
+
+GPid
+get_a_child (gint ttl)
+{
+  GPid pid;
+#ifdef __SYMBIAN32__  
+  gint retval;
+#if 0  //for using g_spawn_async
+  gboolean retval;
+  char **argv = NULL;
+  GError *error = NULL;
+#endif//if 0  
+#endif//__SYMBIAN32__  
+#ifdef G_OS_WIN32
+  STARTUPINFO si;
+  PROCESS_INFORMATION pi;
+  gchar *cmdline;
+
+  memset (&si, 0, sizeof (si));
+  si.cb = sizeof (&si);
+  memset (&pi, 0, sizeof (pi));
+
+  cmdline = g_strdup_printf( "child-test -c%d", ttl);
+
+  if (!CreateProcess (argv0, cmdline, NULL, NULL, FALSE, 0, NULL, NULL, &si, &pi))
+    g_error ("CreateProcess failed: %s\n", g_win32_error_message (GetLastError ()));
+
+  g_free(cmdline);
+
+  CloseHandle (pi.hThread);
+  pid = pi.hProcess;
+
+  return pid;
+#endif
+#ifndef __SYMBIAN32__
+  pid = fork ();
+#else  
+  retval = posix_spawn(&pid, "helloworld.exe", NULL,NULL,NULL,NULL);
+  (void)waitpid(pid,NULL,0);
+#if 0  
+  argv = (char **)malloc(3*sizeof(char *));    
+  argv[0] = "Helloworld.exe"; // wrong exe name. Should cause g_spawn_async to fail
+  argv[1] = NULL;
+  retval = g_spawn_async(NULL, argv, NULL, G_SPAWN_DO_NOT_REAP_CHILD | G_SPAWN_SEARCH_PATH, NULL, "1234", &pid, &error);
+#endif//if 0
+  if (pid < 0)
+    exit (1);
+
+  if (pid > 0)
+    return pid;
+
+  sleep (ttl);
+  _exit (0);
+#endif /* G_OS_WIN32 */
+}
+
+gboolean
+child_watch_callback (GPid pid, gint status, gpointer data)
+{
+#ifdef VERBOSE
+  gint ttl = GPOINTER_TO_INT (data);
+
+  g_print ("child " GPID_FORMAT " (ttl %d) exited, status %d\n", pid, ttl, status);
+#endif
+
+  g_spawn_close_pid (pid);
+
+  if (--alive == 0)
+    g_main_loop_quit (main_loop);
+
+  return TRUE;
+}
+
+static gboolean
+quit_loop (gpointer data)
+{
+  GMainLoop *main_loop = data;
+
+  g_main_loop_quit (main_loop);
+
+  return TRUE;
+}
+
+#ifdef TEST_THREAD
+static gpointer
+test_thread (gpointer data)
+{
+  GMainLoop *new_main_loop;
+  GSource *source;
+  GPid pid;
+  gint ttl = GPOINTER_TO_INT (data);
+
+  new_main_loop = g_main_loop_new (NULL, FALSE);
+
+  pid = get_a_child (ttl);
+  source = g_child_watch_source_new (pid);
+  g_source_set_callback (source, (GSourceFunc) child_watch_callback, data, NULL);
+  g_source_attach (source, g_main_loop_get_context (new_main_loop));
+  g_source_unref (source);
+
+#ifdef VERBOSE
+  g_print ("whee! created pid: " GPID_FORMAT " (ttl %d)\n", pid, ttl);
+#endif
+
+  g_main_loop_run (new_main_loop);
+
+  return NULL;
+}
+#endif
+
+int
+main (int argc, char *argv[])
+{
+#ifndef TEST_THREAD
+  GPid pid;
+#endif
+#ifdef G_OS_WIN32
+  argv0 = argv[0];
+  if (argc > 1 && argv[1][0] == '-' && argv[1][1] == 'c')
+    {
+      int ttl = atoi (argv[1] + 2);
+      Sleep (ttl * 1000);
+      /* Exit on purpose with STILL_ACTIVE (which isn't a very common
+       * exit status) to verify that g_child_watch_check() in gmain.c
+       * doesn't believe a child still to be active if it happens to
+       * exit with that status.
+       */
+      exit (STILL_ACTIVE);
+    }
+#endif
+
+	#ifdef __SYMBIAN32__
+	g_log_set_handler (NULL,  G_LOG_FLAG_FATAL| G_LOG_FLAG_RECURSION | G_LOG_LEVEL_CRITICAL | G_LOG_LEVEL_WARNING | G_LOG_LEVEL_MESSAGE | G_LOG_LEVEL_INFO | G_LOG_LEVEL_DEBUG, &mrtLogHandler, NULL);
+	g_set_print_handler(mrtPrintHandler);
+	#endif /*__SYMBIAN32__*/
+
+  /* Only run the test, if threads are enabled and a default thread
+   * implementation is available.
+   */
+#if defined(G_THREADS_ENABLED) && ! defined(G_THREADS_IMPL_NONE)
+#ifdef TEST_THREAD
+  g_thread_init (NULL);
+#endif
+  main_loop = g_main_loop_new (NULL, FALSE);
+
+#ifdef G_OS_WIN32
+  system ("ipconfig /all");
+#else
+  system ("/bin/true");
+#endif
+
+  alive = 2;
+  g_timeout_add (30000, quit_loop, main_loop);
+
+#ifdef TEST_THREAD
+  g_thread_create (test_thread, GINT_TO_POINTER (10), FALSE, NULL);
+  g_thread_create (test_thread, GINT_TO_POINTER (20), FALSE, NULL);
+#else
+  pid = get_a_child (10);
+  g_child_watch_add (pid, (GChildWatchFunc) child_watch_callback,
+		     GINT_TO_POINTER (10));
+  pid = get_a_child (20);
+  g_child_watch_add (pid, (GChildWatchFunc) child_watch_callback,
+		     GINT_TO_POINTER (20));
+#endif
+  
+  g_main_loop_run (main_loop);
+
+  if (alive > 0)
+    {
+      g_warning ("%d children still alive\n", alive);
+      return 1;
+    }
+    
+#endif
+
+   #if __SYMBIAN32__
+   testResultXml("child-test1");
+   #endif
+   
+   return 0;
+}