Old 10-02-2003, 12:59 PM   #106
frog
Junior Member
 
Join Date: Jun 2003
Posts: 26
Default

Im facing a problem what I'd like to fix.
Im not sure if this post should be in ioZS thread...
but anyway,
the think is I've system account which uses different .VFS file, where all harddrives are included like C, D, E, etc. folders, so i can easily edit things via ioftpd.
Now the problem is when I upload new folder for example to E drive, the dszbot will announce in irc channel:
<@BOT> [DEFAULT] + New Release: D/testfolder (testfolder) by USERX@GROUPX
I don't want it to announce those make dirs in irc...
so what I need to do?
frog is offline   Reply With Quote
Old 10-02-2003, 01:10 PM   #107
ddeca
Member
ioFTPD Foundation User
 
Join Date: Aug 2003
Posts: 73
Default

EASY

EDiT set denypost and add the path u like to hide... se ex

set denypost "*Done* *NUKED* *IMDB* */e:*"


in dzbot.tcl
ddeca is offline   Reply With Quote
Old 10-02-2003, 01:29 PM   #108
frog
Junior Member
 
Join Date: Jun 2003
Posts: 26
Default

Big thanks ddeca for reply!
Working just like I want it. :banana:
frog is offline   Reply With Quote
Old 10-06-2003, 09:09 AM   #109
bounty
Senior Member
ioFTPD Scripter
 
Join Date: Aug 2002
Posts: 529
Default

here we go m8s

a new update of dzsbot

for DL link check 1st post

have fun
bounty
bounty is offline   Reply With Quote
Old 10-06-2003, 06:37 PM   #110
MadCowAss
Member
ioFTPD Registered User
 
Join Date: Feb 2003
Posts: 77
Default

Thanx for this update
MadCowAss is offline   Reply With Quote
Old 10-06-2003, 07:41 PM   #111
ddeca
Member
ioFTPD Foundation User
 
Join Date: Aug 2003
Posts: 73
Default Thx Bounty

keep it up..

//ddeca

--EDiT--

Is it just me or doesnt it logg the new dirs...

Baaahh..iam to tierd right now....
ddeca is offline   Reply With Quote
Old 10-08-2003, 02:16 PM   #112
cpas
Junior Member
 
Join Date: Sep 2003
Posts: 21
Default

Like always, a big thx .
cpas is offline   Reply With Quote
Old 10-13-2003, 11:25 AM   #113
RoLL
Junior Member
 
Join Date: Oct 2003
Posts: 2
Default !user

Hello,

Im trying to get "!user <nick>" to work on irc. Just to get info on credits, group, etc

Only i noted that it wasnt working and the the tcl script did support it
Code:
proc useralias {nick uhost hand chan args} { sitestat $nick $uhost $hand $chan "user123 [lindex $args 0]" }
, but that the part about this uesr123 was NOT there.
it does work when adding:
Code:
    } elseif {$cmd == "user123"} {
        set user [lindex $args 1]
        set ee [::ftp::Quote $ioss(ftp) SITE USER $nick]
        if {$ee == ""} {tsend chan 5 $chan "[b]ioss:[b] ERROR processing request" ; return}
        set lines [split $ee \n]
        set lines [lreplace $lines 0 5]
        set lines [lreplace $lines end-2 end]
etc
etc
}
But im not good enough to make it working

so im looking for something that will work.. and im sure other people had trouble finding this or making it .. if you allreday have it in iobananna.tcl then could you sent it to me? (just the user123)

grtz,

RoLL

sry for my bas english... lol
RoLL is offline   Reply With Quote
Old 10-13-2003, 11:54 AM   #114
bounty
Senior Member
ioFTPD Scripter
 
Join Date: Aug 2002
Posts: 529
Default

sorry it's not implemented in this sitebot ...

have fun
bounty
bounty is offline   Reply With Quote
Old 10-13-2003, 12:54 PM   #115
RoLL
Junior Member
 
Join Date: Oct 2003
Posts: 2
Default :D

Yea.. i know that LOL

Thats why im asking in here if anyone knows how that tcl code would look... If it was supported by the bot i won't be asking it in here...

grtz,

RoLL
RoLL is offline   Reply With Quote
Old 10-14-2003, 08:12 AM   #116
Palomo2
Junior Member
 
Join Date: Oct 2003
Posts: 2
Default corrupted archive ...

I can't decompress the file -> dzsbot.0.94.zip because it turns out corrupted (not valide archive for winmx) Can you reupp it ?
Palomo2 is offline   Reply With Quote
Old 10-14-2003, 08:25 AM   #117
-=DoBBeR=-
Senior Member
ioFTPD Registered User
 
Join Date: Oct 2002
Posts: 298
Default Re: corrupted archive ...

Quote:
Originally posted by Palomo2
I can't decompress the file -> dzsbot.0.94.zip because it turns out corrupted (not valide archive for winmx) Can you reupp it ?
rename it to rar..

p.s get glasses !!! ofcoz rename this .zip file to .RAR file !!!
-=DoBBeR=- is offline   Reply With Quote
Old 10-18-2003, 08:08 PM   #118
romracer
Junior Member
 
Join Date: Oct 2003
Posts: 25
Default a fix for freespace

