mystro-client 0.1.0.rc1

data/.gitignore

@@ -0,0 +1,21 @@
+*.gem
+*.rbc
+.bundle
+.config
+.yardoc
+Gemfile.lock
+InstalledFiles
+_yardoc
+coverage
+doc/
+lib/bundler/man
+pkg
+rdoc
+spec/reports
+test/tmp
+test/version_tmp
+tmp
+
+.mystro
+config
+log

data/CHANGELOG.md

@@ -0,0 +1,2 @@
+# Changelog
+

data/Gemfile

@@ -0,0 +1,12 @@
+source 'https://rubygems.org'
+
+# Specify your gem's dependencies in mystro-client.gemspec
+gemspec
+
+gem "mystro-common", :path => "../common"
+gem "awesome_print"
+
+gem "mongo"
+gem "bson_ext"
+
+gem "chef", "~> 10.20.0"

data/LICENSE.txt

@@ -0,0 +1,22 @@
+Copyright (c) 2012 Shawn Catanzarite
+
+MIT License
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.md

@@ -0,0 +1,29 @@
+# Mystro::Client
+
+TODO: Write a gem description
+
+## Installation
+
+Add this line to your application's Gemfile:
+
+    gem 'mystro-client'
+
+And then execute:
+
+    $ bundle
+
+Or install it yourself as:
+
+    $ gem install mystro-client
+
+## Usage
+
+TODO: Write usage instructions here
+
+## Contributing
+
+1. Fork it
+2. Create your feature branch (`git checkout -b my-new-feature`)
+3. Commit your changes (`git commit -am 'Add some feature'`)
+4. Push to the branch (`git push origin my-new-feature`)
+5. Create new Pull Request

data/Rakefile

@@ -0,0 +1,51 @@
+require "bundler/gem_tasks"
+
+def changelog(last=nil, single=false)
+  command="git --no-pager log --format='%an::::%h::::%s'"
+
+  list = `git tag`
+
+  puts "# Changelog"
+  puts
+
+  ordered = list.lines.sort_by {|e| (a,b,c) = e.gsub(/^v/,"").split("."); "%3d%3d%3d" % [a, b, c]}
+
+  ordered.reject{|e| (a,b,c,d) = e.split("."); !d.nil?}.reverse_each do |t|
+    tag = t.chomp
+
+    if last
+      check = { }
+      out   = []
+      log   = `#{command} #{last}...#{tag}`
+      log.lines.each do |line|
+        (who, hash, msg) = line.split('::::')
+        unless check[msg]
+          unless msg =~ /^Merge branch/ || msg =~ /CHANGELOG/ || msg =~ /^(v|version|changes for|preparing|ready for release|ready to release|bump version)*\s*(v|version)*\d+\.\d+\.\d+/
+            msg.gsub(" *", "\n*").gsub(/^\*\*/, "  *").lines.each do |l|
+              line = l =~ /^(\s+)*\*/ ? l : "* #{l}"
+              out << line
+            end
+            check[msg] = hash
+          end
+        end
+      end
+      puts "## #{last}:"
+      out.each { |e| puts e }
+      #puts log
+      puts
+    end
+
+    last = tag
+    exit if single
+  end
+end
+
+desc "generate changelog output"
+task :changelog do
+  changelog
+end
+
+desc "show current changes (changelog output from HEAD to most recent tag)"
+task :current do
+  changelog("HEAD",true)
+end

data/bin/mystro

