]> git.sur5r.net Git - bacula/bacula/blobdiff - bacula/src/lib/message.c
This commit was manufactured by cvs2svn to create tag
[bacula/bacula] / bacula / src / lib / message.c
index 340a2757d7b122a1654f05534eb0362c71cc3583..ffc431dade5e24a69bc940f56783649357f7900f 100755 (executable)
@@ -8,7 +8,7 @@
  */
 
 /*
-   Copyright (C) 2000, 2001, 2002 Kern Sibbald and John Walker
+   Copyright (C) 2000-2003 Kern Sibbald and John Walker
 
    This program is free software; you can redistribute it and/or
    modify it under the terms of the GNU General Public License as
 
 #define FULL_LOCATION 1              /* set for file:line in Debug messages */
 
+/* 
+ *  This is where we define "Globals" because all the
+ *    daemons include this file.
+ */
 char *working_directory = NULL;       /* working directory path stored here */
-int debug_level = 5;                 /* debug level */
+int verbose = 0;                     /* increase User messages */
+int debug_level = 0;                 /* debug level */
 time_t daemon_start_time = 0;        /* Daemon start time */
-
-char my_name[20];                    /* daemon name is stored here */
+char *version = VERSION " (" BDATE ")";
+char my_name[30];                    /* daemon name is stored here */
 char *exepath = (char *)NULL;
 char *exename = (char *)NULL;
 int console_msg_pending = 0;
-char con_fname[1000];
-FILE *con_fd = NULL;
-brwlock_t con_lock; 
+char con_fname[500];                 /* Console filename */
+FILE *con_fd = NULL;                 /* Console file descriptor */
+brwlock_t con_lock;                  /* Console lock structure */
+FILE *trace_fd = NULL;
+
+#ifdef HAVE_MYSQL
+char catalog_db[] = "MySQL";
+#else 
+#ifdef HAVE_SQLITE
+char catalog_db[] = "SQLite";
+#else
+char catalog_db[] = "Internal";
+#endif
+#endif
+
+char *host_os = HOST_OS;
+char *distname = DISTNAME;
+char *distver = DISTVER;
 
 /* Forward referenced functions */
 
@@ -135,16 +155,36 @@ void my_name_is(int argc, char *argv[], char *name)
  *   non-NULL    -> initialize jcr using Message resource
  */
 void
