nsmcp::CodeUpstreamTool method comparison (protected)

 <instance of nsmcp::CodeUpstreamTool> comparison local remote

Defined in /usr/local/ns/tcl/nsmcp/code-upstream.tcl

Parameters:

local (required)

remote (required)

Testcases:

No testcase defined.

Source code:

set args [::nsmcp::codeCanonicalArguments [dict get $remote arguments]]
set body [dict get $remote body]
set sameArgs [expr {[dict get $local arguments] eq $args}]
set sameBody [expr {[dict get $local body] eq $body}]
set normalized [expr {[dict exists $local comparisonBody] ? [dict get $local comparisonBody] : [dict get $local body]}]
set normalizedSame [expr {$normalized eq $body}]
return [list identical boolean [expr {$sameArgs && $sameBody}] argumentsIdentical boolean $sameArgs bodyIdentical boolean $sameBody normalizedIdentical boolean [expr {$sameArgs && $normalizedSame}] normalizedBodyIdentical boolean $normalizedSame bodySha256 string [ns_crypto::md string -digest sha256 -- $body] arguments string [string range $args 0 4095] argumentsTruncated boolean [expr {[string length $args]>4096}]]

XQL Not present:

Generic, PostgreSQL, Oracle