startapp 0.1.6

data/spec/rhc/command_spec.rb

@@ -0,0 +1,435 @@
+require 'spec_helper'
+require 'rhc/commands/base'
+require 'rhc/exceptions'
+require 'rest_spec_helper'
+
+describe RHC::Commands::Base do
+
+  let!(:config){ base_config }
+
+  before{ c = RHC::Commands.instance_variable_get(:@commands); @saved_commands = c && c.dup || nil }
+  after do
+    (Kernel.send(:remove_const, subject) if subject.is_a?(Class)) rescue nil
+    RHC::Commands.instance_variable_set(:@commands, @saved_commands)
+  end
+
+  describe '#object_name' do
+    subject { described_class }
+    its(:object_name) { should == 'base' }
+
+    context 'when the class is at the root' do
+      subject do
+        Kernel.module_eval do
+          class StaticRootClass < RHC::Commands::Base; def run; 1; end; end
+        end
+        StaticRootClass
+      end
+      its(:object_name) { should == 'static-root-class' }
+    end
+    context 'when the class is nested in a module' do
+      subject do
+        Kernel.module_eval do
+          module Nested; class StaticRootClass < RHC::Commands::Base; def run; 1; end; end; end
+        end
+        Nested::StaticRootClass
+      end
+      its(:object_name) { should == 'static-root-class' }
+    end
+  end
+
+  describe '#inherited' do
+
+    let(:instance) { subject.new }
+    let(:commands) { RHC::Commands.send(:commands) }
+
+    context 'when dynamically instantiating without an object name' do
+      subject { const_for(Class.new(RHC::Commands::Base) { def run; 1; end }) }
+
+      it("should raise") { expect { subject }.to raise_exception( RHC::Commands::Base::InvalidCommand, /object_name/i ) }
+    end
+
+    context 'when dynamically instantiating with object_name' do
+      subject { const_for(Class.new(RHC::Commands::Base) { object_name :test; def run(args, options); 1; end }) }
+
+      it("should register itself") { expect { subject }.to change(commands, :length).by(1) }
+      it("should have an object name") { subject.object_name.should == 'test' }
+      it("should run with wizard") do
+        FakeFS do
+          wizard_run = false
+          RHC::Wizard.stub(:new) do |config|
+            RHC::Wizard.unstub!(:new)
+            w = RHC::Wizard.new(config)
+            w.stub(:run) { wizard_run = true }
+            w
+          end
+
+          expects_running('test').should call(:run).on(instance).with(no_args)
+          wizard_run.should be_false
+
+          stderr.should match("You have not yet configured the StartApp client tools")
+        end
+      end
+    end
+
+    context 'when statically defined' do
+      subject do
+        Kernel.module_eval do
+          module Nested
+            class Static < RHC::Commands::Base
+              suppress_wizard
+              def run(args, options); 1; end
+            end
+          end
+        end
+        Nested::Static
+      end
+
+      it("should register itself") { expect { subject }.to change(commands, :length).by(1) }
+      it("should have an object name of the class") { subject.object_name.should == 'static' }
+      it("invokes the right method") { expects_running('static').should call(:run).on(instance).with(no_args) }
+    end
+
+    context 'when a command calls exit' do
+      subject do
+        Kernel.module_eval do
+          class Failing < RHC::Commands::Base
+            def run
+              exit 2
+            end
+          end
+        end
+        Failing
+      end
+
+      it("invokes the right method") { expects_running('failing').should call(:run).on(instance).with(no_args) }
+      it{ expects_running('failing').should exit_with_code(2) }
+    end
+
+    context 'when statically defined with no default method' do
+      subject do
+        Kernel.module_eval do
+          class Static < RHC::Commands::Base
+            suppress_wizard
+
+            def test; 1; end
+
+            argument :testarg, "Test arg", ["--testarg testarg"]
+            summary "Test command execute"
+            alias_action :exe, :deprecated => true
+            def execute(testarg); 1; end
+
+            argument :args, "Test arg list", ['--tests ARG'], :type => :list, :default => lambda{ |d,a| d[a] = 'a1' }
+            summary "Test command execute-list"
+            def execute_list(args); 1; end
+
+            argument :arg1, "Test arg", ['--test'], :optional => true, :default => 1
+            argument :arg2, "Test arg list", ['--test2'], :type => :list, :optional => true
+            argument :arg3, "Test arg list", ['--test3'], :type => :list, :optional => true
+            summary "Test command execute-vararg"
+            def execute_vararg(arg1, arg2, arg3); 1; end
+
+            argument :arg1, "Test arg", ['--test'], :allow_nil => true, :default => 'def'
+            argument :arg2, "Test arg list", ['--test2'], :type => :list, :optional => true
+            summary "Test command execute-vararg-2"
+            def execute_vararg_2(arg1, arg2, arg3); 1; end
+
+=begin
+            # Replace me with a default test case
+            RHC::Helpers.global_option '--test-context', 'Test', :context => :context_var
+            def execute_implicit
+            end
+
+            argument :testarg, "Test arg", ["--testarg testarg"], :context => :context_var
+            summary "Test command execute"
+            def execute_context_arg(testarg); 1; end
+=end
+
+            def raise_error
+              raise StandardError.new("test exception")
+            end
+            def raise_exception
+              raise Exception.new("test exception")
+            end
+
+            protected
+              def context_var
+                "contextual"
+              end
+          end
+        end
+        Static
+      end
+
+      it("should register itself") { expect { subject }.to change(commands, :length).by(7) }
+      it("should have an object name of the class") { subject.object_name.should == 'static' }
+
+      context 'and when test is called' do
+        it { expects_running('static-test').should call(:test).on(instance).with(no_args) }
+      end
+
+      context 'and when execute is called with argument' do
+        it { expects_running('static-execute', 'simplearg').should call(:execute).on(instance).with('simplearg') }
+      end
+      context 'and when execute is called with argument switch' do
+        it { expects_running('static-execute', '--testarg', 'switcharg').should call(:execute).on(instance).with('switcharg') }
+      end
+      context 'and when execute is called with same argument and switch' do
+        it { expects_running('statis-execute', 'duparg', '--testarg', 'duparg2').should exit_with_code(1) }
+      end
+
+      context 'and when the provided option is ambiguous' do
+        it { expects_running('static-execute', '-t', '--trace').should raise_error(OptionParser::AmbiguousOption) }
+      end
+
+      context 'and when execute is called with too many arguments' do
+        it { expects_running('static-execute', 'arg1', 'arg2').should exit_with_code(1) }
+      end
+
+      context 'and when execute is called with a missing argument' do
+        it { expects_running('static-execute').should exit_with_code(1) }
+      end
+
+      context 'and when execute_list is called' do
+        it('should expose a default') { expects_running('static-execute-list', '--trace').should call(:execute_list).on(instance).with(['a1']) }
+        it('should handle a default') { expects_running('static-execute-list').should call(:execute_list).on(instance).with(['a1']) }
+        it { expects_running('static-execute-list', '1', '2', '3').should call(:execute_list).on(instance).with(['1', '2', '3']) }
+        it { expects_running('static-execute-list', '1', '2', '3').should call(:execute_list).on(instance).with(['1', '2', '3']) }
+        it('should raise an error') { expects_running('static-execute-list', '--trace', '1', '--', '2', '3').should raise_error(ArgumentError) }
+        it('should make the option an array') { expects_running('static-execute-list', '--tests', '1').should call(:execute_list).on(instance).with(['1']) }
+        it('should make the option available') { command_for('static-execute-list', '1', '2', '3').send(:options).tests.should == ['1','2','3'] }
+      end
+
+      context 'and when execute_vararg is called' do
+        it{ expects_running('static-execute-vararg').should call(:execute_vararg).on(instance).with(1, [], []) }
+        it{ expects_running('static-execute-vararg', '1', '2', '3').should call(:execute_vararg).on(instance).with('1', ['2', '3'], []) }
+        it("handles a list separator"){ expects_running('static-execute-vararg', '1', '2', '--', '3').should call(:execute_vararg).on(instance).with('1', ['2'], ['3']) }
+        it{ command_for('static-execute-vararg', '1', '2', '--', '3').send(:options).test.should == '1' }
+        it{ command_for('static-execute-vararg', '1', '2', '--', '3').send(:options).test2.should == ['2'] }
+        it{ command_for('static-execute-vararg', '1', '2', '--', '3').send(:options).test3.should == ['3'] }
+        it{ command_for('static-execute-vararg', '--', '2', '3').send(:options).test.should == 1 }
+        it{ command_for('static-execute-vararg', '--', '2', '3').send(:options).test2.should == ['2', '3'] }
+        it{ command_for('static-execute-vararg', '--', '2', '3').send(:options).test3.should == [] }
+        it{ command_for('static-execute-vararg', '--', '--', '3').send(:options).test.should == 1 }
+        it('should exclude the right'){ command_for('static-execute-vararg', '--', '--', '3').send(:options).test2.should == [] }
+        it{ command_for('static-execute-vararg', '--', '--', '3').send(:options).test3.should == ['3'] }
+      end
+      context 'and when execute_vararg_2 is called' do
+        it('should get 2 arguments'){ expects_running('static-execute-vararg-2', '1', '2', '3').should call(:execute_vararg_2).on(instance).with('1', ['2', '3']) }
+        it('should have default argument'){ expects_running('static-execute-vararg-2', '--', '2', '3').should call(:execute_vararg_2).on(instance).with('def', ['2', '3']) }
+        it{ command_for('static-execute-vararg-2', '1', '2', '3').send(:options).test.should == '1' }
+        it{ command_for('static-execute-vararg-2', '1', '2', '3').send(:options).test2.should == ['2', '3'] }
+      end
+      context 'and when an error is raised in a call' do
+        it { expects_running('static-raise-error').should raise_error(StandardError, "test exception") }
+      end
+
+      context 'and when an exception is raised in a call' do
+        it { expects_running('static-raise-exception').should raise_error(Exception, "test exception") }
+      end
+
+      context 'and when an exception is raised in a call with --trace option' do
+        it { expects_running('static-raise-exception', "--trace").should raise_error(Exception, "test exception") }
+      end
+
+      context 'and when deprecated alias is called' do
+        it("prints a warning") do
+          expects_running('static', 'exe', "arg").should call(:execute).on(instance).with('arg')
+          stderr.should match("Warning: This command is deprecated. Please use 'app static-execute' instead.")
+        end
+      end
+
+      context 'and when deprecated alias is called with DISABLE_DEPRECATED env var' do
+        before { ENV['DISABLE_DEPRECATED'] = '1' }
+        after { ENV['DISABLE_DEPRECATED'] = nil }
+        it("raises an error") { expects_running('static', 'exe', 'arg', '--trace').should raise_error(RHC::DeprecatedError) }
+      end
+    end
+  end
+
+  describe "find_domain" do
+    let(:instance){ subject }
+    let(:rest_client){ subject.send(:rest_client) }
+    let(:options){ subject.send(:options) }
+    def expects_method(*args)
+      expect{ subject.send(:find_domain, *args) }
+    end
+    before{ subject.stub(:namespace_context).and_return(nil) }
+
+    it("should raise without params"){ expects_method(nil).to raise_error(ArgumentError, /You must specify a domain with -n/) }
+    it("should handle namespace param"){ options[:namespace] = 'domain_o'; expects_method.to call(:find_domain).on(rest_client).with('domain_o') }
+
+    context "with a context" do
+      before{ subject.stub(:namespace_context).and_return('domain_s') }
+      it("should handle namespace param"){ expects_method.to call(:find_domain).on(rest_client).with('domain_s') }
+    end
+  end
+
+  describe "find_app" do
+    let(:instance){ subject }
+    let(:rest_client){ subject.send(:rest_client) }
+    let(:options){ subject.send(:options) }
+    def expects_method(*args)
+      expect{ subject.send(:find_app, *args) }
+    end
+    before{ subject.stub(:namespace_context).and_return('domain_s') }
+
+    it("should raise without params"){ expects_method(nil).to raise_error(ArgumentError, /You must specify an application with -a/) }
+
+    context "when looking for an app" do
+      it("should raise without app")     { expects_method.to raise_error(ArgumentError, /You must specify an application with -a, or run this command/) }
+      it("should handle namespace param"){ options[:namespace] = 'domain_o'; expects_method.to raise_error(ArgumentError, /You must specify an application with -a, or run this command/) }
+      it("should accept app param")      { options[:app] = 'app_o'; expects_method.to call(:find_application).on(rest_client).with('domain_s', 'app_o', {}) }
+      it("should split app param")       { options[:app] = 'domain_o/app_o'; expects_method.to call(:find_application).on(rest_client).with('domain_o', 'app_o', {}) }
+      it("should find gear groups")      { options[:app] = 'domain_o/app_o'; expects_method(:with_gear_groups => true, :include => :cartridges).to call(:find_application_gear_groups).on(rest_client).with('domain_o', 'app_o', {:include => :cartridges}) }
+    end
+  end
+
+  describe "find_domain_or_app" do
+    let(:instance){ subject }
+    let(:rest_client){ subject.send(:rest_client) }
+    let(:options){ subject.send(:options) }
+    before{ subject.stub(:namespace_context).and_return('domain_s') }
+    def expects_method(*args)
+      expect{ subject.send(:find_app_or_domain, *args) }
+    end
+
+    it("should not infer domain")             { expects_method.to raise_error(ArgumentError, /You must specify a domain with -n, or an application with -a/) }
+    it("should assume domain with -n")        { options[:namespace] = 'domain_o'; expects_method.to call(:find_domain).on(rest_client).with('domain_o') }
+    it("should infer -n when -a is available"){ options[:app] = 'app_o'; expects_method.to call(:find_application).on(rest_client).with('domain_s', 'app_o') }
+    it("should split -a param")               { options[:app] = 'domain_o/app_o'; expects_method.to call(:find_application).on(rest_client).with('domain_o', 'app_o') }
+
+    context "when an app context is available" do
+      before{ subject.instance_variable_set(:@local_git_config, {:app => 'app_s'}) }
+      it("should ignore the app context"){ options[:namespace] = 'domain_o'; expects_method(nil).to call(:find_domain).on(rest_client).with('domain_o') }
+    end
+  end
+
+  describe "rest_client" do
+    let(:instance){ subject }
+    before{ RHC::Rest::Client.any_instance.stub(:api_version_negotiated).and_return(1.4) }
+
+    context "when initializing the object" do
+      let(:auth){ double('auth') }
+      let(:basic_auth){ double('basic_auth') }
+      before{ RHC::Auth::Basic.should_receive(:new).at_least(1).times.with{ |arg| arg.should == instance.send(:options) }.and_return(basic_auth) }
+      before{ RHC::Auth::Token.stub(:new).with{ |arg, arg2, arg3| [arg, arg2, arg3].should == [instance.send(:options), basic_auth, instance.send(:token_store)] }.and_return(auth) }
+
+      context "with no options" do
+        before{ subject.should_receive(:client_from_options).with(:auth => basic_auth) }
+        it("should create only a basic auth object"){ subject.send(:rest_client) }
+      end
+
+      context "with use_authorization_tokens" do
+        before{ subject.send(:options).use_authorization_tokens = true }
+        before{ subject.should_receive(:client_from_options).with(:auth => auth) }
+        it("should create a token auth object"){ subject.send(:rest_client) }
+      end
+
+      it { subject.send(:rest_client).should be_a(RHC::Rest::Client) }
+      it { subject.send(:rest_client).should equal subject.send(:rest_client) }
+    end
+
+    context "from a command line" do
+      subject{ Class.new(RHC::Commands::Base){ object_name :test; def run; 0; end } }
+      let(:instance) { subject.new }
+      let(:rest_client){ command_for(*arguments).send(:rest_client) }
+      let(:basic_auth){ auth = rest_client.send(:auth); auth.is_a?(RHC::Auth::Basic) ? auth : auth.send(:auth) }
+      let(:stored_token){ nil }
+      before{ instance.send(:token_store).stub(:get).and_return(nil) unless stored_token }
+
+      context "with credentials" do
+        let(:arguments){ ['test', '-l', 'foo', '-p', 'bar'] }
+        it { expect{ rest_client.user }.to call(:user).on(rest_client) }
+      end
+
+      context "without password" do
+        let(:username){ 'foo' }
+        let(:password){ 'bar' }
+        let(:arguments){ ['test', '-l', username, '--server', mock_uri] }
+        before{ stub_api; challenge{ stub_user(:user => username, :password => password) } }
+        before{ basic_auth.should_receive(:ask).and_return(password) }
+        it("asks for password") { rest_client.user }
+      end
+
+      context "without name or password" do
+        let(:username){ 'foo' }
+        let(:password){ 'bar' }
+        let(:arguments){ ['test', '--server', mock_uri] }
+        before{ stub_api; challenge{ stub_user(:user => username, :password => password) } }
+        before{ basic_auth.should_receive(:ask).ordered.and_return(username) }
+        before{ basic_auth.should_receive(:ask).ordered.and_return(password) }
+        it("asks for password") { rest_client.user }
+      end
+
+      context "with token" do
+        let(:username){ 'foo' }
+        let(:token){ 'a_token' }
+        let(:arguments){ ['test', '--token', token, '--server', mock_uri] }
+        before{ stub_api(:token => token); stub_user(:token => token) }
+        it("calls the server") { rest_client.user }
+      end
+
+      context "with username and a stored token" do
+        let(:username){ 'foo' }
+        let(:stored_token){ 'a_token' }
+        let(:arguments){ ['test', '-l', username, '--server', mock_uri] }
+        before{ stub_api; stub_user(:token => stored_token) }
+
+        context "when tokens are not allowed" do
+          it("calls the server") { rest_client.send(:auth).is_a? RHC::Auth::Basic }
+          it("does not have a token set") { command_for(*arguments).send(:token_for_user).should be_nil }
+        end
+
+        context "when tokens are allowed" do
+          let!(:config){ base_config{ |c, d| d.add('use_authorization_tokens', 'true') } }
+          before{ instance.send(:token_store).should_receive(:get).with{ |user, server| user.should == username; server.should == instance.send(:openshift_server) }.and_return(stored_token) }
+          it("has token set") { command_for(*arguments).send(:token_for_user).should == stored_token }
+          it("calls the server") { rest_client.user }
+        end
+      end
+
+      context "with username and tokens enabled" do
+        let!(:config){ base_config{ |c, d| d.add('use_authorization_tokens', 'true') } }
+        let(:username){ 'foo' }
+        let(:auth_token){ double(:token => 'a_token') }
+        let(:arguments){ ['test', '-l', username, '--server', mock_uri] }
+        before{ instance.send(:token_store).should_receive(:get).with{ |user, server| user.should == username; server.should == instance.send(:openshift_server) }.and_return(nil) }
+        before{ stub_api(false, true); stub_api_request(:get, 'broker/rest/user', false).to_return{ |request| request.headers['Authorization'] =~ /Bearer/ ? simple_user(username) : {:status => 401} } }
+        it("should attempt to create a new token") do
+          rest_client.should_receive(:new_session).ordered.and_return(auth_token)
+          rest_client.user
+        end
+      end
+
+      context "with username and tokens enabled against a server without tokens" do
+        let!(:config){ base_config{ |c, d| d.add('use_authorization_tokens', 'true') } }
+        let(:username){ 'foo' }
+        let(:arguments){ ['test', '-l', username, '--server', mock_uri] }
+        before{ instance.send(:token_store).should_receive(:get).with{ |user, server| user.should == username; server.should == instance.send(:openshift_server) }.and_return(nil) }
+        before do
+          stub_api(false, false)
+          stub_api_request(:get, 'broker/rest/user', false).to_return{ |request| request.headers['Authorization'] =~ /Basic/ ? simple_user(username) : {:status => 401, :headers => {'WWW-Authenticate' => 'Basic realm="openshift broker"'} } }
+          stub_api_request(:get, 'broker/rest/user', {:user => username, :password => 'password'}).to_return{ simple_user(username) }
+        end
+        it("should prompt for password") do
+          basic_auth.should_receive(:ask).once.and_return('password')
+          rest_client.user
+        end
+      end
+    end
+  end
+end
+
+describe Commander::Command::Options do
+  it{ subject.foo = 'bar'; subject.foo.should == 'bar' }
+  it{ subject.foo = 'bar'; subject.respond_to?(:foo).should be_true }
+  it{ subject.foo = lambda{ 'bar' }; subject.foo.should == 'bar' }
+  it{ subject.foo = lambda{ 'bar' }; subject[:foo].should == 'bar' }
+  it{ subject.foo = lambda{ 'bar' }; subject['foo'].should == 'bar' }
+  it{ subject.foo = lambda{ 'bar' }; subject.__hash__[:foo].should be_a Proc }
+  it{ subject[:foo] = lambda{ 'bar' }; subject.foo.should == 'bar' }
+  it{ subject['foo'] = lambda{ 'bar' }; subject.foo.should == 'bar' }
+  it{ subject.is_a?(Commander::Command::Options).should be_true }
+  it{ expect{ subject.barf? }.to raise_error(NoMethodError) }
+  it{ Commander::Command::Options.new(:foo => 1).foo.should == 1 }
+end

