This is the new home of the egghelp.org community forum.
All data has been migrated (including user logins/passwords) to a new phpBB version.
For more information, see this announcement post . Click the X in the top right-corner of this box to dismiss this message.
Requests for complete scripts or modifications/fixes for scripts you didn't write. Response not guaranteed, and no thread bumping!
Scayett
Voice
Posts: 3 Joined: Tue Mar 27, 2012 7:58 pm
Post
by Scayett » Tue Mar 27, 2012 8:06 pm
Hi,
I've downloaded the
Domain/IP Whois by Sickness (v0.1) script (
link ) and installed it on my bot, however I am thinking the script is broken as all valid requests come up with no results found. Could someone please take a look at it and try update it?
Code: Select all
<@User> !whois google.com
<@Bot> [Whois] No results.
<@User> !whois g.co
<@Bot> [Whois] No results.
<@User> !whois 173.194.41.65
<@Bot> [Whois] No results.
<@User> !whois asdf
<@Bot> [Whois] Bad input (not a valid hostname or IP address)
Thanks!
Regex
Voice
Posts: 19 Joined: Sat Mar 19, 2011 1:23 pm
Post
by Regex » Wed Mar 28, 2012 8:46 am
I've written a script like that, but basically script is TURKISH. I've translated it for you.
Code: Select all
bind pub - .whois msg_whois
proc msg_whois {nick uhost hand chan text} {
global botnick
if {$text == ""} {putquick "PRIVMSG $chan :You have to use true command for look up whois information. Command: <.whois site>";return}
set connect [::http::geturl http://wmaraci.com/whois-detay?domain=$text]
set files [::http::data $connect]
::http::cleanup $files
if {[string match -nocase "*ta ve sat*" $files]} {
putquick "PRIVMSG $chan The domain is unregistered. You can register this domain!"
}
if {[string match -nocase "*Whois Kayd*" $files]} {
regexp -- {</p><p><strong>Güncelleme Tarihi</strong>: (.*)} $files - refresh
regexp -- {</p><p><strong>Oluşturma Tarihi</strong>: (.*)} $files - register
regexp -- {</p><p><strong>Bitiş Tarihi</strong>: (.*)} $files - expire
putquick "PRIVMSG $chan Web: $text"
putquick "PRIVMSG $chan Situation: Registered"
putquick "PRIVMSG $chan Refreshed Time: $refresh"
putquick "PRIVMSG $chan Registered Time: $register"
putquick "PRIVMSG $chan Expire Time: $expire"
}
}
putlog "Domain Information TCL v1.0 - Written By CLubber"
* You've to use this script with http.tcl
* After you can use this script with .whois site command.
Scayett
Voice
Posts: 3 Joined: Tue Mar 27, 2012 7:58 pm
Post
by Scayett » Thu Mar 29, 2012 12:07 pm
Thanks, this works
anbinal
Voice
Posts: 2 Joined: Wed Aug 29, 2012 12:58 am
Post
by anbinal » Wed Aug 29, 2012 1:12 am
@Scayett : According to me,If you are using code to find domain/ip whois,it's possible to get error.Because i tried coding method,I didn't get my correct ip and domain details.Then i checked my whois details at
whoisxy.com .I got accurate results.
gasak
Halfop
Posts: 45 Joined: Mon Aug 09, 2010 11:09 pm
Post
by gasak » Fri Jan 18, 2013 11:50 am
sorry to bump, but does the web still working? Just tried the tcl but seems doesnt work anymore. Please advice.
Thanks
Learning Knows No Boundaries!!
Get_A_Fix
Master
Posts: 206 Joined: Sat May 07, 2005 6:11 pm
Location: New Zealand
Post
by Get_A_Fix » Sat Jan 19, 2013 3:02 pm
gasak wrote: sorry to bump, but does the web still working? Just tried the tcl but seems doesnt work anymore. Please advice.
Thanks
umm, yes, it works, you just have to use some initiative, change the connect address.
for example
Code: Select all
set connect [::http::geturl http://wmaraci.com/whois-detay?domain=$text]
would be changed to...
Code: Select all
set connect [::http::geturl http://wmaraci.com/whois?domain=$text]
It's a rather simple fix, enjoy.
We explore.. and you call us criminals. We seek after knowledge.. and you call us criminals. We exist without skin color, without nationality, without religious bias.. and you call us criminals.
gasak
Halfop
Posts: 45 Joined: Mon Aug 09, 2010 11:09 pm
Post
by gasak » Sun Jan 20, 2013 12:20 am
Hi Get_A_Fix,
Been tried that but still not working. Nothing's come up when testing a command ".whois egghelp.org" on the channel. Please advice.
Thanks
Learning Knows No Boundaries!!
gasak
Halfop
Posts: 45 Joined: Mon Aug 09, 2010 11:09 pm
Post
by gasak » Mon Jan 21, 2013 5:50 am
Just notice that the code have some unicode inside which is unreadable by eggdrop. How to make it works?
Learning Knows No Boundaries!!