dolphindeploy 0.0.2-universal-dotnet

data/lib/deploymentconfig.rb

@@ -0,0 +1,15 @@
+require 'caesars'
+
+class Environment < Caesars
+end
+
+class DeploymentConfig  < Caesars::Config
+  dsl Environment::DSL
+end
+
+class Deployment
+  def self.load
+    conf = File.join(File.dirname(__FILE__), '..\deploy.conf')
+    @deployment = DeploymentConfig.new(conf)
+  end
+end

data/lib/directory_cleanup.rb

@@ -0,0 +1,16 @@
+class DirectoryCleanup
+  def remove_last(directory_to_clean, keep_last=10)
+    dir_to_remove = get_directories_to_remove(directory_to_clean, keep_last)
+    dir_to_remove.each do |d|
+      puts "Removing " + d
+      FileUtils.rm_r d, :force => true
+    end
+  end
+  
+  def get_directories_to_remove(directory_to_clean, keep_last)
+    Dir.chdir directory_to_clean   
+    ordered = Dir.glob('**').sort_by {|d| File.mtime(d)}
+    dir_to_keep = ordered[ordered.length-keep_last..ordered.length]
+    ordered - dir_to_keep
+  end
+end

data/lib/dolphindeploy.rb

@@ -0,0 +1,12 @@
+raise Exception, "Dolphin Deploy is only supported on IronRuby" unless Object.const_defined?(:RUBY_ENGINE) && RUBY_ENGINE == 'ironruby'
+
+$: << 'lib\configured_as'
+$: << 'lib\IIS'
+require 'rubygems'  #FIX: Apprantly this is bad practice
+require 'digest'
+require 'deploymentconfig'
+require 'deploycommandcreator'
+require 'IIS'
+require 'unzip'
+require 'file_manager'
+require 'directory_cleanup'

data/lib/dolphindeploy_rake.rb

@@ -0,0 +1,36 @@
+$: << 'lib'
+require 'dolphindeploy'
+
+# rake dolphin:deploy [env, server]
+# rake deploy['local', 'localhost']
+
+namespace :dolphin do
+  desc "Dolphin Deployment"
+  task :deploy, :env, :server  do |t, args|
+    deployment = Deployment.load()    
+    creator = DeployCommandCreator.new()
+    
+    env = args.env.to_sym
+    server = args.server
+    
+    mvc = creator.convert_from_config(deployment, env)
+    mvc.deploy server
+    
+  end
+  
+  desc "Clean up output directory"
+  task :cleanup, :env, :server  do |t, args|
+    deployment = Deployment.load()    
+    creator = DeployCommandCreator.new()
+    
+    env = args.env.to_sym
+    server = args.server
+    
+    mvc = creator.convert_from_config(deployment, env)
+    directory_to_clean = mvc.get_location(server)
+    
+    dir = DirectoryCleanup.new
+    dir.remove_last(directory_to_clean, 10)
+  end
+end
+ 

data/lib/file_manager.rb

