uhl-cap-recipes 0.1.0

data/lib/cap_recipes/tasks/http.rb

@@ -0,0 +1,102 @@
+require 'net/http'
+require 'net/https'
+require 'uri' # there be bugs here
+require "addressable/uri" # no more URI::InvalidURIError: bad URI(is not URI?)
+
+class HTTP
+  class << self
+    def get(url, options = {})
+      execute(url, options)
+    end
+
+    def post(url, options = {})
+      options = { :method => :post }.merge(options)
+      execute(url, options)
+    end
+
+    def encoding(response)
+      return $1.downcase if response['content-type'] =~ /charset=(.*)/i
+      return $1.downcase if response.body =~ /<meta.*?charset=([^"'>]+)/mi
+    end
+
+    protected
+
+      def proxy
+        http_proxy = ENV["http_proxy"]
+        Addressable::URI.parse(http_proxy) rescue nil
+      end
+
+      def to_uri(url)
+        if !url.respond_to?(:scheme)
+          url = Addressable::URI.parse(url)
+        end
+        url
+      end
+
+      def execute(url, options = {})
+        options = { :parameters => {}, :debug => false, :follow_redirects => true,
+                    :http_timeout => 60, :method => :get, 
+                    :headers => {}, :redirect_count => 0, 
+                    :max_redirects => 10 }.merge(options)
+
+        url = to_uri(url)
+        
+        if proxy
+          http = Net::HTTP::Proxy(proxy.host, proxy.port).new(url.host, url.port)
+        else
+          http = Net::HTTP.new(url.host, url.port)
+        end
+        
+        if url.scheme == 'https'
+          http.use_ssl = true
+          http.verify_mode = OpenSSL::SSL::VERIFY_NONE
+        end
+        
+        http.open_timeout = http.read_timeout = options[:http_timeout]
+        
+        http.set_debug_output $stderr if options[:debug]
+        
+        request = case options[:method]
+          when :post
+            request = Net::HTTP::Post.new(url.request_uri)
+            request.set_form_data(options[:parameters])
+            request
+          else
+            Net::HTTP::Get.new(url.request_uri)
+        end
+
+        options[:headers].each { |key, value| request[key] = value }
+        response = http.request(request)
+
+        # Handle redirection
+        if options[:follow_redirects] && response.kind_of?(Net::HTTPRedirection)      
+          options[:redirect_count] += 1
+
+          if options[:redirect_count] > options[:max_redirects]
+            raise "Too many redirects (#{options[:redirect_count]}): #{url}" 
+          end
+
+          redirect_url = redirect_url(response)
+
+          if redirect_url.start_with?('/')
+            url = to_uri("#{url.scheme}://#{url.host}#{redirect_url}")
+          else
+            url = to_uri(redirect_url)
+          end
+
+          response, url = execute(url, options)
+        end
+
+        [response, url.to_s]
+      end
+
+      # From http://railstips.org/blog/archives/2009/03/04/following-redirects-with-nethttp/
+      def redirect_url(response)
+        if response['location'].nil?
+          response.body.match(/<a href=\"([^>]+)\">/i)[1]
+        else
+          response['location']
+        end
+      end
+  end
+end

data/lib/cap_recipes/tasks/play.rb

@@ -0,0 +1,201 @@
+# -*- coding: utf-8 -*-
+Capistrano::Configuration.instance(true).load do |configuration|
+  set :use_sudo, true
+
+  _cset :deploy_to_parent, "/srv/applications"
+  _cset :branch, "master"
+
+  default_run_options[:pty] = true
+
+  # this is capistrano's default location.
+  # depending on the permissions of the server
+  # you may need to create it and chown it over
+  # to :user (e.g. chown -R robotuser:robotuser /u)
+  set :deploy_to do
+    "#{deploy_to_parent}/#{application}"
+  end
+
+  set :deploy_to_gitrepo do
+    "#{deploy_to}/repo"
+  end
+
+
+  set :local_base_dir do
+    "#{`pwd`}".strip
+  end
+
+  _cset :_config, Array.new
+  _cset :build_name, "ROOT"
+  _cset :build_path, "not set.war"
+
+  _cset :servers, ""
+  _cset :deploy_to, ""
+
+  set :local_git_dir do
+    "/tmp/localgit_#{application}"
+  end
+  set :local_gitrepo do
+    "#{local_git_dir}/#{application}"
+  end
+
+  role :app, :primary => true do
+    if servers.empty?
+      "1.1.1.1"
+    else
+      servers.split(/[,\s]+/)
+    end
+  end
+
+  namespace :play do
+
+    desc "start service"
+    task :start_service do
+      run "sc start #{service_name}"
+    end
+
+    desc "stop service"
+    task :stop_service do
+      run "sc stop #{service_name}"
+    end
+
+    desc "stop and start service"
+    task :restart_service do
+      play.stop_service
+      play.start_service
+    end
+
+    desc "setup remote and locate play dir"
+    task :setup do
+      play.setup_remote
+      play.setup_local
+    end
+
+    desc "setup remote play dir"
+    task :setup_remote do
+      run clone_repository_command()
+    end
+
+    desc "setup locate play dir"
+    task :setup_local do
+      system clone_repository_local_command()
+    end
+
+    desc "just pull current build version, doesn't add tag."
+    task :pull do
+      play.setup_local
+
+      system "cd #{local_gitrepo}; git checkout #{branch}; git fetch; git rebase origin/#{branch};"
+
+      unless play_name.empty?
+        puts "name=#{play_name}, war=#{play_path}"
+        system update_repository_local_command(play_name, play_path)
+      else
+        if war_config.nil? or war_config.size == 0
+          raise 'NO war_config'
+        end
+        war_config.each do |config|
+          puts "name=#{config[:name]}, war=#{config[:war]}"
+          system update_repository_local_command(config[:name], config[:war])
+        end
+      end
+
+      build_msg = play_name.empty? ? "all" : play_name
+      system "cd #{local_gitrepo}; git add .; git commit -m 'build for #{build_msg}'"
+
+      # push tags and latest code
+      system "cd #{local_gitrepo}; git push origin #{branch}"
+      if $? != 0
+        raise "git push failed"
+      end
+
+    end
+
+    desc "tag build version. use -s tag=xxx to set tag's name"
+    task :tag do
+      play.setup_local
+      system "cd #{local_gitrepo}; git checkout #{branch}; git fetch; git rebase origin/#{branch};"
+
+      tag_name = configuration[:tag] || configuration[:build_version]
+      raise "NO tag. pls use -s tag=xxx set tag_name" if tag_name.nil?
+
+      system "cd #{local_gitrepo}; git tag #{tag_name};"
+
+      system "cd #{local_gitrepo}; git push origin #{branch} --tags"
+      if $? != 0
+        raise "git push --tags failed"
+      end
+    end
+
+    desc "deploy. use -s tag=xxx to set tag's name, if NOT set tag, pull the repository's last version."
+    task :deploy do
+      play.setup_remote
+      tag_name = configuration[:tag] || configuration[:build_version]
+      unless tag_name.nil?
+        # raise "NO tag. pls use -s tag=xxx set tag_name"
+        run update_repository_remote_command(tag_name)
+      else
+        run pull_repository_remote_command(branch)
+      end
+    end
+
+    def self.clone_repository_local_command
+      [
+       "rm -Rf #{local_git_dir}",
+       "mkdir -p #{local_git_dir}",
+       "cd #{local_git_dir}",
+       "git clone #{repository} #{local_gitrepo}"
+      ].join("; ")
+    end
+
+
+    def self.update_repository_local_command(name, path)
+      unless path.start_with?('/')
+        play_path = "#{local_base_dir}/#{path}"
+      else
+        play_path = path
+      end
+      [
+       "cd #{local_gitrepo}",
+       "if [ -e #{local_gitrepo}/#{name} ]",
+       "then git rm -rf #{local_gitrepo}/#{name}",
+       "fi",
+       "mkdir -p #{local_gitrepo}/#{name}",
+       "cd #{local_gitrepo}/#{name}",
+       "cp #{play_path} . -r"
+      ].join("; ")
+    end
+
+    def self.clone_repository_command
+      [
+       "if [ ! -e #{deploy_to_gitrepo} ]",
+       "then sudo mkdir -p #{deploy_to}",
+       "sudo chown #{user} #{deploy_to}",
+       "cd #{deploy_to}",
+       "git clone #{repository} #{deploy_to_gitrepo}",
+       "fi"
+      ].join("; ")
+    end
+
+    def self.update_repository_remote_command(tag_name)
+      [
+       # git reset --hard;git fetch;git reset --merge #{tag_name}
+       "cd #{deploy_to_gitrepo}",
+       "git reset --hard",
+       "git fetch",
+       "git reset --merge #{tag_name}",
+      ].join("; ")
+    end
+
+    def self.pull_repository_remote_command(branch)
+      [
+       # git reset --hard;git fetch;git reset --merge #{tag_name}
+       "cd #{deploy_to_gitrepo}",
+       "git reset --hard",
+       "git fetch",
+       "git rebase origin/#{branch}",
+      ].join("; ")
+    end
+
+  end
+
+end

data/lib/cap_recipes/tasks/sdpdeploy/autoinstall.rb

@@ -0,0 +1,78 @@
+Capistrano::Configuration.instance(true).load do
+  namespace :autointall do
+
+    desc "GITgetgitDir_fromGitserver"
+    task :autoInstallfileGetorUpdate, :max_hosts=>1 do
+      run %{
+              mkdir -p /opt/applications/;mkdir /opt/logs;
+              mkdir -p /opt/autoinstalldir;cd /opt/autoinstalldir;pwd;
+              git init;
+              git remote add origin gituser@gitsource.shengpay.com:/opt/gitroot/autoinstalldir.git;
+              git remote -v;
+              git fetch;git fetch -t;git fetch;
+              git pull origin master;
+              ls -a;git status;
+        }
+    end
+
+
+    task :install_Nginx,:mas_hosts=>1 do
+      run %{
+           cd  /opt/autoinstalldir;  sh nginx-install.sh;
+       }
+    end
+
+    task :install_JDK,:mas_hosts=>1 do
+      run %{
+              cd /opt/autoinstalldir; sh java-install.sh;
+       }
+    end
+
+    task :install_jboss,:mas_hosts=>1 do
+      run %{
+              cd /opt/autoinstalldir; sh  jboss-install.sh;
+       }
+    end
+
+    task :install_memcached,:mas_hosts=>1 do
+      run %{
+              cd /opt/autoinstalldir; sh  memcached-install.sh;
+       }
+    end
+
+    desc "for memcache "
+    task :install_ttserver,:mas_hosts=>1 do
+      run %{
+              cd /opt/autoinstalldir; sh  tt-install.sh;
+       }
+    end
+
+    desc "tomcat install task"
+    task :tomcat_install, :max_hosts=>1 do
+      run %{
+                cd /opt/autoinstalldir; sh tomcat-install.sh ;
+                echo "usage sh createInstance.sh -d tcServer1 -n 10000 -a 8010 -h 8080 -s 8440 -j 6900  to create tomcat instance";
+              }
+    end
+
+    desc "tomcat instance create task"
+    task :tomcat_instance_create, :max_hosts=>1 do
+      run %{
+               cd /opt/autoinstalldir/templateHome/bin ;
+               pwd;
+               ls -lhrt createInstance.sh;
+               sh createInstance.sh -d #{instanceName} -n `expr 10000 + #{instanceNum}` -a `expr 8010 + #{instanceNum}` -h `expr 8080 + #{instanceNum}` -s `expr 8440 + #{instanceNum}` -j `expr 6900 + #{instanceNum}`;
+               chown tomcat:tomcat /opt/tomcat -R; chmod +x  /opt/tomcat/*/bin/*
+              }
+    end
+
+    desc " cmd from web"
+    task :cmd_diy,:mas_hosts=>1 do
+      run %{
+           #{diy_cmd}
+       }
+    end
+
+  end
+
+end

data/lib/cap_recipes/tasks/sdpdeploy/iis.rb

@@ -0,0 +1,72 @@
+Capistrano::Configuration.instance(true).load do
+namespace :atiiscmd do
+    
+    desc "recycleApplicationPool"
+    task :recycleApplicationPool, :max_hosts=>1 do
+        run %{
+            cscript //Nologo "C:\\windows\\system32\\iisapp.vbs" /a #{iispool} /r
+        }
+    end
+
+    desc "iis website status"
+    task :iis_site_status, :max_hosts=>1 do
+        run %{
+            cscript //Nologo "C:\\windows\\system32\\iisweb.vbs" /query #{iiswebsite} 
+        }
+    end
+
+    desc "iis website status all"
+    task :iis_site_status_all, :max_hosts=>1 do
+        run %{
+            cscript //Nologo "C:\\windows\\system32\\iisweb.vbs" /query 
+        }
+    end
+
+    desc "iis website start"
+    task :iis_site_start, :max_hosts=>1 do
+        run %{
+            cscript //Nologo "C:\\windows\\system32\\iisweb.vbs" /start #{iiswebsite} 
+        }
+    end
+
+    desc "iis website stop"
+    task :iis_site_stop, :max_hosts=>1 do
+        run %{
+            cscript //Nologo "C:\\windows\\system32\\iisweb.vbs" /stop #{iiswebsite} 
+        }
+    end
+
+    desc "iis iisreset stop"
+    task :iis_stop, :max_hosts=>1 do
+        run %{
+            iisreset /stop
+        }
+    end
+
+    desc "iis iisreset start"
+    task :iis_start, :max_hosts=>1 do
+        run %{
+            iisreset /start
+        }
+    end
+
+    desc "iis iisreset status"
+    task :iis_status, :max_hosts=>1 do
+        run %{
+            iisreset /status
+        }
+    end
+
+    desc "iis iisreset restart"
+    task :iis_restart, :max_hosts=>1 do
+        run %{
+            iisreset /restart
+        }
+    end
+
+    desc "iis website deploy dir"
+    task :iis_dp_dir_info, :max_hosts=>1 do
+        run " grep -nE 'ServerComment|Path' /cygdrive/c/WINDOWS/system32/inetsrv/MetaBase.xml  |grep -vE 'tPath|rPath|默认|允许' "
+    end
+end
+end