chanlist doesn't work

[Regedit01]

Greetings from Poland! I am a 19-year-old programmer, I just learnt TCL and now I'm writing a script that will lead a statistics for IRC channels.

I have a very big problem. I was working on it all day long without effect. After many tests I found that "chanlist" eggdrop TCL command doesn't work when there are more than 1 channels no the eggdrop's channel list. It just returns an empty list! I tried everyting what came to my head, including calling "resetchan".

At present, my test code looks like this:

Code: Select all

proc TestDebug {aText} {
  putserv "PRIVMSG Regedit :(DEBUG) $aText"
}

proc Test_List {snick shost shandle stext} {
  foreach {chan} [channels] {
    TestDebug "$chan: [join [chanlist $chan]]"
  }
}

bind msg n "lista" Test_List

Maybe someone of you know the reason of this problem? Is this a bug in the eggdrop, is this a well known problem or I'm just doing something wrong?

[egghead]

[snip]
I have a very big problem. I was working on it all day long without effect. After many tests I found that "chanlist" eggdrop TCL command doesn't work when there are more than 1 channels no the eggdrop's channel list. It just returns an empty list! I tried everyting what came to my head, including calling "resetchan".
[snip]
Maybe someone of you know the reason of this problem? Is this a bug in the eggdrop, is this a well known problem or I'm just doing something wrong?

Likely the latter. [chanlist] works fine here (eggdrop 1.6.13). Are you sure that the channels are not set to +inactive? In that case [chanlist] remains empty.

[Regedit01]

I use eggdrop 1.6.15 and all my channels have -inactive.

I just heard from my friend, GoQ, that he has the similar problem. When he tries to write the command ".say #channel text", he gets message like "I'm not on that channel". When he writes ".channel #channel", he gets that there are 0 members.

[Alchera]

Not sure if this is what you want but, I use this code in a public commands script for my loan bots:

set chanlist ""
foreach c [channels] {
if {![onchan $botnick $c]} {
set chan "${c}(trying)"
} elseif {[isop $botnick $c]} {
set chan "@$c"
} elseif {(![isop $botnick $c]) && ([isvoice $botnick $c])} {
set chan "+${c}(want ops!)"
} elseif {![isop $botnick $c]} {
set chan "${c}(want ops!)"
} elseif {[isvoice $botnick $c]} {
set chan "+$c"
} else {
set chan $c
}
if {[isdynamic $c]} {
set chan "<${chan}>"
}
append chanlist "$chan "
}
putcmdlog "channel list:<<$nick>> #$hand# requested my channel list."
notice $nick "I monitor: $chanlist"

[egghead]

I use eggdrop 1.6.15 and all my channels have -inactive.

I just heard from my friend, GoQ, that he has the similar problem. When he tries to write the command ".say #channel text", he gets message like "I'm not on that channel". When he writes ".channel #channel", he gets that there are 0 members.

This then seems more of an issue of communication between the IRCD and eggdrop. What network are you on and which net-type did you set. Please note that some networks have disabled the /WHO command. A command eggdrop relies on.

Perhaps a tcl should be written which feeds a fake /WHO reply into eggdrop based on the /NAMES command when on such networks.

[Regedit01]

I use "set net-type 1" (IRCnet) and I'm on the Polish IRC Network called PolNet (its http:// and irc:// domain is ircnet.pl).

[egghead]

I use "set net-type 1" (IRCnet) and I'm on the Polish IRC Network called PolNet (its http:// and irc:// domain is ircnet.pl).

warszawa.ircnet.pl hybrid-7.0

Eventhough this server seems to give a valid /WHO reply, this definitely is not an IRCNET server. Try the other net-types, maybe the efnet setting.

Edit: I joined my bot to the above server and with net-type set to 1 it seems it has some difficulties indeed.

[Regedit01]

I want to thank all of you for help! Especially egghead.

I changed network type to 5 (others) and now it works correctly.