ludy 0.0.9 → 0.1.0

data/lib/ludy/tasks/erb_cpp/attr_builder.rb

@@ -0,0 +1,49 @@
+
+module Kernel
+
+# just like attr_accessor for c++
+def accessor type, *pros
+  (reader_only type, *pros) +
+  (writer_only type, *pros) +
+  (member_only type, *pros)
+end
+
+# just like attr_reader for c++
+def reader type, *pros
+  (reader_only type, *pros) +
+  (member_only type, *pros)
+end
+
+# just like attr_writer for c++
+def writer type, *pros
+  (writer_only type, *pros) +
+  (member_only type, *pros)
+end
+
+# create only reader(getter), no member and no writer(setter)
+def reader_only type, *pros
+  result = "#{@prefix}public:\n"
+  pros.each{ |p|
+    # getter
+    result << "#{@prefix}#{@indent}#{type} #{p}() const{ return #{p}_; }\n"
+  }
+  result
+end
+
+# create only writer(setter), no member and no reader(getter)
+def writer_only type, *pros
+  result = "#{@prefix}public:\n"
+  pros.each{ |p|
+    # setter
+    result << "#{@prefix}#{@indent}#{@class}& #{p}(#{type} const& new_#{p}){ #{p}_ = new_#{p}; return *this; }\n"
+  }
+  result
+end
+
+# create only member, no writer(setter) and no reader(getter)
+def member_only type, *pros
+  result = "#{@prefix}private:\n"
+  result << "#{@prefix}#{@indent}#{type} #{pros.map{|p|"#{p}_"}.join(", ")};\n"
+end
+
+end # of ludy

data/lib/ludy/tasks/erb_cpp/header_guard.rb

@@ -0,0 +1,12 @@
+
+module Kernel
+
+# C/C++ header guard generator, you shold provide the final #endif yourself,
+# and you should provide PROJ name for header guard prefix
+def header_guard random_suffix = nil
+  defined = "_#{PROJ.upcase}_#{@dir.upcase}_#{@class.upcase}_#{random_suffix.nil? ? '' : rand.to_s[2..-1]+'_'}"
+"#ifndef #{defined}
+#define #{defined}"
+end
+
+end # of ludy

data/lib/ludy/tasks/erb_cpp/template_forward_parameters.rb

@@ -0,0 +1,43 @@
+
+require 'ludy/array/combos'
+
+module Kernel
+
+# forward template functions' generator
+def for_template_parameters_within range, modifiers = ['volatile', 'const volatile']
+  modifiers = ['', 'const'] + modifiers
+  range.to_a.map_with_index{ |size, i|
+    ([(["T"]*modifiers.size).zip(
+    modifiers,
+    ['&']*modifiers.size)]*size).
+      map_with_index{ |args, arg_i|
+        args.map{ |arg|
+          # e.g., T0 const& a
+          "#{arg.first}#{arg_i} #{arg.tail.join} #{(arg_i+10).to_s(36)}"
+        }
+      }.combos.map{ |arg| arg.kind_of?(Array) ? arg.join(', ') : arg }
+  }.flatten.each{ |args_list| yield args_list }
+end
+
+# parameter for template
+def template_parameters args_list
+  size = args_list.count(',') + 1
+  '<' + (['class T']*size).map_with_index{ |t, index|
+    "#{t}#{index}"
+  }.join(', ') + '>'
+end
+
+# the parameters' list
+def forward_parameters args_list
+  args_list
+end
+
+# the arguments it passed
+def arguments args_list
+  size = args_list.count(',') + 1
+  Array.new(size).map_with_index{ |not_important, i|
+    (i+10).to_s 36
+  }.join(', ')
+end
+
+end # of ludy

data/lib/ludy/tasks/erb_cpp.rb

@@ -0,0 +1,35 @@
+
+require 'rubygems'
+require 'rake/clean'
+require 'ludy'
+Ludy.require_all_in 'tasks/erb_cpp'
+
+namespace :erb do
+
+  inputs = FileList['**/*.erb']
+  outputs = inputs.ext
+  CLEAN.include outputs
+
+  desc 'automaticly translate all *.cpp.erb into *.cpp'
+  task :preprocess => [:begin, outputs, :end].flatten
+  task :begin do; puts "processing templates: #{inputs.inspect}\n\n"; end
+  task :end do; puts "processing done."; end
+
+  require 'erb'
+  require 'open-uri'
+
+  inputs.zip(outputs).each{ |input, output|
+    file output => input do
+      puts "processing... #{output}"
+      open output, 'w' do |o|
+        @class = output.pathmap '%n'
+        @dir = output.pathmap('%-1d')
+        @indent = '    '
+        @prefix = ''
+        PROJ ||= 'please_set_PROJ_for_your_header_name'
+        o << ERB.new(open(input).read).result(binding)
+      end
+    end
+  }
+
+end # of namespace erb

