egghelp/eggheads community

on join

2007-05-20T15:46:08-04:00

thank you again nml375, i'll give it a try

Statistics: Posted by ap — Sun May 20, 2007 3:46 pm

on join

2007-05-20T14:44:10-04:00

You could always remove the Z from the binding, and add something like this in the beginning of your proc:

Code:

 if {![matchattr $hand +Z]} {  putlog "Inviter: Failed invite by $nick!$host ($hand), no permissions"  return 0 }

Should dump a logmessage if the user does not have permissions, including the handle (s)he was identified as...

edit: And yes, your code is otherwize proper... and, just to make sure, by saying remove Z, you should replace it with a -

Statistics: Posted by nml375 — Sun May 20, 2007 2:44 pm

on join

2007-05-20T14:39:46-04:00

thank you nml375;

I've created invite handle and added 4,5 ip/hosts to it to test it. they all are added like *!*ident@ip and their idents are different.

When channel is invite only then they cann't get in so i cann't use .channel command to see.. so these codes are correct?

Code:

bind msg Z inv msg:inviteproc msg:invite {nick host hand text} {if {![onchan $nick #name]} {   putserv "INVITE $nick #name" } else {  puthelp "NOTICE $nick :you are already in" }}

thanks

Statistics: Posted by ap — Sun May 20, 2007 2:39 pm

on join

2007-05-20T02:37:49-04:00

My guess would be that hostmasks for one or several users are not properly set up, causing users not to be recognized, or recognized as someone else...

In this case, the solution (obviously) would be to correct hostmasks of those users. The .channel dcc-command might be useful to actually see whom your eggdrop identifies the user as

Statistics: Posted by nml375 — Sun May 20, 2007 2:37 am

on join

2007-05-20T00:33:41-04:00

now they don't work at all

Statistics: Posted by ap — Sun May 20, 2007 12:33 am

on join

2007-05-20T00:20:38-04:00

maybe if you include a matchattr check inside your procedure it would be better

Statistics: Posted by YooHoo — Sun May 20, 2007 12:20 am

on join

2007-05-19T18:08:22-04:00

Thank you for your help Sir_Fz, it worked great.

I have a one last question please. The following codes works sometime and sometime they don't. Am i missing something?

so user with Z flag types /msg bot inv

Code:

bind msg Z inv msg:invite proc msg:invite {nick host hand text} { if {![onchan $nick #name]} {    putserv "INVITE $nick #name"  } else {   puthelp "NOTICE $nick :you are already in"  } }

thanks

Statistics: Posted by ap — Sat May 19, 2007 6:08 pm

on join

2007-05-15T23:01:53-04:00

Thanks Sir,Fz i'll try it and then i'll let ya know

Statistics: Posted by ap — Tue May 15, 2007 11:01 pm

on join

2007-05-14T21:14:37-04:00

Then you should do something like this:

Code:

set found 0set host [lindex [split $uhost @] 1]foreach pattern $lamer {    if {[string match $pattern $host]} {  set found 1  break } }if {$found} { # Do your stuff here..}

Statistics: Posted by Sir_Fz — Mon May 14, 2007 9:14 pm

on join

2007-05-14T21:03:41-04:00

Well i want to check for dns only if person is in the list, if person is not in the list then i want to ignore it.

Code:

set lamer { *aol.com*  24.*  81.*  217.*  68.*  211.*}

thanks

Statistics: Posted by ap — Mon May 14, 2007 9:03 pm

on join

2007-05-14T04:53:42-04:00

What exactly is your change supposed to do? The condition always succeeds since not all the elements in the list are going to match the joining host.

Statistics: Posted by Sir_Fz — Mon May 14, 2007 4:53 am

on join

2007-05-14T00:00:00-04:00

Thanks again Sir_fz.

Now i'm trying to use these codes in MC_8's dns bans scripts because i like to check only lamers ip/hosts for dns so i'm just pasting his onjoin procedure which i have modified it and it doesn't work. Bold ones are my changes.

Code:

[b]set lamer { *aol.com*  24.*  81.*  217.*  68.*}[/b] bind join - * mc:dnsb:joinproc mc:dnsb:join {nick uhost handle channel} {  return [mc:dnsb:errchk mc:dnsb:join_ $nick $uhost $handle $channel]}proc mc:dnsb:join_ {nick uhost handle channel} { global coke  if {![channel get $channel mc.dns_bans] || [isbotnick $nick] || [matchban $nick!$uhost $channel] || [mc:dnsb:matchchanban $nick!$uhost $channel]} {return 0}     [b]set host [lindex [split $uhost @] 1]  foreach pattern $lamer {        if {![string match $pattern $host]} { return }    } [/b]   set cache(exempt:flags) [channel get $channel mc.dns_bans.exempt.flags]  if {($cache(exempt:flags) != "") &&  [matchattr $handle $cache(exempt:flags) $channel]} {return 0}   regexp -- (.*)@(.*) $uhost dummy ident host  if {$::numversion >= "1061600"} {    dnslookup $host mc:dnsb:dnsreturn $host $nick $ident $handle $channel  } else {    dnslookup [list $host] mc:dnsb:dnsreturn [list $host $nick $ident $handle $channel]  }}

thanks again

Statistics: Posted by ap — Mon May 14, 2007 12:00 am

on join

2007-05-13T20:03:47-04:00

Code:

set ips { 24.* 222.*}proc check {nick uhost hand chan} { global ips set host [lindex [split $uhost @] 1] foreach pattern $ips {  if {[string match $pattern $host]} {   puts "$pattern matched $host"  } { puts "$pattern DOES NOT match $host" } }}

% check nick ident@24.91.187.99 * #chan
24.* matched 24.91.187.99
222.* DOES NOT match 24.91.187.99
%

Apparently it does work

Statistics: Posted by Sir_Fz — Sun May 13, 2007 8:03 pm

on join

2007-05-13T19:56:20-04:00

ok i had the following but it seems it didn't work

Code:

set ips {24.*            222.*}bind join - * checkproc check {nick uhost hand chan} { global  ips set host [lindex [split $uhost @] 1] foreach pattern $ips { if {[string match $pattern $host]} {     putlog "matched" } else { putlog "no macth" }}

and person joined nick!ident@24.91.187.99 and it didn't match, i don't know why. I thought 24.* is in my list so this should of matched.

but this shouldn't matched nick!ident@72.20.49.24 because 24 is at the end, i want it to match only if it starts with 24.8 or 222.*

thanks

Statistics: Posted by ap — Sun May 13, 2007 7:56 pm

on join

2007-05-13T19:42:29-04:00

Your code already does that.

Statistics: Posted by Sir_Fz — Sun May 13, 2007 7:42 pm