exclude tom cache. add version action

Changes

@@ -1,3 +1,8 @@
+0.3.10
+
+* Add --version action to print Sparrow installed version
+* `plg upload` - Skip .tom directory when creating plugin distribution file
+
 0.3.9 2018-12-15
 
 * Remove tomtit's cache from distro

README.md

@@ -49,6 +49,12 @@ See [sparrow command line API](#api) below.
 
 Think about it as of `cpan client` for CPAN modules or `gem client` for Ruby gems.
 
+You run Sparrow client by using `sparrow` command.
+
+To print out Sparrow currently installed version, run this:
+
+    $ sparrow --version
+
 # Sparrow basic entities
 
 Sparrow architecture comprises of 4 basic parts:
@@ -925,6 +931,8 @@ instead of plugin execution when `sparrow plg run` command is invoked.
 
 That's it!
 
+If you want to troubleshoot upload plugin errors use `--verbose` flag, when upload plugin.
+
 # Publishing private sparrow plugins
 
 The process is almost the same as for public plugins, except you don't have to provide SparrowHub credentials

bin/sparrow

@@ -29,7 +29,11 @@ my $object = shift @ARGV;
 
 init_sparrow_env();
 
-if ($object eq  'plg'){
+    if ($object eq '--version' ){
+
+      print "$Sparrow::VERSION\n";
+
+    }elsif  ($object eq  'plg'){
 
     my $action = shift @ARGV;
 
@@ -51,7 +55,7 @@ if ($object eq  'plg'){
 
     } elsif( $action  eq 'upload'){
 
-        upload_plugin();        
+        upload_plugin(@ARGV);        
 
     } elsif ( $action  eq 'show'){
 

lib/Sparrow.pm

@@ -1,6 +1,6 @@
 package Sparrow;
 
-our $VERSION = '0.3.9';
+our $VERSION = '0.3.10';
 
 1;
 

lib/Sparrow/Commands/Plugin.pm

@@ -674,6 +674,15 @@ sub read_plugin_list {
 
 sub upload_plugin {
 
+    my @args = @_;
+
+    my $verbose_mode;
+
+    my $args_st = GetOptionsFromArray(
+      \@args,
+      "verbose" => \$verbose_mode,
+    );
+
     # get user/token by environment variables
     # usefull when making tests
 
@@ -708,13 +717,15 @@ sub upload_plugin {
 
     print "sparrow.json file validated ... \n";
 
-    execute_shell_command('tar --exclude=.cache/ --exclude=local --exclude=*.log  --exclude=log --exclude Gemfile.lock --exclude local/  --exclude-vcs -zcf /tmp/archive.tar.gz .' );
+    execute_shell_command('tar --exclude=.tom --exclude=local --exclude=*.log  --exclude=log --exclude Gemfile.lock --exclude local/  --exclude-vcs -zcf /tmp/archive.tar.gz .', debug => $verbose_mode );
+
     my $unsecure_flag = $ENV{SPARROW_UNSECURE} ? "-k" : "";
     execute_shell_command(
-        "curl $unsecure_flag -H 'sparrow-user: $cred->{user}' " .
+        "curl -s -k $unsecure_flag -H 'sparrow-user: $cred->{user}' " .
         "-H 'sparrow-token: $cred->{token}' " .
         '-f -X POST '.sparrow_hub_api_url().'/api/v1/upload -F archive=@/tmp/archive.tar.gz',
-        silent => 1,
+        silent => ($verbose_mode ? 0 : 1),
+        debug  => ($verbose_mode ? 1 : 0)
     );
 
 }

lib/Sparrow/Misc.pm

@@ -29,6 +29,8 @@ sub execute_shell_command {
 
     my $st = ( system($cmd) == 0 );
 
+    print "run cmd: $cmd ...\n" if $opts{debug};
+
     if ($opts{silent}){
         die "failed to execute shell command" unless $st;
     } else {
@@ -100,8 +102,10 @@ sub usage {
 sub init_sparrow_env {
 
     make_path(sparrow_root());
-	print "sparrow root: [", sparrow_root(),"]\n";
-	make_path(sparrow_root().'/plugins', { verbose => 1 } ); #
+
+	  print "sparrow root: [", sparrow_root(),"]\n";
+
+	  make_path(sparrow_root().'/plugins', { verbose => 1 } ); #
     make_path(sparrow_root().'/plugins/private');
     make_path(sparrow_root().'/plugins/public');
     make_path(sparrow_root().'/projects');