RubyGems - gambit - Versions diffs - 0.1.0 - Mend

gambit 0.1.0

Files changed (111) hide show

data/AUTHORS +2 -0
data/CHANGELOG +7 -0
data/COPYING +340 -0
data/INSTALL +23 -0
data/LICENSE +7 -0
data/README +25 -0
data/Rakefile +87 -0
data/TODO +6 -0
data/examples/bird_wars/game.rb +434 -0
data/examples/bird_wars/html/chest.rhtml +37 -0
data/examples/bird_wars/html/combat.rhtml +38 -0
data/examples/bird_wars/html/fight.rhtml +71 -0
data/examples/bird_wars/html/fridge.rhtml +31 -0
data/examples/bird_wars/html/help.rhtml +30 -0
data/examples/bird_wars/html/house.rhtml +36 -0
data/examples/bird_wars/html/images/albatross.jpg +0 -0
data/examples/bird_wars/html/images/alka_seltzer_small.png +0 -0
data/examples/bird_wars/html/images/bazooka_small.png +0 -0
data/examples/bird_wars/html/images/bb_gun_small.png +0 -0
data/examples/bird_wars/html/images/cat_small.png +0 -0
data/examples/bird_wars/html/images/combat.png +0 -0
data/examples/bird_wars/html/images/crossbow_small.png +0 -0
data/examples/bird_wars/html/images/cuckoo.jpg +0 -0
data/examples/bird_wars/html/images/fridge.png +0 -0
data/examples/bird_wars/html/images/gull.jpg +0 -0
data/examples/bird_wars/html/images/house.jpg +0 -0
data/examples/bird_wars/html/images/items.png +0 -0
data/examples/bird_wars/html/images/not_found.png +0 -0
data/examples/bird_wars/html/images/note.jpg +0 -0
data/examples/bird_wars/html/images/oil_small.png +0 -0
data/examples/bird_wars/html/images/one_stone_small.png +0 -0
data/examples/bird_wars/html/images/owl.jpg +0 -0
data/examples/bird_wars/html/images/poisoned_seeds_small.png +0 -0
data/examples/bird_wars/html/images/rice_small.png +0 -0
data/examples/bird_wars/html/images/shotgun_small.png +0 -0
data/examples/bird_wars/html/images/slingshot_small.png +0 -0
data/examples/bird_wars/html/images/soda_rings_small.png +0 -0
data/examples/bird_wars/html/images/spear_small.png +0 -0
data/examples/bird_wars/html/images/stork.jpg +0 -0
data/examples/bird_wars/html/images/weapons.png +0 -0
data/examples/bird_wars/html/images/woodpecker.jpg +0 -0
data/examples/bird_wars/html/images/you.jpg +0 -0
data/examples/bird_wars/html/index.rhtml +13 -0
data/examples/bird_wars/html/weapons.rhtml +35 -0
data/examples/cli/blackjack.rb +86 -0
data/examples/cli/go.rb +93 -0
data/examples/cli/space_trader2/planet_data +12280 -0
data/examples/cli/space_trader2/space_trader2.rb +248 -0
data/examples/cli/space_trader2/world.rb +127 -0
data/examples/cli/spacetrader.rb +262 -0
data/examples/cli/yahtzee.rb +161 -0
data/examples/galactic_courier/Rakefile +9 -0
data/examples/galactic_courier/bin/galactic_courier.rb +44 -0
data/examples/galactic_courier/html/console.rhtml +15 -0
data/examples/galactic_courier/html/images/barren.jpg +0 -0
data/examples/galactic_courier/html/images/industrial.jpg +0 -0
data/examples/galactic_courier/html/images/jungle.jpg +0 -0
data/examples/galactic_courier/html/images/oceanic.jpg +0 -0
data/examples/galactic_courier/html/images/tundra.jpg +0 -0
data/examples/galactic_courier/html/images/volcanic.jpg +0 -0
data/examples/galactic_courier/lib/galaxy.rb +64 -0
data/examples/galactic_courier/lib/planet.rb +30 -0
data/examples/galactic_courier/lib/sector.rb +84 -0
data/examples/galactic_courier/lib/station.rb +18 -0
data/examples/galactic_courier/test/tc_galaxy.rb +24 -0
data/examples/galactic_courier/test/tc_planet.rb +22 -0
data/examples/galactic_courier/test/tc_sector.rb +55 -0
data/examples/galactic_courier/test/ts_all.rb +12 -0
data/examples/gambit_mail/html/compose.rhtml +39 -0
data/examples/gambit_mail/html/index.rhtml +3 -0
data/examples/gambit_mail/html/mailbox.rhtml +47 -0
data/examples/gambit_mail/html/message.rhtml +34 -0
data/examples/gambit_mail/mail.rb +75 -0
data/lib/gambit.rb +10 -0
data/lib/gambit/server.rb +269 -0
data/lib/gambit/server/gambiterror.rb +28 -0
data/lib/gambit/server/game.rb +185 -0
data/lib/gambit/server/game/eventform.rb +174 -0
data/lib/gambit/server/message.rb +85 -0
data/lib/gambit/server/player.rb +40 -0
data/lib/gambit/tools.rb +13 -0
data/lib/gambit/tools/board.rb +275 -0
data/lib/gambit/tools/cards.rb +11 -0
data/lib/gambit/tools/cards/card.rb +158 -0
data/lib/gambit/tools/cards/deck.rb +99 -0
data/lib/gambit/tools/cards/hand.rb +86 -0
data/lib/gambit/tools/cards/pile.rb +107 -0
data/lib/gambit/tools/currency.rb +148 -0
data/lib/gambit/tools/dice.rb +219 -0
data/lib/gambit/tools/movehistory.rb +164 -0
data/lib/gambit/tools/scorecard.rb +333 -0
data/lib/gambit/viewable.rb +71 -0
data/setup.rb +1360 -0
data/test/tc_board.rb +167 -0
data/test/tc_cards.rb +182 -0
data/test/tc_currency.rb +99 -0
data/test/tc_dice.rb +83 -0
data/test/tc_error.rb +34 -0
data/test/tc_event.rb +367 -0
data/test/tc_game.rb +29 -0
data/test/tc_message.rb +35 -0
data/test/tc_movehistory.rb +38 -0
data/test/tc_player.rb +60 -0
data/test/tc_scorecard.rb +112 -0
data/test/tc_views.rb +353 -0
data/test/test_game.rb +19 -0
data/test/test_view.rhtml +2 -0
data/test/ts_all.rb +12 -0
data/test/ts_server.rb +14 -0
data/test/ts_tools.rb +14 -0
metadata +183 -0

