kamukabi-kash 0.1.1 → 0.1.2

checksums.yaml

@@ -1,7 +1,7 @@
 ---
 SHA1:
-  metadata.gz: eed21e7311cb959ef4f11ba00973ef46e81b2fc1
-  data.tar.gz: 548ada26ad9612910c1c8eecae888900f3d9bb0f
+  metadata.gz: bc7188db156242f1715fd57060b63273b70c2e21
+  data.tar.gz: c2bc37e9e72d2cc64b146779ba8d9234b9133f97
 SHA512:
-  metadata.gz: da1ab58c915dccd7de64b86a6a84ebbf6d5d5fefe43641188f16d02e7e3b5e275bcd3ec10bb04a4acbbe19977e9d6f00926a9d55127171f8942acbbeeca6fba6
-  data.tar.gz: 2df1a63e2a8931e4bca741c76853f7cb92f189df83ce49515561b1cb56a5ad5fb826c3ac40f957e6c2d5b1a62692193777bddcc9a168a60d2578b6fee4f325b5
+  metadata.gz: dbc1986fc3549d0d4295d54d097ec6e8322ec11b14f705df3bb8506274af7eb71dd27a95c422630cd467698e9506143437e572b755539b6c12ab43da68e5f6ee
+  data.tar.gz: 8e1da004558977038fb81daf91ec9942df0090f1e501d99bfcc045d532cfde2b8fa6aa0612c45b0fb9629e1ea25e53b954c0935763c3ccc6c4d23efc85bbba9a

data/exe/kash

