wishdev-rio 0.4.3.1

data/lib/rio/ops/stream/write.rb

@@ -0,0 +1,57 @@
+#--
+# =============================================================================== 
+# 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
+#
+
+
+module RIO
+  module Ops
+    module Stream
+      module Write
+        def puts(*argv)    
+          rtn_self { iow.puts(*argv) } 
+        end
+        def puts!(*argv)   rtn_close { iow.puts(*argv); } end
+        def putc(*argv)    rtn_self { iow.putc(*argv) } end
+        def putc!(*argv)   rtn_close { iow.putc(*argv) } end
+        def printf(*argv)  rtn_self { iow.printf(*argv) } end
+        def printf!(*argv) rtn_close { iow.printf(*argv) } end
+        def print(*argv)   rtn_self { iow.print(*argv) } end
+        def print!(*argv)  rtn_close { iow.print(*argv) } end
+        def write(*argv)   iow.write(*argv) end
+        def write!(*argv)  then_close { iow.write(*argv) } end
+        def _!(*argv) self.close.softreset end
+      end
+    end    
+  end    
+end

data/lib/rio/ops/stream.rb

@@ -0,0 +1,87 @@
+#--
+# =============================================================================== 
+# 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
+#
+
+
+module RIO
+  module Impl
+    module U
+    end
+  end
+  module Ops
+    module Stream
+      module Status
+        def open?() 
+          not self.closed?
+        end
+        def closed?() self.ioh.nil?  end
+        def eof?() closed? or ior.eof? end
+        def stat() ioh ? ioh.stat : nil end # 
+      end
+    end
+
+    module Stream
+      module Manip
+        def pid() ioh ? ioh.pid : nil end
+        def to_io() ioh ? ioh.to_io : nil end
+        def tty?() ioh ? ioh.tty? : false end
+        def isatty() ioh ? ioh.isatty : false end
+        def binmode() rtn_self { self.ioh.binmode } end
+        def flush() rtn_self { self.ioh.flush } end
+        def fsync() rtn_self { self.ioh.fsync } end
+        def seek(amount,whence=IO::SEEK_SET) rtn_self { self.ioh.seek(amount,whence) } end
+        extend Forwardable
+        def_instance_delegators(:ioh,:pos,:pos=,:fileno,:to_i,
+                                :fcntl,:ioctl)
+      end
+    end
+    module Stream
+      module Open
+      end
+    end
+    module Stream
+      module Copy
+      end
+    end
+    module Stream
+      module Close
+      end
+    end
+    module Stream
+      module Reset
+        include Status
+      end
+    end
+  end
+end

data/lib/rio/ops/symlink.rb

@@ -0,0 +1,80 @@
+#--
+# =============================================================================== 
+# 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
+#
+
+
+# module RIO
+#   module Impl
+#     module U
+#       def self.readlink(s,*args) ::File.readlink(s,*args) end
+#       def self.lstat(s,*args) ::File.lstat(s,*args) end
+#     end
+#   end
+# end
+module RIO
+  module Ops
+    module Symlink
+      module ExistOrNot
+        def readlink(*args) new_rio(fs.readlink(self.to_s,*args)) end
+        def lstat(*args) fs.lstat(self.to_s,*args) end
+
+      end
+      module Existing
+        include ExistOrNot
+        def delete(*args)
+          rm(*args)
+        end
+        def unlink(*args)
+          delete(*args)
+        end
+        def delete!(*args)
+          delete(*args)
+        end
+      end
+      module NonExisting
+        include ExistOrNot
+        def mkdir()
+          rtn_reset {
+            self.readlink.mkdir
+          }
+        end
+        def mkpath()
+          rtn_reset {
+            self.readlink.mkpath
+          }
+        end
+      end
+    end
+  end
+end

data/lib/rio/path/reset.rb

@@ -0,0 +1,69 @@
+#--
+# =============================================================================== 
+# 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
+#
+
+
+# cell phone number: 954-6752.
+require 'rio/state'
+module RIO
+
+  module Path
+    # Base class for states that keep path information in a string
+    # For now this is all states, but that could change
+    class Reset < State::Base
+      def base_state() 
+        #p "RETURNING WIERD BASE STATE"
+        'Path::Reset' 
+      end
+
+      def check?() true end
+      def pathempty() become('Path::Empty')  end
+      def pathstring() become('Path::Str')  end
+      
+
+      def when_missing(sym,*args)
+#        p callstr('when_missing',sym,*args)
+        if to_s.empty?
+          pathempty()
+        else
+          pathstring()
+        end
+      end
+
+#      extend Forwardable
+#      def_instance_delegators(:path,:empty?)
+    end 
+  end 
+    
+end

