diff --git a/crm/pengine/main.c b/crm/pengine/main.c
index 1e939b9fd7..a081aa9f1c 100644
--- a/crm/pengine/main.c
+++ b/crm/pengine/main.c
@@ -1,226 +1,235 @@
-/* $Id: main.c,v 1.3 2004/10/21 18:25:43 andrew Exp $ */
+/* $Id: main.c,v 1.4 2004/11/24 15:40:17 andrew Exp $ */
 /* 
  * Copyright (C) 2004 Andrew Beekhof <andrew@beekhof.net>
  * 
  * This program is free software; you can redistribute it and/or
  * modify it under the terms of the GNU General Public
  * License as published by the Free Software Foundation; either
  * version 2.1 of the License, or (at your option) any later version.
  * 
  * This software 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
  * General Public License for more details.
  * 
  * You should have received a copy of the GNU 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
  */
 
 #include <portability.h>
 
 #include <crm/crm.h>
 #include <stdio.h>
 #include <sys/types.h>
 #include <unistd.h>
 
 #include <stdlib.h>
 #include <errno.h>
 #include <fcntl.h>
 
 #include <hb_api.h>
 #include <clplumbing/uids.h>
+#include <clplumbing/coredumps.h>
 
 #include <crm/common/ipc.h>
 #include <crm/common/ctrl.h>
 
 #include <crm/dmalloc_wrapper.h>
 
 #define SYS_NAME CRM_SYSTEM_PENGINE
-#define OPTARGS	"skrhV"
+#define OPTARGS	"skrhVc"
 #define PID_FILE     WORKING_DIR "/" SYS_NAME ".pid"
 #define DAEMON_LOG   DEVEL_DIR"/"SYS_NAME".log"
 #define DAEMON_DEBUG DEVEL_DIR"/"SYS_NAME".debug"
 
+
 GMainLoop*  mainloop = NULL;
 const char* crm_system_name = SYS_NAME;
 
