From 21949774b91eaec6ecde4eaa8ad121e2c0a36b87 Mon Sep 17 00:00:00 2001 From: Tom Gilbert Date: Wed, 27 Jul 2005 15:59:13 +0000 Subject: rearrange repo for packaging --- bin/rbot | 64 ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 64 insertions(+) create mode 100755 bin/rbot (limited to 'bin') diff --git a/bin/rbot b/bin/rbot new file mode 100755 index 00000000..6f08fe57 --- /dev/null +++ b/bin/rbot @@ -0,0 +1,64 @@ +#!/usr/bin/env ruby + +# Copyright (C) 2002 Tom Gilbert. +# +# 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 of the Software and its documentation and acknowledgment shall be +# given in the documentation and software packages that this Software was +# used. +# +# 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 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. + +$VERBOSE=true + +require 'getoptlong' +require 'rbot/ircbot' + +$debug = true +$version="0.9.8" +$opts = Hash.new + +# print +message+ if debugging is enabled +def debug(message=nil) + print "DEBUG: #{message}\n" if($debug && message) + #yield +end + +opts = GetoptLong.new( + [ "--debug", "-d", GetoptLong::NO_ARGUMENT ], + [ "--help", "-h", GetoptLong::OPTIONAL_ARGUMENT ] +) + +opts.each {|opt, arg| + $debug = true if(opt == "--debug") + $opts[opt.sub(/^-+/, "")] = arg +} + +botclass = ARGV.shift +botclass = "rbotconf" unless(botclass); + +unless FileTest.directory? botclass + # TODO copy in samples/templates from install directory +end + +if(bot = Irc::IrcBot.new(botclass)) + if($opts["help"]) + puts bot.help($opts["help"]) + else + # run the bot + bot.mainloop + end +end + -- cgit v1.2.3