greenletters 0.0.1

data/.gitignore

@@ -0,0 +1,19 @@
+# The list of files that should be ignored by Mr Bones.
+# Lines that start with '#' are comments.
+#
+# A .gitignore file can be used instead by setting it as the ignore
+# file in your Rakefile:
+#
+#   Bones {
+#     ignore_file  '.gitignore'
+#   }
+#
+# For a project with a C extension, the following would be a good set of
+# exclude patterns (uncomment them if you want to use them):
+# *.[oa]
+# *~
+announcement.txt
+coverage
+doc
+pkg
+/examples/cucumber/greenletters.log

data/History.txt

@@ -0,0 +1,4 @@
+== 0.0.1 / 2010-07-19
+
+* 1 major enhancement
+  * Birthday!

data/README.org

@@ -0,0 +1,107 @@
+#+Title:        Greenletters README
+#+AUTHOR:       Avdi Grimm
+#+EMAIL:        avdi@avdi.org
+
+# Configuration:
+#+STARTUP:      odd
+#+STARTUP:      hi
+#+STARTUP:      hidestars
+
+
+* Synopsis
+
+#+begin_src ruby
+  require 'greenletters'
+  adv = Greenletters::Process.new("adventure", :transcript => $stdout)
+  adv.on(:output, /welcome to adventure/i) do |process, match_data|
+    adv << "no\n"
+  end
+
+  puts "Starting adventure..."
+  adv.start!
+  adv.wait_for(:output, /you are standing at the end of a road/i)
+  adv << "east\n"
+  adv.wait_for(:output, /inside a building/i)
+  adv << "quit\n"
+  adv.wait_for(:output, /really want to quit/i)
+  adv << "yes\n"
+  adv.wait_for(:exit)
+  puts "Adventure has exited."
+#+end_src
+
+Or, in Cucumber format:
+
+#+BEGIN_SRC
+    Given process activity is logged to "greenletters.log"
+    Given a process "adventure" from command "adventure"
+    Given I reply "no" to output "Would you like instructions?" from process "adventure"
+    Given I reply "yes" to output "Do you really want to quit" from process "adventure"
+    When I execute the process "adventure"
+    Then I should see the following output from process "adventure":
+    """
+    You are standing at the end of a road before a small brick building.
+    Around you is a forest.  A small stream flows out of the building and
+    down a gully.
+    """
+    When I enter "east" into process "adventure"
+    Then I should see the following output from process "adventure":
+    """
+    You are inside a building, a well house for a large spring.
+    """
+#+END_SRC
+
+* What
+
+  Greenletters is a console interaction automation library similar to [[http://directory.fsf.org/project/expect/][GNU
+  Expect]]. You can use it to script interactions with command-line programs.
+
+* Why
+  Because Ruby's built-in expect.rb is pretty underpowered and I wanted to drive
+  command-line applications from Ruby, not TCL.
+
+* Who
+  Greenletters is by [[mailto:avdi@avdi.org][Avdi Grimm]].
+
+* Where
+  http://github.com/avdi/greenletters
+
+* How
+  Greenletters uses the pty.rb library under the covers to create a UNIX
+  pseudoterminal under Ruby's control. Of course, this means that it is
+  *NIX-only; Windows users need not apply.
+
+  The advantage of using a PTY is that *any* output - inclding output written to
+  the console instead of STDOUT/STDERR - will be captured by Greenletters.
+
+* Cucumber
+  To use the Cucumber steps in your own feature files, put the following in your env.rb:
+
+#+BEGIN_SRC ruby
+require 'greenletters'
+require 'greenletters/cucumber_steps'
+#+END_SRC
+
+* LICENSE
+
+(The MIT License)
+
+Copyright (c) 2010 Avdi Grimm
+
+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.

data/Rakefile

@@ -0,0 +1,30 @@
+
+begin
+  require 'bones'
+rescue LoadError
+  abort '### Please install the "bones" gem ###'
+end
+
+task :default => 'test:run'
+task 'gem:release' => 'test:run'
+
+Bones {
+  name         'greenletters'
+  authors      'Avdi Grimm'
+  email        'avdi@avdi.org'
+  url          'http://github.com/avdi/greenletters'
+  ignore_file  '.gitignore'
+  readme_file  'README.org'
+
+  summary      'A Ruby console automation framework a la Expect'
+
+  description  <<-END
+    Greenletterrs is a console automation framework, similar to the classic
+    utility Expect. You give it a command to execute, and tell it which outputs
+    or events to expect and how to respond to them.
+
+    Greenletters also includes a set of Cucumber steps which simplify the task
+    of spcifying interactive command-line applications.
+  END
+}
+

data/bin/greenletters

@@ -0,0 +1,7 @@
+#!/usr/bin/env ruby
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), %w[.. lib greenletters]))
+
+# Put your code here
+

data/examples/adventure.rb

@@ -0,0 +1,30 @@
+# This demo interacts with the classic Collossal Cave Adventure game. To install
+# the game on Debian-based systems (Ubuntu, etc), execute:
+#
+#   sudo apt-get install bsdgames
+#
+$:.unshift(File.expand_path('../lib', File.dirname(__FILE__)))
+require 'greenletters'
+require 'logger'
+
+logger = ::Logger.new($stdout)
+logger.level = ::Logger::INFO
+# logger.level = ::Logger::DEBUG
+adv = Greenletters::Process.new("adventure",
+   :logger     => logger,
+   :transcript => $stdout)
+adv.on(:output, /welcome to adventure/i) do |process, match_data|
+  adv << "no\n"
+end
+
+puts "Starting aadventure..."
+adv.start!
+adv.wait_for(:output, /you are standing at the end of a road/i)
+adv << "east\n"
+adv.wait_for(:output, /inside a building/i)
+adv << "quit\n"
+adv.wait_for(:output, /really want to quit/i)
+adv << "yes\n"
+adv.wait_for(:exit)
+puts "Adventure has exited."
+

data/examples/cucumber/adventure.feature

@@ -0,0 +1,67 @@
+Feature: play adventure
+  As a nerd
+  I want to play a text adventure game
+  Because I'm old-skool
+
+  Scenario: play first few rooms (named process)
+    Given process activity is logged to "greenletters.log"
+    Given a process "adventure" from command "adventure"
+    Given I reply "no" to output "Would you like instructions?" from process "adventure"
+    Given I reply "yes" to output "Do you really want to quit" from process "adventure"
+    When I execute the process "adventure"
+    Then I should see the following output from process "adventure":
+    """
+    You are standing at the end of a road before a small brick building.
+    Around you is a forest.  A small stream flows out of the building and
+    down a gully.
+    """
+    When I enter "east" into process "adventure"
+    Then I should see the following output from process "adventure":
+    """
+    You are inside a building, a well house for a large spring.
+    """
+    When I enter "west" into process "adventure"
+    Then I should see the following output from process "adventure":
+    """
+    You're at end of road again.
+    """
+    When I enter "south" into process "adventure"
+    Then I should see the following output from process "adventure":
+    """
+    You are in a valley in the forest beside a stream tumbling along a
+    rocky bed.
+    """
+    When I enter "quit" into process "adventure"
+    Then the process "adventure" should exit succesfully
+
+  Scenario: play first few rooms (default process)
+    Given process activity is logged to "greenletters.log"
+    Given a process from command "adventure"
+    Given I reply "no" to output "Would you like instructions?"
+    Given I reply "yes" to output "Do you really want to quit"
+    When I execute the process
+    Then I should see the following output:
+    """
+    You are standing at the end of a road before a small brick building.
+    Around you is a forest.  A small stream flows out of the building and
+    down a gully.
+    """
+    When I enter "east"
+    Then I should see the following output:
+    """
+    You are inside a building, a well house for a large spring.
+    """
+    When I enter "west"
+    Then I should see the following output:
+    """
+    You're at end of road again.
+    """
+    When I enter "south"
+    Then I should see the following output:
+    """
+    You are in a valley in the forest beside a stream tumbling along a
+    rocky bed.
+    """
+    When I enter "quit"
+    Then the process should exit succesfully
+

data/examples/cucumber/greenletters.log

