form di aggiunta bookmark funzionante

1 files changed, 64 insertions, 0 deletions

diff --git a/lib/Bookmarks/C/Main.pm b/lib/Bookmarks/C/Main.pm
index 3434e00..2cab5ee 100644
--- a/lib/Bookmarks/C/Main.pm
+++ b/lib/Bookmarks/C/Main.pm
@@ -2,6 +2,8 @@ package Bookmarks::C::Main;
 
 use strict;
 use base 'Catalyst::Base';
+use Bookmarks::Utils;
+use YAML;
 
 =head1 NAME
 
@@ -62,17 +64,79 @@ sub icon : Global {
     }
 }
 
+sub favicon : Path('favicon.ico') {
+    my ( $self, $c ) = @_;
+    $c->res->status(404);
+    $c->res->body('nonce');
+}
+
 sub jump : Global {
     my ( $self, $c ) = @_;
 
     my $link=Bookmarks::M::DB::Links->retrieve($c->req->param('link'));
     $link->access_count($link->access_count()+1);
+    $link->last_access_date(time());
     $link->update();
 
     $c->res->status(302);
     $c->res->location($link->url());
 }
 
+sub add : Global {
+    my ( $self, $c ) = @_;
+
+    my %pre_link=();
+    for my $i (qw(url title descr)) {
+        $pre_link{$i}=$c->req->param($i);
+    }
+    my @tags=split /[ +]/,($c->req->param('tag')||'');
+
+    print {*STDERR} Dump(\%pre_link);
+    print {*STDERR} Dump($c->req);
+
+    # GET: prepare the form from the URL params
+    if ($c->req->method eq 'GET') {
+        $c->stash->{link}=\%pre_link;
+        $c->stash->{tags}=\@tags;
+        $c->stash->{template}='add_form';
+    }
+    # POST: accept data and create link+tags
+    elsif ($c->req->method eq 'POST') {
+        my ($dblink)=Bookmarks::M::DB::Links->search({url=>$pre_link{url}});
+        if (!defined $dblink) { # devo crearlo
+            $dblink=Bookmarks::M::DB::Links->create({});
+            $dblink->add_date(time());
+            $dblink->access_count(0);
+        }
+        $dblink->set(%pre_link);
+        $dblink->set_icon(Bookmarks::Utils::get_site_icon($pre_link{url}));
+        $dblink->update();
+
+        # tags
+        Bookmarks::M::DB::LinksTags->search({
+            link => $dblink->pk()
+        })->delete_all();
+
+        for my $tagname (@tags) {
+            my $dbtag=Bookmarks::M::DB::Tags->find_or_create({
+                name => $tagname,
+            });
+
+            Bookmarks::M::DB::LinksTags->find_or_create({
+                tag => $dbtag->pk(),
+                link => $dblink->pk(),
+            });
+        }
+
+        if ($c->req->param('close')) {
+            $c->stash->{template}='closewin';
+        }
+        else {
+            $c->res->redirect($c->req->base.'tags');
+        }
+    }
+}
+
 =back