@@ -1,201 +1,5 @@
-#!/usr/bin/perl
-
-use warnings;
-use strict;
-use Carp;
-use Getopt::Std;
-
-my $root_path     = "";
-my $app           = "";
-my $version       = "0.3.2";
-my $app_domain    = "kamukabi.com";
-my $remotes       = "kamukabi";
-my $quoted_domain = quotemeta $app_domain;
-my $stage         = "";
-
-my %opt = ();
-getopts( "si:", \%opt );
-my %stages = get_stages();
-if ( defined $opt{s} ) {
-    my @stages = sort keys %stages;
-    print "@stages\n";
-    exit(0);
-}
-
-my $identity = "";
-my $gsc      = "ssh";
-if ( $opt{i} && $opt{i} ne "" ) {
-    die "identity file $opt{i} not exists.\n" unless -f $opt{i};
-    $identity = "-i " . $opt{i};
-    $gsc      = "ssh $identity";
-}
-
-my %commands = (
-    'autoupdate' => {
-        type                 => "local",
-        appname_not_required => 1,
-        desc                 => "automatically download and install new kash",
-        run                  => sub {
-            my $tmp = `mktemp -d`;
-            chomp($tmp);
-            system( "git", "clone", "git\@bitbucket.org:kamukabi/kash.git",
-                $tmp );
-            chdir $tmp;
-            exec("./install.sh");
-        },
-    },
-    'clone' => {
-        type     => "local",
-        min_args => 1,
-        desc     => "clone application repository",
-
-        run => sub {
-            my $app = $ARGV[1];
-            print
-                `git clone --origin $remotes$stage git\@$app.$app_domain:$app`;
-        },
-    },
-    'init' => {
-        type                 => "local",
-        min_args             => 1,
-        appname_not_required => 1,
-        desc => "initialize git repo in current directory and set remotes",
-        run  => sub {
-            my $app = $ARGV[1];
-            die "First initialize git in this folder. Use: git init\n"
-                unless ( -d ".git" );
-            print
-                `GIT_SSH_COMMAND='$gsc' git remote add $remotes$stage git\@$app.$app_domain:$app`;
-        },
-    },
-    'deploy' => {
-        type => "local",
-        desc => "send code to kamukabi server",
-        run  => sub {
-            system("GIT_SSH_COMMAND='$gsc' git push $remotes$stage `git branch --no-color 2>/dev/null | grep '*' | sed -e 's/\\* //'`:master");
-            if ( $? == 0 ) {
-                print
-                    "Your build went fine. Let's attach to your app output. (Ctrl+c to exit)\n";
-                exec
-                    "ssh $identity -t cmd\@$app.$app_domain $app $version logs -f";
-            }
-        },
-    },
-    'ftp' => {
-        type => "sftp",
-        desc => "start ftp shell on your app storage",
-    },
-    'run' => {
-        min_args => 1,
-        desc     => "send command to aplication",
-    },
-    'restart' => { desc => "restart your aplication", },
-    'rebuild' => { desc => "restart build process", },
-    'logs'    => { desc => "show app output", args => "[{-f|-n NUM}]", },
-    'pg' => {
-        desc   => "Shared postgresql managment",
-        childs => {
-            'backup' => { desc => "backup your database to ftp", },
-            'restore' =>
-                { desc => "restore your database from database.sql on ftp", },
-            'console' => { desc => "open pgsql console", },
-        }
-    },
-    'mysql' => {
-        desc   => "Shared mysql managment",
-        childs => {
-            'backup' => { desc => "backup your database to ftp", },
-            'restore' =>
-                { desc => "restore your database from database.sql on ftp", },
-            'console' => { desc => "open mysql console", },
-        }
-    },
-);
-
-usage() if scalar @ARGV == 0;
-
-if ( scalar @ARGV > 1 && defined $commands{ $ARGV[1] } ) {
-    $stage = "$ARGV[0]";
-    shift @ARGV;
-}
-
-my $command = $ARGV[0];
-my $c       = $commands{$command};
-usage() if not defined $c;
-while ( defined $c->{childs} ) {
-    usage() if scalar @ARGV == 1;
-    usage() if not defined $c->{childs}->{ $ARGV[1] };
-    $command = "$ARGV[0]:$ARGV[1]";
-    $c       = $c->{childs}->{ $ARGV[1] };
-    shift @ARGV;
-}
-
-my @args = @ARGV[ 1 .. $#ARGV ];
-if ( $c->{min_args} && scalar @args < $c->{min_args} ) {
-    die("Command ($command) require at least $c->{min_args} arguments.\n");
-}
-if ( !defined $c->{appname_not_required} ) {
-    die("Unknow stage: $stage\n")
-        if $stage ne "" && not defined $stages{$stage};
-    die("First initialize project or clone it!\n")
-        if not defined $stages{$stage};
-    $app = $stages{$stage};
-}
-$stage = "-$stage" if $stage ne "";
-$c->{type} //= 'ssh';
-for ( $c->{type} ) {
-    exit( $c->{run}() ) if /local/;
-    exec "sftp $identity -P2222 $app\@$app.$app_domain" if /ftp/;
-    exec
-        "ssh $identity -t cmd\@$app.$app_domain $app $version $command @args";
-}
-
-sub get_stages {
-    $root_path = `git rev-parse --show-toplevel 2>/dev/null`;
-    return () if ( $root_path eq "\n" );
-    chomp($root_path);
-    open( my $fh, "<", ".git/config" ) or return ();
-    my %stages;
-    my $st;
-    while (<$fh>) {
-        if (/^\[(.+)\]$/) {
-            $st = undef;
-        }
-        if (/\[remote "$remotes-?(.*)"\]/) {
-            $st = $1;
-        }
-        if (/url = git@(.+)\.$quoted_domain:/) {
-            $stages{$st} = $1 if defined $st;
-        }
-    }
-    return %stages;
-}
-
-sub usage {
-    print "Kamukabi toolbox $version\nUsage: \n";
-    print "  kash [-i key.pub] [-s] [STAGE] COMMAND\n";
-    print "Stage is a sufix used in git remote definition.\n";
-    print
-        " -i Selects a file from which the identity (private key) for public key authentication is read.\n";
-    print " -s List known stages in this project.\n";
-    print "Supported commands:\n";
-    usage_commands( "    ", \%commands );
-    exit 0;
-}
-
-sub usage_commands {
-    my ( $i, $commands_ref ) = @_;
-    for ( sort keys %{$commands_ref} ) {
-        $commands_ref->{$_}->{args} //= "";
-        printf(
-            "$i%-11s %-14s - %s\n",
-            $_,
-            $commands_ref->{$_}->{args},
-            $commands_ref->{$_}->{desc}
-        );
-        if ( defined $commands_ref->{$_}->{childs} ) {
-            usage_commands( "  $i", $commands_ref->{$_}->{childs} );
-        }
-    }
-}
-
+#!/usr/bin/env ruby
+require 'rubygems'
+require 'bundler/setup'
+dir = File.expand_path File.dirname(__FILE__)
+Bundler.clean_exec("#{dir}/perl-kash/kash")

data/lib/kamukabi/kash/version.rb

@@ -1,5 +1,5 @@
 module Kamukabi
   module Kash
-    VERSION = "0.1.1"
+    VERSION = "0.1.2"
   end
 end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: kamukabi-kash
 version: !ruby/object:Gem::Version
-  version: 0.1.1
+  version: 0.1.2
 platform: ruby
 authors:
 - Marek Polewski
@@ -77,6 +77,7 @@ files:
 - contributors.txt
 - exe/kash
 - kamukabi-kash-0.1.0.gem
+- kamukabi-kash-0.1.1.gem
 - kamukabi-kash.gemspec
 - lib/kamukabi/kash.rb
 - lib/kamukabi/kash/version.rb