rscm 0.1.0.999 → 0.1.0.1337

data/Rakefile

@@ -108,9 +108,27 @@ else
 end
 
 task :publish do
-  publisher = Rake::CompositePublisher.new
-#  publisher.add Rake::RubyForgePublisher.new('rscm', 'aslak_hellesoy')  
-  publisher.add Rake::RubyForgeFilePublisher.new('rscm', 490, 'aslak_hellesoy', ENV['RUBYFORGE_PASSWORD'], "pkg/#{PKG_FILE_NAME}")  
+ # publisher = Rake::CompositePublisher.new
+#  publisher.add Rake::RubyForgePublisher.new('rscm', 'aslak_hellesoy')
+
+  RUBYFORGE_GROUP_ID = 490
+  RUBYFORGE_PACKAGE_ID = 552
+  RUBYFORGE_RELEASE_NAME = "rakedrelease"
+
+  Rake::RubyForgeFilePublisher.new(
+    RUBYFORGE_GROUP_ID, 
+    "aslak_hellesoy", 
+    "README",
+    #"pkg/#{PKG_FILE_NAME}.gem", 
+    RUBYFORGE_PACKAGE_ID,
+    RUBYFORGE_RELEASE_NAME
+  ) do |p|
+    p.type_id = 8100
+    p.processor_id = 2000
+    p.preformatted = 1
+    p.release_name = "come on"
+    p.release_changes = "now"
+    p.release_date = Time.utc(2005, 2, 19, 23, 42, 0)
+  end
 
-  publisher.upload
 end

data/lib/multipart.rb

@@ -2,6 +2,9 @@ require 'open-uri'
 require 'net/http'
 require 'cgi'
 
+# Adds multipart support to Net::HTTP
+# based on Code from Patrick May
+# http://blade.nagaokaut.ac.jp/cgi-bin/scat.rb/ruby/ruby-talk/113774
 module Net
   class Param
     def initialize(k, v)
@@ -15,39 +18,78 @@ module Net
   end
 
   class FileParam
-    def initialize(k, file)
+    def initialize(k, file, mime_type)
       @k = k
       @file = file
+      @mime_type = mime_type
     end
 
     def to_multipart
-      content = @file.open.read
-      "Content-Disposition: form-data; name=\"#{CGI::escape(@k)}\"; filename=\"#{File.basename(@file.name)}\"\r\n" +
-      "Content-Transfer-Encoding: binary\r\n" +
-      "Content-Type: #{@file.mime_type}\r\n\r\n" + content + "\r\n"
+      content = File.open(@file).read
+      "Content-Disposition: form-data; name=\"#{CGI::escape(@k)}\"; filename=\"#{File.basename(@file)}\"\r\n" +
+      "Content-Type: #{@mime_type}\r\n\r\n" + content + "\r\n"
     end
   end
 
   class HTTP
-    def post_multipart(path, data, header=nil, dest=nil, boundary="7d21f962d00c4") # :yield: self
-      params = []
-      data.each do |k, v|
-        param = nil
-        if(v.is_a?(File))
-          param = FileParam.new(k,v)
-        else
-          param = Param.new(k,v)
-        end
-        params << param
-      end
-  
-      query = params.collect { |p|
+
+    def post_multipart(path, params, header={}, dest=nil, boundary="----------ThIs_Is_tHe_bouNdaRY_$") # :yield: self  
+      body = params.collect { |p|
         "--" + boundary + "\r\n" + p.to_multipart
-      }.join("") + "--" + boundary + "--"
- 
-      header["Content-type" => "multipart/form-data, boundary=" + boundary + " "]
-puts "HEADER: #{header.inspect}"
-      post(data, query, header, dest)
+      }.join("") + "--" + boundary + "--" + "\r\n"
+
+      header["Content-Type"] = "multipart/form-data; boundary=" + boundary
+      header["Content-Length"] = "#{body.length}"
+
+      post(path, body, header, dest)
+    end
+    
+    alias :old_post :post
+    def post(path, data, initheader = nil, dest = nil)
+      puts "----POST----"
+      puts path
+      puts "------------"
+      if(initheader)
+        initheader.each {|k,v|
+          puts "#{k}: #{v}"
+        }
+      end
+      puts
+      puts data
+
+      response, data = old_post(path, data, initheader, dest)
+
+      puts "----POST RESP----"
+      puts response.class.name
+      puts "------------"
+      response.each {|k,v|
+        puts "#{k}: #{v}"
+      }
+      
+      return response, data
+    end
+
+    alias :old_get :get
+    def get(path, initheader = nil, dest = nil)
+      puts "----GET-----"
+      puts path
+      puts "------------"
+      if(initheader)
+        initheader.each {|k,v|
+          puts "#{k}: #{v}"
+        }
+      end
+      
+      response, data = old_get(path, initheader, dest)
+
+      puts "----GET RESP----"
+      puts response.class.name
+      puts "------------"
+      response.each {|k,v|
+        puts "#{k}: #{v}"
+      }
+      
+      return response, data
     end
   end
 end

