2 * Bacula message handling routines
4 * Kern Sibbald, April 2000
11 Copyright (C) 2000-2003 Kern Sibbald and John Walker
13 This program is free software; you can redistribute it and/or
14 modify it under the terms of the GNU General Public License as
15 published by the Free Software Foundation; either version 2 of
16 the License, or (at your option) any later version.
18 This program is distributed in the hope that it will be useful,
19 but WITHOUT ANY WARRANTY; without even the implied warranty of
20 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
21 General Public License for more details.
23 You should have received a copy of the GNU General Public
24 License along with this program; if not, write to the Free
25 Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
34 #define FULL_LOCATION 1 /* set for file:line in Debug messages */
37 * This is where we define "Globals" because all the
38 * daemons include this file.
40 char *working_directory = NULL; /* working directory path stored here */
41 int verbose = 0; /* increase User messages */
42 int debug_level = 0; /* debug level */
43 time_t daemon_start_time = 0; /* Daemon start time */
44 const char *version = VERSION " (" BDATE ")";
45 char my_name[30]; /* daemon name is stored here */
46 char *exepath = (char *)NULL;
47 char *exename = (char *)NULL;
48 int console_msg_pending = 0;
49 char con_fname[500]; /* Console filename */
50 FILE *con_fd = NULL; /* Console file descriptor */
51 brwlock_t con_lock; /* Console lock structure */
52 FILE *trace_fd = NULL;
54 #ifdef HAVE_POSTGRESQL
55 char catalog_db[] = "PostgreSQL";
58 char catalog_db[] = "MySQL";
61 char catalog_db[] = "SQLite";
63 char catalog_db[] = "Internal";
68 const char *host_os = HOST_OS;
69 const char *distname = DISTNAME;
70 const char *distver = DISTVER;
72 /* Forward referenced functions */
74 /* Imported functions */
79 static MSGS *daemon_msgs; /* global messages */
82 * Set daemon name. Also, find canonical execution
83 * path. Note, exepath has spare room for tacking on
84 * the exename so that we can reconstruct the full name.
86 * Note, this routine can get called multiple times
87 * The second time is to put the name as found in the
88 * Resource record. On the second call, generally,
89 * argv is NULL to avoid doing the path code twice.
91 #define BTRACE_EXTRA 20
92 void my_name_is(int argc, char *argv[], const char *name)
95 char cpath[400], npath[400];
98 bstrncpy(my_name, name, sizeof(my_name));
99 if (argc>0 && argv && argv[0]) {
100 /* strip trailing filename and save exepath */
101 for (l=p=argv[0]; *p; p++) {
103 l = p; /* set pos of last slash */
110 #if defined(HAVE_CYGWIN) || defined(HAVE_WIN32)
111 /* On Windows allow c: junk */
121 exename = (char *)malloc(len);
127 exepath = (char *)malloc(strlen(argv[0]) + 1 + len);
128 for (p=argv[0],q=exepath; p < l; ) {
132 Dmsg1(200, "exepath=%s\n", exepath);
133 if (strchr(exepath, '.') || exepath[0] != '/') {
135 if (getcwd(cpath, sizeof(cpath))) {
136 if (chdir(exepath) == 0) {
137 if (!getcwd(npath, sizeof(npath))) {
144 exepath = (char *)malloc(strlen(npath) + 1 + len);
145 strcpy(exepath, npath);
148 Dmsg1(200, "Normalized exepath=%s\n", exepath);
154 * Initialize message handler for a daemon or a Job
155 * We make a copy of the MSGS resource passed, so it belows
156 * to the job or daemon and thus can be modified.
158 * NULL for jcr -> initialize global messages for daemon
159 * non-NULL -> initialize jcr using Message resource
162 init_msg(JCR *jcr, MSGS *msg)
164 DEST *d, *dnew, *temp_chain = NULL;
167 if (jcr == NULL && msg == NULL) {
168 init_last_jobs_list();
173 * Make sure we have fd's 0, 1, 2 open
174 * If we don't do this one of our sockets may open
175 * there and if we then use stdout, it could
176 * send total garbage to our socket.
180 fd = open("/dev/null", O_RDONLY, 0644);
184 for(i=1; fd + i <= 2; i++) {
191 * If msg is NULL, initialize global chain for STDOUT and syslog
194 daemon_msgs = (MSGS *)malloc(sizeof(MSGS));
195 memset(daemon_msgs, 0, sizeof(MSGS));
196 for (i=1; i<=M_MAX; i++) {
197 add_msg_dest(daemon_msgs, MD_STDOUT, i, NULL, NULL);
198 add_msg_dest(daemon_msgs, MD_SYSLOG, i, NULL, NULL);
200 Dmsg1(050, "Create daemon global message resource 0x%x\n", daemon_msgs);
205 * Walk down the message resource chain duplicating it
206 * for the current Job.
208 for (d=msg->dest_chain; d; d=d->next) {
209 dnew = (DEST *)malloc(sizeof(DEST));
210 memcpy(dnew, d, sizeof(DEST));
211 dnew->next = temp_chain;
213 dnew->mail_filename = NULL;
215 dnew->mail_cmd = bstrdup(d->mail_cmd);
218 dnew->where = bstrdup(d->where);
224 jcr->jcr_msgs = (MSGS *)malloc(sizeof(MSGS));
225 memset(jcr->jcr_msgs, 0, sizeof(MSGS));
226 jcr->jcr_msgs->dest_chain = temp_chain;
227 memcpy(jcr->jcr_msgs->send_msg, msg->send_msg, sizeof(msg->send_msg));
229 /* If we have default values, release them now */
231 free_msgs_res(daemon_msgs);
233 daemon_msgs = (MSGS *)malloc(sizeof(MSGS));
234 memset(daemon_msgs, 0, sizeof(MSGS));
235 daemon_msgs->dest_chain = temp_chain;
236 memcpy(daemon_msgs->send_msg, msg->send_msg, sizeof(msg->send_msg));
238 Dmsg2(050, "Copy message resource 0x%x to 0x%x\n", msg, temp_chain);
242 /* Initialize so that the console (User Agent) can
243 * receive messages -- stored in a file.
245 void init_console_msg(char *wd)
249 bsnprintf(con_fname, sizeof(con_fname), "%s/%s.conmsg", wd, my_name);
250 fd = open(con_fname, O_CREAT|O_RDWR|O_BINARY, 0600);
252 Emsg2(M_ERROR_TERM, 0, _("Could not open console message file %s: ERR=%s\n"),
253 con_fname, strerror(errno));
255 if (lseek(fd, 0, SEEK_END) > 0) {
256 console_msg_pending = 1;
259 con_fd = fopen(con_fname, "a+");
261 Emsg2(M_ERROR, 0, _("Could not open console message file %s: ERR=%s\n"),
262 con_fname, strerror(errno));
264 if (rwl_init(&con_lock) != 0) {
265 Emsg1(M_ERROR_TERM, 0, _("Could not get con mutex: ERR=%s\n"),
271 * Called only during parsing of the config file.
273 * Add a message destination. I.e. associate a message type with
274 * a destination (code).
275 * Note, where in the case of dest_code FILE is a filename,
276 * but in the case of MAIL is a space separated list of
277 * email addresses, ...
279 void add_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where, char *mail_cmd)
283 * First search the existing chain and see if we
284 * can simply add this msg_type to an existing entry.
286 for (d=msg->dest_chain; d; d=d->next) {
287 if (dest_code == d->dest_code && ((where == NULL && d->where == NULL) ||
288 (strcmp(where, d->where) == 0))) {
289 Dmsg4(200, "Add to existing d=%x msgtype=%d destcode=%d where=%s\n",
290 d, msg_type, dest_code, NPRT(where));
291 set_bit(msg_type, d->msg_types);
292 set_bit(msg_type, msg->send_msg); /* set msg_type bit in our local */
296 /* Not found, create a new entry */
297 d = (DEST *)malloc(sizeof(DEST));
298 memset(d, 0, sizeof(DEST));
299 d->next = msg->dest_chain;
300 d->dest_code = dest_code;
301 set_bit(msg_type, d->msg_types); /* set type bit in structure */
302 set_bit(msg_type, msg->send_msg); /* set type bit in our local */
304 d->where = bstrdup(where);
307 d->mail_cmd = bstrdup(mail_cmd);
309 Dmsg5(200, "add new d=%x msgtype=%d destcode=%d where=%s mailcmd=%s\n",
310 d, msg_type, dest_code, NPRT(where), NPRT(d->mail_cmd));
315 * Called only during parsing of the config file.
317 * Remove a message destination
319 void rem_msg_dest(MSGS *msg, int dest_code, int msg_type, char *where)
323 for (d=msg->dest_chain; d; d=d->next) {
324 Dmsg2(200, "Remove_msg_dest d=%x where=%s\n", d, NPRT(d->where));
325 if (bit_is_set(msg_type, d->msg_types) && (dest_code == d->dest_code) &&
326 ((where == NULL && d->where == NULL) ||
327 (strcmp(where, d->where) == 0))) {
328 Dmsg3(200, "Found for remove d=%x msgtype=%d destcode=%d\n",
329 d, msg_type, dest_code);
330 clear_bit(msg_type, d->msg_types);
331 Dmsg0(200, "Return rem_msg_dest\n");
337 static void make_unique_spool_filename(JCR *jcr, POOLMEM **name, int fd)
339 Mmsg(name, "%s/%s.spool.%s.%d", working_directory, my_name,
343 int open_spool_file(JCR *jcr, BSOCK *bs)
345 POOLMEM *name = get_pool_memory(PM_MESSAGE);
347 make_unique_spool_filename(jcr, &name, bs->fd);
348 bs->spool_fd = fopen(mp_chr(name), "w+");
350 Jmsg(jcr, M_ERROR, 0, "fopen spool file %s failed: ERR=%s\n", name, strerror(errno));
351 free_pool_memory(name);
354 free_pool_memory(name);
358 int close_spool_file(JCR *jcr, BSOCK *bs)
360 POOLMEM *name = get_pool_memory(PM_MESSAGE);
362 make_unique_spool_filename(jcr, &name, bs->fd);
363 fclose(bs->spool_fd);
364 unlink(mp_chr(name));
365 free_pool_memory(name);
372 * Create a unique filename for the mail command
374 static void make_unique_mail_filename(JCR *jcr, POOLMEM **name, DEST *d)
377 Mmsg(name, "%s/%s.mail.%s.%d", working_directory, my_name,
380 Mmsg(name, "%s/%s.mail.%s.%d", working_directory, my_name,
383 Dmsg1(200, "mailname=%s\n", *name);
389 static BPIPE *open_mail_pipe(JCR *jcr, POOLMEM **cmd, DEST *d)
393 if (d->mail_cmd && jcr) {
394 *cmd = edit_job_codes(jcr, *cmd, d->mail_cmd, d->where);
396 Mmsg(cmd, "mail -s \"Bacula Message\" %s", d->where);
400 if (!(bpipe = open_bpipe(*cmd, 120, "rw"))) {
401 Jmsg(jcr, M_ERROR, 0, "open mail pipe %s failed: ERR=%s\n",
402 *cmd, strerror(errno));
408 * Close the messages for this Messages resource, which means to close
409 * any open files, and dispatch any pending email messages.
411 void close_msg(JCR *jcr)
419 Dmsg1(050, "Close_msg jcr=0x%x\n", jcr);
421 if (jcr == NULL) { /* NULL -> global chain */
424 msgs = jcr->jcr_msgs;
425 jcr->jcr_msgs = NULL;
430 Dmsg1(150, "===Begin close msg resource at 0x%x\n", msgs);
431 cmd = get_pool_memory(PM_MESSAGE);
432 for (d=msgs->dest_chain; d; ) {
434 switch (d->dest_code) {
438 fclose(d->fd); /* close open file descriptor */
442 case MD_MAIL_ON_ERROR:
443 Dmsg0(150, "Got MD_MAIL or MD_MAIL_ON_ERROR\n");
447 if (d->dest_code == MD_MAIL_ON_ERROR && jcr &&
448 jcr->JobStatus == JS_Terminated) {
452 if (!(bpipe=open_mail_pipe(jcr, &cmd, d))) {
453 Pmsg0(000, "open mail pipe failed.\n");
456 Dmsg0(150, "Opened mail pipe\n");
458 line = get_memory(len);
460 while (fgets(mp_chr(line), len, d->fd)) {
461 fputs(line, bpipe->wfd);
463 if (!close_wpipe(bpipe)) { /* close write pipe sending mail */
464 Pmsg1(000, "close error: ERR=%s\n", strerror(errno));
468 * Since we are closing all messages, before "recursing"
469 * make sure we are not closing the daemon messages, otherwise
472 if (msgs != daemon_msgs) {
473 /* read what mail prog returned -- should be nothing */
474 while (fgets(mp_chr(line), len, bpipe->rfd)) {
475 Jmsg1(jcr, M_INFO, 0, _("Mail prog: %s"), line);
479 stat = close_bpipe(bpipe);
480 if (stat != 0 && msgs != daemon_msgs) {
481 Dmsg1(150, "Calling emsg. CMD=%s\n", cmd);
482 Jmsg3(jcr, M_ERROR, 0, _("Mail program terminated in error. stat=%d\n"
484 "ERR=%s\n"), stat, cmd, strerror(stat));
488 /* Remove temp file */
490 unlink(mp_chr(d->mail_filename));
491 free_pool_memory(d->mail_filename);
492 d->mail_filename = NULL;
493 Dmsg0(150, "end mail or mail on error\n");
500 d = d->next; /* point to next buffer */
502 free_pool_memory(cmd);
503 Dmsg0(150, "Done walking message chain.\n");
508 Dmsg0(150, "===End close msg resource\n");
512 * Free memory associated with Messages resource
514 void free_msgs_res(MSGS *msgs)
518 /* Walk down the message chain releasing allocated buffers */
519 for (d=msgs->dest_chain; d; ) {
526 old = d; /* save pointer to release */
527 d = d->next; /* point to next buffer */
528 free(old); /* free the destination item */
530 msgs->dest_chain = NULL;
531 free(msgs); /* free the head */
536 * Terminate the message handler for good.
537 * Release the global destination chain.
539 * Also, clean up a few other items (cons, exepath). Note,
540 * these really should be done elsewhere.
544 Dmsg0(100, "Enter term_msg\n");
545 close_msg(NULL); /* close global chain */
546 free_msgs_res(daemon_msgs); /* free the resources */
565 term_last_jobs_list();
571 * Handle sending the message to the appropriate place
573 void dispatch_message(JCR *jcr, int type, int level, char *msg)
576 char dt[MAX_TIME_LENGTH];
582 Dmsg2(800, "Enter dispatch_msg type=%d msg=%s\n", type, msg);
584 if (type == M_ABORT || type == M_ERROR_TERM) {
585 fputs(msg, stdout); /* print this here to INSURE that it is printed */
588 /* Now figure out where to send the message */
591 msgs = jcr->jcr_msgs;
596 for (d=msgs->dest_chain; d; d=d->next) {
597 if (bit_is_set(type, d->msg_types)) {
598 switch (d->dest_code) {
600 Dmsg1(800, "CONSOLE for following msg: %s", msg);
602 con_fd = fopen(con_fname, "a+");
603 Dmsg0(800, "Console file not open.\n");
606 Pw(con_lock); /* get write lock on console message file */
608 bstrftime(dt, sizeof(dt), time(NULL));
611 fwrite(dt, len, 1, con_fd);
614 fwrite(msg, len, 1, con_fd);
615 if (msg[len-1] != '\n') {
616 fwrite("\n", 2, 1, con_fd);
619 fwrite("\n", 2, 1, con_fd);
622 console_msg_pending = TRUE;
627 Dmsg1(800, "SYSLOG for collowing msg: %s\n", msg);
629 * We really should do an openlog() here.
631 syslog(LOG_DAEMON|LOG_ERR, "%s", msg);
634 Dmsg1(800, "OPERATOR for collowing msg: %s\n", msg);
635 mcmd = get_pool_memory(PM_MESSAGE);
636 if ((bpipe=open_mail_pipe(jcr, &mcmd, d))) {
638 fputs(msg, bpipe->wfd);
639 /* Messages to the operator go one at a time */
640 stat = close_bpipe(bpipe);
642 Jmsg2(jcr, M_ERROR, 0, _("Operator mail program terminated in error.\n"
644 "ERR=%s\n"), mcmd, strerror(stat));
647 free_pool_memory(mcmd);
650 case MD_MAIL_ON_ERROR:
651 Dmsg1(800, "MAIL for following msg: %s", msg);
653 POOLMEM *name = get_pool_memory(PM_MESSAGE);
654 make_unique_mail_filename(jcr, &mp_chr(name), d);
655 d->fd = fopen(mp_chr(name), "w+");
658 Jmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", name, strerror(errno));
660 free_pool_memory(name);
663 d->mail_filename = name;
666 if (len > d->max_len) {
667 d->max_len = len; /* keep max line length */
672 Dmsg1(800, "FILE for following msg: %s", msg);
674 d->fd = fopen(d->where, "w+");
677 Jmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", d->where, strerror(errno));
685 Dmsg1(800, "APPEND for following msg: %s", msg);
687 d->fd = fopen(d->where, "a");
690 Jmsg2(jcr, M_ERROR, 0, "fopen %s failed: ERR=%s\n", d->where, strerror(errno));
698 Dmsg1(800, "DIRECTOR for following msg: %s", msg);
699 if (jcr && jcr->dir_bsock && !jcr->dir_bsock->errors) {
700 bnet_fsend(jcr->dir_bsock, "Jmsg Job=%s type=%d level=%d %s",
701 jcr->Job, type, level, msg);
705 Dmsg1(800, "STDOUT for following msg: %s", msg);
706 if (type != M_ABORT && type != M_ERROR_TERM) { /* already printed */
711 Dmsg1(800, "STDERR for following msg: %s", msg);
722 /*********************************************************************
724 * This subroutine prints a debug message if the level number
725 * is less than or equal the debug_level. File and line numbers
726 * are included for more detail if desired, but not currently
729 * If the level is negative, the details of file and line number
733 d_msg(const char *file, int line, int level, const char *fmt,...)
745 if (level <= debug_level) {
747 #define SEND_DMSG_TO_FILE
749 #ifdef SEND_DMSG_TO_FILE
751 bsnprintf(buf, sizeof(buf), "%s/bacula.trace", working_directory ? working_directory : ".");
752 trace_fd = fopen(buf, "a+");
757 /* visual studio passes the whole path to the file as well
758 * which makes for very long lines
760 char *f = strrchr(file, '\\');
762 len = bsnprintf(buf, sizeof(buf), "%s: %s:%d ", my_name, file, line);
769 va_start(arg_ptr, fmt);
770 bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
773 #ifdef SEND_DMSG_TO_FILE
775 fputs(buf, trace_fd);
785 /*********************************************************************
787 * This subroutine prints a message regardless of the debug level
789 * If the level is negative, the details of file and line number
793 p_msg(const char *file, int line, int level, const char *fmt,...)
801 len = bsnprintf(buf, sizeof(buf), "%s: %s:%d ", my_name, file, line);
808 va_start(arg_ptr, fmt);
809 bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
815 /*********************************************************************
817 * subroutine writes a debug message to the trace file if the level number
818 * is less than or equal the debug_level. File and line numbers
819 * are included for more detail if desired, but not currently
822 * If the level is negative, the details of file and line number
826 t_msg(const char *file, int line, int level, const char *fmt,...)
838 if (level <= debug_level) {
840 bsnprintf(buf, sizeof(buf), "%s/bacula.trace", working_directory);
841 trace_fd = fopen(buf, "a+");
846 len = bsnprintf(buf, sizeof(buf), "%s: %s:%d ", my_name, file, line);
853 va_start(arg_ptr, fmt);
854 bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
856 if (trace_fd != NULL) {
857 fputs(buf, trace_fd);
865 /* *********************************************************
867 * print an error message
871 e_msg(const char *file, int line, int type, int level, const char *fmt,...)
878 * Check if we have a message destination defined.
879 * We always report M_ABORT and M_ERROR_TERM
881 if (!daemon_msgs || ((type != M_ABORT && type != M_ERROR_TERM) &&
882 !bit_is_set(type, daemon_msgs->send_msg))) {
883 return; /* no destination */
887 len = bsnprintf(buf, sizeof(buf), "%s: ABORTING due to ERROR in %s:%d\n",
888 my_name, file, line);
891 len = bsnprintf(buf, sizeof(buf), "%s: ERROR TERMINATION at %s:%d\n",
892 my_name, file, line);
895 if (level == -1) /* skip details */
896 len = bsnprintf(buf, sizeof(buf), "%s: Fatal Error because: ", my_name);
898 len = bsnprintf(buf, sizeof(buf), "%s: Fatal Error at %s:%d because:\n", my_name, file, line);
901 if (level == -1) /* skip details */
902 len = bsnprintf(buf, sizeof(buf), "%s: Error: ", my_name);
904 len = bsnprintf(buf, sizeof(buf), "%s: Error in %s:%d ", my_name, file, line);
907 len = bsnprintf(buf, sizeof(buf), "%s: Warning: ", my_name);
910 len = bsnprintf(buf, sizeof(buf), "%s: Security violation: ", my_name);
913 len = bsnprintf(buf, sizeof(buf), "%s: ", my_name);
917 va_start(arg_ptr, fmt);
918 bvsnprintf(buf+len, sizeof(buf)-len, (char *)fmt, arg_ptr);
921 dispatch_message(NULL, type, level, buf);
923 if (type == M_ABORT) {
925 p[0] = 0; /* generate segmentation violation */
927 if (type == M_ERROR_TERM) {
932 /* *********************************************************
934 * Generate a Job message
938 Jmsg(JCR *jcr, int type, int level, const char *fmt,...)
947 Dmsg1(800, "Enter Jmsg type=%d\n", type);
949 /* Special case for the console, which has a dir_bsock and JobId==0,
950 * in that case, we send the message directly back to the
953 if (jcr && jcr->JobId == 0 && jcr->dir_bsock) {
954 BSOCK *dir = jcr->dir_bsock;
955 va_start(arg_ptr, fmt);
956 dir->msglen = bvsnprintf(mp_chr(dir->msg), sizeof_pool_memory(dir->msg),
959 bnet_send(jcr->dir_bsock);
966 msgs = jcr->jcr_msgs;
970 msgs = daemon_msgs; /* if no jcr, we use daemon handler */
973 job = ""; /* Set null job name if none */
977 * Check if we have a message destination defined.
978 * We always report M_ABORT and M_ERROR_TERM
980 if (msgs && (type != M_ABORT && type != M_ERROR_TERM) &&
981 !bit_is_set(type, msgs->send_msg)) {
982 return; /* no destination */
986 len = bsnprintf(rbuf, sizeof(rbuf), "%s ABORTING due to ERROR\n", my_name);
989 len = bsnprintf(rbuf, sizeof(rbuf), "%s ERROR TERMINATION\n", my_name);
992 len = bsnprintf(rbuf, sizeof(rbuf), "%s: %s Fatal error: ", my_name, job);
994 set_jcr_job_status(jcr, JS_FatalError);
998 len = bsnprintf(rbuf, sizeof(rbuf), "%s: %s Error: ", my_name, job);
1004 len = bsnprintf(rbuf, sizeof(rbuf), "%s: %s Warning: ", my_name, job);
1007 len = bsnprintf(rbuf, sizeof(rbuf), "%s: %s Security violation: ", my_name, job);
1010 len = bsnprintf(rbuf, sizeof(rbuf), "%s: ", my_name);
1014 va_start(arg_ptr, fmt);
1015 bvsnprintf(rbuf+len, sizeof(rbuf)-len, fmt, arg_ptr);
1018 dispatch_message(jcr, type, level, rbuf);
1020 if (type == M_ABORT){
1022 p[0] = 0; /* generate segmentation violation */
1024 if (type == M_ERROR_TERM) {
1030 * If we come here, prefix the message with the file:line-number,
1031 * then pass it on to the normal Jmsg routine.
1033 void j_msg(const char *file, int line, JCR *jcr, int type, int level, const char *fmt,...)
1039 pool_buf = get_pool_memory(PM_EMSG);
1040 i = Mmsg(&pool_buf, "%s:%d ", file, line);
1043 maxlen = sizeof_pool_memory(pool_buf) - i - 1;
1044 va_start(arg_ptr, fmt);
1045 len = bvsnprintf(pool_buf+i, maxlen, fmt, arg_ptr);
1047 if (len < 0 || len >= maxlen) {
1048 pool_buf = realloc_pool_memory(pool_buf, maxlen + i + maxlen/2);
1052 Jmsg(jcr, type, level, "%s", pool_buf);
1053 free_memory(pool_buf);
1058 * Edit a message into a Pool memory buffer, with file:lineno
1060 int m_msg(const char *file, int line, POOLMEM **pool_buf, const char *fmt, ...)
1065 i = sprintf(mp_chr(*pool_buf), "%s:%d ", file, line);
1068 maxlen = sizeof_pool_memory(*pool_buf) - i - 1;
1069 va_start(arg_ptr, fmt);
1070 len = bvsnprintf(*pool_buf+i, maxlen, fmt, arg_ptr);
1072 if (len < 0 || len >= maxlen) {
1073 *pool_buf = realloc_pool_memory(*pool_buf, maxlen + i + maxlen/2);
1080 * Edit a message into a Pool Memory buffer NO file:lineno
1081 * Returns: string length of what was edited.
1083 int Mmsg(POOLMEM **pool_buf, const char *fmt, ...)
1089 maxlen = sizeof_pool_memory(*pool_buf) - 1;
1090 va_start(arg_ptr, fmt);
1091 len = bvsnprintf(*pool_buf, maxlen, fmt, arg_ptr);
1093 if (len < 0 || len >= maxlen) {
1094 *pool_buf = realloc_pool_memory(*pool_buf, maxlen + maxlen/2);
1100 static pthread_mutex_t msg_queue_mutex = PTHREAD_MUTEX_INITIALIZER;
1103 * We queue messages rather than print them directly. This
1104 * is generally used in low level routines (msg handler, bnet)
1105 * to prevent recursion.
1107 void Qmsg(JCR *jcr, int type, int level, const char *fmt,...)
1114 if (jcr->dequeuing) { /* do not allow recursion */
1117 pool_buf = get_pool_memory(PM_EMSG);
1120 maxlen = sizeof_pool_memory(pool_buf) - 1;
1121 va_start(arg_ptr, fmt);
1122 len = bvsnprintf(pool_buf, maxlen, fmt, arg_ptr);
1124 if (len < 0 || len >= maxlen) {
1125 pool_buf = realloc_pool_memory(pool_buf, maxlen + maxlen/2);
1129 item = (MQUEUE_ITEM *)malloc(sizeof(MQUEUE_ITEM) + strlen(pool_buf) + 1);
1131 item->level = level;
1132 strcpy(item->msg, pool_buf);
1133 jcr->msg_queue->append(item);
1135 free_memory(pool_buf);
1141 void dequeue_messages(JCR *jcr)
1145 jcr->dequeuing = true;
1146 foreach_dlist(item, jcr->msg_queue) {
1147 Jmsg(jcr, item->type, item->level, "%s", item->msg);
1149 jcr->msg_queue->destroy();
1150 jcr->dequeuing = false;
1156 * If we come here, prefix the message with the file:line-number,
1157 * then pass it on to the normal Qmsg routine.
1159 void q_msg(const char *file, int line, JCR *jcr, int type, int level, const char *fmt,...)
1165 pool_buf = get_pool_memory(PM_EMSG);
1166 i = Mmsg(&pool_buf, "%s:%d ", file, line);
1169 maxlen = sizeof_pool_memory(pool_buf) - i - 1;
1170 va_start(arg_ptr, fmt);
1171 len = bvsnprintf(pool_buf+i, maxlen, fmt, arg_ptr);
1173 if (len < 0 || len >= maxlen) {
1174 pool_buf = realloc_pool_memory(pool_buf, maxlen + i + maxlen/2);
1178 Qmsg(jcr, type, level, "%s", pool_buf);
1179 free_memory(pool_buf);