zombify 0.1.0

data/Manifest

@@ -0,0 +1,5 @@
+Manifest
+README.rdoc
+Rakefile
+lib/rand.rb
+lib/zombify.rb

data/Rakefile

@@ -0,0 +1,14 @@
+require 'rubygems'
+require 'rake'
+require 'echoe'
+
+Echoe.new('zombify', '0.1.0') do |p|
+  p.description    = "Zombifies strings in your application."
+  p.url            = "http://github.com/romaind/zombify"
+  p.author         = "Studio Melipone"
+  p.email          = "contact@studiomelipone.eu"
+  p.ignore_pattern = ["tmp/*", "script/*"]
+  p.development_dependencies = []
+end
+
+Dir["#{File.dirname(__FILE__)}/tasks/*.rake"].sort.each { |ext| load ext }

data/lib/rand.rb

@@ -0,0 +1,412 @@
+#
+# = rand.rb -- library for picking random elements and shuffling
+#
+# Copyright (C) 2004  Ilmari Heikkinen <mailto:kig@misfiring.net>
+#
+# Documentation:: Christian Neukirchen <mailto:chneukirchen@gmail.com>
+# 
+
+
+module Enumerable
+  # Choose and return a random element of the Enumerable.
+  #   [1, 2, 3, 4].pick  #=> 2 (or 1, 3, 4)
+  def pick
+    entries.pick
+  end
+
+  # Return an array of the elements in random order.
+  #   [1, 2, 3, 4].shuffle  #=> [3, 4, 1, 2]
+  def shuffle
+    entries.shuffle
+  end
+
+  # Calls _block_ once for each element in _self_ in random order,
+  # passing that element as a parameter.
+  def each_random(&block)
+    shuffle.each(&block)
+  end
+
+  # Invokes _block_ once for each element of _self_ in random order.
+  # Creates a new array containing the values returned by the block.
+  def map_random(&block)
+    shuffle.map(&block)
+  end
+end
+
+
+class Array
+  # Choose and return a random element of _self_.
+  #   [1, 2, 3, 4].pick  #=> 2 (or 1, 3, 4)
+  def pick
+    self[pick_index]
+  end
+
+  # Deletes a random element of _self_, returning that element.
+  #   a = [1, 2, 3, 4]
+  #   a.pick  #=> 2
+  #   a       #=> [1, 3, 4]
+  def pick!
+    i = pick_index
+    rv = self[i]
+    delete_at(i)
+    rv
+  end
+
+  # Return the index of an random element of _self_.
+  #   ["foo", "bar", "baz"].pick_index  #=> 1 (or 0, or 2)
+  def pick_index
+    Kernel.rand(size)
+  end
+
+  # Destructive pick_index.  Delete a random element of _self_ and
+  # return its index.
+  #   a = [11, 22, 33, 44]
+  #   a.pick_index!  #=> 2
+  #   a              #=> [11, 22, 44]
+  def pick_index!
+    i = pick_index
+    delete_at i
+    i
+  end
+
+  # Return an array of the elements in random order.
+  #   [11, 22, 33, 44].shuffle  #=> [33, 11, 44, 22]
+  def shuffle
+    sort_by{rand}
+  end
+
+  # Destructive shuffle.  Arrange the elements of _self_ in new order.
+  #   a = [11, 22, 33, 44]
+  #   a.shuffle!
+  #   a                      #=> [33, 11, 44, 22]
+  def shuffle!
+    sort!{rand <=> 0.5}
+  end
+end
+
+
+class Hash
+  # Choose and return a random key-value pair of _self_.
+  #   {:one => 1, :two => 2, :three => 3}.pick  #=> [:one, 1]
+  def pick
+    k = keys.pick
+    [k, self[k]]
+  end
+
+  # Deletes a random key-value pair of _self_, returning that pair.
+  #   a = {:one => 1, :two => 2, :three => 3}
+  #   a.pick  #=> [:two, 2]
+  #   a       #=> {:one => 1, :three => 3}
+  def pick!
+    rv = pick
+    delete rv.first
+    rv
+  end
+
+  # Return a random key of _self_.
+  #   {:one => 1, :two => 2, :three => 3}.pick_key  #=> :three
+  def pick_key
+    keys.pick
+  end
+
+  # Return a random value of _self_.
+  #   {:one => 1, :two => 2, :three => 3}.pick_value  #=> 3
+  def pick_value
+    values.pick
+  end
+
+  # Delete a random key-value pair of _self_ and return the key.
+  #   a = {:one => 1, :two => 2, :three => 3}
+  #   a.pick_key!  #=> :two
+  #   a       #=> {:one => 1, :three => 3}
+  def pick_key!
+    pick!.first
+  end
+
+  # Delete a random key-value pair of _self_ and return the value.
+  #   a = {:one => 1, :two => 2, :three => 3}
+  #   a.pick_value!  #=> 2
+  #   a       #=> {:one => 1, :three => 3}
+  def pick_value!
+    pick!.last
+  end
+
+  # Return the key-value pairs of _self_ with _keys_ and _values_
+  # shuffled independedly.
+  #   {:one => 1, :two => 2, :three => 3}.shuffle_hash_pairs
+  #      #=> [[:one, 3], [:two, 1], [:three, 2]]
+  def shuffle_hash_pairs
+    keys.shuffle.zip(values.shuffle)
+  end
+
+  # Return a copy of _self_ with _values_ arranged in random order.
+  #   {:one => 1, :two => 2, :three => 3}.shuffle_hash
+  #      #=> {:two=>2, :three=>1, :one=>3}
+  def shuffle_hash
+    shuffled = {}
+    shuffle_hash_pairs.each{|k, v|
+      shuffled[k] = v
+    }
+    shuffled
+  end
+
+  # Destructive shuffle_hash.  Arrange the values of _self_ in
+  # new, random order.
+  #   h = {:one => 1, :two => 2, :three => 3}
+  #   h.shuffle_hash!
+  #   h  #=> {:two=>2, :three=>1, :one=>3}
+  def shuffle_hash!
+    shuffle_hash_pairs.each{|k, v|
+      self[k] = v
+    }
+    self
+  end
+end
+
+
+class String
+  # Return the string with characters arranged in random order.
+  #   "Ruby rules".shuffle_chars  #=> "e lybRsuur"
+  def shuffle_chars
+    split(//).shuffle.join('')
+  end
+
+  # Destructive shuffle_chars.  Arrange the characters of the string
+  # in new, random order.
+  #   s = "Ruby rules".shuffle_chars
+  #   s.shuffle_chars!
+  #   s    #=> "e lybRsuur"
+  def shuffle_chars!
+    self[0,size] = shuffle_chars
+  end
+
+  # Return a random byte of _self_.
+  #   "Ruby rules".pick_byte  #=> 121
+  def pick_byte
+    self[pick_index]
+  end
+
+  # Return a single-character string of a random character in _self_.
+  #   "Ruby rules".pick_char  #=> "y"
+  def pick_char
+    pick_byte.chr
+  end
+
+  # Destructive pick_char.  Delete a random character of the string
+  # and return it as a single-character string.
+  #   s = "Ruby rules"
+  #   s.pick_char!  #=> "y"
+  #   s             #=> "Rub rules"
+  def pick_char!
+    i = pick_index
+    rv = self[i,1]
+    self[i,1] = ""
+    rv
+  end
+
+  # Destructive pick_byte.  Delete a random byte of _self_ and return it.
+  #   s = "Ruby rules"
+  #   s.pick_byte!  #=> 121
+  #   s             #=> "Rub rules"
+  def pick_byte!
+    pick_char![0]
+  end
+
+  # Return a random byte index of _self_.
+  #   "Ruby rules".pick_index  #=> 3
+  def pick_index
+    rand(size)
+  end
+
+  # Destructive pick_index.  Delete a random byte of _self_ and
+  # return it's index.
+  #   s = "Ruby rules"
+  #   s.pick_index  #=> 3
+  #   s             #=> "Rub rules"
+  def pick_index!
+    i = pick_index
+    self[i,1] = ""
+    i
+  end
+end
+
+
+if __FILE__ == $0
+
+require 'test/unit'
+
+module RandTestHelpers          # :nodoc:
+  def picker(enum, enum_check, method, n=50)
+    (1..n).all?{ enum_check.include? enum.send(method) }
+  end
+
+  def try_shuffling(enum, enum_c, method)
+    rv = nil
+    10.times{
+     rv = enum.send method
+     break if rv != enum_c
+    }
+    rv
+  end
+end
+
+
+class RandArrayTest < Test::Unit::TestCase  # :nodoc:
+  include RandTestHelpers
+
+  def ar
+    (0..99).to_a
+  end
+
+  def test_pick
+    a = ar
+    results = (0...a.size).map{ a.pick }
+    assert true, results.all? {|r| a.include? r }
+  end
+
+  def test_pick!
+    a = ar
+    results = (0...a.size).map{ a.pick! }
+    assert true, results.sort == (0..99).to_a and a.empty?
+  end
+
+  def test_pick_index
+    a = ar
+    results = (0...a.size).map{ a.pick_index }
+    assert true, results.all? {|r| r.between?(0, a.size-1) }
+  end
+
+  def test_pick_index!
+    a = ar
+    # side-effect-relying block; a.size = a.size-1 after pick_index!,
+    # so the picked index max value is the new a.size
+    assert true, (0...a.size).all?{ a.pick_index!.between?(0, a.size) } and a.empty?
+  end
+
+  def test_shuffle
+    a = ar
+    shuffled = try_shuffling(a, a, :shuffle)
+    assert true, shuffled.sort == a and shuffled != a
+  end
+
+  def test_shuffle!
+    a = ar
+    try_shuffling(a, ar, :shuffle!)
+    assert true, a != ar and a.sort == ar
+  end
+end
+
+
+class RandHashTest < Test::Unit::TestCase  # :nodoc:
+  include RandTestHelpers
+
+  def ha
+    Hash[*(1..100).to_a]
+  end
+
+  def test_pick
+    assert true, picker(ha, ha.entries, :pick)
+  end
+
+  def test_pick!
+    h = ha
+    assert true, picker(h, ha.entries, :pick!) and h.empty? 
+  end
+
+  def test_pick_key
+    assert true, picker(ha, ha.keys, :pick_key)
+  end
+
+  def test_pick_key!
+    h = ha
+    assert true, picker(h, ha.keys, :pick_key!) and h.empty?
+  end
+
+  def test_pick_value
+    assert true, picker(ha, ha.values, :pick_value)
+  end
+
+  def test_pick_value!
+    h = ha
+    assert true, picker(h, ha.values, :pick_value!) and h.empty?
+  end
+
+  def test_shuffle_hash
+    h = ha
+    hs = try_shuffling(ha, h, :shuffle_hash)
+    assert true, hs != h and (hs.keys + hs.values).sort == (h.keys + h.values).sort
+  end
+
+  def test_shuffle_hash!
+    h = ha
+    hs = ha
+    try_shuffling(hs, h, :shuffle_hash!)
+    assert true, hs != h and (hs.keys + hs.values).sort == (h.keys + h.values).sort
+  end
+
+  def test_shuffle
+    h = ha
+    hs = try_shuffling(ha, h, :shuffle)
+    assert true, hs != h and hs.entries.sort == h.entries.sort
+  end
+end
+
+
+class RandStringTest < Test::Unit::TestCase  # :nodoc:
+  include RandTestHelpers
+
+  def self.pick_tests(endings)
+    endings.each{|ending, compare_str_f|
+      define_method("test_pick#{ending}"){
+        s = str
+        assert true, picker(s, instance_eval(&compare_str_f), "pick#{ending}", s.size)
+      }
+    }
+  end
+
+  def self.pick_tests!(endings)
+    endings.each{|ending, compare_str_f|
+      define_method("test_pick#{ending}!"){
+        s = str
+        assert true, picker(s, instance_eval(&compare_str_f), "pick#{ending}!", s.size) and s.empty?
+      }
+    }
+  end
+
+  def str
+    (("a".."z").to_s + "\n") * 10
+  end
+
+  def test_shuffle
+    s = str
+    ss = try_shuffling(s, s.to_a, :shuffle)
+    assert true, ss != s.to_a and ss.sort == s.to_a.sort
+  end
+
+  def test_shuffle_chars
+    s = str
+    ss = try_shuffling(s, s.split(//), :shuffle_chars)
+    assert true, ss != s and ss.split(//).sort == s.split(//).sort
+  end
+
+  def test_shuffle_chars!
+    s = str
+    ss = str
+    try_shuffling(ss, s.split(//), :shuffle_chars!)
+    assert true, ss != s and ss.split(//).sort == s.split(//).sort
+  end
+
+  pick_tests({ ""      => lambda{str.to_a}, 
+               :_char  => lambda{str.split(//)}, 
+               :_byte  => lambda{str.split(//).map{|c| c[0]}}, 
+               :_index => lambda{(0...str.size).to_a}
+             })
+
+  pick_tests!({ :_char  => lambda{str.split(//)}, 
+                :_byte  => lambda{str.split(//).map{|c| c[0]}}, 
+                :_index => lambda{(0...str.size).to_a}
+              })
+end
+
+
+end #if

data/lib/zombify.rb

@@ -0,0 +1,102 @@
+# module Zombify
+#   def self.included(base)
+#     base.extend 
+#   end
+#   
+#   module String
+#     def zombify(*args, &block)
+#       
+#       
+#       
+#     end
+#   end
+#   
+#   module Zombify
+#     
+#   end
+# end
+# 
+# class ActiveRecord::Base
+#   include Zombify
+# end
+
+require "rand.rb"
+
+module Zombify
+  def self.vocabulary
+    [
+      { :word => "braiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiin", :real? => true },
+      { :word => "eaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaat", :real? => true },
+      { :word => "AahfaheuahAgAkajafaaaghahehbgrahaaaeuuuha", :real? => false },
+      { :word => "auhueeeeeaaaAAeeuhahhggakaaa", :real? => false },
+      { :word => "rrsshhchhhaaaaachshhh", :real? => false },
+      { :word => "hhhhhhhheeaaaaahhaaschhhh", :real? => false }
+    ]
+  end
+
+  def self.talk(word_count = 30, min_length = 2, max_length = 13)
+    content = ""
+
+    word_count.times do
+      letter_count = (min_length == max_length) ? min_length : (Kernel.rand(max_length) % (max_length - min_length)) + min_length
+      word = Zombify::vocabulary.pick
+
+      if word[:real?]
+        
+        content += word[:word][0,letter_count-1] + word[:word][-1,1] + " "
+      else
+        begin_letter = Kernel.rand(word[:word].size - letter_count)
+
+        content += word[:word][begin_letter, letter_count] + " "
+      end
+    end
+
+    content.strip
+  end
+  
+  def self.undeadize(word, percent_change_letter = 50)
+    number_letter_change = word.size * percent_change_letter / 100
+    STDERR.puts number_letter_change
+    
+    content = word.dup
+    
+    number_letter_change.times do
+      index = Kernel.rand(content.size)
+      a = Zombify::alphabet.pick
+      STDERR.puts "##{content}: #{index} -> #{a}"
+      
+      content[index] = a
+    end
+    
+    content
+  end
+  
+  def self.alphabet
+    %w(a e h u g k s r A E H U G K S R)
+  end
+
+  module  String
+
+    module ZombifyHelper
+
+      def zombify(real_word = 40)
+        content = self.dup
+        
+        self.scan(/\w+/) do |word|
+          if Kernel.rand(100) < real_word
+            m = Zombify::undeadize(word)
+            STDERR.puts m
+            content.gsub!(word, m)
+          else
+            content.gsub!(word, Zombify::talk(1, word.length, word.length))
+          end
+        end
+        content
+      end
+    end
+  end
+end
+
+class String
+  include Zombify::String::ZombifyHelper
+end

data/zombify.gemspec

@@ -0,0 +1,30 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{zombify}
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 1.2") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Studio Melipone"]
+  s.date = %q{2009-11-13}
+  s.description = %q{Zombifies strings in your application.}
+  s.email = %q{contact@studiomelipone.eu}
+  s.extra_rdoc_files = ["README.rdoc", "lib/rand.rb", "lib/zombify.rb"]
+  s.files = ["Manifest", "README.rdoc", "Rakefile", "lib/rand.rb", "lib/zombify.rb", "zombify.gemspec"]
+  s.homepage = %q{http://github.com/romaind/zombify}
+  s.rdoc_options = ["--line-numbers", "--inline-source", "--title", "Zombify", "--main", "README.rdoc"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{zombify}
+  s.rubygems_version = %q{1.3.4}
+  s.summary = %q{Zombifies strings in your application.}
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end

metadata

@@ -0,0 +1,67 @@
+--- !ruby/object:Gem::Specification 
+name: zombify
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Studio Melipone
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-11-13 00:00:00 +01:00
+default_executable: 
+dependencies: []
+
+description: Zombifies strings in your application.
+email: contact@studiomelipone.eu
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.rdoc
+- lib/rand.rb
+- lib/zombify.rb
+files: 
+- Manifest
+- README.rdoc
+- Rakefile
+- lib/rand.rb
+- lib/zombify.rb
+- zombify.gemspec
+has_rdoc: true
+homepage: http://github.com/romaind/zombify
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Zombify
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "1.2"
+  version: 
+requirements: []
+
+rubyforge_project: zombify
+rubygems_version: 1.3.4
+signing_key: 
+specification_version: 3
+summary: Zombifies strings in your application.
+test_files: []
+