@@ -0,0 +1,34 @@
+#!/usr/local/bin/ruby -w
+# tc_error.rb
+#
+#  Created by James Edward Gray II on 2005-06-03.
+#  Copyright 2005 Gray Productions. All rights reserved.
+require "test/unit"
+require "gambit/server/gambiterror"
+class TestError < Test::Unit::TestCase
+	def test_viewable
+		assert_not_nil( error =
+		                Gambit::Server::GambitError.new("You broke that!") )
+		assert_equal( "<!DOCTYPE html PUBLIC " +
+		              "\"-//W3C//DTD XHTML 1.0 Strict//EN\"\n          " +
+		              "\"http://www.w3.org/TR/xhtml1/DTD/" +
+		              "xhtml1-strict.dtd\">\n" +
+		              "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n" +
+		              "<head>\n" +
+		              "\t<title>GambitError</title>\n" +
+		              "</head><body>\n" +
+		               "\t<h1>Gambit Has Thrown An Error</h1>\n" +
+		               "\t<p>You broke that!</p>\n" +
+		               "</body></html>\n", error.view(:error_page) )
+	end
+	def test_throw
+		assert_raise(Gambit::Server::GambitError) do
+			raise Gambit::Server::GambitError, "Not good!"
+		end
+	end
+end

data/test/tc_event.rb ADDED