-init_msg(void *vjcr, MSGS *msg)
+init_msg(JCR *jcr, MSGS *msg)
 {
    DEST *d, *dnew, *temp_chain = NULL;
-   JCR *jcr = (JCR *)vjcr;
+   int i, fd;
+
+   if (jcr == NULL && msg == NULL) {
+      init_last_jobs_list();
+   }
+
+   /*
+    * Make sure we have fd's 0, 1, 2 open
+    *  If we don't do this one of our sockets may open
+    *  there and if we then use stdout, it could
+    *  send total garbage to our socket.
+    *
+    */
+   fd = open("/dev/null", O_RDONLY, 0644);
+   if (fd > 2) {
+      close(fd);
+   } else {
+      for(i=1; fd + i <= 2; i++) {
+        dup2(fd, fd+i);
+      }
+   }
+
 
    /*
     * If msg is NULL, initialize global chain for STDOUT and syslog
     */
    if (msg == NULL) {
-      int i;
       daemon_msgs = (MSGS *)malloc(sizeof(MSGS));
       memset(daemon_msgs, 0, sizeof(MSGS));
       for (i=1; i<=M_MAX; i++) {
@@ -157,7 +197,7 @@ init_msg(void *vjcr, MSGS *msg)
 
    /*
     * Walk down the message resource chain duplicating it
-    * for the current Job.   ****FIXME***** segfault on memcpy
+    * for the current Job.
     */
    for (d=msg->dest_chain; d; d=d->next) {
       dnew = (DEST *)malloc(sizeof(DEST));
@@ -180,12 +220,17 @@ init_msg(void *vjcr, MSGS *msg)
       jcr->jcr_msgs->dest_chain = temp_chain;
       memcpy(jcr->jcr_msgs->send_msg, msg->send_msg, sizeof(msg->send_msg));
    } else {
+      /* If we have default values, release them now */
+      if (daemon_msgs) {
+        free_msgs_res(daemon_msgs);
+      }
       daemon_msgs = (MSGS *)malloc(sizeof(MSGS));
       memset(daemon_msgs, 0, sizeof(MSGS));
       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);
+
 }
 
 /* Initialize so that the console (User Agent) can
@@ -195,7 +240,7 @@ void init_console_msg(char *wd)
 {
    int fd;
 
-   sprintf(con_fname, "%s/%s.conmsg", wd, my_name);
+   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) {
       Emsg2(M_ERROR_TERM, 0, _("Could not open console message file %s: ERR=%s\n"),
@@ -283,21 +328,18 @@ void rem_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where)
    }
 }
 
-
-
 static void make_unique_spool_filename(JCR *jcr, POOLMEM **name, int fd)
 {
    Mmsg(name, "%s/%s.spool.%s.%d", working_directory, my_name,
       jcr->Job, fd);
 }
 
-int open_spool_file(void *vjcr, BSOCK *bs)
+int open_spool_file(JCR *jcr, BSOCK *bs)
 {
     POOLMEM *name  = get_pool_memory(PM_MESSAGE);
-    JCR *jcr = (JCR *)vjcr;
 
     make_unique_spool_filename(jcr, &name, bs->fd);
-    bs->spool_fd = fopen(name, "w+");
+    bs->spool_fd = fopen(mp_chr(name), "w+");
     if (!bs->spool_fd) {
        Jmsg(jcr, M_ERROR, 0, "fopen spool file %s failed: ERR=%s\n", name, strerror(errno));
        free_pool_memory(name);
@@ -307,21 +349,19 @@ int open_spool_file(void *vjcr, BSOCK *bs)
     return 1;
 }
 
-int close_spool_file(void *vjcr, BSOCK *bs)
+int close_spool_file(JCR *jcr, BSOCK *bs)
 {
     POOLMEM *name  = get_pool_memory(PM_MESSAGE);
-    JCR *jcr = (JCR *)vjcr;
 
     make_unique_spool_filename(jcr, &name, bs->fd);
     fclose(bs->spool_fd);
-    unlink(name);
+    unlink(mp_chr(name));
     free_pool_memory(name);
     bs->spool_fd = NULL;
     bs->spool = 0;
     return 1;
 }
 
-
 /*
  * Create a unique filename for the mail command
  */
@@ -352,7 +392,8 @@ static BPIPE *open_mail_pipe(JCR *jcr, POOLMEM **cmd, DEST *d)
    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));
+      Jmsg(jcr, M_ERROR, 0, "open mail pipe %s failed: ERR=%s\n", 
+        *cmd, strerror(errno));
    } 
    return bpipe;
 }
@@ -361,10 +402,9 @@ static BPIPE *open_mail_pipe(JCR *jcr, POOLMEM **cmd, DEST *d)
  * Close the messages for this Messages resource, which means to close
  *  any open files, and dispatch any pending email messages.
  */