data/lib/rubyforge_file_publisher.rb

@@ -34,15 +34,17 @@ module Rake
     )
     
     # Returns an array of 2 elements where 1st is mime-type and 2nd is rubyforge-type
-    def types(filename, source=false)
+    def types(filename, source)
+      extension = nil
       if(filename =~ /.*(\.[a-zA-Z]*)/)
         extension = $1
-        types = FILE_TYPES[extension]
-        if(types.length == 3 && source)
-          [types[0], types[2]]
-        else
-          types
-        end
+      end
+
+      types = FILE_TYPES[extension]
+      if(types.length == 3 && source)
+        [types[0], types[2]]
+      else
+        types
       end
     end
 
@@ -57,93 +59,118 @@ module Rake
     ULTRA_SPARC    = 5000
     OTHER_PLATFORM = 9999
 
-    # Create a publisher for a RubyForge project with +package_id+.
-    # For security reasons, don't give the +password+ parameter a hard-coded
-    # value, but use an environment variable instead: PASSWORD=mooky
+    # Create a publisher for a RubyForge project with id +group_id+.
+    # The RubyForge +user+'s password must be specified in the environment
+    # variable RUBYFORGE_PASSWORD.
     # 
+    # This publisher will upload/release a +file+ for a RubyForge project
+    # with id +group_id+, under the release package +package_id+ and
+    # name the release +release_name+.
+    #
+    # The package_id can be found by viewing the source of the HTML page
+    # http://rubyforge.org/frs/admin/qrs.php?package=&group_id=YOUR_GROUP_ID
+    # Look for a select tag named package_id and see what the alternatives are.
+    #
     # The optional argument +source+ can be set to true if the file
-    # pointed to be +filename+ is a source file of some sort. This is
+    # pointed to by +filename+ is a source file of some sort. This is
     # to make sure RubyForge lists the file as the appropriate type.
+    # (This task will figure out the correct mime-type and rubyforge type
+    # based on the file's extension and the source parameter).
     #
     # If called with a block, the file will be uploaded at the end of the
     # construction of this object. Otherwise, the +upload+ method will
     # have to be called explicitly.
     #
     # The following attributes (which represent form data) have default 
-    # values, but can be set explicitly:
+    # values, but can be set/overridden explicitly:
     #
-    # * type_id
     # * processor_id
     # * release_date
     # * release_notes
     # * change_log
     #
-    def initialize(package_id, release_name, user, password, file, source=false) # :yield: self
-      @form_data = {}
+    def initialize(group_id, user, file, package_id, release_name, source=false) # :yield: self
+      
+      @group_id = group_id
       @user = user
-      @password = password
       @file = file
 
-      types = types(file, source)
-      self.type_id = types[1]
+      @form_data = {"preformatted" => "1", "submit" => "Release File" }
+
+      self.package_id = package_id
+      self.release_name = release_name
+
+      @types = types(file, source)
+      self.type_id = @types[1]
       self.processor_id = ANY
       self.release_date = Time.now.utc
       self.release_notes = "Uploaded by Rake::RubyforgeFilePublisher"
