@encharm/cws 4.4.1 → 4.5.2

package/src/headers/16/node.d

@@ -1,315 +0,0 @@
-/* Copyright Joyent, Inc. and other Node contributors.
- *
- * Permission is hereby granted, free of charge, to any person obtaining a
- * copy of this software and associated documentation files (the
- * "Software"), to deal in the Software without restriction, including
- * without limitation the rights to use, copy, modify, merge, publish,
- * distribute, sublicense, and/or sell copies of the Software, and to permit
- * persons to whom the Software is furnished to do so, subject to the
- * following conditions:
- *
- * The above copyright notice and this permission notice shall be included
- * in all copies or substantial portions of the Software.
- *
- * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
- * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
- * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN
- * NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
- * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
- * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
- * USE OR OTHER DEALINGS IN THE SOFTWARE.
- */
-
-/*
- * This is the DTrace library file for the node provider, which includes
- * the necessary translators to get from the args[] to something useful.
- * Be warned:  the mechanics here are seriously ugly -- and one must always
- * keep in mind that clean abstractions often require filthy systems.
- */
-#pragma D depends_on library procfs.d
-
-typedef struct {
-	int32_t fd;
-	int32_t port;
-	uint32_t remote;
-	uint32_t buffered;
-} node_dtrace_connection_t;
-
-typedef struct {
-	int32_t fd;
-	int32_t port;
-	uint64_t remote;
-	uint32_t buffered;
-} node_dtrace_connection64_t;
-
-typedef struct {
-	int fd;
-	string remoteAddress;
-	int remotePort;
-	int bufferSize;
-} node_connection_t;
-
-translator node_connection_t <node_dtrace_connection_t *nc> {
-	fd = *(int32_t *)copyin((uintptr_t)&nc->fd, sizeof (int32_t));
-	remotePort =
-	    *(int32_t *)copyin((uintptr_t)&nc->port, sizeof (int32_t));
-	remoteAddress = curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-	    copyinstr((uintptr_t)*(uint32_t *)copyin((uintptr_t)&nc->remote,
-	    sizeof (int32_t))) :
-	    copyinstr((uintptr_t)*(uint64_t *)copyin((uintptr_t)
-	    &((node_dtrace_connection64_t *)nc)->remote, sizeof (int64_t)));
-	bufferSize = curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-	    *(uint32_t *)copyin((uintptr_t)&nc->buffered, sizeof (int32_t)) :
-	    *(uint32_t *)copyin((uintptr_t)
-	    &((node_dtrace_connection64_t *)nc)->buffered, sizeof (int32_t));
-};
-
-/*
- * 32-bit and 64-bit structures received from node for HTTP client request
- * probe.
- */
-typedef struct {
-	uint32_t url;
-	uint32_t method;
-} node_dtrace_http_client_request_t;
-
-typedef struct {
-	uint64_t url;
-	uint64_t method;
-} node_dtrace_http_client_request64_t;
-
-/*
- * The following structures are never used directly, but must exist to bind the
- * types specified in the provider to the translators defined here.
- * Ultimately, they always get cast to a more specific type inside the
- * translator.  To add to the confusion, the DTrace compiler does not allow
- * declaring two translators with the same destination type if the source types
- * are structures with the same size (because libctf says they're compatible,
- * so dtrace considers them equivalent).  Since we must define translators from
- * node_dtrace_http_client_request_t (above), node_dtrace_http_request_t, and
- * node_dtrace_http_server_request_t (both below), each of these three structs
- * must be declared with a different size.
- */
-typedef struct {
-	uint32_t version;
-	uint64_t dummy1;
-} node_dtrace_http_request_t;
-
-typedef struct {
-	uint32_t version;
-	uint64_t dummy2;
-	uint64_t dummy3;
-} node_dtrace_http_server_request_t;
-
-/*
- * Actual 32-bit and 64-bit, v0 and v1 structures received from node for the
- * HTTP server request probe.
- */
-typedef struct {
-	uint32_t url;
-	uint32_t method;
-} node_dtrace_http_server_request_v0_t;
-
-typedef struct {
-	uint32_t version;
-	uint32_t url;
-	uint32_t method;
-	uint32_t forwardedFor;
-} node_dtrace_http_server_request_v1_t;
-
-typedef struct {
-	uint64_t url;
-	uint64_t method;
-} node_dtrace_http_server_request64_v0_t;
-
-typedef struct {
-	uint32_t version;
-	uint32_t pad;
-	uint64_t url;
-	uint64_t method;
-	uint64_t forwardedFor;
-} node_dtrace_http_server_request64_v1_t;
-
-/*
- * In the end, both client and server request probes from both old and new
- * binaries translate their arguments to node_http_request_t, which is what the
- * user's D script ultimately sees.
- */
-typedef struct {
-	string url;
-	string method;
-	string forwardedFor;
-} node_http_request_t;
-
-/*
- * The following translators are particularly filthy for reasons of backwards
- * compatibility.  Stable versions of node prior to 0.6 used a single
- * http_request struct with fields for "url" and "method" for both client and
- * server probes.  0.6 added a "forwardedFor" field intended for the server
- * probe only, and the http_request struct passed by the application was split
- * first into client_http_request and server_http_request and the latter was
- * again split for v0 (the old struct) and v1.
- *
- * To distinguish the binary representations of the two versions of these
- * structs, the new version prepends a "version" member (where the old one has
- * a "url" pointer).  Each field that we're translating below first switches on
- * the value of this "version" field: if it's larger than 4096, we know we must
- * be looking at the "url" pointer of the older structure version.  Otherwise,
- * we must be looking at the new version.  Besides this, we have the usual
- * switch based on the userland process data model.  This would all be simpler
- * with macros, but those aren't available in D library files since we cannot
- * rely on cpp being present at runtime.
- *
- * In retrospect, the versioning bit might have been unnecessary since the type
- * of the object passed in should allow DTrace to select which translator to
- * use.  However, DTrace does sometimes use translators whose source types
- * don't quite match, and since we know this versioning logic works, we just
- * leave it alone.  Each of the translators below is functionally identical
- * (except that the client -> client translator doesn't bother translating
- * forwardedFor) and should actually work with any version of any of the client
- * or server structs transmitted by the application up to this point.
- */
-
-/*
- * Translate from node_dtrace_http_server_request_t (received from node 0.6 and
- * later versions) to node_http_request_t.
- */
-translator node_http_request_t <node_dtrace_http_server_request_t *nd> {
-	url = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ?
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v0_t *)nd)->url,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v0_t *)nd)->url,
-		    sizeof (uint64_t)))) :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->url,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->url,
-		    sizeof (uint64_t))));
-
-	method = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ?
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v0_t *)nd)->method,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v0_t *)nd)->method,
-		    sizeof (uint64_t)))) :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->method,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->method,
-		    sizeof (uint64_t))));
-
-	forwardedFor = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ? "" :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->forwardedFor,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->
-		    forwardedFor, sizeof (uint64_t))));
-};
-
-/*
- * Translate from node_dtrace_http_client_request_t (received from node 0.6 and
- * later versions) to node_http_request_t.
- */
-translator node_http_request_t <node_dtrace_http_client_request_t *nd> {
-	url = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ?
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v0_t *)nd)->url,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v0_t *)nd)->url,
-		    sizeof (uint64_t)))) :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->url,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->url,
-		    sizeof (uint64_t))));
-
-	method = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ?
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v0_t *)nd)->method,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v0_t *)nd)->method,
-		    sizeof (uint64_t)))) :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->method,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->method,
-		    sizeof (uint64_t))));
-
-	forwardedFor = "";
-};
-
-/*
- * Translate from node_dtrace_http_request_t (received from versions of node
- * prior to 0.6) to node_http_request_t.  This is used for both the server and
- * client probes since these versions of node didn't distinguish between the
- * types used in these probes.
- */
-translator node_http_request_t <node_dtrace_http_request_t *nd> {
-	url = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ?
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v0_t *)nd)->url,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v0_t *)nd)->url,
-		    sizeof (uint64_t)))) :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->url,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->url,
-		    sizeof (uint64_t))));
-
-	method = (*(uint32_t *)copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ?
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v0_t *)nd)->method,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v0_t *)nd)->method,
-		    sizeof (uint64_t)))) :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->method,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->method,
-		    sizeof (uint64_t))));
-
-	forwardedFor = (*(uint32_t *) copyin((uintptr_t)(uint32_t *)nd,
-		sizeof (uint32_t))) >= 4096 ? "" :
-	    (curpsinfo->pr_dmodel == PR_MODEL_ILP32 ?
-		copyinstr(*(uint32_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request_v1_t *)nd)->forwardedFor,
-		    sizeof (uint32_t))) :
-		copyinstr(*(uint64_t *)copyin((uintptr_t)
-		    &((node_dtrace_http_server_request64_v1_t *)nd)->
-		    forwardedFor, sizeof (uint64_t))));
-};

