[Fixed] 2 Questions for ioBanana bot (log + msgfile)

[djdeluxe76]

Hello again,

first off thanks for reading this. I just have 2 (quick?) questions:

What could be causing this log entry?

-----------------------------------------

Thu Apr 28 23:36:35 2005

NONE

can't read "ftp(DummySock)": no such element in array
    while executing
"close $ftp(DummySock)"

-----------------------------------------

Thu Apr 28 23:36:35 2005

NONE

can not find channel named "0"
    while executing
"close $s"

-----------------------------------------

I know you say we shouldn't mess with the message files but is there any way to set in zipscript.msg

"usersstats=--------------------------------=UserTop=-------------------------------"

and

"groupsstats=--------------------------------=GroupTop=-------------------------------"

without it getting cut off like "-------------------------------:" when output to screen (via bot)...?

Thanks for your time you're spending to help/support others!

Cheers
DJ

[Harm]

1. You don't have to care about this error if the bot reconnects to the site right after it. It happens when the bot loses the connection the hard way.

2. It might be possible if you know TCL.

[djdeluxe76]

thanks for your reply, Harm

would I ask too much if I was asking you for a hint about the 2nd
point.. do I have to look for it in the script code or the message files?

I have learned a lot by just trying to follow your code for ioBanana...
read an Introduction about Tcl/Tk, so maybe there's a slight chance I
can do all this by myself.

cheers
DJ

[Harm]

Actually, ioBanana.exe won't allow you to log what you want. This line has a limited length. Though, you can edit ioBanana.tcl to change what the bot will announce when this line appears in the log. Have a look to the ioB:readlog proc.

Also, I'm curious why you need such an header for an irc announce. Could you show me how your announces look ?

[djdeluxe76]

thanks for your answer

i was going to post a skin maybe, when it's finished. the group/user
stats after a race in this particular style are just something i've seen
on some other sites. I thought I would just collect some
outputs/features that i've seen and liked and make a new skin out
of it...

i was going to try to match an output like this one...

[0DAY] - +--------------------------------=UserTop=-------------------------------+
[0DAY] - 1. user1 of grp1 :: 6f :: 29.3MB :: 53.3% :: 26KB/s (WU:31/AU:74)
[0DAY] - 2. user2 of grp2 :: 6f :: 25.7MB :: 46.7% :: 1.41MB/s (WU:1/AU:1)
[0DAY] - +--------------------------------=GroupTop=------------------------------+
[0DAY] - 1. grp1 :: 6f :: 29.3MB :: 53.3% :: 26KB/s
[0DAY] - 2. grp2 :: 6f :: 25.7MB :: 46.7% :: 1.41MB/s
[0DAY] - +------------------------------------------------------------------------+

so in this case my announces look like:

set announce(USTATS-B)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14%pos. [b]%username[b] of %group :: [b]%files[b]F :: [b]%mb[b]MB  :: [b]%percent[b]% :: [b]%speedKB/s[b] (WU:[b]%rank1[b]/AU:[b]%rank2[b])[c]"
set announce(GSTATS-B)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14%pos. [b]%group[b] :: [b]%files[b]F :: [b]%mb[b]MB  :: [b]%percent[b]% :: [b]%speedKB/s[b][c]"

you could try to put the string in question with "\n" at the end of
"set announce(USTATS-B)" but that would repeat it for every
position in the ranking. so the only real option is to (even if its not
recommended) alter the message file.

cheers
DJ

[djdeluxe76]

just figured out maybe you meant all announces...

here you go:

