bougyman-autumn 3.1.1

data/lib/skel/leaves/scorekeeper/views/history.txt.erb

@@ -0,0 +1,11 @@
+<% if var(:no_history) %>
+	<%= var :person %> is not a part of the scoring system.
+<% elsif var(:no_giver_history) %>
+	<%= var :giver %> has not awarded any points to <%= var(:receiver).name %>.
+<% elsif var(:scores).empty? %>
+	<%= var(:receiver).name %> has no points history.
+<% else %>
+	<% var(:scores).each do |score| %>
+		[<%= score.created_at.strftime '%m/%d %I:%M %p' %>] <%= score.giver.name %> <%= score.change > 0 ? 'gave' : 'docked' %> <%= score.receiver.name %> <%= score.change.abs.pluralize('point') %><% if score.note %>: <%= score.note %><% end %>
+	<% end %>    
+<% end %>

data/lib/skel/leaves/scorekeeper/views/points.txt.erb

@@ -0,0 +1,5 @@
+<% if var(:totals).empty? %>
+	No one has any points yet.
+<% else %>
+	<%= var(:totals).collect { |person, score| "#{person}: #{score}" }.join(', ') %>
+<% end %>

data/lib/skel/leaves/scorekeeper/views/usage.txt.erb

@@ -0,0 +1 @@
+Examples: "!points", "!points Sancho +5", "!points Smith history", "!points Sancho history 2/27/08", "!points Sancho history Smith"

data/lib/skel/log/README

@@ -0,0 +1 @@
+logs go in this directory

data/lib/skel/script/console

@@ -0,0 +1,28 @@
+#!/usr/bin/env ruby
+#
+# Launches an IRb console with the Autumn environment loaded.
+
+AL_ROOT = File.expand_path("#{File.dirname(__FILE__)}/..")
+Dir.chdir AL_ROOT
+
+# Some code below is from Ruby on Rails and copyright (c) David Heinemeier
+# Hansson.
+
+irb = RUBY_PLATFORM =~ /(:?mswin|mingw)/ ? 'irb.bat' : 'irb'
+
+require 'optparse'
+options = { :irb => irb }
+OptionParser.new do |opt|
+  opt.banner = "Usage: #{File.basename(__FILE__)} [options]"
+  opt.on("--irb=[#{irb}]", 'Invoke a different irb.') { |v| options[:irb] = v }
+  opt.parse!(ARGV)
+end
+
+libs =  " -r irb/completion"
+libs << " -r autumn"
+libs << " -r autumn/console_boot"
+
+require "autumn"
+ENV["AUTUMN_ROOT"] = AL_ROOT
+puts "Loading Autumn #{Autumn::Version} in #{AL_ROOT} ..."
+exec "#{options[:irb]} #{libs}"

data/lib/skel/script/destroy

@@ -0,0 +1,48 @@
+#!/usr/bin/env ruby
+#
+# == Synopsis
+#
+# Destroys the files for leaves, seasons, and other objects of the Autumn
+# framework.
+#
+# == Usage
+#
+# script/destroy <options> <object> <name>
+#
+# <object>:: The object type to destroy. Valid types are "leaf" and "season".
+# <name>:: The name of the object to destroy. For example, you can call
+#          "script/destroy leaf Scorekeeper" to remove a leaf named Scorekeeper.
+#
+# == Options
+#
+# --help, -h:: Displays this usage information.
+# --vcs, -c:: Remove any created files or directories from the project's version
+#             control system. (Autodetects CVS and Subversion.)
+
+require 'libs/script'
+
+opts = GetoptLong.new(
+  [ '--help', '-h', GetoptLong::NO_ARGUMENT ],
+  [ '--vcs', '-c', GetoptLong::NO_ARGUMENT ]
+)
+
+script = Autumn::Script.new
+
+begin
+  opts.each do |opt, arg|
+    case opt
+      when '--help' then RDoc::usage
+      when '--vcs' then script.use_vcs
+    end
+  end
+rescue GetoptLong::InvalidOption
+  RDoc::usage
+  exit 0
+end
+
+exit(0) unless script.parse_argv(ARGV)
+
+case script.object
+  when 'leaf' then script.call_generator(:unleaf)
+  when 'season' then script.call_generator(:unseason)
+end

data/lib/skel/script/generate

