X-Git-Url: http://git.rot13.org/?p=angular-mojolicious.git;a=blobdiff_plain;f=angular-server.pl;h=0a6cd7529b84babd624e378b2330e0478725e190;hp=a3daeecc3b2c3de75c3eda89eeed61f471955d35;hb=aee0665504a089a1c2f7152604b90e03c5862358;hpb=e5a5e3c2223e6473679b57c7132e178ea0113dcf diff --git a/angular-server.pl b/angular-server.pl index a3daeec..0a6cd75 100755 --- a/angular-server.pl +++ b/angular-server.pl @@ -2,6 +2,8 @@ use Mojolicious::Lite; use Data::Dump qw(dump); +use Time::HiRes qw(time); +use Clone qw(clone); # based on # http://docs.getangular.com/REST.Basic @@ -15,20 +17,30 @@ our $data = { { '$id' => 3, bar => 2 }, { '$id' => 4, baz => 3 }, ], + }, + 'AddressBook' => { + people => [ + {name=>'Misko'}, + {name=>'Igor'}, + {name=>'Adam'}, + {name=>'Elliott'} + ] } }; our $id2nr; sub _render_jsonp { my ( $self, $json ) = @_; +#warn "## _render_json ",dump($json); my $data = $self->render( json => $json, partial => 1 ); +warn "## _render_json $data"; if ( my $callback = $self->param('callback') ) { $data = "$callback($data)"; } $self->render( data => $data, format => 'js' ); } -get '/' => 'index'; +#get '/' => 'index'; get '/_replicate' => sub { my $self = shift; @@ -108,13 +120,32 @@ get '/data/:database/:entity/:id' => sub { } }; -any [ 'put', 'post' ] => '/data/:database/:entity/:id' => sub { +any [ 'post' ] => '/data/:database/:entity' => sub { my $self = shift; - my $data = $self->req->json; - warn "# body ",dump($self->req->body, $data); + my $json = $self->req->json; + my $id = $json->{'$id'} # XXX we don't get it back from angular.js + || $json->{'_id'} # so we use our version + || Time::HiRes::time(); # FIXME UUID? + warn "## $id body ",dump($self->req->body, $json); die "no data" unless $data; - $data->{ $self->param('database') }->{ $self->param('entity') }->{ $self->param('id') } = $data; - _render_jsonp( $self, $data ); + + $json->{'$id'} ||= $id; # angular.js doesn't resend this one + $json->{'_id'} = $id; # but does this one :-) + + my $database = $self->param('database'); + my $entity = $self->param('entity'); + + my $nr = $id2nr->{$database}->{$entity}->{$id}; + if ( defined $nr ) { + $data->{$database}->{$entity}->[$nr] = $json; + warn "# update $nr $id ",dump($json); + } else { + push @{ $data->{$database}->{$entity} }, $json; + my $nr = $#{ $data->{$database}->{$entity} }; + $id2nr->{$database}->{$entity}->{$id} = $nr; + warn "# added $nr $id ",dump($json); + } + _render_jsonp( $self, $json ); }; get '/demo/:groovy' => sub { @@ -122,13 +153,17 @@ get '/demo/:groovy' => sub { $self->render(text => $self->param('groovy'), layout => 'funky'); }; +get '/' => sub { shift->redirect_to('/Cookbook') }; get '/Cookbook' => 'Cookbook'; get '/Cookbook/:example' => sub { my $self = shift; - $self->stash('ANGULAR_JS', $ENV{ANGULAR_JS} || ( -e 'public/angular/build/angular.js' ? '/angular/build/angular.js' : '/angular/src/angular-bootstrap.js' ) ); $self->render( "Cookbook/" . $self->param('example'), layout => 'angular' ); }; +get '/conference/:page' => sub { + my $self = shift; + $self->render( "conference/" . $self->param('page'), layout => 'angular' ); +}; app->start; __DATA__ @@ -147,6 +182,7 @@ Yea baby! +% my $ANGULAR_JS = $ENV{ANGULAR_JS} || ( -e 'public/angular/build/angular.js' ? '/angular/build/angular.js' : '/angular/src/angular-bootstrap.js' );