wishdev-rio 0.4.3.1

data/lib/rio/rl/chmap.rb

@@ -0,0 +1,66 @@
+#--
+# =============================================================================== 
+# 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 'uri'
+require 'rio/local'
+require 'rio/uri/file'
+
+module RIO
+  module RL
+    CHMAP = { 
+      '_'    => 'sysio',
+      '-'    => 'stdio',
+      '='    => 'stderr',
+      '"'    => 'strio',
+      '?'    => 'temp',
+      '['    => 'aryio',
+      '`'    => 'cmdio',
+      '|'    => 'cmdpipe',
+      '#'    => 'fd',
+
+      ?_    => 'sysio',
+      ?-    => 'stdio',
+      ?=    => 'stderr',
+      ?"    => 'strio',
+      ??    => 'temp',
+      ?[    => 'aryio',
+      ?`    => 'cmdio',
+      ?|    => 'cmdpipe',
+      ?#    => 'fd',
+      ?z    => 'zipfile',
+    }.freeze
+  end
+end

data/lib/rio/rl/fs2url.rb

@@ -0,0 +1,82 @@
+#--
+# =============================================================================== 
+# 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 'uri'
+require 'rio/local'
+require 'rio/uri/file'
+require 'rio/rl/chmap'
+
+module RIO
+  module RL #:nodoc: all
+    PESCAPE = Regexp.new("[^-_.!~*'()a-zA-Z0-9;?:@&=+$,]",false).freeze
+    ESCAPE = Regexp.new("[^-_.!~*'()a-zA-Z0-9;\/?:@&=+$,]",false).freeze
+    def escape(pth,esc=ESCAPE)
+      ::URI.escape(pth,esc)
+    end
+    def unescape(pth)
+      ::URI.unescape(pth)
+    end
+    def fs2urls(*args)
+      args.map{ |pth| fs2url(pth) }
+    end
+    def fs2url(pth, esc=ESCAPE)
+      #pth.sub!(/^[a-zA-Z]:/,'')
+      pth = URI.escape(pth,esc)
+      pth = '/' + pth if pth =~ /^[a-zA-Z]:/
+      pth
+      #      (Local::SEPARATOR == '/' ? pth : pth.gsub(Local::SEPARATOR,%r|/|))
+    end
+
+    def url2fs(pth)
+#      pth = pth.chop if pth.length > 1 and pth[-1] == ?/      cwd = RIO::RL.fs2url(::Dir.getwd)
+
+      #pth = pth.chop if pth != '/' and pth[-1] == ?/
+      pth = ::URI.unescape(pth)
+      if pth =~ %r#^/[a-zA-Z]:#
+        pth = pth[1..-1] 
+      end
+      pth
+#      (Local::SEPARATOR == '/' ? pth : pth.gsub(%r|/|,Local::SEPARATOR))
+    end
+
+    def getwd()
+      #::URI::FILE.build({:path => fs2url(::Dir.getwd)+'/'})
+      ::URI::FILE.build({:path => fs2url(::Dir.getwd)})
+    end
+
+    module_function :url2fs,:fs2url,:fs2urls,:getwd,:escape,:unescape
+  end
+end

data/lib/rio/rl/ioi.rb

@@ -0,0 +1,78 @@
+#--
+# =============================================================================== 
+# 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/rl/base'
+require 'rio/ioh'
+require 'rio/fs/stream'
+
+module RIO
+  module RL
+    class IOIBase < Base
+      RESET_STATE = 'Stream::Open'
+      def openfs_()
+        RIO::FS::Stream.create()
+      end
+      def scheme() self.class.const_get(:RIOSCHEME) end
+      def opaque() '' end
+      def self.splitrl(s) nil end
+      #def path() self.class.const_get(:RIOPATH) end
+      def to_s() url() end
+      def open(ios)
+        IOH::Stream.new(ios)
+      end
+    end
+  end
+  module RL
+    class SysIOBase < IOIBase
+      attr_reader :ios
+      attr_writer :ios
+      protected(:ios=)
+      def initialize(ios=nil)
+        @ios = ios
+        super
+      end
+      def initialize_copy(cp)
+        super
+        @ios = cp.ios.clone unless cp.ios.nil?
+      end
+      def open(ios=nil)
+        @ios = ios unless ios.nil?
+        super(@ios)
+      end
+        
+    end
+  end
+end

data/lib/rio/rl/path.rb

@@ -0,0 +1,110 @@
+#--
+# =============================================================================== 
+# 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/rl/uri'
+require 'rio/rl/withpath'
+require 'rio/rl/pathmethods'
+
+module RIO
+  module RL
+    class PathBase < URIBase
+      RESET_STATE = 'Path::Reset'
+
+      def arg0_info_(arg0,*args)
+        #p "arg0_info_(#{arg0.inspect},#{args.inspect})"
+        #p callstr('init_from_args_',arg0.inspect,args)
+        vuri,vbase,vfs = nil,nil,nil
+        case arg0
+        when RIO::Rio, URIBase, ::URI
+          return super
+        when ::String 
+          vuri = uri_from_string_(RL.fs2url(arg0)) || ::URI.parse(RL.fs2url(arg0))
+        else
+          raise(ArgumentError,"'#{arg0}'[#{arg0.class}] can not be used to create a Rio")
+        end
+        #puts "path.rb arg0_info_: vuri=#{vuri}"
+        [vuri,vbase,vfs]
+      end
+      def build_arg0_(path_str)
+        RL.url2fs(path_str)
+      end
+      def scheme() 
+        uri.scheme || 'path' 
+      end
+      def url
+        str = uri.to_s
+        str = scheme + ':' +str unless uri.scheme
+        str
+      end
+      def use_host?
+        hst = uri.host
+        !(hst.nil? || hst.empty? || hst == 'localhost')
+      end
+
+      def join(*args)
+        return self if args.empty?
+        join_(args.map{ |arg| RL.fs2url(arg.to_s)})
+      end
+      def fspath() 
+        if use_host?
+          '//' + uri.host + RL.url2fs(self.urlpath)
+        else 
+          RL.url2fs(self.urlpath)
+        end
+      end
+#      def fspath=(pt)
+#        if pt =~ %r|^//(#{HOST})(/.*)?$|
+#          @host = $1
+#          @fspath = $2 || '/'
+#        else
+#          @fspath = pt
+#        end
+#      end
+      def to_s()
+        self.fspath
+      end
+      def self.splitrl(s)
+        sch,opq,whole = split_riorl(s)
+        #p sch,opq,whole
+        case sch
+        when 'file' then [whole]
+        else [opq]
+        end
+      end
+    end
+  end
+end
+__END__

data/lib/rio/rl/pathmethods.rb

@@ -0,0 +1,116 @@
+#--
+# =============================================================================== 
+# 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/rl/uri'
+module RIO
+  module RL
+    module PathMethods
+      def urlroot()
+        return nil unless absolute?
+        cp = self.clone
+        cp.urlpath = self.pathroot
+        cp.url
+      end
+      def pathdepth()
+        pth = self.path_no_slash
+        (pth == '/' ? 0 : pth.count('/'))
+      end
+      def _parts()
+        pr = self.pathroot
+        ur = self.urlroot.sub(/#{pr}$/,'')
+        up = self.urlpath.sub(/^#{pr}/,'')
+
+        [ur,pr,up]
+      end
+      def split()
+        if absolute?
+          parts = self._parts
+          sparts = []
+          sparts << parts[0] + parts[1]
+          sparts += parts[2].split('/')
+        else
+          sparts = self.urlpath.split('/')
+        end
+        require 'rio/to_rio'
+        rlparts = sparts.map { |str| self.class.new(str) }
+        (1...sparts.length).each { |i|
+          rlparts[i].base = rlparts[i-1].abs.url + '/'
+        }
+        rlparts
+      end
+
+      def join(*args)
+        return self if args.empty?
+        sa = args.map { |arg| ::URI.escape(arg.to_s,ESCAPE) }
+        sa.unshift(self.urlpath) unless self.urlpath.empty?
+        self.urlpath = sa.join('/').squeeze('/')
+        self
+      end
+
+      def parse_url(str)
+        ::URI.parse(::URI.escape(str,ESCAPE))
+      end
+
+      def route_from(other)
+        self.class.new(uri.route_from(other.uri),{:base => other.url})
+      end
+      def route_to(other)
+        self.class.new(uri.route_to(other.uri),{:base => self.url})
+      end
+      def merge(other)
+        self.class.new(uri.merge(other.uri))
+      end
+      def calc_abs_uri_(path_str,base_str)
+        #p path_str,base_str
+        path = URI(path_str)
+        return path unless base_str
+        if path_str[0,1] != '/' and base_str[0,1] == '/'
+          abs_str = [base_str,path_str].join('/').squeeze('/')
+          return URI(abs_str)
+        end
+        base = URI(base_str)
+        abs = base.merge(path)
+        return abs
+      end
+
+      def dirname()
+        ::File.dirname(self.path_no_slash)
+      end
+
+
+    end
+  end
+end