@@ -0,0 +1,48 @@
+#!/usr/bin/env ruby
+#
+# == Synopsis
+#
+# Generates template files for leaves, seasons, and other Autumn objects.
+#
+# == Usage
+#
+# script/generate <options> <template> <name>
+#
+# <template>:: The template to create. Valid templates are "leaf" and "season".
+# <name>:: The name to give the created template. For example, you can call
+#          "script/generate leaf Scorekeeper" to create a leaf named
+#          Scorekeeper.
+#
+# == Options
+#
+# --help, -h:: Displays this usage information.
+# --vcs, -c:: Add any created files or directories to the project's version
+#             control system. (Autodetects CVS and Subversion.)
+
+require 'libs/script'
+
+opts = GetoptLong.new(
+  [ '--help', '-h', GetoptLong::NO_ARGUMENT ],
+  [ '--vcs', '-c', GetoptLong::NO_ARGUMENT ]
+)
+
+script = Autumn::Script.new
+
+begin
+  opts.each do |opt, arg|
+    case opt
+      when '--help' then RDoc::usage
+      when '--vcs' then script.use_vcs
+    end
+  end
+rescue GetoptLong::InvalidOption
+  RDoc::usage
+  exit 0
+end
+
+exit(0) unless script.parse_argv(ARGV)
+
+case script.object
+  when 'leaf' then script.call_generator(:leaf)
+  when 'season' then script.call_generator(:season)
+end

data/lib/skel/shared/README

@@ -0,0 +1 @@
+shared library files or helpers belong here

data/lib/skel/tmp/README

@@ -0,0 +1 @@
+temporary files belong here

data/spec/authentication_spec.rb

