]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/lib/message.c
- Put Dmsg() on inside if() to avoid calling subroutine.
[bacula/bacula] / bacula / src / lib / message.c
index 93e82570a4c391ff3131e0b22205c2c3562af292..8151ccd28dbe9d1f594e128e9bbaac127e2ae759 100755 (executable)
@@ -1,33 +1,28 @@
 /*
  * Bacula message handling routines
  *
- *   Kern Sibbald, April 2000 
+ *   Kern Sibbald, April 2000
  *
  *   Version $Id$
  *
  */
-
 /*
-   Copyright (C) 2000-2004 Kern Sibbald and John Walker
+   Copyright (C) 2000-2005 Kern Sibbald
 
    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 of
-   the License, or (at your option) any later version.
+   modify it under the terms of the GNU General Public License
+   version 2 as ammended with additional clauses defined in the
+   file LICENSE in the main source directory.
 
    This program 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 program; if not, write to the Free
-   Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
-   MA 02111-1307, USA.
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 
+   the file LICENSE for additional details.
 
  */
 
 
+
 #include "bacula.h"
 #include "jcr.h"
 
@@ -39,7 +34,7 @@
 
 #define FULL_LOCATION 1              /* set for file:line in Debug messages */
 
-/* 
+/*
  *  This is where we define "Globals" because all the
  *    daemons include this file.
  */
@@ -61,7 +56,7 @@ char catalog_db[] = "PostgreSQL";
 #else
 #ifdef HAVE_MYSQL
 char catalog_db[] = "MySQL";
-#else 
+#else
 #ifdef HAVE_SQLITE
 char catalog_db[] = "SQLite";
 #else
@@ -87,12 +82,12 @@ static bool trace = false;
 
 /* Static storage */
 
+/* Used to allow only one thread close the daemon messages at a time */
+static pthread_mutex_t mutex = PTHREAD_MUTEX_INITIALIZER;
 static MSGS *daemon_msgs;             /* global messages */
 
-/* Define if e_msg must exit when M_ERROR_TERM is received */
-static int exit_on_error = 1;
 
-/* 
+/*
  * Set daemon name. Also, find canonical execution
  *  path.  Note, exepath has spare room for tacking on
  *  the exename so that we can reconstruct the full name.
@@ -106,7 +101,7 @@ static int exit_on_error = 1;
 void my_name_is(int argc, char *argv[], const char *name)
 {
    char *l, *p, *q;
-   char cpath[400], npath[400];
+   char cpath[1024];
    int len;
 
    bstrncpy(my_name, name, sizeof(my_name));
@@ -143,32 +138,22 @@ void my_name_is(int argc, char *argv[], const char *name)
         *q++ = *p++;
       }
       *q = 0;
-      Dmsg1(200, "exepath=%s\n", exepath);
       if (strchr(exepath, '.') || exepath[0] != '/') {
-        npath[0] = 0;
         if (getcwd(cpath, sizeof(cpath))) {
-           if (chdir(exepath) == 0) {
-              if (!getcwd(npath, sizeof(npath))) {
-                 npath[0] = 0;
-              }
-              chdir(cpath);
-           }
-           if (npath[0]) {
-              free(exepath);
-              exepath = (char *)malloc(strlen(npath) + 1 + len);
-              strcpy(exepath, npath);
-           }
+           free(exepath);
+           exepath = (char *)malloc(strlen(cpath) + 1 + len);
+           strcpy(exepath, cpath);
         }
-         Dmsg1(200, "Normalized exepath=%s\n", exepath);
       }
+      Dmsg2(500, "exepath=%s\nexename=%s\n", exepath, exename);
    }
 }
 
-/* 
+/*
  * Initialize message handler for a daemon or a Job
  *   We make a copy of the MSGS resource passed, so it belows
  *   to the job or daemon and thus can be modified.
- * 
+ *
  *   NULL for jcr -> initialize global messages for daemon
  *   non-NULL    -> initialize jcr using Message resource
  */
@@ -251,7 +236,7 @@ init_msg(JCR *jcr, MSGS *msg)
       daemon_msgs->dest_chain = temp_chain;
       memcpy(daemon_msgs->send_msg, msg->send_msg, sizeof(msg->send_msg));
    }
-   Dmsg2(050, "Copy message resource 0x%x to 0x%x\n", msg, temp_chain);
+   Dmsg2(250, "Copy message resource 0x%x to 0x%x\n", msg, temp_chain);
 
 }
 
@@ -265,8 +250,9 @@ void init_console_msg(const char *wd)
    bsnprintf(con_fname, sizeof(con_fname), "%s/%s.conmsg", wd, my_name);
    fd = open(con_fname, O_CREAT|O_RDWR|O_BINARY, 0600);
    if (fd == -1) {
+      berrno be;
       Emsg2(M_ERROR_TERM, 0, _("Could not open console message file %s: ERR=%s\n"),
-         con_fname, strerror(errno));
+         con_fname, be.strerror());
    }
    if (lseek(fd, 0, SEEK_END) > 0) {
       console_msg_pending = 1;
@@ -274,16 +260,18 @@ void init_console_msg(const char *wd)
    close(fd);
    con_fd = fopen(con_fname, "a+");
    if (!con_fd) {
+      berrno be;
       Emsg2(M_ERROR, 0, _("Could not open console message file %s: ERR=%s\n"),
-         con_fname, strerror(errno));
+         con_fname, be.strerror());
    }
    if (rwl_init(&con_lock) != 0) {
-      Emsg1(M_ERROR_TERM, 0, _("Could not get con mutex: ERR=%s\n"), 
-        strerror(errno));
+      berrno be;
+      Emsg1(M_ERROR_TERM, 0, _("Could not get con mutex: ERR=%s\n"),
+        be.strerror());
    }
 }
 
