ui-plain.c (view raw)
1/* ui-plain.c: functions for output of plain blobs by path
2 *
3 * Copyright (C) 2008 Lars Hjemli
4 *
5 * Licensed under GNU General Public License v2
6 * (see COPYING for full license text)
7 */
8
9#include <stdio.h>
10#include "cgit.h"
11#include "ui-plain.h"
12#include "html.h"
13#include "ui-shared.h"
14
15struct walk_tree_context {
16 int match_baselen;
17 int match;
18};
19
20static char *get_mimetype_from_file(const char *filename, const char *ext)
21{
22 static const char *delimiters;
23 char *result;
24 FILE *fd;
25 char line[1024];
26 char *mimetype;
27 char *token;
28
29 if (!filename)
30 return NULL;
31
32 fd = fopen(filename, "r");
33 if (!fd)
34 return NULL;
35
36 delimiters = " \t\r\n";
37 result = NULL;
38
39 /* loop over all lines in the file */
40 while (!result && fgets(line, sizeof(line), fd)) {
41 mimetype = strtok(line, delimiters);
42
43 /* skip empty lines and comment lines */
44 if (!mimetype || (mimetype[0] == '#'))
45 continue;
46
47 /* loop over all extensions of mimetype */
48 while ((token = strtok(NULL, delimiters))) {
49 if (!strcasecmp(ext, token)) {
50 result = xstrdup(mimetype);
51 break;
52 }
53 }
54 }
55 fclose(fd);
56
57 return result;
58}
59
60static int print_object(const unsigned char *sha1, const char *path)
61{
62 enum object_type type;
63 char *buf, *ext;
64 unsigned long size;
65 struct string_list_item *mime;
66 int freemime;
67
68 type = sha1_object_info(sha1, &size);
69 if (type == OBJ_BAD) {
70 html_status(404, "Not found", 0);
71 return 0;
72 }
73
74 buf = read_sha1_file(sha1, &type, &size);
75 if (!buf) {
76 html_status(404, "Not found", 0);
77 return 0;
78 }
79 ctx.page.mimetype = NULL;
80 ext = strrchr(path, '.');
81 freemime = 0;
82 if (ext && *(++ext)) {
83 mime = string_list_lookup(&ctx.cfg.mimetypes, ext);
84 if (mime) {
85 ctx.page.mimetype = (char *)mime->util;
86 } else {
87 ctx.page.mimetype = get_mimetype_from_file(ctx.cfg.mimetype_file, ext);
88 if (ctx.page.mimetype)
89 freemime = 1;
90 }
91 }
92 if (!ctx.page.mimetype) {
93 if (buffer_is_binary(buf, size))
94 ctx.page.mimetype = "application/octet-stream";
95 else
96 ctx.page.mimetype = "text/plain";
97 }
98 ctx.page.filename = path;
99 ctx.page.size = size;
100 ctx.page.etag = sha1_to_hex(sha1);
101 cgit_print_http_headers(&ctx);
102 html_raw(buf, size);
103 /* If we allocated this, then casting away const is safe. */
104 if (freemime)
105 free((char*) ctx.page.mimetype);
106 return 1;
107}
108
109static char *buildpath(const char *base, int baselen, const char *path)
110{
111 if (path[0])
112 return fmtalloc("%.*s%s/", baselen, base, path);
113 else
114 return fmtalloc("%.*s/", baselen, base);
115}
116
117static void print_dir(const unsigned char *sha1, const char *base,
118 int baselen, const char *path)
119{
120 char *fullpath, *slash;
121 size_t len;
122
123 fullpath = buildpath(base, baselen, path);
124 slash = (fullpath[0] == '/' ? "" : "/");
125 ctx.page.etag = sha1_to_hex(sha1);
126 cgit_print_http_headers(&ctx);
127 htmlf("<html><head><title>%s", slash);
128 html_txt(fullpath);
129 htmlf("</title></head>\n<body>\n<h2>%s", slash);
130 html_txt(fullpath);
131 html("</h2>\n<ul>\n");
132 len = strlen(fullpath);
133 if (len > 1) {
134 fullpath[len - 1] = 0;
135 slash = strrchr(fullpath, '/');
136 if (slash)
137 *(slash + 1) = 0;
138 else
139 fullpath = NULL;
140 html("<li>");
141 cgit_plain_link("../", NULL, NULL, ctx.qry.head, ctx.qry.sha1,
142 fullpath);
143 html("</li>\n");
144 }
145 free(fullpath);
146}
147
148static void print_dir_entry(const unsigned char *sha1, const char *base,
149 int baselen, const char *path, unsigned mode)
150{
151 char *fullpath;
152
153 fullpath = buildpath(base, baselen, path);
154 if (!S_ISDIR(mode) && !S_ISGITLINK(mode))
155 fullpath[strlen(fullpath) - 1] = 0;
156 html(" <li>");
157 if (S_ISGITLINK(mode)) {
158 cgit_submodule_link(NULL, fullpath, sha1_to_hex(sha1));
159 } else
160 cgit_plain_link(path, NULL, NULL, ctx.qry.head, ctx.qry.sha1,
161 fullpath);
162 html("</li>\n");
163 free(fullpath);
164}
165
166static void print_dir_tail(void)
167{
168 html(" </ul>\n</body></html>\n");
169}
170
171static int walk_tree(const unsigned char *sha1, const char *base, int baselen,
172 const char *pathname, unsigned mode, int stage,
173 void *cbdata)
174{
175 struct walk_tree_context *walk_tree_ctx = cbdata;
176
177 if (baselen == walk_tree_ctx->match_baselen) {
178 if (S_ISREG(mode)) {
179 if (print_object(sha1, pathname))
180 walk_tree_ctx->match = 1;
181 } else if (S_ISDIR(mode)) {
182 print_dir(sha1, base, baselen, pathname);
183 walk_tree_ctx->match = 2;
184 return READ_TREE_RECURSIVE;
185 }
186 } else if (baselen > walk_tree_ctx->match_baselen) {
187 print_dir_entry(sha1, base, baselen, pathname, mode);
188 walk_tree_ctx->match = 2;
189 } else if (S_ISDIR(mode)) {
190 return READ_TREE_RECURSIVE;
191 }
192
193 return 0;
194}
195
196static int basedir_len(const char *path)
197{
198 char *p = strrchr(path, '/');
199 if (p)
200 return p - path + 1;
201 return 0;
202}
203
204void cgit_print_plain(struct cgit_context *ctx)
205{
206 const char *rev = ctx->qry.sha1;
207 unsigned char sha1[20];
208 struct commit *commit;
209 struct pathspec_item path_items = {
210 .match = ctx->qry.path,
211 .len = ctx->qry.path ? strlen(ctx->qry.path) : 0
212 };
213 struct pathspec paths = {
214 .nr = 1,
215 .items = &path_items
216 };
217 struct walk_tree_context walk_tree_ctx = {
218 .match = 0
219 };
220
221 if (!rev)
222 rev = ctx->qry.head;
223
224 if (get_sha1(rev, sha1)) {
225 html_status(404, "Not found", 0);
226 return;
227 }
228 commit = lookup_commit_reference(sha1);
229 if (!commit || parse_commit(commit)) {
230 html_status(404, "Not found", 0);
231 return;
232 }
233 if (!path_items.match) {
234 path_items.match = "";
235 walk_tree_ctx.match_baselen = -1;
236 print_dir(commit->tree->object.sha1, "", 0, "");
237 walk_tree_ctx.match = 2;
238 }
239 else
240 walk_tree_ctx.match_baselen = basedir_len(path_items.match);
241 read_tree_recursive(commit->tree, "", 0, 0, &paths, walk_tree, &walk_tree_ctx);
242 if (!walk_tree_ctx.match)
243 html_status(404, "Not found", 0);
244 else if (walk_tree_ctx.match == 2)
245 print_dir_tail();
246}