crew 0.0.1

data/.crew/tasks/url/escape.crew

@@ -0,0 +1,13 @@
+require 'uri'
+
+desc "Performs URL escaping on a value"
+
+arg "value"
+
+run do
+  URI.escape(args.value)
+end
+
+test do
+  assert_equal "%20", run!(" ")
+end

data/.crew/tasks/user/current.crew

@@ -0,0 +1,9 @@
+desc "Returns the current user"
+
+run do
+  sh("whoami").chomp
+end
+
+test do
+  assert_equal env("USER"), run!
+end

data/.crew/tasks/uuid.crew

@@ -0,0 +1,9 @@
+desc "Generate a UUID"
+
+run do
+  sh("uuidgen").chomp
+end
+
+test do
+  assert_not_equal run!, run!
+end

data/.crew/tasks/vmrun/bin.crew

@@ -0,0 +1,6 @@
+desc "Returns the binary for running vmware fuction"
+
+run do
+  fs_exists? "/Applications/VMware\ Fusion.app/Contents/Library/vmrun"
+  escape "/Applications/VMware Fusion.app/Contents/Library/vmrun"
+end

data/.crew/tasks/vmrun/checktoolsstate.crew

@@ -0,0 +1,8 @@
+desc "Check the tools state for a fusion vm"
+
+arg "path"
+
+run "darwin" do
+  out, err, code = sh_with_code "#{vmrun_bin} checkToolsState #{escape(args.path)}"
+  out.strip
+end

data/.crew/tasks/vmrun/getguestipaddress.crew

@@ -0,0 +1,9 @@
+desc "gets the ip of the guest in vmware"
+
+arg "path"
+
+run "darwin" do
+  #vmrun_installtools! args.path # todo enable this..
+  out = sh "#{vmrun_bin} getGuestIPAddress #{escape(args.path)}"
+  out.chomp
+end

data/.crew/tasks/vmrun/installtools.crew

@@ -0,0 +1,12 @@
+desc "Check the tools state for a fusion vm"
+
+arg "path"
+
+verify "darwin" do
+  assert_equal "running", vmrun_checktoolsstate(args.path)
+end
+
+run "darwin" do
+  out, err, code = sh_with_code "#{vmrun_bin} installTools #{escape(args.path)}"
+  raise
+end

data/.crew/tasks/vmrun/list.crew

@@ -0,0 +1,10 @@
+desc "Lists running fusion vms"
+
+run "darwin" do
+  vms = []
+  sh("#{vmrun_bin} list").each_line do |line|
+    next if line[/Total running VMs/]
+    vms << line.chomp
+  end
+  vms
+end

data/.crew/tasks/vmrun/snapshots.crew

@@ -0,0 +1,12 @@
+desc "list existing snapshots for fusion vm"
+
+arg "path"
+
+run "darwin" do
+  snapshots = []
+  sh("#{vmrun_bin} listSnapshots #{escape(args.path)}").each_line do |line|
+    next if line[/Total snapshots/]
+    snapshots << line.chomp
+  end
+  snapshots
+end

data/.crew/tasks/vmrun/snapshots/create.crew

@@ -0,0 +1,12 @@
+desc "create a new snapshot fusion vm"
+
+arg "path"
+arg "name"
+
+verify "darwin" do
+  assert_include vmrun_snapshots(args.path), args.name
+end
+
+run "darwin" do
+  sh("#{vmrun_bin} snapshot #{escape(args.path)} #{escape(args.name)}")
+end

data/.crew/tasks/vmrun/snapshots/delete.crew

@@ -0,0 +1,12 @@
+desc "delete a new snapshot fusion vm"
+
+arg "path"
+arg "name"
+
+verify "darwin" do
+  assert_not_include vmrun_snapshots(args.path), args.name
+end
+
+run "darwin" do
+  sh("#{vmrun_bin} deleteSnapshot #{escape(args.path)} #{escape(args.name)}")
+end

data/.crew/tasks/vmrun/snapshots/revert.crew

@@ -0,0 +1,8 @@
+desc "revert to a snapshot fusion vm"
+
+arg "path"
+arg "name"
+
+run "darwin" do
+  sh("#{vmrun_bin} revertToSnapshot #{escape(args.path)} #{escape(args.name)}")
+end