-void close_msg(void *vjcr)
+void close_msg(JCR *jcr)
 {
    MSGS *msgs;
-   JCR *jcr = (JCR *)vjcr;
    DEST *d;
    BPIPE *bpipe;
    POOLMEM *cmd, *line;
@@ -374,7 +414,6 @@ void close_msg(void *vjcr)
 
    if (jcr == NULL) {               /* NULL -> global chain */
       msgs = daemon_msgs;
-      daemon_msgs = NULL;
    } else {
       msgs = jcr->jcr_msgs;
       jcr->jcr_msgs = NULL;
@@ -405,18 +444,18 @@ void close_msg(void *vjcr)
            }
            
            if (!(bpipe=open_mail_pipe(jcr, &cmd, d))) {
-               Dmsg0(000, "open mail pipe failed.\n");
+               Pmsg0(000, "open mail pipe failed.\n");
               goto rem_temp_file;
            }
             Dmsg0(150, "Opened mail pipe\n");
            len = d->max_len+10;
            line = get_memory(len);
            rewind(d->fd);
-           while (fgets(line, len, d->fd)) {
+           while (fgets(mp_chr(line), len, d->fd)) {
               fputs(line, bpipe->wfd);
            }
            if (!close_wpipe(bpipe)) {       /* close write pipe sending mail */
-               Dmsg1(000, "close error: ERR=%s\n", strerror(errno));
+               Pmsg1(000, "close error: ERR=%s\n", strerror(errno));
            }
 
            /*
@@ -426,8 +465,7 @@ void close_msg(void *vjcr)
             */
            if (msgs != daemon_msgs) {
               /* read what mail prog returned -- should be nothing */
-              while (fgets(line, len, bpipe->rfd)) {
-//                Dmsg1(000, "Mail prog got: %s", line);
+              while (fgets(mp_chr(line), len, bpipe->rfd)) {
                   Jmsg1(jcr, M_INFO, 0, _("Mail prog: %s"), line);
               }
            }
@@ -442,7 +480,7 @@ void close_msg(void *vjcr)
 rem_temp_file:
            /* Remove temp file */
            fclose(d->fd);
-           unlink(d->mail_filename);
+           unlink(mp_chr(d->mail_filename));
            free_pool_memory(d->mail_filename);
            d->mail_filename = NULL;
             Dmsg0(150, "end mail or mail on error\n");
@@ -456,8 +494,10 @@ rem_temp_file:
    }
    free_pool_memory(cmd);
    Dmsg0(150, "Done walking message chain.\n");
-   free_msgs_res(msgs);
-   msgs = NULL;
+   if (jcr) {
+      free_msgs_res(msgs);
+      msgs = NULL;
+   }
    Dmsg0(150, "===End close msg resource\n");
 }
 
@@ -468,6 +508,7 @@ void free_msgs_res(MSGS *msgs)
 {
    DEST *d, *old;
 
+   /* Walk down the message chain releasing allocated buffers */
    for (d=msgs->dest_chain; d; ) {
       if (d->where) {
         free(d->where);
@@ -480,7 +521,7 @@ void free_msgs_res(MSGS *msgs)
       free(old);                     /* free the destination item */
    }
    msgs->dest_chain = NULL;
-   free(msgs);
+   free(msgs);                       /* free the head */
 }
 
 
@@ -495,6 +536,7 @@ void term_msg()
 {
    Dmsg0(100, "Enter term_msg\n");
    close_msg(NULL);                  /* close global chain */
+   free_msgs_res(daemon_msgs);       /* free the resources */
    daemon_msgs = NULL;
    if (con_fd) {
       fflush(con_fd);
@@ -509,6 +551,11 @@ void term_msg()
       free(exename);
       exename = NULL;
    }
+   if (trace_fd) {
+      fclose(trace_fd);
+      trace_fd = NULL;
+   }
+   term_last_jobs_list();
 }
 
 
@@ -516,20 +563,19 @@ void term_msg()
 /*
  * Handle sending the message to the appropriate place
  */
-void dispatch_message(void *vjcr, int type, int level, char *msg)
+void dispatch_message(JCR *jcr, int type, int level, char *msg)
 {
     DEST *d;   
-    char cmd[MAXSTRING];
+    char dt[MAX_TIME_LENGTH];
     POOLMEM *mcmd;
-    JCR *jcr = (JCR *) vjcr;
     int len;
     MSGS *msgs;
     BPIPE *bpipe;
 
-    Dmsg2(200, "Enter dispatch_msg type=%d msg=%s\n", type, msg);
+    Dmsg2(800, "Enter dispatch_msg type=%d msg=%s\n", type, msg);
 
     if (type == M_ABORT || type == M_ERROR_TERM) {
-       fprintf(stdout, "%s", msg);        /* print this here to INSURE that it is printed */
+       fputs(msg, stdout);        /* print this here to INSURE that it is printed */
     }
 
     /* Now figure out where to send the message */
@@ -544,36 +590,41 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
        if (bit_is_set(type, d->msg_types)) {
          switch (d->dest_code) {
             case MD_CONSOLE:
-                Dmsg1(400, "CONSOLE for following msg: %s", msg);
+                Dmsg1(800, "CONSOLE for following msg: %s", msg);
                if (!con_fd) {
                    con_fd = fopen(con_fname, "a+");
-                   Dmsg0(200, "Console file not open.\n");
+                   Dmsg0(800, "Console file not open.\n");
                }
                if (con_fd) {
                   Pw(con_lock);      /* get write lock on console message file */
                   errno = 0;
-                  bstrftime(cmd, sizeof(cmd), time(NULL));
-                  len = strlen(cmd);
-                   cmd[len++] = ' ';
-                  fwrite(cmd, len, 1, con_fd);
+                  bstrftime(dt, sizeof(dt), time(NULL));
+                  len = strlen(dt);
+                   dt[len++] = ' ';
+                  fwrite(dt, len, 1, con_fd);
                   len = strlen(msg);
-                   if (len > 0 && msg[len-1] != '\n') {
-                      msg[len++] = '\n';
-                     msg[len] = 0;
+                  if (len > 0) {
+                     fwrite(msg, len, 1, con_fd);
+                      if (msg[len-1] != '\n') {
+                         fwrite("\n", 2, 1, con_fd);
+                     }
+                  } else {
+                      fwrite("\n", 2, 1, con_fd);
                   }
-                  fwrite(msg, len, 1, con_fd);
                   fflush(con_fd);
                   console_msg_pending = TRUE;
                   Vw(con_lock);
                }
                break;
             case MD_SYSLOG:
-                Dmsg1(400, "SYSLOG for collowing msg: %s\n", msg);
-               /* We really should do an openlog() here */
-               syslog(LOG_DAEMON|LOG_ERR, msg);
+                Dmsg1(800, "SYSLOG for collowing msg: %s\n", msg);
+               /*
+                * We really should do an openlog() here.  
+                */
+                syslog(LOG_DAEMON|LOG_ERR, "%s", msg);
                break;
             case MD_OPERATOR:
-                Dmsg1(400, "OPERATOR for collowing msg: %s\n", msg);
+                Dmsg1(800, "OPERATOR for collowing msg: %s\n", msg);
                mcmd = get_pool_memory(PM_MESSAGE);
                if ((bpipe=open_mail_pipe(jcr, &mcmd, d))) {
                   int stat;
@@ -589,11 +640,11 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
                break;
             case MD_MAIL:
             case MD_MAIL_ON_ERROR:
-                Dmsg1(400, "MAIL for following msg: %s", msg);
+                Dmsg1(800, "MAIL for following msg: %s", msg);
                if (!d->fd) {
-                  POOLMEM *name  = get_pool_memory(PM_MESSAGE);
-                  make_unique_mail_filename(jcr, &name, d);
-                   d->fd = fopen(name, "w+");
+                  POOLMEM *name = get_pool_memory(PM_MESSAGE);
+                  make_unique_mail_filename(jcr, &mp_chr(name), d);
+                   d->fd = fopen(mp_chr(name), "w+");
                   if (!d->fd) {
                      d->fd = stdout;
                       Emsg2(M_ERROR, 0, "fopen %s failed: ERR=%s\n", name, strerror(errno));
@@ -610,7 +661,7 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
                fputs(msg, d->fd);
                break;
             case MD_FILE:
-                Dmsg1(400, "FILE for following msg: %s", msg);
+                Dmsg1(800, "FILE for following msg: %s", msg);
                if (!d->fd) {
                    d->fd = fopen(d->where, "w+");
                   if (!d->fd) {
@@ -623,7 +674,7 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
                fputs(msg, d->fd);
                break;
             case MD_APPEND:
-                Dmsg1(400, "APPEND for following msg: %s", msg);
+                Dmsg1(800, "APPEND for following msg: %s", msg);
                if (!d->fd) {
                    d->fd = fopen(d->where, "a");
                   if (!d->fd) {
@@ -636,23 +687,21 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
                fputs(msg, d->fd);
                break;
             case MD_DIRECTOR:
-                Dmsg1(400, "DIRECTOR for following msg: %s", msg);
+                Dmsg1(800, "DIRECTOR for following msg: %s", msg);
                if (jcr && jcr->dir_bsock && !jcr->dir_bsock->errors) {
-
-                  jcr->dir_bsock->msglen = Mmsg(&(jcr->dir_bsock->msg),
-                        "Jmsg Job=%s type=%d level=%d %s", jcr->Job,
-                        type, level, msg) + 1;
-                  bnet_send(jcr->dir_bsock);
+                   bnet_fsend(jcr->dir_bsock, "Jmsg Job=%s type=%d level=%d %s", 
+                     jcr->Job, type, level, msg);
                }
                break;
             case MD_STDOUT:
-                Dmsg1(400, "STDOUT for following msg: %s", msg);
-               if (type != M_ABORT && type != M_ERROR_TERM)  /* already printed */
-                   fprintf(stdout, "%s", msg);
+                Dmsg1(800, "STDOUT for following msg: %s", msg);
+               if (type != M_ABORT && type != M_ERROR_TERM) { /* already printed */
+                  fputs(msg, stdout);
+               }
                break;
             case MD_STDERR:
-                Dmsg1(400, "STDERR for following msg: %s", msg);
-                fprintf(stderr, "%s", msg);
+                Dmsg1(800, "STDERR for following msg: %s", msg);
+               fputs(msg, stderr);
                break;
             default:
                break;
@@ -664,7 +713,7 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
 
 /*********************************************************************
  *
- *  subroutine prints a debug message if the level number
+ *  This subroutine prints a debug message if the level number
  *  is less than or equal the debug_level. File and line numbers
  *  are included for more detail if desired, but not currently
  *  printed.
@@ -675,8 +724,8 @@ void dispatch_message(void *vjcr, int type, int level, char *msg)
 void 
 d_msg(char *file, int line, int level, char *fmt,...)
 {
-    char      buf[2000];
-    int       i;
+    char      buf[5000];
+    int       len;
     va_list   arg_ptr;
     int       details = TRUE;
 
@@ -686,25 +735,122 @@ d_msg(char *file, int line, int level, char *fmt,...)
     }
 
     if (level <= debug_level) {
+#ifdef SEND_DMSG_TO_FILE
+       if (!trace_fd) {
+          bsnprintf(buf, sizeof(buf), "%s/bacula.trace", working_directory);
+          trace_fd = fopen(buf, "a+");
+         if (!trace_fd) {
+             Emsg2(M_ABORT, 0, _("Cannot open %s: ERR=%s\n"),
+                 buf, strerror(errno));
+         }
+       }
+#endif
 #ifdef FULL_LOCATION
        if (details) {
-          sprintf(buf, "%s: %s:%d ", my_name, file, line);
-         i = strlen(buf);
+          len = sprintf(buf, "%s: %s:%d ", my_name, file, line);
        } else {
-         i = 0;
+         len = 0;
        }
 #else
-       i = 0;
+       len = 0;
 #endif
        va_start(arg_ptr, fmt);
-       bvsnprintf(buf+i, sizeof(buf)-i, (char *)fmt, arg_ptr);
+       bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
        va_end(arg_ptr);
 
-       fprintf(stdout, "%s", buf);
+#ifdef SEND_DMSG_TO_FILE
+       fputs(buf, trace_fd);
+       fflush(trace_fd);
+#else
+       fputs(buf, stdout);
+#endif
+    }
+}
+
+
+/*********************************************************************
+ *
+ *  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 
+p_msg(char *file, int line, int level, char *fmt,...)
+{
+    char      buf[5000];
+    int       len;
+    va_list   arg_ptr;
+
+#ifdef FULL_LOCATION
+    if (level >= 0) {
+       len = sprintf(buf, "%s: %s:%d ", my_name, file, line);
+    } else {
+       len = 0;
     }
+#else
+    len = 0;
+#endif
+    va_start(arg_ptr, fmt);
+    bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
+    va_end(arg_ptr);
+    fputs(buf, stdout);
 }
 
 
+/*********************************************************************
+ *
+ *  subroutine writes a debug message to the trace file if the level number
+ *  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 
+t_msg(char *file, int line, int level, char *fmt,...)
+{
+    char      buf[5000];
+    int       len;
+    va_list   arg_ptr;
+    int       details = TRUE;
+
+    if (level < 0) {
+       details = FALSE;
+       level = -level;
+    }
+
+    if (level <= debug_level) {
+       if (!trace_fd) {
+          bsnprintf(buf, sizeof(buf), "%s/bacula.trace", working_directory);
+          trace_fd = fopen(buf, "a+");
+         if (!trace_fd) {
+             Emsg2(M_ABORT, 0, _("Cannot open %s: ERR=%s\n"),
+                 buf, strerror(errno));
+         }
+       }
+    
+#ifdef FULL_LOCATION
+       if (details) {
+          len = sprintf(buf, "%s: %s:%d ", my_name, file, line);
+       } else {
+         len = 0;
+       }
+#else
+       len = 0;
+#endif
+       va_start(arg_ptr, fmt);
+       bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
+       va_end(arg_ptr);
+
+       fputs(buf, trace_fd);
+       fflush(trace_fd);
+    }
+}
+
+
+
 /* *********************************************************
  *
  * print an error message
@@ -713,49 +859,49 @@ d_msg(char *file, int line, int level, char *fmt,...)
 void 
 e_msg(char *file, int line, int type, int level, char *fmt,...)
 {
-    char     buf[2000];
+    char     buf[5000];
     va_list   arg_ptr;
-    int i;
+    int len;
 
     /* 
      * 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) && 
-                        !bit_is_set(type, daemon_msgs->send_msg)))
+                        !bit_is_set(type, daemon_msgs->send_msg))) {
        return;                       /* no destination */
+    }
     switch (type) {
        case M_ABORT:
-          sprintf(buf, "%s: ABORTING due to ERROR in %s:%d\n", 
+          len = sprintf(buf, "%s: ABORTING due to ERROR in %s:%d\n", 
                  my_name, file, line);
          break;
        case M_ERROR_TERM:
-          sprintf(buf, "%s: ERROR TERMINATION at %s:%d\n", 
+          len = sprintf(buf, "%s: ERROR TERMINATION at %s:%d\n", 
                  my_name, file, line);
          break;
        case M_FATAL:
          if (level == -1)            /* skip details */
-             sprintf(buf, "%s: Fatal Error because: ", my_name);
+             len = sprintf(buf, "%s: Fatal Error because: ", my_name);
          else
-             sprintf(buf, "%s: Fatal Error at %s:%d because:\n", my_name, file, line);
+             len = sprintf(buf, "%s: Fatal Error at %s:%d because:\n", my_name, file, line);
          break;
        case M_ERROR:
          if (level == -1)            /* skip details */
-             sprintf(buf, "%s: Error: ", my_name);
+             len = sprintf(buf, "%s: Error: ", my_name);
          else
-             sprintf(buf, "%s: Error in %s:%d ", my_name, file, line);
+             len = sprintf(buf, "%s: Error in %s:%d ", my_name, file, line);
          break;
        case M_WARNING:
-          sprintf(buf, "%s: Warning: ", my_name);
+          len = sprintf(buf, "%s: Warning: ", my_name);
          break;
        default:
-          sprintf(buf, "%s: ", my_name);
+          len = sprintf(buf, "%s: ", my_name);
          break;
     }
 
-    i = strlen(buf);
     va_start(arg_ptr, fmt);
-    bvsnprintf(buf+i, sizeof(buf)-i, (char *)fmt, arg_ptr);
+    bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
     va_end(arg_ptr);
 
     dispatch_message(NULL, type, level, buf);
@@ -775,18 +921,30 @@ e_msg(char *file, int line, int type, int level, char *fmt,...)
  *
  */
 void 
-Jmsg(void *vjcr, int type, int level, char *fmt,...)
+Jmsg(JCR *jcr, int type, int level, char *fmt,...)
 {
     char     rbuf[5000];
-    char     *buf;
     va_list   arg_ptr;
-    int i, len;
-    JCR *jcr = (JCR *)vjcr;
+    int len;
     MSGS *msgs;
     char *job;
 
     
-    Dmsg1(200, "Enter Jmsg type=%d\n", type);
+    Dmsg1(800, "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.  
+     */
+    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), 
+                               fmt, arg_ptr);
+       va_end(arg_ptr);
+       bnet_send(jcr->dir_bsock);
+       return;
+    }
 
     msgs = NULL;
     job = NULL;
@@ -795,57 +953,53 @@ Jmsg(void *vjcr, int type, int level, char *fmt,...)
        job = jcr->Job;
     } 
     if (!msgs) {
-       msgs = daemon_msgs;
+       msgs = daemon_msgs;           /* if no jcr, we use daemon handler */
     }
     if (!job) {
-       job = "";
+       job = "";                      /* Set null job name if none */
     }
 
-    buf = rbuf;                   /* we are the Director */
     /* 
      * Check if we have a message destination defined. 
      * We always report M_ABORT and M_ERROR_TERM 
      */
-    if ((type != M_ABORT && type != M_ERROR_TERM) && msgs && !bit_is_set(type, msgs->send_msg)) {
-       Dmsg1(200, "No bit set for type %d\n", type);
+    if (msgs && (type != M_ABORT && type != M_ERROR_TERM) &&
+        !bit_is_set(type, msgs->send_msg)) {
        return;                       /* no destination */
     }
     switch (type) {
-       case M_ABORT:
-          sprintf(buf, "%s ABORTING due to ERROR\n", my_name);
-         break;
-       case M_ERROR_TERM:
-          sprintf(buf, "%s ERROR TERMINATION\n", my_name);
-         break;
-       case M_FATAL:
-          sprintf(buf, "%s: %s Fatal error: ", my_name, job);
-         if (jcr) {
-            jcr->JobStatus = JS_FatalError;
-         }
-         break;
-       case M_ERROR:
-          sprintf(buf, "%s: %s Error: ", my_name, job);
-         if (jcr) {
-            jcr->Errors++;
-         }
-         break;
-       case M_WARNING:
-          sprintf(buf, "%s: %s Warning: ", my_name, job);
-         break;
-       default:
-          sprintf(buf, "%s: ", my_name);
-         break;
+    case M_ABORT:
+       len = sprintf(rbuf, "%s ABORTING due to ERROR\n", my_name);
+       break;
+    case M_ERROR_TERM:
+       len = sprintf(rbuf, "%s ERROR TERMINATION\n", my_name);
+       break;
+    case M_FATAL:
+       len = sprintf(rbuf, "%s: %s Fatal error: ", my_name, job);
+       if (jcr) {
+         set_jcr_job_status(jcr, JS_FatalError);
+       }
+       break;
+    case M_ERROR:
+       len = sprintf(rbuf, "%s: %s Error: ", my_name, job);
+       if (jcr) {
+         jcr->Errors++;
+       }
+       break;
+    case M_WARNING:
+       len = sprintf(rbuf, "%s: %s Warning: ", my_name, job);
+       break;
+    default:
+       len = sprintf(rbuf, "%s: ", my_name);
+       break;
     }
 
-    i = strlen(buf);
     va_start(arg_ptr, fmt);
-    len = bvsnprintf(buf+i, sizeof(rbuf)-i, fmt, arg_ptr);
+    bvsnprintf(rbuf+len,  sizeof(rbuf)-len, fmt, arg_ptr);
     va_end(arg_ptr);
 
     dispatch_message(jcr, type, level, rbuf);
 
-    Dmsg3(500, "i=%d sizeof(rbuf)-i=%d len=%d\n", i, sizeof(rbuf)-i, len);
-
     if (type == M_ABORT){
        char *p = 0;
        p[0] = 0;                     /* generate segmentation violation */
@@ -863,8 +1017,7 @@ int m_msg(char *file, int line, POOLMEM **pool_buf, char *fmt, ...)
    va_list   arg_ptr;
    int i, len, maxlen;
 
-   sprintf(*pool_buf, "%s:%d ", file, line);
-   i = strlen(*pool_buf);
+   i = sprintf(mp_chr(*pool_buf), "%s:%d ", file, line);
 
 again:
    maxlen = sizeof_pool_memory(*pool_buf) - i - 1; 
@@ -872,7 +1025,7 @@ again:
    len = bvsnprintf(*pool_buf+i, maxlen, fmt, arg_ptr);
    va_end(arg_ptr);
    if (len < 0 || len >= maxlen) {
-      *pool_buf = realloc_pool_memory(*pool_buf, maxlen + i + 200);
+      *pool_buf = realloc_pool_memory(*pool_buf, maxlen + i + maxlen/2);
       goto again;
    }
    return len;
@@ -893,7 +1046,7 @@ again:
    len = bvsnprintf(*pool_buf, maxlen, fmt, arg_ptr);
    va_end(arg_ptr);
    if (len < 0 || len >= maxlen) {
-      *pool_buf = realloc_pool_memory(*pool_buf, maxlen + 200);
+      *pool_buf = realloc_pool_memory(*pool_buf, maxlen + maxlen/2);
       goto again;
    }
    return len;
@@ -904,7 +1057,7 @@ again:
  * If we come here, prefix the message with the file:line-number,
  *  then pass it on to the normal Jmsg routine.
  */
-void j_msg(char *file, int line, void *jcr, int type, int level, char *fmt,...)
+void j_msg(char *file, int line, JCR *jcr, int type, int level, char *fmt,...)
 {
    va_list   arg_ptr;
    int i, len, maxlen;
@@ -919,10 +1072,10 @@ again:
    len = bvsnprintf(pool_buf+i, maxlen, fmt, arg_ptr);
    va_end(arg_ptr);
    if (len < 0 || len >= maxlen) {
-      pool_buf = realloc_pool_memory(pool_buf, maxlen + i + 200);
+      pool_buf = realloc_pool_memory(pool_buf, maxlen + i + maxlen/2);
       goto again;
    }
 
-   Jmsg(jcr, type, level, pool_buf);
+   Jmsg(jcr, type, level, "%s", pool_buf);
    free_memory(pool_buf);
 }