memetron 0.1.1

data/.rspec

@@ -0,0 +1 @@
+--colour

data/.travis.yml

@@ -0,0 +1,8 @@
+rvm:
+  - 1.9.2
+  - 1.9.3
+  - ruby-head
+  - rbx-19mode
+
+env:
+   - JRUBY_OPTS="--1.9"

data/Gemfile

@@ -0,0 +1,8 @@
+source "https://rubygems.org"
+
+gemspec
+
+group :test do
+  gem 'rake'
+  gem 'rspec'
+end

data/Gemfile.lock

@@ -0,0 +1,26 @@
+PATH
+  remote: .
+  specs:
+    memetron (0.1.1)
+
+GEM
+  remote: https://rubygems.org/
+  specs:
+    diff-lcs (1.1.3)
+    rake (0.9.2.2)
+    rspec (2.8.0)
+      rspec-core (~> 2.8.0)
+      rspec-expectations (~> 2.8.0)
+      rspec-mocks (~> 2.8.0)
+    rspec-core (2.8.0)
+    rspec-expectations (2.8.0)
+      diff-lcs (~> 1.1.2)
+    rspec-mocks (2.8.0)
+
+PLATFORMS
+  ruby
+
+DEPENDENCIES
+  memetron!
+  rake
+  rspec

data/README.md

