| #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); |
| } |
