package Mojolicious::Plugin::JSUrlFor::Angular;
use Mojo::Base 'Mojolicious::Plugin';
use JSON::PP;

my $json = JSON::PP->new->utf8(0)->pretty;

our $VERSION = '0.18';


sub register {
    my ( $self, $app, $config ) = @_;

    $app->helper(
        _js_url_for_code_only => sub {
            my $c      = shift;
            my $endpoint_routes = $self->_collect_endpoint_routes( $app->routes );

            #~ my %names2paths;
            my @names2paths;
            foreach my $route (@$endpoint_routes) {
                next unless $route->name;
                
                my $path = $self->_get_path_for_route($route);
                $path =~ s{^/*}{/}g; # TODO remove this quickfix

                #~ $names2paths{$route->name} = $path;
                push @names2paths, sprintf("'%s': '%s'", $route->name, $path);
                
                #~ if ($route->name eq 'assetpack by topic') {
                    #~ push @names2paths, sprintf("'%s': '%s'", "t/$_", $app->url_for('assetpack by topic', topic=>$_))
                      #~ for keys %{$app->assetpack->{by_topic}};
                #~ }
            }

            #~ my $json_routes = $c->render_to_string( json => \%names2paths );
            my $json_routes = $json->encode(\@names2paths);
            $json_routes =~ s/"//g;
            $json_routes =~ s/'/"/g;
            $json_routes =~ s/\[/{/g;
            $json_routes =~ s/\]/}/g;
            #~ utf8::decode( $json_routes );

            my $js = <<"JS";
(function () {
'use strict';
/*

¡ ¡ ¡ ALL GLORY TO GLORIA ! ! !

Маршруты/Routes
  
  // method url_for
  appRoutes.url_for(route_name, captures, param)
    returns url string
    captures: either object, either array, either scalar
    param: either object, either scalar
  
  appRoutes.url_for('foo name', {id: 123}); // передача объекта подстановки
  appRoutes.url_for('foo name', [123]); // передача массива подстановки
  appRoutes.url_for('foo name', 123); // передача скаляра подстановки
  appRoutes.url_for('foo name', ..., param); // передача параметров запроса (объект или готовая строка)
  
  // url_for tests
  appRoutes.routes['foo bar'] = 'foo=:foo/bar=:bar';
  console.log(appRoutes.url_for('foo bar', []) == 'foo=/bar=');
  console.log(appRoutes.url_for('foo bar', [1,2]) == 'foo=1/bar=2');
  console.log(appRoutes.url_for('foo bar', [1]) == 'foo=1/bar='); 
  console.log(appRoutes.url_for('foo bar') == 'foo=/bar=');
  console.log(appRoutes.url_for('foo bar', {}) == 'foo=/bar='); 
  console.log(appRoutes.url_for('foo bar', {foo:'ok', baz:'0'}) == 'foo=ok/bar=');
  console.log(appRoutes.url_for('foo bar', {foo:'ok', bar:'0'}) == 'foo=ok/bar=0' );
  console.log(appRoutes.url_for('foo bar', 'ook') == 'foo=ook/bar=');
  console.log(appRoutes.url_for('foo bar', null, 'param1') == 'foo=/bar=?param1');
  console.log(appRoutes.url_for('foo bar', {foo:'ok', bar:'0'}, {p1:1,p2:2}) == 'foo=ok/bar=0?p1=1&p2=2' );
  console.log(appRoutes.url_for('foo bar', {foo:'ok', bar:'0'}, {p1:1,"парам2":[1,2]}) == 'foo=ok/bar=0?p1=1&парам2=2&парам2=2' );
  
  // method baseURL
  var base = appRoutes.baseURL();
  appRoutes.baseURL('http://host...');

*/
  
var moduleName = "appRoutes";

try {
  if (angular.module(moduleName)) return function () {};
} catch(err) { /* failed to require */ }

var routes = $json_routes,
  arr_re = new RegExp('[:*]\\\\w+', 'g'),
  _baseURL = '';

function baseURL (base) {// set/get base URL prefix
  if (base === undefined) return _baseURL;
  _baseURL = base;
  return base;
  
}


function url_for(route_name, captures, param) {
  var pattern = routes[route_name];
  if(!pattern) {
    console.log("[angular.appRoutes] Has none route for the name: "+route_name);
    return baseURL() + route_name;
  }
  
  if ( captures === undefined ) captures = [];
  if ( !angular.isObject(captures) ) captures = [captures];
  if ( angular.isArray(captures) ) {
    var replacer = function () {
      var c =  captures.shift();
      if ( c === undefined ) c='';
      return c;
    }; 
    pattern = pattern.replace(arr_re, replacer);
  } else {
    angular.forEach(captures, function(value, placeholder) {
      var re = new RegExp('[:*]' + placeholder, 'g');
      pattern = pattern.replace(re, value);
    });
    pattern = pattern.replace(/[:*][^/.]+/g, ''); // Clean not replaces placeholders
  }
  
  if ( param === undefined ) return baseURL() + pattern;
  if ( !angular.isObject(param) ) return baseURL() + pattern + '?' + param;
  var query = [];
  angular.forEach(param, function(value, name) {
    if ( angular.isArray(value) ) { angular.forEach(value, function(val) {query.push(name+'='+val);}); }
    else { query.push(name+'='+value); }
  });
  if (!query.length) return baseURL() + pattern;
  return baseURL() + pattern + '?' + query.join('&');
}

var factory = {
  routes: routes,
  baseURL: baseURL,
  url_for: url_for
};

angular.module(moduleName, [])

.run(function (\$window) {
  \$window['angular.'+moduleName] = factory;
})

.factory(moduleName, function () {
  return factory;
})
;

}());
JS
            return $js;
        } );
}