data/.crew/tasks/vmrun/start.crew

@@ -0,0 +1,21 @@
+desc "Start a fusion vm"
+
+arg "path"
+opt "headless", default: false
+
+hints "darwin"
+
+verify do
+  assert_include vmrun_list, args.path
+end
+
+run do
+  poll("Starting VM") do
+    retryable(timeout: 5) do
+      sh "#{vmrun_bin} start #{escape(args.path)} #{args.headless ? 'nogui' : 'gui'}"
+    end
+  end
+  poll("Finding VM", timeout: 10, interval: 0.1) do
+    assert_include vmrun_list, args.path
+  end
+end

data/.crew/tasks/vmrun/stop.crew

@@ -0,0 +1,11 @@
+desc "Stop a fusion vm"
+
+arg "path"
+
+verify "darwin" do
+  assert_not_include vmrun_list, args.path
+end
+
+run "darwin" do
+  sh "#{vmrun_bin} stop #{escape(args.path)}"
+end

data/.crew/tasks/vmrun/suspend.crew

@@ -0,0 +1,11 @@
+desc "Suspend a fusion vm"
+
+arg "path"
+
+verify "darwin" do
+  assert_not_include vmrun_list, args.path
+end
+
+run "darwin" do
+  sh "#{vmrun_bin} suspend #{escape(args.path)}"
+end

data/.crew/tasks/wget/version.crew

@@ -0,0 +1,10 @@
+desc "Gets the version of wget installed"
+
+run do
+  sh("wget --version").split(/\s/)[2]
+end
+
+test do
+  setup_wget
+  assert_match sh("wget --version"), run!
+end

data/.gitignore

@@ -0,0 +1,3 @@
+.DS_Store
+docs.html
+ideas

data/Gemfile

@@ -0,0 +1,4 @@
+# A sample Gemfile
+source "https://rubygems.org"
+
+gemspec

data/Gemfile.lock

@@ -0,0 +1,46 @@
+PATH
+  remote: .
+  specs:
+    crew (0.0.1)
+      json (~> 1.8.1)
+      net-scp (~> 1.1.2)
+      net-ssh (~> 2.7.0)
+      nokogiri (~> 1.6.0)
+      pry (~> 0.9.12.2)
+      rainbow (~> 1.99.1)
+      trollop (= 2.0)
+
+GEM
+  remote: https://rubygems.org/
+  specs:
+    coderay (1.1.0)
+    json (1.8.1)
+    metaclass (0.0.1)
+    method_source (0.8.2)
+    mini_portile (0.5.2)
+    minitest (5.0.8)
+    mocha (0.14.0)
+      metaclass (~> 0.0.1)
+    net-scp (1.1.2)
+      net-ssh (>= 2.6.5)
+    net-ssh (2.7.0)
+    nokogiri (1.6.1)
+      mini_portile (~> 0.5.0)
+    pry (0.9.12.4)
+      coderay (~> 1.0)
+      method_source (~> 0.8)
+      slop (~> 3.4)
+    rainbow (1.99.1)
+    rake (10.1.0)
+    slop (3.4.7)
+    trollop (2.0)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  bundler (~> 1.3)
+  crew!
+  minitest
+  mocha (~> 0.14.0)
+  rake

data/README.md

@@ -0,0 +1,3 @@
+# Crew
+
+Test-driven shell scripting. More details to come!

data/Rakefile

@@ -0,0 +1,34 @@
+#!/usr/bin/env rake
+
+require "bundler/gem_tasks"
+require "rake/testtask"
+
+Rake::TestTask.new do |t|
+  t.ruby_opts = ["-r./spec/spec_helper"]
+  t.pattern = "spec/**/*_spec.rb"
+end
+
+namespace :test do
+  desc "Test tasks locally"
+  task :tasks do
+    require 'crew'
+    home = Crew::Home.new(File.expand_path("..", __FILE__))
+    task_count = 0
+    total_passes, total_failures = 0, 0
+    untested_tasks_count = 0
+
+    home.each_task do |task|
+      puts "Testing #{task.name}"
+      task_count += 1
+      passes, failures = home.test(task.name)
+      if passes + failures == 0
+        untested_tasks_count += 1
+      else
+        total_passes += passes
+        total_failures += failures
+      end
+    end
+    puts "Total tasks: #{task_count}"
+    puts "Total untested tasks: #{untested_tasks_count}"
+  end
+end

