xmlrpc::get_content (private)

 xmlrpc::get_content

Defined in packages/xml-rpc/tcl/xml-rpc-procs.tcl

There's no [ns_conn content] so this is a hack to get the content of the XML-RPC request. Taken from ns_xmlrpc.

Returns:

string - the XML request

Author:

Dave Bauer

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

Testcases:

No testcase defined.

Source code:

    if {[ns_info name] eq "NaviServer"} {
        #
        # NaviServer provides a generic means to access the content,
        # independent from the spooling configuration
        #
        set text [ns_getcontent -as_file false -binary false]
    } else {

        # (taken from aol30/modules/tcl/form.tcl)
        # Spool content into a temporary read/write file.
        # ns_openexcl can fail, since tmpnam is known not to
        # be thread/process safe.  Hence spin till success
        set fp ""
        while {$fp eq ""} {
            set filename "[ad_tmpnam][clock clicks -milliseconds].xmlrpc2"
            set fp [ns_openexcl $filename]
        }

        fconfigure $fp -translation binary
        ns_conncptofp $fp
        close $fp

        set fp [open $filename r]
        while {![eof $fp]} {
            append text [read $fp]
        }
        close $fp
        file delete $filename
    }
    return $text

XQL Not present:

Generic, PostgreSQL, Oracle