callcgi: Added option to change CWD to the script's directory.
[ashd.git] / src / sendfile.c
... / ...
CommitLineData
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 <unistd.h>
23#include <fcntl.h>
24#include <errno.h>
25#include <sys/stat.h>
26#include <stdint.h>
27#include <time.h>
28#include <magic.h>
29#include <locale.h>
30#include <langinfo.h>
31
32#ifdef HAVE_CONFIG_H
33#include <config.h>
34#endif
35#include <utils.h>
36#include <log.h>
37#include <resp.h>
38
39#ifdef HAVE_XATTR
40#include <attr/xattr.h>
41#endif
42
43static magic_t cookie = NULL;
44
45static void passdata(int in, int out)
46{
47 int ret, len, off;
48 char *buf;
49
50 buf = smalloc(65536);
51 while(1) {
52 len = read(in, buf, 65536);
53 if(len < 0) {
54 flog(LOG_ERR, "sendfile: could not read input: %s", strerror(errno));
55 break;
56 }
57 if(len == 0)
58 break;
59 for(off = 0; off < len; off += ret) {
60 ret = write(out, buf + off, len - off);
61 if(ret < 0) {
62 flog(LOG_ERR, "sendfile: could not write output: %s", strerror(errno));
63 break;
64 }
65 }
66 }
67 free(buf);
68}
69
70static char *attrmimetype(char *file)
71{
72#ifdef HAVE_XATTR
73 static char buf[1024];
74 int i;
75 ssize_t sz;
76
77 if((sz = getxattr(file, "user.ash-mime-type", buf, sizeof(buf) - 1)) > 0)
78 goto found;
79 if((sz = getxattr(file, "user.mime-type", buf, sizeof(buf) - 1)) > 0)
80 goto found;
81 if((sz = getxattr(file, "user.mime_type", buf, sizeof(buf) - 1)) > 0)
82 goto found;
83 if((sz = getxattr(file, "user.Content-Type", buf, sizeof(buf) - 1)) > 0)
84 goto found;
85 return(NULL);
86found:
87 for(i = 0; i < sz; i++) {
88 if((buf[sz] < 32) || (buf[sz] >= 128))
89 return(NULL);
90 }
91 buf[sz] = 0;
92 return(buf);
93#else
94 return(NULL);
95#endif
96}
97
98static const char *getmimetype(char *file, struct stat *sb)
99{
100 const char *ret;
101
102 if((ret = attrmimetype(file)) != NULL)
103 return(ret);
104 if(cookie == NULL) {
105 cookie = magic_open(MAGIC_MIME_TYPE | MAGIC_SYMLINK);
106 magic_load(cookie, NULL);
107 }
108 if((ret = magic_file(cookie, file)) != NULL)
109 return(ret);
110 return("application/octet-stream");
111}
112
113/* XXX: This could be made far better and check for other attributes
114 * and stuff, but not now. */
115static const char *ckctype(const char *ctype)
116{
117 if(!strncmp(ctype, "text/", 5) && (strchr(ctype, ';') == NULL))
118 return(sprintf2("%s; charset=%s", ctype, nl_langinfo(CODESET)));
119 return(ctype);
120}
121
122static void checkcache(char *file, struct stat *sb)
123{
124 char *hdr;
125
126 if((hdr = getenv("REQ_IF_MODIFIED_SINCE")) != NULL) {
127 if(parsehttpdate(hdr) < sb->st_mtime)
128 return;
129 printf("HTTP/1.1 304 Not Modified\n");
130 printf("Date: %s\n", fmthttpdate(time(NULL)));
131 printf("Content-Length: 0\n");
132 printf("\n");
133 exit(0);
134 }
135}
136
137static void usage(void)
138{
139 flog(LOG_ERR, "usage: sendfile [-c CONTENT-TYPE] METHOD URL REST");
140}
141
142int main(int argc, char **argv)
143{
144 int c;
145 char *file;
146 struct stat sb;
147 int fd;
148 const char *contype;
149
150 setlocale(LC_ALL, "");
151 contype = NULL;
152 while((c = getopt(argc, argv, "c:")) >= 0) {
153 switch(c) {
154 case 'c':
155 contype = optarg;
156 break;
157 default:
158 usage();
159 exit(1);
160 break;
161 }
162 }
163 if(argc - optind < 3) {
164 usage();
165 exit(1);
166 }
167 if((file = getenv("REQ_X_ASH_FILE")) == NULL) {
168 flog(LOG_ERR, "sendfile: needs to be called with the X-Ash-File header");
169 exit(1);
170 }
171 if(*argv[optind + 2]) {
172 simpleerror(1, 404, "Not Found", "The requested URL has no corresponding resource.");
173 exit(0);
174 }
175 if(stat(file, &sb) || ((fd = open(file, O_RDONLY)) < 0)) {
176 flog(LOG_ERR, "sendfile: could not stat input file %s: %s", file, strerror(errno));
177 simpleerror(1, 500, "Internal Error", "The server could not access its own data.");
178 exit(1);
179 }
180 if(contype == NULL)
181 contype = getmimetype(file, &sb);
182 contype = ckctype(contype);
183
184 checkcache(file, &sb);
185
186 printf("HTTP/1.1 200 OK\n");
187 printf("Content-Type: %s\n", contype);
188 printf("Content-Length: %ji\n", (intmax_t)sb.st_size);
189 printf("Last-Modified: %s\n", fmthttpdate(sb.st_mtime));
190 printf("Date: %s\n", fmthttpdate(time(NULL)));
191 printf("\n");
192 fflush(stdout);
193 if(strcasecmp(argv[optind], "head"))
194 passdata(fd, 1);
195 return(0);
196}