data/spec/rhc/commands/account_spec.rb

@@ -0,0 +1,42 @@
+require 'spec_helper'
+require 'rest_spec_helper'
+require 'rhc'
+require 'rhc/commands/account'
+
+describe RHC::Commands::Account do
+
+  describe '#run' do
+    let(:arguments) { ['account'] }
+    let(:username) { 'foo' }
+    let(:password) { 'pass' }
+    let(:server) { mock_uri }
+    before{ user_config }
+    before do
+      stub_api
+      challenge{ stub_user }
+    end
+
+    it('should display the correct user') { run_output.should =~ /Login #{username}/ }
+    it('should display the correct server') { run_output.should =~ /on #{server}/ }
+    it('should not show') { run_output.should_not =~ /Plan:/ }
+    it('should show the gear capabilities') { run_output.should =~ /Allowed Gear Sizes:\s*small/ }
+    it('should show the consumed gears') { run_output.should =~ /Gears Used:\s*0/ }
+    it('should show the maximum gears') { run_output.should =~ /Gears Allowed:\s*3/ }
+    it { expect { run }.to exit_with_code(0) }
+
+    context 'with a free plan' do
+      let(:user_plan_id){ 'free' }
+      it('should show') { run_output.should =~ /Plan:\s*Free/ }
+    end
+
+    context 'with a silver plan' do
+      let(:user_plan_id){ 'silver' }
+      it('should show') { run_output.should =~ /Plan:\s*Silver/ }
+    end
+
+    context 'with a arbitrary plan' do
+      let(:user_plan_id){ 'other' }
+      it('should show') { run_output.should =~ /Plan:\s*Other/ }
+    end
+  end
+end