wishdev-rio 0.4.3.1

data/lib/rio/fs/native.rb

@@ -0,0 +1,75 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005,2006,2007 Christopher Kleckner
+# All rights reserved
+#
+# This file is part of the Rio library for ruby.
+#
+# Rio is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# Rio is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Rio; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# =============================================================================== 
+#++
+#
+# To create the documentation for Rio run the command
+#  ruby build_doc.rb
+# from the distribution directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Doc::EXAMPLES
+# * RIO::Rio
+#
+
+require 'rio/fs/impl'
+require 'rio/fs/base'
+
+module RIO
+  module FS
+    class Native < Base
+      require 'singleton'
+      include Singleton
+      attr_reader :file,:dir
+      def initialize(*args)
+        @file = ::File
+        @test = ::FileTest
+        @dir  = ::Dir
+        require 'pathname'
+        @path = ::Pathname
+        require 'fileutils'
+        @util = ::FileUtils
+      end
+
+      def self.create(*args)
+        instance(*args)
+      end
+      def root()
+        require 'rio/local'
+        ::RIO::Local::ROOT_DIR        
+      end
+      def cwd()
+        self.getwd()
+      end
+
+      include Str
+      include File
+      include Dir
+      include Path
+      include Test
+      include Util
+
+    end
+  end
+end

data/lib/rio/fs/stream.rb

@@ -0,0 +1,61 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005,2006,2007 Christopher Kleckner
+# All rights reserved
+#
+# This file is part of the Rio library for ruby.
+#
+# Rio is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# Rio is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Rio; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# =============================================================================== 
+#++
+#
+# To create the documentation for Rio run the command
+#  ruby build_doc.rb
+# from the distribution directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Doc::EXAMPLES
+# * RIO::Rio
+#
+
+require 'rio/fs/impl'
+require 'rio/fs/base'
+
+module RIO
+  module FS
+    class Stream < Base
+      require 'singleton'
+      include Singleton
+      attr_reader :file,:dir
+      def initialize(*args)
+        @file = nil
+        @test = nil
+        @dir  = nil
+        @path = nil
+        @util = nil
+      end
+
+      def self.create(*args)
+        instance(*args)
+      end
+      def symlink?(s) false end
+      def directory?(s) false end
+
+    end
+  end
+end

data/lib/rio/fs/url.rb

@@ -0,0 +1,63 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005,2006,2007 Christopher Kleckner
+# All rights reserved
+#
+# This file is part of the Rio library for ruby.
+#
+# Rio is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# Rio is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Rio; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# =============================================================================== 
+#++
+#
+# To create the documentation for Rio run the command
+#  ruby build_doc.rb
+# from the distribution directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Doc::EXAMPLES
+# * RIO::Rio
+#
+
+require 'rio/fs/impl'
+require 'rio/fs/base'
+
+module RIO
+  module FS
+    class URL < Base
+      require 'singleton'
+      include Singleton
+      attr_reader :file,:dir
+      def initialize(*args)
+        @file = ::File
+        @test = nil
+        @dir  = nil
+        @path = nil
+        @util = nil
+      end
+
+      def self.create(*args)
+        instance(*args)
+      end
+      include Str
+      include File
+      def symlink?(s) false end
+      def directory?(s) false end
+
+    end
+  end
+end

data/lib/rio/ftp/conncache.rb

@@ -0,0 +1,101 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005,2006,2007 Christopher Kleckner
+# All rights reserved
+#
+# This file is part of the Rio library for ruby.
+#
+# Rio is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# Rio is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Rio; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# =============================================================================== 
+#++
+#
+# To create the documentation for Rio run the command
+#  ruby build_doc.rb
+# from the distribution directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Doc::EXAMPLES
+# * RIO::Rio
+#
+
+
+require 'net/ftp'
+require 'uri'
+require 'singleton'
+
+module RIO
+  module FTP
+    class Connection
+      attr_reader :uri,:remote_root,:netftp
+      def initialize(uri)
+        @uri = uri.clone
+        @netftp = nil
+        @remote_root = nil
+        _init_connection()
+      end
+      def _init_connection
+        @netftp = ::Net::FTP.new()
+        @netftp.connect(@uri.host,@uri.port)
+        if @uri.user
+          @netftp.login(@uri.user,@uri.password)
+        else
+          @netftp.login
+        end
+        @remote_root = @netftp.pwd
+        @remote_root = '' if @remote_root == '/'
+      end
+      def method_missing(sym,*args,&block)
+        @netftp.__send__(sym,*args,&block)
+      end
+    end
+    class ConnCache
+      include Singleton
+      def initialize()
+        @conns = {}
+        @count = {}
+      end
+      def urikey(uri)
+        key_uri = uri.clone
+        key_uri.path = ''
+        key_uri.to_s
+      end
+      def connect(uri)
+        key = urikey(uri)
+        unless @conns.has_key?(key)
+          @conns[key] = Connection.new(uri)
+#          c = @conns[key]
+#          ObjectSpace.define_finalizer(c,proc { 
+#                                         p "Quit and Close #{uri}"
+#                                         if c and !c.closed?
+#                                           c.quit 
+#                                           c.close
+#                                         end
+#                                       })
+          @count[key] = 0
+        end
+        @count[key] += 1
+        @conns[key]
+      end
+      def close(uri)
+        key = urikey(uri)
+        @count[key] -= 1
+        #p "Closed #{uri} count=#{@count[key]}"
+      end
+    end
+  end
+end

data/lib/rio/ftp/dir.rb

