int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
char *critconfig = NULL;
char *hffile = "critical";
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (strcmp(argv[argi], "--tooltips") == 0) {
usetooltips = 1;
}
else if (argnmatch(argv[argi], "--acklevel=")) {
char *p = strchr(argv[argi], '=');
critacklevel = atoi(p+1);
}
else if (argnmatch(argv[argi], "--config=")) {
char *p = strchr(argv[argi], '=');
critconfig = strdup(p+1);
}
else if (argnmatch(argv[argi], "--hffile=")) {
char *p = strchr(argv[argi], '=');
hffile = strdup(p+1);
}
}
redirect_cgilog("criticalview");
setdocurl(hostsvcurl("%s", xgetenv("INFOCOLUMN"), 1));
parse_query();
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
load_critconfig(critconfig);
load_all_links();
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
if (loadstatus(maxprio, maxage, mincolor, wantacked) == 0) {
use_recentgifs = 1;
generate_critpage(stdout, hffile);
}
else {
fprintf(stdout, "Cannot load Xymon status\n");
}
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
}
redirect_cgilog("hobbit-notifylog");
load_hostnames(xgetenv("BBHOSTS"), NULL, get_fqdn());
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
cgidata = cgi_request();
if (cgidata == NULL) {
/* Present the query form */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
showform(stdout, "notify", "notify_form", COL_BLUE, getcurrenttime(NULL), NULL, NULL);
return 0;
}
parse_query();
/* Now generate the webpage */
headfoot(stdout, "notify", "", "header", COL_GREEN);
fprintf(stdout, "<center>\n");
do_notifylog(stdout, maxcount, maxminutes, fromtime, totime,
pageregex, expageregex,
hostregex, exhostregex,
testregex, extestregex,
rcptregex, exrcptregex);
fprintf(stdout, "</center>\n");
headfoot(stdout, "notify", "", "footer", COL_GREEN);
return 0;
}
static LOCALE_HEADER *lookup(char *p, int __category)
{
int size ;
unsigned char *data;
LOCALE_HEADER **head ;
int i;
if (!strcmp(p,"C"))
return &_C_locale_data;
if (!(data = loadenv()))
return 0;
size = *((int *)data)++ ;
head = data ;
for (i=0; i < size; i++,head++) {
if (!strcmp((*head)->qual_name,p) || !strcmp((*head)->unqual_name,p))
return *head ;
}
return 0;
}
int standardoption(char *opt)
{
if (!opt) return 0;
if (strcmp(opt, "--debug") == 0) {
debug = 1;
}
else if (strcmp(opt, "--no-update") == 0) {
dontsendmessages = 1;
}
else if (strcmp(opt, "--no-update-brief") == 0) {
dontsendmessages = 2;
}
else if (argnmatch(opt, "--env=")) {
char *p = strchr(opt, '=');
loadenv(p+1, envarea);
}
else if (argnmatch(opt, "--area=")) {
char *p = strchr(opt, '=');
envarea = strdup(p+1);
}
else if (argnmatch(opt, "--hosts=")) {
char *p = strchr(opt, '=');
hostsfn = strdup(p+1);
}
else if (argnmatch(opt, "--log=") || argnmatch(opt, "--logfile=")) {
char *p = strchr(opt, '=');
logfn = strdup(p+1);
}
else if (argnmatch(opt, "--pidfile=") || argnmatch(opt, "--pid=")) {
char *p = strchr(opt, '=');
pidfn = strdup(p+1);
}
else if ((strcmp(opt, "--version") == 0) || (strcmp(opt, "--help") == 0) || (strcmp(opt, "-?") == 0)) {
fprintf(stderr, "%s %s\n", programname, VERSION);
showhelp = 1;
}
else {
return 0;
}
return 1;
}
int main(int argc, char *argv[])
{
strbuffer_t *inbuf;
char *ackbuf;
char *subjectline = NULL;
char *returnpathline = NULL;
char *fromline = NULL;
char *firsttxtline = NULL;
int inheaders = 1;
char *p;
pcre *subjexp;
const char *errmsg;
int errofs, result;
int ovector[30];
char cookie[10];
int duration = 0;
int argi;
char *envarea = NULL;
for (argi=1; (argi < argc); argi++) {
if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
}
initfgets(stdin);
inbuf = newstrbuffer(0);
while (unlimfgets(inbuf, stdin)) {
sanitize_input(inbuf, 0, 0);
if (!inheaders) {
/* We're in the message body. Look for a "delay=N" line here. */
if ((strncasecmp(STRBUF(inbuf), "delay=", 6) == 0) || (strncasecmp(STRBUF(inbuf), "delay ", 6) == 0)) {
duration = durationvalue(STRBUF(inbuf)+6);
continue;
}
else if ((strncasecmp(STRBUF(inbuf), "ack=", 4) == 0) || (strncasecmp(STRBUF(inbuf), "ack ", 4) == 0)) {
/* Some systems cannot generate a subject. Allow them to ack
* via text in the message body. */
subjectline = (char *)malloc(STRBUFLEN(inbuf) + 1024);
sprintf(subjectline, "Subject: Xymon [%s]", STRBUF(inbuf)+4);
}
else if (*STRBUF(inbuf) && !firsttxtline) {
/* Save the first line of the message body, but ignore blank lines */
firsttxtline = strdup(STRBUF(inbuf));
}
continue; /* We don't care about the rest of the message body */
}
/* See if we're at the end of the mail headers */
if (inheaders && (STRBUFLEN(inbuf) == 0)) { inheaders = 0; continue; }
/* Is it one of those we want to keep ? */
if (strncasecmp(STRBUF(inbuf), "return-path:", 12) == 0) returnpathline = strdup(skipwhitespace(STRBUF(inbuf)+12));
else if (strncasecmp(STRBUF(inbuf), "from:", 5) == 0) fromline = strdup(skipwhitespace(STRBUF(inbuf)+5));
else if (strncasecmp(STRBUF(inbuf), "subject:", 8) == 0) subjectline = strdup(skipwhitespace(STRBUF(inbuf)+8));
}
freestrbuffer(inbuf);
/* No subject ? No deal */
if (subjectline == NULL) {
dbgprintf("Subject-line not found\n");
return 1;
}
/* Get the alert cookie */
subjexp = pcre_compile(".*(Xymon|Hobbit|BB)[ -]* \\[*(-*[0-9]+)[\\]!]*", PCRE_CASELESS, &errmsg, &errofs, NULL);
if (subjexp == NULL) {
dbgprintf("pcre compile failed - 1\n");
return 2;
}
result = pcre_exec(subjexp, NULL, subjectline, strlen(subjectline), 0, 0, ovector, (sizeof(ovector)/sizeof(int)));
if (result < 0) {
dbgprintf("Subject line did not match pattern\n");
return 3; /* Subject did not match what we expected */
}
if (pcre_copy_substring(subjectline, ovector, result, 2, cookie, sizeof(cookie)) <= 0) {
dbgprintf("Could not find cookie value\n");
return 4; /* No cookie */
}
pcre_free(subjexp);
/* See if there's a "DELAY=" delay-value also */
subjexp = pcre_compile(".*DELAY[ =]+([0-9]+[mhdw]*)", PCRE_CASELESS, &errmsg, &errofs, NULL);
if (subjexp == NULL) {
dbgprintf("pcre compile failed - 2\n");
return 2;
}
result = pcre_exec(subjexp, NULL, subjectline, strlen(subjectline), 0, 0, ovector, (sizeof(ovector)/sizeof(int)));
if (result >= 0) {
char delaytxt[4096];
if (pcre_copy_substring(subjectline, ovector, result, 1, delaytxt, sizeof(delaytxt)) > 0) {
duration = durationvalue(delaytxt);
}
}
pcre_free(subjexp);
/* See if there's a "msg" text also */
subjexp = pcre_compile(".*MSG[ =]+(.*)", PCRE_CASELESS, &errmsg, &errofs, NULL);
if (subjexp == NULL) {
dbgprintf("pcre compile failed - 3\n");
return 2;
}
result = pcre_exec(subjexp, NULL, subjectline, strlen(subjectline), 0, 0, ovector, (sizeof(ovector)/sizeof(int)));
if (result >= 0) {
char msgtxt[4096];
if (pcre_copy_substring(subjectline, ovector, result, 1, msgtxt, sizeof(msgtxt)) > 0) {
firsttxtline = strdup(msgtxt);
}
}
pcre_free(subjexp);
/* Use the "return-path:" header if we didn't see a From: line */
if ((fromline == NULL) && returnpathline) fromline = returnpathline;
if (fromline) {
/* Remove '<' and '>' from the fromline - they mess up HTML */
while ((p = strchr(fromline, '<')) != NULL) *p = ' ';
while ((p = strchr(fromline, '>')) != NULL) *p = ' ';
}
/* Setup the acknowledge message */
if (duration == 0) duration = 60; /* Default: Ack for 60 minutes */
if (firsttxtline == NULL) firsttxtline = "<No cause specified>";
ackbuf = (char *)malloc(4096 + strlen(firsttxtline) + (fromline ? strlen(fromline) : 0));
p = ackbuf;
p += sprintf(p, "xymondack %s %d %s", cookie, duration, firsttxtline);
if (fromline) {
p += sprintf(p, "\nAcked by: %s", fromline);
}
if (debug) {
printf("%s\n", ackbuf);
return 0;
}
sendmessage(ackbuf, NULL, XYMON_TIMEOUT, NULL);
return 0;
}
int main(int argc, char *argv[])
{
char *envarea = NULL;
char *server = NULL;
char *cookie, *pagefilter = "";
char *filter = NULL;
char *heading = NULL;
int showcolors = 1;
int showcolumn = 0;
int addlink = 0;
int allhosts = 0;
int summary = 0;
int embedded = 0;
char *req, *board, *l;
int argi, res;
sendreturn_t *sres;
init_timestamp();
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if ( argnmatch(argv[argi], "--column=") || argnmatch(argv[argi], "--test=")) {
char *p = strchr(argv[argi], '=');
int needed;
needed = 10 + strlen(p); if (filter) needed += strlen(filter);
filter = (char *)(filter ? realloc(filter, needed) : calloc(1, needed));
sprintf(filter + strlen(filter), " test=%s", p+1);
if (!heading) {
heading = (char *)malloc(1024 + strlen(p) + strlen(timestamp));
sprintf(heading, "%s report on %s", p+1, timestamp);
}
}
else if (argnmatch(argv[argi], "--filter=")) {
char *p = strchr(argv[argi], '=');
int needed;
needed = 10 + strlen(p); if (filter) needed += strlen(filter);
filter = (char *)(filter ? realloc(filter, needed) : calloc(1, needed));
sprintf(filter + strlen(filter), " %s", p+1);
}
else if (argnmatch(argv[argi], "--heading=")) {
char *p = strchr(argv[argi], '=');
heading = strdup(p+1);
}
else if (strcmp(argv[argi], "--show-column") == 0) {
showcolumn = 1;
}
else if (strcmp(argv[argi], "--show-test") == 0) {
showcolumn = 1;
}
else if (strcmp(argv[argi], "--show-colors") == 0) {
showcolors = 1;
}
else if (strcmp(argv[argi], "--show-summary") == 0) {
summary = 1;
}
else if (strcmp(argv[argi], "--show-message") == 0) {
summary = 0;
}
else if (strcmp(argv[argi], "--link") == 0) {
addlink = 1;
}
else if (strcmp(argv[argi], "--no-colors") == 0) {
showcolors = 0;
}
else if (strcmp(argv[argi], "--all") == 0) {
allhosts = 1;
}
else if (strcmp(argv[argi], "--embedded") == 0) {
embedded = 1;
}
}
if (!allhosts) {
/* Setup the filter we use for the report */
cookie = get_cookie("pagepath");
if (cookie && *cookie) {
pcre *dummy;
char *re = (char *)malloc(8 + 2*strlen(cookie));
sprintf(re, "^%s$|^%s/.+", cookie, cookie);
dummy = compileregex(re);
if (dummy) {
freeregex(dummy);
pagefilter = malloc(10 + strlen(re));
sprintf(pagefilter, "page=%s", re);
}
}
}
sres = newsendreturnbuf(1, NULL);
req = malloc(1024 + strlen(pagefilter) + strlen(filter));
sprintf(req, "xymondboard fields=hostname,testname,color,msg %s %s",
pagefilter, filter);
res = sendmessage(req, server, XYMON_TIMEOUT, sres);
board = getsendreturnstr(sres, 1);
freesendreturnbuf(sres);
if (res != XYMONSEND_OK) return 1;
if (!embedded) {
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
printf("<html><head><title>%s</title></head>\n", htmlquoted(heading));
printf("<body>");
printf("<table border=1 cellpadding=5><tr><th>%s</th><th align=left>Status</th></tr>\n",
(showcolumn ? "Host/Column" : "Host"));
}
l = board;
while (l && *l) {
char *hostname, *testname = NULL, *colorstr = NULL, *msg = NULL, *p;
char *eoln = strchr(l, '\n');
if (eoln) *eoln = '\0';
hostname = l;
p = strchr(l, '|'); if (p) { *p = '\0'; l = testname = p+1; }
p = strchr(l, '|'); if (p) { *p = '\0'; l = colorstr = p+1; }
p = strchr(l, '|'); if (p) { *p = '\0'; l = msg = p+1; }
if (hostname && testname && colorstr && msg) {
char *msgeol;
nldecode(msg);
msgeol = strchr(msg, '\n');
if (msgeol) {
/* Skip the first status line */
msg = msgeol + 1;
}
printf("<tr><td align=left valign=top><b>");
if (addlink)
printf("<a href=\"%s\">%s</a>", hostsvcurl(hostname, xgetenv("INFOCOLUMN"), 1), htmlquoted(hostname));
else
printf("%s", htmlquoted(hostname));
if (showcolumn) {
printf("<br>");
if (addlink)
printf("<a href=\"%s\">%s</a>", hostsvcurl(hostname, testname, 1), htmlquoted(testname));
else
printf("%s", htmlquoted(testname));
}
if (showcolors) printf(" - %s", colorstr);
printf("</b></td>\n");
printf("<td><pre>\n");
if (summary) {
int firstline = 1;
char *bol, *eol;
bol = msg;
while (bol) {
eol = strchr(bol, '\n'); if (eol) *eol = '\0';
if (firstline) {
if (!isspace((int)*bol)) {
printf("%s\n", bol);
firstline = 0;
}
}
else if ((*bol == '&') && (strncmp(bol, "&green", 6) != 0)) {
printf("%s\n", bol);
}
bol = (eol ? eol+1 : NULL);
}
}
else {
printf("%s", msg);
}
printf("</pre></td></tr>\n");
}
if (eoln) l = eoln+1; else l = NULL;
}
if (!embedded) printf("</table></body></html>\n");
return 0;
}
int main(int argc, char *argv[])
{
void *hostwalk, *clonewalk;
int argi;
char *envarea = NULL;
strbuffer_t *outbuf;
char msgline[4096];
char oneurl[10240];
int gotany = 0;
enum { OP_INITIAL, OP_YES, OP_NO } gotonepage = OP_INITIAL; /* Tracks if all matches are on one page */
char *onepage = NULL; /* If gotonepage==OP_YES, then this is the page */
/*[wm] regex support */
#define BUFSIZE 256
regex_t re;
char re_errstr[BUFSIZE];
int re_status;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
}
redirect_cgilog("findhost");
cgidata = cgi_request();
if (cgidata == NULL) {
/* Present the query form */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
showform(stdout, "findhost", "findhost_form", COL_BLUE, getcurrenttime(NULL), NULL, NULL);
return 0;
}
parse_query();
if ( (re_status = regcomp(&re, pSearchPat, re_flag)) != 0 ) {
regerror(re_status, &re, re_errstr, BUFSIZE);
print_header();
printf("<tr><td align=left><font color=red>%s</font></td>\n", pSearchPat);
printf("<td align=left><font color=red>%s</font></td></tr>\n", re_errstr);
print_footer();
return 0;
}
outbuf = newstrbuffer(0);
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
hostwalk = first_host();
while (hostwalk) {
/*
* [wm] - Allow the search to be done on the hostname
* also on the "displayname" and the host comment
* Maybe this should be implemented by changing the HTML form, but until than..
* we're supposing that hostname will NEVER be null
*/
char *hostname, *displayname, *comment, *ip;
hostname = xmh_item(hostwalk, XMH_HOSTNAME);
displayname = xmh_item(hostwalk, XMH_DISPLAYNAME);
comment = xmh_item(hostwalk, XMH_COMMENT);
ip = xmh_item(hostwalk, XMH_IP);
if ( regexec (&re, hostname, (size_t)0, NULL, 0) == 0 ||
(regexec(&re, ip, (size_t)0, NULL, 0) == 0) ||
(displayname && regexec (&re, displayname, (size_t)0, NULL, 0) == 0) ||
(comment && regexec (&re, comment, (size_t)0, NULL, 0) == 0) ) {
/* match */
addtobuffer(outbuf, "<tr>\n");
sprintf(msgline, "<td align=left> %s </td>\n", displayname ? displayname : hostname);
addtobuffer(outbuf, msgline);
sprintf(oneurl, "%s/%s/#%s",
xgetenv("XYMONWEB"), xmh_item(hostwalk, XMH_PAGEPATH), hostname);
sprintf(msgline, "<td align=left> <a href=\"%s\">%s</a>\n",
oneurl, xmh_item(hostwalk, XMH_PAGEPATHTITLE));
addtobuffer(outbuf, msgline);
gotany++;
/* See if all of the matches so far are on one page */
switch (gotonepage) {
case OP_INITIAL:
gotonepage = OP_YES;
onepage = xmh_item(hostwalk, XMH_PAGEPATH);
break;
case OP_YES:
if (strcmp(onepage, xmh_item(hostwalk, XMH_PAGEPATH)) != 0) gotonepage = OP_NO;
break;
case OP_NO:
break;
}
clonewalk = next_host(hostwalk, 1);
while (clonewalk && (strcmp(xmh_item(hostwalk, XMH_HOSTNAME), xmh_item(clonewalk, XMH_HOSTNAME)) == 0)) {
sprintf(msgline, "<br><a href=\"%s/%s/#%s\">%s</a>\n",
xgetenv("XYMONWEB"),
xmh_item(clonewalk, XMH_PAGEPATH),
xmh_item(clonewalk, XMH_HOSTNAME),
xmh_item(clonewalk, XMH_PAGEPATHTITLE));
addtobuffer(outbuf, msgline);
clonewalk = next_host(clonewalk, 1);
gotany++;
}
addtobuffer(outbuf, "</td>\n</tr>\n");
hostwalk = clonewalk;
}
else {
hostwalk = next_host(hostwalk, 0);
}
}
regfree (&re); /*[wm] - free regex compiled patern */
if (dojump) {
if (gotany == 1) {
printf("Location: %s%s\n\n", xgetenv("XYMONWEBHOST"), oneurl);
return 0;
}
else if ((gotany > 1) && (gotonepage == OP_YES)) {
printf("Location: %s%s/%s/\n\n",
xgetenv("XYMONWEBHOST"), xgetenv("XYMONWEB"), onepage);
return 0;
}
}
print_header();
if (!gotany) {
printf("<tr><td align=left>%s</td><td align=left>Not found</td></tr>\n", pSearchPat);
}
else {
printf("%s", grabstrbuffer(outbuf));
}
print_footer();
/* [wm] - Free the strdup allocated memory */
if (pSearchPat) xfree(pSearchPat);
return 0;
}
int main(int argc, char *argv[])
{
int argi, hosti, testi;
char *pagepattern = NULL, *hostpattern = NULL;
char *envarea = NULL, *cookie = NULL, *nexthost;
char *hobbitcmd, *procscmd, *svcscmd;
int alertcolors, alertinterval;
char configfn[PATH_MAX];
char *respbuf = NULL, *procsbuf = NULL, *svcsbuf = NULL;
hostlist_t *hwalk;
htnames_t *twalk;
hostlist_t **allhosts = NULL;
htnames_t **alltests = NULL;
int hostcount = 0, maxtests = 0;
time_t now = getcurrenttime(NULL);
sendreturn_t *sres;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--delimiter=")) {
char *p = strchr(argv[argi], '=');
coldelim = strdup(p+1);
}
else if (strcmp(argv[argi], "--critical") == 0) {
nkonly = 1;
}
else if (strcmp(argv[argi], "--old-nk-config") == 0) {
newnkconfig = 0;
}
}
redirect_cgilog("hobbit-confreport");
load_hostnames(xgetenv("BBHOSTS"), NULL, get_fqdn());
load_nkconfig(NULL);
/* Setup the filter we use for the report */
cookie = get_cookie("pagepath");
if (cookie && *cookie) pagepattern = strdup(cookie);
cookie = get_cookie("host");
if (cookie && *cookie) hostpattern = strdup(cookie);
/* Fetch the list of host+test statuses we currently know about */
if (pagepattern) {
hobbitcmd = (char *)malloc(2*strlen(pagepattern) + 1024);
procscmd = (char *)malloc(2*strlen(pagepattern) + 1024);
svcscmd = (char *)malloc(2*strlen(pagepattern) + 1024);
sprintf(hobbitcmd, "hobbitdboard page=^%s$|^%s/.+ fields=hostname,testname",
pagepattern, pagepattern);
sprintf(procscmd, "hobbitdboard page=^%s$|^%s/.+ test=procs fields=hostname,msg",
pagepattern, pagepattern);
sprintf(svcscmd, "hobbitdboard page=^%s$|^%s/.+ test=svcs fields=hostname,msg",
pagepattern, pagepattern);
}
else if (hostpattern) {
hobbitcmd = (char *)malloc(strlen(hostpattern) + 1024);
procscmd = (char *)malloc(strlen(hostpattern) + 1024);
svcscmd = (char *)malloc(strlen(hostpattern) + 1024);
sprintf(hobbitcmd, "hobbitdboard host=^%s$ fields=hostname,testname", hostpattern);
sprintf(procscmd, "hobbitdboard host=^%s$ test=procs fields=hostname,msg", hostpattern);
sprintf(svcscmd, "hobbitdboard host=^%s$ test=svcs fields=hostname,msg", hostpattern);
}
else {
hobbitcmd = (char *)malloc(1024);
procscmd = (char *)malloc(1024);
svcscmd = (char *)malloc(1024);
sprintf(hobbitcmd, "hobbitdboard fields=hostname,testname");
sprintf(procscmd, "hobbitdboard test=procs fields=hostname,msg");
sprintf(svcscmd, "hobbitdboard test=svcs fields=hostname,msg");
}
sres = newsendreturnbuf(1, NULL);
if (sendmessage(hobbitcmd, NULL, BBTALK_TIMEOUT, sres) != BB_OK) {
errormsg("Cannot contact the Hobbit server\n");
return 1;
}
respbuf = getsendreturnstr(sres, 1);
if (sendmessage(procscmd, NULL, BBTALK_TIMEOUT, sres) != BB_OK) {
errormsg("Cannot contact the Hobbit server\n");
return 1;
}
procsbuf = getsendreturnstr(sres, 1);
if (sendmessage(svcscmd, NULL, BBTALK_TIMEOUT, sres) != BB_OK) {
errormsg("Cannot contact the Hobbit server\n");
return 1;
}
svcsbuf = getsendreturnstr(sres, 1);
freesendreturnbuf(sres);
if (!respbuf) {
errormsg("Unable to find host information\n");
return 1;
}
/* Parse it into a usable list */
nexthost = respbuf;
do {
char *hname, *tname, *eoln;
int wanted = 1;
eoln = strchr(nexthost, '\n');
if (eoln) *eoln = '\0';
hname = nexthost;
tname = strchr(nexthost, '|');
if (tname) {
*tname = '\0';
tname++;
}
if (nkonly) {
void *hinfo = hostinfo(hname);
char *nkalerts = bbh_item(hinfo, BBH_NK);
if (newnkconfig) {
if (strcmp(nkval(hname, tname, nkalerts), "No") == 0 ) wanted = 0;
} else {
if (!nkalerts) wanted = 0;
}
}
if (wanted && hname && tname && strcmp(hname, "summary") && strcmp(tname, xgetenv("INFOCOLUMN")) && strcmp(tname, xgetenv("TRENDSCOLUMN"))) {
htnames_t *newitem = (htnames_t *)malloc(sizeof(htnames_t));
for (hwalk = hosthead; (hwalk && strcmp(hwalk->hostname, hname)); hwalk = hwalk->next);
if (!hwalk) {
hwalk = (hostlist_t *)calloc(1, sizeof(hostlist_t));
hwalk->hostname = strdup(hname);
hwalk->procs = get_proclist(hname, procsbuf);
hwalk->svcs = get_proclist(hname, svcsbuf);
hwalk->next = hosthead;
hosthead = hwalk;
hostcount++;
}
newitem->name = strdup(tname);
newitem->next = hwalk->tests;
hwalk->tests = newitem;
hwalk->testcount++;
}
if (eoln) {
nexthost = eoln+1;
if (*nexthost == '\0') nexthost = NULL;
}
} while (nexthost);
allhosts = (hostlist_t **) malloc(hostcount * sizeof(hostlist_t *));
for (hwalk = hosthead, hosti=0; (hwalk); hwalk = hwalk->next, hosti++) {
allhosts[hosti] = hwalk;
if (hwalk->testcount > maxtests) maxtests = hwalk->testcount;
}
alltests = (htnames_t **) malloc(maxtests * sizeof(htnames_t *));
qsort(&allhosts[0], hostcount, sizeof(hostlist_t **), host_compare);
/* Get the static info */
load_all_links();
init_tcp_services();
pingcolumn = xgetenv("PINGCOLUMN");
pingplus = (char *)malloc(strlen(pingcolumn) + 2);
sprintf(pingplus, "%s=", pingcolumn);
/* Load alert config */
alertcolors = colorset(xgetenv("ALERTCOLORS"), ((1 << COL_GREEN) | (1 << COL_BLUE)));
alertinterval = 60*atoi(xgetenv("ALERTREPEAT"));
sprintf(configfn, "%s/etc/hobbit-alerts.cfg", xgetenv("BBHOME"));
load_alertconfig(configfn, alertcolors, alertinterval);
load_columndocs();
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
sethostenv("", "", "", colorname(COL_BLUE), NULL);
headfoot(stdout, "confreport", "", "header", COL_BLUE);
fprintf(stdout, "<table width=\"100%%\" border=0>\n");
fprintf(stdout, "<tr><th align=center colspan=2><font size=\"+2\">Hobbit configuration Report</font></th></tr>\n");
fprintf(stdout, "<tr><th valign=top align=left>Date</th><td>%s</td></tr>\n", ctime(&now));
fprintf(stdout, "<tr><th valign=top align=left>%d hosts included</th><td>\n", hostcount);
for (hosti=0; (hosti < hostcount); hosti++) {
fprintf(stdout, "%s ", allhosts[hosti]->hostname);
}
fprintf(stdout, "</td></tr>\n");
if (nkonly) {
fprintf(stdout, "<tr><th valign=top align=left>Filter</th><td>Only data for the "Critical Systems" view reported</td></tr>\n");
}
fprintf(stdout, "</table>\n");
headfoot(stdout, "confreport", "", "front", COL_BLUE);
for (hosti=0; (hosti < hostcount); hosti++) {
for (twalk = allhosts[hosti]->tests, testi = 0; (twalk); twalk = twalk->next, testi++) {
alltests[testi] = twalk;
}
qsort(&alltests[0], allhosts[hosti]->testcount, sizeof(htnames_t **), test_compare);
print_host(allhosts[hosti], alltests, allhosts[hosti]->testcount);
}
headfoot(stdout, "confreport", "", "back", COL_BLUE);
print_columndocs();
headfoot(stdout, "confreport", "", "footer", COL_BLUE);
return 0;
}
int main(int argc, char *argv[])
{
int argi;
DIR *histdir = NULL;
struct dirent *hent;
struct stat st;
time_t cutoff = 0;
int dropsvcs = 0;
int dropfiles = 0;
int droplogs = 0;
char *envarea = NULL;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--cutoff=")) {
char *p = strchr(argv[argi], '=');
cutoff = atoi(p+1);
}
else if (argnmatch(argv[argi], "--outdir=")) {
char *p = strchr(argv[argi], '=');
outdir = strdup(p+1);
}
else if (strcmp(argv[argi], "--drop") == 0) {
dropfiles = 1;
}
else if (strcmp(argv[argi], "--dropsvcs") == 0) {
dropsvcs = 1;
}
else if (strcmp(argv[argi], "--droplogs") == 0) {
droplogs = 1;
}
else if (strcmp(argv[argi], "--progress") == 0) {
progressinfo = 100;
}
else if (argnmatch(argv[argi], "--progress=")) {
char *p = strchr(argv[argi], '=');
progressinfo = atoi(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (strcmp(argv[argi], "--help") == 0) {
printf("Usage:\n\n\t%s --cutoff=TIME\n\nTIME is in seconds since epoch\n", argv[0]);
return 0;
}
else if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
}
if (cutoff == 0) {
errprintf("Must have a cutoff-time\n");
return 1;
}
if (chdir(xgetenv("BBHIST")) == -1) {
errprintf("Cannot cd to history directory: %s\n", strerror(errno));
return 1;
}
histdir = opendir(".");
if (!histdir) {
errprintf("Cannot read history directory: %s\n", strerror(errno));
return 1;
}
load_hostnames(xgetenv("BBHOSTS"), NULL, get_fqdn());
/* First scan the directory for all files, and pick up the ones we want to process */
while ((hent = readdir(histdir)) != NULL) {
char *hostname = NULL;
char hostip[IP_ADDR_STRLEN];
int ghosthandling = 1;
if (stat(hent->d_name, &st) == -1) {
errprintf("Odd entry %s - cannot stat: %s\n", hent->d_name, strerror(errno));
continue;
}
if ((*(hent->d_name) == '.') || S_ISDIR(st.st_mode)) continue;
if (strcmp(hent->d_name, "allevents") == 0) {
/* Special all-hosts-services event log */
add_to_filelist(hent->d_name, F_ALLEVENTS);
continue;
}
hostname = knownhost(hent->d_name, hostip, ghosthandling);
if (hostname) {
/* Host history file. */
add_to_filelist(hent->d_name, F_HOSTHISTORY);
}
else {
char *delim, *p, *hname, *tname;
delim = strrchr(hent->d_name, '.');
if (!delim) {
/* It's a host history file (no dot in filename), but the host does not exist */
errprintf("Orphaned host-history file %s - no host\n", hent->d_name);
if (dropfiles) add_to_filelist(hent->d_name, F_DROPIT);
continue;
}
*delim = '\0'; hname = strdup(hent->d_name); tname = delim+1; *delim = '.';
p = strchr(hname, ','); while (p) { *p = '.'; p = strchr(p, ','); }
hostname = knownhost(hname, hostip, ghosthandling);
if (!hostname) {
errprintf("Orphaned service-history file %s - no host\n", hent->d_name);
if (dropfiles) add_to_filelist(hent->d_name, F_DROPIT);
}
else if (dropsvcs && !validstatus(hostname, tname)) {
errprintf("Orphaned service-history file %s - no service\n", hent->d_name);
if (dropfiles) add_to_filelist(hent->d_name, F_DROPIT);
}
else {
/* Service history file */
add_to_filelist(hent->d_name, F_SERVICEHISTORY);
}
xfree(hname);
}
}
closedir(histdir);
/* Then process the files */
if (progressinfo) errprintf("Starting trim of %d history-logs\n", totalitems);
trim_files(cutoff);
/* Process statuslogs also ? */
if (!droplogs) return 0;
flhead = NULL; /* Dirty - we should clean it up properly - but I dont care */
totalitems = 0;
if (chdir(xgetenv("BBHISTLOGS")) == -1) {
errprintf("Cannot cd to historical statuslogs directory: %s\n", strerror(errno));
return 1;
}
histdir = opendir(".");
if (!histdir) {
errprintf("Cannot read historical statuslogs directory: %s\n", strerror(errno));
return 1;
}
while ((hent = readdir(histdir)) != NULL) {
if (stat(hent->d_name, &st) == -1) {
errprintf("Odd entry %s - cannot stat: %s\n", hent->d_name, strerror(errno));
continue;
}
if ((*(hent->d_name) == '.') || !S_ISDIR(st.st_mode)) continue;
if (knownloghost(hent->d_name)) {
add_to_filelist(hent->d_name, F_PURGELOGS);
}
else {
add_to_filelist(hent->d_name, F_DROPIT);
}
}
closedir(histdir);
if (progressinfo) errprintf("Starting trim of %d status-log collections\n", totalitems);
trim_logs(cutoff);
return 0;
}
int main(int argc, char *argv[])
{
char *pagedir;
bbgen_page_t *p;
dispsummary_t *s;
int i;
char *pageset = NULL;
char *nssidebarfilename = NULL;
char *egocolumn = NULL;
char *csvfile = NULL;
char csvdelim = ',';
int embedded = 0;
int hobbitddump = 0;
char *envarea = NULL;
int do_normal_pages = 1;
/* Setup standard header+footer (might be modified by option pageset) */
select_headers_and_footers("bb");
bb_color = bb2_color = bbnk_color = -1;
pagedir = NULL;
init_timestamp();
fqdn = get_fqdn();
/* Setup values from env. vars that may be overridden via commandline options */
if (xgetenv("MKBB2COLREPEAT")) {
int i = atoi(xgetenv("MKBB2COLREPEAT"));
if (i > 0) maxrowsbeforeheading = i;
}
for (i = 1; (i < argc); i++) {
if ( (strcmp(argv[i], "--hobbitd") == 0) ||
(argnmatch(argv[i], "--purplelifetime=")) ||
(strcmp(argv[i], "--nopurple") == 0) ) {
/* Deprecated */
}
else if (argnmatch(argv[i], "--env=")) {
char *lp = strchr(argv[i], '=');
loadenv(lp+1, envarea);
}
else if (argnmatch(argv[i], "--area=")) {
char *lp = strchr(argv[i], '=');
envarea = strdup(lp+1);
}
else if (argnmatch(argv[i], "--hobbitddump")) {
hobbitddump = 1;
}
else if (argnmatch(argv[i], "--ignorecolumns=")) {
char *lp = strchr(argv[i], '=');
ignorecolumns = (char *) malloc(strlen(lp)+2);
sprintf(ignorecolumns, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--nk-reds-only")) {
nkonlyreds = 1;
}
else if (argnmatch(argv[i], "--bb2-ignorecolumns=")) {
char *lp = strchr(argv[i], '=');
bb2ignorecolumns = (char *) malloc(strlen(lp)+2);
sprintf(bb2ignorecolumns, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--bb2-colors=")) {
char *lp = strchr(argv[i], '=') + 1;
bb2colors = colorset(lp, (1 << COL_GREEN));
}
else if (argnmatch(argv[i], "--bb2-ignorepurples")) {
bb2colors = (bb2colors & ~(1 << COL_PURPLE));
}
else if (argnmatch(argv[i], "--bb2-ignoredialups")) {
bb2nodialups = 1;
}
else if (argnmatch(argv[i], "--includecolumns=")) {
char *lp = strchr(argv[i], '=');
includecolumns = (char *) malloc(strlen(lp)+2);
sprintf(includecolumns, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--eventignore=")) {
char *lp = strchr(argv[i], '=');
eventignorecolumns = (char *) malloc(strlen(lp)+2);
sprintf(eventignorecolumns, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--doccgi=")) {
char *lp = strchr(argv[i], '=');
char *url = (char *)malloc(strlen(xgetenv("CGIBINURL"))+strlen(lp+1)+2);
sprintf(url, "%s/%s", xgetenv("CGIBINURL"), lp+1);
setdocurl(url);
xfree(url);
}
else if (argnmatch(argv[i], "--docurl=")) {
char *lp = strchr(argv[i], '=');
setdocurl(lp+1);
}
else if (argnmatch(argv[i], "--no-doc-window")) {
/* This is a no-op now */
}
else if (argnmatch(argv[i], "--doc-window")) {
setdocurl("TARGET=\"_blank\"");
}
else if (argnmatch(argv[i], "--htmlextension=")) {
char *lp = strchr(argv[i], '=');
htmlextension = strdup(lp+1);
}
else if (argnmatch(argv[i], "--htaccess")) {
char *lp = strchr(argv[i], '=');
if (lp) htaccess = strdup(lp+1);
else htaccess = ".htaccess";
}
else if ((strcmp(argv[i], "--wml") == 0) || argnmatch(argv[i], "--wml=")) {
char *lp = strchr(argv[i], '=');
if (lp) {
wapcolumns = (char *) malloc(strlen(lp)+2);
sprintf(wapcolumns, ",%s,", (lp+1));
}
enable_wmlgen = 1;
}
else if (argnmatch(argv[i], "--nstab=")) {
char *lp = strchr(argv[i], '=');
if (strlen(lp+1) > 0) {
nssidebarfilename = strdup(lp+1);
}
else errprintf("--nstab requires a filename\n");
}
else if (argnmatch(argv[i], "--nslimit=")) {
char *lp = strchr(argv[i], '=');
nssidebarcolorlimit = parse_color(lp+1);
}
else if (argnmatch(argv[i], "--rssversion=")) {
char *lp = strchr(argv[i], '=');
rssversion = strdup(lp+1);
}
else if (argnmatch(argv[i], "--rsslimit=")) {
char *lp = strchr(argv[i], '=');
rsscolorlimit = parse_color(lp+1);
}
else if (argnmatch(argv[i], "--rss")) {
wantrss = 1;
}
else if (argnmatch(argv[i], "--rssextension=")) {
char *lp = strchr(argv[i], '=');
rssextension = strdup(lp+1);
}
else if (argnmatch(argv[i], "--reportopts=")) {
char style[MAX_LINE_LEN];
unsigned int rstart, rend;
int count = sscanf(argv[i], "--reportopts=%u:%u:%d:%s",
&rstart, &rend, &dynamicreport, style);
reportstart = rstart; reportend = rend;
if (count < 2) {
errprintf("Invalid --reportopts option: Must have start- and end-times\n");
return 1;
}
if (count < 3) dynamicreport = 1;
if (count == 4) {
if (strcmp(style, stylenames[STYLE_CRIT]) == 0) reportstyle = STYLE_CRIT;
else if (strcmp(style, stylenames[STYLE_NONGR]) == 0) reportstyle = STYLE_NONGR;
else reportstyle = STYLE_OTHER;
}
if (reportstart < 788918400) reportstart = 788918400;
if (reportend > time(NULL)) reportend = time(NULL);
if (xgetenv("BBREPWARN")) reportwarnlevel = atof(xgetenv("BBREPWARN"));
if (xgetenv("BBREPGREEN")) reportgreenlevel = atof(xgetenv("BBREPGREEN"));
if ((reportwarnlevel < 0.0) || (reportwarnlevel > 100.0)) reportwarnlevel = 97.0;
if ((reportgreenlevel < 0.0) || (reportgreenlevel > 100.0)) reportgreenlevel = 99.995;
select_headers_and_footers("bbrep");
sethostenv_report(reportstart, reportend, reportwarnlevel, reportgreenlevel);
}
else if (argnmatch(argv[i], "--csv=")) {
char *lp = strchr(argv[i], '=');
csvfile = strdup(lp+1);
}
else if (argnmatch(argv[i], "--csvdelim=")) {
char *lp = strchr(argv[i], '=');
csvdelim = *(lp+1);
}
else if (argnmatch(argv[i], "--snapshot=")) {
char *lp = strchr(argv[i], '=');
snapshot = atol(lp+1);
select_headers_and_footers("bbsnap");
sethostenv_snapshot(snapshot);
}
else if (strcmp(argv[i], "--pages-first") == 0) {
hostsbeforepages = 0;
}
else if (strcmp(argv[i], "--pages-last") == 0) {
hostsbeforepages = 1;
}
else if (argnmatch(argv[i], "--subpagecolumns=")) {
char *lp = strchr(argv[i], '=');
subpagecolumns = atoi(lp+1);
if (subpagecolumns < 1) subpagecolumns=1;
}
else if (argnmatch(argv[i], "--maxrows=")) {
char *lp = strchr(argv[i], '=');
maxrowsbeforeheading = atoi(lp+1);
if (maxrowsbeforeheading < 0) maxrowsbeforeheading=0;
}
else if (strcmp(argv[i], "--recentgifs") == 0) {
use_recentgifs = 1;
}
else if (argnmatch(argv[i], "--recentgifs=")) {
char *lp = strchr(argv[i], '=');
use_recentgifs = 1;
recentgif_limit = 60*durationvalue(lp+1);
}
else if (strcmp(argv[i], "--sort-group-only-items") == 0) {
sort_grouponly_items = 1;
}
else if (argnmatch(argv[i], "--page-title=")) {
char *lp = strchr(argv[i], '=');
defaultpagetitle = strdup(lp+1);
}
else if (argnmatch(argv[i], "--dialupskin=")) {
char *lp = strchr(argv[i], '=');
dialupskin = strdup(lp+1);
}
else if (argnmatch(argv[i], "--reverseskin=")) {
char *lp = strchr(argv[i], '=');
reverseskin = strdup(lp+1);
}
else if (strcmp(argv[i], "--pagetitle-links") == 0) {
pagetitlelinks = 1;
}
else if (strcmp(argv[i], "--pagetext-headings") == 0) {
pagetextheadings = 1;
}
else if (strcmp(argv[i], "--underline-headings") == 0) {
underlineheadings = 1;
}
else if (strcmp(argv[i], "--no-underline-headings") == 0) {
underlineheadings = 0;
}
else if (strcmp(argv[i], "--no-eventlog") == 0) {
bb2eventlog = 0;
}
else if (argnmatch(argv[i], "--max-eventcount=")) {
char *lp = strchr(argv[i], '=');
bb2eventlogmaxcount = atoi(lp+1);
}
else if (argnmatch(argv[i], "--max-eventtime=")) {
char *lp = strchr(argv[i], '=');
bb2eventlogmaxtime = atoi(lp+1);
}
else if (argnmatch(argv[i], "--max-ackcount=")) {
char *lp = strchr(argv[i], '=');
bb2acklogmaxcount = atoi(lp+1);
}
else if (argnmatch(argv[i], "--max-acktime=")) {
char *lp = strchr(argv[i], '=');
bb2acklogmaxtime = atoi(lp+1);
}
else if (strcmp(argv[i], "--no-acklog") == 0) {
bb2acklog = 0;
}
else if (strcmp(argv[i], "--no-pages") == 0) {
do_normal_pages = 0;
}
else if (argnmatch(argv[i], "--noprop=")) {
char *lp = strchr(argv[i], '=');
nopropyellowdefault = (char *) malloc(strlen(lp)+2);
sprintf(nopropyellowdefault, ",%s,", (lp+1));
errprintf("--noprop is deprecated - use --nopropyellow instead\n");
}
else if (argnmatch(argv[i], "--nopropyellow=")) {
char *lp = strchr(argv[i], '=');
nopropyellowdefault = (char *) malloc(strlen(lp)+2);
sprintf(nopropyellowdefault, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--nopropred=")) {
char *lp = strchr(argv[i], '=');
nopropreddefault = (char *) malloc(strlen(lp)+2);
sprintf(nopropreddefault, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--noproppurple=")) {
char *lp = strchr(argv[i], '=');
noproppurpledefault = (char *) malloc(strlen(lp)+2);
sprintf(noproppurpledefault, ",%s,", (lp+1));
}
else if (argnmatch(argv[i], "--nopropack=")) {
char *lp = strchr(argv[i], '=');
nopropackdefault = (char *) malloc(strlen(lp)+2);
sprintf(nopropackdefault, ",%s,", (lp+1));
}
else if (strcmp(argv[i], "--bbpageONLY") == 0) {
/* Deprecated */
errprintf("--bbpageONLY is deprecated - use --pageset=NAME to generate pagesets\n");
}
else if (strcmp(argv[i], "--embedded") == 0) {
embedded = 1;
}
else if (argnmatch(argv[i], "--pageset=")) {
char *lp = strchr(argv[i], '=');
pageset = strdup(lp+1);
}
else if (argnmatch(argv[i], "--template=")) {
char *lp = strchr(argv[i], '=');
lp++;
select_headers_and_footers(lp);
}
else if (argnmatch(argv[i], "--purplelog=")) {
char *lp = strchr(argv[i], '=');
if (*(lp+1) == '/') purplelogfn = strdup(lp+1);
else {
purplelogfn = (char *) malloc(strlen(xgetenv("BBHOME"))+1+strlen(lp+1)+1);
sprintf(purplelogfn, "%s/%s", xgetenv("BBHOME"), (lp+1));
}
}
else if (argnmatch(argv[i], "--report=") || (strcmp(argv[i], "--report") == 0)) {
char *lp = strchr(argv[i], '=');
if (lp) {
egocolumn = strdup(lp+1);
}
else egocolumn = "bbgen";
timing = 1;
}
else if (argnmatch(argv[i], "--nklog=") || (strcmp(argv[i], "--nklog") == 0)) {
char *lp = strchr(argv[i], '=');
if (lp) {
lognkstatus = strdup(lp+1);
}
else lognkstatus = "nk";
}
else if (strcmp(argv[i], "--timing") == 0) {
timing = 1;
}
else if (strcmp(argv[i], "--debug") == 0) {
debug = 1;
}
else if (strcmp(argv[i], "--no-update") == 0) {
dontsendmessages = 1;
}
else if (strcmp(argv[i], "--version") == 0) {
printf("bbgen version %s\n", VERSION);
printf("\n");
exit(0);
}
else if ((strcmp(argv[i], "--help") == 0) || (strcmp(argv[i], "-?") == 0)) {
printf("bbgen for Hobbit version %s\n\n", VERSION);
printf("Usage: %s [options] [WebpageDirectory]\n", argv[0]);
printf("Options:\n");
printf(" --ignorecolumns=test[,test] : Completely ignore these columns\n");
printf(" --nk-reds-only : Only show red statuses on the NK page\n");
printf(" --bb2-ignorecolumns=test[,test]: Ignore these columns for the BB2 page\n");
printf(" --bb2-ignorepurples : Ignore all-purple hosts on BB2 page\n");
printf(" --includecolumns=test[,test]: Always include these columns on BB2 page\n");
printf(" --max-eventcount=N : Max number of events to include in eventlog\n");
printf(" --max-eventtime=N : Show events that occurred within the last N minutes\n");
printf(" --eventignore=test[,test] : Columns to ignore in bb2 event-log display\n");
printf(" --no-eventlog : Do not generate the bb2 eventlog display\n");
printf(" --no-acklog : Do not generate the bb2 ack-log display\n");
printf(" --no-pages : Generate only the bb2 and bbnk pages\n");
printf(" --docurl=documentation-URL : Hostnames link to a general (dynamic) web page for docs\n");
printf(" --no-doc-window : Open doc-links in same window\n");
printf(" --htmlextension=.EXT : Sets filename extension for generated file (default: .html\n");
printf(" --report[=COLUMNNAME] : Send a status report about the running of bbgen\n");
printf(" --reportopts=ST:END:DYN:STL : Run in Hobbit Reporting mode\n");
printf(" --csv=FILENAME : For Hobbit Reporting, output CSV file\n");
printf(" --csvdelim=CHARACTER : Delimiter in CSV file output (default: comma)\n");
printf(" --snapshot=TIME : Snapshot mode\n");
printf("\nPage layout options:\n");
printf(" --pages-first : Put page- and subpage-links before hosts (default)\n");
printf(" --pages-last : Put page- and subpage-links after hosts\n");
printf(" --subpagecolumns=N : Number of columns for links to pages and subpages\n");
printf(" --maxrows=N : Repeat column headings for every N hosts shown\n");
printf(" --recentgifs : Use xxx-recent.gif icons for newly changed tests\n");
printf(" --sort-group-only-items : Display group-only items in alphabetical order\n");
printf(" --page-title=TITLE : Set a default page title for all pages\n");
printf(" --dialupskin=URL : Use a different icon skin for dialup tests\n");
printf(" --reverseskin=URL : Use a different icon skin for reverse tests\n");
printf(" --pagetitle-links : Make page- and subpage-titles act as links\n");
printf(" --pagetext-headings : Use page texts as headings\n");
printf(" --no-underline-headings : Do not underline the page headings\n");
printf("\nStatus propagation control options:\n");
printf(" --noprop=test[,test] : Disable upwards status propagation when YELLOW\n");
printf(" --nopropred=test[,test] : Disable upwards status propagation when RED or YELLOW\n");
printf(" --noproppurple=test[,test] : Disable upwards status propagation when PURPLE\n");
printf("\nAlternate pageset generation support:\n");
printf(" --pageset=SETNAME : Generate non-standard pageset with tag SETNAME\n");
printf(" --template=TEMPLATE : template for header and footer files\n");
printf("\nAlternate output formats:\n");
printf(" --wml[=test1,test2,...] : Generate a small (bb2-style) WML page\n");
printf(" --nstab=FILENAME : Generate a Netscape Sidebar feed\n");
printf(" --nslimit=COLOR : Minimum color to include on Netscape sidebar\n");
printf(" --rss : Generate a RSS/RDF feed of alerts\n");
printf(" --rssextension=.EXT : Sets filename extension for RSS files (default: .rss\n");
printf(" --rssversion={0.91|0.92|1.0|2.0} : Specify RSS/RDF version (default: 0.91)\n");
printf(" --rsslimit=COLOR : Minimum color to include on RSS feed\n");
printf("\nDebugging/troubleshooting options:\n");
printf(" --timing : Collect timing information\n");
printf(" --debug : Debugging information\n");
printf(" --version : Show version information\n");
printf(" --purplelog=FILENAME : Create a log of purple hosts and tests\n");
exit(0);
}
else if (argnmatch(argv[i], "-")) {
errprintf("Unknown option : %s\n", argv[i]);
}
else {
/* Last argument is pagedir */
pagedir = strdup(argv[i]);
}
}
/* In case they changed the name of our column ... */
if (egocolumn) setup_signalhandler(egocolumn);
if (debug) {
int i;
printf("Command: bbgen");
for (i=1; (i<argc); i++) printf(" '%s'", argv[i]);
printf("\n");
printf("Environment BBHOSTS='%s'\n", textornull(xgetenv("BBHOSTS")));
printf("\n");
}
add_timestamp("Startup");
/* Check that all needed environment vars are defined */
envcheck(reqenv);
/* Catch a SEGV fault */
setup_signalhandler("bbgen");
/* Set umask to 0022 so that the generated HTML pages have world-read access */
umask(0022);
if (pagedir == NULL) {
if (xgetenv("BBWWW")) {
pagedir = strdup(xgetenv("BBWWW"));
}
else {
pagedir = (char *) malloc(strlen(xgetenv("BBHOME"))+5);
sprintf(pagedir, "%s/www", xgetenv("BBHOME"));
}
}
if (xgetenv("BBHTACCESS")) bbhtaccess = strdup(xgetenv("BBHTACCESS"));
if (xgetenv("BBPAGEHTACCESS")) bbpagehtaccess = strdup(xgetenv("BBPAGEHTACCESS"));
if (xgetenv("BBSUBPAGEHTACCESS")) bbsubpagehtaccess = strdup(xgetenv("BBSUBPAGEHTACCESS"));
/*
* When doing alternate pagesets, disable some stuff:
* No WML or RSS pages.
*/
if (pageset || embedded || snapshot) enable_wmlgen = wantrss = 0;
if (embedded) {
egocolumn = htaccess = NULL;
/*
* Need to have default SIGPIPE handling when doing embedded stuff.
* We are probably run from a CGI script or something similar.
*/
signal(SIGPIPE, SIG_DFL);
}
/* Load all data from the various files */
load_all_links();
add_timestamp("Load links done");
pagehead = load_bbhosts(pageset);
add_timestamp("Load bbhosts done");
if (!embedded) {
/* Remove old acknowledgements */
delete_old_acks();
add_timestamp("ACK removal done");
}
statehead = load_state(&dispsums);
if (embedded || snapshot) dispsums = NULL;
add_timestamp("Load STATE done");
if (hobbitddump) {
dump_hobbitdchk();
return 0;
}
/* Calculate colors of hosts and pages */
calc_hostcolors(bb2ignorecolumns);
calc_pagecolors(pagehead);
/* Topmost page (background color for bb.html) */
for (p=pagehead; (p); p = p->next) {
if (p->color > pagehead->color) pagehead->color = p->color;
}
bb_color = pagehead->color;
if (xgetenv("SUMMARY_SET_BKG") && (strcmp(xgetenv("SUMMARY_SET_BKG"), "TRUE") == 0)) {
/*
* Displayed summaries affect the BB page only,
* but should not go into the color we report to
* others.
*/
for (s=dispsums; (s); s = s->next) {
if (s->color > pagehead->color) pagehead->color = s->color;
}
}
add_timestamp("Color calculation done");
if (debug) dumpall(pagehead);
/* Generate pages */
if (chdir(pagedir) != 0) {
errprintf("Cannot change to webpage directory %s\n", pagedir);
exit(1);
}
if (embedded) {
/* Just generate that one page */
do_one_page(pagehead, NULL, 1);
return 0;
}
/* The main page - bb.html and pages/subpages thereunder */
add_timestamp("Hobbit pagegen start");
if (reportstart && csvfile) {
csv_availability(csvfile, csvdelim);
}
else if (do_normal_pages) {
do_page_with_subs(pagehead, dispsums);
}
add_timestamp("Hobbit pagegen done");
if (reportstart) {
/* Reports end here */
return 0;
}
/* The full summary page - bb2.html */
bb2_color = do_bb2_page(nssidebarfilename, PAGE_BB2);
add_timestamp("BB2 generation done");
/* Reduced summary (alerts) page - bbnk.html */
bbnk_color = do_bb2_page(NULL, PAGE_NK);
add_timestamp("BBNK generation done");
if (snapshot) {
/* Snapshots end here */
return 0;
}
/* Send summary notices - only once, so not on pagesets */
if (pageset == NULL) {
send_summaries(sumhead);
add_timestamp("Summary transmission done");
}
/* Generate WML cards */
if (enable_wmlgen) {
do_wml_cards(pagedir);
add_timestamp("WML generation done");
}
/* Need to do this before sending in our report */
add_timestamp("Run completed");
/* Tell about us */
if (egocolumn) {
char msgline[4096];
char *timestamps;
long bbsleep = (xgetenv("BBSLEEP") ? atol(xgetenv("BBSLEEP")) : 300);
int color;
/* Go yellow if it runs for too long */
if (total_runtime() > bbsleep) {
errprintf("WARNING: Runtime %ld longer than BBSLEEP (%ld)\n", total_runtime(), bbsleep);
}
color = (errbuf ? COL_YELLOW : COL_GREEN);
combo_start();
init_status(color);
sprintf(msgline, "status %s.%s %s %s\n\n", xgetenv("MACHINE"), egocolumn, colorname(color), timestamp);
addtostatus(msgline);
sprintf(msgline, "bbgen for Hobbit version %s\n", VERSION);
addtostatus(msgline);
sprintf(msgline, "\nStatistics:\n Hosts : %5d\n Status messages : %5d\n Purple messages : %5d\n Pages : %5d\n",
hostcount, statuscount, purplecount, pagecount);
addtostatus(msgline);
if (errbuf) {
addtostatus("\n\nError output:\n");
addtostatus(errbuf);
}
show_timestamps(×tamps);
addtostatus(timestamps);
finish_status();
combo_end();
}
else show_timestamps(NULL);
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
int obeycookies = 1;
char *accessfn = NULL;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (strcmp(argv[argi], "--no-pin") == 0) {
nopin = 1;
}
else if (strcmp(argv[argi], "--no-cookies") == 0) {
obeycookies = 0;
}
else if (argnmatch(argv[argi], "--access=")) {
char *p = strchr(argv[argi], '=');
accessfn = strdup(p+1);
}
}
redirect_cgilog("ack");
cgidata = cgi_request();
if ( (nopin && (cgi_method == CGI_GET)) || (!nopin && (cgidata == NULL)) ) {
/* Present the query form */
sethostenv("", "", "", colorname(COL_RED), NULL);
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
if (!nopin) {
showform(stdout, "acknowledge", "acknowledge_form", COL_RED, getcurrenttime(NULL),
NULL, NULL);
}
else {
char *cmd;
char *respbuf = NULL;
char *hostname, *pagename;
int gotfilter = 0, filtererror = 0;
sendreturn_t *sres = NULL;
int col, firstcolor = 1, alertcolors = colorset(xgetenv("ALERTCOLORS"), ((1 << COL_GREEN) | (1 << COL_BLUE)));
headfoot(stdout, "acknowledge", "", "header", COL_RED);
cmd = (char *)malloc(1024);
strcpy(cmd, "xymondboard fields=hostname,testname,cookie color=");
for (col = 0; (col < COL_COUNT); col++) {
if ((1 << col) & alertcolors) {
if (!firstcolor) strcat(cmd, ",");
strcat(cmd, colorname(col));
firstcolor = 0;
}
}
// printf("<!-- cmd = %s -->\n", cmd);
if (obeycookies && !gotfilter && ((hostname = get_cookie("host")) != NULL)) {
if (*hostname) {
pcre *dummy;
char *re;
re = (char *)malloc(3+strlen(hostname));
sprintf(re, "^%s$", hostname);
dummy = compileregex(re);
if (dummy) {
/* Valid expression */
freeregex(dummy);
cmd = (char *)realloc(cmd, 1024 + strlen(cmd) + strlen(re));
sprintf(cmd + strlen(cmd), " host=%s", re);
gotfilter = 1;
}
else {
filtererror = 1;
printf("<p align=\"center\">Invalid hostname filter</p>\n");
}
}
}
if (obeycookies && !gotfilter && ((pagename = get_cookie("pagepath")) != NULL)) {
if (*pagename) {
pcre *dummy;
char *re;
re = (char *)malloc(8 + strlen(pagename)*2);
sprintf(re, "%s$|^%s/.+", pagename, pagename);
dummy = compileregex(re);
if (dummy) {
/* Valid expression */
freeregex(dummy);
cmd = (char *)realloc(cmd, 1024 + strlen(cmd) + strlen(re));
sprintf(cmd + strlen(cmd), " page=%s", re);
gotfilter = 1;
}
else {
filtererror = 1;
printf("<p align=\"center\">Invalid pagename filter</p>\n");
}
}
}
sres = newsendreturnbuf(1, NULL);
if (!filtererror && (sendmessage(cmd, NULL, XYMON_TIMEOUT, sres) == XYMONSEND_OK)) {
char *bol, *eoln;
int first = 1;
respbuf = getsendreturnstr(sres, 1);
bol = respbuf;
while (bol) {
char *hname, *tname, *ackcode;
eoln = strchr(bol, '\n'); if (eoln) *eoln = '\0';
hname = tname = ackcode = NULL;
hname = strtok(bol, "|");
if (hname) tname = strtok(NULL, "|");
if (tname) ackcode = strtok(NULL, "|");
if (hname && tname && ackcode && (strcmp(hname, "summary") != 0)) {
if (first) {
fprintf(stdout, "<form method=\"POST\" ACTION=\"%s\">\n", getenv("SCRIPT_NAME"));
fprintf(stdout, "<center><table cellpadding=5 summary=\"Ack data\">\n");
fprintf(stdout, "<tr><th align=left>Host</th><th align=left>Test</th><th align=left>Duration</th><th align=left>Cause</th><th>Ack</th><th>Ack Multiple</tr>\n");
first = 0;
}
generate_ackline(stdout, hname, tname, ackcode);
}
if (eoln) bol = eoln+1; else bol = NULL;
}
if (first) {
fprintf(stdout, "<center><font size=\"+1\"><b>No active alerts</b></font></center>\n");
}
else {
generate_ackline(stdout, NULL, NULL, NULL);
fprintf(stdout, "</table></center>\n");
fprintf(stdout, "</form>\n");
}
}
freesendreturnbuf(sres);
headfoot(stdout, "acknowledge", "", "footer", COL_RED);
}
}
else if ( (nopin && (cgi_method == CGI_POST)) || (!nopin && (cgidata != NULL)) ) {
char *xymonmsg;
char *acking_user = "";
acklist_t *awalk;
strbuffer_t *response = newstrbuffer(0);
int count = 0;
/* We only want to accept posts from certain pages */
{
char cgisource[1024]; char *p;
p = csp_header("acknowledge"); if (p) fprintf(stdout, "%s", p);
snprintf(cgisource, sizeof(cgisource), "%s/%s", xgetenv("SECURECGIBINURL"), "acknowledge");
if (!cgi_refererok(cgisource)) {
fprintf(stdout, "Location: %s.sh?\n\n", cgisource);
return 0;
}
}
parse_query();
if (getenv("REMOTE_USER")) {
char *remaddr = getenv("REMOTE_ADDR");
acking_user = (char *)malloc(1024 + strlen(getenv("REMOTE_USER")) + (remaddr ? strlen(remaddr) : 0));
sprintf(acking_user, "\nAcked by: %s", getenv("REMOTE_USER"));
if (remaddr) sprintf(acking_user + strlen(acking_user), " (%s)", remaddr);
}
/* Load the host data (for access control) */
if (accessfn) {
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
load_web_access_config(accessfn);
}
addtobuffer(response, "<center>\n");
for (awalk = ackhead; (awalk); awalk = awalk->next) {
char *msgline = (char *)malloc(1024 + (awalk->hostname ? strlen(awalk->hostname) : 0) + (awalk->testname ? strlen(awalk->testname) : 0));
if (!awalk->checked) continue;
if (accessfn && (!web_access_allowed(getenv("REMOTE_USER"), awalk->hostname, awalk->testname, WEB_ACCESS_CONTROL))) continue;
if ((reqtype == ACK_ONE) && (awalk->id != sendnum)) continue;
if (reqtype == ACK_MANY) {
if (!awalk->ackmsg) awalk->ackmsg = ackmsgall;
if (!awalk->validity && validityall) awalk->validity = durationvalue(validityall);
if (periodall) awalk->period = periodall;
}
if (strncmp(awalk->period, "hour", 4) == 0) awalk->validity *= 60;
else if (strncmp(awalk->period, "day", 4) == 0) awalk->validity *= 60*24;
count++;
if (!awalk->ackmsg || !awalk->validity || !awalk->acknum) {
if (awalk->hostname && awalk->testname) {
sprintf(msgline, "<b>NO ACK</b> sent for host %s / test %s",
htmlquoted(awalk->hostname), htmlquoted(awalk->testname));
}
else {
sprintf(msgline, "<b>NO ACK</b> sent for item %d", awalk->id);
}
addtobuffer(response, msgline);
addtobuffer(response, ": Duration or message not set<br>\n");
continue;
}
xymonmsg = (char *)malloc(1024 + strlen(awalk->ackmsg) + strlen(acking_user));
sprintf(xymonmsg, "xymondack %d %d %s %s", awalk->acknum, awalk->validity, awalk->ackmsg, acking_user);
if (sendmessage(xymonmsg, NULL, XYMON_TIMEOUT, NULL) == XYMONSEND_OK) {
if (awalk->hostname && awalk->testname) {
sprintf(msgline, "Acknowledge sent for host %s / test %s<br>\n",
htmlquoted(awalk->hostname), htmlquoted(awalk->testname));
}
else {
sprintf(msgline, "Acknowledge sent for code %d<br>\n", awalk->acknum);
}
}
else {
if (awalk->hostname && awalk->testname) {
sprintf(msgline, "Failed to send acknowledge for host %s / test %s<br>\n",
htmlquoted(awalk->hostname), htmlquoted(awalk->testname));
}
else {
sprintf(msgline, "Failed to send acknowledge for code %d<br>\n", awalk->acknum);
}
}
addtobuffer(response, msgline);
xfree(xymonmsg);
}
if (count == 0) addtobuffer(response, "<b>No acks requested</b>\n");
addtobuffer(response, "</center>\n");
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
headfoot(stdout, "acknowledge", "", "header", COL_RED);
fprintf(stdout, "%s", STRBUF(response));
headfoot(stdout, "acknowledge", "", "footer", COL_RED);
}
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
char *xymonmsg;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--level=")) {
char *p = strchr(argv[argi], '=');
level = atoi(p+1);
}
else if (argnmatch(argv[argi], "--validity=")) {
char *p = strchr(argv[argi], '=');
validity = atoi(p+1);
}
else if (argnmatch(argv[argi], "--sender=")) {
char *p = strchr(argv[argi], '=');
ackedby = strdup(p+1);
}
}
redirect_cgilog("ackinfo");
parse_query();
if (hostname && *hostname && testname && *testname && ((level == 0) || (validity>0)) && ackmsg && *ackmsg) {
char *p;
/* Get the login username */
if (!ackedby) ackedby = getenv("REMOTE_USER");
if (!ackedby) ackedby = "UnknownUser";
if (validity == -1) validity = 30; /* 30 minutes */
validity = validity*60;
p = strchr(ackmsg, '\n'); if (p) *p = '\0';
/* ackinfo HOST.TEST\nlevel\nvaliduntil\nackedby\nmsg */
xymonmsg = (char *)malloc(1024 + strlen(hostname) + strlen(testname) + strlen(ackedby) + strlen(ackmsg));
sprintf(xymonmsg, "ackinfo %s.%s\n%d\n%d\n%s\n%s\n",
hostname, testname, level, validity, ackedby, ackmsg);
sendmessage(xymonmsg, NULL, XYMON_TIMEOUT, NULL);
}
else {
xymonmsg = (char *)malloc(1024 + (hostname ? strlen(hostname) : 9) + (testname ? strlen(testname) : 9) + (ackmsg ? strlen(ackmsg) : 9));
sprintf(xymonmsg, "error in input params: hostname=%s, testname=%s, ackmsg=%s, validity=%d\n",
(hostname ? hostname : "<unknown>"), (testname ? testname : "<unknown>"), (ackmsg ? ackmsg : "<unknown>"), validity);
}
fprintf(stdout, "Content-type: %s\n", xgetenv("HTMLCONTENTTYPE"));
fprintf(stdout, "Location: %s\n", getenv("HTTP_REFERER"));
fprintf(stdout, "\n");
fprintf(stdout, "Sent to xymond:\n%s\n", htmlquoted(xymonmsg));
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
char *hffile = "useradm";
int bgcolor = COL_BLUE;
char *passfile = NULL;
FILE *fd;
char *infomsg = NULL;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--passwdfile=")) {
char *p = strchr(argv[argi], '=');
passfile = strdup(p+1);
}
}
if (passfile == NULL) {
passfile = (char *)malloc(strlen(xgetenv("XYMONHOME")) + 20);
sprintf(passfile, "%s/etc/xymonpasswd", xgetenv("XYMONHOME"));
}
switch (parse_query()) {
case ACT_NONE: /* Show the form */
break;
case ACT_CREATE: /* Add a user */
{
char *cmd;
int n, ret;
cmd = (char *)malloc(1024 + strlen(passfile) + strlen(adduser_name) + strlen(adduser_password));
sprintf(cmd, "htpasswd -b '%s' '%s' '%s'",
passfile, adduser_name, adduser_password);
n = system(cmd);
n = system(cmd); ret = WEXITSTATUS(n);
if ((n == -1) || (ret != 0)) {
infomsg = "<SCRIPT LANGUAGE=\"Javascript\" type=\"text/javascript\"> alert('Update FAILED'); </SCRIPT>\n";
}
else {
infomsg = "<SCRIPT LANGUAGE=\"Javascript\" type=\"text/javascript\"> alert('User added/updated'); </SCRIPT>\n";
}
xfree(cmd);
}
break;
case ACT_DELETE: /* Delete a user */
{
char *cmd;
int n, ret;
cmd = (char *)malloc(1024 + strlen(passfile) + strlen(deluser_name));
snprintf(cmd, sizeof(cmd), "htpasswd -D '%s' '%s'",
passfile, deluser_name);
n = system(cmd); ret = WEXITSTATUS(n);
if ((n == -1) || (ret != 0)) {
infomsg = "<SCRIPT LANGUAGE=\"Javascript\" type=\"text/javascript\"> alert('Update delete FAILED'); </SCRIPT>\n";
}
else {
infomsg = "<SCRIPT LANGUAGE=\"Javascript\" type=\"text/javascript\"> alert('User deleted'); </SCRIPT>\n";
}
xfree(cmd);
}
break;
}
sethostenv_clearlist(NULL);
sethostenv_addtolist(NULL, "", "", NULL, 1); /* Have a blank entry first so we won't delete one by accident */
fd = fopen(passfile, "r");
if (fd != NULL) {
char l[1024];
char *id, *delim;
int usercount;
char **userlist;
int i;
usercount = 0;
userlist = (char **)calloc(usercount+1, sizeof(char *));
while (fgets(l, sizeof(l), fd)) {
id = l; delim = strchr(l, ':');
if (delim) {
*delim = '\0';
usercount++;
userlist = (char **)realloc(userlist, (usercount+1)*sizeof(char *));
userlist[usercount-1] = strdup(id);
userlist[usercount] = NULL;
}
}
fclose(fd);
qsort(&userlist[0], usercount, sizeof(char *), idcompare);
for (i=0; (userlist[i]); i++) sethostenv_addtolist(NULL, userlist[i], userlist[i], NULL, 0);
}
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
showform(stdout, hffile, "useradm_form", COL_BLUE, getcurrenttime(NULL), infomsg, NULL);
return 0;
}
int main(int argc, char *argv[])
{
char histlogfn[PATH_MAX];
char tailcmd[PATH_MAX];
FILE *fd;
time_t start1d, start1w, start4w, start1y;
reportinfo_t repinfo1d, repinfo1w, repinfo4w, repinfo1y, dummyrep;
replog_t *log1d, *log1w, *log4w, *log1y;
char *p;
int argi;
char *envarea = NULL;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--no-svcid") == 0) {
wantserviceid = 0;
}
}
redirect_cgilog("bb-hist");
envcheck(reqenv);
cgidata = cgi_request();
parse_query();
/* Build our own URL */
sprintf(selfurl, "%s", histcgiurl(hostname, service));
p = selfurl + strlen(selfurl);
sprintf(p, "&BARSUMS=%d", barsums);
if (strlen(ip)) {
p = selfurl + strlen(selfurl);
sprintf(p, "&IP=%s", ip);
}
if (entrycount) {
p = selfurl + strlen(selfurl);
sprintf(p, "&ENTRIES=%d", entrycount);
}
else strcat(selfurl, "&ENTRIES=ALL");
if (usepct) {
/* Must modify 4-week charts to be 5-weeks, or the last day is 19% of the bar */
/*
* Percent-based charts look awful with 24 hours / 7 days / 28 days / 12 months as basis
* because these numbers dont divide into 100 neatly. So the last item becomes
* too large (worst with the 28-day char: 100/28 = 3, last becomes (100-27*3) = 19% wide).
* So adjust the periods to something that matches percent-based calculations better.
*/
len1d = 25; bartitle1d = "25 hour summary";
len1w = 10; bartitle1w = "10 day summary";
len4w = 33; bartitle4w = "33 day summary";
len1y = 10; bartitle1y = "10 month summary";
}
sprintf(histlogfn, "%s/%s.%s", xgetenv("BBHIST"), commafy(hostname), service);
fd = fopen(histlogfn, "r");
if (fd == NULL) {
errormsg("Cannot open history file");
}
log1d = log1w = log4w = log1y = NULL;
if (req_endtime == 0) req_endtime = time(NULL);
/*
* Calculate the beginning time of each colorbar. We go back the specified length
* of time, except 1 second - so days are from midnight -> 23:59:59 etc.
*/
start1d = calc_time(req_endtime, -len1d, ALIGN_HOUR, END_UNCHANGED) + 1;
start1w = calc_time(req_endtime, -len1w, ALIGN_DAY, END_UNCHANGED) + 1;
start4w = calc_time(req_endtime, -len4w, ALIGN_DAY, END_UNCHANGED) + 1;
start1y = calc_time(req_endtime, -len1y, ALIGN_MONTH, END_UNCHANGED) + 1;
/*
* Collect data for the color-bars and summaries. Multiple scans over the history file,
* but doing it all in one go would be hideously complex.
*/
if (barsums & BARSUM_1D) {
parse_historyfile(fd, &repinfo1d, NULL, NULL, start1d, req_endtime, 1, reportwarnlevel, reportgreenlevel, NULL);
log1d = save_replogs();
}
if (barsums & BARSUM_1W) {
parse_historyfile(fd, &repinfo1w, NULL, NULL, start1w, req_endtime, 1, reportwarnlevel, reportgreenlevel, NULL);
log1w = save_replogs();
}
if (barsums & BARSUM_4W) {
parse_historyfile(fd, &repinfo4w, NULL, NULL, start4w, req_endtime, 1, reportwarnlevel, reportgreenlevel, NULL);
log4w = save_replogs();
}
if (barsums & BARSUM_1Y) {
parse_historyfile(fd, &repinfo1y, NULL, NULL, start1y, req_endtime, 1, reportwarnlevel, reportgreenlevel, NULL);
log1y = save_replogs();
}
if (entrycount == 0) {
/* All entries - just rewind the history file and do all of them */
rewind(fd);
parse_historyfile(fd, &dummyrep, NULL, NULL, 0, time(NULL), 1, reportwarnlevel, reportgreenlevel, NULL);
fclose(fd);
}
else {
/* Last 50 entries - we cheat and use "tail" in a pipe to pick the entries */
fclose(fd);
sprintf(tailcmd, "tail -%d %s", entrycount, histlogfn);
fd = popen(tailcmd, "r");
if (fd == NULL) errormsg("Cannot run tail on the histfile");
parse_historyfile(fd, &dummyrep, NULL, NULL, 0, time(NULL), 1, reportwarnlevel, reportgreenlevel, NULL);
pclose(fd);
}
/* Now generate the webpage */
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
generate_history(stdout,
hostname, service, ip, req_endtime,
start1d, &repinfo1d, log1d,
start1w, &repinfo1w, log1w,
start4w, &repinfo4w, log4w,
start1y, &repinfo1y, log1y,
entrycount, reploghead);
return 0;
}
int main(int argc, char *argv[])
{
int daemonize = 0;
char *pidfile = NULL;
char *envarea = NULL;
int cnid = -1;
pcre *msgfilter = NULL;
pcre *stdfilter = NULL;
int argi;
struct sigaction sa;
RbtIterator handle;
/* Dont save the error buffer */
save_errbuf = 0;
/* Create the peer container */
peers = rbtNew(name_compare);
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--debug")) {
debug = 1;
}
else if (argnmatch(argv[argi], "--channel=")) {
char *cn = strchr(argv[argi], '=') + 1;
for (cnid = C_STATUS; (channelnames[cnid] && strcmp(channelnames[cnid], cn)); cnid++) ;
if (channelnames[cnid] == NULL) cnid = -1;
}
else if (argnmatch(argv[argi], "--daemon")) {
daemonize = 1;
}
else if (argnmatch(argv[argi], "--no-daemon")) {
daemonize = 0;
}
else if (argnmatch(argv[argi], "--pidfile=")) {
char *p = strchr(argv[argi], '=');
pidfile = strdup(p+1);
}
else if (argnmatch(argv[argi], "--log=")) {
char *p = strchr(argv[argi], '=');
logfn = strdup(p+1);
}
else if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (argnmatch(argv[argi], "--locator=")) {
char *p = strchr(argv[argi], '=');
locator_init(p+1);
locatorbased = 1;
}
else if (argnmatch(argv[argi], "--service=")) {
char *p = strchr(argv[argi], '=');
locatorservice = get_servicetype(p+1);
}
else if (argnmatch(argv[argi], "--filter=")) {
char *p = strchr(argv[argi], '=');
msgfilter = compileregex(p+1);
if (!msgfilter) {
errprintf("Invalid filter (bad expression): %s\n", p+1);
}
else {
stdfilter = compileregex("^@@(logrotate|shutdown|drophost|droptest|renamehost|renametest)");
}
}
else {
char *childcmd;
char **childargs;
int i = 0;
childcmd = argv[argi];
childargs = (char **) calloc((1 + argc - argi), sizeof(char *));
while (argi < argc) { childargs[i++] = argv[argi++]; }
addlocalpeer(childcmd, childargs);
}
}
/* Sanity checks */
if (cnid == -1) {
errprintf("No channel/unknown channel specified\n");
return 1;
}
if (locatorbased && (locatorservice == ST_MAX)) {
errprintf("Must specify --service when using locator\n");
return 1;
}
if (!locatorbased && (rbtBegin(peers) == rbtEnd(peers))) {
errprintf("Must specify command for local worker\n");
return 1;
}
/* Do cache responses to avoid doing too many lookups */
if (locatorbased) locator_prepcache(locatorservice, 0);
/* Go daemon */
if (daemonize) {
/* Become a daemon */
pid_t daemonpid = fork();
if (daemonpid < 0) {
/* Fork failed */
errprintf("Could not fork child\n");
exit(1);
}
else if (daemonpid > 0) {
/* Parent creates PID file and exits */
FILE *fd = NULL;
if (pidfile) fd = fopen(pidfile, "w");
if (fd) {
fprintf(fd, "%d\n", (int)daemonpid);
fclose(fd);
}
exit(0);
}
/* Child (daemon) continues here */
setsid();
}
/* Catch signals */
setup_signalhandler("xymond_channel");
memset(&sa, 0, sizeof(sa));
sa.sa_handler = sig_handler;
sigaction(SIGINT, &sa, NULL);
sigaction(SIGTERM, &sa, NULL);
sigaction(SIGCHLD, &sa, NULL);
signal(SIGALRM, SIG_IGN);
/* Switch stdout/stderr to the logfile, if one was specified */
freopen("/dev/null", "r", stdin); /* xymond_channel's stdin is not used */
if (logfn) {
freopen(logfn, "a", stdout);
freopen(logfn, "a", stderr);
}
/* Attach to the channel */
channel = setup_channel(cnid, CHAN_CLIENT);
if (channel == NULL) {
errprintf("Channel not available\n");
running = 0;
}
while (running) {
/*
* Wait for GOCLIENT to go up.
*
* Note that we use IPC_NOWAIT if there are messages in the
* queue, because then we just want to pick up a message if
* there is one, and if not we want to continue pushing the
* queued data to the worker.
*/
struct sembuf s;
int n;
s.sem_num = GOCLIENT; s.sem_op = -1; s.sem_flg = ((pendingcount > 0) ? IPC_NOWAIT : 0);
n = semop(channel->semid, &s, 1);
if (n == 0) {
/*
* GOCLIENT went high, and so we got alerted about a new
* message arriving. Copy the message to our own buffer queue.
*/
char *inbuf = NULL;
if (!msgfilter || matchregex(channel->channelbuf, msgfilter) || matchregex(channel->channelbuf, stdfilter)) {
inbuf = strdup(channel->channelbuf);
}
/*
* Now we have safely stored the new message in our buffer.
* Wait until any other clients on the same channel have picked up
* this message (GOCLIENT reaches 0).
*
* We wrap this into an alarm handler, because it can occasionally
* fail, causing the whole system to lock up. We dont want that....
* We'll set the alarm to trigger after 1 second. Experience shows
* that we'll either succeed in a few milliseconds, or fail completely
* and wait the full alarm-timer duration.
*/
gotalarm = 0; signal(SIGALRM, sig_handler); alarm(2);
do {
s.sem_num = GOCLIENT; s.sem_op = 0; s.sem_flg = 0;
n = semop(channel->semid, &s, 1);
} while ((n == -1) && (errno == EAGAIN) && running && (!gotalarm));
signal(SIGALRM, SIG_IGN);
if (gotalarm) {
errprintf("Gave up waiting for GOCLIENT to go low.\n");
}
/*
* Let master know we got it by downing BOARDBUSY.
* This should not block, since BOARDBUSY is upped
* by the master just before he ups GOCLIENT.
*/
do {
s.sem_num = BOARDBUSY; s.sem_op = -1; s.sem_flg = IPC_NOWAIT;
n = semop(channel->semid, &s, 1);
} while ((n == -1) && (errno == EINTR));
if (n == -1) {
errprintf("Tried to down BOARDBUSY: %s\n", strerror(errno));
}
if (inbuf) {
/*
* See if they want us to rotate logs. We pass this on to
* the worker module as well, but must handle our own logfile.
*/
if (strncmp(inbuf, "@@logrotate", 11) == 0) {
freopen(logfn, "a", stdout);
freopen(logfn, "a", stderr);
}
/*
* Put the new message on our outbound queue.
*/
if (addmessage(inbuf) != 0) {
/* Failed to queue message, free the buffer */
xfree(inbuf);
}
}
}
else {
if (errno != EAGAIN) {
dbgprintf("Semaphore wait aborted: %s\n", strerror(errno));
continue;
}
}
/*
* We've picked up messages from the master. Now we
* must push them to the worker process. Since there
* is no way to hang off both a semaphore and select(),
* we'll just push as much data as possible into the
* pipe. If we get to a point where we would block,
* then wait a teeny bit of time and restart the
* whole loop with checking for new messages from the
* master etc.
*
* In theory, this could become an almost busy-wait loop.
* In practice, however, the queue will be empty most
* of the time because we'll just shove the data to the
* worker child.
*/
for (handle = rbtBegin(peers); (handle != rbtEnd(peers)); handle = rbtNext(peers, handle)) {
int canwrite = 1, hasfailed = 0;
xymon_peer_t *pwalk;
time_t msgtimeout = gettimer() - MSGTIMEOUT;
int flushcount = 0;
pwalk = (xymon_peer_t *) gettreeitem(peers, handle);
if (pwalk->msghead == NULL) continue; /* Ignore peers with nothing queued */
switch (pwalk->peerstatus) {
case P_UP:
canwrite = 1;
break;
case P_DOWN:
openconnection(pwalk);
canwrite = (pwalk->peerstatus == P_UP);
break;
case P_FAILED:
canwrite = 0;
break;
}
/* See if we have stale messages queued */
while (pwalk->msghead && (pwalk->msghead->tstamp < msgtimeout)) {
flushmessage(pwalk);
flushcount++;
}
if (flushcount) {
errprintf("Flushed %d stale messages for %s:%d\n",
flushcount,
inet_ntoa(pwalk->peeraddr.sin_addr),
ntohs(pwalk->peeraddr.sin_port));
}
while (pwalk->msghead && canwrite) {
fd_set fdwrite;
struct timeval tmo;
/* Check that this peer is ready for writing. */
FD_ZERO(&fdwrite); FD_SET(pwalk->peersocket, &fdwrite);
tmo.tv_sec = 0; tmo.tv_usec = 2000;
n = select(pwalk->peersocket+1, NULL, &fdwrite, NULL, &tmo);
if (n == -1) {
errprintf("select() failed: %s\n", strerror(errno));
canwrite = 0;
hasfailed = 1;
continue;
}
else if ((n == 0) || (!FD_ISSET(pwalk->peersocket, &fdwrite))) {
canwrite = 0;
continue;
}
n = write(pwalk->peersocket, pwalk->msghead->bufp, pwalk->msghead->buflen);
if (n >= 0) {
pwalk->msghead->bufp += n;
pwalk->msghead->buflen -= n;
if (pwalk->msghead->buflen == 0) flushmessage(pwalk);
}
else if (errno == EAGAIN) {
/*
* Write would block ... stop for now.
*/
canwrite = 0;
}
else {
hasfailed = 1;
}
if (hasfailed) {
/* Write failed, or message grew stale */
errprintf("Peer at %s:%d failed: %s\n",
inet_ntoa(pwalk->peeraddr.sin_addr), ntohs(pwalk->peeraddr.sin_port),
strerror(errno));
canwrite = 0;
shutdownconnection(pwalk);
if (pwalk->peertype == P_NET) locator_serverdown(pwalk->peername, locatorservice);
pwalk->peerstatus = P_FAILED;
}
}
}
}
/* Detach from channels */
close_channel(channel, CHAN_CLIENT);
/* Close peer connections */
for (handle = rbtBegin(peers); (handle != rbtEnd(peers)); handle = rbtNext(peers, handle)) {
xymon_peer_t *pwalk = (xymon_peer_t *) gettreeitem(peers, handle);
shutdownconnection(pwalk);
}
/* Remove the PID file */
if (pidfile) unlink(pidfile);
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
char *hffile = "hostgraphs";
char *formfile = "hostgraphs_form";
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--hffile=")) {
char *p = strchr(argv[argi], '=');
hffile = strdup(p+1);
formfile = (char *)malloc(strlen(hffile) + 6);
sprintf(formfile, "%s_form", hffile);
}
}
parse_query();
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
if (action == A_SELECT) {
char *cookie;
cookie = get_cookie("pagepath");
if (!pagepattern && cookie && *cookie) {
/* Match the exact pagename and sub-pages */
pagepattern = (char *)malloc(10 + 2*strlen(cookie));
sprintf(pagepattern, "^%s$|^%s/.+", cookie, cookie);
}
if (hostpattern || pagepattern || ippattern || classpattern)
sethostenv_filter(hostpattern, pagepattern, ippattern, classpattern);
showform(stdout, hffile, formfile, COL_BLUE, getcurrenttime(NULL), NULL, NULL);
}
else if ((action == A_GENERATE) && hosts && hosts[0] && tests && tests[0]) {
int hosti, testi;
headfoot(stdout, hffile, "", "header", COL_GREEN);
fprintf(stdout, "<table align=\"center\" summary=\"Graphs\">\n");
for (testi=0; (tests[testi]); testi++) {
fprintf(stdout, "<tr><td><img src=\"%s/showgraph.sh?host=%s",
xgetenv("CGIBINURL"), htmlquoted(hosts[0]));
for (hosti=1; (hosts[hosti]); hosti++) fprintf(stdout, ",%s", htmlquoted(hosts[hosti]));
fprintf(stdout, "&service=%s&graph_start=%ld&graph_end=%ld&graph=custom&action=view&graph_height=%s&graph_width=%s\"></td></tr>\n",
htmlquoted(tests[testi]), (long int)starttime, (long int)endtime, xgetenv("RRDHEIGHT"), xgetenv("RRDWIDTH"));
}
fprintf(stdout, "</table><br><br>\n");
headfoot(stdout, hffile, "", "footer", COL_GREEN);
}
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *cmd = NULL;
char **cmdargs = NULL;
int argcount = 0;
char *envfile = NULL;
char *envarea = NULL;
char envfn[PATH_MAX];
cmdargs = (char **) calloc(argc+2, sizeof(char *));
for (argi=1; (argi < argc); argi++) {
if ((argcount == 0) && (strcmp(argv[argi], "--debug") == 0)) {
debug = 1;
}
else if ((argcount == 0) && (argnmatch(argv[argi], "--env="))) {
char *p = strchr(argv[argi], '=');
envfile = strdup(p+1);
}
else if ((argcount == 0) && (argnmatch(argv[argi], "--area="))) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if ((argcount == 0) && (strcmp(argv[argi], "--version") == 0)) {
fprintf(stdout, "Xymon version %s\n", VERSION);
return 0;
}
else {
if (argcount == 0) {
cmdargs[0] = cmd = strdup(expand_env(argv[argi]));
argcount = 1;
}
else cmdargs[argcount++] = strdup(expand_env(argv[argi]));
}
}
if (!envfile) {
struct stat st;
sprintf(envfn, "%s/etc/xymonserver.cfg", xgetenv("XYMONHOME"));
if (stat(envfn, &st) == -1) sprintf(envfn, "%s/etc/xymonclient.cfg", xgetenv("XYMONHOME"));
errprintf("Using default environment file %s\n", envfn);
/* Make sure SERVEROSTYPE, MACHINEDOTS and MACHINE are setup for our child */
xymon_default_envs(envfn);
loadenv(envfn, envarea);
}
else {
/* Make sure SERVEROSTYPE, MACHINEDOTS and MACHINE are setup for our child */
xymon_default_envs(envfile);
loadenv(envfile, envarea);
}
/* Go! */
if (cmd == NULL) cmd = cmdargs[0] = "/bin/sh";
execvp(cmd, cmdargs);
/* Should never go here */
errprintf("execvp() failed: %s\n", strerror(errno));
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (argnmatch(argv[argi], "--top")) {
topcount = 10;
webfile_hf = "topchanges";
webfile_form = "topchanges_form";
maxminutes = -1;
maxcount = -1;
}
else if (strcmp(argv[argi], "--debug=")) {
debug = 1;
}
}
redirect_cgilog("eventlog");
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
cgidata = cgi_request();
if (cgidata == NULL) {
/* Present the query form */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
showform(stdout, webfile_hf, webfile_form, COL_BLUE, getcurrenttime(NULL), NULL, NULL);
return 0;
}
*periodstring = '\0';
parse_query();
if ((*periodstring == '\0') && (fromtime || totime)) {
if (fromtime && totime) sprintf(periodstring, "Events between %s - %s", fromtime, totime);
else if (fromtime) sprintf(periodstring, "Events since %s", fromtime);
else if (totime) sprintf(periodstring, "Events until %s", totime);
}
/* Now generate the webpage */
headfoot(stdout, webfile_hf, "", "header", COL_GREEN);
fprintf(stdout, "<center>\n");
if (topcount == 0) {
do_eventlog(stdout, maxcount, maxminutes, fromtime, totime,
pageregex, expageregex, hostregex, exhostregex, testregex, extestregex,
colorregex, ignoredialups, NULL,
NULL, NULL, NULL, counttype, summarybar, periodstring);
}
else {
countlist_t *hcounts, *scounts;
event_t *events;
time_t firstevent, lastevent;
do_eventlog(NULL, -1, -1, fromtime, totime,
pageregex, expageregex, hostregex, exhostregex, testregex, extestregex,
colorregex, ignoredialups, NULL,
&events, &hcounts, &scounts, counttype, XYMON_S_NONE, NULL);
lastevent = (totime ? eventreport_time(totime) : getcurrenttime(NULL));
if (fromtime) {
firstevent = eventreport_time(fromtime);
}
else if (events) {
event_t *ewalk;
ewalk = events; while (ewalk->next) ewalk = ewalk->next;
firstevent = ewalk->eventtime;
}
else
firstevent = 0;
show_topchanges(stdout, hcounts, scounts, events, topcount, firstevent, lastevent);
}
fprintf(stdout, "</center>\n");
headfoot(stdout, webfile_hf, "", "footer", COL_GREEN);
return 0;
}
int main(int argc, char *argv[])
{
int argi, i;
char *username = getenv("REMOTE_USER");
char *userhost = getenv("REMOTE_HOST");
char *userip = getenv("REMOTE_ADDR");
char *fullmsg = "No cause specified";
char *envarea = NULL;
int obeycookies = 1;
char *accessfn = NULL;
if ((username == NULL) || (strlen(username) == 0)) username = "******";
if ((userhost == NULL) || (strlen(userhost) == 0)) userhost = userip;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--no-cookies") == 0) {
obeycookies = 0;
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--access=")) {
char *p = strchr(argv[argi], '=');
accessfn = strdup(p+1);
}
}
redirect_cgilog("enadis");
parse_cgi();
if (debug) preview = 1;
if (cgi_method == CGI_GET) {
/*
* It's a GET, so the initial request.
* If we have a pagepath cookie, use that as the initial
* host-name filter.
*/
char *pagepath;
action = ACT_FILTER;
pagepath = get_cookie("pagepath");
if (obeycookies && pagepath && *pagepath) pagepattern = strdup(pagepath);
}
if (action == ACT_FILTER) {
/* Present the query form */
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
sethostenv("", "", "", colorname(COL_BLUE), NULL);
sethostenv_filter(hostpattern, pagepattern, ippattern, classpattern);
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
showform(stdout, "maint", "maint_form", COL_BLUE, getcurrenttime(NULL), NULL, NULL);
return 0;
}
fullmsg = (char *)malloc(1024 + strlen(username) + strlen(userhost) + strlen(disablemsg));
sprintf(fullmsg, "\nDisabled by: %s @ %s\nReason: %s\n", username, userhost, disablemsg);
/*
* Ready ... go build the webpage.
*/
printf("Content-Type: %s\n", xgetenv("HTMLCONTENTTYPE"));
if (!preview) {
char *returl;
// dbgprintf("Not a preview: sending to %s\n", textornull(getenv("HTTP_REFERER")));
/* We're done -- figure out where to send them */
if (getenv("HTTP_REFERER")) printf("Location: %s\n\n", getenv("HTTP_REFERER"));
else {
returl = (char *)malloc(1024);
snprintf(returl, sizeof(returl), "%s/%s", xgetenv("SECURECGIBINURL"), "enadis.sh");
printf("Location: %s?\n\n", returl);
}
}
else {
printf("\n");
}
/* It's ok with these hardcoded values, as they are not used for this page */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
if (preview) headfoot(stdout, "maintact", "", "header", COL_BLUE);
if (debug) {
printf("<pre>\n");
switch (action) {
case ACT_NONE : dbgprintf("Action = none\n"); break;
case ACT_FILTER : dbgprintf("Action = filter\n"); break;
case ACT_ENABLE : dbgprintf("Action = enable\n");
dbgprintf("Tests = ");
for (i=0; (i < enablecount); i++) printf("%s ", enabletest[i]);
printf("\n");
break;
case ACT_DISABLE: dbgprintf("Action = disable\n");
dbgprintf("Tests = ");
for (i=0; (i < disablecount); i++) printf("%s ", disabletest[i]);
printf("\n");
if (disableend == DISABLE_UNTIL) {
dbgprintf("Disable until: endtime = %d, duration = %d, scale = %d\n", endtime, duration, scale);
}
else {
dbgprintf("Duration = %d, scale = %d\n", duration, scale);
}
dbgprintf("Cause = %s\n", textornull(disablemsg));
break;
case ACT_SCHED_DISABLE:
dbgprintf("Action = schedule\n");
dbgprintf("Time = %s\n", ctime(&schedtime));
dbgprintf("Tests = ");
for (i=0; (i < disablecount); i++) printf("%s ", disabletest[i]);
printf("\n");
if (disableend == DISABLE_UNTIL) {
dbgprintf("Disable until: endtime = %d, duration = %d, scale = %d\n", endtime, duration, scale);
}
else {
dbgprintf("Duration = %d, scale = %d\n", duration, scale);
}
dbgprintf("Cause = %s\n", textornull(disablemsg));
break;
case ACT_SCHED_CANCEL:
dbgprintf("Action = cancel\n");
dbgprintf("ID = %d\n", cancelid);
break;
}
printf("</pre>\n");
}
if (preview) printf("<table align=\"center\" summary=\"Actions performed\" width=\"60%%\">\n");
if (action == ACT_SCHED_CANCEL) {
do_one_host(NULL, NULL, username);
}
else {
/* Load the host data (for access control) */
if (accessfn) {
load_web_access_config(accessfn);
for (i = 0; (i < hostcount); i++) {
if (web_access_allowed(getenv("REMOTE_USER"), hostnames[i], NULL, WEB_ACCESS_CONTROL)) {
do_one_host(hostnames[i], fullmsg, username);
}
}
}
else {
for (i = 0; (i < hostcount); i++) do_one_host(hostnames[i], fullmsg, username);
}
}
if (preview) {
printf("<tr><td align=center><br><br><form method=\"GET\" ACTION=\"%s\"><input type=submit value=\"Continue\"></form></td></tr>\n", xgetenv("HTTP_REFERER"));
printf("</table>\n");
headfoot(stdout, "maintact", "", "footer", COL_BLUE);
}
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
for (argi = 1; (argi < argc); argi++) {
if (strcmp(argv[argi], "--historical") == 0) {
source = SRC_HISTLOGS;
}
else if (strcmp(argv[argi], "--hobbitd") == 0) {
source = SRC_HOBBITD;
}
else if (strncmp(argv[argi], "--history=", 10) == 0) {
char *val = strchr(argv[argi], '=')+1;
if (strcmp(val, "none") == 0)
histlocation = HIST_NONE;
else if (strcmp(val, "top") == 0)
histlocation = HIST_TOP;
else if (strcmp(val, "bottom") == 0)
histlocation = HIST_BOTTOM;
}
else if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--no-svcid") == 0) {
wantserviceid = 0;
}
else if (argnmatch(argv[argi], "--templates=")) {
char *p = strchr(argv[argi], '=');
sethostenv_template(p+1);
}
else if (argnmatch(argv[argi], "--multigraphs=")) {
char *p = strchr(argv[argi], '=');
multigraphs = (char *)malloc(strlen(p+1) + 3);
sprintf(multigraphs, ",%s,", p+1);
}
else if (strcmp(argv[argi], "--no-disable") == 0) {
showenadis = 0;
}
else if (strcmp(argv[argi], "--no-jsvalidation") == 0) {
usejsvalidation = 0;
}
else if (strcmp(argv[argi], "--old-nk-config") == 0) {
newnkconfig = 0;
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
}
redirect_cgilog("hobbitsvc");
*errortxt = '\0';
hostname = service = tstamp = NULL;
if (do_request() != 0) {
fprintf(stdout, "%s", errortxt);
return 1;
}
return 0;
}
int main(int argc, char *argv[])
{
char histlogfn[PATH_MAX];
FILE *fd;
char textrepfullfn[PATH_MAX], textrepfn[1024], textrepurl[PATH_MAX];
FILE *textrep;
reportinfo_t repinfo;
int argi;
char *envarea = NULL;
void *hinfo;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
}
redirect_cgilog("reportlog");
cgidata = cgi_request();
parse_query();
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
if ((hinfo = hostinfo(hostname)) == NULL) {
errormsg("No such host");
return 1;
}
ip = xmh_item(hinfo, XMH_IP);
displayname = xmh_item(hinfo, XMH_DISPLAYNAME);
if (!displayname) displayname = hostname;
sprintf(histlogfn, "%s/%s.%s", xgetenv("XYMONHISTDIR"), commafy(hostname), service);
fd = fopen(histlogfn, "r");
if (fd == NULL) {
errormsg("Cannot open history file");
}
color = parse_historyfile(fd, &repinfo, hostname, service, st, end, 0, reportwarnlevel, reportgreenlevel, reportwarnstops, reporttime);
fclose(fd);
sprintf(textrepfn, "avail-%s-%s-%u-%u.txt", hostname, service, (unsigned int)getcurrenttime(NULL), (int)getpid());
sprintf(textrepfullfn, "%s/%s", xgetenv("XYMONREPDIR"), textrepfn);
sprintf(textrepurl, "%s/%s", xgetenv("XYMONREPURL"), textrepfn);
textrep = fopen(textrepfullfn, "w");
/* Now generate the webpage */
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
generate_replog(stdout, textrep, textrepurl,
hostname, service, color, style,
ip, displayname,
st, end, reportwarnlevel, reportgreenlevel, reportwarnstops,
&repinfo);
if (textrep) fclose(textrep);
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
char **critconfig = NULL;
int cccount = 0;
char *hffile = "critical";
critconfig = (char **)calloc(1, sizeof(char *));
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (strcmp(argv[argi], "--tooltips") == 0) {
usetooltips = 1;
}
else if (argnmatch(argv[argi], "--acklevel=")) {
char *p = strchr(argv[argi], '=');
critacklevel = atoi(p+1);
}
else if (argnmatch(argv[argi], "--config=")) {
char *p = strchr(argv[argi], '=');
critconfig[cccount] = strdup(p+1);
cccount++;
critconfig = (char **)realloc(critconfig, (1 + cccount)*sizeof(char *));
critconfig[cccount] = NULL;
}
else if (argnmatch(argv[argi], "--hffile=")) {
char *p = strchr(argv[argi], '=');
hffile = strdup(p+1);
}
}
if (!critconfig[0]) {
critconfig = (char **)realloc(critconfig, 2*sizeof(char *));
critconfig[0] = (char *)malloc(strlen(xgetenv("XYMONHOME")) + strlen(DEFAULT_CRITCONFIGFN) + 2);
sprintf(critconfig[0], "%s/%s", xgetenv("XYMONHOME"), DEFAULT_CRITCONFIGFN);
critconfig[1] = NULL;
}
redirect_cgilog("criticalview");
setdocurl(hostsvcurl("%s", xgetenv("INFOCOLUMN"), 1));
parse_query();
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
load_all_links();
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
use_recentgifs = 1;
if (getboard(mincolor) == 0) {
int i;
char *oneconfig, *onename;
int *partcolor = NULL, *partprio = NULL;
xtreePos_t hhandle;
for (i=0; (critconfig[i]); i++) {
oneconfig = strchr(critconfig[i], ':');
load_critconfig(oneconfig ? oneconfig+1 : critconfig[i]);
loadstatus(maxprio, maxage, mincolor, wantacked);
/* Determine background color and max. priority */
if (i == 0) {
partcolor = (int *)malloc(sizeof(int));
partprio = (int *)malloc(sizeof(int));
}
else {
partcolor = (int *)realloc(partcolor, (i+1)*sizeof(int));
partprio = (int *)realloc(partprio, (i+1)*sizeof(int));
}
partcolor[i] = COL_GREEN;
partprio[i] = 0;
for (hhandle = xtreeFirst(rbstate[i]); (hhandle != xtreeEnd(rbstate[i])); hhandle = xtreeNext(rbstate[i], hhandle)) {
hstatus_t *itm;
itm = (hstatus_t *)xtreeData(rbstate[i], hhandle);
if (itm->color > partcolor[i]) partcolor[i] = itm->color;
if (itm->config->priority > partprio[i]) partprio[i] = itm->config->priority;
}
if (partcolor[i] > pagecolor) pagecolor = partcolor[i];
}
for (i=0; (critconfig[i]); i++) {
oneconfig = strchr(critconfig[i], ':');
if (oneconfig) {
*oneconfig = '\0';
oneconfig++;
onename = (char *)malloc(strlen("DIVIDERTEXT=") + strlen(critconfig[i]) + 1);
sprintf(onename, "DIVIDERTEXT=%s", critconfig[i]);
putenv(onename);
}
else {
oneconfig = critconfig[i];
putenv("DIVIDERTEXT=");
}
generate_critpage(rbstate[i], hostsonpage[i], stdout,
(i == 0) ? (critconfig[1] ? "critmulti" : hffile) : "divider",
(critconfig[i+1] == NULL) ? hffile : "divider",
partcolor[i], partprio[i]);
}
}
else {
fprintf(stdout, "Cannot load Xymon status\n");
}
return 0;
}
int main(int argc, char *argv[])
{
int argi;
char *envarea = NULL;
char *hffile = "ghosts";
int bgcolor = COL_BLUE;
char *ghosts = NULL;
sendreturn_t *sres;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (argnmatch(argv[argi], "--hffile=")) {
char *p = strchr(argv[argi], '=');
hffile = strdup(p+1);
}
}
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
parse_query();
switch (outform) {
case O_HTML:
fprintf(stdout, "Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
headfoot(stdout, hffile, "", "header", bgcolor);
break;
case O_TXT:
fprintf(stdout, "Content-type: text/plain\n\n");
break;
}
sres = newsendreturnbuf(1, NULL);
if (sendmessage("ghostlist", NULL, XYMON_TIMEOUT, sres) == XYMONSEND_OK) {
char *bol, *eoln, *name, *sender, *timestr;
time_t tstamp, now;
int count, idx;
ghost_t *ghosttable;
ghosts = getsendreturnstr(sres, 1);
/* Count the number of lines */
for (bol = ghosts, count=0; (bol); bol = strchr(bol, '\n')) {
if (*bol == '\n') bol++;
count++;
}
ghosttable = (ghost_t *)calloc(count+1, sizeof(ghost_t));
idx = count = 0;
tstamp = now = getcurrenttime(NULL);
bol = ghosts;
while (bol) {
name = sender = timestr = NULL;
eoln = strchr(bol, '\n'); if (eoln) *eoln = '\0';
name = strtok(bol, "|");
if (name) sender = strtok(NULL, "|");
if (sender) timestr = strtok(NULL, "|");
if (timestr) tstamp = atol(timestr);
if (name && sender && timestr && (tstamp > (now - maxage))) {
int i1, i2, i3, i4;
sscanf(sender, "%d.%d.%d.%d", &i1, &i2, &i3, &i4);
ghosttable[idx].sender = sender;
ghosttable[idx].senderval = (i1 << 24) + (i2 << 16) + (i3 << 8) + i4;
ghosttable[idx].name = name;
ghosttable[idx].tstamp = tstamp;
find_candidate(&ghosttable[idx]);
idx++; count++;
}
if (eoln) eoln++;
bol = eoln;
}
switch (sorttype) {
case S_NAME:
qsort(&ghosttable[0], count, sizeof(ghost_t), hostname_compare);
break;
case S_SENDER:
qsort(&ghosttable[0], count, sizeof(ghost_t), sender_compare);
break;
case S_TIME:
qsort(&ghosttable[0], count, sizeof(ghost_t), time_compare);
break;
}
if (outform == O_HTML) {
fprintf(stdout, "<table align=center>\n");
fprintf(stdout, "<tr>");
fprintf(stdout, "<th align=left><a href=\"ghostlist.sh?SORT=name&MAXAGE=%d\">Hostname</a></th>", maxage);
fprintf(stdout, "<th align=left><a href=\"ghostlist.sh?SORT=sender&MAXAGE=%d\">Sent from</a></th>", maxage);
fprintf(stdout, "<th align=left>Candidate</th>");
fprintf(stdout, "<th align=right><a href=\"ghostlist.sh?SORT=time&MAXAGE=%d\">Report age</a></th>", maxage);
fprintf(stdout, "</tr>\n");
}
for (idx = 0; (idx < count); idx++) {
if (!ghosttable[idx].name) continue;
if (!ghosttable[idx].sender) continue;
switch (outform) {
case O_HTML:
fprintf(stdout, "<tr><td align=left>%s</td><td align=left>%s</td>",
ghosttable[idx].name,
ghosttable[idx].sender);
if (ghosttable[idx].candidate) {
fprintf(stdout, "<td align=left><a href=\"%s\">%s</a></td>",
hostsvcurl(xmh_item(ghosttable[idx].candidate, XMH_HOSTNAME), xgetenv("INFOCOLUMN"), 1),
xmh_item(ghosttable[idx].candidate, XMH_HOSTNAME));
}
else {
fprintf(stdout, "<td> </td>");
}
fprintf(stdout, "<td align=right>%ld:%02ld</td></tr>\n",
(now - ghosttable[idx].tstamp)/60, (now - ghosttable[idx].tstamp)%60);
break;
case O_TXT:
fprintf(stdout, "%s\t\t%s\n", ghosttable[idx].sender, ghosttable[idx].name);
break;
}
}
if (outform == O_HTML) {
fprintf(stdout, "</table>\n");
fprintf(stdout, "<br><br><center><a href=\"ghostlist.sh?SORT=%s&MAXAGE=%d&TEXT\">Text report</a></center>\n", htmlquoted(sortstring), maxage);
}
}
else
fprintf(stdout, "<h3><center>Failed to retrieve ghostlist from server</center></h3>\n");
freesendreturnbuf(sres);
if (outform == O_HTML) {
headfoot(stdout, hffile, "", "footer", bgcolor);
}
return 0;
}
int main(int argc, char *argv[])
{
char dirid[PATH_MAX];
char outdir[PATH_MAX];
char xymongencmd[PATH_MAX];
char xymonwebenv[PATH_MAX];
char xymongentimeopt[100];
char *xymongen_argv[20];
pid_t childpid;
int childstat;
char htmldelim[100];
char startstr[20];
int argi, newargi;
char *envarea = NULL;
char *useragent;
int usemultipart = 1;
newargi = 0;
xymongen_argv[newargi++] = xymongencmd;
xymongen_argv[newargi++] = xymongentimeopt;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else {
xymongen_argv[newargi++] = argv[argi];
}
}
xymongen_argv[newargi++] = outdir;
xymongen_argv[newargi++] = NULL;
redirect_cgilog("snapshot");
cgidata = cgi_request();
if (cgidata == NULL) {
/* Present the query form */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
showform(stdout, "snapshot", "snapshot_form", COL_BLUE, getcurrenttime(NULL), NULL, NULL);
return 0;
}
parse_query();
useragent = getenv("HTTP_USER_AGENT");
if (useragent && strstr(useragent, "KHTML")) {
/* KHTML (Konqueror, Safari) cannot handle multipart documents. */
usemultipart = 0;
}
/*
* Need to set these up AFTER putting them into xymongen_argv, since we
* need to have option parsing done first.
*/
if (xgetenv("XYMONGEN")) sprintf(xymongencmd, "%s", xgetenv("XYMONGEN"));
else sprintf(xymongencmd, "%s/bin/xymongen", xgetenv("XYMONHOME"));
snprintf(xymongentimeopt, sizeof(xymongentimeopt), "--snapshot=%u", (unsigned int)starttime);
sprintf(dirid, "%lu-%u", (unsigned long)getpid(), (unsigned int)getcurrenttime(NULL));
sprintf(outdir, "%s/%s", xgetenv("XYMONSNAPDIR"), dirid);
if (mkdir(outdir, 0755) == -1) errormsg("Cannot create output directory");
sprintf(xymonwebenv, "XYMONWEB=%s/%s", xgetenv("XYMONSNAPURL"), dirid);
putenv(xymonwebenv);
if (usemultipart) {
/* Output the "please wait for report ... " thing */
snprintf(htmldelim, sizeof(htmldelim)-1, "xymonrep-%lu-%u", (unsigned long)getpid(), (unsigned int)getcurrenttime(NULL));
printf("Content-type: multipart/mixed;boundary=%s\n", htmldelim);
printf("\n");
printf("%s\n", htmldelim);
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
/* It's ok with these hardcoded values, as they are not used for this page */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
sethostenv_report(starttime, starttime, 97.0, 99.995);
headfoot(stdout, "snapshot", "", "header", COL_BLUE);
strftime(startstr, sizeof(startstr), "%b %d %Y", localtime(&starttime));
printf("<CENTER><A NAME=begindata> </A>\n");
printf("<BR><BR><BR><BR>\n");
printf("<H3>Generating snapshot: %s<BR>\n", htmlquoted(startstr));
printf("<P><P>\n");
fflush(stdout);
}
/* Go do the report */
childpid = fork();
if (childpid == 0) {
execv(xymongencmd, xymongen_argv);
}
else if (childpid > 0) {
wait(&childstat);
/* Ignore SIGHUP so we don't get killed during cleanup of XYMONSNAPDIR */
signal(SIGHUP, SIG_IGN);
if (WIFEXITED(childstat) && (WEXITSTATUS(childstat) != 0) ) {
if (usemultipart) printf("%s\n\n", htmldelim);
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
errormsg("Could not generate report");
}
else {
/* Send the browser off to the report */
if (usemultipart) {
printf("Done...<P></BODY></HTML>\n");
fflush(stdout);
printf("%s\n\n", htmldelim);
}
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
printf("<HTML><HEAD>\n");
printf("<META HTTP-EQUIV=\"REFRESH\" CONTENT=\"0; URL=%s/%s/\"\n",
xgetenv("XYMONSNAPURL"), dirid);
printf("</HEAD><BODY BGCOLOR=\"000000\"></BODY></HTML>\n");
if (usemultipart) printf("\n%s\n", htmldelim);
fflush(stdout);
}
cleandir(xgetenv("XYMONSNAPDIR"));
}
else {
if (usemultipart) printf("%s\n\n", htmldelim);
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
errormsg("Fork failed");
}
return 0;
}
int main(int argc, char *argv[])
{
tasklist_t *twalk, *dwalk;
grouplist_t *gwalk;
int argi;
int daemonize = 1;
int verbose = 0;
char *config = "/etc/tasks.cfg";
char *logfn = NULL;
char *pidfn = NULL;
pid_t cpid;
int status;
struct sigaction sa;
char *envarea = NULL;
for (argi=1; (argi < argc); argi++) {
if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
else if (strcmp(argv[argi], "--no-daemon") == 0) {
daemonize = 0;
}
else if (strcmp(argv[argi], "--verbose") == 0) {
verbose = 1;
}
else if (argnmatch(argv[argi], "--config=")) {
char *p = strchr(argv[argi], '=');
config = strdup(expand_env(p+1));
}
else if (argnmatch(argv[argi], "--log=")) {
char *p = strchr(argv[argi], '=');
logfn = strdup(expand_env(p+1));
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--pidfile=")) {
char *p = strchr(argv[argi], '=');
pidfn = strdup(expand_env(p+1));
}
else if (strcmp(argv[argi], "--dump") == 0) {
/* Dump configuration */
forcereload=1;
load_config(config);
forcereload=0;
for (gwalk = grouphead; (gwalk); gwalk = gwalk->next) {
if (gwalk->maxuse > 1) printf("GROUP %s %d\n", gwalk->groupname, gwalk->maxuse);
}
printf("\n");
for (twalk = taskhead; (twalk); twalk = twalk->next) {
printf("[%s]\n", twalk->key);
printf("\tCMD %s\n", twalk->cmd);
if (twalk->disabled) printf("\tDISABLED\n");
if (twalk->group) printf("\tGROUP %s\n", twalk->group->groupname);
if (twalk->depends) printf("\tNEEDS %s\n", twalk->depends->key);
if (twalk->interval > 0) printf("\tINTERVAL %d\n", twalk->interval);
if (twalk->cronstr) printf("\tCRONDATE %s\n", twalk->cronstr);
if (twalk->maxruntime) printf("\tMAXTIME %d\n", twalk->maxruntime);
if (twalk->logfile) printf("\tLOGFILE %s\n", twalk->logfile);
if (twalk->envfile) printf("\tENVFILE %s\n", twalk->envfile);
if (twalk->envarea) printf("\tENVAREA %s\n", twalk->envarea);
if (twalk->onhostptn) printf("\tONHOST %s\n", twalk->onhostptn);
printf("\n");
}
fflush(stdout);
return 0;
}
else {
fprintf(stderr,"%s: Unsupported argument: %s\n",argv[0],argv[argi]);
fflush(stderr);
return 1;
}
}
/* Go daemon */
if (daemonize) {
pid_t childpid;
/* Become a daemon */
childpid = fork();
if (childpid < 0) {
/* Fork failed */
errprintf("Could not fork child\n");
exit(1);
}
else if (childpid > 0) {
/* Parent exits */
if (pidfn) {
FILE *pidfd = fopen(pidfn, "w");
if (pidfd) {
fprintf(pidfd, "%d\n", (int)childpid);
fclose(pidfd);
}
}
exit(0);
}
/* Child (daemon) continues here */
setsid();
}
/* If using a logfile, switch stdout and stderr to go there */
if (logfn) {
/* Should we close stdin here ? No ... */
reopen_file("/dev/null", "r", stdin);
reopen_file(logfn, "a", stdout);
reopen_file(logfn, "a", stderr);
}
save_errbuf = 0;
setup_signalhandler("xymonlaunch");
memset(&sa, 0, sizeof(sa));
sa.sa_handler = sig_handler;
sigaction(SIGHUP, &sa, NULL);
sigaction(SIGTERM, &sa, NULL);
sigaction(SIGCHLD, &sa, NULL);
errprintf("xymonlaunch starting\n");
while (running) {
time_t now = gettimer();
if (now >= nextcfgload) {
load_config(config);
nextcfgload = (now + 30);
}
if (logfn && dologswitch) {
reopen_file(logfn, "a", stdout);
reopen_file(logfn, "a", stderr);
dologswitch = 0;
}
/* Pick up children that have terminated */
while ((cpid = wait3(&status, WNOHANG, NULL)) > 0) {
for (twalk = taskhead; (twalk && (twalk->pid != cpid)); twalk = twalk->next);
if (twalk) {
twalk->pid = 0;
twalk->beingkilled = 0;
if (WIFEXITED(status)) {
twalk->exitcode = WEXITSTATUS(status);
if (twalk->exitcode) {
errprintf("Task %s terminated, status %d\n", twalk->key, twalk->exitcode);
twalk->failcount++;
}
else {
twalk->failcount = 0;
}
}
else if (WIFSIGNALED(status)) {
twalk->exitcode = -WTERMSIG(status);
twalk->failcount++;
errprintf("Task %s terminated by signal %d\n", twalk->key, abs(twalk->exitcode));
}
if (twalk->group) twalk->group->currentuse--;
/* Tasks that depend on this task should be killed ... */
for (dwalk = taskhead; (dwalk); dwalk = dwalk->next) {
if ((dwalk->depends == twalk) && (dwalk->pid > 0)) {
dwalk->beingkilled = 1;
kill(dwalk->pid, SIGTERM);
}
}
}
}
/* See what new tasks need to get going */
dbgprintf("\n");
dbgprintf("Starting tasklist scan\n");
crongettime();
for (twalk = taskhead; (twalk); twalk = twalk->next) {
if ( (twalk->pid == 0) && !twalk->disabled &&
( ((twalk->interval >= 0) && (now >= (twalk->laststart + twalk->interval))) || /* xymon interval condition */
(twalk->crondate && ((twalk->laststart + 55) < now) && cronmatch(twalk->crondate)) /* cron date */
)
) {
if (twalk->depends && ((twalk->depends->pid == 0) || (twalk->depends->laststart > (now - 5)))) {
dbgprintf("Postponing start of %s due to %s not yet running\n",
twalk->key, twalk->depends->key);
continue;
}
if (twalk->group && (twalk->group->currentuse >= twalk->group->maxuse)) {
dbgprintf("Postponing start of %s due to group %s being busy\n",
twalk->key, twalk->group->groupname);
continue;
}
if ((twalk->failcount > MAX_FAILS) && ((twalk->laststart + 600) < now)) {
dbgprintf("Releasing %s from failure hold\n", twalk->key);
twalk->failcount = 0;
}
if (twalk->failcount > MAX_FAILS) {
dbgprintf("Postponing start of %s due to multiple failures\n", twalk->key);
continue;
}
if (twalk->laststart > (now - 5)) {
dbgprintf("Postponing start of %s, will not try more than once in 5 seconds\n", twalk->key);
continue;
}
dbgprintf("About to start task %s\n", twalk->key);
twalk->laststart = now;
twalk->pid = fork();
if (twalk->pid == 0) {
/* Exec the task */
char *cmd;
char **cmdargs = NULL;
static char tasksleepenv[20],bbsleepenv[20];
/* Setup environment */
if (twalk->envfile) {
dbgprintf("%s -> Loading environment from %s area %s\n",
twalk->key, expand_env(twalk->envfile),
(twalk->envarea ? twalk->envarea : ""));
loadenv(expand_env(twalk->envfile), twalk->envarea);
}
/* Setup TASKSLEEP to match the interval */
sprintf(tasksleepenv, "TASKSLEEP=%d", twalk->interval);
sprintf(bbsleepenv, "BBSLEEP=%d", twalk->interval); /* For compatibility */
putenv(tasksleepenv); putenv(bbsleepenv);
/* Setup command line and arguments */
cmdargs = setup_commandargs(twalk->cmd, &cmd);
/* Point stdout/stderr to a logfile, if requested */
if (twalk->logfile) {
char *logfn = expand_env(twalk->logfile);
dbgprintf("%s -> Assigning stdout/stderr to log '%s'\n", twalk->key, logfn);
reopen_file(logfn, "a", stdout);
reopen_file(logfn, "a", stderr);
}
/* Go! */
dbgprintf("%s -> Running '%s', XYMONHOME=%s\n", twalk->key, cmd, xgetenv("XYMONHOME"));
execvp(cmd, cmdargs);
/* Should never go here */
errprintf("Could not start task %s using command '%s': %s\n",
twalk->key, cmd, strerror(errno));
exit(0);
}
else if (twalk->pid == -1) {
/* Fork failed */
errprintf("Fork failed!\n");
twalk->pid = 0;
}
else {
if (twalk->group) twalk->group->currentuse++;
if (verbose) errprintf("Task %s started with PID %d\n", twalk->key, (int)twalk->pid);
}
}
else if (twalk->pid > 0) {
dbgprintf("Task %s active with PID %d\n", twalk->key, (int)twalk->pid);
if (twalk->maxruntime && ((now - twalk->laststart) > twalk->maxruntime)) {
errprintf("Killing hung task %s (PID %d) after %d seconds\n",
twalk->key, (int)twalk->pid,
(now - twalk->laststart));
kill(twalk->pid, (twalk->beingkilled ? SIGKILL : SIGTERM));
twalk->beingkilled = 1; /* Next time it's a real kill */
}
}
}
sleep(5);
}
/* Shutdown running tasks */
for (twalk = taskhead; (twalk); twalk = twalk->next) {
if (twalk->pid) kill(twalk->pid, SIGTERM);
}
if (pidfn) unlink(pidfn);
return 0;
}
int main(int argc, char *argv[])
{
char dirid[PATH_MAX];
char outdir[PATH_MAX];
char xymonwebenv[PATH_MAX];
char xymongencmd[PATH_MAX];
char xymongentimeopt[100];
char csvdelimopt[100];
char *xymongen_argv[20];
pid_t childpid;
int childstat;
char htmldelim[100];
char startstr[30], endstr[30];
int cleanupoldreps = 1;
int argi, newargi;
char *envarea = NULL;
char *useragent = NULL;
int usemultipart = 1;
newargi = 0;
xymongen_argv[newargi++] = xymongencmd;
xymongen_argv[newargi++] = xymongentimeopt;
for (argi=1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[1], "--noclean") == 0) {
cleanupoldreps = 0;
}
else {
xymongen_argv[newargi++] = argv[argi];
}
}
redirect_cgilog("report");
cgidata = cgi_request();
if (cgidata == NULL) {
/* Present the query form */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
showform(stdout, "report", "report_form", COL_BLUE, getcurrenttime(NULL)-86400, NULL, NULL);
return 0;
}
useragent = getenv("HTTP_USER_AGENT");
if (useragent && strstr(useragent, "KHTML")) {
/* KHTML (Konqueror, Safari) cannot handle multipart documents. */
usemultipart = 0;
}
envcheck(reqenv);
parse_query();
/*
* We need to set these variables up AFTER we have put them into the xymongen_argv[] array.
* We cannot do it before, because we need the environment that the command-line options
* might provide.
*/
if (xgetenv("XYMONGEN")) sprintf(xymongencmd, "%s", xgetenv("XYMONGEN"));
else sprintf(xymongencmd, "%s/bin/xymongen", xgetenv("XYMONHOME"));
snprintf(xymongentimeopt, sizeof(xymongentimeopt)-1,"--reportopts=%u:%u:1:%s", (unsigned int)starttime, (unsigned int)endtime, style);
sprintf(dirid, "%u-%u", (unsigned int)getpid(), (unsigned int)getcurrenttime(NULL));
if (!csvoutput) {
sprintf(outdir, "%s/%s", xgetenv("XYMONREPDIR"), dirid);
mkdir(outdir, 0755);
xymongen_argv[newargi++] = outdir;
sprintf(xymonwebenv, "XYMONWEB=%s/%s", xgetenv("XYMONREPURL"), dirid);
putenv(xymonwebenv);
}
else {
sprintf(outdir, "--csv=%s/%s.csv", xgetenv("XYMONREPDIR"), dirid);
xymongen_argv[newargi++] = outdir;
sprintf(csvdelimopt, "--csvdelim=%c", csvdelim);
xymongen_argv[newargi++] = csvdelimopt;
}
xymongen_argv[newargi++] = NULL;
if (usemultipart) {
/* Output the "please wait for report ... " thing */
snprintf(htmldelim, sizeof(htmldelim)-1, "xymonrep-%u-%u", (int)getpid(), (unsigned int)getcurrenttime(NULL));
printf("Content-type: multipart/mixed;boundary=%s\n", htmldelim);
printf("\n");
printf("--%s\n", htmldelim);
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
/* It's ok with these hardcoded values, as they are not used for this page */
sethostenv("", "", "", colorname(COL_BLUE), NULL);
sethostenv_report(starttime, endtime, 97.0, 99.995);
headfoot(stdout, "repnormal", "", "header", COL_BLUE);
strftime(startstr, sizeof(startstr), "%b %d %Y", localtime(&starttime));
strftime(endstr, sizeof(endstr), "%b %d %Y", localtime(&endtime));
printf("<CENTER><A NAME=begindata> </A>\n");
printf("<BR><BR><BR><BR>\n");
printf("<H3>Generating report for the period: %s", htmlquoted(startstr));
printf(" - %s ", htmlquoted(endstr));
printf("(%s)<BR>\n", htmlquoted(style));
printf("<P><P>\n");
fflush(stdout);
}
/* Go do the report */
childpid = fork();
if (childpid == 0) {
execv(xymongencmd, xymongen_argv);
}
else if (childpid > 0) {
wait(&childstat);
/* Ignore SIGHUP so we dont get killed during cleanup of XYMONREPDIR */
signal(SIGHUP, SIG_IGN);
if (WIFEXITED(childstat) && (WEXITSTATUS(childstat) != 0) ) {
char msg[4096];
if (usemultipart) printf("--%s\n\n", htmldelim);
sprintf(msg, "Could not generate report.<br>\nCheck that the %s/www/rep/ directory has permissions '-rwxrwxr-x' (775)<br>\n and that is is set to group %d", xgetenv("XYMONHOME"), (int)getgid());
errormsg(msg);
}
else {
/* Send the browser off to the report */
if (usemultipart) {
printf("Done...Report is <A HREF=\"%s/%s/%s\">here</a>.</P></BODY></HTML>\n", xgetenv("XYMONREPURL"), dirid, suburl);
fflush(stdout);
printf("--%s\n\n", htmldelim);
}
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
printf("<HTML><HEAD>\n");
if (!csvoutput) {
printf("<META HTTP-EQUIV=\"REFRESH\" CONTENT=\"0; URL=%s/%s/%s\"\n",
xgetenv("XYMONREPURL"), dirid, suburl);
printf("</HEAD><BODY>Report is available <a href=\"%s/%s/%s\">here</a></BODY></HTML>\n",
xgetenv("XYMONREPURL"), dirid, suburl);
}
else {
printf("<META HTTP-EQUIV=\"REFRESH\" CONTENT=\"0; URL=%s/%s.csv\"\n",
xgetenv("XYMONREPURL"), dirid);
printf("</HEAD><BODY>Report is available <a href=\"%s/%s.csv\">here</a></BODY></HTML>\n",
xgetenv("XYMONREPURL"), dirid);
}
if (usemultipart) printf("\n--%s\n", htmldelim);
fflush(stdout);
}
if (cleanupoldreps) cleandir(xgetenv("XYMONREPDIR"));
}
else {
if (usemultipart) printf("--%s\n\n", htmldelim);
printf("Content-Type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
errormsg("Fork failed");
}
return 0;
}
int main(int argc, char **argv)
{
pcre *hostptn, *exhostptn, *pageptn, *expageptn;
void *hwalk;
char *hostname, *pagename;
hostptn = exhostptn = pageptn = expageptn = NULL;
if (getenv("QUERY_STRING") == NULL) {
/* Not invoked through the CGI */
if (argc < 4) {
errprintf("Usage:\n%s HOSTNAME-PATTERN STARTTIME ENDTIME", argv[0]);
return 1;
}
hostpattern = argv[1];
if (strncmp(hostpattern, "--page=", 7) == 0) {
pagepattern = strchr(argv[1], '=') + 1;
hostpattern = NULL;
}
starttimedate = argv[2]; starttimehm = "00:00:00";
endtimedate = argv[3]; endtimehm = "00:00:00";
if (argc > 4) {
if (strncmp(argv[4], "--csv", 5) == 0) {
char *p;
outform = O_CSV;
if ((p = strchr(argv[4], '=')) != NULL) csvdelim = *(p+1);
}
}
}
else {
char *envarea = NULL;
int argi;
for (argi = 1; (argi < argc); argi++) {
if (argnmatch(argv[argi], "--env=")) {
char *p = strchr(argv[argi], '=');
loadenv(p+1, envarea);
}
else if (argnmatch(argv[argi], "--area=")) {
char *p = strchr(argv[argi], '=');
envarea = strdup(p+1);
}
else if (strcmp(argv[argi], "--debug") == 0) {
debug = 1;
}
}
/* Parse CGI parameters */
parse_query();
format_rrdtime(starttime, &starttimedate, &starttimehm);
format_rrdtime(endtime, &endtimedate, &endtimehm);
switch (outform) {
case O_XML:
printf("Content-type: application/xml\n\n");
break;
case O_CSV:
printf("Content-type: text/csv\n\n");
break;
case O_NONE:
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
printf("Content-type: %s\n\n", xgetenv("HTMLCONTENTTYPE"));
showform(stdout, "perfdata", "perfdata_form", COL_BLUE, getcurrenttime(NULL), NULL, NULL);
return 0;
}
}
load_hostnames(xgetenv("HOSTSCFG"), NULL, get_fqdn());
if (hostpattern) hostptn = compileregex(hostpattern);
if (exhostpattern) exhostptn = compileregex(exhostpattern);
if (pagepattern) pageptn = compileregex(pagepattern);
if (expagepattern) expageptn = compileregex(expagepattern);
switch (outform) {
case O_XML:
printf("<?xml version='1.0' encoding='ISO-8859-1'?>\n");
printf("<datasets>\n");
break;
default:
break;
}
dbgprintf("Got hosts, it is %s\n", (first_host() == NULL) ? "empty" : "not empty");
for (hwalk = first_host(); (hwalk); hwalk = next_host(hwalk, 0)) {
hostname = xmh_item(hwalk, XMH_HOSTNAME);
pagename = xmh_item(hwalk, XMH_PAGEPATH);
dbgprintf("Processing host %s\n", hostname);
if (hostpattern && !matchregex(hostname, hostptn)) continue;
if (exhostpattern && matchregex(hostname, exhostptn)) continue;
if (pagepattern && !matchregex(pagename, pageptn)) continue;
if (expagepattern && matchregex(pagename, expageptn)) continue;
onehost(hostname, starttime, endtime);
}
switch (outform) {
case O_XML:
printf("</datasets>\n");
break;
default:
break;
}
return 0;
}