@@ -0,0 +1,367 @@
+#!/usr/local/bin/ruby -w
+# tc_event.rb
+#
+#  Created by James Edward Gray II on 2005-06-03.
+#  Copyright 2005 Gray Productions. All rights reserved.
+require "test/unit"
+require "test_game"
+class TestEvent < Test::Unit::TestCase
+	def setup
+		@game = MyGame.new
+		@id   = @game.object_id
+	end
+	def test_get_url
+		assert_equal("/event/#{@id}/kill_bird", @game.event(nil, "kill_bird"))
+		params = Hash.new
+		params["weapon"] = "slingshot"
+		params["item"]   = "rice"
+		assert_equal( "/event/#{@id}/equip?item=rice&weapon=slingshot",
+		              @game.event(nil, "equip", params) )
+        assert_equal( "/event/#{@id}/equip?item=rice&weapon=slingshot",
+                      @game.event( nil, "equip", { "weapon" => "slingshot",
+                                                   "item"   => "rice" } ) )
+        assert_equal( "/event/#{@id}/equip?item=rice&weapon=slingshot",
+                      @game.event( nil, "equip", "weapon" => "slingshot",
+                                                 "item"   => "rice" ) )
+		assert_equal( "/event/#{@id}/set_name?" +
+		              "name=James%20Edward%20Gray%20II",
+		              @game.event( nil, "set_name",
+		                           "name" => "James Edward Gray II" ) )
+        assert_equal( "/event/#{@id}/talk?" +
+                      "say=What%20the%20%3F%23%40%25%21%20man%3F",
+                      @game.event( nil, "talk",
+                                   "say" => "What the ?\#@%! man?" ) )
+	end
+	def test_links
+		assert_equal( "<a class=\"event\" href=\"/event/#{@id}/travel?" +
+		                  "destinatiton=Gotham%20City\">" +
+		              "Travel to Gotham City" +
+		              "</a>",
+		              @game.event( "Travel to Gotham City", "travel",
+		                           "destinatiton" => "Gotham City" ) )
+        assert_equal( "<a class=\"event\" href=\"/event/#{@id}/travel?" +
+                          "destinatiton=Gotham%20City\">" +
+                      "<img src=\"gotham.jpg\" />" +
+                      "</a>",
+                      @game.event( "<img src=\"gotham.jpg\" />", "travel",
+                                   "destinatiton" => "Gotham City" ) )
+	end
+	def test_forms
+		assert_equal( "<form class=\"event\" method=\"post\" " +
+		                     "action=\"/event/#{@id}/send_mail\">\n" +
+		                     "\t<p><input type=\"submit\" value=\"Submit\" />" +
+		                     " <input type=\"reset\" value=\"Reset\" /></p>\n" +
+		                     "</form>\n",
+		              @game.event(nil, "send_mail") { true } )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<p class=\"intro\">Enter message:</p>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event("Enter message:", "send_mail") { true } )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<p class=\"intro\">Welcome to Gambit Mail!</p>\n" +
+                      "\t<p class=\"intro\">Enter message:</p>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event( [ "Welcome to Gambit Mail!",
+                                     "Enter message:" ],
+                                    "send_mail" ) { true } )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<p class=\"intro\">Enter message:</p>\n" +
+                      "\t<input type=\"hidden\" name=\"from\" " +
+                                "value=\"James Edward Gray II\" />\n" +
+                      "\t<input type=\"hidden\" name=\"to\" " +
+                                "value=\"Greg Brown\" />\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event( "Enter message:", "send_mail",
+                                   "from" => "James Edward Gray II",
+                                   "to"   => "Greg Brown" ) { true } )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<p class=\"intro\">Enter message:</p>\n" +
+                      "\t<input type=\"hidden\" name=\"from\" " +
+                                "value=\"James Edward Gray II\" />\n" +
+                      "\t<input type=\"hidden\" name=\"to\" " +
+                                "value=\"Greg Brown\" />\n" +
+                      "\t<input type=\"hidden\" name=\"server\" " +
+                                "value=\"smtp.somewhere.out.there\" />\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event( "Enter message:", "send_mail",
+                                   "from" => "James Edward Gray II",
+                                   "to"   => "Greg Brown" ) do
+		                  hidden "server", "smtp.somewhere.out.there"
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<p class=\"intro\">Enter message:</p>\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt><label for=\"subject\">" +
+                                      "Subject:</label></dt>\n" +
+                      "\t\t<dd><input type=\"text\" " +
+                                      "id=\"subject\" name=\"subject\" " +
+                                      "maxlength=\"100\" /></dd>\n" +
+                      "\t\t<dt><label for=\"message\">" +
+                                      "Message:</label></dt>\n" +
+                      "\t\t<dd><input type=\"text\" " +
+                                      "id=\"message\" name=\"message\" />" +
+                           "</dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<input type=\"hidden\" name=\"from\" " +
+                                "value=\"James Edward Gray II\" />\n" +
+                      "\t<input type=\"hidden\" name=\"to\" " +
+                                "value=\"Greg Brown\" />\n" +
+                      "\t<input type=\"hidden\" name=\"server\" " +
+                                "value=\"smtp.somewhere.out.there\" />\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event( "Enter message:", "send_mail",
+                                   "from" => "James Edward Gray II",
+                                   "to"   => "Greg Brown" ) do
+	                      text "subject", "maxlength" => 100
+	                      text "message"
+                          hidden "server", "smtp.somewhere.out.there"
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt><label for=\"password\">" +
+                                      "Password:</label></dt>\n" +
+                      "\t\t<dd><input type=\"password\" " +
+                                      "id=\"password\" name=\"password\" />" +
+                           "</dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") { password "password" } )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt><label for=\"message\">" +
+                                      "Message:</label></dt>\n" +
+                      "\t\t<dd><textarea id=\"message\" name=\"message\">" +
+                      "</textarea></dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") { document "message" } )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt><label for=\"message\">" +
+                                      "Message:</label></dt>\n" +
+                      "\t\t<dd><textarea id=\"message\" name=\"message\">" +
+                      "This is the document text.</textarea></dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+		                  document "message", "This is the document text."
+		              end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<p><label for=\"subject\">Subject:</label> " +
+                      "<input type=\"text\" id=\"subject\" name=\"subject\" " +
+                              "maxlength=\"100\" /></p>\n" +
+                      "\t<img src=\"form_img.gif\" />\n" +
+                      "\t<p><label for=\"message\">Message:</label> " +
+                      "<input type=\"text\" " +
+                              "id=\"message\" name=\"message\" /></p>\n" +
+		              "\t<p>Priority: " +
+		              "<input type=\"radio\" id=\"low\" name=\"priority\" " +
+		                      "value=\"low\" checked=\"checked\" />" +
+		              "<label for=\"low\">Low</label> " +
+		              "<input type=\"radio\" id=\"medium\" name=\"priority\" " +
+		                      "value=\"medium\" />" +
+		              "<label for=\"medium\">Medium</label> " +
+		              "<input type=\"radio\" id=\"important\" " +
+		                      "name=\"priority\" value=\"important\" />" +
+					  "<label for=\"important\">Important</label></p>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+                          text "subject", "maxlength" => 100
+                          html "<img src=\"form_img.gif\" />"
+                          text "message"
+                          radios "priority", %w{low medium important},
+                                 "low" => { "checked" => "checked" }
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt>Priority:</dt>\n" +
+                      "\t\t<dd><input type=\"radio\" id=\"low\" " +
+		                       "name=\"priority\" value=\"low\" />" +
+		                       "<label for=\"low\">Low</label> " +
+		                       "<input type=\"radio\" id=\"medium\" " +
+		                       "name=\"priority\" value=\"medium\" />" +
+		                       "<label for=\"medium\">Medium</label> " +
+		                       "<input type=\"radio\" id=\"important\" " +
+		                       "name=\"priority\" value=\"important\" />" +
+		                       "<label for=\"important\">Important</label>" +
+		                       "</dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+                          radios "priority", %w{low medium important}
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt>Priority:</dt>\n" +
+                      "\t\t<dd><input type=\"radio\" id=\"low\" " +
+                               "name=\"priority\" value=\"low\" " +
+                               "checked=\"checked\" />" +
+                               "<label for=\"low\">Low</label> " +
+                               "<input type=\"radio\" id=\"medium\" " +
+                               "name=\"priority\" value=\"medium\" />" +
+                               "<label for=\"medium\">Medium</label> " +
+                               "<input type=\"radio\" id=\"important\" " +
+                               "name=\"priority\" value=\"important\" />" +
+                               "<label for=\"important\">Important</label>" +
+                               "</dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+                          radios "priority", %w{low medium important},
+		                         "low" => { "checked" => "checked" }
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt>Options:</dt>\n" +
+                      "\t\t<dd><input type=\"checkbox\" id=\"html\" " +
+                               "name=\"options\" value=\"html\" />" +
+                               "<label for=\"html\">Html</label> " +
+                               "<input type=\"checkbox\" id=\"receipt\" " +
+                               "name=\"options\" value=\"receipt\" />" +
+                               "<label for=\"receipt\">Receipt</label>" +
+                               "</dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+                          checks "options", %w{html receipt}
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt><label for=\"signature\">" +
+                               "Signature:</label></dt>\n" +
+                      "\t\t<dd><select id=\"signature\" name=\"signature\">" +
+                               "<option value=\"default\">Default</option>" +
+                               "<option value=\"short\">Short</option>" +
+                           "</select></dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+                          menu "signature", %w{default short}
+                      end )
+        assert_equal( "<form class=\"event\" method=\"post\" " +
+                             "action=\"/event/#{@id}/send_mail\">\n" +
+                      "\t<dl>\n" +
+                      "\t\t<dt><label for=\"signature\">" +
+                               "Signature:</label></dt>\n" +
+                      "\t\t<dd><select id=\"signature\" name=\"signature\" " +
+		                               "size=\"5\">" +
+                               "<option value=\"default\" " +
+                               "selected=\"selected\">Default</option>" +
+                               "<option value=\"short\">Short</option>" +
+                           "</select></dd>\n" +
+                      "\t</dl>\n" +
+                      "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+                      "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+                      "</form>\n",
+                      @game.event(nil, "send_mail") do
+                          menu "signature", %w{default short},
+		                       {"default" => {"selected" => "selected"}},
+		                       "size" => 5
+                      end )
+		Gambit::Server::Game::EventForm.register_view( :raw_elements,
+		    <<-END_RAW.gsub(/^\t{2}/, "") )
+		% @elements.each do |element|
+		%	if element =~ /^<(?:input|textarea|select)/
+		%		name = element[/name="[^"]+"/][6..-2]
+		%		if element =~ /^<input type="(?:checkbox|radio|)"/
+			<%= name.capitalize.tr("_", " ") %>: <%= element %>
+		%		else
+			<label for="<%= name %>"><%=
+		       name.capitalize.tr("_", " ") %>:</label> <%= element %>
+		%		end
+		%	else
+			<%= element %>
+		%	end
+		% end
+		END_RAW
+		assert_equal( "<form class=\"event\" method=\"post\" " +
+		                     "action=\"/event/#{@id}/send_mail\">\n" +
+		              "\t<label for=\"subject\">Subject:</label> " +
+		              "<input type=\"text\" id=\"subject\" name=\"subject\" " +
+		                      "maxlength=\"100\" />\n" +
+		              "\t<img src=\"form_img.gif\" />\n" +
+		              "\t<label for=\"message\">Message:</label> " +
+		              "<input type=\"text\" " +
+		                      "id=\"message\" name=\"message\" />\n" +
+		              "\tPriority: " +
+		              "<input type=\"radio\" id=\"low\" name=\"priority\" " +
+		                      "value=\"low\" checked=\"checked\" />" +
+		              "<label for=\"low\">Low</label> " +
+		              "<input type=\"radio\" id=\"medium\" name=\"priority\" " +
+		                      "value=\"medium\" />" +
+		              "<label for=\"medium\">Medium</label> " +
+		              "<input type=\"radio\" id=\"important\" " +
+		                      "name=\"priority\" value=\"important\" />" +
+					  "<label for=\"important\">Important</label>\n" +
+		              "\t<p><input type=\"submit\" value=\"Submit\" /> " +
+		              "<input type=\"reset\" value=\"Reset\" /></p>\n" +
+		              "</form>\n",
+		              @game.event(nil, "send_mail") do
+		                  text "subject", "maxlength" => 100
+		                  html "<img src=\"form_img.gif\" />"
+		                  text "message"
+		                  radios "priority", %w{low medium important},
+		                         "low" => { "checked" => "checked" }
+						  @element_style = :raw
+		              end )
+	end
+end

