gnms 2.1.0.rc1

data/lib/notify/irc_bot.rb

@@ -0,0 +1,167 @@
+#!/usr/bin/env ruby
+#doing my own class here as the xmpp project seems not maintain anymore
+
+require 'socket'
+
+class IrcBot
+
+  def initialize()
+    if $config.irc_daemon && ($config.irc_server != "")
+      @buff = MsgBuffer.new(1)
+      @connected = 0
+      @channel = $config.irc_channel
+      if !@channel or @channel == ""
+        $log.error("IRC bot error: channel not set")
+        return false
+      end
+      @server = $config.irc_server
+      @port = isInteger($config.irc_port) ? $config.irc_port : 6667
+      @botname = "gnmsbot"
+      $log.info("Starting IRC bot #{@server}:#{@port} on channel ##{@channel}")
+      begin
+        @socket = TCPSocket.open(@server, @port)
+      rescue Exception => msg
+        $log.error("IRC bot error: #{msg}")
+        return false
+      end
+      try_join(@botname)
+      run()
+    end
+  end
+
+  def try_join(nm)
+    say "NICK #{nm}"
+    say "USER #{nm} 0 * #{nm}"
+    #try to join
+    say "JOIN ##{@channel}"
+  end
+  
+  def say(msg)
+    $log.debug("IRC bot sent: #{msg}")
+    @socket.puts msg
+  end
+
+  def say_to_chan(msg)
+    $log.debug("IRC bot sent: #{msg}")
+    say "PRIVMSG ##{@channel} :#{msg}"
+  end
+
+  def say_to_user(user, msg)
+    $log.debug("IRC bot sent to #{user}: #{msg}")
+    say "PRIVMSG #{user} :#{msg}"
+  end
+  
+  def run
+    @sender = Thread.start do
+      while $config.irc_daemon
+        send_messages if @buff.full?
+        Thread.pass
+        sleep(2)
+      end
+      $log.debug("end of IrcBot sender thread")
+    end
+    @receiver = Thread.start do
+      until $config.irc_daemon and @socket.eof? do
+        msg = @socket.gets
+        if (msg)
+          msg.chomp!
+          $log.debug("IRC bot received: #{msg}")
+
+          if msg.match(/^PING :(.*)$/)
+            say "PONG #{$~[1]}"
+            next
+          end
+
+          if msg.match(/:(.+)!~.+ PRIVMSG #{@botname} :(.*)$/)
+            sender = $~[1]
+            content = $~[2]
+            if sender != ""
+              if content and content.match(/^status$/)
+                $host.each_value {|node|
+                  say_to_user(sender, "IP #{node.ip} status is #{$status[$status_value.index(node.status)]}")
+                }
+              else
+                say_to_user(sender, "status - display stats regarding known hosts")
+              end
+            end
+            next
+          end
+          
+          if msg.match(/PRIVMSG ##{@channel} :(.*)$/)
+            content = $~[1]
+            if content.match(/^beer$/)
+              say_to_chan "Gimme a free beeeeeeeer"
+            end
+            next
+          end
+          
+          if msg.match(/\s433\s/)
+            if @connected == 0
+              #nickname may be already in use
+              @botname += "-#{rand(2**256).to_s(36)[0..4]}"
+              $log.info("Irc bot renamed to #{@botname}")
+              try_join(@botname)
+              @connected = 1
+            else
+              $log.fatal("Irc bot can't connect #{msg}")
+              stop()
+            end
+            next
+          end
+          
+          if msg.match(/:End of \/MOTD/)
+            #as there was a MOTD the join may have not succeed
+            say "JOIN ##{@channel}"
+            @connected = 1
+            next
+          end
+        end
+        Thread.pass
+      end
+      $log.debug("end of IrcBot receiver thread")
+    end
+  end
+
+  def add_in_queue(msg)
+    $log.debug("irc message added in queue")
+    if  $config.irc_daemon
+      @buff.put msg unless !@buff
+    end
+  end
+
+  def stop()
+    if defined?(@sender) && (@sender != nil)
+      $log.info("Stopping IRC bot")
+      quit()
+      sleep(1)
+      Thread.kill(@sender)
+      Thread.kill(@receiver) if @receiver != nil
+      @socket.close
+      @connected = 0
+      $log.debug("end of IrcBot threads")
+    end
+  end
+
+  def quit
+    say "PART ##{@channel} :Bye"
+    say 'QUIT'
+  end
+
+  private
+  def send_messages()
+    while @connected and @buff.has_more?
+      irc_msg=@buff.get
+      if irc_msg != nil
+        begin
+          say_to_chan(irc_msg)
+          sleep(1)
+          Thread.pass if @buff.full?
+        rescue Exception => msg
+          #catch when stream is closed by close() method
+          $log.error(msg)
+        end
+      end
+    end
+  end
+
+end

data/lib/notify/xmpp_bot.rb

@@ -0,0 +1,107 @@
+begin
+  require "#{GNMSLIB}"+'/external/xmpp4r-simple.rb'
+rescue LoadError
+  $log.error("Xmpp4r is not installed, you should install the gem to have IM notification")
+end
+
+class XmppBot
+  def initialize()
+    #Jabber::debug = true
+    if $config.im_daemon && ($config.im_login != "")
+      @buff=MsgBuffer.new(1)
+      $log.info("Starting XMPP bot")
+      begin
+        timeout(10) {@messenger = Jabber::Simple.new($config.im_login, $config.im_password)}
+      rescue Timeout::Error
+        $log.error("XMPP bot error: can't connect to #{$config.im_login}")
+        return false
+      rescue Exception=> msg
+        $log.error("XMPP bot error: #{msg}")
+        return false
+      end
+      @sender = Thread.start do
+        while $config.im_daemon
+          send_messages if @buff.full?
+          sleep(2)
+          Thread.pass
+          @messenger.received_messages do |msg|
+            $log.debug("Send from "+ msg.from.node+"@"+msg.from.domain + " \"#{msg.body}\"")
+            case msg.body
+            when /^help/i
+              @messenger.deliver(msg.from, "status - display stats regarding host alived\nstatus ip - display the status of the given ip")
+            when /^beer/i
+              @messenger.deliver(msg.from, "Gimme a free beeeeeeeer")
+            when /^status/i
+              hup=0
+              hdown=0
+              begin
+                $host.each_key {|ip|
+                  if $host[ip] && ($host[ip].status == NORMAL)
+                    hup=hup+1
+                  else
+                    hdown=hdown+1
+                  end
+                }
+              rescue Exception => msg
+                $log.error(msg)
+              end
+              @messenger.deliver(msg.from, "Active Host" + ($host.size<2?" ":"s ") + "#{hup}/#{$host.size}")
+            when /^info\s+/i
+              ipasked=msg.body.gsub(/info\s+/,"")
+              if isValidIPv4(ipasked)
+                if $host[ipasked]
+                  @messenger.deliver(msg.from, "Ip node #{ipasked} status is #{$status[$status_value.index($host[ipasked].status)]}")
+                elsif $network[ipasked]
+                  @messenger.deliver(msg.from, "Network node #{ipasked} status is #{$status[$status_value.index($network[ipasked].status)]}")
+                else
+                  @messenger.deliver(msg.from, "Unkown ip address #{ipasked}")
+                end
+              else
+                @messenger.deliver(msg.from, "#{ipasked} is not a valid ip address")
+              end
+
+            else
+              @messenger.deliver(msg.from, "Sorry , I didn't understand that. Message me with 'help' for a list of commands")
+            end
+          end
+        end
+        $log.debug("end of XmppBot thread")
+      end
+    end
+  end
+
+  def add_in_queue(im_recipient, msg)
+    $log.debug("xmpp add message in queue")
+    if  $config.im_daemon
+      @buff.put im_recipient+"|"+msg unless !@buff
+    end
+  end
+
+  def stop()
+    if defined?(@sender) && (@sender != nil)
+      $log.info("Stopping XMPP bot")
+      @messenger.disconnect unless !@messenger
+      Thread.kill(@sender)
+      $log.debug("end of XmppBot thread")
+    end
+  end
+
+  private
+  def send_messages()
+    while @buff.has_more?
+      im_msg=@buff.get
+      if im_msg != nil
+        begin
+          $log.debug("in xmpp send_messages: #{im_msg}")
+          pos=im_msg.index('|')
+          @messenger.deliver(im_msg[0..pos-1],im_msg[pos+1..im_msg.size-1])
+          sleep(2)
+          Thread.pass if @buff.full?
+        rescue Exception => msg
+          #catch when stream is closed by close() method
+          $log.error(msg)
+        end
+      end
+    end
+  end
+end

data/lib/service.rb

@@ -0,0 +1,36 @@
+class Service
+	attr_reader :protocol
+   attr_accessor :port, :name, :monitor, :severity
+
+   def initialize (proto, p, n="?", s=1, sev=0)
+      @protocol=proto
+      @port=p
+      @name=n
+		if (s==1) || (s==true)
+		   @monitor=1
+		else
+		   @monitor=0
+		end
+      @severity = sev
+  end
+
+  def set_protocol(str)
+		case str.downcase()
+		when "tcp"
+			@protocol="tcp"
+		when "udp"
+			@protocol="udp"
+		else
+			puts "error setting protocol"
+		end
+  end  
+
+  def switch_state()
+		@state ^=1
+  end
+
+  def monitored?()
+		return @monitor==1
+  end
+
+end #class

data/lib/version.rb

@@ -0,0 +1,8 @@
+GNMSMAJORVERSION=2
+GNMSMINORVERSION=1
+GNMSTAGVERSION=0
+if GNMSTAGVERSION != ""
+	GNMSVERSION = "#{GNMSMAJORVERSION}.#{GNMSMINORVERSION}.#{GNMSTAGVERSION}"
+else
+	GNMSVERSION = "#{GNMSMAJORVERSION}.#{GNMSMINORVERSION}"
+end

data/pixmap/os/sgi.xpm

@@ -0,0 +1,111 @@
+/* XPM */
+static char * sgi_xpm[] = {
+"47 47 61 1",
+" 	c None",
+".	c #DFEBDF",
+"+	c #EFEBEF",
+"@	c #DFEBEF",
+"#	c #EFDBEF",
+"$	c #DFDBDF",
+"%	c #CFDBDF",
+"&	c #D7D3D7",
+"*	c #CFCBCF",
+"=	c #BEC3C7",
+"-	c #9EAAAE",
+";	c #514161",
+">	c #F7F3F7",
+",	c #EFEBFF",
+"'	c #8E698E",
+")	c #302830",
+"!	c #CFBACF",
+"~	c #717D79",
+"{	c #202030",
+"]	c #716171",
+"^	c #202020",
+"/	c #000000",
+"(	c #AEAAAE",
+"_	c #616586",
+":	c #201030",
+"<	c #203041",
+"[	c #302041",
+"}	c #202041",
+"|	c #AEBABE",
+"1	c #303051",
+"2	c #302051",
+"3	c #BEBABE",
+"4	c #616171",
+"5	c #101020",
+"6	c #7D9EBE",
+"7	c #3C5D7D",
+"8	c #BEAABE",
+"9	c #A2A2A6",
+"0	c #828282",
+"a	c #AEBAAE",
+"b	c #AEAABE",
+"c	c #080810",
+"d	c #AE9AAE",
+"e	c #515161",
+"f	c #9EAA9E",
+"g	c #9E9AAE",
+"h	c #9E929E",
+"i	c #8E929E",
+"j	c #495971",
+"k	c #96928E",
+"l	c #8E8A8E",
+"m	c #385D38",
+"n	c #718A8E",
+"o	c #414141",
+"p	c #BEAAAE",
+"q	c #38FB30",
+"r	c #414161",
+"s	c #413051",
+"t	c #413041",
+"u	c #696961",
+"v	c #616161",
+"                                               ",
+".+++@+++@+++@+++@+++@+++@+++.#.$$$%$&&&***=&-; ",
+">@+@,@+@,@+@,@+@,@+@,@+@,@+@@@@.$.$%%%*&*&*=') ",
+">+@+++@+++@+++@+++@+++@+++@#.$.$$$&&&*&***=!~{ ",
+">@,@+@,@+@,@+@,@+@,@+@,@+@@@@.$.$%%%*&*=*===]^ ",
+">+++@///////////////////////////////////(!==_: ",
+">@+@,////////////<[<[<[<[<}{}{{{{{{{{{{{>==|]^ ",
+">+@++/////////////12121[[///////{{{:{{{:>33345 ",
+">@,@+//////////////671277/////////}{{{}{>|=|]5 ",
+">+++@////////////6777//7677/////////{:{:>3|845 ",
+">@+@,//////////677790//907677////////{{{>|3a_5 ",
+">+@++////////6777//90//90//7677///////{:>3a845 ",
+">@,@+///////677////90//90////767//////}{>aba_5 ",
+">+++@///////7767///90//90///6777///////:>8((45 ",
+">@+@,/////////7767/90//90/6777/////////{>ab-_5 ",
+">+@++///////6///77670//96777///6///////:>(((45 ",
+">@,@+//////6767///77666777///6777//////{>-b-_c ",
+">+++@//////677767//977770//677767//////:>(-de5 ",
+">@+@,//////67//776700//996777//67//////{>-(f_c ",
+">+@++//////67///97767//67779///67/////{:>dfde5 ",
+">@,@+//////67/9900067//6700099/67/////}{>-gf_c ",
+">+++@//////67900///679967///00967/////{:>dhgec ",
+">@+@,//////670///9967006799///067////{{{>fgijc ",
+">+@++///////6//990067//670099//6/////{{:>hhhec ",
+">@,@+////////6900//67//67//0096/////{{}{>ihijc ",
+">+++.///////767////67//67////677////{:{:>hihec ",
+">@+@@////////7767//67//67//6777////{{{{{>ihkec ",
+">+.#.//////////776767{{676777/////{:{{{:>hkkec ",
+">@@@$////////////7767{}6777/////{{}{{{}{>kik;/ ",
+">#.$$////////////:{77:{67:{:{:{:{:{:{:{:>hllmc ",
+">.$.$//////////{{{{{{{{{{{{{{{{{{{{{{{{{>kln;/ ",
+">$.$$(>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>ll'o/ ",
+">%$%$%*%*=*=*====|3|8abab(b-(-gfgihih///lnln;/ ",
+">$%$&&&***=!=!3338|8ap(((((dfdhghhihk/qq3'~'o/ ",
+">%$%*&*&*=*====|3||aba(-(-(fgfgihihkik3|=n'~r/ ",
+">(~]~]~]]]4]4]4]4_4_4_e_e_e_eje;e;m;m;o;o;oso/ ",
+"~///////////////////////////////////////////// ",
+"          >4omom)=|di'4eot){^5^[)t1tu          ",
+"         >(u4u4ue14n'n4eo115:{1m4u_4{u         ",
+"        >$~'ll~'l'vvos1t1t1sme~'llkk4)u        ",
+"       >>fgfgfg-dfg-(-(-(-(-(-b-(-ba(4{u       ",
+"      >>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>4)       ",
+"      >((((((((((((((((((((((((((((((((/       ",
+"      >((((((((((((((((((((((((((((((((/       ",
+"      _////////////////////////////////{       ",
+"      (lvvvvvuvvvuvuvuvuuuv]uuu]u]_]u]_(       ",
+"                                               "};