From c9fb0ae8e5d90eecb1b06824913df4d99b192ca2 Mon Sep 17 00:00:00 2001
From: handa <handa>
Date: Mon, 19 Sep 2005 01:00:20 +0000
Subject: [PATCH] (mdebug__output): New variable. (SET_DEBUG_FLAG): Unset mask
 if env_value is '0'. (m17n_init_core): Handle MDEBUG_ALL
 and MDEBUG_OUTPUT_FILE. (m17n_fini_core): Close
 mdebug__output if it's not stderr.

---
 src/m17n-core.c |   23 +++++++++++++++++++++--
 1 file changed, 21 insertions(+), 2 deletions(-)

diff --git a/src/m17n-core.c b/src/m17n-core.c
index cf88bc2..876ad1e 100644
--- a/src/m17n-core.c
+++ b/src/m17n-core.c
@@ -420,6 +420,7 @@ void *(*mdatabase__finder) (MSymbol tag1, MSymbol tag2,
 void *(*mdatabase__loader) (void *);
 
 int mdebug__flag;
+FILE *mdebug__output;
 
 void
 mdebug__push_time ()
@@ -453,8 +454,13 @@ mdebug__print_time ()
   do {						\
     char *env_value = getenv (env_name);	\
 						\
-    if (env_value && env_value[0] == '1')	\
-      mdebug__flag |= (mask);			\
+    if (env_value)				\
+      {						\
+	if (env_value[0] == '1')		\
+	  mdebug__flag |= (mask);		\
+	else if (env_value[0] == '0')		\
+	  mdebug__flag &= ~(mask);		\
+      }						\
   } while (0)
 
 
@@ -513,6 +519,7 @@ m17n_init_core (void)
   m17n_memory_full_handler = default_error_handler;
 
   mdebug__flag = 0;
+  SET_DEBUG_FLAG ("MDEBUG_ALL", MDEBUG_ALL);
   SET_DEBUG_FLAG ("MDEBUG_INIT", MDEBUG_INIT);
   SET_DEBUG_FLAG ("MDEBUG_FINI", MDEBUG_FINI);
   SET_DEBUG_FLAG ("MDEBUG_CHARSET", MDEBUG_CHARSET);
@@ -522,6 +529,16 @@ m17n_init_core (void)
   SET_DEBUG_FLAG ("MDEBUG_FONT_FLT", MDEBUG_FONT_FLT);
   SET_DEBUG_FLAG ("MDEBUG_FONT_OTF", MDEBUG_FONT_OTF);
   SET_DEBUG_FLAG ("MDEBUG_INPUT", MDEBUG_INPUT);
+  {
+    char *env_value = getenv ("MDEBUG_OUTPUT_FILE");
+
+    if (env_value)
+      {
+	mdebug__output = fopen (env_value, "a");
+	if (! mdebug__output)
+	  mdebug__output = stderr;
+      }
+  }
 
   MDEBUG_PUSH_TIME ();
   MDEBUG_PUSH_TIME ();
@@ -576,6 +593,8 @@ m17n_fini_core (void)
   if (mdebug__flag & MDEBUG_FINI)
     report_object_array ();
   msymbol__free_table ();
+  if (mdebug__output != stderr)
+    fclose (mdebug__output);
 }
 
 /*** @} */
-- 
1.7.10.4