-/* 
+/*
  * Called only during parsing of the config file.
  *
  * Add a message destination. I.e. associate a message type with
@@ -294,15 +282,15 @@ void init_console_msg(const char *wd)
  */
 void add_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where, char *mail_cmd)
 {
-   DEST *d; 
+   DEST *d;
    /*
     * First search the existing chain and see if we
     * can simply add this msg_type to an existing entry.
     */
    for (d=msg->dest_chain; d; d=d->next) {
       if (dest_code == d->dest_code && ((where == NULL && d->where == NULL) ||
-                    (strcmp(where, d->where) == 0))) {  
-         Dmsg4(200, "Add to existing d=%x msgtype=%d destcode=%d where=%s\n", 
+                    (strcmp(where, d->where) == 0))) {
+         Dmsg4(850, "Add to existing d=%x msgtype=%d destcode=%d where=%s\n",
             d, msg_type, dest_code, NPRT(where));
         set_bit(msg_type, d->msg_types);
         set_bit(msg_type, msg->send_msg);  /* set msg_type bit in our local */
@@ -322,29 +310,29 @@ void add_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where, char *mai
    if (mail_cmd) {
       d->mail_cmd = bstrdup(mail_cmd);
    }
-   Dmsg5(200, "add new d=%x msgtype=%d destcode=%d where=%s mailcmd=%s\n", 
+   Dmsg5(850, "add new d=%x msgtype=%d destcode=%d where=%s mailcmd=%s\n",
          d, msg_type, dest_code, NPRT(where), NPRT(d->mail_cmd));
    msg->dest_chain = d;
 }
 
-/* 
+/*
  * Called only during parsing of the config file.
  *
- * Remove a message destination   
+ * Remove a message destination
  */
 void rem_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where)
 {
    DEST *d;
 
    for (d=msg->dest_chain; d; d=d->next) {
-      Dmsg2(200, "Remove_msg_dest d=%x where=%s\n", d, NPRT(d->where));
+      Dmsg2(850, "Remove_msg_dest d=%x where=%s\n", d, NPRT(d->where));
       if (bit_is_set(msg_type, d->msg_types) && (dest_code == d->dest_code) &&
          ((where == NULL && d->where == NULL) ||
-                    (strcmp(where, d->where) == 0))) {  
-         Dmsg3(200, "Found for remove d=%x msgtype=%d destcode=%d\n", 
+                    (strcmp(where, d->where) == 0))) {
+         Dmsg3(850, "Found for remove d=%x msgtype=%d destcode=%d\n",
               d, msg_type, dest_code);
         clear_bit(msg_type, d->msg_types);
-         Dmsg0(200, "Return rem_msg_dest\n");
+         Dmsg0(850, "Return rem_msg_dest\n");
         return;
       }
    }
@@ -354,7 +342,7 @@ void rem_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where)
 /*
  * Create a unique filename for the mail command
  */
-static void make_unique_mail_filename(JCR *jcr, POOLMEM **name, DEST *d)
+static void make_unique_mail_filename(JCR *jcr, POOLMEM *&name, DEST *d)
 {
    if (jcr) {
       Mmsg(name, "%s/%s.mail.%s.%d", working_directory, my_name,
@@ -363,43 +351,38 @@ static void make_unique_mail_filename(JCR *jcr, POOLMEM **name, DEST *d)
       Mmsg(name, "%s/%s.mail.%s.%d", working_directory, my_name,
                 my_name, (int)(long)d);
    }
-   Dmsg1(200, "mailname=%s\n", *name);
+   Dmsg1(850, "mailname=%s\n", name);
 }
 
 /*
  * Open a mail pipe
  */
-static BPIPE *open_mail_pipe(JCR *jcr, POOLMEM **cmd, DEST *d)
+static BPIPE *open_mail_pipe(JCR *jcr, POOLMEM *&cmd, DEST *d)
 {
    BPIPE *bpipe;
-   int use_bsmtp = (d->mail_cmd && jcr);
-       
-   if (use_bsmtp) {
-      *cmd = edit_job_codes(jcr, *cmd, d->mail_cmd, d->where);
+
+   if (d->mail_cmd) {
+      cmd = edit_job_codes(jcr, cmd, d->mail_cmd, d->where);
    } else {
-#if 1
       Mmsg(cmd, "/usr/lib/sendmail -F Bacula %s", d->where);
-#else
-      Mmsg(cmd, "mail -s \"Bacula Message\" %s", d->where);
-#endif
    }
    fflush(stdout);
 
-   if (!(bpipe = open_bpipe(*cmd, 120, "rw"))) {
-      Jmsg(jcr, M_ERROR, 0, "open mail pipe %s failed: ERR=%s\n", 
-        *cmd, strerror(errno));
+   if (!(bpipe = open_bpipe(cmd, 120, "rw"))) {
+      berrno be;
+      Jmsg(jcr, M_ERROR, 0, "open mail pipe %s failed: ERR=%s\n",
+        cmd, be.strerror());
    }
 
-#if 1
-   if (!use_bsmtp) {
+   /* If we had to use sendmail, add subject */
+   if (!d->mail_cmd) {
        fprintf(bpipe->wfd, "Subject: Bacula Message\r\n\r\n");
    }
-#endif
-   
+
    return bpipe;
 }
 
-/* 
+/*
  * Close the messages for this Messages resource, which means to close
  *  any open files, and dispatch any pending email messages.
  */
@@ -410,11 +393,12 @@ void close_msg(JCR *jcr)
    BPIPE *bpipe;
    POOLMEM *cmd, *line;
    int len, stat;
-   
-   Dmsg1(050, "Close_msg jcr=0x%x\n", jcr);
+
+   Dmsg1(850, "Close_msg jcr=0x%x\n", jcr);
 
    if (jcr == NULL) {               /* NULL -> global chain */
       msgs = daemon_msgs;
+      P(mutex);                      /* only one thread walking the chain */
    } else {
       msgs = jcr->jcr_msgs;
       jcr->jcr_msgs = NULL;
@@ -422,7 +406,7 @@ void close_msg(JCR *jcr)
    if (msgs == NULL) {
       return;
    }
-   Dmsg1(150, "===Begin close msg resource at 0x%x\n", msgs);
+   Dmsg1(850, "===Begin close msg resource at 0x%x\n", msgs);
    cmd = get_pool_memory(PM_MESSAGE);
    for (d=msgs->dest_chain; d; ) {
       if (d->fd) {
@@ -435,7 +419,7 @@ void close_msg(JCR *jcr)
            break;
         case MD_MAIL:
         case MD_MAIL_ON_ERROR:
-            Dmsg0(150, "Got MD_MAIL or MD_MAIL_ON_ERROR\n");
+            Dmsg0(850, "Got MD_MAIL or MD_MAIL_ON_ERROR\n");
            if (!d->fd) {
               break;
            }
@@ -443,20 +427,21 @@ void close_msg(JCR *jcr)
                jcr->JobStatus == JS_Terminated) {
               goto rem_temp_file;
            }
-           
-           if (!(bpipe=open_mail_pipe(jcr, &cmd, d))) {
+
+           if (!(bpipe=open_mail_pipe(jcr, cmd, d))) {
                Pmsg0(000, "open mail pipe failed.\n");
               goto rem_temp_file;
            }
-            Dmsg0(150, "Opened mail pipe\n");
+            Dmsg0(850, "Opened mail pipe\n");
            len = d->max_len+10;
            line = get_memory(len);
            rewind(d->fd);
-           while (fgets(mp_chr(line), len, d->fd)) {
+           while (fgets(line, len, d->fd)) {
               fputs(line, bpipe->wfd);
            }
            if (!close_wpipe(bpipe)) {       /* close write pipe sending mail */
-               Pmsg1(000, "close error: ERR=%s\n", strerror(errno));
+              berrno be;
+               Pmsg1(000, "close error: ERR=%s\n", be.strerror());
            }
 
            /*
@@ -466,26 +451,28 @@ void close_msg(JCR *jcr)
             */
            if (msgs != daemon_msgs) {
               /* read what mail prog returned -- should be nothing */
-              while (fgets(mp_chr(line), len, bpipe->rfd)) {
+              while (fgets(line, len, bpipe->rfd)) {
                   Jmsg1(jcr, M_INFO, 0, _("Mail prog: %s"), line);
               }
            }
 
            stat = close_bpipe(bpipe);
            if (stat != 0 && msgs != daemon_msgs) {
-               Dmsg1(150, "Calling emsg. CMD=%s\n", cmd);
-               Jmsg3(jcr, M_ERROR, 0, _("Mail program terminated in error. stat=%d\n"
+              berrno be;
+              be.set_errno(stat);
+               Dmsg1(850, "Calling emsg. CMD=%s\n", cmd);
+               Jmsg2(jcr, M_ERROR, 0, _("Mail program terminated in error.\n"
                                         "CMD=%s\n"
-                                        "ERR=%s\n"), stat, cmd, strerror(stat));
+                                        "ERR=%s\n"), cmd, be.strerror());
            }
            free_memory(line);
 rem_temp_file:
            /* Remove temp file */
            fclose(d->fd);
-           unlink(mp_chr(d->mail_filename));
+           unlink(d->mail_filename);
            free_pool_memory(d->mail_filename);
            d->mail_filename = NULL;
-            Dmsg0(150, "end mail or mail on error\n");
+            Dmsg0(850, "end mail or mail on error\n");
            break;
         default:
            break;
@@ -495,16 +482,18 @@ rem_temp_file:
       d = d->next;                   /* point to next buffer */
    }
    free_pool_memory(cmd);
-   Dmsg0(150, "Done walking message chain.\n");
+   Dmsg0(850, "Done walking message chain.\n");
    if (jcr) {
       free_msgs_res(msgs);
       msgs = NULL;
+   } else {
+      V(mutex);
    }
-   Dmsg0(150, "===End close msg resource\n");
+   Dmsg0(850, "===End close msg resource\n");
 }
 
 /*
- * Free memory associated with Messages resource  
+ * Free memory associated with Messages resource
  */
 void free_msgs_res(MSGS *msgs)
 {
@@ -527,16 +516,16 @@ void free_msgs_res(MSGS *msgs)
 }
 
 
-/* 
- * Terminate the message handler for good. 
+/*
+ * Terminate the message handler for good.
  * Release the global destination chain.
- * 
+ *
  * Also, clean up a few other items (cons, exepath). Note,
  *   these really should be done elsewhere.
  */
 void term_msg()
 {
-   Dmsg0(100, "Enter term_msg\n");
+   Dmsg0(850, "Enter term_msg\n");
    close_msg(NULL);                  /* close global chain */
    free_msgs_res(daemon_msgs);       /* free the resources */
    daemon_msgs = NULL;
@@ -565,29 +554,41 @@ void term_msg()
 /*
  * Handle sending the message to the appropriate place
  */
-void dispatch_message(JCR *jcr, int type, int level, char *msg)
+void dispatch_message(JCR *jcr, int type, time_t mtime, char *msg)
 {
-    DEST *d;   
+    DEST *d;
     char dt[MAX_TIME_LENGTH];
     POOLMEM *mcmd;
-    int len;
+    int len, dtlen;
     MSGS *msgs;
     BPIPE *bpipe;
 
-    Dmsg2(800, "Enter dispatch_msg type=%d msg=%s\n", type, msg);
+    Dmsg2(850, "Enter dispatch_msg type=%d msg=%s", type, msg);
+
+    /*
+     * Most messages are prefixed by a date and time. If mtime is
+     * zero, then we use the current time.  If mtime is 1 (special
+     * kludge), we do not prefix the date and time. Otherwise,
+     * we assume mtime is a time_t and use it.
+     */
+    if (mtime == 0) {
+       mtime = time(NULL);
+    }
+    if (mtime == 1) {
+       *dt = 0;
+       dtlen = 0;
+    } else {
+       bstrftime_ny(dt, sizeof(dt), mtime);
+       dtlen = strlen(dt);
+       dt[dtlen++] = ' ';
+       dt[dtlen] = 0;
+    }
 
     if (type == M_ABORT || type == M_ERROR_TERM) {
 #ifndef HAVE_WIN32
+       fputs(dt, stdout);
        fputs(msg, stdout);        /* print this here to INSURE that it is printed */
        fflush(stdout);
-#endif
-#if !defined(HAVE_CONSOLE)
-#if defined(HAVE_CYGWIN) || defined(HAVE_WIN32)
-       /* If we don't exit on error, error messages are parsed by UA */
-       if (exit_on_error) {
-          MessageBox(NULL, msg, "Bacula", MB_OK);
-       }
-#endif
 #endif
     }
 
@@ -595,7 +596,7 @@ void dispatch_message(JCR *jcr, int type, int level, char *msg)
     msgs = NULL;
     if (jcr) {
        msgs = jcr->jcr_msgs;
-    } 
+    }
     if (msgs == NULL) {
        msgs = daemon_msgs;
     }
@@ -603,18 +604,17 @@ void dispatch_message(JCR *jcr, int type, int level, char *msg)
        if (bit_is_set(type, d->msg_types)) {
          switch (d->dest_code) {
             case MD_CONSOLE:
-                Dmsg1(800, "CONSOLE for following msg: %s", msg);
+                Dmsg1(850, "CONSOLE for following msg: %s", msg);
                if (!con_fd) {
                    con_fd = fopen(con_fname, "a+");
-                   Dmsg0(800, "Console file not open.\n");
+                   Dmsg0(850, "Console file not open.\n");
                }
                if (con_fd) {
                   Pw(con_lock);      /* get write lock on console message file */
                   errno = 0;
-                  bstrftime(dt, sizeof(dt), time(NULL));
-                  len = strlen(dt);
-                   dt[len++] = ' ';
-                  fwrite(dt, len, 1, con_fd);
+                  if (dtlen) {
+                     fwrite(dt, dtlen, 1, con_fd);
+                  }
                   len = strlen(msg);
                   if (len > 0) {
                      fwrite(msg, len, 1, con_fd);
@@ -630,91 +630,105 @@ void dispatch_message(JCR *jcr, int type, int level, char *msg)
                }
                break;
             case MD_SYSLOG:
-                Dmsg1(800, "SYSLOG for collowing msg: %s\n", msg);
+                Dmsg1(850, "SYSLOG for collowing msg: %s\n", msg);
                /*
-                * We really should do an openlog() here.  
+                * We really should do an openlog() here.
                 */
                 syslog(LOG_DAEMON|LOG_ERR, "%s", msg);
                break;
             case MD_OPERATOR:
-                Dmsg1(800, "OPERATOR for collowing msg: %s\n", msg);
+                Dmsg1(850, "OPERATOR for following msg: %s\n", msg);
                mcmd = get_pool_memory(PM_MESSAGE);
-               if ((bpipe=open_mail_pipe(jcr, &mcmd, d))) {
+               if ((bpipe=open_mail_pipe(jcr, mcmd, d))) {
                   int stat;
+                  fputs(dt, bpipe->wfd);
                   fputs(msg, bpipe->wfd);
                   /* Messages to the operator go one at a time */
                   stat = close_bpipe(bpipe);
                   if (stat != 0) {
-                      Jmsg2(jcr, M_ERROR, 0, _("Operator mail program terminated in error.\n"
+                     berrno be;
+                     be.set_errno(stat);
+                      Qmsg2(jcr, M_ERROR, 0, _("Operator mail program terminated in error.\n"
                             "CMD=%s\n"
-                            "ERR=%s\n"), mcmd, strerror(stat));
+                            "ERR=%s\n"), mcmd, be.strerror());
                   }
                }
                free_pool_memory(mcmd);
                break;
             case MD_MAIL:
             case MD_MAIL_ON_ERROR:
-                Dmsg1(800, "MAIL for following msg: %s", msg);
+                Dmsg1(850, "MAIL for following msg: %s", msg);
                if (!d->fd) {
                   POOLMEM *name = get_pool_memory(PM_MESSAGE);
-                  make_unique_mail_filename(jcr, &mp_chr(name), d);
-                   d->fd = fopen(mp_chr(name), "w+");
+                  make_unique_mail_filename(jcr, name, d);
+                   d->fd = fopen(name, "w+");
                   if (!d->fd) {
+                     berrno be;
                      d->fd = stdout;
-                      Jmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", name, strerror(errno));
+                      Qmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", name,
+                           be.strerror());
                      d->fd = NULL;
                      free_pool_memory(name);
                      break;
                   }
                   d->mail_filename = name;
                }
-               len = strlen(msg);
+               fputs(dt, d->fd);
+               len = strlen(msg) + dtlen;;
                if (len > d->max_len) {
                   d->max_len = len;      /* keep max line length */
                }
                fputs(msg, d->fd);
                break;
             case MD_FILE:
-                Dmsg1(800, "FILE for following msg: %s", msg);
+                Dmsg1(850, "FILE for following msg: %s", msg);
                if (!d->fd) {
                    d->fd = fopen(d->where, "w+");
                   if (!d->fd) {
+                     berrno be;
                      d->fd = stdout;
-                      Jmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", d->where, strerror(errno));
+                      Qmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", d->where,
+                           be.strerror());
                      d->fd = NULL;
                      break;
                   }
                }
+               fputs(dt, d->fd);
                fputs(msg, d->fd);
                break;
             case MD_APPEND:
-                Dmsg1(800, "APPEND for following msg: %s", msg);
+                Dmsg1(850, "APPEND for following msg: %s", msg);
                if (!d->fd) {
                    d->fd = fopen(d->where, "a");
                   if (!d->fd) {
+                     berrno be;
                      d->fd = stdout;
-                      Jmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", d->where, strerror(errno));
+                      Qmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", d->where,
+                           be.strerror());
                      d->fd = NULL;
                      break;
                   }
                }
+               fputs(dt, d->fd);
                fputs(msg, d->fd);
                break;
             case MD_DIRECTOR:
-                Dmsg1(800, "DIRECTOR for following msg: %s", msg);
+                Dmsg1(850, "DIRECTOR for following msg: %s", msg);
                if (jcr && jcr->dir_bsock && !jcr->dir_bsock->errors) {
-                   bnet_fsend(jcr->dir_bsock, "Jmsg Job=%s type=%d level=%d %s", 
-                     jcr->Job, type, level, msg);
+                   bnet_fsend(jcr->dir_bsock, "Jmsg Job=%s type=%d level=%d %s",
+                     jcr->Job, type, mtime, msg);
                }
                break;
             case MD_STDOUT:
-                Dmsg1(800, "STDOUT for following msg: %s", msg);
+                Dmsg1(850, "STDOUT for following msg: %s", msg);
                if (type != M_ABORT && type != M_ERROR_TERM) { /* already printed */
+                  fputs(dt, stdout);
                   fputs(msg, stdout);
                }
                break;
             case MD_STDERR:
-                Dmsg1(800, "STDERR for following msg: %s", msg);
+                Dmsg1(850, "STDERR for following msg: %s", msg);
+               fputs(dt, stderr);
                fputs(msg, stderr);
                break;
             default:
@@ -731,20 +745,20 @@ void dispatch_message(JCR *jcr, int type, int level, char *msg)
  *  is less than or equal the debug_level. File and line numbers
  *  are included for more detail if desired, but not currently
  *  printed.
- *  
+ *
  *  If the level is negative, the details of file and line number
  *  are not printed.
  */
-void 
+void
 d_msg(const char *file, int line, int level, const char *fmt,...)
 {
     char      buf[5000];
     int       len;
     va_list   arg_ptr;
-    int       details = TRUE;
+    bool      details = true;
 
     if (level < 0) {
-       details = FALSE;
+       details = false;
        level = -level;
     }
 
@@ -767,7 +781,7 @@ d_msg(const char *file, int line, int level, const char *fmt,...)
        bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
        va_end(arg_ptr);
 
-       /* 
+       /*
         * Used the "trace on" command in the console to turn on
         *  output to the trace file.  "trace off" will close the file.
        */
@@ -787,7 +801,7 @@ d_msg(const char *file, int line, int level, const char *fmt,...)
 }
 
 /*
- * Set trace flag on/off. If argument is negative, there is no change 
+ * Set trace flag on/off. If argument is negative, there is no change
  */
 void set_trace(int trace_flag)
 {
@@ -806,14 +820,19 @@ void set_trace(int trace_flag)
    }
 }
 
+bool get_trace(void)
+{
+   return trace;
+}
+
 /*********************************************************************
  *
  *  This subroutine prints a message regardless of the debug level
- *  
+ *
  *  If the level is negative, the details of file and line number
  *  are not printed.
  */
-void 
+void
 p_msg(const char *file, int line, int level, const char *fmt,...)
 {
     char      buf[5000];
@@ -842,11 +861,11 @@ p_msg(const char *file, int line, int level, const char *fmt,...)
  *  is less than or equal the debug_level. File and line numbers
  *  are included for more detail if desired, but not currently
  *  printed.
- *  
+ *
  *  If the level is negative, the details of file and line number
  *  are not printed.
  */
-void 
+void
 t_msg(const char *file, int line, int level, const char *fmt,...)
 {
     char      buf[5000];
@@ -864,7 +883,7 @@ t_msg(const char *file, int line, int level, const char *fmt,...)
           bsnprintf(buf, sizeof(buf), "%s/bacula.trace", working_directory);
           trace_fd = fopen(buf, "a+");
        }
-    
+
 #ifdef FULL_LOCATION
        if (details) {
           len = bsnprintf(buf, sizeof(buf), "%s: %s:%d ", my_name, file, line);
@@ -891,28 +910,28 @@ t_msg(const char *file, int line, int level, const char *fmt,...)
  * print an error message
  *
  */
-void 
+void
 e_msg(const char *file, int line, int type, int level, const char *fmt,...)
 {
     char     buf[5000];
     va_list   arg_ptr;
     int len;
 
-    /* 
-     * Check if we have a message destination defined. 
-     * We always report M_ABORT and M_ERROR_TERM 
+    /*
+     * Check if we have a message destination defined.
+     * We always report M_ABORT and M_ERROR_TERM
      */
-    if (!daemon_msgs || ((type != M_ABORT && type != M_ERROR_TERM) && 
+    if (!daemon_msgs || ((type != M_ABORT && type != M_ERROR_TERM) &&
                         !bit_is_set(type, daemon_msgs->send_msg))) {
        return;                       /* no destination */
     }
     switch (type) {
     case M_ABORT:
-       len = bsnprintf(buf, sizeof(buf), "%s: ABORTING due to ERROR in %s:%d\n", 
+       len = bsnprintf(buf, sizeof(buf), "%s: ABORTING due to ERROR in %s:%d\n",
               my_name, file, line);
        break;
     case M_ERROR_TERM:
-       len = bsnprintf(buf, sizeof(buf), "%s: ERROR TERMINATION at %s:%d\n", 
+       len = bsnprintf(buf, sizeof(buf), "%s: ERROR TERMINATION at %s:%d\n",
               my_name, file, line);
        break;
     case M_FATAL:
@@ -942,13 +961,13 @@ e_msg(const char *file, int line, int type, int level, const char *fmt,...)
     bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
     va_end(arg_ptr);
 
-    dispatch_message(NULL, type, level, buf);
+    dispatch_message(NULL, type, 0, buf);
 
     if (type == M_ABORT) {
        char *p = 0;
        p[0] = 0;                     /* generate segmentation violation */
     }
-    if ((type == M_ERROR_TERM) && exit_on_error) {
+    if (type == M_ERROR_TERM) {
        exit(1);
     }
 }
@@ -958,8 +977,8 @@ e_msg(const char *file, int line, int type, int level, const char *fmt,...)
  * Generate a Job message
  *
  */
-void 
-Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
+void
+Jmsg(JCR *jcr, int type, time_t mtime, const char *fmt,...)
 {
     char     rbuf[5000];
     va_list   arg_ptr;
@@ -967,17 +986,17 @@ Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
     MSGS *msgs;
     const char *job;
 
-    
-    Dmsg1(800, "Enter Jmsg type=%d\n", type);
+
+    Dmsg1(850, "Enter Jmsg type=%d\n", type);
 
     /* Special case for the console, which has a dir_bsock and JobId==0,
      * in that case, we send the message directly back to the
-     * dir_bsock.  
+     * dir_bsock.
      */
     if (jcr && jcr->JobId == 0 && jcr->dir_bsock) {
        BSOCK *dir = jcr->dir_bsock;
        va_start(arg_ptr, fmt);
-       dir->msglen = bvsnprintf(mp_chr(dir->msg), sizeof_pool_memory(dir->msg), 
+       dir->msglen = bvsnprintf(dir->msg, sizeof_pool_memory(dir->msg),
                                fmt, arg_ptr);
        va_end(arg_ptr);
        bnet_send(jcr->dir_bsock);
@@ -989,7 +1008,7 @@ Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
     if (jcr) {
        msgs = jcr->jcr_msgs;
        job = jcr->Job;
-    } 
+    }
     if (!msgs) {
        msgs = daemon_msgs;           /* if no jcr, we use daemon handler */
     }
@@ -997,9 +1016,9 @@ Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
        job = "";                      /* Set null job name if none */
     }
 
-    /* 
-     * Check if we have a message destination defined. 
-     * We always report M_ABORT and M_ERROR_TERM 
+    /*
+     * Check if we have a message destination defined.
+     * We always report M_ABORT and M_ERROR_TERM
      */
     if (msgs && (type != M_ABORT && type != M_ERROR_TERM) &&
         !bit_is_set(type, msgs->send_msg)) {
@@ -1039,13 +1058,13 @@ Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
     bvsnprintf(rbuf+len,  sizeof(rbuf)-len, fmt, arg_ptr);
     va_end(arg_ptr);
 
-    dispatch_message(jcr, type, level, rbuf);
+    dispatch_message(jcr, type, mtime, rbuf);
 
     if (type == M_ABORT){
        char *p = 0;
        p[0] = 0;                     /* generate segmentation violation */
     }
-    if ((type == M_ERROR_TERM) && exit_on_error) {
+    if (type == M_ERROR_TERM) {
        exit(1);
     }
 }
@@ -1054,17 +1073,17 @@ Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
  * If we come here, prefix the message with the file:line-number,
  *  then pass it on to the normal Jmsg routine.
  */
-void j_msg(const char *file, int line, JCR *jcr, int type, int level, const char *fmt,...)
+void j_msg(const char *file, int line, JCR *jcr, int type, time_t mtime, const char *fmt,...)
 {
    va_list   arg_ptr;
    int i, len, maxlen;
    POOLMEM *pool_buf;
 
    pool_buf = get_pool_memory(PM_EMSG);
-   i = Mmsg(&pool_buf, "%s:%d ", file, line);
+   i = Mmsg(pool_buf, "%s:%d ", file, line);
 
    for (;;) {
-      maxlen = sizeof_pool_memory(pool_buf) - i - 1; 
+      maxlen = sizeof_pool_memory(pool_buf) - i - 1;
       va_start(arg_ptr, fmt);
       len = bvsnprintf(pool_buf+i, maxlen, fmt, arg_ptr);
       va_end(arg_ptr);
@@ -1075,23 +1094,23 @@ void j_msg(const char *file, int line, JCR *jcr, int type, int level, const char
       break;
    }
 
-   Jmsg(jcr, type, level, "%s", pool_buf);
+   Jmsg(jcr, type, mtime, "%s", pool_buf);
    free_memory(pool_buf);
 }
 
 
 /*
  * Edit a message into a Pool memory buffer, with file:lineno
- */                                                 
+ */
 int m_msg(const char *file, int line, POOLMEM **pool_buf, const char *fmt, ...)
 {
    va_list   arg_ptr;
    int i, len, maxlen;
 
-   i = sprintf(mp_chr(*pool_buf), "%s:%d ", file, line);
+   i = sprintf(*pool_buf, "%s:%d ", file, line);
 
    for (;;) {
-      maxlen = sizeof_pool_memory(*pool_buf) - i - 1; 
+      maxlen = sizeof_pool_memory(*pool_buf) - i - 1;
       va_start(arg_ptr, fmt);
       len = bvsnprintf(*pool_buf+i, maxlen, fmt, arg_ptr);
       va_end(arg_ptr);
@@ -1104,6 +1123,28 @@ int m_msg(const char *file, int line, POOLMEM **pool_buf, const char *fmt, ...)
    return len;
 }
 
+int m_msg(const char *file, int line, POOLMEM *&pool_buf, const char *fmt, ...)
+{
+   va_list   arg_ptr;
+   int i, len, maxlen;
+
+   i = sprintf(pool_buf, "%s:%d ", file, line);
+
+   for (;;) {
+      maxlen = sizeof_pool_memory(pool_buf) - i - 1;
+      va_start(arg_ptr, fmt);
+      len = bvsnprintf(pool_buf+i, maxlen, fmt, arg_ptr);
+      va_end(arg_ptr);
+      if (len < 0 || len >= (maxlen-5)) {
+        pool_buf = realloc_pool_memory(pool_buf, maxlen + i + maxlen/2);
+        continue;
+      }
+      break;
+   }
+   return len;
+}
+
+
 /*
  * Edit a message into a Pool Memory buffer NO file:lineno
  *  Returns: string length of what was edited.
@@ -1114,7 +1155,7 @@ int Mmsg(POOLMEM **pool_buf, const char *fmt, ...)
    int len, maxlen;
 
    for (;;) {
-      maxlen = sizeof_pool_memory(*pool_buf) - 1; 
+      maxlen = sizeof_pool_memory(*pool_buf) - 1;
       va_start(arg_ptr, fmt);
       len = bvsnprintf(*pool_buf, maxlen, fmt, arg_ptr);
       va_end(arg_ptr);
@@ -1127,16 +1168,55 @@ int Mmsg(POOLMEM **pool_buf, const char *fmt, ...)
    return len;
 }
 
+int Mmsg(POOLMEM *&pool_buf, const char *fmt, ...)
+{
+   va_list   arg_ptr;
+   int len, maxlen;
+
+   for (;;) {
+      maxlen = sizeof_pool_memory(pool_buf) - 1;
+      va_start(arg_ptr, fmt);
+      len = bvsnprintf(pool_buf, maxlen, fmt, arg_ptr);
+      va_end(arg_ptr);
+      if (len < 0 || len >= (maxlen-5)) {
+        pool_buf = realloc_pool_memory(pool_buf, maxlen + maxlen/2);
+        continue;
+      }
+      break;
+   }
+   return len;
+}
+
+int Mmsg(POOL_MEM &pool_buf, const char *fmt, ...)
+{
+   va_list   arg_ptr;
+   int len, maxlen;
+
+   for (;;) {
+      maxlen = pool_buf.max_size() - 1;
+      va_start(arg_ptr, fmt);
+      len = bvsnprintf(pool_buf.c_str(), maxlen, fmt, arg_ptr);
+      va_end(arg_ptr);
+      if (len < 0 || len >= (maxlen-5)) {
+        pool_buf.realloc_pm(maxlen + maxlen/2);
+        continue;
+      }
+      break;
+   }
+   return len;
+}
+
+
 static pthread_mutex_t msg_queue_mutex = PTHREAD_MUTEX_INITIALIZER;
 
 /*
  * We queue messages rather than print them directly. This
  *  is generally used in low level routines (msg handler, bnet)
- *  to prevent recursion (i.e. if you are in the middle of 
+ *  to prevent recursion (i.e. if you are in the middle of
  *  sending a message, it is a bit messy to recursively call
  *  yourself when the bnet packet is not reentrant).
  */
-void Qmsg(JCR *jcr, int type, int level, const char *fmt,...)
+void Qmsg(JCR *jcr, int type, time_t mtime, const char *fmt,...)
 {
    va_list   arg_ptr;
    int len, maxlen;
@@ -1146,7 +1226,7 @@ void Qmsg(JCR *jcr, int type, int level, const char *fmt,...)
    pool_buf = get_pool_memory(PM_EMSG);
 
    for (;;) {
-      maxlen = sizeof_pool_memory(pool_buf) - 1; 
+      maxlen = sizeof_pool_memory(pool_buf) - 1;
       va_start(arg_ptr, fmt);
       len = bvsnprintf(pool_buf, maxlen, fmt, arg_ptr);
       va_end(arg_ptr);
@@ -1158,25 +1238,25 @@ void Qmsg(JCR *jcr, int type, int level, const char *fmt,...)
    }
    item = (MQUEUE_ITEM *)malloc(sizeof(MQUEUE_ITEM) + strlen(pool_buf) + 1);
    item->type = type;
-   item->level = level;
-   strcpy(item->msg, pool_buf);  
-   P(msg_queue_mutex);
+   item->mtime = time(NULL);
+   strcpy(item->msg, pool_buf);
    /* If no jcr or dequeuing send to daemon to avoid recursion */
    if (!jcr || jcr->dequeuing) {
       /* jcr==NULL => daemon message, safe to send now */
-      Jmsg(NULL, item->type, item->level, "%s", item->msg);
+      Jmsg(NULL, item->type, item->mtime, "%s", item->msg);
       free(item);
    } else {
       /* Queue message for later sending */
+      P(msg_queue_mutex);
       jcr->msg_queue->append(item);
+      V(msg_queue_mutex);
 //    Dmsg1(000, "queue item=%lu\n", (long unsigned)item);
    }
-   V(msg_queue_mutex);
    free_memory(pool_buf);
 }
 
 /*
- * Dequeue messages 
+ * Dequeue messages
  */
 void dequeue_messages(JCR *jcr)
 {
@@ -1185,29 +1265,29 @@ void dequeue_messages(JCR *jcr)
    jcr->dequeuing = true;
    foreach_dlist(item, jcr->msg_queue) {
 //    Dmsg1(000, "dequeue item=%lu\n", (long unsigned)item);
-      Jmsg(jcr, item->type, item->level, "%s", item->msg);
+      Jmsg(jcr, item->type, item->mtime, "%s", item->msg);
    }
    jcr->msg_queue->destroy();
    jcr->dequeuing = false;
    V(msg_queue_mutex);
-}                                                
+}
 
 
 /*
  * If we come here, prefix the message with the file:line-number,
  *  then pass it on to the normal Qmsg routine.
  */
-void q_msg(const char *file, int line, JCR *jcr, int type, int level, const char *fmt,...)
+void q_msg(const char *file, int line, JCR *jcr, int type, time_t mtime, const char *fmt,...)
 {
    va_list   arg_ptr;
    int i, len, maxlen;
    POOLMEM *pool_buf;
 
    pool_buf = get_pool_memory(PM_EMSG);
-   i = Mmsg(&pool_buf, "%s:%d ", file, line);
+   i = Mmsg(pool_buf, "%s:%d ", file, line);
 
    for (;;) {
-      maxlen = sizeof_pool_memory(pool_buf) - i - 1; 
+      maxlen = sizeof_pool_memory(pool_buf) - i - 1;
       va_start(arg_ptr, fmt);
       len = bvsnprintf(pool_buf+i, maxlen, fmt, arg_ptr);
       va_end(arg_ptr);
@@ -1218,13 +1298,6 @@ void q_msg(const char *file, int line, JCR *jcr, int type, int level, const char
       break;
    }
 
-   Qmsg(jcr, type, level, "%s", pool_buf);
+   Qmsg(jcr, type, mtime, "%s", pool_buf);
    free_memory(pool_buf);
 }
-
-/* 
- * Define if e_msg must exit when M_ERROR_TERM is received
- */
-void set_exit_on_error(int value) {
-   exit_on_error = value;
-}