data/lib/ludy/tasks.rb

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

data/lib/ludy/test/helper.rb

@@ -0,0 +1,3 @@
+
+require 'test/unit'
+require File.join(File.dirname(__FILE__), '..', '..', 'ludy')

data/lib/ludy/variable.rb

@@ -1,35 +1,27 @@
-#!/usr/bin/env ruby
-
-#    Copyright (c) 2007, Lin Jen-Shin（a.k.a. godfat 真常）
-#
-#    Licensed under the Apache License, Version 2.0 (the "License");
-#    you may not use this file except in compliance with the License.
-#    You may obtain a copy of the License at
-#
-#        http://www.apache.org/licenses/LICENSE-2.0
-#
-#    Unless required by applicable law or agreed to in writing, software
-#    distributed under the License is distributed on an "AS IS" BASIS,
-#    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-#    See the License for the specific language governing permissions and
-#    limitations under the License.
+
+require 'ludy/kernel/public_send'
+require 'ludy/class/undef_all_methods'
 
 module Ludy
 
+  # a variable reference, used for side effect...
   class Variable
-    instance_methods.each{|m| undef_method m unless m =~ /^__/}
+    undef_all_methods
 
+    # init the refered instance
     def initialize obj
       @__obj__ = obj
     end
 
+    # delegator
     def method_missing msg, *arg, &block
-      @__obj__.__send__ msg, *arg, &block
+      @__obj__.public_send msg, *arg, &block
     end
 
     attr_accessor :__obj__
   end
 
+  # provided for creating lazy object more convient
   def var arg
     Variable.new arg
   end

data/lib/ludy/y_combinator.rb

@@ -1,30 +1,11 @@
-#!/usr/bin/env ruby
 
-#    Copyright (c) 2007, Lin Jen-Shin（a.k.a. godfat 真常）
-#
-#    Licensed under the Apache License, Version 2.0 (the "License");
-#    you may not use this file except in compliance with the License.
-#    You may obtain a copy of the License at
-#
-#        http://www.apache.org/licenses/LICENSE-2.0
-#
-#    Unless required by applicable law or agreed to in writing, software
-#    distributed under the License is distributed on an "AS IS" BASIS,
-#    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-#    See the License for the specific language governing permissions and
-#    limitations under the License.
-
-begin
-  require_ludy 'lazy'
-rescue NameError
-  require(File.join(File.dirname(__FILE__), '../', 'ludy'))
-  require_ludy 'lazy'
-end
+require 'ludy/lazy'
 
 module Ludy
 
+  # the Y combinator, with lazy stuff
   Y = lambda{|f|
     lambda{|x| lazy{f[x[x]]} }[lambda{|x| lazy{f[x[x]]} }]
   }
 
-end
+end # of Ludy

data/lib/ludy/z_combinator.rb

@@ -1,25 +1,11 @@
-#!/usr/bin/env ruby
-
-#    Copyright (c) 2007, Lin Jen-Shin（a.k.a. godfat 真常）
-#
-#    Licensed under the Apache License, Version 2.0 (the "License");
-#    you may not use this file except in compliance with the License.
-#    You may obtain a copy of the License at
-#
-#        http://www.apache.org/licenses/LICENSE-2.0
-#
-#    Unless required by applicable law or agreed to in writing, software
-#    distributed under the License is distributed on an "AS IS" BASIS,
-#    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-#    See the License for the specific language governing permissions and
-#    limitations under the License.
 
 module Ludy
 
+  # the Z combinator, without lazy stuff
   Z = lambda{|f|
     lambda{|x| f[lambda{|y| x[x][y]}]}[
       lambda{|x| f[lambda{|y| x[x][y]}]}
     ]
   }
 
-end
+end # of Ludy

data/lib/ludy.rb

@@ -1,23 +1,74 @@
-#!/usr/bin/env ruby
-
-#    Copyright (c) 2007, Lin Jen-Shin�]a.k.a. godfat �u�`�^
-#
-#    Licensed under the Apache License, Version 2.0 (the "License");
-#    you may not use this file except in compliance with the License.
-#    You may obtain a copy of the License at
-#
-#        http://www.apache.org/licenses/LICENSE-2.0
-#
-#    Unless required by applicable law or agreed to in writing, software
-#    distributed under the License is distributed on an "AS IS" BASIS,
-#    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
-#    See the License for the specific language governing permissions and
-#    limitations under the License.
-
-def require_ludy target = nil
-  if target
-    require(File.join(File.dirname(__FILE__), 'ludy', target))
-  else
-    require_all_in_dir __FILE__, 'ludy'
-  end
-end
+# $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
+
+require 'rubygems'
+require 'rake'
+
+module Ludy
+
+  # :stopdoc:
+  VERSION = '0.1.0'
+  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
+    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/puzzle_generator/chain.rb