sub _collect_endpoint_routes {
    my ( $self, $route ) = @_;
    my @endpoint_routes;

    foreach my $child_route ( @{ $route->children } ) {
        if ( $child_route->is_endpoint ) {
            push @endpoint_routes, $child_route;
        } else {
            push @endpoint_routes, @{ $self->_collect_endpoint_routes($child_route) };
        }
    }
    return \@endpoint_routes
}

sub _get_path_for_route {
    my ( $self, $parent ) = @_;

    my $path = $parent->pattern->unparsed // '';

    while ( $parent = $parent->parent ) {
        $path = ($parent->pattern->unparsed//'') . $path;
    }

    return $path;
}

1;
__END__

=encoding utf8

Доброго всем

=head1 Mojolicious::Plugin::JSUrlFor::Angular

¡ ¡ ¡ ALL GLORY TO GLORIA ! ! !

=head1 VERSION

0.18

=head1 NAME

Mojolicious::Plugin::JSUrlFor::Angular - Mojolicious routes as Angular javascript module.

=head1 SYNOPSIS

  # Instead of helper only use generator for produce static file
  # cd <your/app/dir>
  perl script/app.pl generate js_url_for_angular > public/js/url_for.js
  # In output file inspect/remove nonsecure routes
  
  # in javascript
  angular.module(moduleName, ['appRoutes', ...])
  .config(function(appRoutes) {
    appRoutes.baseURL('https://foo.com');
  })
  .controller('fooControll', function (appRoutes) {
    var url = appRoutes.url_for(...); // see help inside generated js file
  });


=head1 DESCRIPTION

Генерация маршрутов для Angular1 Mojolicious routes genenerator for Angular1. Forked from L<Mojolicious::Plugin::JSUrlFor>.

=head1 HELPERS

None public

=head1 CONFIG OPTIONS

None options

=head1 GENERATORS

=head2 js_url_for_angular

  perl script/app.pl generate js_url_for_angular > path/to/relative_file_name


=head1 METHODS

L<Mojolicious::Plugin::JSUrlFor> inherits all methods from
L<Mojolicious::Plugin> and implements the following new ones.

=head2 C<register>

  $plugin->register;

Register plugin in L<Mojolicious> application.

=head1 AUTHOR

Михаил Че (Mikhail Che) <mche[-at-]cpan.org>

=head1 BUGS

Please report any bugs or feature requests to Github L<https://github.com/mche/Mojolicious-Plugin-JSUrlFor-Angular/>

Also you can report bugs to CPAN RT

=head1 SEE ALSO

L<Mojolicious::Plugin::JSUrlFor>

L<Mojolicious>

L<Mojolicious::Guides>

L<http://mojolicio.us>

=cut