hudson-remote-api 0.7.0 → 1.0.0

data/lib/hudson-remote-api/parser/build_info.rb

@@ -0,0 +1,37 @@
+module Hudson
+  module Parser
+
+    class BuildInfo
+      attr_accessor :xml, :xml_doc
+
+      def initialize(raw_xml)
+        @xml = raw_xml
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def result
+        build_result_element = self.xml_doc.elements["/freeStyleBuild/result"]
+
+        build_result_element.respond_to?(:text) ? build_result_element.text : nil
+      end
+
+      def revisions
+        return nil unless self.xml_doc.elements["/freeStyleBuild/changeSet"]
+
+        Hash.new().tap do |h|
+          self.xml_doc.elements.each("/freeStyleBuild/changeSet/revision") do |revision|
+            h[revision.elements["module"].text] = revision.elements["revision"].text
+          end
+        end
+      end
+
+      def culprit
+        culprit_element = self.xml_doc.elements['/freeStyleBuild/culprit/fullName']
+
+        if culprit_element.respond_to?(:text) ? culprit_element.text : nil
+        end
+      end
+    end
+
+  end
+end

data/lib/hudson-remote-api/parser/build_queue_info.rb

@@ -0,0 +1,19 @@
+module Hudson
+  module Parser
+    class BuildQueueInfo
+      attr_accessor :xml, :xml_doc
+
+      def initialize(raw_xml)
+        @xml = raw_xml
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def items
+        return [] if self.xml_doc.elements["/queue/item"].nil? # there's nothing in the queue
+
+        self.xml_doc.each_element("/queue/item/task").collect{ |job| job.elements["name"].text }
+      end
+
+    end
+  end
+end

data/lib/hudson-remote-api/parser/job_config_info.rb

@@ -0,0 +1,99 @@
+module Hudson
+  module Parser
+    
+    class JobConfigInfo
+      attr_accessor :xml, :xml_doc
+
+      def initialize(raw_xml)
+        @xml = raw_xml
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def description
+        description_elem = self.xml_doc.elements["/project/description"]
+        description_elem ? description_elem.text : ""
+      end
+
+      def disabled?
+
+      end
+
+      def block_build_when_downstream_building?
+
+      end
+
+      def block_build_when_upstream_building?
+
+      end
+
+      def concurrent_build?
+
+      end
+
+      def git_repo?
+        self.xml_doc.elements["/project/scm"].attributes['class'] == "hudson.plugins.git.GitSCM"
+      end
+
+      def git_url
+        git_url_elem = self.xml_doc.elements["/project/scm/userRemoteConfigs/hudson.plugins.git.UserRemoteConfig/url"]
+        git_url_elem ? git_url_elem.text : nil
+      end
+
+      def git_branch
+        git_branch_elem = self.xml_doc.elements['/project/scm/branches/hudson.plugins.git.BranchSpec/name']
+        git_branch_elem ? git_branch_elem.text : nil
+      end
+
+      def parameterized?
+        !self.xml_doc.elements["/project/properties/hudson.model.ParametersDefinitionProperty"].nil?
+      end
+
+      def triggers
+        Hash.new.tap do |h|
+          if triggers_elem = self.xml_doc.elements["/project/triggers"] || self.xml_doc.elements["/project/triggers[@class='vector']"]
+            triggers_elem.elements.to_a.each do |trigger|
+              spec_text = trigger.elements['spec'].text
+              h[trigger.name.to_s] = spec_text.to_s
+            end
+          end
+        end
+      end
+
+      def scm_browser_url
+        scm_browser_url_elem = self.xml_doc.elements['/project/scm/browser/url']
+        scm_browser_url_elem ? scm_browser_url_elem.text : ""
+      end
+
+      def scm_broswer_location
+        if !self.xml_doc.elements["/project/scm/browser/location"].nil?
+          self.xml_doc.elements["/project/scm/browser/location"].text
+        end
+      end
+
+      def svn_repo?
+        !self.xml_doc.elements["/project/scm/locations/hudson.scm.SubversionSCM_-ModuleLocation/remote"].nil?
+      end
+
+      def svn_repository_urls
+        if !self.xml_doc.elements["/project/scm/locations"].nil?
+          Array.new.tap do |a|
+            self.xml_doc.elements.each("/project/scm/locations/hudson.scm.SubversionSCM_-ModuleLocation"){|e| a << e.elements["remote"].text }
+          end
+        end
+      end
+
+      def git_repository
+        Hash.new.tap do |h|
+          h[:url] = self.git_url
+          h[:branch] = self.git_branch
+        end
+      end
+
+      def svn_repository
+        repo_elem = self.xml_doc.elements["/project/scm/locations/hudson.scm.SubversionSCM_-ModuleLocation/remote"]
+        repo_elem ? repo_elem.text : ""
+      end
+    end
+
+  end
+end