-      self.change_log = ""
+      self.release_changes = "This is a change log"
 
-      self.package_id = package_id
-      self.release_name = release_name
-      
       yield self if block_given?
       upload if block_given?
     end
 
-    # fills in the upload form
-    def method_missing(name, args)
-      @form_data[name.to_s] = args
+    def package_id=(s)
+      @form_data["package_id"] = s
+    end
+    def package_id
+      @form_data["package_id"]
+    end
+    def release_name=(s)
+      @form_data["release_name"] = s
+    end
+    def type_id=(s)
+      @form_data["type_id"] = s
+    end
+    def processor_id=(s)
+      @form_data["processor_id"] = s
+    end
+    def release_date=(t)
+      @form_data["release_date"] = t.strftime("%Y-%m-%d %H:%M")
+    end
+    def release_notes=(s)
+      @form_data["release_notes"] = s
+    end
+    def release_changes=(s)
+      @form_data["release_changes"] = s
+    end
+    def preformatted=(b)
+      @form_data["preformatted"] = b ? "1" : "0"
     end
 
     def upload
       Net::HTTP.start('rubyforge.org', 80) do |http|
-        http.set_debug_output $stderr
     
         # log in so we get a cookie. we need it to post the upload form.
         password = ENV['RUBYFORGE_PASSWORD']
         raise "The RUBYFORGE_PASSWORD environment variable is not set.\n" +
               "It can be passed on the Rake command line with RUBYFORGE_PASSWORD=<your password>" if password.nil?
 
-        response, data = http.post('/account/login.php', "form_loginname=#{@user}&form_pw=#{@password}&login=Login")
-        cookie = CGI::Cookie.parse(response['set-cookie'])['session_ser']
-        header = {"Cookie" => "session_ser=#{cookie}"}
+        response, data = http.post("/account/login.php", "form_loginname=#{@user}&form_pw=#{password}&login=Login")
+        cookie = CGI::Cookie.parse(response['set-cookie'])['session_ser'].to_s
+        header = {"Cookie" => cookie, "Host" => "rubyforge.org"}
 
-puts "LOCATION: #{response['location']}"
         response, data = http.get(response['location'], header)
-puts "DATA: #{data}"
-puts response.class.name
 
-        response, data = http.post_multipart('/frs/admin/qrs.php?group_id=#{@group_id}', @form_data, header)
-puts "2 LOCATION: #{response['location']}"
-        response, data = http.get(response['location'], header)
-puts "2 DATA: #{data}"
-puts response.class.name
-      end
-    end
-
-  private
-
-    def fetch( uri_str, limit = 10 )
-      # You should choose better exception.
-      raise ArgumentError, 'HTTP redirect too deep' if limit == 0
+        upload_form = "/frs/admin/qrs.php?package=#{package_id}&group_id=#{@group_id}"
+        response, data = http.get(upload_form, header)
 
-      response, data = Net::HTTP.get_response(URI.parse(uri_str))
-      case response
-        when Net::HTTPSuccess     then response
-        when Net::HTTPRedirection then fetch(response['location'], limit - 1)
-      else
-        response.error!
+        params = []
+        @form_data.each do |k, v|
+          params << Net::Param.new(k,v)
+        end
+        params << Net::FileParam.new("userfile", @file, @types[0])
+        header["Referer"] = "http://rubyforge.org#{upload_form}"
+        response, data = http.post_multipart(upload_form, params, header)
+        
+        File.open("rf.html", "w") { |io|
+          io.write data
+        }
+#        upload_redirect = response['location']
+#        response, data = http.get(upload_redirect, header)
       end
     end
 
-
   end
 end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.4
 specification_version: 1
 name: rscm
 version: !ruby/object:Gem::Version 
-  version: 0.1.0.999
-date: 2005-02-19
+  version: 0.1.0.1337
+date: 2005-02-20
 summary: "RSCM - Ruby Source Control Management"
 require_paths: 
   - lib