@@ -0,0 +1,174 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'clamp'
+require 'awesome_print'
+require 'active_support/all'
+
+require 'mystro/client'
+
+name = File.basename(__FILE__)
+
+def get_client(klass, account=nil)
+  s = Mystro.config.server
+  a = account || Mystro.config.default_account
+  t = Mystro.config.token
+  #Mystro::Log.debug "server: '#{s}' account: '#{a}' token: '#{t}'"
+  Mystro::Client.new(klass, s, a, t)
+end
+
+module Mystro
+  class Command < Clamp::Command
+    option %w{-a --account}, "ACCOUNT", "the account to filter with", default: nil, environment_variable: "MYSTRO_ACCOUNT"
+    option %w{-d --debug}, :flag, "turn on debugging", default: false do |v|
+      Mystro::Log.console_debug
+    end
+    option %w{-q --quiet}, :flag, "turn off uncessary messages", default: false do |v|
+      Mystro::Log.console_quiet
+    end
+    subcommand "ssh", "ssh to server" do
+      option %w{-x --user}, "USER", "the user to connect as", default: "ubuntu"
+      option %w{-o --options}, "[OPTIONS]", "additional ssh options"
+      parameter "PATTERN ...", "name or pattern of server"
+
+      def execute
+        client = get_client(:compute, account)
+        list = client.search(pattern_list.join(","))
+
+        raise "no servers matched" if list.count == 0
+        raise "more than one server found: #{list.map{|e| e["name"]}.join(", ")}" if list.count > 1
+
+        o = list.first
+        host =  o["long"] || o["dns"]
+
+        raise "host name not set" unless host
+
+        Mystro::Log.info "connecting as #{user} to #{o["long"] if o["long"]} (#{o["dns"]}) : #{options}"
+        exec("ssh #{options} #{user}@#{host}")
+      end
+    end
+    subcommand "csshx", "use csshx to connect to all servers of environment" do
+      option %w{-x --user}, "USER", "the user to connect as", default: "ubuntu"
+      parameter "PATTERN ...", "name or pattern of servers"
+
+      def execute
+        client = get_client(:compute, account)
+        list = client.search(pattern_list.join(","))
+        puts "servers found: #{list.map{|e| e["name"]}.join(", ")}"
+        cmd = "csshx --login #{user} #{list.map {|e| e["long"]||e["dns"]}.join(" ")}"
+        puts "cmd: #{cmd}"
+        exec(cmd)
+      end
+    end
+
+    subcommand "compute", "manage computes" do
+      self.default_subcommand = "list"
+      subcommand "list", "list computes" do
+        def execute
+          client = get_client(:compute, account)
+          list = client.list
+          Mystro::Log.warn Mystro::CLI.list(%w{Account Environment Name Roles IP DNS}, list)
+        end
+      end
+      subcommand "search", "list computes" do
+        parameter "[PATTERN] ...", "show only matching this pattern"
+        def execute
+          client = get_client(:compute, account)
+          list = client.search(pattern_list.join(","))
+          Mystro::Log.warn Mystro::CLI.list(%w{Account Environment Name Roles IP DNS}, list)
+        end
+      end
+    end
+
+    subcommand "balancer", "manage balancers" do
+      self.default_subcommand = "list"
+      subcommand "list", "list balancers" do
+        def execute
+          client = get_client(:balancer, account)
+          list = client.list
+          Mystro::Log.warn Mystro::CLI.list(%{Account Name}, list)
+        end
+      end
+    end
+
+    subcommand "account", "manage accounts" do
+      self.default_subcommand = "list"
+      subcommand "list", "list accounts" do
+        def execute
+          ap Mystro.config.to_hash
+          client = get_client(:account, account)
+          list = client.list
+          Mystro::Log.warn Mystro::CLI.list(%w{Name Enabled File}, list)
+        end
+      end
+    end
+
+    subcommand "template", "manage templates" do
+      self.default_subcommand = "list"
+      subcommand "list", "list templates" do
+        def execute
+          ap Mystro.config.to_hash
+          client = get_client(:template, account)
+          list = client.list
+          Mystro::Log.warn Mystro::CLI.list(%w{Name Enabled File}, list)
+        end
+      end
+    end
+
+    subcommand "environment", "manage environments" do
+      self.default_subcommand = "list"
+      subcommand "list", "list environments" do
+        def execute
+          client = get_client(:environment, account)
+          list = client.list
+          Mystro::Log.warn Mystro::CLI.list(%w{Deleting Name Template Computes Balancers}, list)
+        end
+      end
+
+      subcommand "show", "show environment" do
+        parameter "name", "id or name of environment"
+        def execute
+          client = get_client(:environment, account)
+          response = client.show(name)
+          Mystro::Log.warn Mystro::CLI.show(response) if response && response.count > 0
+        end
+      end
+
+      subcommand "destroy", "destroy environment" do
+        parameter "name", "id or name of environment"
+        def execute
+          client = get_client(:environment, account)
+          env = client.show(name)
+          raise "environment not found" unless env["id"]
+          response = client.destroy(env["id"])
+          if response && response.count > 0
+            Mystro::Log.warn Mystro::CLI.show(response)
+          end
+        end
+      end
+
+      subcommand "create", "create environment" do
+        parameter "NAME", "the name of the environment"
+        parameter "TEMPLATE", "the template to use"
+        option %w{-p --protected}, :flag, "set protected flag on environment", default: false
+
+        def execute
+          client = get_client(:environment, account)
+          response = client.create(name, template, protected?)
+          if response && response.count > 0
+            Mystro::Log.warn Mystro::CLI.show(response)
+          end
+        end
+      end
+    end
+  end
+end
+
+begin
+  Mystro::Plugin.run("commands:loaded", Mystro::Command)
+  Mystro::Command.run
+rescue => e
+  Mystro::Log.error "error: #{e.message}"
+  Mystro::Log.debug e
+  exit 1
+end

