1 package Gitalist::Controller::Ref;
4 use namespace::autoclean;
6 BEGIN { extends 'Gitalist::Controller' }
7 with 'Gitalist::URIStructure::Ref';
10 use File::Type::WebImages ();
12 sub base : Chained('/repository/find') PathPart('') CaptureArgs(0) {}
17 $c->stash->{diff_tree} = ( $c->stash->{Commit}->diff )[0];
20 sub raw : Chained('find') Does('FilenameArgs') Args() {
22 $c->forward('find_blob');
24 if(!Gitalist::Utils::is_binary($c->stash->{blob})) {
25 $c->response->content_type('text/plain; charset=utf-8');
27 my $ft = File::Type->new();
28 $c->response->content_type(
29 File::Type::WebImages::mime_type($c->stash->{blob})
30 || File::Type->new->mime_type($c->stash->{blob})
34 utf8::decode($c->stash->{blob});
35 $c->response->body(delete $c->stash->{blob});
42 Gitalist::Controller::Ref - Controller::Ref module for Gitalist
46 Provides a snapshot of a given commit.
50 sub snapshot : Chained('find') PathPart('snapshot') Args() {
51 my ($self, $c, $format) = @_;
53 my @snap = $c->stash->{Repository}->snapshot(
54 sha1 => $c->stash->{Commit}->sha1,
57 $c->response->status(200);
58 $c->response->headers->header( 'Content-Disposition' =>
59 "attachment; filename=$snap[0]");
60 $c->response->body($snap[1]);
65 A raw patch for a given commit.
69 sub patch : Chained('find') Args(0) {
71 $c->detach('patches', [1]);
76 The patcheset for a given commit ???
80 sub patches : Chained('find') Args(1) {
81 my ($self, $c, $count) = @_;
82 $count ||= Gitalist->config->{patches}{max};
83 my $commit = $c->stash->{Commit};
84 my $parent = $c->req->param('hp') || undef; # FIXME
85 my $patch = $commit->get_patch( $parent, $count );
86 $c->response->body($patch);
87 $c->response->content_type('text/plain');
88 $c->response->status(200);
91 __PACKAGE__->meta->make_immutable;