room 0.1.3 → 0.2.0

data/VERSION

@@ -1 +1 @@
-0.1.3
+0.2.0

data/bin/room

@@ -30,6 +30,7 @@ opts.parse! ARGV
 
 if ARGV.length > 0
   if ARGV[0] == "for" && !ARGV[1].nil?
+    @room = ARGV[1]
     @filename = find_room ARGV[1]
     unless @filename
       puts "room \"#{ARGV[1]}\" not found"
@@ -39,24 +40,37 @@ if ARGV.length > 0
     usage
   end
 else
+  @room = "beginners"
   @filename = find_room "beginners"
 end
 
-reload! @filename
+reload! @room, @filename
+
+if Array === $state[:history]
+  $state[:history].each { |h| Readline::HISTORY.push h }
+else
+  $state[:history] = []
+end
 
 3.times { Printer.puts }
 
+trap("INT", "SIG_IGN")
+
 Room.do "look"
 loop do
   line = if $secretive
     $secretive = false
     HighLine.new.ask("> ") { |q| q.echo = false }
   else
-    Readline.readline("> ", true)
+    x = Readline.readline("> ", true)
+    $state[:history] << x if x
+    x
   end
   
   break unless line
   Room.do line.chomp
+  
+  save!
 end
 
 Printer.puts "\nThe world is your cantaloupe."

data/lib/room.rb

@@ -1,13 +1,58 @@
 
 require "thread"
 
-def reload! filename=nil
+$state = {}
+
+def reload! room_name = nil, filename = nil
   $commands = {}
+  
+  $room_name ||= room_name
   $last_filename ||= filename
   
-  old_count = Room.rooms.keys.length
   load $last_filename
-  Room.rooms.keys.length - old_count
+  load!
+  
+  $state[:here] ||= $starting_room
+end
+
+def prefs_paths
+  dir_path = File.expand_path("~/.room")
+  file_path = File.join(dir_path, $room_name)
+  [dir_path, file_path]
+end
+
+def no_save!
+  $no_save = true
+end
+
+def save! obj = $state
+  return if $no_save
+  
+  dir_path, file_path = prefs_paths
+  begin
+    Dir::mkdir dir_path unless File.exist? dir_path
+    File.open(file_path, "wb") { |f| f.write Marshal.dump(obj || {}) }
+    @previous_save_error = false
+  rescue Exception => e
+    unless @previous_save_error
+      Printer.puts "[warning: couldn't save state: #{e}]"
+      @previous_save_error = true
+    end
+  end
+end
+
+def load!
+  _, file_path = prefs_paths
+  return unless File.exist? file_path
+  begin
+    $state = Marshal.load(File.read(file_path))
+    @previous_load_error = false
+  rescue Exception => e
+    unless @previous_load_error
+      Printer.puts "[warning: couldn't load state: #{e}]"
+      @previous_load_error = true
+    end
+  end
 end
 
 class String
@@ -60,7 +105,7 @@ class Room
   end
   
   def inventory
-    $inventory ||= []
+    $state[:inventory] ||= []
   end
   
   def have? item
@@ -78,10 +123,6 @@ class Room
   def do action
     Printer.puts
     if action.strip == ""
-    elsif action == "reload!"
-      d = reload!
-      Printer.puts "A great wave of relief washes over you."
-      Printer.puts "The world seems larger by about #{d}." if d > 0
     elsif (r = self.class.commands.detect { |c, m| c =~ action })
       command, method = r
       args = command.match(action).to_a.drop(1)
@@ -120,22 +161,46 @@ class Room
       $commands[key] ||= DEFAULT_COMMANDS.dup
     end
     
-    def rooms
-      $rooms ||= {}
+    def room key
+      $state[:rooms] ||= {}
+      $state[:rooms][key] = room_keys[key].new if $state[:rooms][key].nil? && room_keys[key]
+      $state[:rooms][key]
+    end
+    
+    def room_keys
+      $room_keys ||= {}
+    end
+    
+    def here
+      room $state[:here]
     end
     
     def go key, look = true
-      if rooms[key]
-        $here = rooms[key]
-        "\n" + $here.look if look
+      if room key
+        $state[:here] = key
+        "\n" + here.look if look
       else
-        $here.unknown_room key
+        here.unknown_room key
       end
     end
     
     def do action
-      if $here
-        $here.do action
+      if action == "debug!"
+        Printer.puts
+        Printer.puts $state.inspect
+      elsif action == "restart!"
+        $state = { :here => $starting_room }
+        Printer.puts
+        Printer.puts "    ....."
+        Printer.puts "Your mind, a wild monkey."
+        Printer.puts "        ....,.,"
+        Room.do "look"
+      elsif action == "reload!"
+        reload!
+        Printer.puts
+        Printer.puts "A great wave of relief washes over you."
+      elsif here
+        here.do action
       else
         Printer.puts
         Printer.puts "Where am I?"
