1/* ui-tree.c: functions for tree output
  2 *
  3 * Copyright (C) 2006 Lars Hjemli
  4 *
  5 * Licensed under GNU General Public License v2
  6 *   (see COPYING for full license text)
  7 */
  8
  9#include "cgit.h"
 10#include "html.h"
 11#include "ui-shared.h"
 12
 13char *curr_rev;
 14char *match_path;
 15int header = 0;
 16
 17static void print_object(const unsigned char *sha1, char *path)
 18{
 19	enum object_type type;
 20	char *buf;
 21	unsigned long size, lineno, idx;
 22	const char *numberfmt = "<a class='no' id='n%1$d' name='n%1$d' href='#n%1$d'>%1$d</a>\n";
 23
 24	type = sha1_object_info(sha1, &size);
 25	if (type == OBJ_BAD) {
 26		cgit_print_error(fmt("Bad object name: %s",
 27				     sha1_to_hex(sha1)));
 28		return;
 29	}
 30
 31	buf = read_sha1_file(sha1, &type, &size);
 32	if (!buf) {
 33		cgit_print_error(fmt("Error reading object %s",
 34				     sha1_to_hex(sha1)));
 35		return;
 36	}
 37
 38	html(" (");
 39	cgit_plain_link("plain", NULL, NULL, ctx.qry.head,
 40		        curr_rev, path);
 41	htmlf(")<br/>blob: %s\n", sha1_to_hex(sha1));
 42
 43	html("<table summary='blob content' class='blob'>\n");
 44	html("<tr>\n");
 45
 46	html("<td class='linenumbers'><pre>");
 47	idx = 0;
 48	lineno = 0;
 49	htmlf(numberfmt, ++lineno);
 50	while(idx < size - 1) { // skip absolute last newline
 51		if (buf[idx] == '\n') {
 52			htmlf(numberfmt, ++lineno);
 53		}
 54		idx++;
 55	}
 56	html("</pre></td>\n");
 57
 58	html("<td class='lines'><pre><code>");
 59	html_txt(buf);
 60	html("</code></pre></td>\n");
 61
 62	html("</tr>\n");
 63	html("</table>\n");
 64}
 65
 66
 67static int ls_item(const unsigned char *sha1, const char *base, int baselen,
 68		   const char *pathname, unsigned int mode, int stage,
 69		   void *cbdata)
 70{
 71	char *name;
 72	char *fullpath;
 73	enum object_type type;
 74	unsigned long size = 0;
 75
 76	name = xstrdup(pathname);
 77	fullpath = fmt("%s%s%s", ctx.qry.path ? ctx.qry.path : "",
 78		       ctx.qry.path ? "/" : "", name);
 79
 80	if (!S_ISGITLINK(mode)) {
 81		type = sha1_object_info(sha1, &size);
 82		if (type == OBJ_BAD) {
 83			htmlf("<tr><td colspan='3'>Bad object: %s %s</td></tr>",
 84			      name,
 85			      sha1_to_hex(sha1));
 86			return 0;
 87		}
 88	}
 89
 90	html("<tr><td class='ls-mode'>");
 91	cgit_print_filemode(mode);
 92	html("</td><td>");
 93	if (S_ISGITLINK(mode)) {
 94		htmlf("<a class='ls-mod' href='");
 95		html_attr(fmt(ctx.repo->module_link,
 96			      name,
 97			      sha1_to_hex(sha1)));
 98		html("'>");
 99		html_txt(name);
100		html("</a>");
101	} else if (S_ISDIR(mode)) {
102		cgit_tree_link(name, NULL, "ls-dir", ctx.qry.head,
103			       curr_rev, fullpath);
104	} else {
105		cgit_tree_link(name, NULL, "ls-blob", ctx.qry.head,
106			       curr_rev, fullpath);
107	}
108	htmlf("</td><td class='ls-size'>%li</td>", size);
109
110	html("<td>");
111	cgit_log_link("log", NULL, "button", ctx.qry.head, curr_rev,
112		      fullpath, 0, NULL, NULL, ctx.qry.showmsg);
113	if (ctx.repo->max_stats)
114		cgit_stats_link("stats", NULL, "button", ctx.qry.head,
115				fullpath);
116	html("</td></tr>\n");
117	free(name);
118	return 0;
119}
120
121static void ls_head()
122{
123	html("<table summary='tree listing' class='list'>\n");
124	html("<tr class='nohover'>");
125	html("<th class='left'>Mode</th>");
126	html("<th class='left'>Name</th>");
127	html("<th class='right'>Size</th>");
128	html("<th/>");
129	html("</tr>\n");
130	header = 1;
131}
132
133static void ls_tail()
134{
135	if (!header)
136		return;
137	html("</table>\n");
138	header = 0;
139}
140
141static void ls_tree(const unsigned char *sha1, char *path)
142{
143	struct tree *tree;
144
145	tree = parse_tree_indirect(sha1);
146	if (!tree) {
147		cgit_print_error(fmt("Not a tree object: %s",
148				     sha1_to_hex(sha1)));
149		return;
150	}
151
152	ls_head();
153	read_tree_recursive(tree, "", 0, 1, NULL, ls_item, NULL);
154	ls_tail();
155}
156
157
158static int walk_tree(const unsigned char *sha1, const char *base, int baselen,
159		     const char *pathname, unsigned mode, int stage,
160		     void *cbdata)
161{
162	static int state;
163	static char buffer[PATH_MAX];
164	char *url;
165
166	if (state == 0) {
167		memcpy(buffer, base, baselen);
168		strcpy(buffer+baselen, pathname);
169		url = cgit_pageurl(ctx.qry.repo, "tree",
170				   fmt("h=%s&amp;path=%s", curr_rev, buffer));
171		html("/");
172		cgit_tree_link(xstrdup(pathname), NULL, NULL, ctx.qry.head,
173			       curr_rev, buffer);
174
175		if (strcmp(match_path, buffer))
176			return READ_TREE_RECURSIVE;
177
178		if (S_ISDIR(mode)) {
179			state = 1;
180			ls_head();
181			return READ_TREE_RECURSIVE;
182		} else {
183			print_object(sha1, buffer);
184			return 0;
185		}
186	}
187	ls_item(sha1, base, baselen, pathname, mode, stage, NULL);
188	return 0;
189}
190
191
192/*
193 * Show a tree or a blob
194 *   rev:  the commit pointing at the root tree object
195 *   path: path to tree or blob
196 */
197void cgit_print_tree(const char *rev, char *path)
198{
199	unsigned char sha1[20];
200	struct commit *commit;
201	const char *paths[] = {path, NULL};
202
203	if (!rev)
204		rev = ctx.qry.head;
205
206	curr_rev = xstrdup(rev);
207	if (get_sha1(rev, sha1)) {
208		cgit_print_error(fmt("Invalid revision name: %s", rev));
209		return;
210	}
211	commit = lookup_commit_reference(sha1);
212	if (!commit || parse_commit(commit)) {
213		cgit_print_error(fmt("Invalid commit reference: %s", rev));
214		return;
215	}
216
217	html("path: <a href='");
218	html_attr(cgit_pageurl(ctx.qry.repo, "tree", fmt("h=%s", rev)));
219	html("'>root</a>");
220
221	if (path == NULL) {
222		ls_tree(commit->tree->object.sha1, NULL);
223		return;
224	}
225
226	match_path = path;
227	read_tree_recursive(commit->tree, NULL, 0, 0, paths, walk_tree, NULL);
228	ls_tail();
229}