override ANGULAR_JS with enviroment variable

[angular-mojolicious.git] / angular-server.pl
diff --git a/angular-server.pl b/angular-server.pl

index c943bbe..5ac99de 100755 (executable)
--- a/angular-server.pl
+++ b/angular-server.pl
@@ -8,6 +8,7 @@ use Data::Dump qw(dump);
  # http://angular.getangular.com/data
  
  our $data;
+our $id2nr;
  
  get '/' => 'index';
  
@@ -25,11 +26,12 @@ get '/_replicate' => sub {
                 if ( $database && $entities ) {
                         foreach my $entity ( keys %$entities ) {
                                 my $url = $from;
-                               $url =~ s{/+$}{/};
+                               $url =~ s{/?$}{/}; # add slash at end
                                 $url .= $entity;
                                 my $e = $self->client->get( $url )->res->json;
                                 warn "# replicated $url ", dump($e);
                                 $data->{$database}->{$entity} = $e;
+                               delete $id2nr->{$database}->{$entity};
                         }
                 }
         }
@@ -60,12 +62,31 @@ warn "# entry $entity ", dump( $data->{$database}->{$entity} );
  
  get '/data/:database/:entity' => sub {
         my $self = shift;
-
+       $self->render_json( $data->{ $self->param('database') }->{ $self->param('entity' ) } );
  };
  
  get '/data/:database/:entity/:id' => sub {
      my $self = shift;
  
+       my $database = $self->param('database');
+       my $entity   = $self->param('entity');
+       my $id       = $self->param('id');
+
+       my $e = $data->{$database}->{$entity} || die "no entity $entity";
+
+       if ( ! defined $id2nr->{$database}->{$entity}  ) {
+               foreach my $i ( 0 .. $#$e ) {
+                       $id2nr->{$database}->{$entity}->{ $e->[$i]->{'$id'} } = $i;
+               }
+       }
+
+       if ( exists $id2nr->{$database}->{$entity}->{$id} ) {
+               my $nr = $id2nr->{$database}->{$entity}->{$id};
+               warn "# entity $id -> $nr\n";
+               $self->render_json( $data->{$database}->{$entity}->[$nr] );
+       } else {
+               die "no entity $entity $id in ", dump( $id2nr->{$database}->{$entity} );
+       }
  };
  
  any [ 'put' ] => '/data/:database/:entity/:id' => sub {
@@ -79,6 +100,12 @@ get '/demo/:groovy' => sub {
      $self->render(text => $self->param('groovy'), layout => 'funky');
  };
  
+get '/Cookbook' => 'Cookbook';
+get '/Cookbook/:example' => sub {
+       my $self = shift;
+       $self->render( "Cookbook/" . $self->param('example'), layout => 'angular' );
+};
+
  
  app->start;
  __DATA__
@@ -92,3 +119,13 @@ Yea baby!
      <head><title>Funky!</title></head>
      <body><%== content %></body>
  </html>
+
+@@ layouts/angular.html.ep
+<!DOCTYPE HTML>
+<html xmlns:ng="http://angularjs.org">
+  <head>
+    <script type="text/javascript"
+         src="<%== $ENV{ANGULAR_JS} || '/build/angular.js' %>" ng:autobind></script>
+  </head>
+  <body><%== content %></body>
+</html>