godfat-ludy 0.1.13

data/Rakefile

@@ -0,0 +1,56 @@
+# -*- coding: utf-8 -*-
+# Look in the tasks/setup.rb file for the various options that can be
+# configured in this Rakefile. The .rake files in the tasks directory
+# are where the options are used.
+load 'tasks/setup.rb'
+
+ensure_in_path 'lib'
+require 'ludy'
+require 'ludy/tasks'
+
+CLEAN.include Dir['**/*.rbc']
+
+task :default do
+  Rake.application.options.show_task_pattern = /./
+  Rake.application.display_tasks_and_comments
+end
+
+namespace :gem do
+  desc 'create ludy.gemspec'
+  task 'gemspec' do
+    puts 'rake gem:debug > ludy.gemspec'
+    File.open('ludy.gemspec', 'w'){|spec| spec << `rake gem:debug`.sub(/.*/, '')}
+  end
+end
+
+namespace :git do
+  desc 'push to rubyforge and github'
+  task 'push' do
+    sh 'git push rubyforge master'
+    puts
+    sh 'git push github master'
+  end
+end
+
+PROJ.name = 'ludy'
+PROJ.authors = 'Lin Jen-Shin (a.k.a. godfat 真常)'
+PROJ.email = 'strip any number: 18god29fat7029 (at] godfat32 -dooot- 20org'
+PROJ.url = 'http://ludy.rubyforge.org/'
+PROJ.description = PROJ.summary = paragraphs_of('README', 'description').join("\n\n")
+PROJ.changes = paragraphs_of('CHANGES', 0..1).join("\n\n")
+PROJ.rubyforge.name = 'ludy'
+PROJ.version = paragraphs_of('README', 0).first.split("\n").first[7..-1]
+
+PROJ.gem.executables = 'bin/ludy'
+PROJ.gem.files = []
+Dir.glob('**/*'){ |file| PROJ.gem.files << file if file !~ /^pkg|^tmp|^doc/ }
+
+PROJ.rdoc.main = 'README'
+PROJ.rdoc.exclude << 'Manifest' << 'Rakefile' << 'tmp$' << '^tmp'
+PROJ.rdoc.include << '\w+'
+PROJ.rdoc.opts << '--diagram' if !WIN32 and `which dot` =~ %r/\/dot/
+PROJ.rdoc.opts << '--charset=utf-8' << '--inline-source' << '--line-numbers' << '--promiscuous'
+
+PROJ.spec.opts << '--color'
+
+# EOF

data/TODO

@@ -0,0 +1,21 @@
+= ludy todo list
+
+* chain travel
+* method hook
+* more rdoc
+
+* list comprehension List[lambda{|x,y|[x,y*2]}, (0..1), (2..3), lambda{|x,y|x!=y}]
+* better namespace
+* extract Array's methods to Enumerable
+
+* table showing, with pad.
+* rails multiple layout
+
+* better manifest creating
+
+* better bin/ludy support
+
+* refactor tasks...
+* make switch between template engine easier
+
+* <del>rails paginator, change model class, change opts...</del>

data/bin/ludy

@@ -0,0 +1,11 @@
+#!/usr/bin/env ruby
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), '..', 'lib', 'ludy'))
+
+# Put your code here
+
+Dir.chdir Ludy.path
+puts `rake #{ARGV.join(' ')}`
+
+# EOF

data/lib/ludy.rb