@@ -0,0 +1,23 @@
+# Memetron 5000
+
+Recognize common internet memes using regular expressions.
+
+[![Build Status](https://secure.travis-ci.org/LTe/memetron.png)](http://travis-ci.org/LTe/memetron) [![Dependency Status](https://gemnasium.com/LTe/memetron.png)](https://gemnasium.com/LTe/memetron)
+
+## How
+
+```ruby
+require 'lib/memetron'
+
+matcher = Memetron::Matcher.new
+
+matcher.match("North Korea is Best Korea") #=> :is_best
+
+matcher.parse("Wrote a Ruby library, better drink my own piss") #=> ["Wrote a Ruby library,"]
+
+matcher.match_and_parse("I can has meme parsed?") #=> [:i_can_haz, ["meme parsed?"]]
+```
+
+## Why?
+
+For the lulz.

data/Rakefile

@@ -0,0 +1,10 @@
+require "bundler/gem_tasks"
+
+require 'rspec/core'
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new(:spec) do |spec|
+  spec.rspec_opts = ['-fd -c']
+  spec.pattern = FileList['spec/**/*_spec.rb']
+end
+
+task :default => :spec

data/lib/memetron.rb

@@ -0,0 +1 @@
+require 'memetron/matcher'

data/lib/memetron/matcher.rb

@@ -0,0 +1,37 @@
+require File.join(File.dirname(__FILE__), 'memes')
+
+module Memetron
+  class Matcher
+    # Attempt to identify the meme in a string.
+    def match(string)
+      first_match = MEMES.detect { |meme, regexp| string =~ regexp }
+      if first_match.nil?
+        nil
+      else
+        meme_name(first_match)
+      end
+    end
+
+    # Return variable regions of meme
+    def parse(meme, string)
+      MEMES[meme].match(string).to_a[1..-1]
+    end
+
+    # Match and parse a meme
+    #=> [:meme_name, ['parsed', 'meme', 'bits']]
+    def match_and_parse(string)
+      meme = match(string)
+      if meme.nil?
+        return meme
+      end
+      bits = parse(meme, string)
+      [meme, bits]
+    end
+
+    private
+
+    def meme_name(meme_pair)
+      meme_pair[0]
+    end
+  end
+end

data/lib/memetron/memes.rb

@@ -0,0 +1,46 @@
+module Memetron
+  MEMES = {
+    # "a wild ruby library appears"
+    :pokemon => /a wild (.+) appears/i,
+
+    # "I don't always write regexp but when I do they break"
+    :dos_equis => /I don'?t always (.+) but when I do (.+)/i,
+
+    # "North Korea is best Korea"
+    :is_best => /(\w+\b) (\w+\b) is best (\w+\b)/i,
+
+    # Yo dawg I heard you like regexp so I put a regexp in your regexp so you can blah
+    :yo_dawg => /yo dawg I hea?rd you like (.+) so I put a (.+) in your (.+) so you can (.+) while you (.+)/i,
+
+    # cant tell if this project is going to go anywhere or just end up on the bottom of my github profile
+    # not sure if blah or blah
+    :fry => /(can'?t tell|not sure) if (.+) or (.+)/i,
+
+    # lets take all the memes and put them over here
+    :patrick => /let'?s take all the (.+) and put them over here/i,
+
+    # "soon" or "soon." or "soon..."
+    :soon => /^soon(\.|\.{3})?$/i,
+
+    # Y U NO DO THIS?
+    :y_u_no? => /(.*)Y U NO (.+)\?/i,
+
+    # Hipster Kitty
+    :hipster_kitty => /I liked (.*) before (.*)/i,
+
+    # Bear Grylls
+    :bear_grylls => /(.*) better drink my own piss/i,
+
+    # I can haz cheeseburger
+    :i_can_haz => /I can ha[zs] (.*)/i,
+
+    # Jimmy McMillan is too damn high!
+    :jimmy_mcmillan => /(.*) is too damn high!/i,
+    
+    # I find your lack of tests disturbing
+    :darth_vader => /I find your lack of (.*) disturbing/i,
+    
+    # Prepare yourself, the procedurally generated memes are coming
+    :sean_bean => /Prepare yourself,? the (.*) are coming/i,
+  }
+end

data/lib/memetron/version.rb

@@ -0,0 +1,3 @@
+module Memetron
+  VERSION = "0.1.1"
+end

data/memetron.gemspec

@@ -0,0 +1,20 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require 'memetron/version'
+
+Gem::Specification.new do |s|
+  s.name        = "memetron"
+  s.version     = Memetron::VERSION
+  s.authors     = ["Piotr Niełacny"]
+  s.email       = ["piotr.nielacny@gmail.com"]
+  s.homepage    = ""
+  s.summary     = %q{Recognize common internet memes using regular expressions}
+  s.description = %q{Recognize common internet memes using regular expressions}
+
+  s.rubyforge_project = "memetron"
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+end

data/spec/memetron/matcher_spec.rb

@@ -0,0 +1,207 @@
+require 'spec_helper'
+
+describe Memetron::Matcher, "#match" do
+  it "returns nil if no match was found" do
+    subject.match("blerg blerg blerg").should be_nil
+  end
+
+  it "can match and parse a meme" do
+    subject.match_and_parse("a wild charizard appears").should == [:pokemon, ['charizard']]
+  end
+
+  it "returns nil if no match was found" do
+    subject.match_and_parse('blerg blerg blerg').should be_nil
+  end
+
+  it "when multiple memes are present, the first match in memes.rb will be used. if this test fails it's because the order of memes changed." do
+    subject.match_and_parse('not sure if i can haz cheeseburger or better drink my own piss?').should == [:fry, ["not sure", "i can haz cheeseburger", "better drink my own piss?"]]
+  end
+
+  context "Pokemon" do
+    it "is detected" do
+      subject.match("a wild charizard appears").should == :pokemon
+    end
+
+    it "requires a subject" do
+      subject.match("a wild  appears").should be_nil
+    end
+
+    it "is parsed" do
+      subject.parse(:pokemon, "a wild charizard appears").should == ['charizard']
+    end
+  end
+
+  context "Dos Equis" do
+    it "is detected" do
+      subject.match("I don't always go crazy but when i do i go all the way").should == :dos_equis
+    end
+
+    it "is detected despite poor grammar" do
+      subject.match("I dont always go crazy but when I do I go all the way").should == :dos_equis
+    end
+
+    it "is parsed" do
+      subject.parse(:dos_equis, "I don't always x but when I do y").should == ['x', 'y']
+    end
+  end
+
+  context "Is best" do
+    it "is detected" do
+      subject.match("north korea is best korea").should == :is_best
+    end
+
+    it "is parsed" do
+      subject.parse(:is_best, "north korea is best korea").should == ["north", "korea", "korea"]
+    end
+  end
+
+  context "Yo dawg" do
+    it "is detected" do
+      subject.match("yo dawg i heard you like stereos so i put a stereo in your car so you can listen while you listen").should == :yo_dawg
+    end
+
+    it "is detected despite poor grammar" do
+      subject.match("yo dawg i herd you like stereos so i put a stereo in your car so you can listen while you listen").should == :yo_dawg
+    end
+
+    it "is parsed" do
+      subject.parse(:yo_dawg, "yo dawg i heard you like stereos so i put a stereo in your car so you can listen while you listen").should == ['stereos', 'stereo', 'car', 'listen', 'listen']
+    end
+  end
+
+  context "Fry" do
+    it %q(is detected with "Can't tell") do
+      subject.match("can't tell if joking or not").should == :fry
+    end
+
+    it 'is detected with "Not sure"' do
+      subject.match("not sure if joking or not").should == :fry
+    end
+
+    it "is parsed" do
+      subject.parse(:fry, "cant tell if joking or not").should == ['cant tell', 'joking', 'not']
+    end
+  end
+
+  context "Patrick" do
+    it "is detected" do
+      subject.match("let's take all the languages and put them over here").should == :patrick
+    end
+
+    it "is detected despite poor grammar" do
+      subject.match("lets take all the languages and put them over here").should == :patrick
+    end
+
+    it "is parsed" do
+      subject.parse(:patrick, "let's take all the languages and put them over here").should == ['languages']
+    end
+  end
+
+  context "SOON" do
+    it "is detected when it's by itself" do
+      subject.match("SOON").should == :soon
+    end
+
+    it "is case-insensitive" do
+      subject.match("soon").should == :soon
+    end
+
+    it "is detected when it's a sentence" do
+      subject.match("SOON.").should == :soon
+    end
+
+    it "is detected with an ellipsis" do
+      subject.match("SOON...").should == :soon
+    end
+
+    it "is parsed" do
+      subject.parse(:soon, "SOON...").should == ['...']
+    end
+  end
+
+  context "Y U NO" do
+    it "is detected when it begins the sentence" do
+      subject.match("Y U NO DO THIS?").should == :y_u_no?
+    end
+
+    it "is detected when it does not begin the sentence" do
+      subject.match("PROGRAMMERS, Y U NO DO THIS?").should == :y_u_no?
+    end
+
+    it "requires a question mark" do
+      subject.match("PROGRAMMERS, Y U NO DO THIS").should be_nil
+    end
+
+    it "is parsed" do
+      subject.parse(:y_u_no?, "Y U NO DO THIS?").should == ['', 'DO THIS']
+    end
+  end
+
+  context "Hipster Kitty" do
+    it "is detected" do
+      subject.match("I liked Ruby before Matz was born").should == :hipster_kitty
+    end
+
+    it "is parsed" do
+      subject.parse(:hipster_kitty, "I liked Ruby before Matz was born").should == ['Ruby', 'Matz was born']
+    end
+  end
+
+  context "Bear Grylls" do
+    it "is detected" do
+      subject.match("Write a Ruby library. Better drink my own piss").should == :bear_grylls
+    end
+
+    it "is parsed" do
+      subject.parse(:bear_grylls, "Write a Ruby library. Better drink my own piss").should == ["Write a Ruby library."]
+    end
+  end
+
+  context "I can haz" do
+    it "is detected" do
+      subject.match("I can haz Ruby library?").should == :i_can_haz
+    end
+
+    it "should work with either has or haz" do
+      subject.match("I can has Ruby library?").should == :i_can_haz
+    end
+
+    it "is parsed" do
+      subject.parse(:i_can_haz, "I can haz Ruby library?").should == ['Ruby library?']
+    end
+  end
+  
+  context "Jimmy McMillan" do
+    it "is detected" do
+      subject.match("The level of information is too damn high!").should == :jimmy_mcmillan
+    end
+    
+    it "should only match when an exclamation mark is present" do
+      subject.match("The level of information is too damn high").should be_nil
+    end
+    
+    it "is parsed" do
+      subject.parse(:jimmy_mcmillan, "The level of information is too damn high!").should == ["The level of information"]
+    end
+  end
+  
+  context "Darth Vader" do
+    it "is detected" do
+      subject.match("I find your lack of tests disturbing").should == :darth_vader
+    end
+    
+    it "is parsed" do
+      subject.parse(:darth_vader, "I find your lack of tests disturbing").should == ["tests"]
+    end
+  end
+  
+  context "Sean Bean" do
+    it "is matched" do
+      subject.match("Prepare yourself, the memes are coming").should == :sean_bean
+    end
+    
+    it "is parsed" do
+      subject.parse(:sean_bean, "Prepare yourself, the memes are coming").should == ["memes"]
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -0,0 +1,4 @@
+$LOAD_PATH << File.join(File.dirname(__FILE__), "lib")
+
+require 'rspec'
+require 'memetron'

metadata

@@ -0,0 +1,60 @@
+--- !ruby/object:Gem::Specification
+name: memetron
+version: !ruby/object:Gem::Version
+  version: 0.1.1
+  prerelease: 
+platform: ruby
+authors:
+- Piotr Niełacny
+autorequire: 
+bindir: bin
+cert_chain: []
+date: 2012-01-22 00:00:00.000000000 Z
+dependencies: []
+description: Recognize common internet memes using regular expressions
+email:
+- piotr.nielacny@gmail.com
+executables: []
+extensions: []
+extra_rdoc_files: []
+files:
+- .rspec
+- .travis.yml
+- Gemfile
+- Gemfile.lock
+- README.md
+- Rakefile
+- lib/memetron.rb
+- lib/memetron/.version.rb.swp
+- lib/memetron/matcher.rb
+- lib/memetron/memes.rb
+- lib/memetron/version.rb
+- memetron.gemspec
+- spec/memetron/matcher_spec.rb
+- spec/spec_helper.rb
+homepage: ''
+licenses: []
+post_install_message: 
+rdoc_options: []
+require_paths:
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
+  none: false
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+requirements: []
+rubyforge_project: memetron
+rubygems_version: 1.8.10
+signing_key: 
+specification_version: 3
+summary: Recognize common internet memes using regular expressions
+test_files: []
+has_rdoc: