codshit 0.1.1

data/README.markdown

@@ -0,0 +1,90 @@
+codshit
+=======
+
+© 2010 Jason Frame [ [jason@onehackoranother.com](mailto:jason@onehackoranother.com) / [@jaz303](http://twitter.com/jaz303) ]  
+Released under the MIT License.
+
+**codshit** n.
+nonsense or go nowhere conversation, specifically conversations where all parties are loaded.
+
+Codshit is a DSL for generating language based on a bunch of rules. The idea/syntax was inspired by (i.e. stolen from) http://eigenclass.org/hiki/language-generator. I suspect it could be useful for generating masses of semi-sensible test data for social media websites but I found it a lot more entertaining just to generate random insults.
+
+Storyteller Example
+-------------------
+
+    require 'codshit'
+
+    g = Codshit::Generator.new do |g|
+  
+      # default non-terminal is main, can be set with "start :whatever"
+      main.is :salutation, " ", :name, " let me tell you a story... ", :story
+  
+      # choice
+      salutation.is "hello" | "awrite" | "sup" | "word"
+  
+      # procs are captured and are stable for the duration of the evaluation
+      name.is { ("jason" | "john" | "alice" | "bob" | ["old " | "young ", "man" | "woman"]).to_text }
+  
+      insult.is "dickhead" | "bawbag" | "fucknut" | "scrotum"
+  
+      venue.is "cinema" | "club" | "mall"
+      attacked.is "punched" | "kicked" | "bit" | "poked"
+      target.is "head" | "ass" | "balls" | "face" | "leg" | "arm"
+  
+      story_venue.is { :venue }
+  
+      # choice
+      story.define do
+        is "so there i was at the ", :story_venue, " when some ", :insult, " comes up to me and calls me a ", :insult, " so i ", :attacked, " that little ", :insult, " in the ", :target, ". i swear, that's the last time i'm ever going to the ", :story_venue, " again."
+        is "i went into a maze and ", :maze, :maze_cons
+        is "on second thoughts i can't be fucked."
+      end
+  
+      # recursion
+      maze.is "went forward" | "went left" | "went right" | "went back" | "sat down for a rest"
+      maze_cons.is " then ", ([:maze, :maze_cons] | [:maze, :maze_cons] | [:maze, :maze_cons] | "found the exit" | "died of starvation")
+  
+    end
+
+    puts g.generate
+
+Possible output:
+
+    word young man let me tell you a story... so there i was at the cinema when some dickhead comes up to me and calls me a bawbag so i poked that little scrotum in the arm. i swear, that's the last time i'm ever going to the club again.
+    
+Our how about:
+
+    sup alice let me tell you a story... i went into a maze and sat down for a rest then went left then went back then sat down for a rest then went forward then went left then went left then died of starvation
+    
+Applications in the Decision Making Process
+-------------------------------------------
+
+You could even use codshit to pick your next pet-project:
+
+    g = Codshit::Generator.new do |g|
+
+      main.is "a ", :project_type, " written in ", :implementation_language
+
+      project_type.is :project_involving_parser | "CMS" | "templating language" | "web framework" | "key-value store"
+
+      project_involving_parser.is ["templating engine" | :programming_language, " parsed using ", :parser]
+      parser.is "regular expressions and blind faith" | "SableCC" | ["a buggy hand-written lexer" | "Ragel" | "flex", " and ", "a dubious hand-crafted recursive descent parser" | "lemon" | "bison" | "peg/leg"]
+
+      programming_language.is :typing, ", ", :compiled, " language"
+      typing.is "dynamic" | "statically-typed"
+      compiled.is "compiled" | "interpreted"
+
+      implementation_language.is :language | ["an implementation of ", :language, " running on the ", :virtual_machine]
+
+      language.is "PHP" | "Java" | "Ruby" | "Python" | "Scala" | "Erlang" | "Javascript" | "CLOS" | "Haskell" | "Factor" | "OCaml" | "IO" | "Ioke" | "Potion"
+      virtual_machine.is "JVM" | "CLR"
+
+    end
+
+    puts g.generate
+
+Generates:
+
+    a statically-typed, compiled language parsed using Ragel and a dubious hand-crafted recursive descent parser written in an implementation of Ioke running on the CLR
+
+Have fun! xxx

data/Rakefile

@@ -0,0 +1,12 @@
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gemspec|
+    gemspec.name = "codshit"
+    gemspec.summary = "Rule-based natural language generator"
+    gemspec.email = "jason@onehackoranother.com"
+    gemspec.homepage = "http://github.com/jaz303/codshit"
+    gemspec.authors = ["Jason Frame"]
+  end
+rescue LoadError
+  puts "Jeweler not available. Install it with: gem install jeweler"
+end

data/VERSION

@@ -0,0 +1 @@
+0.1.1

data/lib/codshit.rb

@@ -0,0 +1,111 @@
+module Codshit
+  
+  module Chooseable
+    def |(other)
+      Codshit::Choice.new(*(self.choices + other.choices))
+    end
+
+    def choices
+      [self]
+    end
+  end
+  
+  class Choice
+    attr_reader :choices
+    
+    def initialize(*choices)
+      @choices = choices
+    end
+    
+    def |(right)
+      self.class.new(*(choices + right.choices))
+    end
+    
+    def to_text
+      @choices[rand(@choices.length)].to_text
+    end
+    
+    def <<(c)
+      @choices << c
+    end
+  end
+  
+  class Generator
+    
+    @@active_generator = nil
+    def self.active_generator
+      @@active_generator
+    end
+    
+    def initialize(&block)
+      @rules = {}
+      instance_eval(&block)
+    end
+    
+    def [](rule)
+      @rules[rule]
+    end
+    
+    def method_missing(method, *args, &block)
+      @rules[method] ||= Rule.new
+    end
+    
+    def generate
+      @@active_generator = self
+      @rules[:main].to_text
+    end
+  end
+  
+  class Rule
+    def initialize
+      @is = Choice.new
+    end
+    
+    def is(*stuff)
+      if block_given?
+        @is << Choice.new(yield)
+      else
+        @is << stuff
+      end
+    end
+    
+    def define(&block)
+      instance_eval(&block)
+    end
+    
+    def to_text
+      @is.to_text
+    end
+  end
+  
+end
+
+class String
+  include Codshit::Chooseable
+
+  def to_text
+    self
+  end
+end
+
+class Symbol
+  include Codshit::Chooseable
+  
+  def to_text
+    Codshit::Generator.active_generator[self].to_text
+  end
+end
+
+class Array
+  def |(other)
+    ::Codshit::Choice.new(*(choices + other.choices))
+  end
+  
+  def choices
+    [dup]
+  end
+  
+  def to_text
+    map { |p| p.to_text }.join('')
+  end
+end

metadata

@@ -0,0 +1,65 @@
+--- !ruby/object:Gem::Specification 
+name: codshit
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 1
+  - 1
+  version: 0.1.1
+platform: ruby
+authors: 
+- Jason Frame
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-03-08 00:00:00 +00:00
+default_executable: 
+dependencies: []
+
+description: 
+email: jason@onehackoranother.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README.markdown
+files: 
+- README.markdown
+- Rakefile
+- VERSION
+- lib/codshit.rb
+has_rdoc: true
+homepage: http://github.com/jaz303/codshit
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Rule-based natural language generator
+test_files: []
+