data/lib/hudson-remote-api/parser/job_info.rb

@@ -0,0 +1,62 @@
+module Hudson
+  module Parser
+    class JobInfo
+      attr_accessor :xml, :xml_doc
+
+      def initialize(raw_xml)
+        @xml = raw_xml
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def builds
+        Array.new().tap do |a|
+          self.xml_doc.elements.each("/freeStyleProject/build"){|e| a << e.elements["number"].text } unless self.xml_doc.elements["/freeStyleProject/build"].nil?
+        end
+      end
+
+      def color
+        color_elem = self.xml_doc.elements["/freeStyleProject/color"]
+        color_elem.text if free_style_project? && color_elem
+      end
+
+      def free_style_project?
+        !self.xml_doc.elements["/freeStyleProject"].nil?
+      end
+
+      def last_build
+        read_elem_text("/freeStyleProject/lastBuild/number") if free_style_project?
+      end
+
+      def last_completed_build
+        read_elem_text("/freeStyleProject/lastCompletedBuild/number") if free_style_project?
+      end
+
+      def last_failed_build
+        read_elem_text("/freeStyleProject/lastFailedBuild/number") if free_style_project?
+      end
+
+      def last_stable_build
+        read_elem_text("/freeStyleProject/lastStableBuild/number") if free_style_project?
+      end
+
+      def last_successful_build
+        read_elem_text("/freeStyleProject/lastSuccessfulBuild/number") if free_style_project?
+      end
+
+      def last_unsuccessful_build
+        read_elem_text("/freeStyleProject/lastUnsuccessfulBuild/number") if free_style_project?
+      end
+
+      def next_build_number
+        read_elem_text("/freeStyleProject/nextBuildNumber") if free_style_project?
+      end
+
+      private
+      def read_elem_text(elem_path)
+        elem = self.xml_doc.elements[elem_path]
+        elem.text if elem
+      end
+
+    end
+  end
+end

data/lib/hudson-remote-api/parser/multicast.rb

@@ -0,0 +1,28 @@
+module Hudson
+  module Parser
+    class Multicast
+      attr_accessor :xml, :xml_doc
+
+      def initialize(raw_xml)
+        @xml = raw_xml
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def version
+        version_element = self.xml_doc.elements["/hudson/version"]
+        version_element.respond_to?(:text) ? version_element.text : nil
+      end
+
+      def url
+        url_element = self.xml_doc.elements["/hudson/url"]
+        url_element.respond_to?(:text) ? url_element.text : nil
+      end
+
+      def slave_port
+        slave_port_element = self.xml_doc.elements["/hudson/slave-port"]
+        slave_port_element.respond_to?(:text) ? slave_port_element.text : nil
+      end
+
+    end
+  end
+end

data/lib/hudson-remote-api/parser/server_info.rb

@@ -0,0 +1,49 @@
+module Hudson
+  module Parser
+    class ServerInfo
+      attr_accessor :xml, :xml_doc
+
+      def initialize(raw_xml)
+        @xml = raw_xml
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def active_jobs
+        Array.new().tap do |active_jobs|
+          self.xml_doc.each_element("hudson/job") do |job|
+            active_jobs << job.elements["name"].text if job.elements["color"].text.include?("anime")
+          end
+        end
+      end
+
+      def mode
+        self.xml_doc.elements["/hudson/mode"].text
+      end
+
+      def node_description
+        self.xml_doc.elements["/hudson/nodeDescription"].text
+      end
+
+      def node_name
+        self.xml_doc.elements["/hudson/nodeName"].text
+      end
+
+      def jobs
+        Array.new.tap do |j|
+          self.xml_doc.each_element("hudson/job") do |job|
+            j << job.elements["name"].text
+          end
+        end
+      end
+
+      def use_crumbs?
+        self.xml_doc.elements["/hudson/useCrumbs"].text == "true"
+      end
+
+      def use_security?
+        self.xml_doc.elements["/hudson/useSecurity"].text == "true"
+      end
+
+    end
+  end
+end

data/lib/hudson-remote-api/settings.rb

@@ -0,0 +1,31 @@
+module Hudson
+  class Settings
+
+    Configuration = Struct.new(:host, :user, :password, :version, :crumb, :proxy_host, :proxy_port)
+    attr_accessor :configuration
+
+    DEFAULTS = {
+      :host => 'http://localhost:8080', 
+      :user => nil, 
+      :password => nil, 
+      :version => nil, 
+      :crumb => true,
+      :proxy_host => nil,
+      :proxy_port => nil
+    }
+
+    def initialize(settings_hash={})
+      settings_hash = DEFAULTS.merge(settings_hash)
+      self.configuration = Configuration.new
+
+      self.configuration.host       = settings_hash[:host]
+      self.configuration.user       = settings_hash[:user]
+      self.configuration.password   = settings_hash[:password]
+      self.configuration.version    = settings_hash[:version]
+      self.configuration.crumb      = settings_hash[:crumb]
+      self.configuration.proxy_host = settings_hash[:proxy_host]
+      self.configuration.proxy_port = settings_hash[:proxy_port]
+    end
+
+  end
+end

