*/
/*
- 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;
-
-#ifdef TRACE_FILE
+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 */
* 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;
+
+ /*
+ * 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++) {
/*
* 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));
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;
{
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"),
}
}
-
-
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);
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
*/
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;
}
* 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;
if (jcr == NULL) { /* NULL -> global chain */
msgs = daemon_msgs;
- daemon_msgs = NULL;
} else {
msgs = jcr->jcr_msgs;
jcr->jcr_msgs = NULL;
}
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));
}
/*
*/
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);
}
}
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");
}
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");
}
{
DEST *d, *old;
+ /* Walk down the message chain releasing allocated buffers */
for (d=msgs->dest_chain; d; ) {
if (d->where) {
free(d->where);
free(old); /* free the destination item */
}
msgs->dest_chain = NULL;
- free(msgs);
+ free(msgs); /* free the head */
}
{
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);
/*
* 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 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) {
fputs(msg, stdout); /* print this here to INSURE that it is printed */
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 */
}
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;
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));
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) {
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) {
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),
}
break;
case MD_STDOUT:
- Dmsg1(400, "STDOUT for following msg: %s", msg);
- if (type != M_ABORT && type != M_ERROR_TERM) /* already printed */
+ 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);
+ Dmsg1(800, "STDERR for following msg: %s", msg);
fputs(msg, stderr);
break;
default:
/*********************************************************************
*
- * 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.
d_msg(char *file, int line, int level, char *fmt,...)
{
char buf[5000];
- int i;
+ int len;
va_list arg_ptr;
int details = TRUE;
}
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) {
- i= sprintf(buf, "%s: %s:%d ", my_name, file, line);
+ 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);
+#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
t_msg(char *file, int line, int level, char *fmt,...)
{
char buf[5000];
- int i;
+ int len;
va_list arg_ptr;
int details = TRUE;
- return;
-
if (level < 0) {
details = FALSE;
level = -level;
if (level <= debug_level) {
if (!trace_fd) {
- trace_fd = fopen("bacula.trace", "a+");
+ bsnprintf(buf, sizeof(buf), "%s/bacula.trace", working_directory);
+ trace_fd = fopen(buf, "a+");
if (!trace_fd) {
- Emsg1(M_ABORT, 0, _("Cannot open bacula.trace: ERR=%s\n"),
- strerror(errno));
+ Emsg2(M_ABORT, 0, _("Cannot open %s: ERR=%s\n"),
+ buf, strerror(errno));
}
}
#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);
fputs(buf, trace_fd);
{
char buf[5000];
va_list arg_ptr;
- int i;
+ int len;
/*
* Check if we have a message destination defined.
}
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);
*
*/
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;
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
*/
-
-/*
- * Tmsg5(000, "jcr=%x msgs=%x type=%d send_msg=%x *msg=%x\n",
- * jcr, msgs, type, msgs->send_msg, (int)msgs->send_msg[0]);
- */
- /* There is an apparent compiler bug with the following if
- * statement, so the set_jcr... is simply a noop to reload
- * registers.
- */
- set_jcr_job_status(jcr, jcr->JobStatus);
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 */
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;
* 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;
goto again;
}
- Jmsg(jcr, type, level, pool_buf);
+ Jmsg(jcr, type, level, "%s", pool_buf);
free_memory(pool_buf);
}