.ioFTPD.message files are automatically displayed to the users on CWD.
To show the content of the .intro files, you would have to use something like :
showintro.itcl:
Code:
proc showintro {} {
global pwd
set introfile [glob -nocomplain -types f [file join [resolve pwd $pwd] ".intro"]]
if {[llength $introfile]==1} {
set intro [open [lindex $introfile 0] r]; set content [split [read $intro] \n]; close $intro
foreach line $content {iputs -nobuffer "250- $line"}
}
return 0
}
return [showintro]
ioFTPD.ini
Code:
[FTP_Post-Command_Events]
cwd = TCL C:\ioFTPD\scripts\showintro.itcl