void print_hoststatus(FILE *output, hstatus_t *itm, RbtHandle columns, int prio, int firsthost)
{
void *hinfo;
char *dispname, *ip, *key;
time_t now;
RbtIterator colhandle;
now = getcurrenttime(NULL);
hinfo = hostinfo(itm->hostname);
dispname = xmh_item(hinfo, XMH_DISPLAYNAME);
ip = xmh_item(hinfo, XMH_IP);
fprintf(output, "<TR>\n");
/* Print the priority */
fprintf(output, "<TD ALIGN=LEFT VALIGN=TOP WIDTH=25%% NOWRAP>");
if (firsthost)
fprintf(output, "<FONT %s>PRIO %d</FONT>", xgetenv("XYMONPAGEROWFONT"), prio);
else
fprintf(output, " ");
fprintf(output, "</TD>\n");
/* Print the hostname with a link to the critical systems info page */
fprintf(output, "<TD ALIGN=LEFT>%s</TD>\n", hostnamehtml(itm->hostname, NULL, usetooltips));
key = (char *)malloc(strlen(itm->hostname) + 1024);
for (colhandle = rbtBegin(columns); (colhandle != rbtEnd(columns)); colhandle = rbtNext(columns, colhandle)) {
void *k1, *k2;
char *colname;
RbtIterator sthandle;
fprintf(output, "<TD ALIGN=CENTER>");
rbtKeyValue(columns, colhandle, &k1, &k2);
colname = (char *)k1;
sprintf(key, "%s|%s", itm->hostname, colname);
sthandle = rbtFind(rbstate, key);
if (sthandle == rbtEnd(rbstate)) {
fprintf(output, "-");
}
else {
hstatus_t *column;
char *htmlalttag;
char *htmlackstr;
rbtKeyValue(rbstate, sthandle, &k1, &k2);
column = (hstatus_t *)k2;
if (column->config->priority != prio)
fprintf(output, "-");
else {
time_t age = now - column->lastchange;
char *htmlgroupstr;
char *htmlextrastr;
htmlalttag = alttag(colname, column->color, 0, 1, agestring(age));
htmlackstr = (column->ackmsg ? column->ackmsg : "");
htmlgroupstr = strdup(urlencode(column->config->ttgroup ? column->config->ttgroup : ""));
htmlextrastr = strdup(urlencode(column->config->ttextra ? column->config->ttextra : ""));
fprintf(output, "<A HREF=\"%s&NKPRIO=%d&NKTTGROUP=%s&NKTTEXTRA=%s\">",
hostsvcurl(itm->hostname, colname, 1),
prio,
htmlgroupstr, htmlextrastr);
fprintf(output, "<IMG SRC=\"%s/%s\" ALT=\"%s\" TITLE=\"%s %s\" HEIGHT=\"%s\" WIDTH=\"%s\" BORDER=0></A>",
xgetenv("XYMONSKIN"),
dotgiffilename(column->color, (column->acktime > 0), (age > oldlimit)),
colorname(column->color), htmlalttag, htmlackstr,
xgetenv("DOTHEIGHT"), xgetenv("DOTWIDTH"));
xfree(htmlgroupstr);
xfree(htmlextrastr);
}
}
fprintf(output, "</TD>\n");
}
xfree(key);
fprintf(output, "</TR>\n");
}
void print_hoststatus(FILE *output, hstatus_t *itm, void * statetree, void * columns, int prio, int firsthost, int firsthostever)
{
char *key;
time_t now;
xtreePos_t colhandle;
now = getcurrenttime(NULL);
fprintf(output, "<TR>\n");
/* Print the priority */
fprintf(output, "<TD ALIGN=LEFT VALIGN=TOP WIDTH=10%% NOWRAP>");
if (firsthost)
if (prio == 99) {
if (firsthostever)
/* Only non-prioritised hosts, so just drop that text */
fprintf(output, " ");
else
fprintf(output, "<FONT %s>No priority</FONT>", xgetenv("XYMONPAGEROWFONT"));
}
else {
fprintf(output, "<FONT %s>PRIO %d</FONT>", xgetenv("XYMONPAGEROWFONT"), prio);
}
else
fprintf(output, " ");
fprintf(output, "</TD>\n");
/* Print the hostname with a link to the critical systems info page */
fprintf(output, "<TD ALIGN=LEFT>%s</TD>\n", hostnamehtml(itm->hostname, NULL, usetooltips));
key = (char *)malloc(1024);
for (colhandle = xtreeFirst(columns); (colhandle != xtreeEnd(columns)); colhandle = xtreeNext(columns, colhandle)) {
char *colname;
xtreePos_t sthandle;
fprintf(output, "<TD ALIGN=CENTER>");
colname = (char *)xtreeKey(columns, colhandle);
key = (char *)realloc(key, 2 + strlen(itm->hostname) + strlen(colname));
sprintf(key, "%s|%s", itm->hostname, colname);
sthandle = xtreeFind(statetree, key);
if (sthandle == xtreeEnd(statetree)) {
fprintf(output, "-");
}
else {
hstatus_t *column;
char *htmlalttag;
char *htmlackstr;
column = (hstatus_t *)xtreeData(statetree, sthandle);
if (column->config->priority != prio)
fprintf(output, "-");
else {
time_t age = now - column->lastchange;
char *htmlgroupstr;
char *htmlextrastr;
htmlalttag = alttag(colname, column->color, 0, 1, agestring(age));
htmlackstr = (column->ackmsg ? column->ackmsg : "");
htmlgroupstr = strdup(urlencode(column->config->ttgroup ? column->config->ttgroup : ""));
htmlextrastr = strdup(urlencode(column->config->ttextra ? column->config->ttextra : ""));
fprintf(output, "<A HREF=\"%s&NKPRIO=%d&NKTTGROUP=%s&NKTTEXTRA=%s\">",
hostsvcurl(itm->hostname, colname, 1),
prio,
htmlgroupstr, htmlextrastr);
fprintf(output, "<IMG SRC=\"%s/%s\" ALT=\"%s\" TITLE=\"%s %s\" HEIGHT=\"%s\" WIDTH=\"%s\" BORDER=0></A>",
xgetenv("XYMONSKIN"),
dotgiffilename(column->color, (column->acktime > 0), (age > oldlimit)),
colorname(column->color), htmlalttag, htmlackstr,
xgetenv("DOTHEIGHT"), xgetenv("DOTWIDTH"));
xfree(htmlgroupstr);
xfree(htmlextrastr);
}
}
fprintf(output, "</TD>\n");
}
xfree(key);
fprintf(output, "</TR>\n");
}
state_t *init_state(char *filename, logdata_t *log)
{
FILE *fd = NULL;
char *p;
char *hostname;
char *testname;
char *testnameidx;
state_t *newstate;
char fullfn[PATH_MAX];
host_t *host;
struct stat log_st;
time_t now = getcurrenttime(NULL);
time_t histentry_start;
int logexpired = 0;
int propagating, isacked;
dbgprintf("init_state(%s, %d, ...)\n", textornull(filename));
/* Ignore summary files and dot-files (this catches "." and ".." also) */
if ( (strncmp(filename, "summary.", 8) == 0) || (filename[0] == '.')) {
return NULL;
}
if (reportstart || snapshot) {
/* Dont do reports for info- and trends-columns */
p = strrchr(filename, '.');
if (p == NULL) return NULL;
p++;
if (strcmp(p, xgetenv("INFOCOLUMN")) == 0) return NULL;
if (strcmp(p, xgetenv("TRENDSCOLUMN")) == 0) return NULL;
/*
* When doing reports, we are scanning the BBHIST directory. It may
* contain files that are named as a host only (no test-name).
* Skip those.
*/
if (find_host(filename)) return NULL;
}
if (!reportstart && !snapshot) {
hostname = strdup(log->hostname);
testname = strdup(log->testname);
logexpired = (log->validtime < now);
}
else {
sprintf(fullfn, "%s/%s", xgetenv("BBHIST"), filename);
/* Check that we can access this file */
if ( (stat(fullfn, &log_st) == -1) ||
(!S_ISREG(log_st.st_mode)) ||
((fd = fopen(fullfn, "r")) == NULL) ) {
errprintf("Weird file '%s' skipped\n", fullfn);
return NULL;
}
/* Pick out host- and test-name */
logexpired = (log_st.st_mtime < now);
hostname = strdup(filename);
p = strrchr(hostname, '.');
/* Skip files that have no '.' in filename */
if (p) {
/* Pick out the testname ... */
*p = '\0'; p++;
testname = strdup(p);
/* ... and change hostname back into normal form */
for (p=hostname; (*p); p++) {
if (*p == ',') *p='.';
}
}
else {
xfree(hostname);
fclose(fd);
return NULL;
}
}
/* Must do these first to get the propagation value for the statistics */
host = find_host(hostname);
isacked = (log->acktime > now);
propagating = checkpropagation(host, testname, log->color, isacked);
/* Count all of the real columns */
if ( (strcmp(testname, xgetenv("INFOCOLUMN")) != 0) && (strcmp(testname, xgetenv("TRENDSCOLUMN")) != 0) ) {
statuscount++;
switch (log->color) {
case COL_RED:
case COL_YELLOW:
if (propagating) colorcount[log->color] += 1;
else colorcount_noprop[log->color] += 1;
break;
default:
colorcount[log->color] += 1;
break;
}
}
testnameidx = (char *)malloc(strlen(testname) + 3);
sprintf(testnameidx, ",%s,", testname);
if (unwantedcolumn(hostname, testname) || (ignorecolumns && strstr(ignorecolumns, testnameidx))) {
xfree(hostname);
xfree(testname);
xfree(testnameidx);
if (fd) fclose(fd);
return NULL; /* Ignore this type of test */
}
xfree(testnameidx);
newstate = (state_t *) calloc(1, sizeof(state_t));
newstate->entry = (entry_t *) calloc(1, sizeof(entry_t));
newstate->next = NULL;
newstate->entry->column = find_or_create_column(testname, 1);
newstate->entry->color = -1;
strcpy(newstate->entry->age, "");
newstate->entry->oldage = 0;
newstate->entry->propagate = 1;
newstate->entry->testflags = NULL;
newstate->entry->skin = NULL;
newstate->entry->repinfo = NULL;
newstate->entry->causes = NULL;
newstate->entry->histlogname = NULL;
newstate->entry->shorttext = NULL;
if (host) {
newstate->entry->alert = checkalert(host->alerts, testname);
/* If no WAP's specified, default all tests to be on WAP page */
newstate->entry->onwap = (host->waps ? checkalert(host->waps, testname) : 1);
}
else {
dbgprintf(" hostname %s not found\n", hostname);
newstate->entry->alert = newstate->entry->onwap = 0;
}
newstate->entry->sumurl = NULL;
if (reportstart) {
/* Determine "color" for this test from the historical data */
newstate->entry->repinfo = (reportinfo_t *) calloc(1, sizeof(reportinfo_t));
newstate->entry->color = parse_historyfile(fd, newstate->entry->repinfo,
(dynamicreport ? NULL: hostname), (dynamicreport ? NULL : testname),
reportstart, reportend, 0,
(host ? host->reportwarnlevel : reportwarnlevel),
reportgreenlevel,
(host ? host->reportwarnstops : reportwarnstops),
(host ? host->reporttime : NULL));
newstate->entry->causes = (dynamicreport ? NULL : save_replogs());
}
else if (snapshot) {
time_t fileage = snapshot - histentry_start;
newstate->entry->color = history_color(fd, snapshot, &histentry_start, &newstate->entry->histlogname);
newstate->entry->oldage = (fileage >= recentgif_limit);
newstate->entry->fileage = fileage;
strcpy(newstate->entry->age, agestring(fileage));
}
else {
time_t fileage = (now - log->lastchange);
newstate->entry->color = log->color;
newstate->entry->testflags = strdup(log->testflags);
if (testflag_set(newstate->entry, 'D')) newstate->entry->skin = dialupskin;
if (testflag_set(newstate->entry, 'R')) newstate->entry->skin = reverseskin;
newstate->entry->shorttext = strdup(log->msg);
newstate->entry->acked = isacked;
newstate->entry->oldage = (fileage >= recentgif_limit);
newstate->entry->fileage = (log->lastchange ? fileage : -1);
if (log->lastchange == 0)
strcpy(newstate->entry->age, "");
else
strcpy(newstate->entry->age, agestring(fileage));
}
if (purplelog && (newstate->entry->color == COL_PURPLE)) {
fprintf(purplelog, "%s %s%s\n",
hostname, testname, (host ? " (expired)" : " (unknown host)"));
}
newstate->entry->propagate = propagating;
dbgprintf("init_state: hostname=%s, testname=%s, color=%d, acked=%d, age=%s, oldage=%d, propagate=%d, alert=%d\n",
textornull(hostname), textornull(testname),
newstate->entry->color, newstate->entry->acked,
textornull(newstate->entry->age), newstate->entry->oldage,
newstate->entry->propagate, newstate->entry->alert);
if (host) {
hostlist_t *l;
/* Add this state entry to the host's list of state entries. */
newstate->entry->next = host->entries;
host->entries = newstate->entry;
/* There may be multiple host entries, if a host is
* listed in several locations in bb-hosts (for display purposes).
* This is handled by updating ALL of the cloned host records.
* Bug reported by Bluejay Adametz of Fuji.
*/
/* Cannot use "find_host()" here, as we need the hostlink record, not the host record */
l = find_hostlist(hostname);
/* Walk through the clone-list and set the "entries" for all hosts */
for (l=l->clones; (l); l = l->clones) l->hostentry->entries = host->entries;
}
else {
/* No host for this test - must be missing from bb-hosts */
newstate->entry->next = NULL;
}
xfree(hostname);
xfree(testname);
if (fd) fclose(fd);
return newstate;
}