set announce(DEFAULT)       "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]%msg[b][c]"
set announce(NEWDIR)        "\[[c]$ioBvar(color1)[b][b]%section[c]\] + New Release: [b]%release[b] by [b]%user[b]/%group."
set announce(DELDIR)        "\[[c]$ioBvar(color1)[b][b]%section[c]\] - Dir Deleted: %path/[b]%release[b] by [b]%user[b]/%group."
set announce(NUKE)          "\[[c]$ioBvar(color2)[b][b]%section[c]\] - [c]4[b]NUKE[b][c] - %path/[b]%release[b] was nuked [b]%mult[b]x by %nuker - Reason: %reason - Nukees: %nukees."
set announce(UNNUKE)        "\[[c]$ioBvar(color2)[b][b]%section[c]\] - [c]3[b]UNNUKE[b][c] - %path/[b]%release[b] was unnuked [b]%mult[b]x by %nuker - Reason: %reason - Nukees: %nukees."
set announce(REQUEST)       "\[$ioBvar(sitename)\] - [c]3[b]REQUEST[b][c] - [b]%request[b] added by [b]%user[b]/%group."
set announce(REQFILLED)     "\[$ioBvar(sitename)\] - [c]3[b]FILLED[b][c] - [b]%request[b] filled by [b]%user[b]/%group."
set announce(REQDEL)        "\[$ioBvar(sitename)\] - [c]3[b]REQDEL[b][c] - [b]%request[b] deleted by [b]%user[b]/%group."
set announce(REQWIPE)       "\[$ioBvar(sitename)\] - [c]3[b]REQWIPE[b][c] - [b]%release[b] ([b]%mb[b]MB  [b]%files[b] File\\s and [b]%dirs[b] dirs) wiped."
set announce(INVITE)        "\[$ioBvar(sitename)\] - [c]6[b]INVITE[b][c] - [b]%user[b] invited himself as [b]%nick[b]."
set announce(WIPE)          "\[$ioBvar(sitename)\] - [c]4[b]WIPE[b][c] - [b]%user[b]/%group wipes %pwd/[b]%wiped[b] (%size\[MB\] in [b]%files[b] File\\s and [b]%dirs[b] Dir\\s)."
set announce(PRE)           "\[[c]$ioBvar(color2)[b][b]%section\] - [c]4[b]PRE[b][c] - [b]%group[b] Just Pre'd [c]4[b]%release[b] (%size\[MB\] in [b]%files[b] File\\s)[c]"
set announce(NEWDATE)       "\[[c]$ioBvar(color1)[b][b]%area[c]\] + New date: [b]%vfs[b]."