data/test/tc_game.rb ADDED

@@ -0,0 +1,29 @@
+#!/usr/local/bin/ruby -w
+# tc_game.rb
+#
+#  Created by James Edward Gray II on 2005-06-03.
+#  Copyright 2005 Gray Productions. All rights reserved.
+require "test/unit"
+require "gambit/server/gambiterror"
+require "test_game"
+class TestGame < Test::Unit::TestCase
+	def test_events
+		assert_not_nil(game = MyGame.new)
+		assert_equal( "Passed:  {\"setting\"=>\"value\"}",
+		              game.do_event(nil, "test", "setting" => "value") )
+		assert_raise(Gambit::Server::GambitError) { game.do_event(nil, "none") }
+		assert_equal("index.rhtml", game.do_login(nil))
+		assert_equal("index.rhtml", game.do_configure(nil))
+		assert_equal("Game number:  #{game.object_id}.", game.name)
+		assert_equal( "index.rhtml",
+		              game.do_configure( nil,
+		                                 "game_name" => "James's Revenge!" ) )
+		assert_equal("James's Revenge!", game.name)
+	end
+end

data/test/tc_message.rb ADDED

@@ -0,0 +1,35 @@
+#!/usr/local/bin/ruby -w
+# tc_message.rb
+#
+#  Created by Gregory Brown on 2005-06-04.
+#  Copyright 2005 smtose.org. All rights reserved.
+require "test/unit"
+require "gambit/server/message"
+class TestMessage < Test::Unit::TestCase
+	def setup
+		@message = Gambit::Server::Message.new( "Gregory Brown", "James Gray",
+		                                        "Test Message", "A test" )
+		@message.cc << "Allen Turechek" << "Emily Laskin"
+	end
+	def test_add_cc
+		@message.cc << "Prateek Bahl"
+		assert_equal( ["Allen Turechek", "Emily Laskin", "Prateek Bahl"],
+		              @message.cc )
+	end
+	def test_text_view
+		assert_equal( "From: Gregory Brown\n" +
+		              "To: James Gray\n" +
+		              "CC: Allen Turechek, Emily Laskin\n" +
+		              "Subject: Test Message\n\n"+
+			          "A test\n\n" +
+			          "Sent: #{Time.now}\n", @message.view(:gambit_text) )
+		assert_equal( "Gregory Brown\tTest Message\tSent: #{Time.now}",
+			          @message.view(:gambit_text_short) )
+	end
+end