@@ -1,9 +1,9 @@
 
-require File.join(File.dirname(__FILE__), 'misc')
+require 'puzzle_generator/misc'
 
 module PuzzleGenerator
 
-  class Chain
+  class Chain # :nodoc:
     include Enumerable
     def initialize position = [0, 0], direct = Up, invoke = DefaultOption[:invoke]
       @direct = direct

data/lib/puzzle_generator/chained_map.rb

@@ -1,16 +1,13 @@
 
-pwd = File.dirname __FILE__
+require 'puzzle_generator/misc'
+require 'puzzle_generator/chain'
+require 'puzzle_generator/map'
 
-require File.join(pwd, 'misc')
-require File.join(pwd, 'chain')
-require File.join(pwd, 'map')
+require 'ludy/array/combine'
 
 require 'rubygems'
-
-gem 'ludy', '>=0.0.7'   # for Array#combine
-require 'ludy/ludy_ext'
-
-gem 'facets', '>=2.0.0' # for lots of things
+gem 'facets', '>=2.0.0'
+require 'facets/enumerable/combos'
 require 'facets/random' # for Array#pick
 
 module PuzzleGenerator
@@ -22,7 +19,7 @@ module PuzzleGenerator
   # 2. c. check if the position + direct is ok? ok pass, failed choose again
   # 2. d. goto 2
 
-  class ChainedMap
+  class ChainedMap # :nodoc:
     include DisplayMap, MapUtils
     attr_reader :maps, :option
     def initialize option = {}

data/lib/puzzle_generator/colored_map.rb

@@ -1,8 +1,8 @@
 
-require File.join(File.dirname(__FILE__), 'misc')
+require 'puzzle_generator/misc'
 
 module PuzzleGenerator
-  class ColoredMap
+  class ColoredMap # :nodoc:
     include DisplayMap, MapUtils
     def initialize chained_map, colors = (1..chained_map.option[:colors]).to_a
       @result_map = []

data/lib/puzzle_generator/map.rb

@@ -1,16 +1,12 @@
 
-pwd = File.dirname __FILE__
-
-require File.join(pwd, 'misc')
-require File.join(pwd, 'chain')
+require 'puzzle_generator/misc'
+require 'puzzle_generator/chain'
+require 'ludy/array/body'
 
 require 'rubygems'
-
-gem 'ludy', '>=0.0.7'   # for Array#untranspose
-require 'ludy/ludy_ext'
-
-gem 'facets', '>=2.0.0' # for lots of things
-require 'facets'        # for Array#combos
+gem 'facets', '>=2.0.0'
+require 'facets/enumerable/combos'
+require 'facets/enumerable/uniq_by'
 require 'facets/random' # for Kernel#maybe
 
 # a = [[1,2],[3,4],[5,6]]
@@ -19,7 +15,7 @@ require 'facets/random' # for Kernel#maybe
 
 module PuzzleGenerator
 
-  class Map
+  class Map # :nodoc:
     include DisplayMap, Enumerable
     attr_reader :chains
     def result_map; @data; end
@@ -48,7 +44,7 @@ module PuzzleGenerator
     def each_column; @data.each{ |column| yield column }; end
     def clone_with_map
       Map.new @option.merge(
-        :data => @data.transpose.map{ |row| row.map{ |i| yield i } }.untranspose,
+        :data => @data.transpose.map{ |row| row.map{ |i| yield i } }.transpose,
         :chains => chains
       )
     end

data/lib/puzzle_generator/misc.rb

@@ -1,26 +1,27 @@
 
 require 'rubygems'
-require 'facets'          # for Array#deep_clone
-# require 'ludy/ludy_ext' # for Kernel#curry
+require 'facets/kernel/deep_clone'
+require 'facets/array/pad'
 
 module PuzzleGenerator
   Up, Right, Left = (0..2).to_a
   DefaultOption = {:width => 6, :height => 10, :level => 4, :colors => 4,
                    :invoke => 3, :invoke_max => 5, :timeout => 5}
+  # whenever the generation is falied, this exception would raise
   class GenerationFailed < RuntimeError; end
   class << self
     attr_writer :debug
     def debug; @debug || false; end
   end
 
