bro website watcher

bro-exchange-update-watcher.bro

redef exit_only_after_terminate = T;

module BroExchangeWatch;

export {
	redef enum Notice::Type += {
		Woo,
	};
}

# We store the current etag here so we can watch for it to change.
global current_etag = "";

event check_website()
	{
	when ( local resp = ActiveHTTP::request([$url="http://www.bro.org/community/exchange2013.html"]) )
		{
		if ( current_etag == "" )
			current_etag = resp$headers["ETag"];

		if ( current_etag != resp$headers["ETag"] )
			{
			print "Bro Exchange 2013 webpage updated!";
			NOTICE([$note=BroExchangeWatch::Woo,
			        $msg=fmt("Are the videos posted?")]);
			}
		schedule 30secs { check_website() };
		}
	timeout 1min
		{
		schedule 30secs { check_website() };
		}
	}

event bro_init()
	{
	event check_website();
	}