set announce(BAN)           "\[[c]1[b][b]FTP LOGIN[c]\] - [c]4[b]BANNED[b][c] - [b]%ip[b] tried to use this site, but his %mode is banned!"
#set announce(IMDB)          "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]IMDB[b] - [b]%title[b] (%genre - %country, %year) Summary: %plot. Directed by %name with a budget of %budget.\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]IMDB[b] - [b]%title[b]  Rating: [b]%rating[b] (%votes).  Premiere was %opening, with [b]%screens[b] on the opening weekend.\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]URL[b] - [b]%title[b] http://us.imdb.com/title/tt%id"
#set announce(IMDB)          "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]IMDB[b] - [b]%title[b] (%genre), a %name movie which scored [b]%rating[b] (%votes). It premiered in %country %opening, with [b]%screens[b] on the opening weekend.\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]IMDB[b] - [b]%title[b] plot summary: %plot. Budget was: %budget.\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]URL[b] - [b]%title[b] http://us.imdb.com/title/tt%id"
set announce(IMDB)          "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]IMDB[b] - [b]%title[b] (http://us.imdb.com/title/tt%id), a %name movie which scored [b]%rating[b] (%votes).It premiered in %country %opening, with [b]%screens[b] on the opening weekend.\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]IMDB[b] - [b]%title[b] plot summary: %plot. Budget was: %budget. Genre: %genre."
set announce(SERVICEFULL)   "\[[c]5[b]%sitename FULL[b][c]\] + [b]%user[b] filled the last slot available on %service. [b]%count[b] users are logged on."
set announce(LIMITER)       "\[[c]5[b]LIMIT[b][c]\] - [b]%user[b] tried to %action with more than his [b]%limit[b] allowed slots!"
set announce(MP3)           "\[[c]$ioBvar(color1)[b][b]%section[c]\] - %release is %mpegversion @ [b]%bitrate[b] [b]%mode[b] - Artist: [b]%artist[b] - Album: [b]%album[b] - Genre: [b]%genre[b] - Year: [b]%year[b]."
set announce(OLDRLS)        "\[[c]4[b]BACKFILL[b][c]\] - Pretime: [b]%release[b] was released %pretime ([b]%d_hours[b]h [b]%d_mins[b]m [b]%d_secs[b]s ago)."
set announce(APPROVED)      "\[[c]3[b]APPROVED[b][c]\] + [b]%release[b] was approved for upload by [b]%user[b]/%group."
set announce(PRETIME_WEEKS) "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]%release[b] was released %pretime - [b]%weeks[b]w [b]%days[b]d [b]%hours[b]h [b]%mins[b]m [b]%secs[b]s ago."
set announce(PRETIME_DAYS)  "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]%release[b] was released %pretime - [b]%days[b]d [b]%hours[b]h [b]%mins[b]m [b]%secs[b]s ago."
set announce(PRETIME)       "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [b]%release[b] released %pretime - [b]%hours[b]h [b]%mins[b]m [b]%secs[b]s ago."
set announce(SAMPLE)        "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]SAMPLE[b] - New %codec sample uploaded in %pwd/[b]%release[b]. Resolution: %widthx%height @ %fpsfps.[c]"
set announce(COMPLETE-B)    "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]COMPLETE[b] - [b]%release[b] with [b]%files[b] files ([b]%mb[b]MB) was completed in [b]%mins[b][b]m %secs[b][b]s[b] (avg. [b]%speedKB/s[b]) by [b]%racers[b] users in [b]%groups[b] group(s). Slowest: [b]%slow_user[b]/%slow_group ([b]%slow_speedKB/s[b]). Fastest: [b]%fast_user[b]/%fast_group ([b]%fast_speedKB/s[b]).[c]"
set announce(COMPLETE-B1)   "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]COMPLETE[b] - [b]%release[b] with [b]%files[b] files ([b]%mb[b]MB) was completed in [b]%mins[b][b]m %secs[b][b]s[b] (avg. [b]%speedKB/s[b]) by [b]%user[b]/%group . Slowest: [b]%slow_speedKB/s[b]. Fastest: [b]%fast_speedKB/s[b].[c]"
set announce(USTATS-B)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14%pos. [b]%username[b] of %group :: [b]%files[b]F :: [b]%mb[b]MB  :: [b]%percent[b]% :: [b]%speedKB/s[b] (WU:[b]%rank1[b]/AU:[b]%rank2[b])[c]"
set announce(GSTATS-B)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14%pos. [b]%group[b] :: [b]%files[b]F :: [b]%mb[b]MB  :: [b]%percent[b]% :: [b]%speedKB/s[b][c]"
#set announce(USTATS-B)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14--------------------------------=UserTop=-------------------------------[c]\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14%pos. [b]%username[b] of %group :: [b]%files[b]F :: [b]%mb[b]MB  :: [b]%percent[b]% :: [b]%speedKB/s[b] (WU:[b]%rank1[b]/AU:[b]%rank2[b])[c]"
#set announce(GSTATS-B)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14--------------------------------=GroupTop=-------------------------------[c]\n\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14%pos. [b]%group[b] :: [b]%files[b]F :: [b]%mb[b]MB  :: [b]%percent[b]% :: [b]%speedKB/s[b][c]"
set announce(HALFWAY)       "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]HALFWAY[b] - [b]%release[b] :: [b]%user[b]/%group leads with [b]%files[b] files in [b]%percent%[b] ([b]%mb[b]MB) at [b]%speedKB/s[b] :: [b]%gptop[b] leads with [b]%gpfiles[b] files in [b]%gppercent%[b] ([b]%gpmb[b]MB) at [b]%gpspeedKB/s[b].[c]"
set announce(HALFWAY1)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]HALFWAY[b] - [b]%release[b] :: [b]%user[b]/%group leads with [b]%files[b] files in [b]%percent%[b] ([b]%mb[b]MB) at [b]%speedKB/s[b].[c]"
set announce(RACE)          "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]RACER[b] - [b]%release[b] :: [b]%user[b]/%group is racing [b]%racers[b]on [b]%release[b] at [b]%speedKB/s[b].[c]"
set announce(SFV)           "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]SFV[b] - Got SFV for [b]%release[b] by [b]%user[b]/%group. Now Expecting [b]%neededfiles[b] file(s).[c]"
set announce(1STFILE)       "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]UPDATE[b] - [b]%release[b] got first file from [b]%user[b]/%group at [b]%speedKB/s[b]. Now expecting [b]%mb[b]MB.[c]"
set announce(DIZ)           "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]DIZ[b] - Got DIZ for [b]%release[b] by [b]%user[b]/%group. Now Expecting [b]%mb[b]MB in [b]%files[b] file(s).[c]"
set announce(URL)           "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]URL[b] - Link for [b]%release[b] - %url[c]"
set announce(SLOWRACE)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]4[b]STONED[b][c] - [c]14[b]%release[b] :: [b]%user[b] was too slow! (with a pityful [b]%speedKB/s[b]) - User kicked.[c]"
set announce(SLOWRACEEND)   "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]4[b]STONED[b][c] - [c]14[b]%release[b] :: [b]%user[b] was too slow on last file! (with a pityful %speedKB/s) - Bye Bye credits \[[b]%creditsMB[b]\]...[c]"
set announce(NFO)           "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]NFO[b] - NFO uploaded in %pwd ([b]%nfo[b]). Do \"$ioBvar(cmdpre)getnfo %number\" to receive it.[c]"
set announce(NEWLEADER)     "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]14[b]LEADER[b] - [b]%release[b] :: [b]%username[b]/%group takes the lead with [b]%files[b] files in [b]%percent%[b] ([b]%mb[b]MB) at [b]%speedKB/s[b].[c]"
set announce(CASINO)        "\[[c]1[b]$ioBvar(sitename)[b][c]\] - [c]1[b]CASINO[b][c] - %msg"
set announce(CLOSE)         "\[[c]1[b]$ioBvar(sitename)[b][c]\] - [c]5[b]%action[b][c] - Site has just been %action by [b]%user[b]. %reason."
## For WarChive
set announce(WARCMOVE)      "\[[c]1[b]$ioBvar(sitename)[b][c]\] - [c]5[b]SITE MOVE[b][c] - Moving %oldvfs/[b]%release[b] ([b]%relsize[b]MB) to %newvfs. Available space now: [b]%aftersize[b]MB."
set announce(WARCWIPE)      "\[[c]1[b]$ioBvar(sitename)[b][c]\] - [c]5[b]SITE WIPE[b][c] - Wiping [b]%release[b] ([b]%relsize[b]MB). Available space now: [b]%aftersize[b]MB."
set announce(MOVERLS)       "\[[c]1[b]$ioBvar(sitename)[b][c]\] - [c]5[b]MOVERLS[b][c] - %from has just been moved to %toshort."

