Lines Matching refs:sb
116 ::mk4vfs::stat $db $path sb
118 if { $sb(type) == "file" } {
119 mk::set $sb(ino) date $modtime
142 ::mk4vfs::stat $db $name sb
144 set sb(ino) 0
145 array get sb
155 ::mk4vfs::stat $db $name sb
166 ::mk4vfs::stat $db $file sb
168 if { $sb(csize) != $sb(size) } {
170 set fd [mk::channel $sb(ino) contents r]
171 set fd [vfs::zstream decompress $fd $sb(csize) $sb(size)]
175 set s [mk::get $sb(ino) contents]
184 puts -nonewline $fd [mk::get $sb(ino) contents]
189 set fd [mk::channel $sb(ino) contents r]
197 if { [catch {::mk4vfs::stat $db $file sb }] } {
199 ::mk4vfs::stat $db [file dirname $file] sb
201 set fview $sb(ino).files
206 set sb(ino) [mk::row append $fview \
210 set sb(csize) -1 ;# HACK - force compression
212 set sb(csize) 0
218 set s [mk::get $sb(ino) contents]
220 if { $sb(csize) != $sb(size) && $sb(csize) > 0 } {
226 #set fd [mk::channel $sb(ino) contents a]
230 return [list $fd [list mk4vfs::do_close $db $fd $mode $sb(ino)]]
236 if { [catch {::mk4vfs::stat $db $file sb }] } {
238 ::mk4vfs::stat $db [file dirname $file] sb
240 set fview $sb(ino).files
245 set sb(ino) [mk::row append $fview \
253 set fd [mk::channel $sb(ino) contents w]
255 return [list $fd [list mk4vfs::do_close $db $fd $mode $sb(ino)]]
438 upvar 1 $arr sb
440 set sb(type) $type
441 set sb(view) $view
442 set sb(ino) $cur
445 set sb(atime) 0
446 set sb(ctime) 0
447 set sb(gid) 0
448 set sb(mode) 0777
449 set sb(mtime) 0
450 set sb(nlink) [expr { [mk::get $cur files] + 1 }]
451 set sb(size) 0
452 set sb(csize) 0
453 set sb(uid) 0
456 set sb(atime) $mtime
457 set sb(ctime) $mtime
458 set sb(gid) 0
459 set sb(mode) 0777
460 set sb(mtime) $mtime
461 set sb(nlink) 1
462 set sb(size) [mk::get $cur size]
463 set sb(csize) [mk::get $cur -size contents]
464 set sb(uid) 0
517 if {![catch {stat $db $npath sb}] } {
518 if { $sb(type) != "directory" } {
521 set parent [mk::cursor position sb(ino)]
524 #set parent [mk::cursor position sb(ino)]
533 if {[catch { stat $db $path sb }] || $sb(type) != "directory" } {
538 set parent [mk::cursor position sb(ino)]
539 foreach row [mk::select $sb(view) parent $parent -glob name $pat] {
540 set hits([mk::get $sb(view)!$row name]) 1
543 set view $sb(view)!$parent.files
554 stat $db $path sb
555 if { $sb(type) == "file" } {
556 mk::set $sb(ino) date $time
566 stat $db $path sb
567 if {$sb(type) == "file" } {
568 mk::row delete $sb(ino)
569 if {[regexp {(.*)!(\d+)} $sb(ino) - v r] \
589 "$db,[mk::get $sb(ino) parent],[file tail $path]"
593 mk::set $sb(ino) parent -99 name ""
595 mk::view size $sb(ino).files 0