data/bin/crew

@@ -0,0 +1,7 @@
+#!/usr/bin/env ruby
+
+# needed due to bundler interactions .. oh god i wish i could remove this!
+$LOAD_PATH.unshift File.expand_path("../../lib", __FILE__)
+
+require 'crew'
+Crew::CLI.new.process(ARGV)

data/crew.gemspec

@@ -0,0 +1,33 @@
+# coding: utf-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'crew/version'
+
+Gem::Specification.new do |spec|
+  spec.name          = "crew"
+  spec.version       = Crew::VERSION
+  spec.authors       = ["Josh Hull"]
+  spec.email         = ["joshbuddy@gmail.com"]
+  spec.description   = %q{Write semantic scripts to setup and control your computer}
+  spec.summary       = %q{Write semantic scripts to setup and control your computer.}
+  spec.homepage      = ""
+  spec.license       = "MIT"
+
+  spec.files         = `git ls-files`.split($/)
+  spec.executables   = spec.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  spec.test_files    = spec.files.grep(%r{^(test|spec|features)/})
+  spec.require_paths = ["lib"]
+
+  spec.add_dependency "pry", "~>0.9.12.2"
+  spec.add_dependency "trollop", "2.0"
+  spec.add_dependency "nokogiri", "~>1.6.0"
+  spec.add_dependency "rainbow", "~>1.99.1"
+  spec.add_dependency "net-ssh", "~>2.7.0"
+  spec.add_dependency "net-scp", "~>1.1.2"
+  spec.add_dependency "json", "~> 1.8.1"
+
+  spec.add_development_dependency "bundler", "~> 1.3"
+  spec.add_development_dependency "rake"
+  spec.add_development_dependency "minitest"
+  spec.add_development_dependency "mocha", "~>0.14.0"
+end

data/install.sh

@@ -0,0 +1,26 @@
+#!/bin/bash
+
+# install crew to home directory
+
+echo "Installing crew"
+LOCAL_GEM=$(find . -name *.gem | head -n 1)
+if [ ! -e LOCAL_GEM ]; then
+  type rvm | head -n 1 | grep -q 'rvm is'
+  if [ $? -eq "0" ]; then
+    gem install $LOCAL_GEM
+  else
+    USER_GEM_DIR=$(ruby -rubygems -e 'puts Gem.user_dir')
+    gem install -q --user-install $LOCAL_GEM
+    $USER_GEM_DIR/bin/crew run fs_path_add "$USER_GEM_DIR/bin"
+  fi
+else
+  gem install crew -q --user-install -v0.0.1
+  USER_GEM_DIR=$(ruby -rubygems -e 'puts Gem.user_dir')
+  $USER_GEM_DIR/bin/crew run fs_path_add "$USER_GEM_DIR/bin"
+fi
+
+if [ ! -d $HOME/.crew ]; then
+  crew init ~
+fi
+
+echo "All done!"

data/lib/crew.rb

@@ -0,0 +1,37 @@
+require 'erb'     # for templating
+require 'digest'  # for task digests
+require 'net/ssh' # for ssh
+require 'net/scp'
+require 'etc'
+require 'rainbow' # for colorized console output
+require 'pry'     # for the shell, TODO get rid of this
+require 'set'     # all over
+require 'json'    # for task test storage
+
+require 'crew/version'
+require 'crew/util'
+require 'crew/logger'
+require 'crew/docs'
+require 'crew/home/dsl'
+require 'crew/home'
+require 'crew/tester/preparer/dsl'
+require 'crew/tester/preparer'
+require 'crew/tester/dsl'
+require 'crew/tester'
+require 'crew/context/dsl'
+require 'crew/context/local'
+require 'crew/context/ssh'
+require 'crew/context/vagrant'
+require 'crew/context/fusion'
+require 'crew/context'
+require 'crew/task/arguments'
+require 'crew/task/arguments/dsl'
+require 'crew/task/test'
+require 'crew/task/dsl'
+require 'crew/task'
+require 'crew/cli'
+require 'crew/cli/tasks'
+require 'crew/cli/contexts'
+
+module Crew
+end