## For !imdb
set announce(IMDB2)         "\[[c]8[b]IMDB[b][c]\] + [b]%title[b] - %url\n[b]Directed by:[b] %name\n[b]Genre:[b] %genre\n[b]Tagline:[b] %tagline\n[b]Synopsis:[b] %plot\n[b]Rating:[b] %rating (%votes votes) top 250:[b]%top250[b]\n[b]MPAA:[b] %mpaa\n[b]Runtime:[b] %time mins.\n[b]Country:[b] %country\n[b]Language:[b] %language\n[b]Sound Mix:[b] %soundmix\n[b]Budget:[b] %budget \n[b]Opening Weekend:[b] (USA) %screens"


set announce(ANUKEEMPTY)    "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]4[b]AUTONUKE[b][c] - [b]%relname[b] Still Empty after [b]%timenow[b][b]m[b]. Nuke at [b]%nuketime[b][b]m[b]."
set announce(ANUKEINC)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]4[b]AUTONUKE[b][c] - [b]%relname[b] incomplete for [b]%timenow[b][b]m[b]. Nuke after [b]%nuketime[b][b]m[b]."
set announce(ANUKEBAN)      "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]4[b]AUTONUKE[b][c] - [b]%relname[b], [b]%banword[b] is banned!. Nuke at [b]%nuketime[b][b]m[b]."
set announce(ANUKEALLOW)    "\[[c]$ioBvar(color1)[b][b]%section[c]\] - [c]4[b]AUTONUKE[b][c] - [b]%relname[b] Group is not allowed. Nuked after [b]%nuketime[b][b]m[b]."

cheers
DJ

[Harm]

