/* * disp_web.c - output in fancy new format * * MetaServerII * Copyright (c) 1993 by Andy McFadden * * $Id: disp_web.c,v 1.5 1999/11/13 01:14:59 unbelver Exp $ * */ #include #include #include #include "meta.h" #define SEMI_VERBOSE /* not quite fully verbose */ /* "when" should be the length of time in seconds */ static char * nice_time(when) time_t when; { static char buf[64]; if (when < 120) sprintf(buf, "%d seconds", when); else if (when/60 < 120) sprintf(buf, "%d minutes", when/60); else if (when/3600 < 48) sprintf(buf, "%d hours", when/3600); else sprintf(buf, "%d days", when/(3600*24)); return (buf); } int display_web(idx, port_idx) int idx, port_idx; { register int i; USER *up; SERVER *sp; time_t now; int srv, ago, *sorted; char flagbuf[8], buf[128]; char *cp; up = &users[idx]; if(up->buf) { free(up->buf); up->buf = NULL; } up->data_size = up->buf_size = up->pos = 0; now = time(0); /* print server header */ Uprintf(idx, "HTTP/1.0 200 OK\n"); Uprintf(idx, "Server: netrekmetarc/1.0\n"); Uprintf(idx, "MIME-version: 1.0\n"); Uprintf(idx, "Content-type: text/html\n\n"); /* print page */ Uprintf(idx, "\ MetaServer II Server List\n\

MetaServer II Server List

\n"); Uprintf(idx, "\ \ \ \ \ \ \n"); /* print player info */ sorted = sort_servers(); for (srv = 0; srv < server_count; srv++) { /* (need to sort these?) */ sp = &servers[sorted[srv]]; if (sp->status == SS_WORKING) sp = &prev_info; if (!policy_show(sp)) continue; Uprintf(idx, "\n\n", sp->hostname, sp->port); strcpy(flagbuf, " "); for (i = 0; i < 6; i++) if (sp->display_flags & flags[i].bit) flagbuf[i] = flags[i].chr; flagbuf[6] = sp->type[0]; /* hack in the type field */ ago = (now - sp->last_update) / 60; switch (sp->status) { case SS_INIT: Uprintf(idx, "\n"); break; case SS_WORKING: Uprintf(idx, "\n"); break; case SS_NOCONN: switch (sp->why_dead) { case WD_CONN: Uprintf(idx, "\n", ago, "* No connection", flagbuf); break; case WD_READ: Uprintf(idx, "\n", ago, "* Bad read", flagbuf); break; case WD_GARBAGE: Uprintf(idx, "\n", ago, "* Garbaged read", flagbuf); break; case WD_TIMEOUT: Uprintf(idx, "\n", ago, "* Timed out", flagbuf); break; case WD_FLOODING: Uprintf(idx, "\n", ago, "* Flooding", flagbuf); break; default: Uprintf(idx, "\n", ago, "* Not responding", flagbuf); break; } break; case SS_EMPTY: Uprintf(idx, "\n", ago, "Nobody playing", flagbuf); break; case SS_OPEN: sprintf(buf, "OPEN: %d player%s", sp->player_count, (sp->player_count != 1) ? "s" : ""); Uprintf(idx, "\n", ago, buf, flagbuf); break; case SS_QUEUE: sprintf(buf, "Wait queue: %d", sp->queue_size); Uprintf(idx, "\n", ago, buf, flagbuf); break; default: /* huh? */ fprintf(stderr, "Internal ERROR: strange state in disp_new\n"); break; } Uprintf(idx, "\n"); } /* print footer */ Uprintf(idx, "

Server Host

Port

Minutes Ago

Status

Flags

(no data yet)

(scanning server now)

\n"); Uprintf(idx, "

(This is MetaServerII v%s on port %d, \n", VERSION, ports[port_idx].port); cp = ctime(&now); cp[strlen(cp)-1] = '\0'; /* playing with fire? */ Uprintf(idx, "date in %s is %s, data spans %s, \n", location, cp, nice_time(now-checktime)); Uprintf(idx, "send administrative requests to %s, ", admin, admin); Uprintf(idx, "retry periods in minutes are "); Uprintf(idx, "down:%d empty:%d open:%d queue:%d)

\n\n", wait_noconn, wait_empty, wait_open, wait_queue); Uprintf(idx, "

Link to US metaserver

\n"); Uprintf(idx, "

Link to European metaserver\n"); return(0); }