Remote whitespace at the ends of lines. Remove blank lines from the ends of files. Change modes on source files so that they are not executable. Signed-off-by: Dan Cross <cross@gajendra.net>
64 lines
1.5 KiB
C
64 lines
1.5 KiB
C
#include <u.h>
|
|
#include <libc.h>
|
|
#include <bin.h>
|
|
#include <httpd.h>
|
|
|
|
int
|
|
hredirected(HConnect *c, char *how, char *uri)
|
|
{
|
|
Hio *hout;
|
|
char *s, *ss, *host;
|
|
int n;
|
|
|
|
host = c->head.host;
|
|
if(strchr(uri, ':')){
|
|
host = "";
|
|
}else if(uri[0] != '/'){
|
|
s = strrchr(c->req.uri, '/');
|
|
if(s != nil)
|
|
*s = '\0';
|
|
ss = halloc(c, strlen(c->req.uri) + strlen(uri) + 2 + UTFmax);
|
|
sprint(ss, "%s/%s", c->req.uri, uri);
|
|
uri = ss;
|
|
if(s != nil)
|
|
*s = '/';
|
|
}
|
|
|
|
n = snprint(c->xferbuf, HBufSize,
|
|
"<head><title>Redirection</title></head>\r\n"
|
|
"<body><h1>Redirection</h1>\r\n"
|
|
"Your selection can be found <a href=\"%U\"> here</a>.<p></body>\r\n", uri);
|
|
|
|
hout = &c->hout;
|
|
hprint(hout, "%s %s\r\n", hversion, how);
|
|
hprint(hout, "Date: %D\r\n", time(nil));
|
|
hprint(hout, "Server: Plan9\r\n");
|
|
hprint(hout, "Content-type: text/html\r\n");
|
|
hprint(hout, "Content-Length: %d\r\n", n);
|
|
if(host == nil || host[0] == 0)
|
|
hprint(hout, "Location: %U\r\n", uri);
|
|
else
|
|
hprint(hout, "Location: http://%U%U\r\n", host, uri);
|
|
if(c->head.closeit)
|
|
hprint(hout, "Connection: close\r\n");
|
|
else if(!http11(c))
|
|
hprint(hout, "Connection: Keep-Alive\r\n");
|
|
hprint(hout, "\r\n");
|
|
|
|
if(strcmp(c->req.meth, "HEAD") != 0)
|
|
hwrite(hout, c->xferbuf, n);
|
|
|
|
if(c->replog){
|
|
if(host == nil || host[0] == 0)
|
|
c->replog(c, "Reply: %s\nRedirect: %U\n", how, uri);
|
|
else
|
|
c->replog(c, "Reply: %s\nRedirect: http://%U%U\n", how, host, uri);
|
|
}
|
|
return hflush(hout);
|
|
}
|
|
|
|
int
|
|
hmoved(HConnect *c, char *uri)
|
|
{
|
|
return hredirected(c, "301 Moved Permanently", uri);
|
|
}
|