bin/rbot

   1 #!/usr/bin/env ruby
   2
   3 # Copyright (C) 2002 Tom Gilbert.
   4 #
   5 # Permission is hereby granted, free of charge, to any person obtaining a copy
   6 # of this software and associated documentation files (the "Software"), to
   7 # deal in the Software without restriction, including without limitation the
   8 # rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
   9 # sell copies of the Software, and to permit persons to whom the Software is
  10 # furnished to do so, subject to the following conditions:
  11 #
  12 # The above copyright notice and this permission notice shall be included in
  13 # all copies of the Software and its documentation and acknowledgment shall be
  14 # given in the documentation and software packages that this Software was
  15 # used.
  16 #
  17 # THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  18 # IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  19 # FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  20 # THE AUTHORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
  21 # IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
  22 # CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
  23
  24 $VERBOSE=true
  25
  26 require 'etc'
  27 require 'getoptlong'
  28 require 'fileutils'
  29 require 'rbconfig'
  30
  31 begin
  32   require 'rbot/ircbot'
  33 rescue LoadError => e
  34   puts "Error: couldn't find the rbot/ircbot module for loading\n - did you install rbot using install.rb?"
  35   exit 2
  36 end
  37
  38 $debug = true
  39 $version="0.9.8"
  40 $opts = Hash.new
  41
  42 # print +message+ if debugging is enabled
  43 def debug(message=nil)
  44   print "DEBUG: #{message}\n" if($debug && message)
  45   #yield
  46 end
  47
  48 opts = GetoptLong.new(
  49   ["--debug", "-d", GetoptLong::NO_ARGUMENT],
  50   ["--help",  "-h", GetoptLong::OPTIONAL_ARGUMENT],
  51   ["--version", "-v", GetoptLong::NO_ARGUMENT]
  52 )
  53
  54 opts.each {|opt, arg|
  55   $debug = true if(opt == "--debug")
  56   $opts[opt.sub(/^-+/, "")] = arg
  57 }
  58
  59 if ($opts["version"])
  60   puts "rbot #{$version}"
  61   exit 0
  62 end
  63
  64 if(bot = Irc::IrcBot.new(ARGV.shift))
  65   if($opts["help"])
  66     # query bot help from the commandline
  67     puts bot.help($opts["help"])
  68   else
  69     # just run the bot
  70     bot.mainloop
  71   end
  72 end
  73