Send error reports from dirplex.
[ashd.git] / lib / resp.c
1 /*
2     ashd - A Sane HTTP Daemon
3     Copyright (C) 2008  Fredrik Tolf <fredrik@dolda2000.com>
4
5     This program is free software: you can redistribute it and/or modify
6     it under the terms of the GNU General Public License as published by
7     the Free Software Foundation, either version 3 of the License, or
8     (at your option) any later version.
9
10     This program is distributed in the hope that it will be useful,
11     but WITHOUT ANY WARRANTY; without even the implied warranty of
12     MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13     GNU General Public License for more details.
14
15     You should have received a copy of the GNU General Public License
16     along with this program.  If not, see <http://www.gnu.org/licenses/>.
17 */
18
19 #include <stdlib.h>
20 #include <string.h>
21 #include <stdio.h>
22 #include <stdarg.h>
23
24 #ifdef HAVE_CONFIG_H
25 #include <config.h>
26 #endif
27 #include <utils.h>
28 #include <resp.h>
29
30 char *htmlquote(char *text)
31 {
32     struct charbuf buf;
33     
34     bufinit(buf);
35     for(; *text; text++) {
36         if(*text == '<')
37             bufcatstr(buf, "&lt;");
38         else if(*text == '>')
39             bufcatstr(buf, "&gt;");
40         else if(*text == '&')
41             bufcatstr(buf, "&amp;");
42         else
43             bufadd(buf, *text);
44     }
45     bufadd(buf, 0);
46     return(buf.b);
47 }
48
49 void simpleerror(int fd, int code, char *msg, char *fmt, ...)
50 {
51     struct charbuf buf;
52     char *tmp1, *tmp2;
53     va_list args;
54     FILE *out;
55     
56     va_start(args, fmt);
57     tmp1 = vsprintf2(fmt, args);
58     va_end(args);
59     tmp2 = htmlquote(tmp1);
60     free(tmp1);
61     bufinit(buf);
62     bufcatstr(buf, "<?xml version=\"1.0\" encoding=\"US-ASCII\"?>\r\n");
63     bufcatstr(buf, "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\r\n");
64     bufcatstr(buf, "<html xmlns=\"http://www.w3.org/1999/xhtml\" lang=\"en-US\" xml:lang=\"en-US\">\r\n");
65     bufcatstr(buf, "<head>\r\n");
66     bprintf(&buf, "<title>%s</title>\r\n", msg);
67     bufcatstr(buf, "</head>\r\n");
68     bufcatstr(buf, "<body>\r\n");
69     bprintf(&buf, "<h1>%s</h1>\r\n", msg);
70     bprintf(&buf, "<p>%s</p>\r\n", tmp2);
71     bufcatstr(buf, "</body>\r\n");
72     bufcatstr(buf, "</html>\r\n");
73     free(tmp2);
74     out = fdopen(fd, "w");
75     fprintf(out, "HTTP/1.1 %i %s\r\n", code, msg);
76     fprintf(out, "Content-Type: text/html\r\n");
77     fprintf(out, "Content-Length: %i\r\n", buf.d);
78     fprintf(out, "\r\n");
79     fwrite(buf.b, 1, buf.d, out);
80     fclose(out);
81     buffree(buf);
82 }