data/lib/mystro/client/account.rb

@@ -0,0 +1,9 @@
+module Mystro
+  module Client
+    class Account < Base
+      def list
+        api_get("accounts")
+      end
+    end
+  end
+end

data/lib/mystro/client/cli.rb

@@ -0,0 +1,37 @@
+require "terminal-table"
+module Mystro
+  module CLI
+    class << self
+      def table(head, rows=nil)
+        if rows
+          t = Terminal::Table.new :headings => head, :rows => rows
+        else
+          t = Terminal::Table.new :rows => rows
+        end
+        t
+      end
+
+      def list(keys, list)
+        #ap list
+        rows = []
+        list.each do |l|
+          row = []
+          keys.each do |k|
+            row << (l[k] || l[k.downcase] || l[k.to_sym] || l[k.downcase.to_sym])
+          end
+          rows << row
+        end
+        table(keys, rows)
+      end
+
+      def show(obj)
+        keys = obj.keys
+        rows = []
+        keys.each do |k|
+          rows << [k, obj[k]]
+        end
+        table(%w{key value}, rows)
+      end
+    end
+  end
+end

data/lib/mystro/client/compute.rb

@@ -0,0 +1,25 @@
+module Mystro
+  module Client
+    class Compute < Base
+      def list
+        api_get("computes")
+      end
+
+      def search(pattern)
+        api_get("computes/search/#{pattern}")
+      end
+
+      def show(id)
+        api_get("computes/#{id}")
+      end
+
+      #def create
+      #
+      #end
+
+      def destroy(id)
+        api_get("computes/#{id}")
+      end
+    end
+  end
+end

data/lib/mystro/client/environment.rb

@@ -0,0 +1,21 @@
+module Mystro
+  module Client
+    class Environment < Base
+      def list
+        api_get("environments")
+      end
+
+      def show(id)
+        api_get("environments/#{id}")
+      end
+
+      def create(name, template, protected)
+        api_post("environments", { name: nil, template: nil, protected: protected })
+      end
+
+      def destroy(id)
+        api_delete("environments/#{id}")
+      end
+    end
+  end
+end

data/lib/mystro/client/template.rb

@@ -0,0 +1,9 @@
+module Mystro
+  module Client
+    class Template < Base
+      def list
+        api_get("templates")
+      end
+    end
+  end
+end

data/lib/mystro/client/version.rb

@@ -0,0 +1,13 @@
+unless defined?(Mystro::Client::Version)
+  module Mystro
+    module Client
+      module Version
+        MAJOR  = 0
+        MINOR  = 1
+        TINY   = 0
+        TAG    = "rc1"
+        STRING = [MAJOR, MINOR, TINY, TAG].compact.join('.')
+      end
+    end
+  end
+end

data/lib/mystro/client.rb