-
 void usage(const char* cmd, int exit_status);
 int init_start(void);
 void pengine_shutdown(int nsig);
 extern gboolean process_pe_message(xmlNodePtr msg, IPC_Channel *sender);
 
 int
 main(int argc, char ** argv)
 {
+    gboolean allow_cores = TRUE;
     int	req_restart = FALSE;
     int	req_status = FALSE;
     int	req_stop = FALSE;
     int	argerr = 0;
     int flag;
     
     /* Redirect messages from glib functions to our handler */
     g_log_set_handler(NULL,
 		      G_LOG_LEVEL_ERROR      | G_LOG_LEVEL_CRITICAL
 		      | G_LOG_LEVEL_WARNING  | G_LOG_LEVEL_MESSAGE
 		      | G_LOG_LEVEL_INFO     | G_LOG_LEVEL_DEBUG
 		      | G_LOG_FLAG_RECURSION | G_LOG_FLAG_FATAL,
 		      cl_glib_msg_handler, NULL);
     /* and for good measure... */
     g_log_set_always_fatal((GLogLevelFlags)0);    
     
     cl_log_set_entity(crm_system_name);
     cl_log_set_facility(LOG_USER);
     
     cl_log_set_logfile(DAEMON_LOG);
     cl_log_set_debugfile(DAEMON_DEBUG);
-    CL_SIGNAL(DEBUG_INC, alter_debug);
-    CL_SIGNAL(DEBUG_DEC, alter_debug);
-
+    
     while ((flag = getopt(argc, argv, OPTARGS)) != EOF) {
 		switch(flag) {
 			case 'V':
 				alter_debug(DEBUG_INC);
 				break;
 			case 's':		/* Status */
 				req_status = TRUE;
 				break;
 			case 'k':		/* Stop (kill) */
 				req_stop = TRUE;
 				break;
 			case 'r':		/* Restart */
 				req_restart = TRUE;
 				break;
 			case 'h':		/* Help message */
 				usage(crm_system_name, LSB_EXIT_OK);
 				break;
+			case 'c':
+				allow_cores = TRUE;
+				break;
 			default:
 				++argerr;
 				break;
 		}
     }
     
     if (optind > argc) {
 		++argerr;
     }
     
     if (argerr) {
 		usage(crm_system_name,LSB_EXIT_GENERIC);
     }
     
     /* read local config file */
-    
+
+    if(allow_cores) {
+	    cl_set_corerootdir(DEVEL_DIR);	    
+	    cl_enable_coredumps(1);
+	    cl_cdtocoredir();
+    }
+     
     if (req_status){
 		return init_status(PID_FILE, crm_system_name);
     }
   
     if (req_stop){
 		return init_stop(PID_FILE);
     }
   
     if (req_restart) { 
 		init_stop(PID_FILE);
     }
 
     return init_start();
 
 }
 
 
 int
 init_start(void)
 {
     ll_cluster_t*	hb_fd = NULL;
     int facility;
     IPC_Channel *crm_ch = NULL;
 #ifdef REALTIME_SUPPORT
     static int  crm_realtime = 1;
 #endif
 
     /* change the logging facility to the one used by heartbeat daemon */
     hb_fd = ll_cluster_new("heartbeat");
     
     crm_info("Switching to Heartbeat logger");
     if ((facility = hb_fd->llc_ops->get_logfacility(hb_fd))>0) {
 		cl_log_set_facility(facility);
     }
     
     crm_info("Register PID");
     register_pid(PID_FILE, FALSE, pengine_shutdown);
 
     crm_ch = init_client_ipc_comms(CRM_SYSTEM_CRMD,
 				   subsystem_msg_dispatch,
 				   (void*)process_pe_message);
 
     if(crm_ch != NULL) {
 	    send_hello_message(crm_ch, "1234", CRM_SYSTEM_PENGINE, "0", "1");
 
     /* Create the mainloop and run it... */
 	    mainloop = g_main_new(FALSE);
 	    crm_info("Starting %s", crm_system_name);
 	    
 	    
 #ifdef REALTIME_SUPPORT
 	    if (crm_realtime == 1){
 		    cl_enable_realtime();
 	    }else if (crm_realtime == 0){
 		    cl_disable_realtime();
 	    }
 	    cl_make_realtime(SCHED_RR, 5, 64, 64);
 #endif
 
 	    g_main_run(mainloop);
 
     } else {
 	    crm_err("Could not connect to the CRMd");
     }
 
     return_to_orig_privs();
     
     if (unlink(PID_FILE) == 0) {
 		crm_info("[%s] stopped", crm_system_name);
     }
 
     if(crm_ch != NULL)
 	    return 0;
 
     return 1;
 }
 
 
 void
 usage(const char* cmd, int exit_status)
 {
     FILE* stream;
 
     stream = exit_status ? stderr : stdout;
 
     fprintf(stream, "usage: %s [-srkh]"
 			"[-c configure file]\n", cmd);
 /* 	fprintf(stream, "\t-d\tsets debug level\n"); */
 /* 	fprintf(stream, "\t-s\tgets daemon status\n"); */
 /* 	fprintf(stream, "\t-r\trestarts daemon\n"); */
 /* 	fprintf(stream, "\t-k\tstops daemon\n"); */
 /* 	fprintf(stream, "\t-h\thelp message\n"); */
     fflush(stream);
 
     exit(exit_status);
 }
 
 void
 pengine_shutdown(int nsig)
 {
     static int	shuttingdown = 0;
     CL_SIGNAL(nsig, pengine_shutdown);
   
     if (!shuttingdown) {
 		shuttingdown = 1;
     }
     if (mainloop != NULL && g_main_is_running(mainloop)) {
 		g_main_quit(mainloop);
     }else{
 		exit(LSB_EXIT_OK);
     }
 }