--- lbbs/src/fork.c	2004/10/11 11:15:33	1.1
+++ lbbs/src/fork.c	2004/10/21 17:28:46	1.6
@@ -1,8 +1,8 @@
 /***************************************************************************
                           fork.c  -  description
                              -------------------
-    begin                : Mon Oct 11 2004
-    copyright            : (C) 2004 by Leaf
+    begin                : Mon Oct 18 2004
+    copyright            : (C) 2004 by Leaflet
     email                : leaflet@leafok.com
  ***************************************************************************/
 
@@ -15,5 +15,51 @@
  *                                                                         *
  ***************************************************************************/
 
- #include "common.h"
- 
\ No newline at end of file
+#include "common.h"
+
+int
+fork_server(int sock_server, int sock_client, struct sockaddr_in * p_sin)
+{
+  int pid;
+      
+  if (pid = fork ())
+    return 0;
+  else if (pid < 0)
+    return -1;
+
+  log_std ("Child process start\n");
+  
+  if (close(sock_server) == -1)
+    {
+      log_error("Close server socket failed\n");
+      return -2;
+    }
+  
+  socket_client = sock_client;
+  strcpy(hostaddr_client,(const char *)inet_ntoa(p_sin->sin_addr));
+  port_client = ntohs(p_sin->sin_port);
+
+  //Redirect Output
+  close(1);
+  if (dup2 (socket_client, 1) == -1)
+    {
+      log_error("Redirect stdout to client socket failed\n");
+      return -3;
+    }
+
+  bbs_main();
+  
+  if (close(sock_client) == -1)
+    {
+      log_error("Close client socket failed\n");
+    }
+
+  log_std ("Child process exit\n");
+
+  log_end();
+
+  //Exit child process normally
+  exit(0);
+
+  return 0;
+}