Initial revisionv1_0_r2

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@2 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 39 insertions, 0 deletions

diff --git a/lib/find.rb b/lib/find.rb
new file mode 100644
index 0000000000..5ecc54329c
--- /dev/null
+++ b/lib/find.rb
@@ -0,0 +1,39 @@
+# Usage:
+#	require "find.rb"
+#
+#	Find.find('/foo','/bar') {|f| ...}
+#  or
+#	include Find
+#	find('/foo','/bar') {|f| ...}
+#
+
+module Find
+  def find(*path)
+    while file = path.shift
+      catch(:prune) {
+	yield file
+	if File.directory? file and not File.symlink? file then
+	  d = Dir.open(file)
+	  begin
+	    for f in d
+	      next if f =~ /^\.\.?$/
+	      if file == "/" then
+		f = "/" + f
+	      else
+		f = file + "/" + f
+	      end
+	      path.unshift f
+	    end
+	  ensure
+	    d.close
+	  end
+	end
+      }
+    end
+  end
+
+  def prune
+    throw :prune
+  end
+  module_function :find, :prune
+end