Klunking together gem stuff

Author: Edward Ocampo-Gooding

.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

.gitignore

@@ -0,0 +1,5 @@
+*.sw?
+.DS_Store
+coverage
+rdoc
+pkg

LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Edward Ocampo-Gooding
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

README.rdoc

@@ -0,0 +1,9 @@
+= auto-emo
+
+Sometimes, you just need a whole lot of generated emo poetry.
+
+Poems were filched from across the web. No more than a single line from each appears in any generated stanza. So, the marshalled poems are definitely not copyrighted by me, but everything else is.
+
+== Copyright
+
+Copyright (c) 2009 Edward Ocampo-Gooding. See LICENSE for details.

Rakefile

@@ -0,0 +1,56 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "auto-emo"
+    gem.summary = %Q{Sometimes, you just need a whole lot of generated emo poetry}
+    gem.email = "[email protected]"
+    gem.homepage = "http://github.com/edward/auto-emo"
+    gem.authors = ["Edward Ocampo-Gooding"]
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION.yml')
+    config = YAML.load(File.read('VERSION.yml'))
+    version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "auto-emo #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+

lib/auto-emo.rb

@@ -0,0 +1,69 @@
+#!/usr/bin/env ruby
+#
+#  Created by Edward Ocampo-Gooding on 2007-01-31.
+
+require "rubygems"
+require "progressbar"
+
+# It would be really cool to have UTF8 working
+# require 'jcode'
+# $KCODE = 'UTF8'
+
+# Returns a poem
+def poetry_churn(poems)
+  length = 4 + rand(7)
+  lines = []
+
+  length.times do
+    lines << poems[rand(poems.size)]
+  end
+  
+  lines.join("\n")
+end
+
+poems = []
+
+File.open("marshalled_poems") do |f|
+  poems = Marshal.load(f)
+end
+
+if poems.empty?
+  poem_file = File.open("poems.txt")
+  poems_size = `wc poems.txt`.scan(/\w+/).first.to_i
+  pbar = ProgressBar.new("PoemGrinding", poems_size)
+  poem_file.each do |line|
+    poems << line
+    pbar.inc
+  end
+end
+
+File.open("marshalled_poems", 'w') do |f|
+  Marshal.dump(poems, f)
+end
+
+cleaned_poems = []
+
+poems.each do |line|
+  l = line.gsub(/<.*>/, ' ').gsub('&nbsp;', ' ').gsub("&quot;", '’')
+  l = l.gsub("í", "'").gsub("Ö", '').squeeze(" ").strip
+  next if l.size > 80
+  next if l.size < 3
+  next if l == "End of Poem"
+  next if l =~ /^Author:/
+  next if l =~ /^Title:/
+  cleaned_poems << l
+end
+
+puts "\nBooyeah! Let's make some poetry!"
+
+pbar = ProgressBar.new("PoemGrinding", 500)
+
+File.open("emo-poetry.txt", "w+") do |f|
+  500.times do
+    f << poetry_churn(cleaned_poems)
+    f << "\n\n"
+    pbar.inc
+  end
+end
+
+`open emo-poetry.txt`