ftpd::Session method file format mlst (protected)
<instance of ftpd::Session> file format mlst file
MLST size*;type*;perm*;create*;modify*;
- Parameters:
- file (required)
- Testcases:
- No testcase defined.
Source code: set perm "" file stat $file stat if {[file isdirectory $file]} { # maybe distinguish between dir/cdir/pdir rfc3659 7.5.1 set type dir if {[file readable $file]} {append perm "l"} if {[file executable $file]} {append perm "e"} if {[file writable $file]} {append perm "cdm"} } else { set type file if {[file readable $file]} {append perm "r"} if {[file writable $file]} {append perm "fwd"} } set ctime [clock format $stat(ctime) -format "%Y%m%d%H%M%S"] set mtime [clock format $stat(mtime) -format "%Y%m%d%H%M%S"] append result "Size=[file size $file];" "Type=$type;" "Perm=$perm;" "Create=$ctime;" "Modify=$mtime;" " " [file tail $file] return $resultXQL Not present: Generic, PostgreSQL, Oracle