data/lib/rio/path.rb

@@ -0,0 +1,129 @@
+#--
+# =============================================================================== 
+# 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/state'
+require 'rio/ops/path'
+require 'rio/ops/symlink'
+require 'rio/cp'
+module RIO
+
+  module Path #:nodoc: all
+    # Empty: 
+    #  nil? or empty? => Emp
+    #  else => Sin
+    class Empty < State::Base
+      include Ops::Path::Empty
+      def check?() fspath.nil? or fspath.empty? end
+
+      private
+
+      def _assume_cwd()
+        self.rl = Path::RL.new('.')
+        self.softreset
+      end
+      def _assume_stdio()
+        require 'rio/scheme/stdio'
+        self.rl = RIO::StdIO::RL.new
+        self.softreset
+      end
+
+      public
+
+      def [](*args)    _assume_cwd[*args] end
+      def each(&block) _assume_cwd.each(&block) end
+      def read(*args)  _assume_cwd.read(*args) end
+      def get(*args)   _assume_cwd.get(*args)  end
+
+      def gets(*args)  _assume_stdio.chomp.gets(*args) end
+
+      def when_missing(sym,*args) gofigure(sym,*args) end
+    end 
+
+    # Primary State for Rio as path manipulator
+    class Str < State::Base 
+      include Ops::Path::Str
+      include Ops::Path::Change
+      public 
+      
+      def check?() not fspath.nil? and not fspath.empty? end
+      def when_missing(sym,*args) 
+        #p callstr('when_missing',sym,*args)+" file?=#{file?} symlink?=#{symlink?} dir?=#{directory?}"
+        case
+        when file? then efile()
+        when directory? then edir()
+        else npath()
+        end
+      end
+
+      private
+
+      def _fs_state(become_state,symlink_mod)
+        next_state = become(become_state)
+        next_state.extend(symlink_mod) if symlink?
+        next_state
+      end
+
+      protected
+
+      def edir() _fs_state('Dir::Existing',Ops::Symlink::Existing) end
+      def efile() _fs_state('File::Existing',Ops::Symlink::Existing) end
+      def npath() _fs_state('Path::NonExisting',Ops::Symlink::NonExisting) end
+
+    end
+
+    # A transition state. Anything but simple path tests must cause a transition out of this state.
+    class NonExisting < State::Base
+      include Ops::Path::NonExisting
+      include Cp::NonExisting::Output
+
+      def check?() not exist? end
+
+      def ndir() become 'Dir::NonExisting' end
+      def nfile() become('File::NonExisting') end
+
+      def when_missing(sym,*args)
+        case sym
+        when :mkdir,:mkpath
+          ndir()
+        else 
+          nfile()
+        end
+      end
+    end
+
+  end
+
+end

data/lib/rio/piper/cp.rb

@@ -0,0 +1,80 @@
+#--
+# =============================================================================== 
+# 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
+#
+
+
+module RIO
+  module Piper #:nodoc: all
+    module Cp
+      module Util
+
+        protected
+
+        def process_pipe_arg_(npiper)
+          end_rio = npiper.rios[-1]
+          case end_rio.scheme
+          when 'cmdio'
+            new_rio(:cmdpipe,npiper)
+          when 'cmdpipe'
+            if end_rio.has_output_dest?
+              npiper.run
+              end_rio
+            else
+              new_rio(:cmdpipe,npiper)
+            end
+          else
+            npiper.run
+            end_rio
+          end
+        end
+
+      end
+      module Input
+        include Util
+        def |(arg)
+          #p "#{self} | #{arg}"
+          ario = ensure_cmd_rio(arg)
+          #cp = Rio.new(self.rl)
+          #cp.cx = self.cx.clone
+          #cp.ioh = self.ioh.clone unless self.ioh.nil?
+          cp = clone_rio()
+          npiper = Piper::Base.new(cp,ario)
+          process_pipe_arg_(npiper)
+        end
+      end
+    end
+  end
+end
+
+__END__