rio 0.3.7 → 0.3.8

data/lib/rio/fs/impl.rb

@@ -0,0 +1,123 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005, 2006 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. Then point your browser at the 'doc/rdoc' directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Rio
+#
+# <b>Rio is pre-alpha software. 
+# The documented interface and behavior is subject to change without notice.</b>
+
+module RIO
+  module FS #:nodoc: all
+    module Str
+      def fnmatch?(s,globstr,*flags) @file.fnmatch?(globstr,s,*flags) end
+      def extname(s,*args) @file.extname(s,*args) end
+
+      def basename(s,*args) @file.basename(s,*args) end
+      def dirname(s,*args) @file.dirname(s,*args) end
+      def join(s,*args) @file.join(s,*args) end
+      def cleanpath(s,*args) @path.new(s).cleanpath(*args) end
+    end
+    module File
+      def expand_path(s,*args) @file.expand_path(s,*args) end
+
+
+      def ftype(s,*args) @file.ftype(s,*args) end
+      def symlink(s,d) @file.symlink(s.to_s,d.to_s) end
+
+      def stat(s,*args) @file.stat(s,*args) end
+
+      def atime(s,*args) @file.atime(s,*args) end
+      def ctime(s,*args) @file.ctime(s,*args) end
+      def mtime(s,*args) @file.mtime(s,*args) end
+
+      def chmod(mod,s) @file.chmod(mod,s.to_s) end
+      def chown(owner_int,group_int,s) @file.chown(owner_int,group_int,s.to_s) end
+
+      def readlink(s,*args) @file.readlink(s,*args) end
+      def lstat(s,*args) @file.lstat(s,*args) end
+
+      def truncate(s,integer) @file.truncate(s,integer) end
+
+    end
+    module Dir
+      def rmdir(s) @dir.rmdir(s.to_s) end
+      def mkdir(s,*args) @dir.mkdir(s.to_s,*args) end
+      def chdir(s,&block) @dir.chdir(s.to_s,&block) end
+      def foreach(s,&block) @dir.foreach(s.to_s,&block) end
+      def entries(s) @dir.entries(s.to_s) end
+      def glob(gstr,*args,&block) @dir.glob(gstr,*args,&block) end
+      def pwd() @dir.pwd end
+      def getwd() @dir.getwd end
+    end
+    module Test
+      def blockdev?(s,*args) @test.blockdev?(s,*args) end
+      def chardev?(s,*args) @test.chardev?(s,*args) end
+      def directory?(s,*args) @test.directory?(s,*args) end
+      def dir?(s,*args) @test.directory?(s,*args) end
+      def executable?(s,*args) @test.executable?(s,*args) end
+      def executable_real?(s,*args) @test.executable_real?(s,*args) end
+      def exist?(s,*args) @test.exist?(s,*args) end
+      def file?(s,*args) @test.file?(s,*args) end
+      def grpowned?(s,*args) @test.grpowned?(s,*args) end
+      def owned?(s,*args) @test.owned?(s,*args) end
+      def pipe?(s,*args) @test.pipe?(s,*args) end
+      def readable?(s,*args) @test.readable?(s,*args) end
+      def readable_real?(s,*args) @test.readable_real?(s,*args) end
+      def setgid?(s,*args) @test.setgid?(s,*args) end
+      def setuid?(s,*args) @test.setuid?(s,*args) end
+      def size(s,*args) @test.size(s,*args) end
+      def size?(s,*args) @test.size?(s,*args) end
+      def socket?(s,*args) @test.socket?(s,*args) end
+      def sticky?(s,*args) @test.sticky?(s,*args) end
+      def symlink?(s,*args) @test.symlink?(s,*args) end
+      def writable?(s,*args) @test.writable?(s,*args) end
+      def writable_real?(s,*args) @test.writable_real?(s,*args) end
+      def zero?(s,*args) @test.zero?(s,*args) end
+    end
+    module Path
+      require 'pathname'
+      def root?(s) @path.new(s).root? end
+      def mountpoint?(s) @path.new(s).mountpoint? end
+      def realpath(s) @path.new(s).realpath end
+    end
+    module Util
+      # Directory stuff
+      def cp_r(s,d)  @util.cp_r(s.to_s,d.to_s) end
+      def rmtree(s) @util.rmtree(s.to_s) end
+      def mkpath(s) @util.mkpath(s.to_s) end
+      def rm(s) @util.rm(s.to_s) end
+      def touch(s) @util.touch(s.to_s) end
+
+      # file or dir
+      def mv(s,d) @util.mv(s.to_s,d.to_s) end
+    end
+  end
+end

data/lib/rio/fs/native.rb

@@ -0,0 +1,76 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005, 2006 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. Then point your browser at the 'doc/rdoc' directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Rio
+#
+# <b>Rio is pre-alpha software. 
+# The documented interface and behavior is subject to change without notice.</b>
+
+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/{record.rb → fs/stream.rb}

@@ -1,6 +1,6 @@
 #--
 # =============================================================================== 
-# Copyright (c) 2005, Christopher Kleckner
+# Copyright (c) 2005, 2006 Christopher Kleckner
 # All rights reserved
 #
 # This file is part of the Rio library for ruby.
@@ -22,7 +22,7 @@
 #++
 #
 # To create the documentation for Rio run the command
-#  rake rdoc
+#  ruby build_doc.rb
 # from the distribution directory. Then point your browser at the 'doc/rdoc' directory.
 #
 # Suggested Reading
