---

Class Relations

• class: ::nx::EnsembleObject

::nx::EnsembleObject create ::nsshell::CurrentThreadHandler::slot::__context

Methods (to be applied on the object)

• require (scripted)

  # Update kernel timestamp as well as latest channel
  nsv_set shell_kernels $kernel [ns_time]
  nsv_set shell_conn $kernel,channel $channel
  if {![nsv_exists shell_conn $kernel,snapshot]} {
      nsv_set -default shell_conn $kernel,snapshot ""
  }
  #ns_log notice "====  REQUIRE nsv_set -default shell_conn $kernel exists?[namespace exists $kernel]"
  
  if {![namespace exists $kernel]} {
      #
      # Create temporary namespace named "$kernel" for executing
      # command in current thread.
      #
      namespace eval $kernel {
          # Santiphap: Create substitute "ns_conn", since original "ns_conn" in kernel will return "no connection"
          proc ns_conn {args} {
              set kernel [lindex [split [namespace current] ::] end]
              if {[nsv_exists shell_conn "$kernel,$args"]} {
                  return [nsv_get shell_conn "$kernel,$args"]
              } else {
                  return -code error "bad option \"$args\": must be acceptedcompression, auth, authpassword, authuser, contentfile, contentlength, contentsentlength, driver, files, flags, form, headers, host, id, isconnected, location, method, outputheaders, peeraddr, peerport, pool, port, protocol, query, partialtimes, request, server, sock, start, timeout, url, urlc, urlv, version, or zipaccepted"
              }
          }
          # Santiphap: Create snapshot object, see shell.tcl
          ::ws::snapshot::Snapshot create snapshot -namespace [namespace current]
      }
      # Restore snapshot
      #ns_log notice "SNAPSHOT $kernel restore <[nsv_get shell_conn $kernel,snapshot]>"
      namespace eval $kernel [nsv_get shell_conn $kernel,snapshot]
  }

---