@@ -0,0 +1,74 @@
+# $Id$
+
+# Equivalent to a header guard in C/C++
+# Used to prevent the class/module from being loaded more than once
+unless defined? LudyHeaderGuard
+
+module LudyHeaderGuard # :nodoc:
+end
+
+module Ludy
+
+  # :stopdoc:
+  VERSION = '0.1.13'
+  LIBPATH = ::File.expand_path(::File.dirname(__FILE__)) + ::File::SEPARATOR
+  PATH = ::File.dirname(LIBPATH) + ::File::SEPARATOR
+  $LOAD_PATH << LIBPATH
+  # :startdoc:
+
+  # Returns the version string for the library.
+  #
+  def self.version
+    VERSION
+  end
+
+  # Returns the library path for the module. If any arguments are given,
+  # they will be joined to the end of the libray path using
+  # <tt>File.join</tt>.
+  #
+  def self.libpath( *args )
+    args.empty? ? LIBPATH : ::File.join(LIBPATH, *args)
+  end
+
+  # Returns the lpath for the module. If any arguments are given,
+  # they will be joined to the end of the path using
+  # <tt>File.join</tt>.
+  #
+  def self.path( *args )
+    args.empty? ? PATH : ::File.join(PATH, *args)
+  end
+
+  # Utility method used to rquire all files ending in .rb that lie in the
+  # directory below this file that has the same name as the filename passed
+  # in. Optionally, a specific _directory_ name can be passed in such that
+  # the _filename_ does not have to be equivalent to the directory.
+  #
+  def self.require_all_libs_relative_to( fname, dir = nil )
+    dir ||= ::File.basename(fname, '.*')
+    search_me = ::File.expand_path(
+        ::File.join(::File.dirname(fname), dir, '**', '*.rb'))
+
+    Dir.glob(search_me).sort.each {|rb| require rb}
+  end
+
+  # require all files in the dir, only work for ludy.
+  # i.e., Ludy.require_all_in 'proc' => require 'ludy/proc/*.rb'
+  def self.require_all_in dir
+    require 'rubygems'
+    require 'rake'
+    Dir.glob("#{LIBPATH}ludy/#{dir}/*.rb").each{ |i|
+      require(if dir == '.'
+                i.pathmap('ludy/%n')
+              else
+                i.pathmap("ludy/#{dir}/%n")
+              end)
+    }
+  end
+
+end  # module Ludy
+
+# Ludy.require_all_libs_relative_to __FILE__
+
+end  # unless defined?
+
+# EOF

data/lib/ludy/all.rb

@@ -0,0 +1,3 @@
+
+require 'ludy'
+Ludy.require_all_in '.'

data/lib/ludy/array.rb

@@ -0,0 +1,3 @@
+
+require 'ludy'
+Ludy.require_all_in 'array'

data/lib/ludy/array/body.rb

@@ -0,0 +1,9 @@
+
+class Array
+  # strip the last element
+  #  [1,2,3].body
+  #  => [1,2]
+  def body
+    self[0..-2]
+  end
+end

data/lib/ludy/array/choice.rb

@@ -0,0 +1,16 @@
+
+require 'ludy/version'
+
+class Array
+  # it would be defined if RUBY_VERSION < '1.9.0', see rdoc in ruby 1.9
+  def choice
+    self[rand(size)]
+  end if Ludy::ruby_before '1.9.0'
+  # the choosen element would be deleted. return the choosen
+  def choice!
+    i = rand size
+    r = self[i]
+    self.delete_at i
+    r
+  end
+end

data/lib/ludy/array/combine.rb

@@ -0,0 +1,17 @@
+
+require 'ludy/symbol/to_proc'
+
+class Array
+  # example:
+  #  [1,2,3].combine [2,4,6]
+  #  => [3,6,9]
+  #
+  #  [1,2].combine [1,2], [1,2]
+  #  => [3,6]
+  #
+  #  ['a','b'].combine ['b','a']
+  #  => ['ab','ba']
+  def combine *target; zip(*target).map{|i|i.inject(&:+)}; end
+  # inplace version of combine
+  def combine! *target; replace combine(*target); end
+end

data/lib/ludy/array/combos.rb

@@ -0,0 +1,35 @@
+
+require 'ludy/version'
+
+class Array
+  if Ludy::ruby_before '1.9.0'
+    require 'ludy/array/foldr'
+    require 'ludy/symbol/to_proc' if Ludy::ruby_before '1.9.0'
+    # for each combos
+    #  [[0,1],[2,3]].combos
+    #  => [[0,2],[0,3],[1,2],[1,3]]
+    def combos
+      result = []
+      radixs = reverse.map(&:size)
+      inject(1){|r, i| r * i.size}.times{ |step|
+        result << foldr(lambda{ |i, r|
+                          radix = radixs[r.size]
+                          r.unshift i[step % radix]
+                          step /= radix unless radix.nil?
+                          r
+                        }, [])
+      }
+      result
+    end
+  else
+    require 'ludy/array/tail'
+    # for each combos
+    #  [[0,1],[2,3]].combos
+    #  => [[0,2],[0,3],[1,2],[1,3]]
+    # simply:
+    #  array.first.product *array.tail
+    def combos
+      first.product(*tail)
+    end
+  end
+end

data/lib/ludy/array/count.rb

@@ -0,0 +1,9 @@
+
+require 'ludy/version'
+
+class Array
+  # it would be defined if RUBY_VERSION < '1.9.0', see rdoc in ruby 1.9
+  def count t
+    inject(0){|r,i| i==t ? r+=1 : r}
+  end
+end if Ludy::ruby_before '1.9.0'

data/lib/ludy/array/filter.rb

@@ -0,0 +1,4 @@
+
+class Array
+  alias_method :filter, :select
+end

data/lib/ludy/array/foldl.rb

