0e2bc599a5
git-svn-id: file:///root/webif/svn/humax/pkg/src/webif/trunk@1665 2a923420-c742-0410-a762-8d5b09965624
26 lines
414 B
Plaintext
Executable File
26 lines
414 B
Plaintext
Executable File
#!/mod/bin/jimsh
|
|
|
|
source /mod/webif/lib/setup
|
|
require system.class ts.class
|
|
|
|
proc scan {dir} {
|
|
puts "Fixing $dir..."
|
|
file stat "$dir/" st
|
|
if {$st(dev) != $::rootdev} { return }
|
|
|
|
ts resetnew $dir
|
|
|
|
foreach entry [readdir -nocomplain $dir] {
|
|
if {[file isdirectory "$dir/$entry"]} {
|
|
scan "$dir/$entry"
|
|
}
|
|
}
|
|
}
|
|
|
|
set root [system mediaroot]
|
|
file stat "$root/" rootstat
|
|
set rootdev $rootstat(dev)
|
|
|
|
scan $root
|
|
|