@@ -0,0 +1,94 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005,2006,2007 Christopher Kleckner
+# All rights reserved
+#
+# This file is part of the Rio library for ruby.
+#
+# Rio is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# Rio is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Rio; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# =============================================================================== 
+#++
+#
+# To create the documentation for Rio run the command
+#  ruby build_doc.rb
+# from the distribution directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Doc::EXAMPLES
+# * RIO::Rio
+#
+
+require 'net/ftp'
+require 'uri'
+require 'rio/fs/native'
+require 'rio/ftp/conncache'
+
+module RIO
+  module FTP
+    module Dir
+      class Stream
+        attr_reader :uri,:netftp,:remote_root
+        def initialize(uri)
+          @uri = uri.clone
+          @conn = ConnCache.instance.connect(uri)
+          @remote_root = @conn.remote_root
+          @remote_root = '' if @remote_root == '/'
+          @names = nil
+          @entidx = 0
+        end
+        def url_root()
+          root_uri = @uri.clone
+          root_uri.path = ''
+          root_uri.to_s
+        end
+        def close()
+          ConnCache.instance.close(uri)
+        end
+        def remote_path()
+          self.remote_root+@uri.path
+        end
+        def names()
+          @names ||= begin
+                       @conn.nlst(remote_path())
+                     rescue ::Net::FTPPermError
+                       []
+                     end
+        end
+        def entpath(ent)
+          ent.sub(/^#{remote_path}/,'')
+        end
+        def read()
+          name = names[@entidx]
+          if name
+            rtn = entpath(name)
+            @entidx +=1
+            rtn
+          end
+        end
+        def each(&block)
+          p "Hello Mr. Phelps"
+          names.each { |ent|
+            @entidx += 1
+            yield entpath(ent)
+          }
+          self
+        end
+      end
+    end
+  end
+end

data/lib/rio/ftp/fs.rb

@@ -0,0 +1,180 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005,2006,2007 Christopher Kleckner
+# All rights reserved
+#
+# This file is part of the Rio library for ruby.
+#
+# Rio is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+#
+# Rio is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with Rio; if not, write to the Free Software
+# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# =============================================================================== 
+#++
+#
+# To create the documentation for Rio run the command
+#  ruby build_doc.rb
+# from the distribution directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Doc::EXAMPLES
+# * RIO::Rio
+#
+
+require 'net/ftp'
+require 'uri'
+require 'rio/fs/native'
+require 'rio/ftp/conncache'
+
+module RIO
+  module FTP
+    class FS 
+      attr_reader :uri
+      def initialize(uri)
+        @uri = uri.clone
+        @file = ::File
+        @conn = nil
+      end
+      def self.create(*args)
+        new(*args)
+      end
+      def remote_root
+        conn.remote_root
+      end
+      def conn
+        @conn ||= ConnCache.instance.connect(@uri)
+      end
+
+
+
+      def root()
+        uri = @uri.clone
+        uri.path = '/'
+        uri.to_s
+      end
+      include RIO::FS::Str
+
+      
+      def pwd() conn.pwd end
+      def getwd()
+        self.pwd
+      end
+      def cwd()
+        remote_wd = self.pwd
+        remote_rel = remote_wd.sub(/^#{self.remote_root}/,'')
+        wduri = uri.clone
+        wduri.path = remote_rel
+        wduri.to_s
+      end
+      def remote_path(url)
+        self.remote_root+RIO::RL.url2fs(URI(url).path)
+      end
+      def chdir(url,&block)
+        if block_given?
+          wd = conn.pwd
+          conn.chdir(remote_path(url))
+          begin
+            rtn = yield remote_path(url)
+          ensure
+            conn.chdir(wd)
+          end
+          return rtn
+        else
+          conn.chdir(remote_path(url))
+        end
+      end
+      def mkdir(url)
+        conn.mkdir(remote_path(url))
+      end
+      def mv(src_url,dst_url)
+        conn.rename(remote_path(src_url),remote_path(dst_url))
+      end
+      def size(url)
+        conn.size(remote_path(url))
+      end
+      def zero?(url)
+        size(url) == 0
+      end
+      def mtime(url)
+        conn.mtime(remote_path(url))
+      end
+      def rmdir(url)
+        conn.rmdir(remote_path(url))
+      end
+      def rm(url)
+        conn.delete(remote_path(url))
+      end
+
+      def get_ftype(url)
+        pth = remote_path(url)
+        #p url,pth
+        ftype = nil
+        begin
+          conn.mdtm(pth)
+          ftype = 'file'
+        rescue Net::FTPPermError
+          wd = conn.pwd
+          begin
+            conn.chdir(pth)
+            ftype = 'dir'
+          rescue Net::FTPPermError
+            ftype = 'nada'
+          ensure
+            conn.chdir(wd)
+          end
+        end
+        ftype
+      end
+      def file?(url)
+        get_ftype(url) == 'file'
+      end
+      def directory?(url)
+        get_ftype(url) == 'dir'
+      end
+      def exist?(url)
+        get_ftype(url) != 'nada'
+      end
+      def symlink?(url)
+        false
+      end
+      def mkpath(url)
+        tpath = rio(url)
+        tmprio = tpath.root
+        pathparts = tpath.path.split('/')[1..-1]
+        pathparts.each do |part|
+          tmprio.join!(part)
+          tmprio.mkdir
+        end
+      end
+      def rmtree(url)
+        ario = rio(url)
+        _rment(ario)
+      end
+
+      private
+
+      def _rment(ario)
+        if ario.file?
+          ario.rm
+        else
+          ario.each do |ent|
+            _rment(ent)
+          end
+          ario.rmdir
+        end
+      end
+    end
+  end
+end