boomerang::prepare_logfiles (private)

 boomerang::prepare_logfiles

Defined in packages/boomerang/tcl/boomerang-procs.tcl

Prepare the daily Boomerang log descriptors from initialization or the daily scheduler callback. Request threads only use the published descriptors; they never open logfiles.

Returns:

Nothing.

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

        set logdir [file dirname [file rootname [ns_config ns/parameters ServerLog]]]
        if {$logdir eq "."} {
            set logdir [ns_config ns/parameters logdir]
        }
        set now [clock seconds]
        #
        # Open tomorrow's file ahead of midnight. Keep previous descriptors
        # until process exit, since queued writes can still reference them.
        # Only initialization and the non-threaded daily callback open files.
        #
        foreach when [list $now [clock add $now 1 day]] {
            set filename boomerang-[clock format $when -format %Y-%m-%d].log
            if {![nsv_exists boomerang:logfiles $filename]} {
                set fd [ns_asynclogfile open [file join $logdir $filename]]
                nsv_set boomerang:logfiles $filename $fd
            }
        }

XQL Not present:

Generic, PostgreSQL, Oracle