webif/var/mongoose/cgi-bin/browse/sizes.jim
hummypkg 8d67bb82bb more work on rename
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@197 2a923420-c742-0410-a762-8d5b09965624
2011-06-25 20:59:50 +00:00

27 lines
509 B
Plaintext
Executable File

#!/mod/bin/jimsh
package require cgi
puts "Content-Type: application/json"
puts ""
cgi_input
#cgi_dump
set _cgi(dir) "/media/My Video"
set dir [dict get $_cgi dir]
#9.4G /media/My Video/Archive
#1.4G /media/My Video/CSI_ Crime Scene Investigation
puts "{"
foreach line [split [exec /mod/bin/busybox/du -h "$dir/"] "\n"] {
set fields [split $line "\t"]
set size [lindex $fields 0]
set node [lindex [split [lindex $fields 1] '/'] end]
puts "\"$node\" : \"$size\","
}
puts "\"dummy\" : \"\""
puts "}"