@@ -0,0 +1,251 @@
+D, [2010-07-18T09:07:00.322981 #4796] DEBUG -- : added trigger on output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.324028 #4796] DEBUG -- : added trigger on output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.324701 #4796] DEBUG -- : installing end marker handler for __GREENLETTERS_PROCESS_ENDED__
+D, [2010-07-18T09:07:00.324808 #4796] DEBUG -- : prepended trigger on output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.324875 #4796] DEBUG -- : executing /usr/bin/ruby1.8 -C /home/avdi/dev/greenletters/examples/cucumber -e system(*["adventure"]) -e puts("__GREENLETTERS_PROCESS_ENDED__") -e gets -e exit $?.exitstatus
+D, [2010-07-18T09:07:00.325021 #4796] DEBUG -- : command environment:
+{"LIBGL_DRIVERS_PATH"=>"/usr/lib/fglrx/dri:/usr/lib32/fglrx/dri", "GDM_LANG"=>"en_US.utf8", "LANGUAGE"=>"", "KONSOLE_DBUS_SERVICE"=>":1.10", "LOGNAME"=>"avdi", "GTK_MODULES"=>"canberra-gtk-module", "DBUS_SESSION_BUS_ADDRESS"=>"unix:abstract=/tmp/dbus-ysd8AY9I4g,guid=d9670f4428aeffbcad7a4cf94c40af03", "SPEECHD_PORT"=>"7560", "PATH"=>"/home/avdi/bin:/home/avdi/share/bin:/home/avdi/.gem/ruby/1.8/bin:/usr/local/sbin:/usr/local/bin:/usr/sbin:/usr/bin:/sbin:/bin:/usr/games", "USER"=>"avdi", "GNOME_KEYRING_PID"=>"2330", "LANG"=>"en_US.utf8", "DEFAULTS_PATH"=>"/usr/share/gconf/gnome.default.path", "WINDOWID"=>"23068726", "XDG_CONFIG_DIRS"=>"/etc/xdg/xdg-gnome:/etc/xdg", "ORBIT_SOCKETDIR"=>"/tmp/orbit-avdi", "XDG_DATA_DIRS"=>"/usr/share/gnome:/usr/local/share/:/usr/share/", "GNOME_DESKTOP_SESSION_ID"=>"this-is-deprecated", "DISPLAY"=>":0.0", "PWD"=>"/home/avdi/dev/greenletters/examples/cucumber", "GDMSESSION"=>"gnome", "GDM_KEYBOARD_LAYOUT"=>"us", "COLORFGBG"=>"15;0", "XAUTHORITY"=>"/var/run/gdm/auth-for-avdi-GRGq1x/database", "SSH_AGENT_PID"=>"2389", "XDG_SESSION_COOKIE"=>"95da948d870c084a39cf95e74bcf1d12-1279307523.573384-2005890633", "TERM"=>"xterm", "PROFILEHOME"=>"", "SESSION_MANAGER"=>"local/petronius:@/tmp/.ICE-unix/2348,unix/petronius:/tmp/.ICE-unix/2348", "DESKTOP_AUTOSTART_ID"=>"10957e6313bf75a5e0127930752431450800000023480004", "SSH_AUTH_SOCK"=>"/tmp/keyring-5DVyII/ssh", "KONSOLE_DBUS_SESSION"=>"/Sessions/4", "GNOME_KEYRING_CONTROL"=>"/tmp/keyring-5DVyII", "DESKTOP_SESSION"=>"gnome", "USERNAME"=>"avdi", "MANDATORY_PATH"=>"/usr/share/gconf/gnome.mandatory.path", "HOME"=>"/home/avdi", "GPG_AGENT_INFO"=>"/tmp/gpg-5xymDi/S.gpg-agent:2390:1", "SHELL"=>"/bin/zsh", "SHLVL"=>"1", "OLDPWD"=>"/home/avdi/dev/greenletters/examples", "EDITOR"=>"/home/avdi/share/bin/emacs-newwindow", "GEM_EDITOR"=>"/home/avdi/share/bin/emacs-newwindow", "ZSH"=>"/home/avdi/.oh-my-zsh", "ZSH_THEME"=>"robbyrussell", "LSCOLORS"=>"Gxfxcxdxbxegedabagacad", "GREP_OPTIONS"=>"--color=auto", "GREP_COLOR"=>"1;32", "PAGER"=>"less", "LC_CTYPE"=>"en_US.UTF-8", "rvm_path"=>"/home/avdi/.rvm", "rvm_rubies_path"=>"/home/avdi/.rvm/rubies", "rvm_scripts_path"=>"/home/avdi/.rvm/scripts", "rvm_archives_path"=>"/home/avdi/.rvm/archives", "rvm_src_path"=>"/home/avdi/.rvm/src", "rvm_log_path"=>"/home/avdi/.rvm/log", "rvm_bin_path"=>"/home/avdi/.rvm/bin", "rvm_gems_path"=>"/home/avdi/.rvm/gems", "rvm_config_path"=>"/home/avdi/.rvm/config", "rvm_tmp_path"=>"/home/avdi/.rvm/tmp", "rvm_hooks_path"=>"/home/avdi/.rvm/hooks", "rvm_gems_cache_path"=>"/home/avdi/.rvm/gems/cache", "rvm_gemset_separator"=>"@", "rvm_version"=>"0.1.28", "_"=>"/home/avdi/.gem/ruby/1.8/bin/cucumber"}
+D, [2010-07-18T09:07:00.337560 #4796] DEBUG -- : spawned pid 4801
+D, [2010-07-18T09:07:00.338511 #4796] DEBUG -- : added trigger on output matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./
+D, [2010-07-18T09:07:00.338569 #4796] DEBUG -- : waiting for output matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./
+D, [2010-07-18T09:07:00.338608 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.338693 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.338747 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.338825 #4796] DEBUG -- : 
+<< 
+<< Welcome to Adventure!!  Would you like instructions?
+D, [2010-07-18T09:07:00.338863 #4796] DEBUG -- : read 56 bytes
+D, [2010-07-18T09:07:00.338910 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.338966 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against "\r\nWelcome to Adventure!!  Would you like instructions?\r\n"
+D, [2010-07-18T09:07:00.339007 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.339043 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.339077 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against "\r\nWelcome to Adventure!!  Would you like instructions?\r\n"
+D, [2010-07-18T09:07:00.339117 #4796] DEBUG -- : matched /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.339168 #4796] DEBUG -- : match trigger output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.339209 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.339247 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against "\r\n"
+D, [2010-07-18T09:07:00.339281 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.339316 #4796] DEBUG -- : checking output against output matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./
+D, [2010-07-18T09:07:00.339350 #4796] DEBUG -- : matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./ against "\r\n"
+D, [2010-07-18T09:07:00.339380 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.339414 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.339455 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.339504 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.339563 #4796] DEBUG -- : 
+>> no
+D, [2010-07-18T09:07:00.339599 #4796] DEBUG -- : wrote 3 bytes
+D, [2010-07-18T09:07:00.339631 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.339673 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.359024 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.359161 #4796] DEBUG -- : 
+<< no
+<< 
+<< You are standing at the end of a road before a small brick building.
+<< Around you is a forest.  A small stream flows out of the building and
+<< down a gully.
+D, [2010-07-18T09:07:00.359200 #4796] DEBUG -- : read 162 bytes
+D, [2010-07-18T09:07:00.359251 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.359299 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against "\r\nno\r\n\r\nYou are standing at the end of a road before a small brick building.\r\nAround you is a forest.  A small stream flows out of the building and\r\ndown a gully.\r\n"
+D, [2010-07-18T09:07:00.359334 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.359368 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.359406 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against "\r\nno\r\n\r\nYou are standing at the end of a road before a small brick building.\r\nAround you is a forest.  A small stream flows out of the building and\r\ndown a gully.\r\n"
+D, [2010-07-18T09:07:00.359437 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.359507 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.359548 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against "\r\nno\r\n\r\nYou are standing at the end of a road before a small brick building.\r\nAround you is a forest.  A small stream flows out of the building and\r\ndown a gully.\r\n"
+D, [2010-07-18T09:07:00.359585 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.359621 #4796] DEBUG -- : checking output against output matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./
+D, [2010-07-18T09:07:00.359664 #4796] DEBUG -- : matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./ against "\r\nno\r\n\r\nYou are standing at the end of a road before a small brick building.\r\nAround you is a forest.  A small stream flows out of the building and\r\ndown a gully.\r\n"
+D, [2010-07-18T09:07:00.359714 #4796] DEBUG -- : matched /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./
+D, [2010-07-18T09:07:00.359754 #4796] DEBUG -- : match trigger output matching /You\s+are\s+standing\s+at\s+the\s+end\s+of\s+a\s+road\s+before\s+a\s+small\s+brick\s+building\.\s+Around\s+you\s+is\s+a\s+forest\.\s+A\s+small\s+stream\s+flows\s+out\s+of\s+the\s+building\s+and\s+down\s+a\s+gully\./
+D, [2010-07-18T09:07:00.359790 #4796] DEBUG -- : unblocked
+D, [2010-07-18T09:07:00.359829 #4796] DEBUG -- : trigger removed
+D, [2010-07-18T09:07:00.361484 #4796] DEBUG -- : added trigger on output matching /You\s+are\s+inside\s+a\s+building,\s+a\s+well\s+house\s+for\s+a\s+large\s+spring\./
+D, [2010-07-18T09:07:00.361546 #4796] DEBUG -- : waiting for output matching /You\s+are\s+inside\s+a\s+building,\s+a\s+well\s+house\s+for\s+a\s+large\s+spring\./
+D, [2010-07-18T09:07:00.361588 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.361658 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.361728 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.361820 #4796] DEBUG -- : 
+>> east
+D, [2010-07-18T09:07:00.361878 #4796] DEBUG -- : wrote 5 bytes
+D, [2010-07-18T09:07:00.361942 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.362026 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.379006 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.379142 #4796] DEBUG -- : 
+<< east
+<< 
+<< You are inside a building, a well house for a large spring.
+<< 
+<< There are some keys on the ground here.
+<< 
+<< There is a shiny brass lamp nearby.
+<< 
+<< There is food here.
+<< 
+<< There is a bottle of water here.
+D, [2010-07-18T09:07:00.379182 #4796] DEBUG -- : read 210 bytes
+D, [2010-07-18T09:07:00.379240 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.379288 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against "\r\neast\r\n\r\nYou are inside a building, a well house for a large spring.\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\n"
+D, [2010-07-18T09:07:00.379321 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.379355 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.379394 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against "\r\neast\r\n\r\nYou are inside a building, a well house for a large spring.\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\n"
+D, [2010-07-18T09:07:00.379455 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.379497 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.379549 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against "\r\neast\r\n\r\nYou are inside a building, a well house for a large spring.\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\n"
+D, [2010-07-18T09:07:00.379594 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.379640 #4796] DEBUG -- : checking output against output matching /You\s+are\s+inside\s+a\s+building,\s+a\s+well\s+house\s+for\s+a\s+large\s+spring\./
+D, [2010-07-18T09:07:00.379699 #4796] DEBUG -- : matching /You\s+are\s+inside\s+a\s+building,\s+a\s+well\s+house\s+for\s+a\s+large\s+spring\./ against "\r\neast\r\n\r\nYou are inside a building, a well house for a large spring.\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\n"
+D, [2010-07-18T09:07:00.379758 #4796] DEBUG -- : matched /You\s+are\s+inside\s+a\s+building,\s+a\s+well\s+house\s+for\s+a\s+large\s+spring\./
+D, [2010-07-18T09:07:00.379810 #4796] DEBUG -- : match trigger output matching /You\s+are\s+inside\s+a\s+building,\s+a\s+well\s+house\s+for\s+a\s+large\s+spring\./
+D, [2010-07-18T09:07:00.379858 #4796] DEBUG -- : unblocked
+D, [2010-07-18T09:07:00.379910 #4796] DEBUG -- : trigger removed
+D, [2010-07-18T09:07:00.381659 #4796] DEBUG -- : added trigger on output matching /You're\s+at\s+end\s+of\s+road\s+again\./
+D, [2010-07-18T09:07:00.381736 #4796] DEBUG -- : waiting for output matching /You're\s+at\s+end\s+of\s+road\s+again\./
+D, [2010-07-18T09:07:00.381794 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.381854 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.381920 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.382004 #4796] DEBUG -- : 
+>> west
+D, [2010-07-18T09:07:00.382053 #4796] DEBUG -- : wrote 5 bytes
+D, [2010-07-18T09:07:00.382096 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.382157 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.397861 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.398226 #4796] DEBUG -- : 
+<< west
+<< 
+<< You're at end of road again.
+D, [2010-07-18T09:07:00.398280 #4796] DEBUG -- : read 38 bytes
+D, [2010-07-18T09:07:00.398344 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.398412 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against "\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\nwest\r\n\r\nYou're at end of road again.\r\n"
+D, [2010-07-18T09:07:00.398458 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.398504 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.398556 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against "\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\nwest\r\n\r\nYou're at end of road again.\r\n"
+D, [2010-07-18T09:07:00.398598 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.398643 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.398695 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against "\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\nwest\r\n\r\nYou're at end of road again.\r\n"
+D, [2010-07-18T09:07:00.398777 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.398828 #4796] DEBUG -- : checking output against output matching /You're\s+at\s+end\s+of\s+road\s+again\./
+D, [2010-07-18T09:07:00.398885 #4796] DEBUG -- : matching /You're\s+at\s+end\s+of\s+road\s+again\./ against "\r\n\r\nThere are some keys on the ground here.\r\n\r\nThere is a shiny brass lamp nearby.\r\n\r\nThere is food here.\r\n\r\nThere is a bottle of water here.\r\nwest\r\n\r\nYou're at end of road again.\r\n"
+D, [2010-07-18T09:07:00.398959 #4796] DEBUG -- : matched /You're\s+at\s+end\s+of\s+road\s+again\./
+D, [2010-07-18T09:07:00.399010 #4796] DEBUG -- : match trigger output matching /You're\s+at\s+end\s+of\s+road\s+again\./
+D, [2010-07-18T09:07:00.399053 #4796] DEBUG -- : unblocked
+D, [2010-07-18T09:07:00.399099 #4796] DEBUG -- : trigger removed
+D, [2010-07-18T09:07:00.401301 #4796] DEBUG -- : added trigger on output matching /You\s+are\s+in\s+a\s+valley\s+in\s+the\s+forest\s+beside\s+a\s+stream\s+tumbling\s+along\s+a\s+rocky\s+bed\./
+D, [2010-07-18T09:07:00.401391 #4796] DEBUG -- : waiting for output matching /You\s+are\s+in\s+a\s+valley\s+in\s+the\s+forest\s+beside\s+a\s+stream\s+tumbling\s+along\s+a\s+rocky\s+bed\./
+D, [2010-07-18T09:07:00.401444 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.401514 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.401581 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.401661 #4796] DEBUG -- : 
+>> south
+D, [2010-07-18T09:07:00.401710 #4796] DEBUG -- : wrote 6 bytes
+D, [2010-07-18T09:07:00.401754 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.401810 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.418999 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.419139 #4796] DEBUG -- : 
+<< south
+<< 
+<< You are in a valley in the forest beside a stream tumbling along a
+<< rocky bed.
+D, [2010-07-18T09:07:00.419189 #4796] DEBUG -- : read 89 bytes
+D, [2010-07-18T09:07:00.419253 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.419311 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against "\r\nsouth\r\n\r\nYou are in a valley in the forest beside a stream tumbling along a\r\nrocky bed.\r\n"
+D, [2010-07-18T09:07:00.419356 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.419402 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.419449 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against "\r\nsouth\r\n\r\nYou are in a valley in the forest beside a stream tumbling along a\r\nrocky bed.\r\n"
+D, [2010-07-18T09:07:00.419490 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.419535 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.419575 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against "\r\nsouth\r\n\r\nYou are in a valley in the forest beside a stream tumbling along a\r\nrocky bed.\r\n"
+D, [2010-07-18T09:07:00.419607 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.419641 #4796] DEBUG -- : checking output against output matching /You\s+are\s+in\s+a\s+valley\s+in\s+the\s+forest\s+beside\s+a\s+stream\s+tumbling\s+along\s+a\s+rocky\s+bed\./
+D, [2010-07-18T09:07:00.419680 #4796] DEBUG -- : matching /You\s+are\s+in\s+a\s+valley\s+in\s+the\s+forest\s+beside\s+a\s+stream\s+tumbling\s+along\s+a\s+rocky\s+bed\./ against "\r\nsouth\r\n\r\nYou are in a valley in the forest beside a stream tumbling along a\r\nrocky bed.\r\n"
+D, [2010-07-18T09:07:00.419725 #4796] DEBUG -- : matched /You\s+are\s+in\s+a\s+valley\s+in\s+the\s+forest\s+beside\s+a\s+stream\s+tumbling\s+along\s+a\s+rocky\s+bed\./
+D, [2010-07-18T09:07:00.419792 #4796] DEBUG -- : match trigger output matching /You\s+are\s+in\s+a\s+valley\s+in\s+the\s+forest\s+beside\s+a\s+stream\s+tumbling\s+along\s+a\s+rocky\s+bed\./
+D, [2010-07-18T09:07:00.419828 #4796] DEBUG -- : unblocked
+D, [2010-07-18T09:07:00.419862 #4796] DEBUG -- : trigger removed
+D, [2010-07-18T09:07:00.462688 #4796] DEBUG -- : added trigger on exit with status 0
+D, [2010-07-18T09:07:00.462995 #4796] DEBUG -- : waiting for exit with status 0
+D, [2010-07-18T09:07:00.463056 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.463119 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.463187 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.463264 #4796] DEBUG -- : 
+>> quit
+D, [2010-07-18T09:07:00.463314 #4796] DEBUG -- : wrote 5 bytes
+D, [2010-07-18T09:07:00.463357 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.463412 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.479013 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.479151 #4796] DEBUG -- : 
+<< quit
+<< 
+<< Do you really want to quit now?
+D, [2010-07-18T09:07:00.479201 #4796] DEBUG -- : read 41 bytes
+D, [2010-07-18T09:07:00.479267 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.479321 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against "\r\nquit\r\n\r\nDo you really want to quit now?\r\n"
+D, [2010-07-18T09:07:00.479365 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.479412 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.479458 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against "\r\nquit\r\n\r\nDo you really want to quit now?\r\n"
+D, [2010-07-18T09:07:00.479500 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.479546 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.479592 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against "\r\nquit\r\n\r\nDo you really want to quit now?\r\n"
+D, [2010-07-18T09:07:00.479642 #4796] DEBUG -- : matched /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.479712 #4796] DEBUG -- : match trigger output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.479767 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.479831 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.479895 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.479968 #4796] DEBUG -- : 
+>> yes
+D, [2010-07-18T09:07:00.480017 #4796] DEBUG -- : wrote 4 bytes
+D, [2010-07-18T09:07:00.480060 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.480115 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.499047 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.499209 #4796] DEBUG -- : 
+<< yes
+<< 
+<< OK
+<< 
+<< 
+<< 
+<< You scored 32 out of a possible 350 using 4 turns.
+<< 
+<< You are obviously a rank amateur.  Better luck next time.
+<< To achieve the next higher rating, you need 4 more points.
+<< __GREENLETTERS_PROCESS_ENDED__
+D, [2010-07-18T09:07:00.499249 #4796] DEBUG -- : read 222 bytes
+D, [2010-07-18T09:07:00.499298 #4796] DEBUG -- : checking output against output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.499345 #4796] DEBUG -- : matching /__GREENLETTERS_PROCESS_ENDED__/ against " now?\r\nyes\r\n\r\nOK\r\n\r\n\r\n\r\nYou scored 32 out of a possible 350 using 4 turns.\r\n\r\nYou are obviously a rank amateur.  Better luck next time.\r\nTo achieve the next higher rating, you need 4 more points.\r\n__GREENLETTERS_PROCESS_ENDED__\r\n"
+D, [2010-07-18T09:07:00.499382 #4796] DEBUG -- : matched /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.499444 #4796] DEBUG -- : end marker found
+D, [2010-07-18T09:07:00.499506 #4796] DEBUG -- : end marker expunged from output buffer
+D, [2010-07-18T09:07:00.499540 #4796] DEBUG -- : acknowledging end marker
+D, [2010-07-18T09:07:00.499582 #4796] DEBUG -- : match trigger output matching /__GREENLETTERS_PROCESS_ENDED__/
+D, [2010-07-18T09:07:00.499622 #4796] DEBUG -- : checking output against output matching /Would\s+you\s+like\s+instructions\?/
+D, [2010-07-18T09:07:00.499663 #4796] DEBUG -- : matching /Would\s+you\s+like\s+instructions\?/ against " now?\r\nyes\r\n\r\nOK\r\n\r\n\r\n\r\nYou scored 32 out of a possible 350 using 4 turns.\r\n\r\nYou are obviously a rank amateur.  Better luck next time.\r\nTo achieve the next higher rating, you need 4 more points.\r\n"
+D, [2010-07-18T09:07:00.499695 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.499729 #4796] DEBUG -- : checking output against output matching /Do\s+you\s+really\s+want\s+to\s+quit/
+D, [2010-07-18T09:07:00.499783 #4796] DEBUG -- : matching /Do\s+you\s+really\s+want\s+to\s+quit/ against " now?\r\nyes\r\n\r\nOK\r\n\r\n\r\n\r\nYou scored 32 out of a possible 350 using 4 turns.\r\n\r\nYou are obviously a rank amateur.  Better luck next time.\r\nTo achieve the next higher rating, you need 4 more points.\r\n"
+D, [2010-07-18T09:07:00.499828 #4796] DEBUG -- : no match
+D, [2010-07-18T09:07:00.499865 #4796] DEBUG -- : flushing triggers matching Greenletters::OutputTrigger
+D, [2010-07-18T09:07:00.499903 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.499949 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [#<File:/dev/pts/7>], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.499996 #4796] DEBUG -- : input ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.500048 #4796] DEBUG -- : 
+
+D, [2010-07-18T09:07:00.500084 #4796] DEBUG -- : wrote 1 bytes
+D, [2010-07-18T09:07:00.500116 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.500175 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.509491 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.509618 #4796] DEBUG -- : 
+<< 
+D, [2010-07-18T09:07:00.509668 #4796] DEBUG -- : read 2 bytes
+D, [2010-07-18T09:07:00.509729 #4796] DEBUG -- : flushing triggers matching Greenletters::OutputTrigger
+D, [2010-07-18T09:07:00.509778 #4796] DEBUG -- : select()
+D, [2010-07-18T09:07:00.509838 #4796] DEBUG -- : select() on [[#<File:/dev/pts/7>], [], [#<File:/dev/pts/7>, #<File:/dev/pts/7>]]
+D, [2010-07-18T09:07:00.509898 #4796] DEBUG -- : output ready #<File:/dev/pts/7>
+D, [2010-07-18T09:07:00.510051 #4796] DEBUG -- : Errno::EIO caught
+D, [2010-07-18T09:07:00.510106 #4796] DEBUG -- : waiting for child 4801 to die
+D, [2010-07-18T09:07:00.523528 #4796] DEBUG -- : caught PTY::ChildExited
+D, [2010-07-18T09:07:00.523800 #4796] DEBUG -- : collecting remaining output
+D, [2010-07-18T09:07:00.523953 #4796] DEBUG -- : Input/output error - /dev/pts/7
+D, [2010-07-18T09:07:00.524009 #4796] DEBUG -- : handling exit of process 4801
+D, [2010-07-18T09:07:00.524070 #4796] DEBUG -- : checking exit against exit with status 0
+D, [2010-07-18T09:07:00.524129 #4796] DEBUG -- : match trigger exit with status 0
+D, [2010-07-18T09:07:00.524172 #4796] DEBUG -- : unblocked
+D, [2010-07-18T09:07:00.524216 #4796] DEBUG -- : trigger removed

data/examples/cucumber/support/env.rb

@@ -0,0 +1,4 @@
+$:.unshift(File.expand_path('../../../lib', File.dirname(__FILE__)))
+require 'greenletters'
+require 'greenletters/cucumber_steps'
+

data/lib/greenletters/cucumber_steps.rb

@@ -0,0 +1,68 @@
+require 'cucumber'
+
+module Greenletters
+  module CucumberHelpers
+    def greenletters_prepare_entry(text)
+      text.chomp + "\n"
+    end
+    def greenletters_massage_pattern(text)
+      Regexp.new(Regexp.escape(text.strip.tr_s(" \r\n\t", " ")).gsub('\ ', '\s+'))
+    end
+  end
+end
+
+World(Greenletters::CucumberHelpers)
+
+Before do
+  @greenletters_process_table = Hash.new {|h,k|
+    raise "No such process defined: #{k}"
+  }
+end
+
+Given /^process activity is logged to "([^\"]*)"$/ do |filename|
+  logger = ::Logger.new(open(filename, 'w+'))
+  #logger.level = ::Logger::INFO
+  logger.level = ::Logger::DEBUG
+  @greenletters_process_log = logger
+end
+
+Given /^a process (?:"([^\"]*)" )?from command "([^\"]*)"$/ do |name, command|
+  name ||= "default"
+  options = {
+  }
+  options[:logger] = @greenletters_process_log if @greenletters_process_log
+  @greenletters_process_table[name] = Greenletters::Process.new(command, options)
+end
+
+Given /^I reply "([^\"]*)" to output "([^\"]*)"(?: from process "([^\"]*)")?$/ do
+  |reply, pattern, name|
+  name ||= "default"
+  pattern = greenletters_massage_pattern(pattern)
+  @greenletters_process_table[name].on(:output, pattern) do |process, match_data|
+    process << greenletters_prepare_entry(reply)
+  end
+end
+
+When /^I execute the process(?: "([^\"]*)")?$/ do |name|
+  name ||= "default"
+  @greenletters_process_table[name].start!
+end
+
+Then /^I should see the following output(?: from process "([^\"]*)")?:$/ do
+  |name, pattern|
+  name ||= "default"
+  pattern = greenletters_massage_pattern(pattern)
+  @greenletters_process_table[name].wait_for(:output, pattern)
+end
+
+When /^I enter "([^\"]*)"(?: into process "([^\"]*)")?$/ do
+  |input, name|
+  name ||= "default"
+  @greenletters_process_table[name] << greenletters_prepare_entry(input)
+end
+
+Then /^the process(?: "([^\"]*)")? should exit succesfully$/ do |name|
+  name ||= "default"
+  @greenletters_process_table[name].wait_for(:exit, 0)
+end
+

data/lib/greenletters.rb

@@ -0,0 +1,566 @@
+require 'logger'
+require 'pty'
+require 'forwardable'
+require 'stringio'
+require 'shellwords'
+require 'rbconfig'
+require 'strscan'
+
+# A better expect.rb
+#
+# Implementation note: because of the way PTY is implemented in Ruby, it is
+# possible when executing a quick non-interactive command for PTY::ChildExited
+# to be raised before ever getting input/output handles to the child
+# process. Without an output handle, it's not possible to read any output the
+# process produced. This is obviously undesirable, especially since when a
+# command is unexpectedly quick and noninteractive it's usually because there
+# was an error and you really want to be able to see what the problem was.
+#
+# Greenletters' solution to this problem is to wrap every command in a short
+# script. The script executes the passed command and on termination, outputs an
+# easily recognizable marker string. Then it waits for acknowledgment (a
+# newline) before exiting. When Greenletters sees the marker string in the
+# output, it automatically performs the acknowledgement and allows the child
+# process to finish. By forcing the child process to wait for acknowledgement,
+# we guarantee that the child will never exit before we have a chance to look at
+# the output.
+module Greenletters
+
+  # :stopdoc:
+  LIBPATH = ::File.expand_path(::File.dirname(__FILE__)) + ::File::SEPARATOR
+  PATH = ::File.dirname(LIBPATH) + ::File::SEPARATOR
+  # :startdoc:
+
+  # Returns the version string for the library.
+  #
+  def self.version
+    @version ||= File.read(path('version.txt')).strip
+  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, &block )
+    rv =  args.empty? ? LIBPATH : ::File.join(LIBPATH, args.flatten)
+    if block
+      begin
+        $LOAD_PATH.unshift LIBPATH
+        rv = block.call
+      ensure
+        $LOAD_PATH.shift
+      end
+    end
+    return rv
+  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, &block )
+    rv = args.empty? ? PATH : ::File.join(PATH, args.flatten)
+    if block
+      begin
+        $LOAD_PATH.unshift PATH
+        rv = block.call
+      ensure
+        $LOAD_PATH.shift
+      end
+    end
+    return rv
+  end
+
+  # Utility method used to require 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).reject{|fn| fn =~ /cucumber_steps.rb$/}.sort.each {|rb| require rb}
+  end
+
+  LogicError   = Class.new(::Exception)
+  SystemError  = Class.new(RuntimeError)
+  TimeoutError = Class.new(SystemError)
+  ClientError  = Class.new(RuntimeError)
+  StateError   = Class.new(ClientError)
+
+  # This class offers a pass-through << operator and saves the most recent 256
+  # bytes which have passed through.
+  class TranscriptHistoryBuffer
+    attr_reader :buffer
+
+    def initialize(transcript)
+      @buffer     = String.new
+      @transcript = transcript
+    end
+
+    def <<(output)
+      @buffer     << output
+      @transcript << output
+      length = [@buffer.length, 256].min
+      @buffer = @buffer[-length, length]
+      self
+    end
+  end
+
+  def Trigger(event, *args, &block)
+    klass = trigger_class_for_event(event)
+    klass.new(*args, &block)
+  end
+
+  def trigger_class_for_event(event)
+    ::Greenletters.const_get("#{event.to_s.capitalize}Trigger")
+  end
+
+  class Trigger
+    attr_accessor :time_to_live
+    attr_accessor :exclusive
+    attr_accessor :logger
+    attr_accessor :interruption
+
+    alias_method :exclusive?, :exclusive
+
+    def initialize(options={}, &block)
+      @block        = block || lambda{}
+      @exclusive    = options.fetch(:exclusive) { false }
+      @logger       = ::Logger.new($stdout)
+      @interruption = :none
+    end
+
+    def call(process)
+      @block.call(process)
+      true
+    end
+  end
+
+  class OutputTrigger < Trigger
+    def initialize(pattern=//, options={}, &block)
+      super(options, &block)
+      @pattern = pattern
+    end
+
+    def to_s
+      "output matching #{@pattern.inspect}"
+    end
+
+    def call(process)
+      scanner = process.output_buffer
+      @logger.debug "matching #{@pattern.inspect} against #{scanner.rest.inspect}"
+      if scanner.scan_until(@pattern)
+        @logger.debug "matched #{@pattern.inspect}"
+        @block.call(process, scanner)
+        true
+      else
+        false
+      end
+    end
+  end
+
+  class TimeoutTrigger < Trigger
+    def to_s
+      "timeout"
+    end
+
+    def call(process)
+      @block.call(process, process.blocker)
+      true
+    end
+  end
+
+  class ExitTrigger < Trigger
+    attr_reader :pattern
+
+    def initialize(pattern=0, options={}, &block)
+      super(options, &block)
+      @pattern = pattern
+    end
+
+    def call(process)
+      if pattern === process.status.exitstatus
+        @block.call(process, process.status)
+        true
+      else
+        false
+      end
+    end
+
+    def to_s
+      "exit with status #{pattern}"
+    end
+  end
+
+  class UnsatisfiedTrigger < Trigger
+    def to_s
+      "unsatisfied wait"
+    end
+
+    def call(process)
+      @block.call(process, process.interruption, process.blocker)
+      true
+    end
+  end
+
+  class Process
+    END_MARKER = '__GREENLETTERS_PROCESS_ENDED__'
+
+    # Shamelessly stolen from Rake
+    RUBY_EXT =
+      ((Config::CONFIG['ruby_install_name'] =~ /\.(com|cmd|exe|bat|rb|sh)$/) ?
+      "" :
+      Config::CONFIG['EXEEXT'])
+    RUBY       = File.join(
+      Config::CONFIG['bindir'],
+      Config::CONFIG['ruby_install_name'] + RUBY_EXT).
+      sub(/.*\s.*/m, '"\&"')
+
+    extend Forwardable
+    include ::Greenletters
+
+    attr_reader   :command      # Command to run in a subshell
+    attr_accessor :blocker      # The Trigger currently being waited for, if any
+    attr_reader   :input_buffer # Input waiting to be written to process
+    attr_reader   :output_buffer # Output ready to be read from process
+    attr_reader   :status        # :not_started -> :running -> :ended -> :exited
+    attr_reader   :cwd          # Working directory for the command
+
+    def_delegators :input_buffer, :puts, :write, :print, :printf, :<<
+    def_delegators :output_buffer, :read, :readpartial, :read_nonblock, :gets,
+                                   :getline
+    def_delegators  :blocker, :interruption, :interruption=
+
+    def initialize(*args)
+      options         = if args.last.is_a?(Hash) then args.pop else {} end
+      @command        = args
+      @triggers       = []
+      @blocker        = nil
+      @input_buffer   = StringIO.new
+      @output_buffer  = StringScanner.new("")
+      @env            = options.fetch(:env) {{}}
+      @cwd            = options.fetch(:cwd) {Dir.pwd}
+      @logger   = options.fetch(:logger) {
+        l = ::Logger.new($stdout)
+        l.level = ::Logger::WARN
+        l
+      }
+      @state         = :not_started
+      @shell         = options.fetch(:shell) { '/bin/sh' }
+      @transcript    = options.fetch(:transcript) {
+        t = Object.new
+        def t.<<(*)
+          # NOOP
+        end
+        t
+      }
+      @history = TranscriptHistoryBuffer.new(@transcript)
+    end
+
+    def on(event, *args, &block)
+      t = add_trigger(event, *args, &block)
+    end
+
+    def wait_for(event, *args, &block)
+      raise "Already waiting for #{blocker}" if blocker
+      t = add_blocking_trigger(event, *args, &block)
+      process_events
+    rescue
+      unblock!
+      triggers.delete(t)
+      raise
+    end
+
+    def add_trigger(event, *args, &block)
+      t = Trigger(event, *args, &block)
+      t.logger = @logger
+      triggers << t
+      @logger.debug "added trigger on #{t}"
+      t
+    end
+
+    def prepend_trigger(event, *args, &block)
+      t = Trigger(event, *args, &block)
+      t.logger = @logger
+      triggers.unshift(t)
+      @logger.debug "prepended trigger on #{t}"
+      t
+    end
+
+
+    def add_blocking_trigger(event, *args, &block)
+      t = add_trigger(event, *args, &block)
+      t.time_to_live = 1
+      @logger.debug "waiting for #{t}"
+      self.blocker = t
+      t
+    end
+
+    def start!
+      raise StateError, "Already started!" unless not_started?
+      @logger.debug "installing end marker handler for #{END_MARKER}"
+      prepend_trigger(:output, /#{END_MARKER}/, :exclusive => false, :time_to_live => 1) do |process, data|
+        handle_end_marker
+      end
+      handle_child_exit do
+        cmd = wrapped_command
+        @logger.debug "executing #{cmd.join(' ')}"
+        merge_environment(@env) do
+          @logger.debug "command environment:\n#{ENV.inspect}"
+          @output, @input, @pid = PTY.spawn(*cmd)
+        end
+        @state = :running
+        @logger.debug "spawned pid #{@pid}"
+      end
+    end
+
+    def flush_output_buffer!
+      @logger.debug "flushing output buffer"
+      @output_buffer.terminate
+    end
+
+    def alive?
+      ::Process.kill(0, @pid)
+      true
+    rescue Errno::ESRCH, Errno::ENOENT
+      false
+    end
+
+    def blocked?
+      @blocker
+    end
+
+    def running?
+      @state == :running
+    end
+
+    def not_started?
+      @state == :not_started
+    end
+
+    def exited?
+      @state == :exited
+    end
+
+    # Have we seen the end marker yet?
+    def ended?
+      @state == :ended
+    end
+
+    private
+
+    attr_reader :triggers
+
+    def wrapped_command
+      [RUBY,
+        '-C', cwd,
+        '-e', "system(*#{command.inspect})",
+        '-e', "puts(#{END_MARKER.inspect})",
+        '-e', "gets",
+        '-e', "exit $?.exitstatus"
+      ]
+    end
+
+    def process_events
+      raise StateError, "Process not started!" if not_started?
+      handle_child_exit do
+        while blocked?
+          @logger.debug "select()"
+          input_handles  = input_buffer.string.empty? ? [] : [@input]
+          output_handles = [@output]
+          error_handles  = [@input, @output]
+          @logger.debug "select() on #{[output_handles, input_handles, error_handles].inspect}"
+          ready_handles = IO.select(
+            output_handles, input_handles, error_handles, 1.0)
+          if ready_handles.nil?
+            process_timeout
+          else
+            ready_outputs, ready_inputs, ready_errors = *ready_handles
+            ready_errors.each do |handle| process_error(handle) end
+            ready_outputs.each do |handle| process_output(handle) end
+            ready_inputs.each do |handle| process_input(handle) end
+          end
+        end
+      end
+    end
+
+    def process_input(handle)
+      @logger.debug "input ready #{handle.inspect}"
+      handle.write(input_buffer.string)
+      @logger.debug format_output_for_log(input_buffer.string)
+      @logger.debug "wrote #{input_buffer.string.size} bytes"
+      input_buffer.string = ""
+    end
+
+    def process_output(handle)
+      @logger.debug "output ready #{handle.inspect}"
+      data = handle.readpartial(1024)
+      output_buffer << data
+      @history << data
+      @logger.debug format_input_for_log(data)
+      @logger.debug "read #{data.size} bytes"
+      handle_triggers(:output)
+      flush_triggers!(OutputTrigger) if ended?
+      # flush_output_buffer! unless ended?
+    end
+
+    def collect_remaining_output
+      if @output.nil?
+        @logger.debug "unable to collect output for missing output handle"
+        return
+      end
+      @logger.debug "collecting remaining output"
+      while data = @output.read_nonblock(1024)
+        output_buffer << data
+        @logger.debug "read #{data.size} bytes"
+      end
+    rescue EOFError, Errno::EIO => error
+      @logger.debug error.message
+    end
+
+    def wait_for_child_to_die
+      # Soon we should get a PTY::ChildExited
+      while running? || ended?
+        @logger.debug "waiting for child #{@pid} to die"
+        sleep 0.1
+      end
+    end
+
+    def process_error(handle)
+      @logger.debug "error on #{handle.inspect}"
+      raise NotImplementedError, "process_error()"
+    end
+
+    def process_timeout
+      @logger.debug "timeout"
+      handle_triggers(:timeout)
+      process_interruption(:timeout)
+    end
+
+    def handle_exit(status=status_from_waitpid)
+      return false if exited?
+      @logger.debug "handling exit of process #{@pid}"
+      @state  = :exited
+      @status = status
+      handle_triggers(:exit)
+      if status == 0
+        process_interruption(:exit)
+      else
+        process_interruption(:abnormal_exit)
+      end
+    end
+
+    def status_from_waitpid
+      @logger.debug "waiting for exist status of #{@pid}"
+      ::Process.waitpid2(@pid)[1]
+    end
+
+    def handle_triggers(event)
+      klass = trigger_class_for_event(event)
+      matches = 0
+      triggers.grep(klass).each do |t|
+        @logger.debug "checking #{event} against #{t}"
+        if t.call(self)         # match
+          matches += 1
+          @logger.debug "match trigger #{t}"
+          if blocker.equal?(t)
+            unblock!
+          end
+          if t.time_to_live
+            if t.time_to_live > 1
+              t.time_to_live -= 1
+              @logger.debug "trigger ttl reduced to #{t.time_to_live}"
+            else
+              triggers.delete(t)
+              @logger.debug "trigger removed"
+            end
+          end
+          break if t.exclusive?
+        else
+          @logger.debug "no match"
+        end
+      end
+      matches > 0
+    end
+
+    def handle_end_marker
+      return false if ended?
+      @logger.debug "end marker found"
+      output_buffer.string.gsub!(/#{END_MARKER}\s*/, '')
+      output_buffer.unscan
+      @state = :ended
+      @logger.debug "end marker expunged from output buffer"
+      @logger.debug "acknowledging end marker"
+      self.puts
+    end
+
+    def unblock!
+      @logger.debug "unblocked"
+      triggers.delete(@blocker)
+      @blocker = nil
+    end
+
+    def handle_child_exit
+      handle_eio do
+        yield
+      end
+    rescue PTY::ChildExited => error
+      @logger.debug "caught PTY::ChildExited"
+      collect_remaining_output
+      handle_exit(error.status)
+    end
+
+    def handle_eio
+      yield
+    rescue Errno::EIO => error
+      @logger.debug "Errno::EIO caught"
+      wait_for_child_to_die
+    end
+
+    def flush_triggers!(kind)
+      @logger.debug "flushing triggers matching #{kind}"
+      triggers.delete_if{|t| kind === t}
+    end
+
+    def merge_environment(new_env)
+      old_env = new_env.inject({}) do |old, (key, value)|
+        old[key] = ENV[key]
+        ENV[key] = value
+        old
+      end
+      yield
+    ensure
+      old_env.each_pair do |key, value|
+        if value.nil? then ENV.delete(key) else ENV[key] = value end
+      end
+    end
+
+    def process_interruption(reason)
+      if blocked?
+        self.interruption = reason
+        unless handle_triggers(:unsatisfied)
+          raise SystemError,
+                "Interrupted (#{reason}) while waiting for #{blocker}.\n" \
+                "Recent activity:\n" +
+                @history.buffer
+        end
+        unblock!
+      end
+    end
+
+    def format_output_for_log(text)
+      "\n" + text.split("\n").map{|l| ">> #{l}"}.join("\n")
+    end
+
+    def format_input_for_log(text)
+      "\n" + text.split("\n").map{|l| "<< #{l}"}.join("\n")
+    end
+
+  end
+end
+
+Greenletters.require_all_libs_relative_to(__FILE__)
+

data/script/console

@@ -0,0 +1,5 @@
+#!/usr/bin/env ruby
+$:.unshift(File.expand_path("../lib", File.dirname(__FILE__)))
+require 'greenletters'
+require 'irb'
+IRB.start

data/spec/greenletters_spec.rb

@@ -0,0 +1,6 @@
+
+require File.join(File.dirname(__FILE__), %w[spec_helper])
+
+describe Greenletters do
+end
+

data/spec/spec_helper.rb

@@ -0,0 +1,15 @@
+
+require File.expand_path(
+    File.join(File.dirname(__FILE__), %w[.. lib greenletters]))
+
+Spec::Runner.configure do |config|
+  # == Mock Framework
+  #
+  # RSpec uses it's own mocking framework by default. If you prefer to
+  # use mocha, flexmock or RR, uncomment the appropriate line:
+  #
+  # config.mock_with :mocha
+  # config.mock_with :flexmock
+  # config.mock_with :rr
+end
+

data/version.txt

@@ -0,0 +1 @@
+0.0.1

metadata

@@ -0,0 +1,93 @@
+--- !ruby/object:Gem::Specification 
+name: greenletters
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Avdi Grimm
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-07-19 00:00:00 -04:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: bones
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 3
+        - 4
+        - 7
+        version: 3.4.7
+  type: :development
+  version_requirements: *id001
+description: "    Greenletterrs is a console automation framework, similar to the classic\n    utility Expect. You give it a command to execute, and tell it which outputs\n    or events to expect and how to respond to them.\n\n    Greenletters also includes a set of Cucumber steps which simplify the task\n    of spcifying interactive command-line applications.\n"
+email: avdi@avdi.org
+executables: 
+- greenletters
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- bin/greenletters
+- version.txt
+files: 
+- .gitignore
+- History.txt
+- README.org
+- Rakefile
+- bin/greenletters
+- examples/adventure.rb
+- examples/cucumber/adventure.feature
+- examples/cucumber/greenletters.log
+- examples/cucumber/support/env.rb
+- lib/greenletters.rb
+- lib/greenletters/cucumber_steps.rb
+- script/console
+- spec/greenletters_spec.rb
+- spec/spec_helper.rb
+- test/test_greenletters.rb
+- version.txt
+has_rdoc: true
+homepage: http://github.com/avdi/greenletters
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- README.org
+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: greenletters
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: A Ruby console automation framework a la Expect
+test_files: 
+- test/test_greenletters.rb