--- lbbs/src/fork.c	2004/10/18 08:17:25	1.2
+++ lbbs/src/fork.c	2005/05/07 12:08:28	1.11
@@ -1,8 +1,8 @@
 /***************************************************************************
-                          bbsd.c  -  description
+                          fork.c  -  description
                              -------------------
     begin                : Mon Oct 18 2004
-    copyright            : (C) 2004 by leaf
+    copyright            : (C) 2004 by Leaflet
     email                : leaflet@leafok.com
  ***************************************************************************/
 
@@ -16,8 +16,63 @@
  ***************************************************************************/
 
 #include "common.h"
-#include <unistd.h>
-#include <signal.h>
-#include <sys/param.h>
-#include <sys/types.h>
-#include <sys/stat.h>
+#include "io.h"
+#include <string.h>
+
+int
+fork_server ()
+{
+  int pid;
+
+  if (pid = fork ())
+  {
+    SYS_child_process_count ++;
+    log_std ("Child process (%d) start\n", pid);
+    return 0;
+  }
+  else if (pid < 0)
+    return -1;
+
+
+  if (close (socket_server) == -1)
+    {
+      log_error ("Close server socket failed\n");
+      return -2;
+    }
+
+  //Redirect Input
+  close (0);
+  if (dup2 (socket_client, 0) == -1)
+    {
+      log_error ("Redirect stdin to client socket failed\n");
+      return -3;
+    }
+
+  //Redirect Output
+  close (1);
+  if (dup2 (socket_client, 1) == -1)
+    {
+      log_error ("Redirect stdout to client socket failed\n");
+      return -4;
+    }
+
+  bbs_main ();
+
+  if (close (socket_client) == -1)
+    {
+      log_error ("Close client socket failed\n");
+    }
+
+  //Close Input and Output for client
+  close (0);
+  close (1);
+
+  log_std ("Process exit normally\n");
+
+  log_end ();
+
+  //Exit child process normally
+  exit (0);
+
+  return 0;
+}