ui-tree.c

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