742 lines
19 KiB
C
742 lines
19 KiB
C
|
#include "qtv.h"
|
||
|
|
|
||
|
|
//main reason to use connection close is because we're lazy and don't want to give sizes in advance (yes, we could use chunks..)
|
||
|
|
|
||
|
|
//#define ALLOWDOWNLOADS
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
static const char qfont_table[256] = {
|
||
|
|
'\0', '#', '#', '#', '#', '.', '#', '#',
|
||
|
|
'#', 9, 10, '#', ' ', 13, '.', '.',
|
||
|
|
'[', ']', '0', '1', '2', '3', '4', '5',
|
||
|
|
'6', '7', '8', '9', '.', '<', '=', '>',
|
||
|
|
' ', '!', '"', '#', '$', '%', '&', '\'',
|
||
|
|
'(', ')', '*', '+', ',', '-', '.', '/',
|
||
|
|
'0', '1', '2', '3', '4', '5', '6', '7',
|
||
|
|
'8', '9', ':', ';', '<', '=', '>', '?',
|
||
|
|
'@', 'A', 'B', 'C', 'D', 'E', 'F', 'G',
|
||
|
|
'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O',
|
||
|
|
'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W',
|
||
|
|
'X', 'Y', 'Z', '[', '\\', ']', '^', '_',
|
||
|
|
'`', 'a', 'b', 'c', 'd', 'e', 'f', 'g',
|
||
|
|
'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o',
|
||
|
|
'p', 'q', 'r', 's', 't', 'u', 'v', 'w',
|
||
|
|
'x', 'y', 'z', '{', '|', '}', '~', '<',
|
||
|
|
|
||
|
|
'<', '=', '>', '#', '#', '.', '#', '#',
|
||
|
|
'#', '#', ' ', '#', ' ', '>', '.', '.',
|
||
|
|
'[', ']', '0', '1', '2', '3', '4', '5',
|
||
|
|
'6', '7', '8', '9', '.', '<', '=', '>',
|
||
|
|
' ', '!', '"', '#', '$', '%', '&', '\'',
|
||
|
|
'(', ')', '*', '+', ',', '-', '.', '/',
|
||
|
|
'0', '1', '2', '3', '4', '5', '6', '7',
|
||
|
|
'8', '9', ':', ';', '<', '=', '>', '?',
|
||
|
|
'@', 'A', 'B', 'C', 'D', 'E', 'F', 'G',
|
||
|
|
'H', 'I', 'J', 'K', 'L', 'M', 'N', 'O',
|
||
|
|
'P', 'Q', 'R', 'S', 'T', 'U', 'V', 'W',
|
||
|
|
'X', 'Y', 'Z', '[', '\\', ']', '^', '_',
|
||
|
|
'`', 'a', 'b', 'c', 'd', 'e', 'f', 'g',
|
||
|
|
'h', 'i', 'j', 'k', 'l', 'm', 'n', 'o',
|
||
|
|
'p', 'q', 'r', 's', 't', 'u', 'v', 'w',
|
||
|
|
'x', 'y', 'z', '{', '|', '}', '~', '<'
|
||
|
|
};
|
||
|
|
|
||
|
|
static void HTMLprintf(char *outb, int outl, char *fmt, ...)
|
||
|
|
{
|
||
|
|
va_list val;
|
||
|
|
char qfmt[8192*4];
|
||
|
|
char *inb = qfmt;
|
||
|
|
|
||
|
|
va_start(val, fmt);
|
||
|
|
vsnprintf(qfmt, sizeof(qfmt), fmt, val);
|
||
|
|
va_end(val);
|
||
|
|
qfmt[sizeof(qfmt)-1] = 0;
|
||
|
|
|
||
|
|
outl--;
|
||
|
|
outl -= 5;
|
||
|
|
while (outl > 0 && *inb)
|
||
|
|
{
|
||
|
|
if (*inb == '<')
|
||
|
|
{
|
||
|
|
*outb++ = '&';
|
||
|
|
*outb++ = 'l';
|
||
|
|
*outb++ = 't';
|
||
|
|
*outb++ = ';';
|
||
|
|
outl -= 4;
|
||
|
|
}
|
||
|
|
else if (*inb == '>')
|
||
|
|
{
|
||
|
|
*outb++ = '&';
|
||
|
|
*outb++ = 'g';
|
||
|
|
*outb++ = 't';
|
||
|
|
*outb++ = ';';
|
||
|
|
outl -= 4;
|
||
|
|
}
|
||
|
|
else if (*inb == '\n')
|
||
|
|
{
|
||
|
|
*outb++ = '<';
|
||
|
|
*outb++ = 'b';
|
||
|
|
*outb++ = 'r';
|
||
|
|
*outb++ = '/';
|
||
|
|
*outb++ = '>';
|
||
|
|
outl -= 5;
|
||
|
|
}
|
||
|
|
else if (*inb == '&')
|
||
|
|
{
|
||
|
|
*outb++ = '&';
|
||
|
|
*outb++ = 'a';
|
||
|
|
*outb++ = 'm';
|
||
|
|
*outb++ = 'p';
|
||
|
|
*outb++ = ';';
|
||
|
|
outl -= 5;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
*outb++ = qfont_table[*(unsigned char*)inb];
|
||
|
|
}
|
||
|
|
inb++;
|
||
|
|
}
|
||
|
|
*outb++ = 0;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_SendHTTPHeader(cluster_t *cluster, oproxy_t *dest, char *error_code, char *content_type, qboolean nocache)
|
||
|
|
{
|
||
|
|
char *s;
|
||
|
|
char buffer[2048];
|
||
|
|
|
||
|
|
if (nocache)
|
||
|
|
{
|
||
|
|
s = "HTTP/1.1 %s OK\n"
|
||
|
|
"Content-Type: %s\n"
|
||
|
|
"Cache-Control: no-cache, must-revalidate\n"
|
||
|
|
"Expires: Mon, 26 Jul 1997 05:00:00 GMT\n"
|
||
|
|
"Connection: close\n"
|
||
|
|
"\n";
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
s = "HTTP/1.1 %s OK\n"
|
||
|
|
"Content-Type: %s\n"
|
||
|
|
"Connection: close\n"
|
||
|
|
"\n";
|
||
|
|
}
|
||
|
|
|
||
|
|
snprintf(buffer, sizeof(buffer), s, error_code, content_type);
|
||
|
|
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_SendHTMLHeader(cluster_t *cluster, oproxy_t *dest, char *title)
|
||
|
|
{
|
||
|
|
char *s;
|
||
|
|
char buffer[2048];
|
||
|
|
|
||
|
|
s = "<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.01 Transitional//EN\" \"http://www.w3.org/TR/html4/loose.dtd\">\n"
|
||
|
|
"<html>\n"
|
||
|
|
"<head>\n"
|
||
|
|
" <meta http-equiv=\"content-type\" content=\"text/html; charset=iso-8859-1\">\n"
|
||
|
|
" <title>%s</title>\n"
|
||
|
|
" <link rel=\"StyleSheet\" href=\"/style.css\" type=\"text/css\" />\n"
|
||
|
|
"</head>\n"
|
||
|
|
"<body><div id=\"navigation\"><ul>"
|
||
|
|
"<li><a href=\"/nowplaying/\">Live</a></li><li><a href=\"/demos/\">Demos</a></li><li><a href=\"/admin/\">Admin</a></li>"
|
||
|
|
"</ul></div>";
|
||
|
|
|
||
|
|
snprintf(buffer, sizeof(buffer), s, title);
|
||
|
|
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_SendHTMLFooter(cluster_t *cluster, oproxy_t *dest)
|
||
|
|
{
|
||
|
|
char *s;
|
||
|
|
char buffer[2048];
|
||
|
|
|
||
|
|
sprintf(buffer, "<br/>QTV Version: %i <a href=\"http://www.fteqw.com\">www.fteqw.com</a><br />", cluster->buildnumber);
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
|
||
|
|
s = "</body>\n"
|
||
|
|
"</html>\n";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
}
|
||
|
|
|
||
|
|
#define HTMLPRINT(str) Net_ProxySend(cluster, dest, str "\n", strlen(str "\n"))
|
||
|
|
|
||
|
|
static void HTTPSV_GenerateNowPlaying(cluster_t *cluster, oproxy_t *dest)
|
||
|
|
{
|
||
|
|
int player;
|
||
|
|
char *s;
|
||
|
|
char buffer[1024];
|
||
|
|
char plname[64];
|
||
|
|
sv_t *streams;
|
||
|
|
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "200", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "QuakeTV: Now Playing");
|
||
|
|
|
||
|
|
if (!strcmp(cluster->hostname, DEFAULT_HOSTNAME))
|
||
|
|
snprintf(buffer, sizeof(buffer), "<h1>QuakeTV: Now Playing</h1>"); //don't show the hostname if its set to the default
|
||
|
|
else
|
||
|
|
snprintf(buffer, sizeof(buffer), "<h1>QuakeTV: Now Playing on %s</h1>", cluster->hostname);
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
|
||
|
|
HTMLPRINT("<dl class=\"nowplaying\">");
|
||
|
|
for (streams = cluster->servers; streams; streams = streams->next)
|
||
|
|
{
|
||
|
|
HTMLPRINT("<dt>");
|
||
|
|
HTMLprintf(buffer, sizeof(buffer), "%s (%s: %s)", streams->server, streams->gamedir, streams->mapname);
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
sprintf(buffer, "<span class=\"qtvfile\"> [ <a href=\"/watch.qtv?sid=%i\">Watch Now</a> ]</span>", streams->streamid);
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
HTMLPRINT("</dt><dd><ul class=\"playerslist\">");
|
||
|
|
|
||
|
|
for (player = 0; player < MAX_CLIENTS; player++)
|
||
|
|
{
|
||
|
|
if (*streams->players[player].userinfo)
|
||
|
|
{
|
||
|
|
Info_ValueForKey(streams->players[player].userinfo, "name", plname, sizeof(plname));
|
||
|
|
|
||
|
|
if (streams->players[player].frags < -90)
|
||
|
|
{
|
||
|
|
HTMLPRINT("<li class=\"spectator\">");
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
HTMLPRINT("<li class=\"player\">");
|
||
|
|
}
|
||
|
|
|
||
|
|
HTMLprintf(buffer, sizeof(buffer), "%s", plname);
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
HTMLPRINT("</li>");
|
||
|
|
}
|
||
|
|
}
|
||
|
|
HTMLPRINT("</ul></dd>");
|
||
|
|
}
|
||
|
|
HTMLPRINT("</dl>");
|
||
|
|
if (!cluster->servers)
|
||
|
|
{
|
||
|
|
s = "No streams are currently being played<br />";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
}
|
||
|
|
|
||
|
|
HTTPSV_SendHTMLFooter(cluster, dest);
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_GenerateCSSFile(cluster_t *cluster, oproxy_t *dest)
|
||
|
|
{
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "200", "text/css", false);
|
||
|
|
|
||
|
|
HTMLPRINT("* { font-family: Verdana, Helvetica, sans-serif; }");
|
||
|
|
HTMLPRINT("body { color: #000; background-color: #fff; padding: 0 40px; }");
|
||
|
|
HTMLPRINT("a { color: #00f; }");
|
||
|
|
HTMLPRINT("a.qtvfile { font-weight: bold; }");
|
||
|
|
HTMLPRINT("a:visited { color: #00f; }");
|
||
|
|
HTMLPRINT("a:hover { background-color: black; color: yellow; }");
|
||
|
|
HTMLPRINT("li.spectator { color: #666; font-size: 0.9ex; }");
|
||
|
|
HTMLPRINT("dl.nowplaying dd { margin: 0 0 2em 0; }");
|
||
|
|
HTMLPRINT("dl.nowplaying dt { margin: 1em 0 0 0; font-size: 1.1em; font-weight: bold; }");
|
||
|
|
HTMLPRINT("dl.nowplaying li { list-style: none; margin: 0 0 0 1em; padding: 0; }");
|
||
|
|
HTMLPRINT("dl.nowplaying ul { margin: 0 0 0 1em; padding: 0; }");
|
||
|
|
HTMLPRINT("#navigation { background-color: #eef; }");
|
||
|
|
HTMLPRINT("#navigation li { display: inline; list-style: none; margin: 0 3em; }");
|
||
|
|
}
|
||
|
|
|
||
|
|
static qboolean HTTPSV_GetHeaderField(char *s, char *field, char *buffer, int buffersize)
|
||
|
|
{
|
||
|
|
char *e;
|
||
|
|
char *colon;
|
||
|
|
int fieldnamelen = strlen(field);
|
||
|
|
|
||
|
|
buffer[0] = 0;
|
||
|
|
|
||
|
|
e = s;
|
||
|
|
while(*e)
|
||
|
|
{
|
||
|
|
if (*e == '\n')
|
||
|
|
{
|
||
|
|
*e = '\0';
|
||
|
|
colon = strchr(s, ':');
|
||
|
|
if (!colon)
|
||
|
|
{
|
||
|
|
if (!strncmp(field, s, fieldnamelen))
|
||
|
|
{
|
||
|
|
if (s[fieldnamelen] <= ' ')
|
||
|
|
{
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
if (fieldnamelen == colon - s)
|
||
|
|
{
|
||
|
|
if (!strncmp(field, s, colon-s))
|
||
|
|
{
|
||
|
|
colon++;
|
||
|
|
while (*colon == ' ')
|
||
|
|
colon++;
|
||
|
|
while (buffersize > 1)
|
||
|
|
{
|
||
|
|
if (*colon == '\r' || *colon == '\n')
|
||
|
|
break;
|
||
|
|
*buffer++ = *colon++;
|
||
|
|
}
|
||
|
|
*buffer = 0;
|
||
|
|
return true;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
}
|
||
|
|
s = e+1;
|
||
|
|
}
|
||
|
|
|
||
|
|
e++;
|
||
|
|
}
|
||
|
|
return false;
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_GenerateQTVStub(cluster_t *cluster, oproxy_t *dest, char *streamtype, char *streamid)
|
||
|
|
{
|
||
|
|
char *s;
|
||
|
|
char hostname[64];
|
||
|
|
char buffer[1024];
|
||
|
|
|
||
|
|
|
||
|
|
char fname[256];
|
||
|
|
s = fname;
|
||
|
|
while (*streamid > ' ')
|
||
|
|
{
|
||
|
|
if (s > fname + sizeof(fname)-4) //4 cos I'm too lazy to work out what the actual number should be
|
||
|
|
break;
|
||
|
|
if (*streamid == '%')
|
||
|
|
{
|
||
|
|
*s = 0;
|
||
|
|
streamid++;
|
||
|
|
if (*streamid <= ' ')
|
||
|
|
break;
|
||
|
|
else if (*streamid >= 'a' && *streamid <= 'f')
|
||
|
|
*s += 10 + *streamid-'a';
|
||
|
|
else if (*streamid >= 'A' && *streamid <= 'F')
|
||
|
|
*s += 10 + *streamid-'A';
|
||
|
|
else if (*streamid >= '0' && *streamid <= '9')
|
||
|
|
*s += *streamid-'0';
|
||
|
|
|
||
|
|
*s <<= 4;
|
||
|
|
|
||
|
|
streamid++;
|
||
|
|
if (*streamid <= ' ')
|
||
|
|
break;
|
||
|
|
else if (*streamid >= 'a' && *streamid <= 'f')
|
||
|
|
*s += 10 + *streamid-'a';
|
||
|
|
else if (*streamid >= 'A' && *streamid <= 'F')
|
||
|
|
*s += 10 + *streamid-'A';
|
||
|
|
else if (*streamid >= '0' && *streamid <= '9')
|
||
|
|
*s += *streamid-'0';
|
||
|
|
|
||
|
|
s++;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
*s++ = *streamid++;
|
||
|
|
}
|
||
|
|
*s = 0;
|
||
|
|
streamid = fname;
|
||
|
|
|
||
|
|
|
||
|
|
if (!HTTPSV_GetHeaderField(dest->inbuffer, "Host", hostname, sizeof(hostname)))
|
||
|
|
{
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "400", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "QuakeTV: Error");
|
||
|
|
|
||
|
|
s = "Your client did not send a Host field, which is required in HTTP/1.1\n<BR />"
|
||
|
|
"Please try a different browser.\n"
|
||
|
|
"</BODY>"
|
||
|
|
"</HTML>";
|
||
|
|
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "200", "text/x-quaketvident", false);
|
||
|
|
|
||
|
|
sprintf(buffer, "[QTV]\r\n"
|
||
|
|
"Stream: %s%s@%s\r\n"
|
||
|
|
"",
|
||
|
|
streamtype, streamid, hostname);
|
||
|
|
|
||
|
|
|
||
|
|
Net_ProxySend(cluster, dest, buffer, strlen(buffer));
|
||
|
|
}
|
||
|
|
|
||
|
|
static char *HTTPSV_ParsePOST(char *post, char *buffer, int buffersize)
|
||
|
|
{
|
||
|
|
while(*post && *post != '&')
|
||
|
|
{
|
||
|
|
if (--buffersize>0)
|
||
|
|
{
|
||
|
|
if (*post == '+')
|
||
|
|
*buffer++ = ' ';
|
||
|
|
else if (*post == '%')
|
||
|
|
{
|
||
|
|
*buffer = 0;
|
||
|
|
post++;
|
||
|
|
if (*post == '\0' || *post == '&')
|
||
|
|
break;
|
||
|
|
else if (*post >= 'a' && *post <= 'f')
|
||
|
|
*buffer += 10 + *post-'a';
|
||
|
|
else if (*post >= 'A' && *post <= 'F')
|
||
|
|
*buffer += 10 + *post-'A';
|
||
|
|
else if (*post >= '0' && *post <= '9')
|
||
|
|
*buffer += *post-'0';
|
||
|
|
|
||
|
|
*buffer <<= 4;
|
||
|
|
|
||
|
|
post++;
|
||
|
|
if (*post == '\0' || *post == '&')
|
||
|
|
break;
|
||
|
|
else if (*post >= 'a' && *post <= 'f')
|
||
|
|
*buffer += 10 + *post-'a';
|
||
|
|
else if (*post >= 'A' && *post <= 'F')
|
||
|
|
*buffer += 10 + *post-'A';
|
||
|
|
else if (*post >= '0' && *post <= '9')
|
||
|
|
*buffer += *post-'0';
|
||
|
|
|
||
|
|
buffer++;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
*buffer++ = *post;
|
||
|
|
}
|
||
|
|
post++;
|
||
|
|
}
|
||
|
|
*buffer = 0;
|
||
|
|
|
||
|
|
return post;
|
||
|
|
}
|
||
|
|
static void HTTPSV_GenerateAdmin(cluster_t *cluster, oproxy_t *dest, int streamid, char *postbody)
|
||
|
|
{
|
||
|
|
char pwd[64];
|
||
|
|
char cmd[256];
|
||
|
|
char result[8192];
|
||
|
|
char *s;
|
||
|
|
char *o;
|
||
|
|
int passwordokay = false;
|
||
|
|
|
||
|
|
if (!*cluster->adminpassword)
|
||
|
|
{
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "403", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "QuakeTV: Admin Error");
|
||
|
|
|
||
|
|
s = "The admin password is disabled. You may not log in remotely.</body></html>\n";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
pwd[0] = 0;
|
||
|
|
cmd[0] = 0;
|
||
|
|
if (postbody)
|
||
|
|
while (*postbody)
|
||
|
|
{
|
||
|
|
if (!strncmp(postbody, "pwd=", 4))
|
||
|
|
{
|
||
|
|
postbody = HTTPSV_ParsePOST(postbody+4, pwd, sizeof(pwd));
|
||
|
|
}
|
||
|
|
else if (!strncmp(postbody, "cmd=", 4))
|
||
|
|
{
|
||
|
|
postbody = HTTPSV_ParsePOST(postbody+4, cmd, sizeof(cmd));
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
while(*postbody && *postbody != '&')
|
||
|
|
{
|
||
|
|
postbody++;
|
||
|
|
}
|
||
|
|
if (*postbody == '&')
|
||
|
|
postbody++;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
if (!*pwd)
|
||
|
|
{
|
||
|
|
if (postbody)
|
||
|
|
o = "No Password";
|
||
|
|
else
|
||
|
|
o = "";
|
||
|
|
}
|
||
|
|
else if (!strcmp(pwd, cluster->adminpassword))
|
||
|
|
{
|
||
|
|
passwordokay = true;
|
||
|
|
//small hack (as http connections are considered non-connected proxies)
|
||
|
|
cluster->numproxies--;
|
||
|
|
if (*cmd)
|
||
|
|
o = Rcon_Command(cluster, NULL, cmd, result, sizeof(result), false);
|
||
|
|
else
|
||
|
|
o = "";
|
||
|
|
cluster->numproxies++;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
o = "Bad Password";
|
||
|
|
}
|
||
|
|
if (o != result)
|
||
|
|
{
|
||
|
|
strcpy(result, o);
|
||
|
|
o = result;
|
||
|
|
}
|
||
|
|
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "200", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "QuakeTV: Admin");
|
||
|
|
|
||
|
|
s = "<H1>QuakeTV Admin: ";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
s = cluster->hostname;
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
s = "</H1>";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
|
||
|
|
|
||
|
|
s = "<FORM action=\"admin.html\" method=\"post\" name=f>"
|
||
|
|
"<CENTER>"
|
||
|
|
"Password <input name=pwd value=\"";
|
||
|
|
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
if (passwordokay)
|
||
|
|
Net_ProxySend(cluster, dest, pwd, strlen(pwd));
|
||
|
|
|
||
|
|
|
||
|
|
s = "\">"
|
||
|
|
"<BR />"
|
||
|
|
"Command <input name=cmd maxsize=255 size=40 value=\"\">"
|
||
|
|
"<input type=submit value=\"Submit\" name=btn>"
|
||
|
|
"</CENTER>"
|
||
|
|
"</FORM>";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
|
||
|
|
if (passwordokay)
|
||
|
|
HTMLPRINT("<script>document.forms[0].elements[1].focus();</script>");
|
||
|
|
else
|
||
|
|
HTMLPRINT("<script>document.forms[0].elements[0].focus();</script>");
|
||
|
|
|
||
|
|
while(*o)
|
||
|
|
{
|
||
|
|
s = strchr(o, '\n');
|
||
|
|
if (s)
|
||
|
|
*s = 0;
|
||
|
|
HTMLprintf(cmd, sizeof(cmd), "%s", o);
|
||
|
|
Net_ProxySend(cluster, dest, cmd, strlen(cmd));
|
||
|
|
Net_ProxySend(cluster, dest, "<BR />", 6);
|
||
|
|
if (!s)
|
||
|
|
break;
|
||
|
|
o = s+1;
|
||
|
|
}
|
||
|
|
|
||
|
|
HTTPSV_SendHTMLFooter(cluster, dest);
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_GenerateDemoListing(cluster_t *cluster, oproxy_t *dest)
|
||
|
|
{
|
||
|
|
int i;
|
||
|
|
char link[256];
|
||
|
|
char *s;
|
||
|
|
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "200", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "QuakeTV: Demos");
|
||
|
|
|
||
|
|
s = "<h1>QuakeTV: Demo Listing</h1>";
|
||
|
|
Net_ProxySend(cluster, dest, s, strlen(s));
|
||
|
|
|
||
|
|
Cluster_BuildAvailableDemoList(cluster);
|
||
|
|
for (i = 0; i < cluster->availdemoscount; i++)
|
||
|
|
{
|
||
|
|
snprintf(link, sizeof(link), "<A HREF=\"/watch.qtv?demo=%s\">%s</A> (%ikb)<br/>", cluster->availdemos[i].name, cluster->availdemos[i].name, cluster->availdemos[i].size/1024);
|
||
|
|
Net_ProxySend(cluster, dest, link, strlen(link));
|
||
|
|
}
|
||
|
|
|
||
|
|
sprintf(link, "<P>Total: %i demos</P>", cluster->availdemoscount);
|
||
|
|
Net_ProxySend(cluster, dest, link, strlen(link));
|
||
|
|
|
||
|
|
HTTPSV_SendHTMLFooter(cluster, dest);
|
||
|
|
}
|
||
|
|
|
||
|
|
static void HTTPSV_GenerateDownload(cluster_t *cluster, oproxy_t *dest, char *filename)
|
||
|
|
{
|
||
|
|
#ifdef ALLOWDOWNLOADS
|
||
|
|
char fname[256];
|
||
|
|
char *s;
|
||
|
|
|
||
|
|
if (cluster->allowdownloads)
|
||
|
|
#endif
|
||
|
|
{
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "403", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "Permission denied");
|
||
|
|
HTMLPRINT("<h1>403: Forbidden</h1>");
|
||
|
|
HTMLPRINT("File downloads from this proxy are currently not permitted.");
|
||
|
|
HTTPSV_SendHTMLFooter(cluster, dest);
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
#ifdef ALLOWDOWNLOADS
|
||
|
|
s = fname;
|
||
|
|
while (*filename > ' ')
|
||
|
|
{
|
||
|
|
if (s > fname + sizeof(fname)-4) //4 cos I'm too lazy to work out what the actual number should be
|
||
|
|
break;
|
||
|
|
if (*filename == '%')
|
||
|
|
{
|
||
|
|
*s = 0;
|
||
|
|
filename++;
|
||
|
|
if (*filename <= ' ')
|
||
|
|
break;
|
||
|
|
else if (*filename >= 'a' && *filename <= 'f')
|
||
|
|
*s += 10 + *filename-'a';
|
||
|
|
else if (*filename >= 'A' && *filename <= 'F')
|
||
|
|
*s += 10 + *filename-'A';
|
||
|
|
else if (*filename >= '0' && *filename <= '9')
|
||
|
|
*s += *filename-'0';
|
||
|
|
|
||
|
|
*s <<= 4;
|
||
|
|
|
||
|
|
filename++;
|
||
|
|
if (*filename <= ' ')
|
||
|
|
break;
|
||
|
|
else if (*filename >= 'a' && *filename <= 'f')
|
||
|
|
*s += 10 + *filename-'a';
|
||
|
|
else if (*filename >= 'A' && *filename <= 'F')
|
||
|
|
*s += 10 + *filename-'A';
|
||
|
|
else if (*filename >= '0' && *filename <= '9')
|
||
|
|
*s += *filename-'0';
|
||
|
|
|
||
|
|
s++;
|
||
|
|
}
|
||
|
|
else
|
||
|
|
*s++ = *filename++;
|
||
|
|
}
|
||
|
|
*s = 0;
|
||
|
|
dest->srcfile = fopen(fname, "rb");
|
||
|
|
|
||
|
|
if (dest->srcfile)
|
||
|
|
{
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "200", "application/x-forcedownload", false);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "404", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "File not found");
|
||
|
|
HTMLPRINT("<h1>404: File not found</h1>");
|
||
|
|
HTTPSV_SendHTMLFooter(cluster, dest);
|
||
|
|
}
|
||
|
|
#endif
|
||
|
|
}
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
|
||
|
|
void HTTPSV_PostMethod(cluster_t *cluster, oproxy_t *pend, char *postdata)
|
||
|
|
{
|
||
|
|
char tempbuf[512];
|
||
|
|
char *s;
|
||
|
|
int len;
|
||
|
|
|
||
|
|
if (!HTTPSV_GetHeaderField(pend->inbuffer, "Content-Length", tempbuf, sizeof(tempbuf)))
|
||
|
|
{
|
||
|
|
s = "HTTP/1.1 411 OK\n"
|
||
|
|
"Content-Type: text/html\n"
|
||
|
|
"Connection: close\n"
|
||
|
|
"\n"
|
||
|
|
"<html><HEAD><TITLE>QuakeTV</TITLE></HEAD><BODY>No Content-Length was provided.</BODY>\n";
|
||
|
|
Net_ProxySend(cluster, pend, s, strlen(s));
|
||
|
|
pend->flushing = true;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
len = atoi(tempbuf);
|
||
|
|
if (pend->inbuffersize + len >= sizeof(pend->inbuffer)-20)
|
||
|
|
{ //too much data
|
||
|
|
pend->flushing = true;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
len = postdata - (char*)pend->inbuffer + len;
|
||
|
|
if (len > pend->inbuffersize)
|
||
|
|
return; //still need the body
|
||
|
|
|
||
|
|
// if (len <= pend->inbuffersize)
|
||
|
|
{
|
||
|
|
if (!strncmp(pend->inbuffer+5, "/admin", 6))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateAdmin(cluster, pend, 0, postdata);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
s = "HTTP/1.1 404 OK\n"
|
||
|
|
"Content-Type: text/html\n"
|
||
|
|
"Connection: close\n"
|
||
|
|
"\n"
|
||
|
|
"<html><HEAD><TITLE>QuakeTV</TITLE></HEAD><BODY>That HTTP method is not supported for that URL.</BODY></html>\n";
|
||
|
|
Net_ProxySend(cluster, pend, s, strlen(s));
|
||
|
|
|
||
|
|
}
|
||
|
|
pend->flushing = true;
|
||
|
|
return;
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
void HTTPSV_GetMethod(cluster_t *cluster, oproxy_t *pend)
|
||
|
|
{
|
||
|
|
char *s;
|
||
|
|
if (!strncmp(pend->inbuffer+4, "/nowplaying", 11))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateNowPlaying(cluster, pend);
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/watch.qtv?sid=", 15))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateQTVStub(cluster, pend, "", pend->inbuffer+19);
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/watch.qtv?demo=", 16))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateQTVStub(cluster, pend, "file:", pend->inbuffer+20);
|
||
|
|
}
|
||
|
|
// else if (!strncmp(pend->inbuffer+4, "/demo/", 6))
|
||
|
|
// { //fixme: make this send the demo as an http download
|
||
|
|
// HTTPSV_GenerateQTVStub(cluster, pend, "file:", pend->inbuffer+10);
|
||
|
|
// }
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/about", 6))
|
||
|
|
{ //redirect them to our funky website
|
||
|
|
s = "HTTP/1.0 302 Found\n"
|
||
|
|
"Location: http://www.fteqw.com/\n"
|
||
|
|
"\n";
|
||
|
|
Net_ProxySend(cluster, pend, s, strlen(s));
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/admin", 6))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateAdmin(cluster, pend, 0, NULL);
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/ ", 2))
|
||
|
|
{
|
||
|
|
s = "HTTP/1.0 302 Found\n"
|
||
|
|
"Location: /nowplaying/\n"
|
||
|
|
"\n";
|
||
|
|
Net_ProxySend(cluster, pend, s, strlen(s));
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/demos", 6))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateDemoListing(cluster, pend);
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/file/", 6))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateDownload(cluster, pend, pend->inbuffer+10);
|
||
|
|
}
|
||
|
|
else if (!strncmp(pend->inbuffer+4, "/style.css", 10))
|
||
|
|
{
|
||
|
|
HTTPSV_GenerateCSSFile(cluster, pend);
|
||
|
|
}
|
||
|
|
else
|
||
|
|
{
|
||
|
|
#define dest pend
|
||
|
|
HTTPSV_SendHTTPHeader(cluster, dest, "404", "text/html", true);
|
||
|
|
HTTPSV_SendHTMLHeader(cluster, dest, "Address not recognised");
|
||
|
|
HTMLPRINT("<h1>Address not recognised</h1>");
|
||
|
|
HTTPSV_SendHTMLFooter(cluster, dest);
|
||
|
|
}
|
||
|
|
}
|