@@ -0,0 +1,328 @@
+require 'set'
+require 'rubygems'
+require 'facets/string'
+
+require 'libs/authentication'
+
+describe Autumn::Authentication::Base do
+  it "should raise an exception when initialized" do
+    lambda { Autumn::Authentication::Base.new }.should raise_error
+  end
+  
+  it "should implement a default unauthorized method" do
+    Autumn::Authentication::Base.instance_methods.should include('unauthorized')
+  end
+end
+
+describe Autumn::Authentication::Op do
+  before :each do
+    @sender_hash = { :nick => 'Nick', :user => 'User', :host => 'example.com' }
+    @stem = Object.new
+  end
+  
+  it "should be a subclass of Autumn::Authentication::Base" do
+    Autumn::Authentication::Op.ancestors.should include(Autumn::Authentication::Base)
+  end
+  
+  describe "with the default options" do
+    before :each do
+      @auth = Autumn::Authentication::Op.new
+    end
+    
+    it "should not authenticate unvoiced channel members" do
+      @stem.stub!(:privilege).and_return(:unvoiced)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+    end
+    
+    it "should not authenticate voiced channel members" do
+      @stem.stub!(:privilege).and_return(:voiced)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+    end
+    
+    it "should not authenticate half-ops" do
+      @stem.stub!(:privilege).and_return(:halfop)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+    end
+    
+    it "should authenticate ops" do
+      @stem.stub!(:privilege).and_return(:op)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+    end
+    
+    it "should authenticate admins" do
+      @stem.stub!(:privilege).and_return(:admin)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+    end
+    
+    it "should authenticate owners" do
+      @stem.stub!(:privilege).and_return(:channel_owner)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+    end
+  end
+  
+  describe "with custom options" do
+    before :each do
+      @auth = Autumn::Authentication::Op.new :privileges => [ :unvoiced, :op ]
+    end
+    
+    it "should authenticate unvoiced channel members" do
+      @stem.stub!(:privilege).and_return(:unvoiced)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+    end
+    
+    it "should not authenticate voiced channel members" do
+      @stem.stub!(:privilege).and_return(:voiced)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+    end
+        
+    it "should authenticate ops" do
+      @stem.stub!(:privilege).and_return(:op)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+    end
+    
+    it "should not authenticate admins" do
+      @stem.stub!(:privilege).and_return(:admin)
+      @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+    end
+  end
+end
+
+describe Autumn::Authentication::Nick do
+  it "should raise an exception when initialized with no nicks" do
+    lambda { Autumn::Authentication::Nick.new }.should raise_error
+  end
+  
+  it "should not raise an exception when initialized with a nick" do
+    lambda { Autumn::Authentication::Nick.new :nick => 'Nick' }.should_not raise_error
+  end
+  
+  it "should not raise an exception when initialized with an array of nicks" do
+    lambda { Autumn::Authentication::Nick.new :nicks => [ 'Nick1', 'Nick2' ] }.should_not raise_error
+  end
+  
+  describe "initialized with a single nick" do
+    before :each do
+      @auth = Autumn::Authentication::Nick.new(:nick => 'Nick2')
+    end
+    
+    it "should authenticate an authorized nick" do
+      @auth.authenticate(nil, nil, { :nick => 'Nick2' }, nil).should be_true
+    end
+    
+    it "should not authenticate an unauthorized nick" do
+      @auth.authenticate(nil, nil, { :nick => 'Nick3' }, nil).should be_false
+    end
+  end
+  
+  describe "initialized with multiple nicks" do
+    before :each do
+      @auth = Autumn::Authentication::Nick.new(:nicks => [ 'Nick1', 'Nick2' ])
+    end
+    
+    it "should authenticate an authorized nick" do
+      @auth.authenticate(nil, nil, { :nick => 'Nick2' }, nil).should be_true
+    end
+    
+    it "should not authenticate an unauthorized nick" do
+      @auth.authenticate(nil, nil, { :nick => 'Nick3' }, nil).should be_false
+    end
+  end
+end
+
+describe Autumn::Authentication::Hostname do
+  it "should raise an exception when initialized with no hosts" do
+    lambda { Autumn::Authentication::Hostname.new }.should raise_error
+  end
+  
+  it "should not raise an exception when initialized with a host" do
+    lambda { Autumn::Authentication::Hostname.new :host => 'host1.com' }.should_not raise_error
+  end
+  
+  it "should not raise an exception when initialized with an array of hosts" do
+    lambda { Autumn::Authentication::Hostname.new :hosts => [ 'host1.com', 'host2.com' ] }.should_not raise_error
+  end
+  
+  describe "with the default hostmask" do
+    describe "initialized with a single host" do
+      before :each do
+        @auth = Autumn::Authentication::Hostname.new(:host => 'ca.host1.com')
+      end
+    
+      it "should authenticate an authorized host" do
+        @auth.authenticate(nil, nil, { :host => 'wsd1.ca.host1.com' }, nil).should be_true
+      end
+    
+      it "should not authenticate an unauthorized host" do
+        @auth.authenticate(nil, nil, { :host => 'unauthorized' }, nil).should be_false
+      end
+    end
+    
+    describe "initialized with multiple hosts" do
+      before :each do
+        @auth = Autumn::Authentication::Hostname.new(:hosts => [ 'host1.com', 'ca.host2.com' ])
+      end
+    
+      it "should authenticate an authorized host" do
+        @auth.authenticate(nil, nil, { :host => 'wsd1.ca.host2.com' }, nil).should be_true
+      end
+    
+      it "should not authenticate an unauthorized host" do
+        @auth.authenticate(nil, nil, { :host => 'unauthorized' }, nil).should be_false
+      end
+    end
+  end
+  
+  describe "with custom String hostmask" do
+    before :each do
+      @auth = Autumn::Authentication::Hostname.new(:hosts => [ '1', '2' ], :hostmask => 'host(\d)\.com')
+    end
+    
+    it "should authenticate an authorized host" do
+      @auth.authenticate(nil, nil, { :host => 'host2.com' }, nil).should be_true
+    end
+    
+    it "should not authenticate an unauthorized host" do
+      @auth.authenticate(nil, nil, { :host => 'host3.com' }, nil).should be_false
+    end
+  end
+  
+  describe "with custom Regexp hostmask" do
+    before :each do
+      @auth = Autumn::Authentication::Hostname.new(:hosts => [ '1', '2' ], :hostmask => /host(\d)\.com/)
+    end
+    
+    it "should authenticate an authorized host" do
+      @auth.authenticate(nil, nil, { :host => 'host2.com' }, nil).should be_true
+    end
+    
+    it "should not authenticate an unauthorized host" do
+      @auth.authenticate(nil, nil, { :host => 'host3.com' }, nil).should be_false
+    end
+  end
+  
+  describe "with custom Proc hostmask" do
+    before :each do
+      @auth = Autumn::Authentication::Hostname.new(:host => 'com', :hostmask => Proc.new { |h| h.split('.').last })
+    end
+    
+    it "should authenticate an authorized host" do
+      @auth.authenticate(nil, nil, { :host => 'host.com' }, nil).should be_true
+    end
+    
+    it "should not authenticate an unauthorized host" do
+      @auth.authenticate(nil, nil, { :host => 'host.net' }, nil).should be_false
+    end
+  end
+end
+
+describe Autumn::Authentication::Password do
+  it "should raise an error when initialized without a password" do
+    lambda { Autumn::Authentication::Password.new }.should raise_error
+  end
+  
+  it "should not raise an error when initialized with a default expire time" do
+    lambda { Autumn::Authentication::Password.new :password => 'abc123' }.should_not raise_error
+  end
+  
+  describe "initialized with a password and custom expire time" do
+    before :each do
+      @sender_hash = { :nick => 'Nick' }
+      @auth = Autumn::Authentication::Password.new :password => 'abc123', :expire_time => 5
+    end
+    
+    it "should not authenticate any nicks" do
+      @auth.authenticate(Object.new, '#channel', @sender_hash, nil).should be_false
+    end
+    
+    it "should, when given a private message with the correct password, respond with a confirmation" do
+      @stem = mock('stem')
+      @stem.should_receive(:message).once.with("Your password has been accepted, and you are now authorized.", @sender_hash[:nick])
+      @auth.irc_privmsg_event(@stem, @sender_hash, :message => 'abc123', :recipient => 'Bot')
+    end
+    
+    it "should not, when given a private message without the correct password, respond with a confirmation" do
+      @stem = mock('stem')
+      @stem.should_not_receive(:message).with("Your password has been accepted, and you are now authorized.", @sender_hash[:nick])
+      @auth.irc_privmsg_event(@stem, @sender_hash, :message => 'abc123x', :recipient => 'Bot')
+    end
+    
+    describe "given the correct password" do
+      before :each do
+        @stem = Object.new
+        @stem.stub!(:message).and_return
+        @auth.irc_privmsg_event(@stem, @sender_hash, :message => 'abc123', :recipient => 'Bot')
+      end
+      
+      it "should authenticate that nick on that stem" do
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+      end
+      
+      it "should not authenticate that nick on a different stem" do
+        @auth.authenticate(Object.new, '#channel', @sender_hash, nil).should be_false
+      end
+      
+      it "should not authenticate a different nick" do
+        @auth.authenticate(@stem, '#channel', { :nick => 'OtherNick' }, nil).should be_false
+      end
+      
+      it "should not authenticate if the owner changes his nick" do
+        @auth.irc_nick_event(@stem, @sender_hash, :nick => 'NewNick')
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+      end
+      
+      it "should not authenticate if someone else takes the nick" do
+        @auth.irc_nick_event(@stem, { :nick => 'OldNick' }, { :nick => 'Nick' })
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+      end
+      
+      it "should authenticate if the owner changes his nick on a different stem" do
+        @auth.irc_nick_event(Object.new, @sender_hash, :nick => 'NewNick')
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+      end
+      
+      it "should authenticate if someone else takes the nick on a different stem" do
+        @auth.irc_nick_event(Object.new, { :nick => 'OldNick' }, { :nick => 'Nick' })
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+      end
+      
+      it "should not authenticate if the nick is kicked" do
+        @auth.irc_kick_event(@stem, {}, :nick => 'Nick')
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+      end
+      
+      it "should authenticate if the nick is kicked on a different stem" do
+        @auth.irc_kick_event(Object.new, {}, :nick => 'Nick')
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+      end
+      
+      it "should not authenticate if the nick quits" do
+        @auth.irc_quit_event(@stem, @sender_hash, {})
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+      end
+
+      it "should authenticate if the nick quits on a different stem" do
+        @auth.irc_quit_event(Object.new, @sender_hash, {})
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+      end
+      
+      it "should revoke the credential after the expire time has passed" do
+        sleep 6
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+      end
+      
+      it "should reset the expire time if a protected command is run" do
+        sleep 4
+        @auth.authenticate @stem, '#channel', @sender_hash, nil
+        sleep 2
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_true
+      end
+      
+      it "... and then revoke the credential after the expire time" do
+        sleep 4
+        @auth.authenticate @stem, '#channel', @sender_hash, nil
+        sleep 6
+        @auth.authenticate(@stem, '#channel', @sender_hash, nil).should be_false
+      end
+    end
+  end
+end