package/src/headers/16/node.stp

@@ -1,146 +0,0 @@
-// Copyright Joyent, Inc. and other Node contributors.
-//
-// Permission is hereby granted, free of charge, to any person obtaining a
-// copy of this software and associated documentation files (the
-// "Software"), to deal in the Software without restriction, including
-// without limitation the rights to use, copy, modify, merge, publish,
-// distribute, sublicense, and/or sell copies of the Software, and to permit
-// persons to whom the Software is furnished to do so, subject to the
-// following conditions:
-//
-// The above copyright notice and this permission notice shall be included
-// in all copies or substantial portions of the Software.
-//
-// THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS
-// OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
-// MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN
-// NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM,
-// DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR
-// OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE
-// USE OR OTHER DEALINGS IN THE SOFTWARE.
-
-probe node_net_server_connection = process("node").mark("net__server__connection")
-{
-  remote = user_string($arg2);
-  port = $arg3;
-  fd = $arg4;
-
-  probestr = sprintf("%s(remote=%s, port=%d, fd=%d)",
-    $$name,
-    remote,
-    port,
-    fd);
-}
-
-probe node_net_stream_end = process("node").mark("net__stream__end")
-{
-  remote = user_string($arg2);
-  port = $arg3;
-  fd = $arg4;
-
-  probestr = sprintf("%s(remote=%s, port=%d, fd=%d)",
-    $$name,
-    remote,
-    port,
-    fd);
-}
-
-probe node_http_server_request = process("node").mark("http__server__request")
-{
-  remote = user_string($arg3);
-  port = $arg4;
-  method = user_string($arg5);
-  url = user_string($arg6);
-  fd = $arg7;
-
-  probestr = sprintf("%s(remote=%s, port=%d, method=%s, url=%s, fd=%d)",
-    $$name,
-    remote,
-    port,
-    method,
-    url,
-    fd);
-}
-
-probe node_http_server_response = process("node").mark("http__server__response")
-{
-  remote = user_string($arg2);
-  port = $arg3;
-  fd = $arg4;
-
-  probestr = sprintf("%s(remote=%s, port=%d, fd=%d)",
-    $$name,
-    remote,
-    port,
-    fd);
-}
-
-probe node_http_client_request = process("node").mark("http__client__request")
-{
-  remote = user_string($arg3);
-  port = $arg4;
-  method = user_string($arg5);
-  url = user_string($arg6);
-  fd = $arg7;
-
-  probestr = sprintf("%s(remote=%s, port=%d, method=%s, url=%s, fd=%d)",
-    $$name,
-    remote,
-    port,
-    method,
-    url,
-    fd);
-}
-
-probe node_http_client_response = process("node").mark("http__client__response")
-{
-  remote = user_string($arg2);
-  port = $arg3;
-  fd = $arg4;
-
-  probestr = sprintf("%s(remote=%s, port=%d, fd=%d)",
-    $$name,
-    remote,
-    port,
-    fd);
-}
-
-probe node_gc_start = process("node").mark("gc__start")
-{
-  scavenge = 1 << 0;
-  compact = 1 << 1;
-
-  if ($arg1 == scavenge)
-    type = "kGCTypeScavenge";
-  else if ($arg1 == compact)
-    type = "kGCTypeMarkSweepCompact";
-  else
-    type = "kGCTypeAll";
-
-  flags = $arg2;
-
-  probestr = sprintf("%s(type=%s,flags=%d)",
-    $$name,
-    type,
-    flags);
-}
-
-probe node_gc_stop = process("node").mark("gc__done")
-{
-  scavenge = 1 << 0;
-  compact = 1 << 1;
-
-  if ($arg1 == scavenge)
-    type = "kGCTypeScavenge";
-  else if ($arg1 == compact)
-    type = "kGCTypeMarkSweepCompact";
-  else
-    type = "kGCTypeAll";
-
-  flags = $arg2;
-
-  probestr = sprintf("%s(type=%s,flags=%d)",
-    $$name,
-    type,
-    flags);
-}