data/lib/crew/cli.rb

@@ -0,0 +1,147 @@
+require 'trollop'
+
+module Crew
+  class CLI
+    module Processor
+      def dispatch(args)
+        if commands.include?(args.first)
+          method(args.shift.gsub(/-/, '_').to_sym).call(args)
+        elsif args.first.nil?
+          help(args)
+        else
+          help(args)
+          error "Unknown command #{args.join(", ")}"
+        end
+      end
+
+      private
+      def find_crew_dir
+        search_path = Dir.pwd
+        while true
+          break if File.exist?(File.join(search_path, ".crew"))
+          new_path = File.expand_path("..", search_path)
+          break if search_path == new_path
+          search_path = new_path
+        end
+        search_path ? File.join(search_path, ".crew") : nil
+      end
+
+      def crew_home
+        if path = find_crew_dir
+          Home.new(path)
+        else
+          warn "No .crew/config file found"
+          exit(1)
+        end
+      end
+    end
+
+    include Processor
+
+    def process(args)
+      cmds = commands
+      global_opts = Trollop::options(args) do
+        opt :no_color, "Don't use colored output"
+        stop_on cmds
+      end
+      Rainbow.enabled = global_opts[:no_color] == false
+      dispatch(args)
+    end
+
+    ## overall
+    def help(args)
+      puts help_message
+    end
+
+    def init(args)
+      opts = Trollop::options(args) do
+        opt :force, "Force creation"
+      end
+      args << opts
+      Home.init(*args)
+    end
+
+    ## general
+    def docs(args)
+      opts = Trollop::options(args) do
+        opt :open, "Open docs after generation", short: "o"
+      end
+      path = crew_home.docs
+      `open #{path}` if opts[:open]
+    end
+
+    # tasks
+
+    def contexts(args)
+      Contexts.new.process(args)
+    end
+
+    def tasks(args)
+      Tasks.new.process(args)
+    end
+
+    def shell(args)
+      opts = Trollop::options(args) do
+        opt :setup, "Enable setup mode", short: "-s"
+        opt :context, "Context name", short: "-c", type: String
+      end
+      home = crew_home
+      home.setup_mode = opts[:setup]
+      home.shell(opts[:context])
+    end
+
+    def run(args)
+      opts = Trollop::options(args) do
+        opt :setup, "Enable setup mode", short: "-s"
+        opt :context, "Context name", short: "-c", type: String
+      end
+      task_name = args.shift
+      raise "You must specify a task name" if task_name.nil?
+      home = crew_home
+      home.setup_mode = opts[:setup]
+      home.run(opts[:context], task_name, *args)
+    end
+
+    def test(args)
+      opts = Trollop::options(args) do
+        opt :force, "Force running", short: "-f"
+        opt :fast, "Fail fast"
+        opt :failed_only, "Fail fast", short: "-o"
+        opt :test_name, "Test name", short: "-t", type: String
+        opt :context_name, "Context name", short: "-c", type: String
+        opt :force_prepare, "Force preparing", short: "-p"
+      end
+      crew_home.test(opts)
+    end
+
+    private
+    def help_message
+      <<-HEREDOCS
+
+#{"# Crew #{Crew::VERSION}".color(:magenta)}
+
+#{"General                        ".bright}
+#{"===============================".bright}
+
+#{"help                           ".color(:blue).bright}provides help
+#{"init                           ".color(:blue).bright}initializes crew
+#{"status                         ".color(:blue).bright}gets the current status of crew
+#{"docs                           ".color(:blue).bright}generates and opens html docs
+#{"test                           ".color(:blue).bright}runs tests
+
+#{Tasks.new.help_message}
+
+#{Contexts.new.help_message}
+      HEREDOCS
+    end
+
+    def error(message)
+      warn message
+      exit(1)
+    end
+
+    def commands
+      %w(help init docs shell run tasks contexts test)
+    end
+  end
+end