@@ -153,8 +218,9 @@ class Room
     end
     
     def inherited subclass
-      rooms[subclass.key] = subclass.new
-      $here ||= rooms[subclass.key]
+      room_keys[subclass.key] = subclass
+      $starting_room ||= subclass.key
+      $state[:here] ||= $starting_room
     end
     
     def method_added name

data/room.gemspec

@@ -5,11 +5,11 @@
 
 Gem::Specification.new do |s|
   s.name = %q{room}
-  s.version = "0.1.3"
+  s.version = "0.2.0"
 
   s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
   s.authors = ["Tom Lieber"]
-  s.date = %q{2011-04-01}
+  s.date = %q{2011-04-18}
   s.default_executable = %q{room}
   s.description = %q{the game is making the game}
   s.email = %q{tom@alltom.com}
@@ -27,7 +27,8 @@ Gem::Specification.new do |s|
     "bin/room",
     "lib/room.rb",
     "room.gemspec",
-    "rooms/beginners.rb"
+    "rooms/beginners.rb",
+    "rooms/tweets.rb"
   ]
   s.homepage = %q{http://github.com/alltom/room}
   s.require_paths = ["lib"]

data/rooms/tweets.rb

@@ -0,0 +1,260 @@
+
+$ALPHA = "sx8vQ9ZGi4F96dnuNThg"
+$OMEGA = "ZkS8eDam8tTF6tBGxi4A3sxhTTYE0EyCGHb9dAHM"
+
+$failed_requires = []
+%w{ oauth twitter uri }.each do |n|
+  begin
+    require n
+  rescue LoadError
+    $failed_requires << n
+  end
+end
+
+begin
+  require "launchy"
+rescue LoadError
+end
+
+
+def request_token
+  $request_token ||= begin
+    OAuth::Consumer.new($ALPHA, $OMEGA,
+      :site => 'http://twitter.com/',
+      :request_token_path => '/oauth/request_token',
+      :access_token_path => '/oauth/access_token',
+      :authorize_path => '/oauth/authorize'
+    ).get_request_token
+  rescue Exception => e
+    nil
+  end
+end
+
+def authorize_url
+  request_token.authorize_url
+end
+
+def authorize pin
+  begin
+    access = request_token.get_access_token(:oauth_verifier => pin)
+    
+    $state[:twitter_token] = access.token
+    $state[:twitter_secret] = access.secret
+    
+    Twitter.configure do |config|
+      config.consumer_key = $ALPHA
+      config.consumer_secret = $OMEGA
+      config.oauth_token = $state[:twitter_token]
+      config.oauth_token_secret = $state[:twitter_secret]
+    end
+  rescue Exception
+    nil
+  end
+end
+
+def tweet_display_format message
+  message.gsub("\n", " \\ ").gsub("\"", "'")
+end
+
+def latest_tweets
+  tweets = begin
+    Twitter.home_timeline($state[:last_tweet_id] ? { :since_id => $state[:last_tweet_id] } : {}).reverse
+  rescue Twitter::Unauthorized
+    raise
+  rescue Exception => e
+    Printer.puts "[warning: couldn't fetch tweets: #{e.inspect} #{e.class}]"
+    []
+  end
+  
+  $state[:last_tweet_id] = tweets.last.id unless tweets.length == 0
+  
+  tweets
+end
+
+class Entrance < Room
+  def look
+    immediate(
+    "You pull into the crowded parking lot, shove a" |
+    "cinderblock under your car tire, and look up." |
+    "The metallic blue neon sign above the door reads:" |
+    "" |
+    "              DICK'S BAR" |
+    "      \"we all like the same things\"" |
+    "" |
+    "You sure hope so." |
+    "" |
+    "You attempt to open the door, but it won't budge." |
+    "Instead, you see flickers of movement behind two" |
+    "holes in the door about eyes' width apart. You squat" |
+    "to look into them and see someone rummaging..." |
+    ""
+    )
+    
+    if $failed_requires.length > 0
+      which = $failed_requires.first
+      return "\"Hm, that's strange,\" you hear a voice say." |
+      "\"Someone must have done something with my #{which.upcase} gem...\"" |
+      "" |
+      "For no reason, your eyes roll back into your head and" |
+      "you slip out of existence. Should've installed the #{which.upcase} gem!" |
+      go("purgatory")
+    end
+    
+    unless request_token
+      return Purgatory.intro("The Twitter API could not be reached!") |
+      go("purgatory")
+    end
+    
+    "\"Here. Use this.\" A long piece of paper slides beneath the door." |
+    "" |
+    "Type 'look' to look around, but eventually you're going to have to" |
+    "pick up that piece of paper." |
+    quietly_go("entrance2")
+  end
+end
+
+class Entrance2 < Room
+  def look
+    "You're standing in front of Dick's Bar and" |
+    (if have? :paper
+       "you really want to read the piece of paper you're holding."
+     else
+       "you really want to pick up the piece of paper on the ground."
+     end)
+  end
+  
+  def pick_up_that_piece_of_paper
+    if have? :paper
+      huh?
+    else
+      take :paper
+      "You pick up the piece of paper and stuff it in your pocket!" |
+      "But aren't you curious what's on it?"
+    end
+  end
+  dup :pick_up_the_piece_of_paper, :pick_up_piece_of_paper, :pick_up_the_paper, :pick_up_paper
+  dup :get_the_piece_of_paper, :get_piece_of_paper, :get_the_paper, :get_paper
+  
+  def read_the_paper
+    if have? :paper
+      "The paper contains the following message:" |
+      "" |
+      "   #{authorize_url}" |
+      "   SAY YOUR PIN" |
+      "" |
+      "And that's all."
+    else
+      huh?
+    end
+  end
+  dup :read_paper, :look_paper
+  
+  def say_XXX pin
+    return huh? unless have? :paper
+    return huh? if pin !~ /^[0-9]+$/
+    
+    immediate "You speak your pin and the eyes disappear for a moment."
+    immediate
+    
+    if authorize(pin)
+      immediate "And then... the door swings open and the doorman ushers"
+      immediate "you inside. \"Come on, come on.\" The door shuts tight behind you."
+      immediate
+      immediate
+      go("bar")
+    else
+      "\"That is incorrect,\" the voice says and the eyes examine" |
+      "you suspiciously. They seem to peer into your very soul and you" |
+      "feel nervous." |
+      "" |
+      "\"Try again.\""
+    end
+  end
+  dup :XXX
+end
+
+class Purgatory < Room
+  def self.intro reason
+    "BANG! Before you can settle into a virtual persona, a" |
+    "crack appears in the sky and the universe splits into two!" |
+    reason + " And now... well..."
+  end
+  
+  def look
+    @jokes ||= ["What's brown and sticky? A stick! Hahahaha!"]
+    "You are stuck in purgatory. There is nothing to do here but #{@jokes.length > 0 ? "crack a joke or " : ""}'restart!'."
+  end
+  
+  def laugh
+    "You laugh and that makes you feel a little bit better, but still..." | look
+  end
+  
+  def crack_a_joke
+    if joke = @jokes.shift
+      joke
+    else
+      "You are out of jokes."
+    end
+  end
+  
+  def quit
+    exit
+  end
+  dup :q
+end
+
+class Bar < Room
+  def look
+    @tweet_buffer ||= []
+    
+    immediate "The bar."
+    
+    @last_check ||= Time.now - 15
+    if Time.now - @last_check > 10
+      @tweet_buffer += latest_tweets
+      @last_check = Time.now
+    end
+    
+    if @tweet_buffer.length > 0
+      "\n" + @tweet_buffer.shift(3 + rand(2)).map do |tweet|
+        "#{tweet.user.name} says, \"#{tweet_display_format tweet.text}\""
+      end.join("\n\n") + "\n"
+    else
+      "The room is, for the moment, silent."
+    end
+    
+  rescue Twitter::Unauthorized
+    "" |
+    "Out of nowhere, the a bouncer grabs you by the ear and" |
+    "pulls you outside. Apparently the jig is up? Time to" |
+    "re-authenticate. Like your grandma always said: 'OAuth is," |
+    "like, the best thing ever.'" |
+    go("entrance2")
+  end
+  
+  def say_XXX message
+    if message.length > 140
+      "The words get caught in your mouth; you're gargling air." |
+      "You remember the sign on the wall: '140 characters at a time'." |
+      "You were #{message.length - 140} over. :("
+    else
+      immediate "You proclaim to everyone in the room, \"#{tweet_display_format message}\""
+    
+      begin
+        Twitter.update(message)
+        ""
+      rescue Exception
+        "But no one could hear you. Hello? Is this thing on?"
+      end
+    end
+  end
+  
+  def XXX action
+    if defined?(Launchy) && action.strip == URI.extract(action).first
+      Launchy.open(URI.extract(action).first)
+      "You feel elevated to another plane."
+    else
+      huh?
+    end
+  end
+end

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: room
 version: !ruby/object:Gem::Version 
-  hash: 29
+  hash: 23
   prerelease: 
   segments: 
   - 0
-  - 1
-  - 3
-  version: 0.1.3
+  - 2
+  - 0
+  version: 0.2.0
 platform: ruby
 authors: 
 - Tom Lieber
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2011-04-01 00:00:00 -07:00
+date: 2011-04-18 00:00:00 -07:00
 default_executable: room
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -83,6 +83,7 @@ files:
 - lib/room.rb
 - room.gemspec
 - rooms/beginners.rb
+- rooms/tweets.rb
 has_rdoc: true
 homepage: http://github.com/alltom/room
 licenses: []