The basic look and feel was enough I was curious... this announce header looks very weird to me.

I will have a look to v20's code tomorrow so I can explain you what to edit in ioBanana.tcl.

[djdeluxe76]

Thank you Harm. You spend a lot of time trying to help everyone.
I really apreciate that.

cheers
DJ

[Harm]

You could try the following. In proc ioB:readlog, add this :

if {[string equal $msgtype "STATS"]} {
	if {[string equal [lindex $line end] "usertop"]} {
		ioB:sndall $section "--------------------------------=UserTop=-------------------------------"
	} elseif {[string equal [lindex $line end] "grouptop"]} {
		ioB:sndall $section "--------------------------------=GroupTop=-------------------------------"
	}
	continue
}

right after

if {![info exists disable($msgtype)] || $disable($msgtype)==1} {continue}

You have to edit your zipscript.msg so

usersstats=usertop
groupsstats=grouptop

[djdeluxe76]

thank you Harm.

I think I can follow what the idea behind this is. You want to send or replace the string in question while its parsing the log and before determing the stats. Let's see if it does the trick

cheers
DJ

[djdeluxe76]

okay, I've tested it. Result was that grouptop and usertop appeared to be set to null.

Output:

[TVEPS] - 1. user1 of grp1 :: 3F :: 42MB  :: 60.0% :: 41087KB/s (WU:6/AU:6)
[TVEPS] - 2. user2 of grp2 :: 2F :: 28MB  :: 40.0% :: 33930KB/s (WU:7/AU:5)
[TVEPS] - 1. grp1 :: 3F :: 42MB  :: 60.0% :: 41087KB/s
[TVEPS] - 2. grp2 :: 2F :: 28MB  :: 40.0% :: 33930KB/s

maybe add that on a different line in the script?

DJ

[Harm]

Do you have set disable(STATS) 0 ?

Also you could add \[$section\] in the lines sent to the irc server. Those aren't formatted.

[djdeluxe76]

for testing purposes I have everything set to 0 to find errors in my skin
better and as soon as they are displayed.

somehow it does not display the grpstats and usrstats, it just leaves
the line out.

cheers
DJ

[Harm]

if {[string equal $msgtype "STATS"]} {
	putlog "DBG: $line"
	if {[string equal [lindex $line end] "usertop"]} {
		ioB:sndall $section "--------------------------------=UserTop=-------------------------------"
	} elseif {[string equal [lindex $line end] "grouptop"]} {
		ioB:sndall $section "--------------------------------=GroupTop=-------------------------------"
	}
	continue
}

This will help us to locate the problem.

[djdeluxe76]

okay inserted that line and here's the log entry from

ioFTPD.log

05-03-2005 00:20:04 STATS: "/APPS/Some.Rls.To.Be.Unmentioned-TeST" "usertop:"
05-03-2005 00:20:04 USTATS-B: "/APPS" "Some.Rls.To.Be.Unmentioned-TeST" "1" "User2" "Group2" "17" "4" "57.0" "173" "14" "3" "0" "0" "0"
05-03-2005 00:20:04 USTATS-B: "/APPS" "Some.Rls.To.Be.Unmentioned-TeST" "2" "User1" "Group1" "12" "3" "43.0" "179" "4" "1" "0" "0" "0"
05-03-2005 00:20:04 STATS: "/APPS/Some.Rls.To.Be.Unmentioned-TeST" "grouptop:"
05-03-2005 00:20:04 GSTATS-B: "/APPS" "Some.Rls.To.Be.Unmentioned-TeST" "1" "Group2" "17" "4" "57.0" "173" "11" "3" "0" "0" "0"
05-03-2005 00:20:04 GSTATS-B: "/APPS" "Some.Rls.To.Be.Unmentioned-TeST" "2" "Group1" "12" "3" "43.0" "179" "4" "1" "0" "0" "0"

zipscript.msg

...(abbreviated)...

usersstats=usertop
groupsstats=grouptop

...(abbreviated)...

by the way, my DEFAULT section is (e.g. / ) is not called DEFAULT but
initials of sitename ( like sitename=REALFATPIPE -> default section
/RFP)... don't know if this matters.

cheers
DJ