@@ -0,0 +1,30 @@
+class FileManager
+  def extract(location, zip_path, env)
+    UnZip.unzip(zip_path, location)
+    swap_configs(location, env)
+  end
+  
+  def get_latest_version(location, site_name)
+    dirs = Dir.glob("#{location}/**").grep(/#{site_name}/)
+    
+    new_version = find_next_release_version(dirs, site_name)
+    
+    File.join(location, site_name + "-" + "%02d" % new_version)
+  end
+  
+  def find_next_release_version(dirs, site_name)
+    release_numbers = [0]
+    
+    dirs.each do |dir|
+      s = /#{site_name}-(\d+)/.match(dir)
+      release_numbers << s[1].to_i unless s.nil?
+    end
+    
+    new_version = release_numbers.max + 1
+  end
+  
+  def swap_configs(location, env)    
+    FileUtils.cp File.join(location, 'web.config'), File.join(location, 'web.original.config')
+    FileUtils.mv File.join(location, "web.#{env.to_s}.config"), File.join(location, 'web.config')
+  end
+end

data/lib/unzip.rb

@@ -0,0 +1,11 @@
+$: << 'external'
+require 'TinySharpZip'
+include System::IO
+
+class UnZip  
+  def self.unzip (file, destination)
+    FileUtils.mkdir_p destination
+    puts file + " to >> " + destination
+    TinySharpZip::ZipArchive.Extract(FileStream.new(file, FileMode.Open), destination)
+  end
+end

data/spec/IIS/IIS6_spec.rb

@@ -0,0 +1,24 @@
+require File.join(File.dirname(__FILE__), '../', 'support', 'spec_helper')
+require 'lib/configured_as/mvc_deployment'
+require 'lib/IIS/IIS6'
+
+describe IIS6, "executing against adsutil" do
+  context "Adding additional bindings" do
+    it "should get the website id based on the deployment name"
+  
+    it "should be able to add additional headers via adsutil" do
+      pending "Need to hook up CLR mocking"
+      
+      mvc = MvcDeployment.new
+      mvc.site_name = 'test'
+      
+      IIS6.any_instance.expects(:`).with("cscript external\\adsutil.vbs set w3svc/5/ServerBindings \":80:test.host.header\"").once
+      iis = IIS6.new
+      iis.set_extra_header ':80:test.host.header', mvc
+    end
+    
+    it "should supports multiple additional headers being defined"
+    
+    it "should get a list of the existing binding and append to list when setting server bindings" 
+  end
+end

data/spec/IIS/IIS_spec.rb

@@ -0,0 +1,18 @@
+require File.join(File.dirname(__FILE__), '../', 'support', 'spec_helper')
+require 'lib/configured_as/mvc_deployment'
+require 'lib/IIS/IIS'
+require 'lib/IIS/IIS6'
+require 'lib/IIS/IISVersion'
+
+describe IIS do
+  it "should executing IIS6 deployment if server is v6" do
+    pending "This doesn't work as I expect. Something really simple I'm guessing but keeps failing to mock objects"
+    mvc = MvcDeployment.new
+    mvc.site_name = 'test'
+    
+    IISVersion.expects(:current_version).returns("6.0.0.0")
+    IIS6.any_instance.expects(:deploy).with("", "", mvc).returns(false)
+    iis = IIS.new
+    iis.deploy("", "", mvc)
+  end
+end

data/spec/configured_as/mvc_deployment_spec.rb

@@ -0,0 +1,108 @@
+require File.join(File.dirname(__FILE__), '../', 'support', 'spec_helper')
+$: << 'lib/configured_as'
+require 'mvc_deployment'
+
+describe MvcDeployment do 
+  describe "defaults"  do
+    before do
+      @mvc = MvcDeployment.new
+    end
+    
+    it "should have a default description" do
+      @mvc.description.should == "MvcDeployment"
+    end
+    
+    it "should have a default port number" do
+      @mvc.port.should == 80
+    end  
+  end
+  
+  describe "deployment interaction" do
+    before do
+      @mvc = MvcDeployment.new
+    end
+    
+    it "should call out to IIS6 when deploying to v6"  do
+      pending "Not sure how to test this"
+      @mvc.deploy()
+    end
+    
+    it "should get the location from config based on the environment being deployed" do
+      @mvc.set_to ['server', 'C:/some_location']
+      path = @mvc.get_location('server')
+      path.should == 'C:/some_location'
+    end
+  end
+  
+  describe "when executing" do
+    before(:each) do
+      FileManager.any_instance.expects(:get_latest_version).returns('')
+      FileManager.any_instance.expects(:extract).returns('')
+      IIS.any_instance.expects(:deploy).returns('')
+      
+      @mvc = MvcDeployment.new
+      @mvc.set_to ['server', 'test']
+      @mvc.set_before({:set_host => 'ABC'})
+      @mvc.set_after({:set_port => 99})
+    end
+    
+    it "should call all the methods specified in the before block" do        
+      @mvc.deploy('server')
+      @mvc.host.should == 'ABC'      
+    end
+    
+    it "should call all the methods specified in the before block" do    
+      @mvc.deploy('server')
+      @mvc.port.should == 99      
+    end
+  end
+  
+  describe "custom extensions" do    
+    def create_custom_method()
+      MvcDeployment.module_eval do
+        attr_accessor :custom_prop
+        
+        def custom(val)
+          self.custom_prop = val
+        end
+      end
+    end
+    
+    before(:each) do    
+      FileManager.any_instance.expects(:get_latest_version).returns('')
+      FileManager.any_instance.expects(:extract).returns('')
+      IIS.any_instance.expects(:deploy).returns('')
+      
+      create_custom_method()      
+      
+      @mvc = MvcDeployment.new
+      @mvc.set_to ['server', 'test']
+      @mvc.set_before({:custom => 'Random Value'})
+    end
+    
+    it "should call custom methods after deployment"  do
+      @mvc.deploy('server')
+      @mvc.custom_prop.should == 'Random Value'
+    end
+  end
+  
+  describe "executing custom additional host headers"   do
+    before(:each) do    
+      FileManager.any_instance.expects(:get_latest_version).returns('')
+      FileManager.any_instance.expects(:extract).returns('')
+      IIS6.any_instance.expects(:deploy).returns('')    
+      IIS6.any_instance.expects(:set_extra_header).returns('')    
+    end
+    
+    it "should call add_header on IIS instance" do
+      pending "Again... not mocking?"
+      mvc = MvcDeployment.new  
+      IIS.any_instance.expects(:set_extra_header).returns(nil).once
+      
+      mvc.set_to ['server', 'test']
+      mvc.set_after({:extra_header => 'abc.header'})
+      
+      mvc.deploy('server')
+    end
+  end
+end

data/spec/deploycommandcreator_spec.rb

@@ -0,0 +1,169 @@
+require File.join(File.dirname(__FILE__), 'support', 'spec_helper')
+require 'DeployCommandCreator'
+
+describe DeployCommandCreator do
+  def config()
+    config_file = 
+      "environment do 
+        configured_as :mvc
+        env :systest do
+          host \"Test\"
+          to \"server\", \"path\", \"*\"
+          to \"server2\", \"path2\", \"*\"
+          to \"server2\", \"path2\", \"127.0.0.1\"
+        end
+      end"
+    File.stubs(:read).returns(config_file)
+    require 'deploymentconfig'
+    
+    return Deployment.load()
+  end
+  
+  before do
+    creator = DeployCommandCreator.new()
+    @mvc = creator.convert_from_config(config, :systest)
+  end
+  
+  it "should create deployment config object based on configuration" do 
+    @mvc.should_not be_nil
+    @mvc.class.should == MvcDeployment
+  end
+  
+  it "should set environment variable" do
+    @mvc.environment.should == :systest
+  end  
+  
+  it "should set the host variable" do 
+    @mvc.host.should == "Test"
+  end  
+  
+  it "should set the to variable" do 
+    @mvc.to[0].server.should == "server"
+    @mvc.to[0].path.should == "path"
+  end    
+  
+  it "should set the to variable with both values" do 
+    @mvc.to[0].server.should == "server"
+    @mvc.to[0].path.should == "path"
+    
+    @mvc.to[1].server.should == "server2"
+    @mvc.to[1].path.should == "path2"
+  end      
+  
+  it "should have a default IP address of *" do
+    @mvc.to[0].ipaddress.should == "*"
+  end
+  
+  it "should have the correct IP address if it has been defined" do
+    @mvc.to[2].ipaddress.should == "127.0.0.1"
+  end
+end
+
+describe DeployCommandCreator, "overriding default" do
+  def config()
+    config_file = 
+      "environment do 
+         configured_as :mvc
+         desc \"Testing\"
+         env :systest do
+           host \"Test\"
+         end
+       end"
+    File.stubs(:read).returns(config_file)
+    require 'deploymentconfig'
+    
+    return Deployment.load()
+  end
+  
+  before do
+    creator = DeployCommandCreator.new()
+    @mvc = creator.convert_from_config(config, :systest)
+  end
+  
+  it "should have a description of Testing" do 
+    @mvc.description.should == "Testing"
+  end
+end
+
+describe DeployCommandCreator, "Before and After blocks"  do
+  def config()
+    config_file = 
+      "environment do 
+         configured_as :mvc
+         env :systest do
+           host \"Test\"
+           to \"server\", \"path\"
+           to \"server2\", \"path2\"
+    
+           before do
+             set_value 'xyz'
+             set_host 'ABC' #Redefines the value before executing... 
+           end
+           after do
+             set_exec_something 'abc'
+             set_port 99 #Redefines the value after executing... 
+           end
+         end
+      end"
+    File.stubs(:read).returns(config_file)
+    require 'deploymentconfig'
+    
+    return Deployment.load()
+  end
+  
+  before do
+    creator = DeployCommandCreator.new()
+    @mvc = creator.convert_from_config(config, :systest)
+  end
+  
+  it "should create deployment config object based on configuration" do 
+    @mvc.should_not be_nil
+    @mvc.class.should == MvcDeployment
+  end
+  
+  it "should set environment variable" do
+    @mvc.environment.should == :systest
+  end  
+  
+  it "should have a before keys collection containing the method names" do
+    @mvc.before.keys.should include(:set_value)
+  end
+  
+  it "should have a list of before blocks to execute" do
+    @mvc.before[:set_value].should == 'xyz'
+  end
+    
+  it "should have an after keys collection containing the method names" do
+    @mvc.after.keys.should include(:set_exec_something)
+  end
+  
+  it "should support multiple calls being specified" do
+    @mvc.before.keys.length.should == 2
+  end
+end
+
+describe "DeployCommandCreator", "supports multiple arguments for method" do
+  def config()
+    config_file = 
+      "environment do 
+         configured_as :mvc
+         desc \"Testing\"
+         env :systest do
+           host \"Test\"
+         end
+       end"
+    File.stubs(:read).returns(config_file)
+    require 'deploymentconfig'
+    
+    return Deployment.load()
+  end
+  
+  before do
+    creator = DeployCommandCreator.new()
+    @mvc = creator.convert_from_config(config, :systest)
+  end
+  
+  it "should have a description of Testing" do 
+    @mvc.description.should == "Testing"
+  end
+end