@@ -34,26 +34,29 @@
 # <b>Rio is pre-alpha software. 
 # The documented interface and behavior is subject to change without notice.</b>
 
+require 'rio/fs/impl'
+require 'rio/fs/base'
 
-# T-Mobile HotSpot 1.877.822.SPOT
 module RIO
-  module Record #:nodoc: all
-    class Base < ::String
-      attr_accessor :recno
-      def initialize(recno,*args)
-        @recno = recno
-        super(*args)
+  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 =~(obj)
-        case obj
-        when ::Integer then @recno == obj
-        when ::Range then obj.include?(@recno)
-        else super
-        end
+
+      def self.create(*args)
+        instance(*args)
       end
-      def to_s() self end
-      def to_rec(mode=nil) to_s end
-      def to_row() to_s end
+      def symlink?(s) false end
+      def directory?(s) false end
+
     end
   end
 end

data/lib/rio/fs/url.rb

@@ -0,0 +1,64 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005, 2006 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. Then point your browser at the 'doc/rdoc' directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Rio
+#
+# <b>Rio is pre-alpha software. 
+# The documented interface and behavior is subject to change without notice.</b>
+
+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/{ioh.rb → conncache.rb}

@@ -1,6 +1,6 @@
 #--
 # =============================================================================== 
-# Copyright (c) 2005, Christopher Kleckner
+# Copyright (c) 2005, 2006 Christopher Kleckner
 # All rights reserved
 #
 # This file is part of the Rio library for ruby.
@@ -22,7 +22,7 @@
 #++
 #
 # To create the documentation for Rio run the command
-#  rake rdoc
+#  ruby build_doc.rb
 # from the distribution directory. Then point your browser at the 'doc/rdoc' directory.
 #
 # Suggested Reading
@@ -36,53 +36,52 @@
 
 
 require 'net/ftp'
-require 'rio/ioh'
+require 'uri'
+require 'singleton'
+
 module RIO
   module FTP
-    class IOH < RIO::IOH::Base
-      def each(&block)
-        names.each do |s|
-          yield s
-        end
-        self
-      end
-      def close()
-        @ios.close unless closed?
-        @ios = nil
-      end
-      def closed?() @ios.nil? end
-      def chdir(dir,&block)
-        if block_given?
-          wd = @ios.pwd
-          @ios.chdir(dir) unless dir == wd
-          rtn = yield self
-          @ios.chdir(wd)  unless dir == wd
-          return rtn
+    class Connection
+      attr_reader :uri,:netftp,:remote_root
+      def initialize(uri)
+        @uri = uri.clone
+        @netftp = ::Net::FTP.new()
+        @netftp.connect(@uri.host,@uri.port)
+        if @uri.user
+          @netftp.login(@uri.user,@uri.password)
         else
-          @ios.chdir(dir)
+          @netftp.login
         end
-        self
+        @remote_root = @netftp.pwd
       end
-      def list()
-        @ios.list
+      def method_missing(sym,*args,&block)
+        @netftp.__send__(sym,*args,&block)
       end
-      def nlst()
-        @ios.nlst
+    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 names()
-        begin
-          @ios.nlst
-        rescue ::Net::FTPTempError
-          []
+      def connect(uri)
+        key = urikey(uri)
+        unless @conns.has_key?(key)
+          @conns[key] = Connection.new(uri)
+          @count[key] = 0
         end
+        @count[key] += 1
+        @conns[key]
       end
-      extend Forwardable
-      def_instance_delegators(:handle,:pwd,:mkdir,:rename,:put,:delete,:rmdir,:mdtm,:mtime,:root_dir)
-
-      def callstr(func,*args)
-        self.class.to_s+'['+self.to_s+']'+'.'+func.to_s+'('+args.join(',')+')'
+      def close(uri)
+        key = urikey(uri)
+        @count[key] -= 1
       end
-      
     end
   end
 end

data/lib/rio/ftp/dir.rb

@@ -0,0 +1,95 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005, 2006 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. Then point your browser at the 'doc/rdoc' directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Rio
+#
+# <b>Rio is pre-alpha software. 
+# The documented interface and behavior is subject to change without notice.</b>
+
+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,173 @@
+#--
+# =============================================================================== 
+# Copyright (c) 2005, 2006 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. Then point your browser at the 'doc/rdoc' directory.
+#
+# Suggested Reading
+# * RIO::Doc::SYNOPSIS
+# * RIO::Doc::INTRO
+# * RIO::Doc::HOWTO
+# * RIO::Rio
+#
+# <b>Rio is pre-alpha software. 
+# The documented interface and behavior is subject to change without notice.</b>
+
+require 'net/ftp'
+require 'uri'
+require 'rio/fs/native'
+require 'rio/ftp/conncache'
+
+module RIO
+  module FTP
+    class FS 
+      attr_reader :uri,:conn,:remote_root
+      def initialize(uri)
+        @uri = uri.clone
+        @conn = ConnCache.instance.connect(@uri)
+        @remote_root = @conn.remote_root
+        @remote_root = '' if @remote_root == '/'
+        @file = ::File
+      end
+      def self.create(*args)
+        new(*args)
+      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(/^#{@remote_root}/,'')
+        wduri = uri.clone
+        wduri.path = remote_rel
+        wduri.to_s
+      end
+      def remote_path(url)
+        self.remote_root+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)
+        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