nsmcp::CachedLogSearch method lineStart (protected)

 <instance of nsmcp::CachedLogSearch> lineStart channel offset

Defined in /usr/local/ns/tcl/nsmcp/lib/log-search.tcl

Parameters:

channel (required)

offset (required)

Testcases:

No testcase defined.

Source code:

set position $offset
while {$position > 0} {
    set start [expr {max(0, $position-32768)}]
    seek $channel $start
    set block [read $channel [expr {$position-$start}]]
    set newline [string last \n $block]
    if {$newline >= 0} {return [expr {$start+$newline+1}]}
    set position $start
}
return 0

XQL Not present:

Generic, PostgreSQL, Oracle