From 8b69019c9a96f81be2260e1204f69328490ccb93 Mon Sep 17 00:00:00 2001
From: Alex 'AdUser' Z <ad_user@runbox.com>
Date: Mon, 11 May 2015 17:57:30 +1000
Subject: [PATCH] + /imgbin/latest

---
 lib/LDV.pm                      |  4 +++-
 public/css/zerobin.css          |  7 +++++++
 templates/imgbin/create.html.ep |  5 +++++
 templates/imgbin/latest.html.ep | 22 ++++++++++++++++++++++
 templates/imgbin/view.html.ep   |  5 +++++
 5 files changed, 42 insertions(+), 1 deletion(-)
 create mode 100644 templates/imgbin/latest.html.ep

diff --git a/lib/LDV.pm b/lib/LDV.pm
index d0b84bd..512a306 100644
--- a/lib/LDV.pm
+++ b/lib/LDV.pm
@@ -55,14 +55,16 @@ sub startup {
   }
 
   { # /imgbin
+  my $conf = $self->app->config->{imgbin};
   my $ib = $r->route('/imgbin') -> to(controller => 'imgbin');
     $ib->post('/') -> to(action => 'save');
     $ib->get ('/') -> to(action => 'create');
     $ib->route('/:time', time => qr/\d+/)
       ->via('GET') -> to(action => 'view');
    #$ib->get('/prune') -> to(action => 'prune');
+    $ib->get ('/latest') -> to(action => 'latest')
+      if ($conf->{show_latest});
 
-    my $conf = $self->app->config->{imgbin};
     mkdir $self->app->home->rel_dir($conf->{root});
     mkdir $self->app->home->rel_file('public/images');
     mkdir $self->app->home->rel_file('public/images/full');
diff --git a/public/css/zerobin.css b/public/css/zerobin.css
index 9c3dbbd..8035b05 100644
--- a/public/css/zerobin.css
+++ b/public/css/zerobin.css
@@ -19,3 +19,10 @@ textarea#paste {
 pre code {
   background-color: #777777;
 }
+
+/* imgbin */
+div.img-preview {
+  margin: 5px;
+  display: inline-block;
+  vertical-align: top;
+}
diff --git a/templates/imgbin/create.html.ep b/templates/imgbin/create.html.ep
index 39c7e87..4de34db 100644
--- a/templates/imgbin/create.html.ep
+++ b/templates/imgbin/create.html.ep
@@ -15,6 +15,11 @@
       <%= tag 'label' => (for => 'expire') => l('Keep for') %>:
       <%= select_field 'expire' => \@times %>
     </span>
+% if (config->{imgbin}->{show_latest}) {
+    <span class="zerobin cblock">
+      <%= link_to l('Latest images') => "/imgbin/latest" %>
+    </span>
+% }
   </div>
   <hr/>
   <div>
diff --git a/templates/imgbin/latest.html.ep b/templates/imgbin/latest.html.ep
new file mode 100644
index 0000000..270a240
--- /dev/null
+++ b/templates/imgbin/latest.html.ep
@@ -0,0 +1,22 @@
+% layout 'default';
+% title 'Imgbin -- View';
+% stash 'styles' => 'zerobin';
+<h1><%= l('Latest images') %></h1>
+<div>
+  <div>
+    <span class="zerobin cblock">
+      <%= link_to l('Upload more') => "/imgbin" %>
+    </span>
+  </div>
+  <br/>
+% my $images = stash('images') || [];
+% foreach my $i (@{ $images }) {
+% my $tooltip = sprintf "%s / %dx%d / %.1f kb",
+%   $i->{name}, $i->{width}, $i->{height}, $i->{size} / 1024;
+  <div class="img-preview">
+    <%= link_to $i->{url} => begin %>
+      <%= image $i->{path}, title => $tooltip %>
+    <% end %>
+  </div>
+% }
+</div>
diff --git a/templates/imgbin/view.html.ep b/templates/imgbin/view.html.ep
index c54083b..982b39d 100644
--- a/templates/imgbin/view.html.ep
+++ b/templates/imgbin/view.html.ep
@@ -4,6 +4,11 @@
 <h1><%= l('View image') %></h1>
 <div>
   <div>
+% if (config->{imgbin}->{show_latest}) {
+    <span class="zerobin cblock">
+      <%= link_to l('Latest images') => "/imgbin/latest" %>
+    </span>
+% }
     <span class="zerobin cblock">
       <%= link_to l('Upload more') => "/imgbin" %>
     </span>