online/offline in a greet

Snorly · Post by **Snorly** » Sat Jun 30, 2007 5:20 am

hello.
i was wondering if u can make me simple script that checks if site is online but it would say it when u come on channel like...

[11:08:40] * Now talking in #egghelp.org
[11:08:40] * Topic is 'bla bla bla'
[11:08:41] -bot- Welcome! the site www.egghelp.org is ONLINE!

and if the site is not online

[11:08:40] * Now talking in #egghelp.org
[11:08:40] * Topic is 'bla bla bla'
[11:08:41] -bot- Welcome! the site www.egghelp.org is OFFLINE!

tnx

Snorly · Post by **Snorly** » Sun Jul 01, 2007 9:28 am

i see no one replayed so this is hard?

you cant do it?

DragnLord · Post by **DragnLord** » Sun Jul 01, 2007 11:23 am

Snorly wrote:i see no one replayed so this is hard?

you cant do it?

This has nothing to do with being "hard", nor with being able to do it.
My guess is that no one wants to do it.

This is a "request" forum, no one is obligated to make requests, I suggest a lot more patience.

Snorly · Post by **Snorly** » Mon Jul 02, 2007 8:31 am

oh i see

tnx anyway

iamdeath · Post by **iamdeath** » Mon Jul 02, 2007 10:41 am

What's the website you will check status on/off ?

Snorly · Post by **Snorly** » Tue Jul 03, 2007 3:11 pm

http://www.partis.si
and http://www.si-shell.net

iamdeath · Post by **iamdeath** » Tue Jul 03, 2007 6:17 pm

It's not in English so atleast I can't help I am sorry.

Snorly · Post by **Snorly** » Wed Jul 04, 2007 8:33 am

u can make it in English and i will edit it.

DragnLord · Post by **DragnLord** » Wed Jul 04, 2007 9:22 am

iamdeath wrote:It's not in English so atleast I can't help I am sorry.

Snorly wrote:u can make it in English and i will edit it.

I believe iamdeath meant the websites.

Snorly · Post by **Snorly** » Wed Jul 04, 2007 12:09 pm

oh ok i have some other website to check

so can u make it for -> http://www.filelist.org ?

speechles · Post by **speechles** » Wed Jul 04, 2007 12:51 pm

Code: Select all

package require http
set query "http://www.filelist.org"
set ua "Lynx"
set http [::http::config -useragent $ua]
catch {set http [::http::geturl "$query" -timeout [expr 1000 * 5]]} error
if {$error != "" } {
	putserv "NOTICE $nick :Welcome! the site ${query} is OFFLINE!"
} else {
	putserv "NOTICE $nick :Welcome! the site ${query} is ONLINE!"
}

I'm assuming that your request meant to only check if the site was loadable, not to actually scrape anything from it. The above snippet will accomplish it. Someone else can turn this into a full script for you if they care to, or you yourself can with basic tcl knowledge.

Snorly · Post by **Snorly** » Wed Jul 04, 2007 1:06 pm

yes thats it

can u add that i set a channel i dont want to greet with this on all channels

Snorly · Post by **Snorly** » Wed Jul 04, 2007 1:28 pm

and btw the bot does not greet me :S
thats what happends when i rehash the bot
[19:29:10] <h3lp> [19:50] -h3lp (help@users.si-shell.net)- Welcome! the site http://www.si-shell.net is OFFLINE!

but the web page is online

r0t3n · Post by **r0t3n** » Wed Jul 04, 2007 2:00 pm

Just because an error is returned doesn't mean its offline, speechles should of checked the error.

Maybe something like below:

Code: Select all

package require http

bind join -|- {*} greet:join

proc greet:join {nick uhost hand chan} {
  if {[string equal -nocase #mychannel $chan]} {
    set site "http://www.mysite.com"
    set useragent "Lynx"
    set timeout "5000"; # 1000 = 1 second
    http::config -useragent $useragent
    set token [http::geturl $site -timeout 5000]
    if {[http::status $token] == "error"} {
      putserv "NOTICE $nickname :Welcome! the site $site is OFFLINE!"
    } else {
      putserv "NOTICE $nickname :Welcome! the site $site is ONLINE!"
    } 
    http::cleanup $token
  }
}

Not tested.

iamdeath · Post by **iamdeath** » Wed Jul 04, 2007 4:04 pm

DragnLord wrote:
iamdeath wrote:It's not in English so atleast I can't help I am sorry.

Snorly wrote:u can make it in English and i will edit it.
I believe iamdeath meant the websites.

That's right. I could'nt understand the web language.