@@ -0,0 +1,5 @@
+
+class Array
+  # fold from left to right (it just like inject)
+  def foldl func, init; inject init, &func; end
+end

data/lib/ludy/array/foldr.rb

@@ -0,0 +1,8 @@
+
+class Array
+  # fold from right to left
+  def foldr func, init
+    reverse_each{ |i| init = func[i, init] }
+    init
+  end
+end

data/lib/ludy/array/head.rb

@@ -0,0 +1,4 @@
+
+class Array
+  alias_method :head, :first
+end

data/lib/ludy/array/map_with_index.rb

@@ -0,0 +1,8 @@
+
+class Array
+  # just like each_with_index
+  def map_with_index
+    i = -1
+    map{ |e| i+=1; yield e, i; }
+  end
+end

data/lib/ludy/array/pad.rb

@@ -0,0 +1,13 @@
+
+class Array
+  # ensure the size is at least n, pad with n, default nil
+  def pad n, t = nil
+    return self if n <= size
+    self + [t]*(n-size)
+  end
+  # inplace version of pad
+  def pad! n, t = nil
+    return self if n <= size
+    concat([t]*(n-size))
+  end
+end

data/lib/ludy/array/product.rb

@@ -0,0 +1,16 @@
+
+require 'ludy/version'
+
+if Ludy::ruby_before '1.9.0'
+  begin
+    require 'facets/enumerable/combos'
+  rescue LoadError
+    require 'ludy/array/combos'
+  end
+  class Array
+    # it would be defined if RUBY_VERSION < '1.9.0', see rdoc in ruby 1.9
+    def product *args
+      args.unshift(self).combos
+    end
+  end
+end

data/lib/ludy/array/rotate.rb

@@ -0,0 +1,21 @@
+
+class Array
+  # rotate right with size.
+  # if the size is negative, rotate left.
+  #   [1,2,3].rotate
+  #   => [3,1,2]
+  #
+  #   [1,2,3].rotate -1
+  #   => [2,3,1]
+  #
+  #   [1,2,3].rotate 2
+  #   => [2,3,1]
+  def rotate n = 1
+    return self if empty? or n == 0
+    self[-n..-1] + self[0...-n]
+  end
+  # inplace version of rotate
+  def rotate!
+    replace rotate
+  end
+end

data/lib/ludy/array/tail.rb

@@ -0,0 +1,8 @@
+
+class Array
+  # simply call
+  #  array[1..-1]
+  def tail
+    self[1..-1]
+  end
+end

data/lib/ludy/blackhole.rb

@@ -0,0 +1,17 @@
+
+require 'ludy/class/undef_all_methods'
+require 'singleton'
+
+module Ludy
+  # a blackhole would eat any message it received.
+  class Blackhole
+    undef_all_methods
+    include Singleton
+    def method_missing msg, *args, &block
+      self
+    end
+    def nil?
+      true
+    end
+  end
+end

data/lib/ludy/class.rb

@@ -0,0 +1,3 @@
+
+require 'ludy'
+Ludy.require_all_in 'class'

data/lib/ludy/class/undef_all_methods.rb

@@ -0,0 +1,9 @@
+
+class Class
+  # undefine all instance methods, used for delegation class
+  def undef_all_methods
+    instance_methods.each{ |m|
+      undef_method m unless (m =~ /^__/ || m.to_sym == :object_id || m.to_sym == :public_send )
+    }
+  end
+end

data/lib/ludy/deprecated/aspect.rb

@@ -0,0 +1,26 @@
+
+module Ludy
+
+
+end
+
+module Kernel
+  def cut target, &block
+    (class << target; self; end)
+  end
+end
+
+class Name
+  def name
+    'name'
+  end
+end
+
+cut Name do
+  def name
+    "<#{super}>"
+  end
+  def g
+    '??'
+  end
+end

data/lib/ludy/deprecated/callstack.rb

@@ -0,0 +1,24 @@
+
+module Ludy
+  # TRACE_EVENT   = 0
+  # TRACE_FILE    = 1
+  # TRACE_LINE    = 2
+  # TRACE_MSG     = 3
+  # TRACE_BINDING = 4
+  # TRACE_CLASS   = 5
+
+  def callstack levels = -1
+    st = Thread.current[:callstack]
+    if levels then st && st[levels - 2] else st end
+  end
+  module_function :callstack
+end # of Ludy
+
+set_trace_func lambda{ |*args|
+  case args[0]
+    when /call$/
+      (Thread.current[:callstack] ||= []).push args
+    when /return$/
+      (Thread.current[:callstack] ||= []).pop
+  end
+}