nsmcp::ConfigurationTool method options (protected)

 <instance of nsmcp::ConfigurationTool> options arguments

Defined in /usr/local/ns/tcl/nsmcp/config-tools.tcl

Parameters:

arguments (required)

Testcases:

No testcase defined.

Source code:

if {[lindex $arguments 1] ne "object"} {
    error "Expected arguments object"
}
set result {scope server section {} limit 50 offset 0}
foreach {key type value} [lindex $arguments 2] {
    switch -- $key {
        scope {
            if {$type ne "string" || $value ni {server process}} {
                error "scope must be server or process"
            }
        }
        section {
            if {$type ne "string" || [string length $value] > 512 || [regexp {[\x00\r\n]} $value]} {
                error "Invalid configuration section"
            }
            set value [string trimright $value /]
        }
        limit -
        offset {
            if {$type ne "number" || ![string is integer -strict $value] || $value < 0
                || ($key eq "limit" && ($value < 1 || $value > 100))} {
                error "Invalid $key"
            }
        }
        default {
            error "Unknown argument: $key"
        }
    }
    dict set result $key $value
}
return $result

XQL Not present:

Generic, PostgreSQL, Oracle