The ioDiskSpace.exe that comes with dZSbot (or was it with ioftpd, I don't remember) doesn't properly calculate space for all drives, most notably network drives. I have a drive that is mounted as 1.73TB but the diskspace program only reports around 680GB. This of course makes !free not work properly on the bot, or to at least print out the wrong info. My solution was to modify the script to use a different binary. Here's how I did it.

First you'll need http://www.geocities.com/urifrid/lport.zip. Most notably, you want the df.exe file from it.

Second, you'll want to use:

Code:
set binary(DF)		        "D:/ioFTPD/scripts/bin/df.exe"
in your bot .tcl file. Of course change it to match the path you placed that file in.

Third you'll want to change the devices() list to include a trailing slash (remember to escape it) on your drive letters. ie,

Code:
set device(2)		"F:\\ ARCHIVE"
And lastly, you'll want to replace your proc show_free with mine. I've included it here.

Code:
proc show_free { nick uhost hand chan arg } {
	global binary announce device disable sections
	if { $disable(FREE) == 1 } {return}
	set arg [string tolower $arg]
	set total_freespace 0
	set total_space 0
	set scheck "$sections ALL"
	if { $arg == "" || [string match -nocase *$arg* $scheck] == 0 } {
		set output $announce(DEFAULT)
		set output [replacevar $output "%msg" "Available sections are: $sections"]
		set output [basicreplace $output "FREE"]
		sndall "DEFAULT" "$output or ALL"
		return
	} elseif { $arg == "all" } {
		set output $announce(DEFAULT)
		for {set i 0} {$i < $device(TOTAL)} {incr i} {
			foreach line [split [exec $binary(DF) "-m"] "\n"] {
#				putlog "DEBUG>>> line = $line"
#				if { [string match [lindex $line 0] [string toupper [lindex $device($i) 0]]] == 1 } { }
				if { [lindex [split $line] 0] == [string toupper [lindex [split $device($i)] 0]] } {	
					
					# set thisfree [lindex $line 6]
					# set thistotal [lindex $line 5]
					set thisfree [lindex $line [expr [llength $line] - 2]]
					set thistotal [lindex $line [expr [llength $line] - 3]]
					set thisfree [string range $thisfree 0 [expr [string length $thisfree] - 3]]
					set thistotal [string range $thistotal 0 [expr [string length $thistotal] - 3]]
#					putlog "DEBUG>>> thisfree = $thisfree"
#					putlog "DEBUG>>> thistotal = $thistotal"

					append devices "\[[lrange [split $device($i)] 1 end]: %bold[format %.2f [expr $thisfree/1024]]%bold/[format %.2f [expr $thistotal.0/1024]] GB\] - "
					set total_freespace [expr $total_freespace + [expr $thisfree.0/1024]]
					set total_space [expr $total_space + [expr $thistotal.0/1024]]
				}
			}
		}
		append devices "TOTAL: %bold[format %.2f $total_freespace]%bold/[format %.2f $total_space] GB"
		set output [replacevar $output "%msg" $devices]
		set output [basicreplace $output "FREE"]
		sndall "DEFAULT" $output
	} else {
		set output $announce(DEFAULT)
		for {set i 0} {$i < $device(TOTAL)} {incr i} {
			if { [string match -nocase *$arg* [split $device($i)]] == 1 } {
				set result [lindex [split $device($i)] 0]
			}
		}
#		putlog "DEBUG>>> result = $result"
#		foreach line [split [exec $binary(DF) $result] "\n"] { }
		foreach line [split [exec $binary(DF) "-m"] "\n"] {
			if { [lindex [split $line] 0] == [string toupper $result] } {
				set thisfree [lindex $line [expr [llength $line] - 2]]
				set thistotal [lindex $line [expr [llength $line] - 3]]
				set thisfree [string range $thisfree 0 [expr [string length $thisfree] - 3]]
				set thistotal [string range $thistotal 0 [expr [string length $thistotal] - 3]]

				set devices "\[[string toupper $arg]: %bold[format %.2f [expr $thisfree/1024]]%bold/[format %.2f [expr $thistotal/1024]] GB\]"
			}
		}
		set output [replacevar $output "%msg" $devices]
		set output [basicreplace $output "FREE"]
		sndall "DEFAULT" $output
	}
}
I think that should about do it. I don't remember changing anything else though I might have. If this mod doesn't work someone let me know. You can find me on irc. One thing you'll notice is that %free space is missing when you do !free <section>. I just didn't feel like modifying that portion of code as I don't really care about %free. You can add it back if you want.

Many, many thanks go to a friend who modified the code to look for free space and total space in different columns in the output. And also for making it deal with spaces in volume label names. Never would have done it without.

Hope you guys like this and find it useful. I sure did. I've also included a a zip file with the df.exe file and my show_free proc in a text file if it makes it easier for you guys.
Attached Files
File Type: zip show_free.zip (16.2 KB, 24 views)
romracer is offline   Reply With Quote
Old 10-19-2003, 03:31 AM   #119
ADDiCT
Senior Member
FlashFXP Beta Tester
ioFTPD Scripter
 
Join Date: Aug 2003
Posts: 517
Default

Or u could have asked me to fix the ioDiskSpace tool
(i never considered anyone would have a single drive that big, but seems i was wrong after all.)

edit: please try http://home.no.net/addict99/files/ioDiskSpace.exe in a console, and tell me if the output is now correct
ADDiCT is offline   Reply With Quote
Old 10-19-2003, 03:49 AM   #120
Pichento
Senior Member
ioFTPD Registered User
 
Join Date: Feb 2003
Posts: 327
Default

Addict:

Lots of us have drives bigger than that. take 4 x 250 gb raided...
Pichento is offline   Reply With Quote
Reply

Tags
bounty, dzsbot, fun, link, update

Thread Tools
Display Modes Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is Off
HTML code is Off

Forum Jump


All times are GMT -5. The time now is 03:51 PM.

Parts of this site powered by vBulletin Mods & Addons from DragonByte Technologies Ltd. (Details)