-  module DisplayMap
+  module DisplayMap # :nodoc:
     attr_reader :result_map
     def display_map
       result_map.transpose.reverse_each{ |row| puts row.map{ |color| '%2d' % color }.join(' ') }
     end
   end
 
-  module MapUtils
+  module MapUtils # :nodoc:
     def make_map_array; (Array.new(@option[:width])).map{ [0]*@option[:height] }; end
     def resolve_map result_map = @result_map, maps = @maps
       result_map.replace maps.inject(make_map_array){ |result, map|

data/lib/puzzle_generator/puzzle.rb

@@ -1,10 +1,10 @@
 
-require File.join(File.dirname(__FILE__), 'misc')
-require File.join(File.dirname(__FILE__), 'chained_map')
-require File.join(File.dirname(__FILE__), 'colored_map')
+require 'puzzle_generator/misc'
+require 'puzzle_generator/chained_map'
+require 'puzzle_generator/colored_map'
 
 require 'rubygems'
-require 'facets'       # for Array#rotate
+require 'facets/array/rotate'
 require 'facets/timer'
 
 module PuzzleGenerator

data/lib/puzzle_generator.rb

@@ -1,10 +1,10 @@
 
 # alpha at 2007.10.14
 
-require File.join(File.dirname(__FILE__), 'puzzle_generator', 'puzzle')
+require 'puzzle_generator/puzzle'
 
 require 'rubygems'
-require 'facets'   # for Hash#reverse_merge
+require 'facets/hash/reverse_merge'
 require 'facets/timer'
 
 module PuzzleGenerator

data/spec/ludy_spec.rb

@@ -0,0 +1,22 @@
+
+# bowling.rb
+class Bowling
+  def hit(pins)
+  end
+
+  def score
+    0
+  end
+end
+
+# bowling_spec.rb
+describe Bowling do
+  before(:each) do
+    @bowling = Bowling.new
+  end
+
+  it "should score 0 for gutter game" do
+    20.times { @bowling.hit(0) }
+    @bowling.score.should == 0
+  end
+end

data/tasks/annotations.rake

@@ -0,0 +1,30 @@
+# $Id$
+
+if HAVE_BONES
+
+desc "Enumerate all annotations"
+task :notes do
+  Bones::AnnotationExtractor.enumerate(
+      PROJ, "OPTIMIZE|FIXME|TODO", :tag => true)
+end
+
+namespace :notes do
+  desc "Enumerate all OPTIMIZE annotations"
+  task :optimize do
+    Bones::AnnotationExtractor.enumerate(PROJ, "OPTIMIZE")
+  end
+
+  desc "Enumerate all FIXME annotations"
+  task :fixme do
+    Bones::AnnotationExtractor.enumerate(PROJ, "FIXME")
+  end
+
+  desc "Enumerate all TODO annotations"
+  task :todo do
+    Bones::AnnotationExtractor.enumerate(PROJ, "TODO")
+  end
+end
+
+end  # if HAVE_BONES
+
+# EOF

data/tasks/doc.rake

@@ -0,0 +1,50 @@
+# $Id$
+
+require 'rake/rdoctask'
+
+namespace :doc do
+
+  desc 'Generate RDoc documentation'
+  Rake::RDocTask.new do |rd|
+    rd.main = PROJ.rdoc_main
+    rd.options << '-d' if !WIN32 and `which dot` =~ %r/\/dot/
+    rd.rdoc_dir = PROJ.rdoc_dir
+
+    incl = Regexp.new(PROJ.rdoc_include.join('|'))
+    excl = Regexp.new(PROJ.rdoc_exclude.join('|'))
+    files = PROJ.files.find_all do |fn|
+              case fn
+              when excl; false
+              when incl; true
+              else false end
+            end
+    rd.rdoc_files.push(*files)
+
+    title = "#{PROJ.name}-#{PROJ.version} Documentation"
+    title = "#{PROJ.rubyforge_name}'s " + title if PROJ.rubyforge_name != title
+
+    rd.options << "-t #{title}"
+    rd.options << '--charset=utf-8' << '--inline-source' << '--line-numbers'
+  end
+
+  desc 'Generate ri locally for testing'
+  task :ri => :clobber_ri do
+    sh "#{RDOC} --ri -o ri ."
+  end
+
+  desc 'Remove ri products'
+  task :clobber_ri do
+    rm_r 'ri' rescue nil
+  end
+
+end  # namespace :doc
+
+desc 'Alias to doc:rdoc'
+task :doc => 'doc:rdoc'
+
+desc 'Remove all build products'
+task :clobber => %w(doc:clobber_rdoc doc:clobber_ri)
+
+remove_desc_for_task %w(doc:clobber_rdoc doc:clobber_ri)
+
+# EOF