@@ -0,0 +1,86 @@
+require 'active_support/all'
+require "httparty"
+
+require 'mystro-common'
+require "mystro/client/version"
+require "mystro/client/cli"
+
+module Mystro
+  module Client
+    class << self
+      def new(klass, server, account, token=nil)
+        k = "Mystro::Client::#{klass.to_s.capitalize}".constantize
+        k.new(server,account,token)
+      rescue => e
+        Mystro::Log.error "class #{klass} not found or error instantiating"
+        Mystro::Log.debug e
+        raise "class #{klass} not found or error instantiating, #{e.message}"
+      end
+    end
+
+    class Base
+      include HTTParty
+
+      def initialize(server, account, token=nil)
+        @server  = server
+        @token   = token
+        @account = account
+      end
+
+      private
+
+      def baseurl
+        HTTParty.normalize_base_uri(@server)
+      end
+
+      def url(uri)
+        "#{baseurl}/#{uri}?token=#@token"
+      end
+
+      def api_get(u)
+        api_call(:get, u)
+      end
+
+      def api_post(u, data, headers={ })
+        api_call(:post, u, data, headers)
+      end
+
+      def api_delete(u)
+        api_call(:delete, u)
+      end
+
+      def api_call(m, u, data={}, headers={})
+        raise "account must be set" unless @account
+        method = m.to_sym
+        url = url("api/accounts/#@account/#{u}")
+
+        Mystro::Log.debug "<= #{url}"
+        Mystro::Log.debug "=> #{data}" if data && data.count > 0
+
+        r   = self.class.send(method, url, body: data.to_json, headers: { 'Content-Type' => 'application/json' }.merge(headers))
+        Mystro::Log.debug "== #{r.response.class} #{r.response.code} #{r}"
+
+        api_response_error?(r.response)
+
+        if r.body
+          JSON.parse(r.body)
+        else
+          {}
+        end
+        #rescue => e
+        #  { error: e.message, backtrace: e.backtrace }
+      end
+
+      def api_response_error?(r)
+        raise "client error, #{r.code}\n#{r.body}" if r.is_a?(Net::HTTPClientError)
+        raise "server error, #{r.code}\n#{r.body}" if r.is_a?(Net::HTTPServerError)
+        raise "unknown error, #{r.code}\n#{r.body}" if r.is_a?(Net::HTTPUnknownResponse)
+      end
+    end
+  end
+end
+
+require "mystro/client/compute"
+require "mystro/client/environment"
+require "mystro/client/template"
+require "mystro/client/account"

data/lib/mystro-client.rb

@@ -0,0 +1,2 @@
+require "mystro/client"
+

data/mystro-client.gemspec

@@ -0,0 +1,23 @@
+# -*- encoding: utf-8 -*-
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'mystro/client/version'
+
+Gem::Specification.new do |gem|
+  gem.name          = "mystro-client"
+  gem.version       = Mystro::Client::Version::STRING
+  gem.authors       = ["Shawn Catanzarite"]
+  gem.email         = ["me@shawncatz.com"]
+  gem.description   = %q{mystro client}
+  gem.summary       = %q{mystro client}
+  gem.homepage      = "http://github.com/mystro/client"
+
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}).map{ |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
+  gem.require_paths = ["lib"]
+
+  gem.add_dependency "httparty" # talk to server's json api
+  gem.add_dependency "clamp"
+  gem.add_dependency "terminal-table"
+end

metadata

@@ -0,0 +1,110 @@
+--- !ruby/object:Gem::Specification
+name: mystro-client
+version: !ruby/object:Gem::Version
+  version: 0.1.0.rc1
+  prerelease: 6
+platform: ruby
+authors:
+- Shawn Catanzarite
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2013-04-02 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: httparty
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: clamp
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+- !ruby/object:Gem::Dependency
+  name: terminal-table
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+  type: :runtime
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ! '>='
+      - !ruby/object:Gem::Version
+        version: '0'
+description: mystro client
+email:
+- me@shawncatz.com
+executables:
+- mystro
+extensions: []
+extra_rdoc_files: []
+files:
+- .gitignore
+- CHANGELOG.md
+- Gemfile
+- LICENSE.txt
+- README.md
+- Rakefile
+- bin/mystro
+- lib/mystro-client.rb
+- lib/mystro/client.rb
+- lib/mystro/client/account.rb
+- lib/mystro/client/cli.rb
+- lib/mystro/client/compute.rb
+- lib/mystro/client/environment.rb
+- lib/mystro/client/template.rb
+- lib/mystro/client/version.rb
+- mystro-client.gemspec
+homepage: http://github.com/mystro/client
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>'
+    - !ruby/object:Gem::Version
+      version: 1.3.1
+requirements: []
+rubyforge_project: 
+rubygems_version: 1.8.24
+signing_key: 
+specification_version: 3
+summary: mystro client
+test_files: []