FTP#mget, FTP#mput

ruby-talk
1

Hi all,

Is there a method in Net::FTP that corresponds to ftp's mget and mput functions?

If not, is there any chance of adding this to ftp.rb?

Thanks,

Dan

This communication is the property of Qwest and may contain confidential or
privileged information. Unauthorized use of this communication is strictly prohibited and may be unlawful. If you have received this communication in error, please immediately notify the sender by reply e-mail and destroy all copies of the communication and any attachments.

2

this grabs directories if you give it something like

ftpget ftp://host/dir/dir2/\*

so it's similar to mget

#!/dmsp/reference/bin/ruby
require 'net/ftp'
require 'uri'
require 'yaml'

def uriparse uri
   unless uri =~ %r/^ftp/
     host, path = uri.split %r|:/+|o
     URI::parse "ftp://#{ host }/#{ path }"
   else
     URI::parse uri
   end
end

abort "#{ $0 } srcuri [srcuris]+ dst" if ARGV.empty?
user = ENV["FTP_USER"] || "anonymous"
password = ENV["FTP_PASS"] || ENV["FTP_PASSWORD"] || "foo@bar.org"
debug = ENV['FTP_DEBUG']

ARGV << '.' if ARGV.size == 1
dest = ARGV.pop
lpaths =

while((src = ARGV.shift))
   src = uriparse src
   Net::FTP.open(src.host) do |ftp|
     ftp.debug_mode = true if debug
     ftp.login user, password
     ftp.passive = true
     ftp.binary = true

     paths =

     if src.path =~ %r|\*$|o
       dir = File::dirname(src.path)
       ftp.list(src.path) do |listing|
         path = listing.split(%r/\s+/o).last
         paths << File::join(dir, path)
       end
     else
       paths << src.path
     end

     paths.each do |path|
       lpath =
         if test ?d, dest
           File::join(dest, File::basename(path))
         else
           dest
         end
       ftp.getbinaryfile path, lpath
       lpaths << lpath
     end
   end
end

y lpaths

-a

···

On Wed, 10 May 2006, Daniel Berger wrote:

Hi all,

Is there a method in Net::FTP that corresponds to ftp's mget and mput functions?

If not, is there any chance of adding this to ftp.rb?

Thanks,

Dan

--
be kind whenever possible... it is always possible.
- h.h. the 14th dali lama

3

Hi all,

Is there a method in Net::FTP that corresponds to ftp's mget and mput functions?

If not, is there any chance of adding this to ftp.rb?

Thanks,

Dan

this does something like mput

#!/dmsp/reference/bin/ruby
require "net/ftp"
require "uri"
require "socket"
require "yaml"

def uriparse uri
   unless uri =~ %r/^ftp/
     host, path = uri.split %r|:/+|o
     URI::parse "ftp://#{ host }/#{ path }"
   else
     URI::parse uri
   end
end

abort "#{ $0 } src [srcs]+ dsturi" if ARGV.empty?
user = ENV["FTP_USER"] || "anonymous"
password = ENV["FTP_PASS"] || ENV["FTP_PASSWORD"] || "foo@bar.org"
debug = ENV["FTP_DEBUG"]
srcs, uri = ARGV[0..-2], ARGV[-1]

uri = uriparse uri host, hostdest = uri.host, uri.path
rpaths =
hostname, pid = Socket::gethostname, Process::pid

Net::FTP.open(host) do |ftp|
   ftp.debug_mode = true if debug
   ftp.login user, password
   ftp.passive = true
   ftp.binary = true

   srcs.each do |src|
     dest =
       if hostdest =~ %r|/+\s*$|o or srcs.size > 1
         File::join(hostdest, File::basename(src))
       else
         hostdest
       end
     destdir = File::dirname dest

     destdirs =
     d = nil
     destdirs.unshift(d) while((d = File::dirname(d || dest)) !~ %r|^\s*/+\s*$|o)

     dirname, basename = File::dirname(dest), File::basename(dest)
     tmp = File::join(dirname, ".#{ basename }.#{ hostname }.#{ pid }.ftp")

     if debug
       state = <<-eos
       >@src <#{ src }>
       >@host <#{ host }>
       >@dest <#{ dest }>
       >@destdir <#{ destdir }>
       >@destdirs <#{ destdirs.inspect }>
       >@tmp <#{ tmp.inspect }>
       eos
       state.gsub!(%r/^\s*\|/o,'')
       puts state
     end

     destdirs.each{|d| begin; ftp.mkdir d; rescue Net::FTPPermError; end}
     ftp.putbinaryfile src, tmp
     ftp.rename tmp, dest
     rpaths << dest
   end
end

y rpaths

-a

···

On Wed, 10 May 2006, Daniel Berger wrote:
--
be kind whenever possible... it is always possible.
- h.h. the 14th dali lama