data/spec/channel_leaf_spec.rb

@@ -0,0 +1,141 @@
+require 'logger'
+require 'set'
+
+require 'libs/genesis'
+
+gen = Autumn::Genesis.new
+gen.load_libraries
+gen.load_daemon_info
+
+describe Autumn::ChannelLeaf do
+  before :all do
+    #TODO how do we stub these methods?
+    Autumn::Leaf.class_eval do
+      def irc_privmsg_event(*args); true; end
+      def irc_join_event(*args); true; end
+      def irc_part_event(*args); true; end
+      def irc_mode_event(*args); true; end
+      def irc_topic_event(*args); true; end
+      def irc_invite_event(*args); true; end
+      def irc_kick_event(*args); true; end
+      def irc_notice_event(*args); true; end
+    end
+  end
+  
+  before :each do
+    @logger = Autumn::LogFacade.new Logger.new(STDOUT), 'Leaf', 'Channel Leaf Spec'
+    @stem = Autumn::Stem.new('irc.mockserver.com', 'MockStem', { :channels => [ '#listening', '#notlistening' ]})
+    Autumn::Foliater.instance.stems['Mock'] = @stem
+    @sender_hash = { :nick => 'nick', :host => 'ca.us.host.com', :user => 'user' }
+  end
+  
+  describe "with a valid stem" do
+    before :each do
+      @leaf = Autumn::ChannelLeaf.new :logger => @logger, :channels => { 'Mock' => [ '#listening' ] }
+    end
+    
+    it "should not raise an exception on startup" do
+      lambda { @leaf.will_start_up }.should_not raise_error(RuntimeError, "Unknown stem MockStem")
+    end
+    
+    describe "that has started up" do
+      before :each do
+        @leaf.will_start_up
+      end
+      
+      it "should notice PRIVMSGs on channels it is listening to" do
+        @leaf.irc_privmsg_event(@stem, @sender_hash, { :channel => '#listening', :message => 'message' }).should equal(true)
+      end
+
+      it "should not notice PRIVMSGs on channels it is not listening to" do
+        @leaf.irc_privmsg_event(@stem, @sender_hash, { :channel => '#notlistening', :message => 'message' }).should_not equal(true)
+      end
+
+      it "should notice PRIVMSGs to itself" do
+        @leaf.irc_privmsg_event(@stem, @sender_hash, { :recipient => 'MockStem', :message => 'message' }).should equal(true)
+      end
+
+      it "should notice JOINs on channels it is listening to" do
+        @leaf.irc_join_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice JOINs on channels it is not listening to" do
+        @leaf.irc_join_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice PARTs on channels it is listening to" do
+        @leaf.irc_part_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice PARTs on channels it is not listening to" do
+        @leaf.irc_part_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice MODEs on channels it is listening to" do
+        @leaf.irc_mode_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice MODEs on channels it is not listening to" do
+        @leaf.irc_mode_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice MODE changes to iself" do
+        @leaf.irc_mode_event(@stem, @sender_hash, { :recipient => 'MockStem', :message => 'message' }).should equal(true)
+      end
+
+      it "should notice TOPICs on channels it is listening to" do
+        @leaf.irc_topic_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice TOPICs on channels it is not listening to" do
+        @leaf.irc_topic_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice INVITEs on channels it is listening to" do
+        @leaf.irc_invite_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice INVITEs on channels it is not listening to" do
+        @leaf.irc_invite_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should not notice INVITEs to me to channels I am not listening to" do
+        @leaf.irc_invite_event(@stem, @sender_hash, { :recipient => 'MockStem', :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice INVITEs to me to channels I am not a part of" do
+        @leaf.irc_invite_event(@stem, @sender_hash, { :recipient => 'MockStem', :channel => '#notamember' }).should equal(true)
+      end
+
+      it "should notice KICKs on channels it is listening to" do
+        @leaf.irc_kick_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice KICKs on channels it is not listening to" do
+        @leaf.irc_notice_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice NOTICEs on channels it is listening to" do
+        @leaf.irc_notice_event(@stem, @sender_hash, { :channel => '#listening' }).should equal(true)
+      end
+
+      it "should not notice NOTICEs on channels it is not listening to" do
+        @leaf.irc_notice_event(@stem, @sender_hash, { :channel => '#notlistening' }).should_not equal(true)
+      end
+
+      it "should notice NOTICEs to itself" do
+        @leaf.irc_notice_event(@stem, @sender_hash, { :recipient => 'MockStem', :message => 'message' }).should equal(true)
+      end
+    end
+  end
+  
+  describe "with an invalid stem" do
+    before :each do
+      @leaf = Autumn::ChannelLeaf.new :logger => @logger, :channels => { 'Nonexistent' => [ '#listening' ] }
+    end
+    
+    it "should raise an exception on startup" do
+      lambda { @leaf.will_start_up }.should raise_error(RuntimeError, "Unknown stem Nonexistent")
+    end
+  end
+end