data/lib/hudson-remote-api/version.rb

@@ -0,0 +1,3 @@
+module Hudson
+  VERSION = "1.0.0"
+end

data/lib/hudson-remote-api/xml_writer/job_config_info.rb

@@ -0,0 +1,113 @@
+module Hudson
+  module XmlWriter
+
+    class JobConfigInfo
+      attr_accessor :job_name, :xml_doc
+
+SVN_SCM_CONF = <<-SVN_SCM_STRING
+  <scm class="hudson.scm.SubversionSCM">
+  <locations>
+  <hudson.scm.SubversionSCM_-ModuleLocation>
+  <remote>%s</remote>
+  <local>.</local>
+  </hudson.scm.SubversionSCM_-ModuleLocation>
+  </locations>
+  <excludedRegions/>
+  <includedRegions/>
+  <excludedUsers/>
+  <excludedRevprop/>
+  <excludedCommitMessages/>
+  <workspaceUpdater class="hudson.scm.subversion.UpdateUpdater"/>
+  </scm>
+    SVN_SCM_STRING
+
+      def initialize(job_name, raw_xml)
+        @job_name = job_name
+        @xml_doc = REXML::Document.new(raw_xml)
+      end
+
+      def git_repository_url=(repository_url)
+        if repository_url[:url]
+          self.xml_doc.elements['/project/scm/userRemoteConfigs/hudson.plugins.git.UserRemoteConfig/url'].text = repository_url[:url]
+        end
+        if repository_url[:branch]
+          self.xml_doc.elements['/project/scm/branches/hudson.plugins.git.BranchSpec/name'].text = repository_url[:branch]
+        end
+        update
+      end
+
+      def svn_repository_url=(repository_url)
+        if self.xml_doc.elements["/project/scm"].attributes['class'] == "hudson.scm.NullSCM"
+          self.xml_doc.elements["/project/scm"].replace_with REXML::Document.new(SVN_SCM_CONF % repository_url)
+        else
+          self.xml_doc.elements["/project/scm/locations/hudson.scm.SubversionSCM_-ModuleLocation/remote"].text = repository_url
+        end
+        update
+      end
+
+      def repository_urls=(repository_urls)
+        return false if !repository_urls.class == Array
+
+        i = 0
+        self.xml_doc.elements.each("/project/scm/locations/hudson.scm.SubversionSCM_-ModuleLocation") do |location|
+          location.elements["remote"].text = repository_urls[i]
+          i += 1
+        end
+        update
+      end
+
+      def git_repository_browser_location=(repository_browser_location)
+        self.xml_doc.elements['/project/scm/browser/url'].text = repository_browser_location
+        update
+      end
+
+      def svn_repository_browser_location=(repository_browser_location)
+        self.xml_doc.elements["/project/scm/browser/location"].text = repository_browser_location
+        update
+      end
+
+      def description=(description)
+        self.xml_doc.elements["/project"] << REXML::Element.new("description") if self.xml_doc.elements["/project/description"].nil?
+        self.xml_doc.elements["/project/description"].text = description
+        update
+      end
+
+      def triggers= opts={}
+        opts = {} if opts.nil?
+        if triggers = self.xml_doc.elements["/project/triggers"] || self.xml_doc.elements["/project/triggers[@class='vector']"]
+          triggers.elements.delete_all '*'
+          opts.each do |key, value|
+            trigger_name = key.to_s
+            trigger_name = 'hudson.triggers.' + trigger_name unless Regexp.new(/^hudson\.triggers\./).match(trigger_name)
+            if trigger = triggers.elements[trigger_name]
+              if spec = trigger.elements['spec']
+                spec.text = value.to_s
+              else
+                triggers.elements << generate_trigger(trigger, value)
+              end
+            else
+              triggers.elements << generate_trigger(REXML::Element.new(trigger_name), value)
+            end
+          end
+          update
+        else
+          $stderr.puts "triggers not found in configuration, triggers assignment ignored."
+        end
+      end
+
+      private
+        def update
+          response = Hudson.client.update_job_config!(self.job_name, self.xml_doc.to_s)
+          response.is_a?(Net::HTTPSuccess) or response.is_a?(Net::HTTPRedirection)
+        end
+
+        def generate_trigger trigger, spec_text
+          spec = REXML::Element.new("spec")
+          spec.text = spec_text.to_s
+          trigger.elements << spec
+          trigger
+        end
+    end
+
+  end
+end