[PATCH v2 1/2] translators: support 6.10

Linux DTrace development list
 help / color / mirror / Atom feed

* [PATCH v2 1/2] translators: support 6.10
@ 2024-06-07 18:41 Nick Alcock
  2024-06-07 18:41 ` [PATCH v2 2/2] dlibs: pregenerated translators for 6.10 Nick Alcock
                   ` (2 more replies)
  0 siblings, 3 replies; 11+ messages in thread
From: Nick Alcock @ 2024-06-07 18:41 UTC (permalink / raw)
  To: dtrace, dtrace-devel; +Cc: kris.van.hees

This changed the block device into a component of an atomic
flags word (so we need to change the .d.in as well to pull in
the releavnt #define for the blockdev portion of that flags word).

See kernel commit 1116b9fa15c09748ae05d2365a305fa22671eb1e.

Signed-off-by: Nick Alcock <nick.alcock@oracle.com>
---
 libdtrace/io.d.in | 6 +++---
 libdtrace/io.m4   | 5 +++--
 2 files changed, 6 insertions(+), 5 deletions(-)

diff --git a/libdtrace/io.d.in b/libdtrace/io.d.in
index b3da517778264..f44f53f092dce 100644
--- a/libdtrace/io.d.in
+++ b/libdtrace/io.d.in
@@ -1,6 +1,6 @@
 /*
  * Oracle Linux DTrace.
- * Copyright (c) 2012, 2023, Oracle and/or its affiliates. All rights reserved.
+ * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
  * Licensed under the Universal Permissive License v 1.0 as shown at
  * http://oss.oracle.com/licenses/upl.
  */
@@ -69,7 +69,7 @@ inline int REQ_SYNC = REQ_SYNC_VAL;
 define_for_kernel([[__bi_rw]], [[(m4_kver(4,8,0), [[bi_opf]])]], [[bi_rw]])
 define_for_kernel([[__disk]], [[(m4_kver(5,12,0), [[bi_bdev->bd_disk]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev->bd_disk]])
 define_for_kernel([[__disk_chk]], [[(m4_kver(5,12,0), [[bi_bdev]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev]])
-define_for_kernel([[__bio_partno]], [[(m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
+define_for_kernel([[__bio_partno]], [[(m4_kver(6,10,0), [[bi_bdev->__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
 define_for_kernel([[__bio_part_dev]], [[(m4_kver(5,12,0), [[bi_bdev->bd_dev]]), (m4_kver(5,11,0), [[bi_disk->part_tbl->part[B->bi_partno]->bd_dev]]), (m4_kver(4,14,0), [[bi_disk->part_tbl->part[B->bi_partno]->__dev.devt]])]], [[bi_bdev->bd_part->__dev.devt]])
 
 #pragma D binding "1.6.3" translator
@@ -98,7 +98,7 @@ typedef struct devinfo {
 } devinfo_t;
 
 define_for_kernel([[__bh_bdev_dev]], [[(m4_kver(5,11,0), [[b_bdev->bd_disk->part0->bd_device]])]], [[b_bdev->bd_disk->part0.__dev]])
-define_for_kernel([[__bdev_partno]], [[(m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
+define_for_kernel([[__bdev_partno]], [[(m4_kver(6,10,0), [[__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
 #pragma D binding "1.0" translator
 translator devinfo_t < struct buffer_head *B > {
 	dev_major = getmajor(B->b_bdev->bd_dev);
diff --git a/libdtrace/io.m4 b/libdtrace/io.m4
index e837ef65b86f7..aa406ec375698 100644
--- a/libdtrace/io.m4
+++ b/libdtrace/io.m4
@@ -1,6 +1,6 @@
 /*
  * Oracle Linux DTrace.
- * Copyright (c) 2005, 2013, Oracle and/or its affiliates. All rights reserved.
+ * Copyright (c) 2005, 2024, Oracle and/or its affiliates. All rights reserved.
  * Licensed under the Universal Permissive License v 1.0 as shown at
  * http://oss.oracle.com/licenses/upl.
  */
@@ -11,7 +11,7 @@
  * to replace those tokens with their values to create the finished io.d.
  */
 
-/* #include <linux/buffer_head.h> */
+#include <linux/blk_types.h>
 #include <sys/file.h>
 #if 0
 #ifndef __USE_UNIX98
@@ -43,4 +43,5 @@ DEF_REPLACE(O_NOFOLLOW)
 DEF_REPLACE(O_CLOEXEC)
 DEF_REPLACE(O_DSYNC)
 DEF_REPLACE(O_RSYNC)
+DEF_REPLACE(BD_PARTNO)
 #include "io.platform.m4"

base-commit: 454c6d47bf408415f7eb52ea701779f041aa6957
-- 
2.45.1.275.g567cb0950c


^ permalink raw reply related	[flat|nested] 11+ messages in thread

* [PATCH v2 2/2] dlibs: pregenerated translators for 6.10
  2024-06-07 18:41 [PATCH v2 1/2] translators: support 6.10 Nick Alcock
@ 2024-06-07 18:41 ` Nick Alcock
  2024-06-13 12:22   ` [DTrace-devel] " Alan Maguire
  2024-06-19  3:32 ` [PATCH v2 1/2] translators: support 6.10 Kris Van Hees
  2024-06-19 13:21 ` [PATCH v3] " Nick Alcock
  2 siblings, 1 reply; 11+ messages in thread
From: Nick Alcock @ 2024-06-07 18:41 UTC (permalink / raw)
  To: dtrace, dtrace-devel; +Cc: kris.van.hees

All differences from the previous translators (6.1) are no-effect
ordering changes other than those one would expect from the changes to
the .d files.

Signed-off-by: Nick Alcock <nick.alcock@oracle.com>
---
 dlibs/aarch64/6.10/errno.d     | 275 ++++++++++++++++++++++++++
 dlibs/aarch64/6.10/io.d        | 234 ++++++++++++++++++++++
 dlibs/aarch64/6.10/ip.d        | 341 +++++++++++++++++++++++++++++++++
 dlibs/aarch64/6.10/lockstat.d  |  14 ++
 dlibs/aarch64/6.10/net.d       |  33 ++++
 dlibs/aarch64/6.10/pcap.d      |  35 ++++
 dlibs/aarch64/6.10/procfs.d    | 306 +++++++++++++++++++++++++++++
 dlibs/aarch64/6.10/regs.d      |  78 ++++++++
 dlibs/aarch64/6.10/sched.d     |  38 ++++
 dlibs/aarch64/6.10/signal.d    | 108 +++++++++++
 dlibs/aarch64/6.10/tcp.d       | 231 ++++++++++++++++++++++
 dlibs/aarch64/6.10/udp.d       |  71 +++++++
 dlibs/aarch64/6.10/unistd.d    |  36 ++++
 dlibs/x86_64/6.10.0/errno.d    | 275 ++++++++++++++++++++++++++
 dlibs/x86_64/6.10.0/io.d       | 235 +++++++++++++++++++++++
 dlibs/x86_64/6.10.0/ip.d       | 341 +++++++++++++++++++++++++++++++++
 dlibs/x86_64/6.10.0/lockstat.d |  14 ++
 dlibs/x86_64/6.10.0/net.d      |  33 ++++
 dlibs/x86_64/6.10.0/pcap.d     |  35 ++++
 dlibs/x86_64/6.10.0/procfs.d   | 306 +++++++++++++++++++++++++++++
 dlibs/x86_64/6.10.0/regs.d     |  94 +++++++++
 dlibs/x86_64/6.10.0/sched.d    |  38 ++++
 dlibs/x86_64/6.10.0/signal.d   | 108 +++++++++++
 dlibs/x86_64/6.10.0/tcp.d      | 231 ++++++++++++++++++++++
 dlibs/x86_64/6.10.0/udp.d      |  71 +++++++
 dlibs/x86_64/6.10.0/unistd.d   |  36 ++++
 26 files changed, 3617 insertions(+)
 create mode 100644 dlibs/aarch64/6.10/errno.d
 create mode 100644 dlibs/aarch64/6.10/io.d
 create mode 100644 dlibs/aarch64/6.10/ip.d
 create mode 100644 dlibs/aarch64/6.10/lockstat.d
 create mode 100644 dlibs/aarch64/6.10/net.d
 create mode 100644 dlibs/aarch64/6.10/pcap.d
 create mode 100644 dlibs/aarch64/6.10/procfs.d
 create mode 100644 dlibs/aarch64/6.10/regs.d
 create mode 100644 dlibs/aarch64/6.10/sched.d
 create mode 100644 dlibs/aarch64/6.10/signal.d
 create mode 100644 dlibs/aarch64/6.10/tcp.d
 create mode 100644 dlibs/aarch64/6.10/udp.d
 create mode 100644 dlibs/aarch64/6.10/unistd.d
 create mode 100644 dlibs/x86_64/6.10.0/errno.d
 create mode 100644 dlibs/x86_64/6.10.0/io.d
 create mode 100644 dlibs/x86_64/6.10.0/ip.d
 create mode 100644 dlibs/x86_64/6.10.0/lockstat.d
 create mode 100644 dlibs/x86_64/6.10.0/net.d
 create mode 100644 dlibs/x86_64/6.10.0/pcap.d
 create mode 100644 dlibs/x86_64/6.10.0/procfs.d
 create mode 100644 dlibs/x86_64/6.10.0/regs.d
 create mode 100644 dlibs/x86_64/6.10.0/sched.d
 create mode 100644 dlibs/x86_64/6.10.0/signal.d
 create mode 100644 dlibs/x86_64/6.10.0/tcp.d
 create mode 100644 dlibs/x86_64/6.10.0/udp.d
 create mode 100644 dlibs/x86_64/6.10.0/unistd.d

diff --git a/dlibs/aarch64/6.10/errno.d b/dlibs/aarch64/6.10/errno.d
new file mode 100644
index 0000000000000..f54fafe1861cc
--- /dev/null
+++ b/dlibs/aarch64/6.10/errno.d
@@ -0,0 +1,275 @@
+
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
+ * Use is subject to license terms.
+ */
+
+inline int EPERM = 1;
+#pragma D binding "1.0" EPERM
+inline int ENOENT = 2;
+#pragma D binding "1.0" ENOENT
+inline int ESRCH = 3;
+#pragma D binding "1.0" ESRCH
+inline int EINTR = 4;
+#pragma D binding "1.0" EINTR
+inline int EIO = 5;
+#pragma D binding "1.0" EIO
+inline int ENXIO = 6;
+#pragma D binding "1.0" ENXIO
+inline int E2BIG = 7;
+#pragma D binding "1.0" E2BIG
+inline int ENOEXEC = 8;
+#pragma D binding "1.0" ENOEXEC
+inline int EBADF = 9;
+#pragma D binding "1.0" EBADF
+inline int ECHILD = 10;
+#pragma D binding "1.0" ECHILD
+inline int EAGAIN = 11;
+#pragma D binding "1.0" EAGAIN
+inline int ENOMEM = 12;
+#pragma D binding "1.0" ENOMEM
+inline int EACCES = 13;
+#pragma D binding "1.0" EACCES
+inline int EFAULT = 14;
+#pragma D binding "1.0" EFAULT
+inline int ENOTBLK = 15;
+#pragma D binding "1.0" ENOTBLK
+inline int EBUSY = 16;
+#pragma D binding "1.0" EBUSY
+inline int EEXIST = 17;
+#pragma D binding "1.0" EEXIST
+inline int EXDEV = 18;
+#pragma D binding "1.0" EXDEV
+inline int ENODEV = 19;
+#pragma D binding "1.0" ENODEV
+inline int ENOTDIR = 20;
+#pragma D binding "1.0" ENOTDIR
+inline int EISDIR = 21;
+#pragma D binding "1.0" EISDIR
+inline int EINVAL = 22;
+#pragma D binding "1.0" EINVAL
+inline int ENFILE = 23;
+#pragma D binding "1.0" ENFILE
+inline int EMFILE = 24;
+#pragma D binding "1.0" EMFILE
+inline int ENOTTY = 25;
+#pragma D binding "1.0" ENOTTY
+inline int ETXTBSY = 26;
+#pragma D binding "1.0" ETXTBSY
+inline int EFBIG = 27;
+#pragma D binding "1.0" EFBIG
+inline int ENOSPC = 28;
+#pragma D binding "1.0" ENOSPC
+inline int ESPIPE = 29;
+#pragma D binding "1.0" ESPIPE
+inline int EROFS = 30;
+#pragma D binding "1.0" EROFS
+inline int EMLINK = 31;
+#pragma D binding "1.0" EMLINK
+inline int EPIPE = 32;
+#pragma D binding "1.0" EPIPE
+inline int EDOM = 33;
+#pragma D binding "1.0" EDOM
+inline int ERANGE = 34;
+#pragma D binding "1.0" ERANGE
+inline int EDEADLK = 35;
+#pragma D binding "1.0" EDEADLK
+inline int ENAMETOOLONG = 36;
+#pragma D binding "1.0" ENAMETOOLONG
+inline int ENOLCK = 37;
+#pragma D binding "1.0" ENOLCK
+inline int ENOSYS = 38;
+#pragma D binding "1.0" ENOSYS
+inline int ENOTEMPTY = 39;
+#pragma D binding "1.0" ENOTEMPTY
+inline int ELOOP = 40;
+#pragma D binding "1.0" ELOOP
+inline int EWOULDBLOCK = 11;
+#pragma D binding "1.0" EWOULDBLOCK
+inline int ENOMSG = 42;
+#pragma D binding "1.0" ENOMSG
+inline int EIDRM = 43;
+#pragma D binding "1.0" EIDRM
+inline int ECHRNG = 44;
+#pragma D binding "1.0" ECHRNG
+inline int EL2NSYNC = 45;
+#pragma D binding "1.0" EL2NSYNC
+inline int EL3HLT = 46;
+#pragma D binding "1.0" EL3HLT
+inline int EL3RST = 47;
+#pragma D binding "1.0" EL3RST
+inline int ELNRNG = 48;
+#pragma D binding "1.0" ELNRNG
+inline int EUNATCH = 49;
+#pragma D binding "1.0" EUNATCH
+inline int ENOCSI = 50;
+#pragma D binding "1.0" ENOCSI
+inline int EL2HLT = 51;
+#pragma D binding "1.0" EL2HLT
+inline int EBADE = 52;
+#pragma D binding "1.0" EBADE
+inline int EBADR = 53;
+#pragma D binding "1.0" EBADR
+inline int EXFULL = 54;
+#pragma D binding "1.0" EXFULL
+inline int ENOANO = 55;
+#pragma D binding "1.0" ENOANO
+inline int EBADRQC = 56;
+#pragma D binding "1.0" EBADRQC
+inline int EBADSLT = 57;
+#pragma D binding "1.0" EBADSLT
+inline int EDEADLOCK = 35;
+#pragma D binding "1.0" EDEADLOCK
+inline int EBFONT = 59;
+#pragma D binding "1.0" EBFONT
+inline int ENOSTR = 60;
+#pragma D binding "1.0" ENOSTR
+inline int ENODATA = 61;
+#pragma D binding "1.0" ENODATA
+inline int ETIME = 62;
+#pragma D binding "1.0" ETIME
+inline int ENOSR = 63;
+#pragma D binding "1.0" ENOSR
+inline int ENONET = 64;
+#pragma D binding "1.0" ENONET
+inline int ENOPKG = 65;
+#pragma D binding "1.0" ENOPKG
+inline int EREMOTE = 66;
+#pragma D binding "1.0" EREMOTE
+inline int ENOLINK = 67;
+#pragma D binding "1.0" ENOLINK
+inline int EADV = 68;
+#pragma D binding "1.0" EADV
+inline int ESRMNT = 69;
+#pragma D binding "1.0" ESRMNT
+inline int ECOMM = 70;
+#pragma D binding "1.0" ECOMM
+inline int EPROTO = 71;
+#pragma D binding "1.0" EPROTO
+inline int EMULTIHOP = 72;
+#pragma D binding "1.0" EMULTIHOP
+inline int EDOTDOT = 73;
+#pragma D binding "1.0" EDOTDOT
+inline int EBADMSG = 74;
+#pragma D binding "1.0" EBADMSG
+inline int EOVERFLOW = 75;
+#pragma D binding "1.0" EOVERFLOW
+inline int ENOTUNIQ = 76;
+#pragma D binding "1.0" ENOTUNIQ
+inline int EBADFD = 77;
+#pragma D binding "1.0" EBADFD
+inline int EREMCHG = 78;
+#pragma D binding "1.0" EREMCHG
+inline int ELIBACC = 79;
+#pragma D binding "1.0" ELIBACC
+inline int ELIBBAD = 80;
+#pragma D binding "1.0" ELIBBAD
+inline int ELIBSCN = 81;
+#pragma D binding "1.0" ELIBSCN
+inline int ELIBMAX = 82;
+#pragma D binding "1.0" ELIBMAX
+inline int ELIBEXEC = 83;
+#pragma D binding "1.0" ELIBEXEC
+inline int EILSEQ = 84;
+#pragma D binding "1.0" EILSEQ
+inline int ERESTART = 85;
+#pragma D binding "1.0" ERESTART
+inline int ESTRPIPE = 86;
+#pragma D binding "1.0" ESTRPIPE
+inline int EUSERS = 87;
+#pragma D binding "1.0" EUSERS
+inline int ENOTSOCK = 88;
+#pragma D binding "1.0" ENOTSOCK
+inline int EDESTADDRREQ = 89;
+#pragma D binding "1.0" EDESTADDRREQ
+inline int EMSGSIZE = 90;
+#pragma D binding "1.0" EMSGSIZE
+inline int EPROTOTYPE = 91;
+#pragma D binding "1.0" EPROTOTYPE
+inline int ENOPROTOOPT = 92;
+#pragma D binding "1.0" ENOPROTOOPT
+inline int EPROTONOSUPPORT = 93;
+#pragma D binding "1.0" EPROTONOSUPPORT
+inline int ESOCKTNOSUPPORT = 94;
+#pragma D binding "1.0" ESOCKTNOSUPPORT
+inline int EOPNOTSUPP = 95;
+#pragma D binding "1.0" EOPNOTSUPP
+inline int EPFNOSUPPORT = 96;
+#pragma D binding "1.0" EPFNOSUPPORT
+inline int EAFNOSUPPORT = 97;
+#pragma D binding "1.0" EAFNOSUPPORT
+inline int EADDRINUSE = 98;
+#pragma D binding "1.0" EADDRINUSE
+inline int EADDRNOTAVAIL = 99;
+#pragma D binding "1.0" EADDRNOTAVAIL
+inline int ENETDOWN = 100;
+#pragma D binding "1.0" ENETDOWN
+inline int ENETUNREACH = 101;
+#pragma D binding "1.0" ENETUNREACH
+inline int ENETRESET = 102;
+#pragma D binding "1.0" ENETRESET
+inline int ECONNABORTED = 103;
+#pragma D binding "1.0" ECONNABORTED
+inline int ECONNRESET = 104;
+#pragma D binding "1.0" ECONNRESET
+inline int ENOBUFS = 105;
+#pragma D binding "1.0" ENOBUFS
+inline int EISCONN = 106;
+#pragma D binding "1.0" EISCONN
+inline int ENOTCONN = 107;
+#pragma D binding "1.0" ENOTCONN
+inline int ESHUTDOWN = 108;
+#pragma D binding "1.0" ESHUTDOWN
+inline int ETOOMANYREFS = 109;
+#pragma D binding "1.0" ETOOMANYREFS
+inline int ETIMEDOUT = 110;
+#pragma D binding "1.0" ETIMEDOUT
+inline int ECONNREFUSED = 111;
+#pragma D binding "1.0" ECONNREFUSED
+inline int EHOSTDOWN = 112;
+#pragma D binding "1.0" EHOSTDOWN
+inline int EHOSTUNREACH = 113;
+#pragma D binding "1.0" EHOSTUNREACH
+inline int EALREADY = 114;
+#pragma D binding "1.0" EALREADY
+inline int EINPROGRESS = 115;
+#pragma D binding "1.0" EINPROGRESS
+inline int ESTALE = 116;
+#pragma D binding "1.0" ESTALE
+inline int EUCLEAN = 117;
+#pragma D binding "1.0" EUCLEAN
+inline int ENOTNAM = 118;
+#pragma D binding "1.0" ENOTNAM
+inline int ENAVAIL = 119;
+#pragma D binding "1.0" ENAVAIL
+inline int EISNAM = 120;
+#pragma D binding "1.0" EISNAM
+inline int EREMOTEIO = 121;
+#pragma D binding "1.0" EREMOTEIO
+inline int EDQUOT = 122;
+#pragma D binding "1.0" EDQUOT
+inline int ENOMEDIUM = 123;
+#pragma D binding "1.0" ENOMEDIUM
+inline int EMEDIUMTYPE = 124;
+#pragma D binding "1.0" EMEDIUMTYPE
+inline int ECANCELED = 125;
+#pragma D binding "1.0" ECANCELED
+inline int ENOKEY = 126;
+#pragma D binding "1.0" ENOKEY
+inline int EKEYEXPIRED = 127;
+#pragma D binding "1.0" EKEYEXPIRED
+inline int EKEYREVOKED = 128;
+#pragma D binding "1.0" EKEYREVOKED
+inline int EKEYREJECTED = 129;
+#pragma D binding "1.0" EKEYREJECTED
+inline int EOWNERDEAD = 130;
+#pragma D binding "1.0" EOWNERDEAD
+inline int ENOTRECOVERABLE = 131;
+#pragma D binding "1.0" ENOTRECOVERABLE
+inline int ERFKILL = 132;
+#pragma D binding "1.0" ERFKILL
+inline int EHWPOISON = 133;
+#pragma D binding "1.0" EHWPOISON
+inline int ENOTSUP = 95;
+#pragma D binding "1.0" ENOTSUP
diff --git a/dlibs/aarch64/6.10/io.d b/dlibs/aarch64/6.10/io.d
new file mode 100644
index 0000000000000..ffccf5b3e3f18
--- /dev/null
+++ b/dlibs/aarch64/6.10/io.d
@@ -0,0 +1,234 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on provider sched
+
+typedef char	*caddr_t;
+
+typedef struct bufinfo {
+	int b_flags;			/* buffer status */
+	size_t b_bcount;		/* number of bytes */
+	caddr_t b_addr;			/* buffer address */
+	uint64_t b_lblkno;		/* block # on device */
+	uint64_t b_blkno;		/* expanded block # on device */
+	size_t b_resid;			/* # of bytes not transferred */
+	size_t b_bufsize;		/* size of allocated buffer */
+	caddr_t b_iodone;		/* I/O completion routine */
+	int b_error;			/* expanded error field */
+	dev_t b_edev;			/* extended device */
+} bufinfo_t;
+
+inline int B_BUSY = 0x000001;
+#pragma D binding "1.0" B_BUSY
+inline int B_DONE = 0x000002;
+#pragma D binding "1.0" B_DONE
+inline int B_ERROR = 0x000004;
+#pragma D binding "1.0" B_ERROR
+inline int B_PAGEIO = 0x000010;
+#pragma D binding "1.0" B_PAGEIO
+inline int B_PHYS = 0x000020;
+#pragma D binding "1.0" B_PHYS
+inline int B_READ = 0x000040;
+#pragma D binding "1.0" B_READ
+inline int B_WRITE = 0x000100;
+#pragma D binding "1.0" B_WRITE
+inline int B_ASYNC = 0x000400;
+#pragma D binding "1.0" B_ASYNC
+
+#pragma D binding "1.0" translator
+translator bufinfo_t < struct buffer_head *B > {
+	b_flags = (int)arg1 & 0x01 ? B_WRITE : B_READ;
+	b_addr = B->b_data;
+	b_bcount = B->b_size;
+	b_lblkno = B->b_blocknr;
+	b_blkno = B->b_blocknr;
+	b_resid = 0;
+	b_bufsize = B->b_size;
+	b_iodone = (caddr_t)B->b_end_io;
+	b_error = 0;			/* b_state ?? */
+	b_edev = B->b_bdev->bd_dev;
+};
+
+/*
+ * From linux/blk_types.h.
+ */
+
+/* bit # in bi_flags */
+inline int BIO_USER_MAPPED = 6;
+
+/* bit mask in bi_rw */
+inline int REQ_WRITE = 0x01;
+
+inline int REQ_SYNC = 0x800;
+
+
+
+
+
+
+
+#pragma D binding "1.6.3" translator
+translator bufinfo_t < struct bio *B > {
+	b_flags = ((int)B->bi_opf & REQ_WRITE ? B_WRITE : B_READ) |
+		((int)B->bi_opf & REQ_SYNC ? 0 : B_ASYNC) |
+		((int)B->bi_flags & (1 << BIO_USER_MAPPED) ? B_PAGEIO : B_PHYS);
+	b_addr = 0;
+	b_bcount = B->bi_iter.bi_size;
+	b_lblkno = B->bi_iter.bi_sector;
+	b_blkno = B->bi_iter.bi_sector;
+	b_resid = 0;
+	b_bufsize = B->bi_iter.bi_size;
+	b_iodone = (caddr_t)B->bi_end_io;
+	b_error = 0;
+	b_edev = B->bi_bdev == NULL ? 0 : B->bi_bdev->bd_dev;
+};
+
+typedef struct devinfo {
+	int dev_major;			/* major number */
+	int dev_minor;			/* minor number */
+	int dev_instance;		/* instance number */
+	string dev_name;		/* name of device */
+	string dev_statname;		/* name of device + instance/minor */
+	string dev_pathname;		/* pathname of device */
+} devinfo_t;
+
+
+
+#pragma D binding "1.0" translator
+translator devinfo_t < struct buffer_head *B > {
+	dev_major = getmajor(B->b_bdev->bd_dev);
+	dev_minor = getminor(B->b_bdev->bd_dev);
+	dev_instance = 0;		/* not used? */
+	dev_name = B->b_bdev->bd_disk->part0->bd_device.parent
+	    ? B->b_bdev->bd_disk->part0->bd_device.parent->driver->name
+		? stringof(B->b_bdev->bd_disk->part0->bd_device.parent->driver->name)
+		: "<none>"
+	    : B->b_bdev->bd_disk->part0->bd_device.driver->name
+		? stringof(B->b_bdev->bd_disk->part0->bd_device.driver->name)
+		: "<none>";
+	dev_statname = B->b_bdev->__bd_flags.counter & 255 == 0
+			? stringof(B->b_bdev->bd_disk->disk_name)
+			: strjoin(stringof(B->b_bdev->bd_disk->disk_name),
+				  lltostr(B->b_bdev->__bd_flags.counter & 255));
+	dev_pathname = strjoin(
+			"/dev/",
+			B->b_bdev->__bd_flags.counter & 255 == 0
+			    ? stringof(B->b_bdev->bd_disk->disk_name)
+			    : strjoin(stringof(B->b_bdev->bd_disk->disk_name),
+				      lltostr(B->b_bdev->__bd_flags.counter & 255))
+		       );
+};
+
+#pragma D binding "1.6.3" translator
+translator devinfo_t < struct bio *B > {
+	dev_major = B->bi_bdev == NULL ? 0 : getmajor(B->bi_bdev->bd_dev);
+	dev_minor = B->bi_bdev == NULL ? 0 : getminor(B->bi_bdev->bd_dev);
+	dev_instance = 0;
+	dev_name = B->bi_bdev == NULL
+			? "nfs"
+			: stringof(((struct blk_major_name **)`major_names)[
+					getmajor(B->bi_bdev->bd_dev) % 255
+				   ]->name);
+	dev_statname = B->bi_bdev == NULL ? "nfs" :
+	    B->bi_bdev->__bd_flags.counter & 255 == 0 ? stringof(B->bi_bdev->bd_disk->disk_name) :
+	    strjoin(stringof(B->bi_bdev->bd_disk->disk_name), lltostr(B->bi_bdev->__bd_flags.counter & 255));
+	dev_pathname = B->bi_bdev == NULL ? "<nfs>" : "<unknown>";
+};
+
+typedef struct fileinfo {
+	string fi_name;			/* name (basename of fi_pathname) */
+	string fi_dirname;		/* directory (dirname of fi_pathname) */
+	string fi_pathname;		/* full pathname */
+	loff_t fi_offset;		/* offset within file */
+	string fi_fs;			/* filesystem */
+	string fi_mount;		/* mount point of file system */
+	int fi_oflags;			/* open(2) flags for file descriptor */
+} fileinfo_t;
+
+#pragma D binding "1.0" translator
+translator fileinfo_t < struct buffer_head *B > {
+	fi_name = "<unknown>";
+	fi_dirname = "<unknown>";
+	fi_pathname = "<unknown>";
+	fi_offset = 0;
+	fi_fs = "<unknown>";
+	fi_mount = "<unknown>";
+	fi_oflags = 0;
+};
+
+inline int O_ACCMODE = 0003;
+#pragma D binding "1.1" O_ACCMODE
+inline int O_RDONLY = 00;
+#pragma D binding "1.1" O_RDONLY
+inline int O_WRONLY = 01;
+#pragma D binding "1.1" O_WRONLY
+inline int O_RDWR = 02;
+#pragma D binding "1.1" O_RDWR
+inline int O_CREAT = 00000100;
+#pragma D binding "1.1" O_CREAT
+inline int O_EXCL = 00000200;
+#pragma D binding "1.1" O_EXCL
+inline int O_NOCTTY = 00000400;
+#pragma D binding "1.1" O_NOCTTY
+inline int O_TRUNC = 00001000;
+#pragma D binding "1.1" O_TRUNC
+inline int O_APPEND = 00002000;
+#pragma D binding "1.1" O_APPEND
+inline int O_NONBLOCK = 00004000;
+#pragma D binding "1.1" O_NONBLOCK
+inline int O_NDELAY = 00004000;
+#pragma D binding "1.1" O_NDELAY
+inline int O_SYNC = (04000000|010000);
+#pragma D binding "1.1" O_SYNC
+
+inline int O_ASYNC = 020000;
+#pragma D binding "1.1" O_ASYNC
+inline int O_DIRECTORY = 040000;
+#pragma D binding "1.1" O_DIRECTORY
+inline int O_NOFOLLOW = 0100000;
+#pragma D binding "1.1" O_NOFOLLOW
+inline int O_CLOEXEC = 02000000;
+#pragma D binding "1.1" O_CLOEXEC
+inline int O_DSYNC = 010000;
+#pragma D binding "1.1" O_DSYNC
+inline int O_RSYNC = (04000000|010000);
+#pragma D binding "1.1" O_RSYNC
+
+#pragma D binding "1.1" translator
+translator fileinfo_t < struct file *F > {
+	fi_name = F == NULL
+			? "<none>"
+			: stringof(F->f_path.dentry->d_name.name);
+	fi_dirname = F == NULL
+			? "<none>"
+			: dirname(d_path(&(F->f_path)));
+	fi_pathname = F == NULL
+			? "<none>"
+			: d_path(&(F->f_path));
+	fi_offset = F == NULL
+			? 0
+			: F->f_pos;
+	fi_fs = F == NULL
+			? "<none>"
+			: stringof(F->f_path.mnt->mnt_sb->s_type->name);
+	fi_mount = F == NULL
+			? "<none>"
+			: "<unknown>";
+	fi_oflags = F == NULL
+			? 0
+			: F->f_flags;
+};
+
+inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
+				 fd >= 0 && fd < curthread->files->fdt->max_fds
+					? curthread->files->fdt->fd[fd]
+					: NULL
+				);
+
+#pragma D attributes Stable/Stable/Common fds
+#pragma D binding "1.1" fds
diff --git a/dlibs/aarch64/6.10/ip.d b/dlibs/aarch64/6.10/ip.d
new file mode 100644
index 0000000000000..f8b77f1224115
--- /dev/null
+++ b/dlibs/aarch64/6.10/ip.d
@@ -0,0 +1,341 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2007, 2023, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library net.d
+#pragma D depends_on library procfs.d
+#pragma D depends_on provider ip
+
+inline int IPPROTO_IP		=	0;
+inline int IPPROTO_ICMP		=	1;
+inline int IPPROTO_IGMP		=	2;
+inline int IPPROTO_IPIP		=	4;
+inline int IPPROTO_TCP		=	6;
+inline int IPPROTO_EGP		=	8;
+inline int IPPROTO_PUP		=	12;
+inline int IPPROTO_UDP		=	17;
+inline int IPPROTO_IDP		=	22;
+inline int IPPROTO_TP		=	29;
+inline int IPPROTO_DCCP		=	33;
+inline int IPPROTO_IPV6		=	41;
+inline int IPPROTO_RSVP		=	46;
+inline int IPPROTO_GRE		=	47;
+inline int IPPROTO_ESP		=	50;
+inline int IPPROTO_AH		=	51;
+inline int IPPROTO_OSPF		=	89;
+inline int IPPROTO_MTP		=	92;
+inline int IPPROTO_BEETPH	=	94;
+inline int IPPROTO_ENCAP	=	98;
+inline int IPPROTO_PIM		=	103;
+inline int IPPROTO_COMP		=	108;
+inline int IPPROTO_SCTP		=	132;
+inline int IPPROTO_UDPLITE	=	136;
+inline int IPPROTO_RAW		=	255;
+inline int IPPROTO_MAX		=	256;
+inline int IPPROTO_HOPOPTS	=	0;
+inline int IPPROTO_ROUTING	=	43;
+inline int IPPROTO_FRAGMENT	=	44;
+inline int IPPROTO_ICMPV6	=	58;
+inline int IPPROTO_NONE		=	59;
+inline int IPPROTO_DSTOPTS	=	60;
+inline int IPPROTO_MH		=	135;
+
+inline int TCP_MIN_HEADER_LENGTH =	20;
+
+/*
+ * For compatibility with Solaris.  Here the netstackid will be the pointer
+ * to the net namespace (nd_net in struct net_device).
+ */
+typedef uint64_t	netstackid_t;
+typedef __be32		ipaddr_t;
+typedef struct in6_addr	in6_addr_t;
+
+/*
+ * pktinfo is where packet ID info can be made available for deeper
+ * analysis if packet IDs become supported by the kernel in the future.
+ * The pkt_addr member is currently always NULL.
+ */
+typedef struct pktinfo {
+	uintptr_t pkt_addr;
+} pktinfo_t;
+
+/*
+ * csinfo is where connection state info is made available.
+ */
+typedef struct csinfo {
+	uintptr_t cs_addr;
+	uint64_t cs_cid;
+} csinfo_t;
+
+/*
+ * ipinfo contains common IP info for both IPv4 and IPv6.
+ */
+typedef struct ipinfo {
+	uint8_t ip_ver;			/* IP version (4, 6) */
+	uint32_t ip_plength;		/* payload length */
+	string ip_saddr;		/* source address */
+	string ip_daddr;		/* destination address */
+} ipinfo_t;
+
+/*
+ * ifinfo contains network interface info.
+ */
+typedef struct ifinfo {
+	string if_name;			/* interface name */
+	int8_t if_local;		/* is delivered locally */
+	netstackid_t if_ipstack;	/* netns pointer on Linux */
+	uintptr_t if_addr;		/* pointer to raw struct net_device */
+} ifinfo_t;
+
+/*
+ * ipv4info is a translated version of the IPv4 header (with raw pointer).
+ * These values are NULL if the packet is not IPv4.
+ */
+typedef struct ipv4info {
+	uint8_t ipv4_ver;		/* IP version (4) */
+	uint8_t ipv4_ihl;		/* header length, bytes */
+	uint8_t ipv4_tos;		/* type of service field */
+	uint16_t ipv4_length;		/* length (header + payload) */
+	uint16_t ipv4_ident;		/* identification */
+	uint8_t ipv4_flags;		/* IP flags */
+	uint16_t ipv4_offset;		/* fragment offset */
+	uint8_t ipv4_ttl;		/* time to live */
+	uint8_t ipv4_protocol;		/* next level protocol */
+	string ipv4_protostr;		/* next level protocol, as string */
+	uint16_t ipv4_checksum;		/* header checksum */
+	ipaddr_t ipv4_src;		/* source address */
+	ipaddr_t ipv4_dst;		/* destination address */
+	string ipv4_saddr;		/* source address, string */
+	string ipv4_daddr;		/* destination address, string */
+	struct iphdr *ipv4_hdr;		/* pointer to raw header */
+} ipv4info_t;
+
+/*
+ * ipv6info is a translated version of the IPv6 header (with raw pointer).
+ * These values are NULL if the packet is not IPv6.
+ */
+typedef struct ipv6info {
+	uint8_t ipv6_ver;		/* IP version (6) */
+	uint8_t ipv6_tclass;		/* traffic class */
+	uint32_t ipv6_flow;		/* flow label */
+	uint16_t ipv6_plen;		/* payload length */
+	uint8_t ipv6_nexthdr;		/* next header protocol */
+	string ipv6_nextstr;		/* next header protocol, as string */
+	uint8_t ipv6_hlim;		/* hop limit */
+	in6_addr_t *ipv6_src;		/* source address */
+	in6_addr_t *ipv6_dst;		/* destination address */
+	string ipv6_saddr;		/* source address, string */
+	string ipv6_daddr;		/* destination address, string */
+	struct ipv6hdr *ipv6_hdr;	/* pointer to raw header */
+} ipv6info_t;
+
+/*
+ * void_ip_t is a void pointer to either an IPv4 or IPv6 header.  It has
+ * its own type name so that a translator can be determined.
+ */
+typedef uintptr_t void_ip_t;
+
+/*
+ * __dtrace_tcp_void_ip_t is used by the translator to take either the
+ * non-NULL void_ip_t * passed in or, if it is NULL, uses arg3 (struct tcp *)
+ * from the tcp:::send probe to translate to an ipinfo_t.
+ * This allows us to present the consumer with header data based on the
+ * struct tcp * when IP information is not yet present (for TCP send).
+ */
+typedef void * __dtrace_tcp_void_ip_t;
+
+#pragma D binding "1.5" translator
+translator pktinfo_t < struct sk_buff *s > {
+	pkt_addr = (uintptr_t)s;
+};
+
+#pragma D binding "1.5" translator
+translator csinfo_t < struct sock *s > {
+	cs_addr = (uintptr_t)s;
+};
+
+#pragma D binding "1.5" translator
+translator ipinfo_t < struct iphdr *I > {
+	ip_ver = 4;
+        ip_plength = I != NULL ? (ntohs(I->tot_len) - I->ihl << 2) : 0;
+	ip_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<unknown>";
+	ip_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<unknown>";
+};
+
+#pragma D binding "1.5" translator
+translator ipinfo_t < struct ipv6hdr *I > {
+	ip_ver = 6;
+	ip_plength = I != NULL ? ntohs(I->payload_len) : 0;
+	ip_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<unknown>";
+	ip_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<unknown>";
+};
+
+#pragma D binding "1.5" translator
+translator ipinfo_t < void_ip_t *I > {
+	ip_ver = I != NULL ? *(uint8_t *)I >> 4 : 0;
+	ip_plength = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
+	    (ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2)) :
+	    *(uint8_t *)I >> 4 == 6 ?
+	    ntohs(((struct ipv6hdr *)I)->payload_len) : 0) : 0;
+	ip_saddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->saddr) : *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) : "<unknown>") :
+	    "<unknown>";
+	ip_daddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->daddr) : *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) : "<unknown>") :
+	    "<unknown>";
+};
+
+/*
+ * In some cases where the ipinfo_t * is NULL we wish to construct IP info
+ * using the struct tcp_sock * (arg3).  In order to map local IP to source
+ * or destination IP address appropriately we need to check if the associated
+ * data is inbound (NET_PROBE_INBOUND in arg7) or outbound (NET_PROBE_OUTBOUND);
+ * the value is stored in arg7.  If inbound, we map the local IP address to
+ * ip_daddr (destination), and if outbound it is mapped to ip_saddr.
+ */
+#pragma D binding "1.5" translator
+translator ipinfo_t < __dtrace_tcp_void_ip_t *I > {
+	/*
+	 * General strategy used is to rely on the IP header I if it is
+	 * non-null; otherwise we try to reconstruct IP values from arg3
+	 * (a struct tcp_sock *).
+	 */
+	ip_ver = I != NULL ? *(uint8_t *)I >> 4 :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET ? 4 :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ? 6 : 0;
+	/*
+	 * For ip_plength we fall back to using TCP skb data from the tcp_skb_cb
+	 * to determine payload length.
+	 */
+	ip_plength = I != NULL && *(uint8_t *)I >> 4 == 4 ?
+	    ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2) :
+	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
+	    ntohs(((struct ipv6hdr *)I)->payload_len) :
+	    arg0 != NULL ?
+	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq -
+	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->seq :
+	    0;
+	/*
+	 * For source/destination addresses, we again try to use the IP header I
+	 * if available.  If I is NULL, we utilize arg3 (struct tcp_sock *)
+	 * but the problem here is that it stores local and remote IP addresses
+	 * _not_ source and destination.  So we need to know if traffic is
+	 * inbound or outbound. If inbound, IP source address is remote
+	 * socket address (skc_daddr) and destination IP address is local socket
+	 * address (skc_rcv_saddr).  If outbound, IP source address is local
+	 * socket address and IP destination address is remote socket address.
+	 */
+	ip_saddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->saddr) :
+	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_daddr :
+	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr :
+	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr) :
+	    "<unknown>";
+	ip_daddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->daddr) :
+	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr :
+	    &((struct sock *)arg3)->__sk_common.skc_daddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr :
+	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr) :
+	    "<unknown>";
+};
+
+#pragma D binding "1.5" translator
+translator ifinfo_t < struct net_device *N > {
+	if_name = N != NULL ? stringof(N->name) : "<unknown>";
+	if_ipstack = (N != NULL && sizeof(N->nd_net) > 0) ?
+	    ((uint64_t)N->nd_net.net) : 0;
+	if_local = (N == NULL);	/* is delivered locally */
+	if_addr = (uintptr_t)N;	/* pointer to raw struct net_device ptr */
+};
+
+#pragma D binding "1.5" translator
+translator ipv4info_t < struct iphdr *I > {
+	ipv4_ver = I != NULL ? 4 : 0;
+	ipv4_ihl = I != NULL ? ((*(uint8_t *)I & 0xf) << 2) : 0;
+	ipv4_tos = I != NULL ? I->tos : 0;
+	ipv4_length = I != NULL ? ntohs(I->tot_len) : 0;
+	ipv4_ident = I != NULL ? ntohs(I->id) : 0;
+	ipv4_flags = I != NULL ? ntohs(I->frag_off) >> 12 : 0;
+	ipv4_offset = I != NULL ? ntohs(I->frag_off) & 0x0fff : 0;
+	ipv4_ttl = I != NULL ? I->ttl : 0;
+	ipv4_protocol = I != NULL ? I->protocol : 0;
+	ipv4_protostr = I == NULL ? "<null>" :
+	    I->protocol == IPPROTO_TCP     ? "TCP"    :
+	    I->protocol == IPPROTO_UDP     ? "UDP"    :
+	    I->protocol == IPPROTO_IP      ? "IP"     :
+	    I->protocol == IPPROTO_ICMP    ? "ICMP"   :
+	    I->protocol == IPPROTO_IGMP    ? "IGMP"   :
+	    I->protocol == IPPROTO_EGP     ? "EGP"    :
+	    I->protocol == IPPROTO_IPV6    ? "IPv6"   :
+	    I->protocol == IPPROTO_ROUTING ? "ROUTE"  :
+	    I->protocol == IPPROTO_ESP     ? "ESP"    :
+	    I->protocol == IPPROTO_AH      ? "AH"     :
+	    I->protocol == IPPROTO_ICMPV6  ? "ICMPv6" :
+	    I->protocol == IPPROTO_OSPF    ? "OSPF"   :
+	    I->protocol == IPPROTO_SCTP    ? "SCTP"   :
+	    I->protocol == IPPROTO_RAW     ? "RAW"    :
+	    lltostr((uint64_t)I->protocol);
+	ipv4_checksum = I != NULL ? ntohs(I->check) : 0;
+	ipv4_src = I != NULL ? I->saddr : 0;
+	ipv4_dst = I != NULL ? I->daddr : 0;
+	ipv4_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<null>";
+	ipv4_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<null>";
+	ipv4_hdr = I;
+};
+
+#pragma D binding "1.5" translator
+translator ipv6info_t < struct ipv6hdr *I > {
+	ipv6_ver = I != NULL ? ((*(uint8_t *)I) >> 4) : 0;
+	ipv6_tclass = I != NULL ? ((ntohl(*(uint32_t *)I) & 0x0fffffff) >> 20) : 0;
+	ipv6_flow = I != NULL ? (ntohl(*(uint32_t *)I) & 0x000fffff) : 0;
+	ipv6_plen = I != NULL ? ntohs(I->payload_len) : 0;
+	ipv6_nexthdr = I != NULL ? I->nexthdr : 0;
+	ipv6_nextstr = I == NULL ? "<null>" :
+	    I->nexthdr == IPPROTO_TCP	?	"TCP"		:
+	    I->nexthdr == IPPROTO_UDP	?	"UDP"		:
+	    I->nexthdr == IPPROTO_IP	?	"IP"		:
+	    I->nexthdr == IPPROTO_ICMP	?	"ICMP"		:
+	    I->nexthdr == IPPROTO_IGMP	?	"IGMP"		:
+	    I->nexthdr == IPPROTO_EGP	?	"EGP"		:
+	    I->nexthdr == IPPROTO_IPV6	?	"IPv6"		:
+	    I->nexthdr == IPPROTO_ROUTING ?	"ROUTE"		:
+	    I->nexthdr == IPPROTO_ESP	?	"ESP"		:
+	    I->nexthdr == IPPROTO_AH	?	"AH"		:
+	    I->nexthdr == IPPROTO_ICMPV6 ?	"ICMPv6"	:
+	    I->nexthdr == IPPROTO_OSPF ?	"OSPF"		:
+	    I->nexthdr == IPPROTO_SCTP	?	"SCTP"		:
+	    I->nexthdr == IPPROTO_RAW	?	"RAW"		:
+	    lltostr((uint64_t)I->nexthdr);
+	ipv6_hlim = I != NULL ? I->hop_limit : 0;
+	ipv6_src = I != NULL ? &I->saddr : NULL;
+	ipv6_dst = I != NULL ? &I->daddr : 0;
+	ipv6_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<null>";
+	ipv6_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<null>";
+	ipv6_hdr = I;
+};
diff --git a/dlibs/aarch64/6.10/lockstat.d b/dlibs/aarch64/6.10/lockstat.d
new file mode 100644
index 0000000000000..cb8b4bd96f1ac
--- /dev/null
+++ b/dlibs/aarch64/6.10/lockstat.d
@@ -0,0 +1,14 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on provider lockstat
+
+inline int RW_WRITER = 0x00;
+#pragma D binding "1.6.4" RW_WRITER
+inline int RW_READER = 0x01;
+#pragma D binding "1.6.4" RW_READER
diff --git a/dlibs/aarch64/6.10/net.d b/dlibs/aarch64/6.10/net.d
new file mode 100644
index 0000000000000..6ac3428747a77
--- /dev/null
+++ b/dlibs/aarch64/6.10/net.d
@@ -0,0 +1,33 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2007, 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+/* These are needed for inet_ntop() DTrace function. */
+inline int AF_INET              =       2;
+inline int AF_INET6             =       10;
+
+/* These are needed for link_ntop() DTrace function. */
+inline int ARPHRD_ETHER         =       1;
+inline int ARPHRD_INFINIBAND    =       32;
+
+/*
+ * The conninfo_t structure should be used by all application protocol
+ * providers as the first arguments to indicate some basic information
+ * about the connection. This structure may be augmented to accommodate
+ * the particularities of additional protocols in the future.
+ */
+typedef struct conninfo {
+	 string ci_local;	/* local host address */
+	 string ci_remote;	/* remote host address */
+	 string ci_protocol;	/* protocol (ipv4, ipv6, etc) */
+} conninfo_t;
+
+/*
+ * We use these values to determine if a probe point is associated
+ * with sending (outbound) or receiving (inbound).
+ */
+inline int NET_PROBE_OUTBOUND =		0x00;
+inline int NET_PROBE_INBOUND =		0x01;
diff --git a/dlibs/aarch64/6.10/pcap.d b/dlibs/aarch64/6.10/pcap.d
new file mode 100644
index 0000000000000..21a8e74a4036d
--- /dev/null
+++ b/dlibs/aarch64/6.10/pcap.d
@@ -0,0 +1,35 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on provider ip
+
+/*
+ * In general, PCAP_<type> names are chosen to match DL_<type> DLPI
+ * datalink types.
+ */
+
+/*
+ * Network-related capture types.  Raw DLT_* values can be used for those
+ * not present here; see /usr/include/pcap/bpf.h for the full list.
+ */
+
+inline int PCAP_NULL = 0;
+#pragma D binding "1.12" PCAP_NULL
+inline int PCAP_ETHER = 1;
+#pragma D binding "1.12" PCAP_ETHER
+inline int PCAP_WIFI = 105;
+#pragma D binding "1.12" PCAP_WIFI
+inline int PCAP_PPP = 9;
+#pragma D binding "1.12" PCAP_PPP
+/* PCAP_IP can signify IPv4 or IPv6 header follows. */
+inline int PCAP_IP = 12;
+#pragma D binding "1.12" PCAP_IP
+
+/* InfiniBand-related capture types. */
+inline int PCAP_IPOIB = 242;
+#pragma D binding "1.12" PCAP_IPOIB
diff --git a/dlibs/aarch64/6.10/procfs.d b/dlibs/aarch64/6.10/procfs.d
new file mode 100644
index 0000000000000..5d7873b5e0091
--- /dev/null
+++ b/dlibs/aarch64/6.10/procfs.d
@@ -0,0 +1,306 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, 2022, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+/*
+ * This file defines the standard set of inlines and translators to be made
+ * available for all D programs to use to examine process model state.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library sched.d
+
+typedef time64_t time_t;
+
+typedef struct timestruc {
+	time_t tv_sec;
+	long tv_nsec;
+} timestruc_t;
+
+typedef struct lwpsinfo {
+	int pr_flag;			/* lwp flags (DEPRECATED) */
+	int pr_lwpid;			/* lwp id */
+	uintptr_t pr_addr;		/* internal address of lwp */
+	uintptr_t pr_wchan;		/* wait addr for sleeping lwp */
+	char pr_stype;			/* sync event type */
+	char pr_state;			/* numeric lwp state */
+	char pr_sname;			/* printable char for pr_state */
+	char pr_nice;			/* nice for cpu usage */
+	short pr_syscall;		/* syscall number */
+	char pr_oldpri;			/* priority */
+	char pr_cpu;			/* CPU usage */
+	int pr_pri;			/* priority */
+	ushort_t pr_pctcpu;		/* % of recent cpu time */
+	ushort_t pr_pad;
+	timestruc_t pr_start;		/* lwp start time */
+	timestruc_t pr_time;		/* usr+sys cpu time */
+	char pr_clname[8];		/* scheduling class name */
+	char pr_name[16];		/* name */
+	processorid_t pr_onpro;		/* processor last ran on */
+	processorid_t pr_bindpro;	/* processor bound to */
+	psetid_t pr_bindpset;		/* processor set */
+	int pr_lgrp;			/* lwp home lgroup */
+	int pr_filler[4];
+} lwpsinfo_t;
+
+typedef id_t taskid_t;
+typedef id_t dprojid_t;
+typedef id_t poolid_t;
+typedef id_t zoneid_t;
+
+/*
+ * Translate from the kernel's task_struct structure to a Solaris proc(4)
+ * psinfo_t struct.
+ * We do not provide support for pr_size, pr_rssize, pr_pctcpu, and pr_pctmem.
+ * We also do not fill in pr_lwp (the lwpsinfo_t for the representative LWP)
+ * because we do not have the ability to select and stop any representative.
+ * Also, for the moment, pr_wstat, pr_time, and pr_ctime are not supported,
+ * but these could be supported by DTrace in the future using subroutines.
+ * Note that any member added to this translator should also be added to the
+ * kthread_t-to-psinfo_t translator, below.
+ */
+typedef struct psinfo {
+	int pr_flag;			/* process flags (DEPRECATED) */
+	int pr_nlwp;			/* number of active lwps (Linux: 1) */
+	pid_t pr_pid;			/* unique process id */
+	pid_t pr_ppid;			/* process id of parent */
+	pid_t pr_pgid;			/* pid of process group leader */
+	pid_t pr_sid;			/* session id */
+	uid_t pr_uid;			/* real user id */
+	uid_t pr_euid;			/* effective user id */
+	uid_t pr_gid;			/* real group id */
+	uid_t pr_egid;			/* effective group id */
+	uintptr_t pr_addr;		/* address of process */
+	size_t pr_size;			/* size of process image (in KB) */
+	size_t pr_rssize;		/* resident set sie (in KB) */
+	size_t pr_pad1;
+	struct tty_struct *pr_ttydev;	/* controlling tty (or -1) */
+	ushort_t pr_pctcpu;		/* % of recent cpu time used */
+	ushort_t pr_pctmem;		/* % of recent memory used */
+	timestruc_t pr_start;		/* process start time */
+	timestruc_t pr_time;		/* usr+sys cpu time for process */
+	timestruc_t pr_ctime;		/* usr+sys cpu time for children */
+	char pr_fname[16];		/* name of exec'd file */
+	char pr_psargs[80];		/* initial chars of arg list */
+	int pr_wstat;			/* if zombie, wait() status */
+	int pr_argc;			/* initial argument count */
+	uintptr_t pr_argv;		/* address of initial arg vector */
+	uintptr_t pr_envp;		/* address of initial env vector */
+	char pr_dmodel;			/* data model */
+	char pr_pad2[3];
+	taskid_t pr_taskid;		/* task id */
+	dprojid_t pr_projid;		/* project id */
+	int pr_nzomb;			/* number of zombie lwps (Linux: 0) */
+	poolid_t pr_poolid;		/* pool id */
+	zoneid_t pr_zoneid;		/* zone id */
+	id_t pr_contract;		/* process contract */
+	int pr_filler[1];
+	lwpsinfo_t pr_lwp;
+} psinfo_t;
+
+inline char PR_MODEL_ILP32 = 1;
+#pragma D binding "1.0" PR_MODEL_ILP32
+inline char PR_MODEL_LP64 = 2;
+#pragma D binding "1.0" PR_MODEL_LP64
+
+ 
+ 
+inline	int PIDTYPE_PID = 0;
+#pragma D binding "1.0" PIDTYPE_PID
+inline	int PIDTYPE_TGID = 1;
+#pragma D binding "1.0" PIDTYPE_TGID
+inline	int PIDTYPE_PGID = 2;
+#pragma D binding "1.0" PIDTYPE_PGID
+inline	int PIDTYPE_SID = 3;
+#pragma D binding "1.0" PIDTYPE_SID
+
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+#pragma D binding "1.0" translator
+translator psinfo_t < struct task_struct *T > {
+	pr_nlwp = 1;
+	pr_pid = T->tgid;
+	pr_ppid = T->real_parent->tgid;
+	pr_pgid = T->signal->pids[PIDTYPE_PGID]->numbers[0].nr;
+	pr_sid = T->signal->pids[PIDTYPE_SID]->numbers[0].nr;
+	pr_uid = T->cred->uid.val;
+	pr_euid = T->cred->euid.val;
+	pr_gid = T->cred->gid.val;
+	pr_egid = T->cred->egid.val;
+	pr_addr = (uintptr_t)T;
+
+	pr_ttydev = T->signal->tty ? T->signal->tty
+				   : (struct tty_struct *)-1;
+
+	pr_fname = T->comm;
+/*
+	pr_psargs = stringof(get_psinfo(T)->__psinfo(psargs));
+ */
+	pr_wstat = 0;
+/*
+	pr_argc = get_psinfo(T)->__psinfo(argc);
+	pr_argv = (uintptr_t)get_psinfo(T)->__psinfo(argv);
+	pr_envp = (uintptr_t)get_psinfo(T)->__psinfo(envp);
+ */
+
+	pr_dmodel = PR_MODEL_LP64;
+
+	pr_taskid = 0;
+	pr_projid = 0;
+	pr_nzomb = 0;
+	pr_poolid = 0;
+	pr_zoneid = 0;
+	pr_contract = 0;
+};
+
+inline int PR_STOPPED = 0x00000001;
+#pragma D binding "1.0" PR_STOPPED
+inline int PR_ISTOP = 0x00000002;
+#pragma D binding "1.0" PR_ISTOP
+inline int PR_DSTOP = 0x00000004;
+#pragma D binding "1.0" PR_DSTOP
+inline int PR_IDLE = 0x10000000;
+#pragma D binding "1.0" PR_IDLE
+
+inline char SSLEEP = 1;
+#pragma D binding "1.0" SSLEEP
+inline char SRUN = 2;
+#pragma D binding "1.0" SRUN
+inline char SZOMB = 3;
+#pragma D binding "1.0" SZOMB
+inline char SSTOP = 4;
+#pragma D binding "1.0" SSTOP
+inline char SIDL = 5;
+#pragma D binding "1.0" SIDL
+inline char SONPROC = 6;
+#pragma D binding "1.0" SONPROC
+inline char SWAIT = 7;
+#pragma D binding "1.0" SWAIT
+
+/*
+ * Translate from the kernel's task_struct structure to a Solaris proc(4)
+ * lwpsinfo_t.
+ * We do not provide support for pr_nice, pr_oldpri, pr_cpu, or pr_pctcpu.
+ * Also, for the moment, pr_start and pr_time are not supported, but these
+ * could be supported by DTrace in the future using subroutines.
+ */
+#pragma D binding "1.0" translator
+translator lwpsinfo_t < struct task_struct *T > {
+	pr_flag = (T->__state & 0x00000004) ? PR_STOPPED : 0;
+/*
+	pr_flag = ((T->t_state == TS_STOPPED) ? (PR_STOPPED |
+	    ((!(T->t_schedflag & TS_PSTART)) ? PR_ISTOP : 0)) :
+	    ((T->t_proc_flag & TP_PRVSTOP) ? PR_STOPPED | PR_ISTOP : 0)) |
+	    ((T == T->t_procp->p_agenttp) ? PR_AGENT : 0) |
+	    ((!(T->t_proc_flag & TP_TWAIT)) ? PR_DETACH : 0) |
+	    ((T->t_proc_flag & TP_DAEMON) ? PR_DAEMON : 0) |
+	    ((T->t_procp->p_pidflag & CLDNOSIGCHLD) ? PR_NOSIGCHLD : 0) |
+	    ((T->t_procp->p_pidflag & CLDWAITPID) ? PR_WAITPID : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_FORK) ? PR_FORK : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_RUNLCL) ? PR_RLC : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_KILLCL) ? PR_KLC : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_ASYNC) ? PR_ASYNC : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_BPTADJ) ? PR_BPTADJ : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_PTRACE) ? PR_PTRACE : 0) |
+	    ((T->t_procp->p_flag & SMSACCT) ? PR_MSACCT : 0) |
+	    ((T->t_procp->p_flag & SMSFORK) ? PR_MSFORK : 0) |
+	    ((T->t_procp->p_flag & SVFWAIT) ? PR_VFORKP : 0) |
+	    (((T->t_procp->p_flag & SSYS) ||
+	    (T->t_procp->p_as == &`kas)) ? PR_ISSYS : 0) |
+	    ((T == T->t_cpu->cpu_idle_thread) ? PR_IDLE : 0);
+*/
+
+	pr_lwpid = T->pid;
+	pr_addr = (uintptr_t)T;
+	pr_wchan = NULL;
+	pr_stype = 0;
+
+	pr_state = (T->__state & 0x00000001) ? SSLEEP :
+		   (T->__state & 0x00000002) ? SSLEEP :
+		   (T->__state & 0x00000004) ? SSTOP :
+		   (T->__state & 0x00000008) ? SSTOP :
+		   (T->__state & 0x00000020) ? SZOMB :
+		   (T->__state & 0x00000010) ? SZOMB :
+		   (T->__state & 0x00000080) ? SZOMB :
+		   (T->__state & 0x00000100) ? SWAIT :
+		   (T->__state & 0x00000200) ? SWAIT : SRUN;
+	pr_sname = (T->__state & 0x00000001) ? 'S' :
+		   (T->__state & 0x00000002) ? 'S' :
+		   (T->__state & 0x00000004) ? 'T' :
+		   (T->__state & 0x00000008) ? 'T' :
+		   (T->__state & 0x00000020) ? 'Z' :
+		   (T->__state & 0x00000010) ? 'Z' :
+		   (T->__state & 0x00000080) ? 'Z' :
+		   (T->__state & 0x00000100) ? 'W' :
+		   (T->__state & 0x00000200) ? 'W' : 'R';
+
+	pr_pri = T->prio;
+	pr_name = T->comm;
+	pr_onpro = ((struct thread_info *)T->stack)->cpu;
+};
+
+inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread);
+#pragma D attributes Stable/Stable/Common curpsinfo
+#pragma D binding "1.0" curpsinfo
+
+inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
+#pragma D attributes Stable/Stable/Common curlwpsinfo
+#pragma D binding "1.0" curlwpsinfo
+
+inline string cwd = d_path(&(curthread->fs->pwd));
+#pragma D attributes Stable/Stable/Common cwd
+#pragma D binding "1.0" cwd
+
+inline string root = d_path(&(curthread->fs->root));
+#pragma D attributes Stable/Stable/Common root
+#pragma D binding "1.0" root
+
+inline int CLD_EXITED = 1;
+#pragma D binding "1.0" CLD_EXITED
+inline int CLD_KILLED = 2;
+#pragma D binding "1.0" CLD_KILLED
+inline int CLD_DUMPED = 3;
+#pragma D binding "1.0" CLD_DUMPED
+inline int CLD_TRAPPED = 4;
+#pragma D binding "1.0" CLD_TRAPPED
+inline int CLD_STOPPED = 5;
+#pragma D binding "1.0" CLD_STOPPED
+inline int CLD_CONTINUED = 6;
+#pragma D binding "1.0" CLD_CONTINUED
+
+/*
+ * Below we provide some inline definitions to simplify converting from
+ * a struct pid * to a pid_t.  structpid2pid is a DTrace-ized version of
+ * pid_vnr().
+ */
+ /*
+inline	struct pid_namespace *pid_namespace[struct pid *p] = p != NULL ?
+	p->numbers[p->level].ns : NULL;
+
+inline	int pid_namespace_level[struct pid *p] = p != NULL && pid_namespace[p] ?
+	pid_namespace[p]->level : 0;
+
+m4_dnl 4.19 and above use thread_pid for this.
+define_for_kernel([[__task_pid]], [[ m4_dnl
+	(m4_kver(4, 19, 0), [[task->thread_pid]])]], m4_dnl
+	[[task->pids[PIDTYPE_PID].pid]]) m4_dnl
+
+inline	struct pid *task_pid[struct task_struct *task] =
+	task != NULL ? __task_pid : NULL;
+
+inline	int current_namespace_level = pid_namespace_level[task_pid[curthread]];
+
+inline	pid_t structpid2pid[struct pid *p] =
+	p != NULL && current_namespace_level <= p->level &&
+	((struct upid *)&(p->numbers[current_namespace_level]))->ns ==
+	pid_namespace[task_pid[curthread]] ?
+	((struct upid *)&(p->numbers[current_namespace_level]))->nr : 0;
+*/
diff --git a/dlibs/aarch64/6.10/regs.d b/dlibs/aarch64/6.10/regs.d
new file mode 100644
index 0000000000000..e47f8cfc11825
--- /dev/null
+++ b/dlibs/aarch64/6.10/regs.d
@@ -0,0 +1,78 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+inline int R_X0 = 0 ;
+#pragma D binding "1.0" R_X0
+inline int R_X1 = 1 ;
+#pragma D binding "1.0" R_X1
+inline int R_X2 = 2 ;
+#pragma D binding "1.0" R_X2
+inline int R_X3 = 3 ;
+#pragma D binding "1.0" R_X3
+inline int R_X4 = 4 ;
+#pragma D binding "1.0" R_X4
+inline int R_X5 = 5 ;
+#pragma D binding "1.0" R_X5
+inline int R_X6 = 6 ;
+#pragma D binding "1.0" R_X6
+inline int R_X7 = 7 ;
+#pragma D binding "1.0" R_X7
+inline int R_X8 = 8 ;
+#pragma D binding "1.0" R_X8
+inline int R_X9 = 9 ;
+#pragma D binding "1.0" R_X9
+inline int R_X10 = 10 ;
+#pragma D binding "1.0" R_X10
+inline int R_X11 = 11 ;
+#pragma D binding "1.0" R_X11
+inline int R_X12 = 12 ;
+#pragma D binding "1.0" R_X12
+inline int R_X13 = 13 ;
+#pragma D binding "1.0" R_X13
+inline int R_X14 = 14 ;
+#pragma D binding "1.0" R_X14
+inline int R_X15 = 15 ;
+#pragma D binding "1.0" R_X15
+inline int R_X16 = 16 ;
+#pragma D binding "1.0" R_X16
+inline int R_X17 = 17 ;
+#pragma D binding "1.0" R_X17
+inline int R_X18 = 18 ;
+#pragma D binding "1.0" R_X18
+inline int R_X19 = 19 ;
+#pragma D binding "1.0" R_X19
+inline int R_X20 = 20 ;
+#pragma D binding "1.0" R_X20
+inline int R_X21 = 21 ;
+#pragma D binding "1.0" R_X21
+inline int R_X22 = 22 ;
+#pragma D binding "1.0" R_X22
+inline int R_X23 = 23 ;
+#pragma D binding "1.0" R_X23
+inline int R_X24 = 24 ;
+#pragma D binding "1.0" R_X24
+inline int R_X25 = 25 ;
+#pragma D binding "1.0" R_X25
+inline int R_X26 = 26 ;
+#pragma D binding "1.0" R_X26
+inline int R_X27 = 27 ;
+#pragma D binding "1.0" R_X27
+inline int R_X28 = 28 ;
+#pragma D binding "1.0" R_X28
+inline int R_X29 = 29 ;
+#pragma D binding "1.0" R_X29
+inline int R_X30 = 30 ;
+#pragma D binding "1.0" R_X30
+
+inline int R_SP = 31 ;
+#pragma D binding "1.0" R_SP
+inline int R_PC = 32 ;
+#pragma D binding "1.0" R_PC
+inline int R_PSTATE = 33 ;
+#pragma D binding "1.0" R_PSTATE
+
+inline int R_FP = R_X29;
+#pragma D binding "1.0" R_FP
diff --git a/dlibs/aarch64/6.10/sched.d b/dlibs/aarch64/6.10/sched.d
new file mode 100644
index 0000000000000..271d84e057cde
--- /dev/null
+++ b/dlibs/aarch64/6.10/sched.d
@@ -0,0 +1,38 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+
+typedef id_t		processorid_t;
+typedef id_t		psetid_t;
+typedef id_t		chipid_t;
+typedef id_t		lgrp_id_t;
+
+typedef struct cpuinfo {
+	processorid_t	cpu_id;
+	psetid_t	cpu_pset;
+	chipid_t	cpu_chip;
+	lgrp_id_t	cpu_lgrp;
+} cpuinfo_t;
+
+typedef cpuinfo_t	*cpuinfo_t_p;
+
+inline processorid_t cpu = curcpu->cpu_id;
+#pragma D attributes Stable/Stable/Common cpu
+#pragma D binding "1.0" cpu
+
+inline psetid_t pset = curcpu->cpu_pset;
+#pragma D attributes Stable/Stable/Common pset
+#pragma D binding "1.0" pset
+
+inline chipid_t chip = curcpu->cpu_chip;
+#pragma D attributes Stable/Stable/Common chip
+#pragma D binding "1.0" chip
+
+inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
+#pragma D attributes Stable/Stable/Common lgrp
+#pragma D binding "1.0" lgrp
diff --git a/dlibs/aarch64/6.10/signal.d b/dlibs/aarch64/6.10/signal.d
new file mode 100644
index 0000000000000..88493b427050f
--- /dev/null
+++ b/dlibs/aarch64/6.10/signal.d
@@ -0,0 +1,108 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
+ * Use is subject to license terms.
+ *
+ */
+inline int SIGSYS = 31;
+#pragma D binding "1.0" SIGSYS
+
+inline int SIGTERM = 15;
+#pragma D binding "1.0" SIGTERM
+
+inline int SIGTSTP = 20;
+#pragma D binding "1.0" SIGTSTP
+
+inline int SIGVTALRM = 26;
+#pragma D binding "1.0" SIGVTALRM
+
+inline int SIGPIPE = 13;
+#pragma D binding "1.0" SIGPIPE
+
+inline int SIGBUS = 7;
+#pragma D binding "1.0" SIGBUS
+
+inline int SIGSTKFLT = 16;
+#pragma D binding "1.0" SIGSTKFLT
+
+inline int SIGTRAP = 5;
+#pragma D binding "1.0" SIGTRAP
+
+inline int SIGHUP = 1;
+#pragma D binding "1.0" SIGHUP
+
+inline int SIGFPE = 8;
+#pragma D binding "1.0" SIGFPE
+
+inline int SIGIO = 29;
+#pragma D binding "1.0" SIGIO
+
+inline int SIGURG = 23;
+#pragma D binding "1.0" SIGURG
+
+inline int SIGKILL = 9;
+#pragma D binding "1.0" SIGKILL
+
+inline int SIGWINCH = 28;
+#pragma D binding "1.0" SIGWINCH
+
+inline int SIGXFSZ = 25;
+#pragma D binding "1.0" SIGXFSZ
+
+inline int SIGINT = 2;
+#pragma D binding "1.0" SIGINT
+
+inline int SIGIOT = 6;
+#pragma D binding "1.0" SIGIOT
+
+inline int SIGTTOU = 22;
+#pragma D binding "1.0" SIGTTOU
+
+inline int SIGTTIN = 21;
+#pragma D binding "1.0" SIGTTIN
+
+inline int SIGCHLD = 17;
+#pragma D binding "1.0" SIGCHLD
+
+inline int SIGCONT = 18;
+#pragma D binding "1.0" SIGCONT
+
+inline int SIGQUIT = 3;
+#pragma D binding "1.0" SIGQUIT
+
+inline int SIGABRT = 6;
+#pragma D binding "1.0" SIGABRT
+
+inline int SIGPWR = 30;
+#pragma D binding "1.0" SIGPWR
+
+inline int SIGPROF = 27;
+#pragma D binding "1.0" SIGPROF
+
+inline int SIGXCPU = 24;
+#pragma D binding "1.0" SIGXCPU
+
+inline int SIGSTOP = 19;
+#pragma D binding "1.0" SIGSTOP
+
+inline int SIGILL = 4;
+#pragma D binding "1.0" SIGILL
+
+inline int SIGCLD = 17;
+#pragma D binding "1.0" SIGCLD
+
+inline int SIGUSR1 = 10;
+#pragma D binding "1.0" SIGUSR1
+
+inline int SIGPOLL = 29;
+#pragma D binding "1.0" SIGPOLL
+
+inline int SIGSEGV = 11;
+#pragma D binding "1.0" SIGSEGV
+
+inline int SIGUSR2 = 12;
+#pragma D binding "1.0" SIGUSR2
+
+inline int SIGALRM = 14;
+#pragma D binding "1.0" SIGALRM
+
diff --git a/dlibs/aarch64/6.10/tcp.d b/dlibs/aarch64/6.10/tcp.d
new file mode 100644
index 0000000000000..54e310cb4c6ed
--- /dev/null
+++ b/dlibs/aarch64/6.10/tcp.d
@@ -0,0 +1,231 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library net.d
+#pragma D depends_on provider ip
+#pragma D depends_on provider tcp
+
+inline int TH_FIN =	0x01;
+inline int TH_SYN =	0x02;
+inline int TH_RST =	0x04;
+inline int TH_PSH =	0x08;
+inline int TH_ACK =	0x10;
+inline int TH_URG =	0x20;
+inline int TH_ECE =	0x40;
+inline int TH_CWR =	0x80;
+
+inline int TCP_STATE_IDLE = 		0x00;
+inline int TCP_STATE_ESTABLISHED =	0x01;
+inline int TCP_STATE_SYN_SENT =		0x02;
+inline int TCP_STATE_SYN_RECEIVED =	0x03;
+inline int TCP_STATE_FIN_WAIT_1 =	0x04;
+inline int TCP_STATE_FIN_WAIT_2 =	0x05;
+inline int TCP_STATE_TIME_WAIT =	0x06;
+inline int TCP_STATE_CLOSED =		0x07;
+inline int TCP_STATE_CLOSE_WAIT =	0x08;
+inline int TCP_STATE_LAST_ACK =		0x09;
+inline int TCP_STATE_LISTEN =		0x0a;
+inline int TCP_STATE_CLOSING =		0x0b;
+
+/*
+ * Convert a TCP state value to a string.
+ */
+inline string tcp_state_string[int state] =
+	state == TCP_STATE_CLOSED ? "state-closed" :
+	state == TCP_STATE_IDLE ? "state-idle" :
+	state == TCP_STATE_LISTEN ? "state-listen" :
+	state == TCP_STATE_SYN_SENT ? "state-syn-sent" :
+	state == TCP_STATE_SYN_RECEIVED ? "state-syn-received" :
+	state == TCP_STATE_ESTABLISHED ? "state-established" :
+	state == TCP_STATE_CLOSE_WAIT ? "state-close-wait" :
+	state == TCP_STATE_FIN_WAIT_1 ? "state-fin-wait-1" :
+	state == TCP_STATE_CLOSING ? "state-closing" :
+	state == TCP_STATE_LAST_ACK ? "state-last-ack" :
+	state == TCP_STATE_FIN_WAIT_2 ? "state-fin-wait-2" :
+	state == TCP_STATE_TIME_WAIT ? "state-time-wait" :
+	"<unknown>";
+#pragma D binding "1.6.3" tcp_state_string
+
+/*
+ * tcpinfo is the TCP header fields.
+ */
+typedef struct tcpinfo {
+	uint16_t tcp_sport;		/* source port */
+	uint16_t tcp_dport;		/* destination port */
+	uint32_t tcp_seq;		/* sequence number */
+	uint32_t tcp_ack;		/* acknowledgment number */
+	uint8_t tcp_offset;		/* data offset, in bytes */
+	uint8_t tcp_flags;		/* flags */
+	uint16_t tcp_window;		/* window size */
+	uint16_t tcp_checksum;		/* checksum */
+	uint16_t tcp_urgent;		/* urgent data pointer */
+	uintptr_t tcp_hdr;		/* raw TCP header */
+} tcpinfo_t;
+
+/*
+ * tcpsinfo contains stable TCP details from tcp_t.
+ */
+typedef struct tcpsinfo {
+	uintptr_t tcps_addr;
+	int tcps_local;			/* is delivered locally, boolean */
+	uint16_t tcps_lport;		/* local port */
+	uint16_t tcps_rport;		/* remote port */
+	string tcps_laddr;		/* local address, as a string */
+	string tcps_raddr;		/* remote address, as a string */
+	int tcps_state;			/* TCP state */
+	uint32_t tcps_iss;		/* Initial sequence # sent */
+	uint32_t tcps_suna;		/* sequence # sent but unacked */
+	uint32_t tcps_snxt;		/* next sequence # to send */
+	uint32_t tcps_rnxt;		/* next sequence # expected */
+	uint32_t tcps_swnd;		/* send window size */
+	int32_t tcps_snd_ws;		/* send window scaling */
+	uint32_t tcps_rwnd;		/* receive window size */
+	int32_t tcps_rcv_ws;		/* receive window scaling */
+	uint32_t tcps_cwnd;		/* congestion window */
+	uint32_t tcps_cwnd_ssthresh;	/* threshold for congestion avoidance */
+	uint32_t tcps_sack_snxt;	/* next SACK seq # for retransmission */
+	uint32_t tcps_rto;		/* round-trip timeout, msec */
+	uint32_t tcps_mss;		/* max segment size */
+	int tcps_retransmit;		/* retransmit send event, boolean */
+	uint32_t tcps_rtt;		/* smoothed avg round-trip time, msec */
+	uint32_t tcps_rtt_sd;		/* standard deviation of RTT */
+	uint32_t tcps_irs;		/* Initial recv sequence # */
+} tcpsinfo_t;
+
+/*
+ * tcplsinfo provides the old tcp state for state changes.
+ */
+typedef struct tcplsinfo {
+	int tcps_state;		/* previous TCP state */
+} tcplsinfo_t;
+
+#pragma D binding "1.6.3" translator
+translator tcpinfo_t < struct tcphdr *T > {
+	tcp_sport = T ? ntohs(T->source) : 0;
+	tcp_dport = T ? ntohs(T->dest) : 0;
+	tcp_seq = T ? ntohl(T->seq) : 0;
+	tcp_ack = T ? ntohl(T->ack_seq) : 0;
+	tcp_offset = T ? (*(uint8_t *)(T + 12) & 0xf0) >> 2 : 0;
+	tcp_flags = T ? *(uint8_t *)(T + 13) : 0;
+	tcp_window = T ? ntohs(T->window) : 0;
+	tcp_checksum = T ? ntohs(T->check) : 0;
+	tcp_urgent = T ? ntohs(T->urg_ptr) : 0;
+	tcp_hdr = (uintptr_t)T;
+};
+
+/*
+ * In the main we simply translate from the "struct [tcp_]sock *" to
+ * a tcpsinfo_t *.  However there are a few exceptions:
+ *
+ * - tcps_state is always derived from arg6.  The reason is that in some
+ * state transitions sock->sk_state does not reflect the actual TCP
+ * connection state.  For example the TIME_WAIT state is handled in
+ * Linux by creating a separate timewait socket and the state of the
+ * original socket is CLOSED.  In some other cases we also need to
+ * instrument state transition prior to the update of sk_state.  To do
+ * all of this we rely on arg6.
+ * - we sometimes need to retrieve local/remote port/address settings from
+ * TCP and IP headers directly, for example prior to the address/port
+ * being committed to the socket.  To do this effectively we need to know
+ * if the packet data is inbound (in which case the local IP/port are the
+ * destination) or outbound (in which case the local IP/port are the source).
+ * arg7 is set to 0 for outbound traffic and 1 for inbound so we use these
+ * to reconstruct the address/port info where necessary.  arg2 used for IP
+ * information while arg4 contains the TCP header, so it is used for port data.
+ * NET_PROBE_INBOUND is defined as 1, NET_PROBE_OUTBOUND as 0 in net.d.
+ */
+#pragma D binding "1.6.3" translator
+translator tcpsinfo_t < struct tcp_sock *T > {
+	tcps_addr = (uintptr_t)T;
+	tcps_local =
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
+	    (((struct sock *)T)->__sk_common.skc_rcv_saddr ==
+	    ((struct sock *)T)->__sk_common.skc_daddr) :
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
+	    (((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[0]
+	    ==
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[0] &&
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[1]
+            ==
+            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[1] &&
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[2]
+            ==
+            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[2] &&
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[3])
+	    : 0;
+	tcps_lport = (T && ((struct inet_sock *)T)->inet_sport != 0) ?
+	    ntohs(((struct inet_sock *)T)->inet_sport) :
+	    (T && ((struct inet_sock *)T)->inet_sport == 0) ?
+	    ntohs(((struct sock *)T)->__sk_common.skc_num) :
+	    arg4 != NULL ?
+	    ntohs(arg7 == NET_PROBE_INBOUND ?
+	    ((struct tcphdr *)arg4)->dest : ((struct tcphdr *)arg4)->source) :
+	    0;
+	tcps_rport = T && ((struct sock *)T)->__sk_common.skc_dport != 0 ?
+	    ntohs(((struct sock *)T)->__sk_common.skc_dport) :
+	    arg4 != NULL ?
+	    ntohs(arg7 == NET_PROBE_INBOUND ?
+            ((struct tcphdr *)arg4)->source : ((struct tcphdr *)arg4)->dest) :
+	    0;
+	tcps_laddr =
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
+	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_rcv_saddr) :
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
+	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr) :
+	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct iphdr *)arg2)->daddr : &((struct iphdr *)arg2)->saddr) :
+	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct ipv6hdr *)arg2)->daddr :
+	    &((struct ipv6hdr *)arg2)->saddr) :
+	    "<unknown>";
+	tcps_raddr =
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
+	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_daddr) :
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
+	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_daddr) :
+	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct iphdr *)arg2)->saddr : &((struct iphdr *)arg2)->daddr) :
+	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct ipv6hdr *)arg2)->saddr :
+	    &((struct ipv6hdr *)arg2)->daddr) :
+	    "<unknown>";
+	tcps_state = arg6;
+	tcps_iss = T ?
+	    T->snd_una - (uint32_t)T->bytes_acked : 0;
+	tcps_suna = T ? T->snd_una : 0;
+	tcps_snxt = T ? T->snd_nxt : 0;
+	tcps_rnxt = T ? T->rcv_nxt : 0;
+	tcps_swnd = T ? T->snd_wnd : 0;
+	tcps_snd_ws = T ? T->rx_opt.snd_wscale : 0;
+	tcps_rwnd = T ? T->rcv_wnd : 0;
+	tcps_rcv_ws = T ? T->rx_opt.rcv_wscale : 0;
+	tcps_cwnd = T ? T->snd_cwnd : 0;
+	tcps_cwnd_ssthresh = T ? T->snd_ssthresh : 0;
+	tcps_sack_snxt = (T && T->sacked_out == 0) ? T->snd_una :
+	    (T && T->highest_sack == NULL) ? T->snd_nxt :
+	    (T && T->highest_sack != NULL) ?
+	    ((struct tcp_skb_cb *)&((T->highest_sack->cb[0])))->seq : 0;
+	tcps_rto = T ? T->inet_conn.icsk_rto : 0;
+	tcps_mss = T ? T->mss_cache : 0;
+	tcps_retransmit = T && arg0 ?
+	    (((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq
+	    < T->snd_nxt - 1) : 0;
+	tcps_rtt = T ? (T->srtt_us >> 3)/1000 : 0;
+	tcps_rtt_sd = T ? (T->mdev_us >> 2)/1000 : 0;
+	tcps_irs = T && T->bytes_received > 0 ?
+	    T->rcv_nxt - (uint32_t)T->bytes_received : 0;
+};
+
+#pragma D binding "1.6.3" translator
+translator tcplsinfo_t < int I > {
+	tcps_state = I;
+};
diff --git a/dlibs/aarch64/6.10/udp.d b/dlibs/aarch64/6.10/udp.d
new file mode 100644
index 0000000000000..0e44ed6480415
--- /dev/null
+++ b/dlibs/aarch64/6.10/udp.d
@@ -0,0 +1,71 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library net.d
+#pragma D depends_on provider udp
+
+/*
+ * udpinfo is the UDP header fields.
+ */
+typedef struct udpinfo {
+	uint16_t udp_sport;		/* source port */
+	uint16_t udp_dport;		/* destination port */
+	uint16_t udp_length;		/* total length */
+	uint16_t udp_checksum;          /* headers + data checksum */
+	struct udphdr *udp_hdr;		/* raw UDP header */
+} udpinfo_t;
+
+/*
+ * udpsinfo contains stable UDP details from udp_t.
+ */
+typedef struct udpsinfo {
+	uintptr_t udps_addr;
+	uint16_t udps_lport;		/* local port */
+	uint16_t udps_rport;		/* remote port */
+	string udps_laddr;		/* local address, as a string */
+	string udps_raddr;		/* remote address, as a string */
+} udpsinfo_t;
+
+#pragma D binding "1.6.3" translator
+translator udpinfo_t < struct udphdr *U > {
+	udp_sport = ntohs(U->source);
+	udp_dport = ntohs(U->dest);
+	udp_length = ntohs(U->len);
+	udp_checksum = ntohs(U->check);
+	udp_hdr = U;
+};
+
+#pragma D binding "1.6.3" translator
+translator udpsinfo_t < struct udp_sock *S > {
+	/*
+	 * We source udp info from other args but retain the sock arg here
+	 * as it may be used in the future.
+	 */
+	udps_addr = (uintptr_t)S;
+	udps_lport = arg4 ?
+	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->source) :
+	    ntohs(((struct udphdr *)arg4)->dest)) : 0;
+	udps_rport = arg4 ?
+	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->dest) :
+	    ntohs(((struct udphdr *)arg4)->source)) : 0;
+	udps_laddr = arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
+            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->saddr :
+	    &((struct iphdr *)arg2)->daddr) :
+	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
+	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->saddr :
+	    &((struct ipv6hdr *)arg2)->daddr) :
+	    "<unknown>";
+	udps_raddr =
+	    arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
+            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->daddr :
+	    &((struct iphdr *)arg2)->saddr) :
+	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
+	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->daddr :
+	    &((struct ipv6hdr *)arg2)->saddr) :
+	    "<unknown>";
+};
diff --git a/dlibs/aarch64/6.10/unistd.d b/dlibs/aarch64/6.10/unistd.d
new file mode 100644
index 0000000000000..c38bbed4bc85e
--- /dev/null
+++ b/dlibs/aarch64/6.10/unistd.d
@@ -0,0 +1,36 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2007, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+inline int DTRACEFLT_UNKNOWN = 0;	/* Unknown fault */
+#pragma D binding "1.0" DTRACEFLT_UNKNOWN
+
+inline int DTRACEFLT_BADADDR = 1;	/* Bad address */
+#pragma D binding "1.0" DTRACEFLT_BADADDR
+
+inline int DTRACEFLT_BADALIGN = 2;	/* Bad alignment */
+#pragma D binding "1.0" DTRACEFLT_BADALIGN
+
+inline int DTRACEFLT_ILLOP = 3;		/* Illegal operation */
+#pragma D binding "1.0" DTRACEFLT_ILLOP
+
+inline int DTRACEFLT_DIVZERO = 4;	/* Divide-by-zero */
+#pragma D binding "1.0" DTRACEFLT_DIVZERO
+
+inline int DTRACEFLT_NOSCRATCH = 5;	/* Out of scratch space */
+#pragma D binding "1.0" DTRACEFLT_NOSCRATCH
+
+inline int DTRACEFLT_KPRIV = 6;		/* Illegal kernel access */
+#pragma D binding "1.0" DTRACEFLT_KPRIV
+
+inline int DTRACEFLT_UPRIV = 7;		/* Illegal user access */
+#pragma D binding "1.0" DTRACEFLT_UPRIV
+
+inline int DTRACEFLT_TUPOFLOW = 8;	/* Tuple stack overflow */
+#pragma D binding "1.0" DTRACEFLT_TUPOFLOW
+
+inline int DTRACEFLT_BADSTACK = 9;	/* Bad stack */
+#pragma D binding "1.4.1" DTRACEFLT_BADSTACK
diff --git a/dlibs/x86_64/6.10.0/errno.d b/dlibs/x86_64/6.10.0/errno.d
new file mode 100644
index 0000000000000..f54fafe1861cc
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/errno.d
@@ -0,0 +1,275 @@
+
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
+ * Use is subject to license terms.
+ */
+
+inline int EPERM = 1;
+#pragma D binding "1.0" EPERM
+inline int ENOENT = 2;
+#pragma D binding "1.0" ENOENT
+inline int ESRCH = 3;
+#pragma D binding "1.0" ESRCH
+inline int EINTR = 4;
+#pragma D binding "1.0" EINTR
+inline int EIO = 5;
+#pragma D binding "1.0" EIO
+inline int ENXIO = 6;
+#pragma D binding "1.0" ENXIO
+inline int E2BIG = 7;
+#pragma D binding "1.0" E2BIG
+inline int ENOEXEC = 8;
+#pragma D binding "1.0" ENOEXEC
+inline int EBADF = 9;
+#pragma D binding "1.0" EBADF
+inline int ECHILD = 10;
+#pragma D binding "1.0" ECHILD
+inline int EAGAIN = 11;
+#pragma D binding "1.0" EAGAIN
+inline int ENOMEM = 12;
+#pragma D binding "1.0" ENOMEM
+inline int EACCES = 13;
+#pragma D binding "1.0" EACCES
+inline int EFAULT = 14;
+#pragma D binding "1.0" EFAULT
+inline int ENOTBLK = 15;
+#pragma D binding "1.0" ENOTBLK
+inline int EBUSY = 16;
+#pragma D binding "1.0" EBUSY
+inline int EEXIST = 17;
+#pragma D binding "1.0" EEXIST
+inline int EXDEV = 18;
+#pragma D binding "1.0" EXDEV
+inline int ENODEV = 19;
+#pragma D binding "1.0" ENODEV
+inline int ENOTDIR = 20;
+#pragma D binding "1.0" ENOTDIR
+inline int EISDIR = 21;
+#pragma D binding "1.0" EISDIR
+inline int EINVAL = 22;
+#pragma D binding "1.0" EINVAL
+inline int ENFILE = 23;
+#pragma D binding "1.0" ENFILE
+inline int EMFILE = 24;
+#pragma D binding "1.0" EMFILE
+inline int ENOTTY = 25;
+#pragma D binding "1.0" ENOTTY
+inline int ETXTBSY = 26;
+#pragma D binding "1.0" ETXTBSY
+inline int EFBIG = 27;
+#pragma D binding "1.0" EFBIG
+inline int ENOSPC = 28;
+#pragma D binding "1.0" ENOSPC
+inline int ESPIPE = 29;
+#pragma D binding "1.0" ESPIPE
+inline int EROFS = 30;
+#pragma D binding "1.0" EROFS
+inline int EMLINK = 31;
+#pragma D binding "1.0" EMLINK
+inline int EPIPE = 32;
+#pragma D binding "1.0" EPIPE
+inline int EDOM = 33;
+#pragma D binding "1.0" EDOM
+inline int ERANGE = 34;
+#pragma D binding "1.0" ERANGE
+inline int EDEADLK = 35;
+#pragma D binding "1.0" EDEADLK
+inline int ENAMETOOLONG = 36;
+#pragma D binding "1.0" ENAMETOOLONG
+inline int ENOLCK = 37;
+#pragma D binding "1.0" ENOLCK
+inline int ENOSYS = 38;
+#pragma D binding "1.0" ENOSYS
+inline int ENOTEMPTY = 39;
+#pragma D binding "1.0" ENOTEMPTY
+inline int ELOOP = 40;
+#pragma D binding "1.0" ELOOP
+inline int EWOULDBLOCK = 11;
+#pragma D binding "1.0" EWOULDBLOCK
+inline int ENOMSG = 42;
+#pragma D binding "1.0" ENOMSG
+inline int EIDRM = 43;
+#pragma D binding "1.0" EIDRM
+inline int ECHRNG = 44;
+#pragma D binding "1.0" ECHRNG
+inline int EL2NSYNC = 45;
+#pragma D binding "1.0" EL2NSYNC
+inline int EL3HLT = 46;
+#pragma D binding "1.0" EL3HLT
+inline int EL3RST = 47;
+#pragma D binding "1.0" EL3RST
+inline int ELNRNG = 48;
+#pragma D binding "1.0" ELNRNG
+inline int EUNATCH = 49;
+#pragma D binding "1.0" EUNATCH
+inline int ENOCSI = 50;
+#pragma D binding "1.0" ENOCSI
+inline int EL2HLT = 51;
+#pragma D binding "1.0" EL2HLT
+inline int EBADE = 52;
+#pragma D binding "1.0" EBADE
+inline int EBADR = 53;
+#pragma D binding "1.0" EBADR
+inline int EXFULL = 54;
+#pragma D binding "1.0" EXFULL
+inline int ENOANO = 55;
+#pragma D binding "1.0" ENOANO
+inline int EBADRQC = 56;
+#pragma D binding "1.0" EBADRQC
+inline int EBADSLT = 57;
+#pragma D binding "1.0" EBADSLT
+inline int EDEADLOCK = 35;
+#pragma D binding "1.0" EDEADLOCK
+inline int EBFONT = 59;
+#pragma D binding "1.0" EBFONT
+inline int ENOSTR = 60;
+#pragma D binding "1.0" ENOSTR
+inline int ENODATA = 61;
+#pragma D binding "1.0" ENODATA
+inline int ETIME = 62;
+#pragma D binding "1.0" ETIME
+inline int ENOSR = 63;
+#pragma D binding "1.0" ENOSR
+inline int ENONET = 64;
+#pragma D binding "1.0" ENONET
+inline int ENOPKG = 65;
+#pragma D binding "1.0" ENOPKG
+inline int EREMOTE = 66;
+#pragma D binding "1.0" EREMOTE
+inline int ENOLINK = 67;
+#pragma D binding "1.0" ENOLINK
+inline int EADV = 68;
+#pragma D binding "1.0" EADV
+inline int ESRMNT = 69;
+#pragma D binding "1.0" ESRMNT
+inline int ECOMM = 70;
+#pragma D binding "1.0" ECOMM
+inline int EPROTO = 71;
+#pragma D binding "1.0" EPROTO
+inline int EMULTIHOP = 72;
+#pragma D binding "1.0" EMULTIHOP
+inline int EDOTDOT = 73;
+#pragma D binding "1.0" EDOTDOT
+inline int EBADMSG = 74;
+#pragma D binding "1.0" EBADMSG
+inline int EOVERFLOW = 75;
+#pragma D binding "1.0" EOVERFLOW
+inline int ENOTUNIQ = 76;
+#pragma D binding "1.0" ENOTUNIQ
+inline int EBADFD = 77;
+#pragma D binding "1.0" EBADFD
+inline int EREMCHG = 78;
+#pragma D binding "1.0" EREMCHG
+inline int ELIBACC = 79;
+#pragma D binding "1.0" ELIBACC
+inline int ELIBBAD = 80;
+#pragma D binding "1.0" ELIBBAD
+inline int ELIBSCN = 81;
+#pragma D binding "1.0" ELIBSCN
+inline int ELIBMAX = 82;
+#pragma D binding "1.0" ELIBMAX
+inline int ELIBEXEC = 83;
+#pragma D binding "1.0" ELIBEXEC
+inline int EILSEQ = 84;
+#pragma D binding "1.0" EILSEQ
+inline int ERESTART = 85;
+#pragma D binding "1.0" ERESTART
+inline int ESTRPIPE = 86;
+#pragma D binding "1.0" ESTRPIPE
+inline int EUSERS = 87;
+#pragma D binding "1.0" EUSERS
+inline int ENOTSOCK = 88;
+#pragma D binding "1.0" ENOTSOCK
+inline int EDESTADDRREQ = 89;
+#pragma D binding "1.0" EDESTADDRREQ
+inline int EMSGSIZE = 90;
+#pragma D binding "1.0" EMSGSIZE
+inline int EPROTOTYPE = 91;
+#pragma D binding "1.0" EPROTOTYPE
+inline int ENOPROTOOPT = 92;
+#pragma D binding "1.0" ENOPROTOOPT
+inline int EPROTONOSUPPORT = 93;
+#pragma D binding "1.0" EPROTONOSUPPORT
+inline int ESOCKTNOSUPPORT = 94;
+#pragma D binding "1.0" ESOCKTNOSUPPORT
+inline int EOPNOTSUPP = 95;
+#pragma D binding "1.0" EOPNOTSUPP
+inline int EPFNOSUPPORT = 96;
+#pragma D binding "1.0" EPFNOSUPPORT
+inline int EAFNOSUPPORT = 97;
+#pragma D binding "1.0" EAFNOSUPPORT
+inline int EADDRINUSE = 98;
+#pragma D binding "1.0" EADDRINUSE
+inline int EADDRNOTAVAIL = 99;
+#pragma D binding "1.0" EADDRNOTAVAIL
+inline int ENETDOWN = 100;
+#pragma D binding "1.0" ENETDOWN
+inline int ENETUNREACH = 101;
+#pragma D binding "1.0" ENETUNREACH
+inline int ENETRESET = 102;
+#pragma D binding "1.0" ENETRESET
+inline int ECONNABORTED = 103;
+#pragma D binding "1.0" ECONNABORTED
+inline int ECONNRESET = 104;
+#pragma D binding "1.0" ECONNRESET
+inline int ENOBUFS = 105;
+#pragma D binding "1.0" ENOBUFS
+inline int EISCONN = 106;
+#pragma D binding "1.0" EISCONN
+inline int ENOTCONN = 107;
+#pragma D binding "1.0" ENOTCONN
+inline int ESHUTDOWN = 108;
+#pragma D binding "1.0" ESHUTDOWN
+inline int ETOOMANYREFS = 109;
+#pragma D binding "1.0" ETOOMANYREFS
+inline int ETIMEDOUT = 110;
+#pragma D binding "1.0" ETIMEDOUT
+inline int ECONNREFUSED = 111;
+#pragma D binding "1.0" ECONNREFUSED
+inline int EHOSTDOWN = 112;
+#pragma D binding "1.0" EHOSTDOWN
+inline int EHOSTUNREACH = 113;
+#pragma D binding "1.0" EHOSTUNREACH
+inline int EALREADY = 114;
+#pragma D binding "1.0" EALREADY
+inline int EINPROGRESS = 115;
+#pragma D binding "1.0" EINPROGRESS
+inline int ESTALE = 116;
+#pragma D binding "1.0" ESTALE
+inline int EUCLEAN = 117;
+#pragma D binding "1.0" EUCLEAN
+inline int ENOTNAM = 118;
+#pragma D binding "1.0" ENOTNAM
+inline int ENAVAIL = 119;
+#pragma D binding "1.0" ENAVAIL
+inline int EISNAM = 120;
+#pragma D binding "1.0" EISNAM
+inline int EREMOTEIO = 121;
+#pragma D binding "1.0" EREMOTEIO
+inline int EDQUOT = 122;
+#pragma D binding "1.0" EDQUOT
+inline int ENOMEDIUM = 123;
+#pragma D binding "1.0" ENOMEDIUM
+inline int EMEDIUMTYPE = 124;
+#pragma D binding "1.0" EMEDIUMTYPE
+inline int ECANCELED = 125;
+#pragma D binding "1.0" ECANCELED
+inline int ENOKEY = 126;
+#pragma D binding "1.0" ENOKEY
+inline int EKEYEXPIRED = 127;
+#pragma D binding "1.0" EKEYEXPIRED
+inline int EKEYREVOKED = 128;
+#pragma D binding "1.0" EKEYREVOKED
+inline int EKEYREJECTED = 129;
+#pragma D binding "1.0" EKEYREJECTED
+inline int EOWNERDEAD = 130;
+#pragma D binding "1.0" EOWNERDEAD
+inline int ENOTRECOVERABLE = 131;
+#pragma D binding "1.0" ENOTRECOVERABLE
+inline int ERFKILL = 132;
+#pragma D binding "1.0" ERFKILL
+inline int EHWPOISON = 133;
+#pragma D binding "1.0" EHWPOISON
+inline int ENOTSUP = 95;
+#pragma D binding "1.0" ENOTSUP
diff --git a/dlibs/x86_64/6.10.0/io.d b/dlibs/x86_64/6.10.0/io.d
new file mode 100644
index 0000000000000..de693c187efcf
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/io.d
@@ -0,0 +1,235 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on provider sched
+
+typedef char	*caddr_t;
+
+typedef struct bufinfo {
+	int b_flags;			/* buffer status */
+	size_t b_bcount;		/* number of bytes */
+	caddr_t b_addr;			/* buffer address */
+	uint64_t b_lblkno;		/* block # on device */
+	uint64_t b_blkno;		/* expanded block # on device */
+	size_t b_resid;			/* # of bytes not transferred */
+	size_t b_bufsize;		/* size of allocated buffer */
+	caddr_t b_iodone;		/* I/O completion routine */
+	int b_error;			/* expanded error field */
+	dev_t b_edev;			/* extended device */
+} bufinfo_t;
+
+inline int B_BUSY = 0x000001;
+#pragma D binding "1.0" B_BUSY
+inline int B_DONE = 0x000002;
+#pragma D binding "1.0" B_DONE
+inline int B_ERROR = 0x000004;
+#pragma D binding "1.0" B_ERROR
+inline int B_PAGEIO = 0x000010;
+#pragma D binding "1.0" B_PAGEIO
+inline int B_PHYS = 0x000020;
+#pragma D binding "1.0" B_PHYS
+inline int B_READ = 0x000040;
+#pragma D binding "1.0" B_READ
+inline int B_WRITE = 0x000100;
+#pragma D binding "1.0" B_WRITE
+inline int B_ASYNC = 0x000400;
+#pragma D binding "1.0" B_ASYNC
+
+#pragma D binding "1.0" translator
+translator bufinfo_t < struct buffer_head *B > {
+	b_flags = (int)arg1 & 0x01 ? B_WRITE : B_READ;
+	b_addr = B->b_data;
+	b_bcount = B->b_size;
+	b_lblkno = B->b_blocknr;
+	b_blkno = B->b_blocknr;
+	b_resid = 0;
+	b_bufsize = B->b_size;
+	b_iodone = (caddr_t)B->b_end_io;
+	b_error = 0;			/* b_state ?? */
+	b_edev = B->b_bdev->bd_dev;
+};
+
+/*
+ * From linux/blk_types.h.
+ */
+
+/* bit # in bi_flags */
+inline int BIO_USER_MAPPED = 6;
+
+/* bit mask in bi_rw */
+inline int REQ_WRITE = 0x01;
+
+inline int REQ_SYNC = 0x800;
+
+
+
+
+
+
+
+#pragma D binding "1.6.3" translator
+translator bufinfo_t < struct bio *B > {
+	b_flags = ((int)B->bi_opf & REQ_WRITE ? B_WRITE : B_READ) |
+		((int)B->bi_opf & REQ_SYNC ? 0 : B_ASYNC) |
+		((int)B->bi_flags & (1 << BIO_USER_MAPPED) ? B_PAGEIO : B_PHYS);
+	b_addr = 0;
+	b_bcount = B->bi_iter.bi_size;
+	b_lblkno = B->bi_iter.bi_sector;
+	b_blkno = B->bi_iter.bi_sector;
+	b_resid = 0;
+	b_bufsize = B->bi_iter.bi_size;
+	b_iodone = (caddr_t)B->bi_end_io;
+	b_error = 0;
+	b_edev = B->bi_bdev == NULL ? 0 : B->bi_bdev->bd_dev;
+};
+
+typedef struct devinfo {
+	int dev_major;			/* major number */
+	int dev_minor;			/* minor number */
+	int dev_instance;		/* instance number */
+	string dev_name;		/* name of device */
+	string dev_statname;		/* name of device + instance/minor */
+	string dev_pathname;		/* pathname of device */
+} devinfo_t;
+
+
+
+#pragma D binding "1.0" translator
+translator devinfo_t < struct buffer_head *B > {
+	dev_major = getmajor(B->b_bdev->bd_dev);
+	dev_minor = getminor(B->b_bdev->bd_dev);
+	dev_instance = 0;		/* not used? */
+	dev_name = B->b_bdev->bd_disk->part0->bd_device.parent
+	    ? B->b_bdev->bd_disk->part0->bd_device.parent->driver->name
+		? stringof(B->b_bdev->bd_disk->part0->bd_device.parent->driver->name)
+		: "<none>"
+	    : B->b_bdev->bd_disk->part0->bd_device.driver->name
+		? stringof(B->b_bdev->bd_disk->part0->bd_device.driver->name)
+		: "<none>";
+	dev_statname = B->b_bdev->__bd_flags.counter & 255 == 0
+			? stringof(B->b_bdev->bd_disk->disk_name)
+			: strjoin(stringof(B->b_bdev->bd_disk->disk_name),
+				  lltostr(B->b_bdev->__bd_flags.counter & 255));
+	dev_pathname = strjoin(
+			"/dev/",
+			B->b_bdev->__bd_flags.counter & 255 == 0
+			    ? stringof(B->b_bdev->bd_disk->disk_name)
+			    : strjoin(stringof(B->b_bdev->bd_disk->disk_name),
+				      lltostr(B->b_bdev->__bd_flags.counter & 255))
+		       );
+};
+
+#pragma D binding "1.6.3" translator
+translator devinfo_t < struct bio *B > {
+	dev_major = B->bi_bdev == NULL ? 0 : getmajor(B->bi_bdev->bd_dev);
+	dev_minor = B->bi_bdev == NULL ? 0 : getminor(B->bi_bdev->bd_dev);
+	dev_instance = 0;
+	dev_name = B->bi_bdev == NULL
+			? "nfs"
+			: stringof(((struct blk_major_name **)`major_names)[
+					getmajor(B->bi_bdev->bd_dev) % 255
+				   ]->name);
+	dev_statname = B->bi_bdev == NULL ? "nfs" :
+	    B->bi_bdev->__bd_flags.counter & 255 == 0 ? stringof(B->bi_bdev->bd_disk->disk_name) :
+	    strjoin(stringof(B->bi_bdev->bd_disk->disk_name), lltostr(B->bi_bdev->__bd_flags.counter & 255));
+	dev_pathname = B->bi_bdev == NULL ? "<nfs>" : "<unknown>";
+};
+
+typedef struct fileinfo {
+	string fi_name;			/* name (basename of fi_pathname) */
+	string fi_dirname;		/* directory (dirname of fi_pathname) */
+	string fi_pathname;		/* full pathname */
+	loff_t fi_offset;		/* offset within file */
+	string fi_fs;			/* filesystem */
+	string fi_mount;		/* mount point of file system */
+	int fi_oflags;			/* open(2) flags for file descriptor */
+} fileinfo_t;
+
+#pragma D binding "1.0" translator
+translator fileinfo_t < struct buffer_head *B > {
+	fi_name = "<unknown>";
+	fi_dirname = "<unknown>";
+	fi_pathname = "<unknown>";
+	fi_offset = 0;
+	fi_fs = "<unknown>";
+	fi_mount = "<unknown>";
+	fi_oflags = 0;
+};
+
+inline int O_ACCMODE = 0003;
+#pragma D binding "1.1" O_ACCMODE
+inline int O_RDONLY = 00;
+#pragma D binding "1.1" O_RDONLY
+inline int O_WRONLY = 01;
+#pragma D binding "1.1" O_WRONLY
+inline int O_RDWR = 02;
+#pragma D binding "1.1" O_RDWR
+inline int O_CREAT = 00000100;
+#pragma D binding "1.1" O_CREAT
+inline int O_EXCL = 00000200;
+#pragma D binding "1.1" O_EXCL
+inline int O_NOCTTY = 00000400;
+#pragma D binding "1.1" O_NOCTTY
+inline int O_TRUNC = 00001000;
+#pragma D binding "1.1" O_TRUNC
+inline int O_APPEND = 00002000;
+#pragma D binding "1.1" O_APPEND
+inline int O_NONBLOCK = 00004000;
+#pragma D binding "1.1" O_NONBLOCK
+inline int O_NDELAY = 00004000;
+#pragma D binding "1.1" O_NDELAY
+inline int O_SYNC = (04000000|010000);
+#pragma D binding "1.1" O_SYNC
+inline int O_FSYNC = (04000000|010000);
+#pragma D binding "1.1" O_FSYNC
+inline int O_ASYNC = 020000;
+#pragma D binding "1.1" O_ASYNC
+inline int O_DIRECTORY = 0200000;
+#pragma D binding "1.1" O_DIRECTORY
+inline int O_NOFOLLOW = 0400000;
+#pragma D binding "1.1" O_NOFOLLOW
+inline int O_CLOEXEC = 02000000;
+#pragma D binding "1.1" O_CLOEXEC
+inline int O_DSYNC = 010000;
+#pragma D binding "1.1" O_DSYNC
+inline int O_RSYNC = (04000000|010000);
+#pragma D binding "1.1" O_RSYNC
+
+#pragma D binding "1.1" translator
+translator fileinfo_t < struct file *F > {
+	fi_name = F == NULL
+			? "<none>"
+			: stringof(F->f_path.dentry->d_name.name);
+	fi_dirname = F == NULL
+			? "<none>"
+			: dirname(d_path(&(F->f_path)));
+	fi_pathname = F == NULL
+			? "<none>"
+			: d_path(&(F->f_path));
+	fi_offset = F == NULL
+			? 0
+			: F->f_pos;
+	fi_fs = F == NULL
+			? "<none>"
+			: stringof(F->f_path.mnt->mnt_sb->s_type->name);
+	fi_mount = F == NULL
+			? "<none>"
+			: "<unknown>";
+	fi_oflags = F == NULL
+			? 0
+			: F->f_flags;
+};
+
+inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
+				 fd >= 0 && fd < curthread->files->fdt->max_fds
+					? curthread->files->fdt->fd[fd]
+					: NULL
+				);
+
+#pragma D attributes Stable/Stable/Common fds
+#pragma D binding "1.1" fds
diff --git a/dlibs/x86_64/6.10.0/ip.d b/dlibs/x86_64/6.10.0/ip.d
new file mode 100644
index 0000000000000..f8b77f1224115
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/ip.d
@@ -0,0 +1,341 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2007, 2023, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library net.d
+#pragma D depends_on library procfs.d
+#pragma D depends_on provider ip
+
+inline int IPPROTO_IP		=	0;
+inline int IPPROTO_ICMP		=	1;
+inline int IPPROTO_IGMP		=	2;
+inline int IPPROTO_IPIP		=	4;
+inline int IPPROTO_TCP		=	6;
+inline int IPPROTO_EGP		=	8;
+inline int IPPROTO_PUP		=	12;
+inline int IPPROTO_UDP		=	17;
+inline int IPPROTO_IDP		=	22;
+inline int IPPROTO_TP		=	29;
+inline int IPPROTO_DCCP		=	33;
+inline int IPPROTO_IPV6		=	41;
+inline int IPPROTO_RSVP		=	46;
+inline int IPPROTO_GRE		=	47;
+inline int IPPROTO_ESP		=	50;
+inline int IPPROTO_AH		=	51;
+inline int IPPROTO_OSPF		=	89;
+inline int IPPROTO_MTP		=	92;
+inline int IPPROTO_BEETPH	=	94;
+inline int IPPROTO_ENCAP	=	98;
+inline int IPPROTO_PIM		=	103;
+inline int IPPROTO_COMP		=	108;
+inline int IPPROTO_SCTP		=	132;
+inline int IPPROTO_UDPLITE	=	136;
+inline int IPPROTO_RAW		=	255;
+inline int IPPROTO_MAX		=	256;
+inline int IPPROTO_HOPOPTS	=	0;
+inline int IPPROTO_ROUTING	=	43;
+inline int IPPROTO_FRAGMENT	=	44;
+inline int IPPROTO_ICMPV6	=	58;
+inline int IPPROTO_NONE		=	59;
+inline int IPPROTO_DSTOPTS	=	60;
+inline int IPPROTO_MH		=	135;
+
+inline int TCP_MIN_HEADER_LENGTH =	20;
+
+/*
+ * For compatibility with Solaris.  Here the netstackid will be the pointer
+ * to the net namespace (nd_net in struct net_device).
+ */
+typedef uint64_t	netstackid_t;
+typedef __be32		ipaddr_t;
+typedef struct in6_addr	in6_addr_t;
+
+/*
+ * pktinfo is where packet ID info can be made available for deeper
+ * analysis if packet IDs become supported by the kernel in the future.
+ * The pkt_addr member is currently always NULL.
+ */
+typedef struct pktinfo {
+	uintptr_t pkt_addr;
+} pktinfo_t;
+
+/*
+ * csinfo is where connection state info is made available.
+ */
+typedef struct csinfo {
+	uintptr_t cs_addr;
+	uint64_t cs_cid;
+} csinfo_t;
+
+/*
+ * ipinfo contains common IP info for both IPv4 and IPv6.
+ */
+typedef struct ipinfo {
+	uint8_t ip_ver;			/* IP version (4, 6) */
+	uint32_t ip_plength;		/* payload length */
+	string ip_saddr;		/* source address */
+	string ip_daddr;		/* destination address */
+} ipinfo_t;
+
+/*
+ * ifinfo contains network interface info.
+ */
+typedef struct ifinfo {
+	string if_name;			/* interface name */
+	int8_t if_local;		/* is delivered locally */
+	netstackid_t if_ipstack;	/* netns pointer on Linux */
+	uintptr_t if_addr;		/* pointer to raw struct net_device */
+} ifinfo_t;
+
+/*
+ * ipv4info is a translated version of the IPv4 header (with raw pointer).
+ * These values are NULL if the packet is not IPv4.
+ */
+typedef struct ipv4info {
+	uint8_t ipv4_ver;		/* IP version (4) */
+	uint8_t ipv4_ihl;		/* header length, bytes */
+	uint8_t ipv4_tos;		/* type of service field */
+	uint16_t ipv4_length;		/* length (header + payload) */
+	uint16_t ipv4_ident;		/* identification */
+	uint8_t ipv4_flags;		/* IP flags */
+	uint16_t ipv4_offset;		/* fragment offset */
+	uint8_t ipv4_ttl;		/* time to live */
+	uint8_t ipv4_protocol;		/* next level protocol */
+	string ipv4_protostr;		/* next level protocol, as string */
+	uint16_t ipv4_checksum;		/* header checksum */
+	ipaddr_t ipv4_src;		/* source address */
+	ipaddr_t ipv4_dst;		/* destination address */
+	string ipv4_saddr;		/* source address, string */
+	string ipv4_daddr;		/* destination address, string */
+	struct iphdr *ipv4_hdr;		/* pointer to raw header */
+} ipv4info_t;
+
+/*
+ * ipv6info is a translated version of the IPv6 header (with raw pointer).
+ * These values are NULL if the packet is not IPv6.
+ */
+typedef struct ipv6info {
+	uint8_t ipv6_ver;		/* IP version (6) */
+	uint8_t ipv6_tclass;		/* traffic class */
+	uint32_t ipv6_flow;		/* flow label */
+	uint16_t ipv6_plen;		/* payload length */
+	uint8_t ipv6_nexthdr;		/* next header protocol */
+	string ipv6_nextstr;		/* next header protocol, as string */
+	uint8_t ipv6_hlim;		/* hop limit */
+	in6_addr_t *ipv6_src;		/* source address */
+	in6_addr_t *ipv6_dst;		/* destination address */
+	string ipv6_saddr;		/* source address, string */
+	string ipv6_daddr;		/* destination address, string */
+	struct ipv6hdr *ipv6_hdr;	/* pointer to raw header */
+} ipv6info_t;
+
+/*
+ * void_ip_t is a void pointer to either an IPv4 or IPv6 header.  It has
+ * its own type name so that a translator can be determined.
+ */
+typedef uintptr_t void_ip_t;
+
+/*
+ * __dtrace_tcp_void_ip_t is used by the translator to take either the
+ * non-NULL void_ip_t * passed in or, if it is NULL, uses arg3 (struct tcp *)
+ * from the tcp:::send probe to translate to an ipinfo_t.
+ * This allows us to present the consumer with header data based on the
+ * struct tcp * when IP information is not yet present (for TCP send).
+ */
+typedef void * __dtrace_tcp_void_ip_t;
+
+#pragma D binding "1.5" translator
+translator pktinfo_t < struct sk_buff *s > {
+	pkt_addr = (uintptr_t)s;
+};
+
+#pragma D binding "1.5" translator
+translator csinfo_t < struct sock *s > {
+	cs_addr = (uintptr_t)s;
+};
+
+#pragma D binding "1.5" translator
+translator ipinfo_t < struct iphdr *I > {
+	ip_ver = 4;
+        ip_plength = I != NULL ? (ntohs(I->tot_len) - I->ihl << 2) : 0;
+	ip_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<unknown>";
+	ip_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<unknown>";
+};
+
+#pragma D binding "1.5" translator
+translator ipinfo_t < struct ipv6hdr *I > {
+	ip_ver = 6;
+	ip_plength = I != NULL ? ntohs(I->payload_len) : 0;
+	ip_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<unknown>";
+	ip_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<unknown>";
+};
+
+#pragma D binding "1.5" translator
+translator ipinfo_t < void_ip_t *I > {
+	ip_ver = I != NULL ? *(uint8_t *)I >> 4 : 0;
+	ip_plength = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
+	    (ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2)) :
+	    *(uint8_t *)I >> 4 == 6 ?
+	    ntohs(((struct ipv6hdr *)I)->payload_len) : 0) : 0;
+	ip_saddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->saddr) : *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) : "<unknown>") :
+	    "<unknown>";
+	ip_daddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->daddr) : *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) : "<unknown>") :
+	    "<unknown>";
+};
+
+/*
+ * In some cases where the ipinfo_t * is NULL we wish to construct IP info
+ * using the struct tcp_sock * (arg3).  In order to map local IP to source
+ * or destination IP address appropriately we need to check if the associated
+ * data is inbound (NET_PROBE_INBOUND in arg7) or outbound (NET_PROBE_OUTBOUND);
+ * the value is stored in arg7.  If inbound, we map the local IP address to
+ * ip_daddr (destination), and if outbound it is mapped to ip_saddr.
+ */
+#pragma D binding "1.5" translator
+translator ipinfo_t < __dtrace_tcp_void_ip_t *I > {
+	/*
+	 * General strategy used is to rely on the IP header I if it is
+	 * non-null; otherwise we try to reconstruct IP values from arg3
+	 * (a struct tcp_sock *).
+	 */
+	ip_ver = I != NULL ? *(uint8_t *)I >> 4 :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET ? 4 :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ? 6 : 0;
+	/*
+	 * For ip_plength we fall back to using TCP skb data from the tcp_skb_cb
+	 * to determine payload length.
+	 */
+	ip_plength = I != NULL && *(uint8_t *)I >> 4 == 4 ?
+	    ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2) :
+	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
+	    ntohs(((struct ipv6hdr *)I)->payload_len) :
+	    arg0 != NULL ?
+	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq -
+	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->seq :
+	    0;
+	/*
+	 * For source/destination addresses, we again try to use the IP header I
+	 * if available.  If I is NULL, we utilize arg3 (struct tcp_sock *)
+	 * but the problem here is that it stores local and remote IP addresses
+	 * _not_ source and destination.  So we need to know if traffic is
+	 * inbound or outbound. If inbound, IP source address is remote
+	 * socket address (skc_daddr) and destination IP address is local socket
+	 * address (skc_rcv_saddr).  If outbound, IP source address is local
+	 * socket address and IP destination address is remote socket address.
+	 */
+	ip_saddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->saddr) :
+	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_daddr :
+	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr :
+	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr) :
+	    "<unknown>";
+	ip_daddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
+	    inet_ntoa(&((struct iphdr *)I)->daddr) :
+	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
+	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr :
+	    &((struct sock *)arg3)->__sk_common.skc_daddr) :
+	    arg3 != NULL &&
+	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr :
+	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr) :
+	    "<unknown>";
+};
+
+#pragma D binding "1.5" translator
+translator ifinfo_t < struct net_device *N > {
+	if_name = N != NULL ? stringof(N->name) : "<unknown>";
+	if_ipstack = (N != NULL && sizeof(N->nd_net) > 0) ?
+	    ((uint64_t)N->nd_net.net) : 0;
+	if_local = (N == NULL);	/* is delivered locally */
+	if_addr = (uintptr_t)N;	/* pointer to raw struct net_device ptr */
+};
+
+#pragma D binding "1.5" translator
+translator ipv4info_t < struct iphdr *I > {
+	ipv4_ver = I != NULL ? 4 : 0;
+	ipv4_ihl = I != NULL ? ((*(uint8_t *)I & 0xf) << 2) : 0;
+	ipv4_tos = I != NULL ? I->tos : 0;
+	ipv4_length = I != NULL ? ntohs(I->tot_len) : 0;
+	ipv4_ident = I != NULL ? ntohs(I->id) : 0;
+	ipv4_flags = I != NULL ? ntohs(I->frag_off) >> 12 : 0;
+	ipv4_offset = I != NULL ? ntohs(I->frag_off) & 0x0fff : 0;
+	ipv4_ttl = I != NULL ? I->ttl : 0;
+	ipv4_protocol = I != NULL ? I->protocol : 0;
+	ipv4_protostr = I == NULL ? "<null>" :
+	    I->protocol == IPPROTO_TCP     ? "TCP"    :
+	    I->protocol == IPPROTO_UDP     ? "UDP"    :
+	    I->protocol == IPPROTO_IP      ? "IP"     :
+	    I->protocol == IPPROTO_ICMP    ? "ICMP"   :
+	    I->protocol == IPPROTO_IGMP    ? "IGMP"   :
+	    I->protocol == IPPROTO_EGP     ? "EGP"    :
+	    I->protocol == IPPROTO_IPV6    ? "IPv6"   :
+	    I->protocol == IPPROTO_ROUTING ? "ROUTE"  :
+	    I->protocol == IPPROTO_ESP     ? "ESP"    :
+	    I->protocol == IPPROTO_AH      ? "AH"     :
+	    I->protocol == IPPROTO_ICMPV6  ? "ICMPv6" :
+	    I->protocol == IPPROTO_OSPF    ? "OSPF"   :
+	    I->protocol == IPPROTO_SCTP    ? "SCTP"   :
+	    I->protocol == IPPROTO_RAW     ? "RAW"    :
+	    lltostr((uint64_t)I->protocol);
+	ipv4_checksum = I != NULL ? ntohs(I->check) : 0;
+	ipv4_src = I != NULL ? I->saddr : 0;
+	ipv4_dst = I != NULL ? I->daddr : 0;
+	ipv4_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<null>";
+	ipv4_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<null>";
+	ipv4_hdr = I;
+};
+
+#pragma D binding "1.5" translator
+translator ipv6info_t < struct ipv6hdr *I > {
+	ipv6_ver = I != NULL ? ((*(uint8_t *)I) >> 4) : 0;
+	ipv6_tclass = I != NULL ? ((ntohl(*(uint32_t *)I) & 0x0fffffff) >> 20) : 0;
+	ipv6_flow = I != NULL ? (ntohl(*(uint32_t *)I) & 0x000fffff) : 0;
+	ipv6_plen = I != NULL ? ntohs(I->payload_len) : 0;
+	ipv6_nexthdr = I != NULL ? I->nexthdr : 0;
+	ipv6_nextstr = I == NULL ? "<null>" :
+	    I->nexthdr == IPPROTO_TCP	?	"TCP"		:
+	    I->nexthdr == IPPROTO_UDP	?	"UDP"		:
+	    I->nexthdr == IPPROTO_IP	?	"IP"		:
+	    I->nexthdr == IPPROTO_ICMP	?	"ICMP"		:
+	    I->nexthdr == IPPROTO_IGMP	?	"IGMP"		:
+	    I->nexthdr == IPPROTO_EGP	?	"EGP"		:
+	    I->nexthdr == IPPROTO_IPV6	?	"IPv6"		:
+	    I->nexthdr == IPPROTO_ROUTING ?	"ROUTE"		:
+	    I->nexthdr == IPPROTO_ESP	?	"ESP"		:
+	    I->nexthdr == IPPROTO_AH	?	"AH"		:
+	    I->nexthdr == IPPROTO_ICMPV6 ?	"ICMPv6"	:
+	    I->nexthdr == IPPROTO_OSPF ?	"OSPF"		:
+	    I->nexthdr == IPPROTO_SCTP	?	"SCTP"		:
+	    I->nexthdr == IPPROTO_RAW	?	"RAW"		:
+	    lltostr((uint64_t)I->nexthdr);
+	ipv6_hlim = I != NULL ? I->hop_limit : 0;
+	ipv6_src = I != NULL ? &I->saddr : NULL;
+	ipv6_dst = I != NULL ? &I->daddr : 0;
+	ipv6_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<null>";
+	ipv6_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<null>";
+	ipv6_hdr = I;
+};
diff --git a/dlibs/x86_64/6.10.0/lockstat.d b/dlibs/x86_64/6.10.0/lockstat.d
new file mode 100644
index 0000000000000..cb8b4bd96f1ac
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/lockstat.d
@@ -0,0 +1,14 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on provider lockstat
+
+inline int RW_WRITER = 0x00;
+#pragma D binding "1.6.4" RW_WRITER
+inline int RW_READER = 0x01;
+#pragma D binding "1.6.4" RW_READER
diff --git a/dlibs/x86_64/6.10.0/net.d b/dlibs/x86_64/6.10.0/net.d
new file mode 100644
index 0000000000000..6ac3428747a77
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/net.d
@@ -0,0 +1,33 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2007, 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+/* These are needed for inet_ntop() DTrace function. */
+inline int AF_INET              =       2;
+inline int AF_INET6             =       10;
+
+/* These are needed for link_ntop() DTrace function. */
+inline int ARPHRD_ETHER         =       1;
+inline int ARPHRD_INFINIBAND    =       32;
+
+/*
+ * The conninfo_t structure should be used by all application protocol
+ * providers as the first arguments to indicate some basic information
+ * about the connection. This structure may be augmented to accommodate
+ * the particularities of additional protocols in the future.
+ */
+typedef struct conninfo {
+	 string ci_local;	/* local host address */
+	 string ci_remote;	/* remote host address */
+	 string ci_protocol;	/* protocol (ipv4, ipv6, etc) */
+} conninfo_t;
+
+/*
+ * We use these values to determine if a probe point is associated
+ * with sending (outbound) or receiving (inbound).
+ */
+inline int NET_PROBE_OUTBOUND =		0x00;
+inline int NET_PROBE_INBOUND =		0x01;
diff --git a/dlibs/x86_64/6.10.0/pcap.d b/dlibs/x86_64/6.10.0/pcap.d
new file mode 100644
index 0000000000000..21a8e74a4036d
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/pcap.d
@@ -0,0 +1,35 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on provider ip
+
+/*
+ * In general, PCAP_<type> names are chosen to match DL_<type> DLPI
+ * datalink types.
+ */
+
+/*
+ * Network-related capture types.  Raw DLT_* values can be used for those
+ * not present here; see /usr/include/pcap/bpf.h for the full list.
+ */
+
+inline int PCAP_NULL = 0;
+#pragma D binding "1.12" PCAP_NULL
+inline int PCAP_ETHER = 1;
+#pragma D binding "1.12" PCAP_ETHER
+inline int PCAP_WIFI = 105;
+#pragma D binding "1.12" PCAP_WIFI
+inline int PCAP_PPP = 9;
+#pragma D binding "1.12" PCAP_PPP
+/* PCAP_IP can signify IPv4 or IPv6 header follows. */
+inline int PCAP_IP = 12;
+#pragma D binding "1.12" PCAP_IP
+
+/* InfiniBand-related capture types. */
+inline int PCAP_IPOIB = 242;
+#pragma D binding "1.12" PCAP_IPOIB
diff --git a/dlibs/x86_64/6.10.0/procfs.d b/dlibs/x86_64/6.10.0/procfs.d
new file mode 100644
index 0000000000000..5d7873b5e0091
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/procfs.d
@@ -0,0 +1,306 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, 2022, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+/*
+ * This file defines the standard set of inlines and translators to be made
+ * available for all D programs to use to examine process model state.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library sched.d
+
+typedef time64_t time_t;
+
+typedef struct timestruc {
+	time_t tv_sec;
+	long tv_nsec;
+} timestruc_t;
+
+typedef struct lwpsinfo {
+	int pr_flag;			/* lwp flags (DEPRECATED) */
+	int pr_lwpid;			/* lwp id */
+	uintptr_t pr_addr;		/* internal address of lwp */
+	uintptr_t pr_wchan;		/* wait addr for sleeping lwp */
+	char pr_stype;			/* sync event type */
+	char pr_state;			/* numeric lwp state */
+	char pr_sname;			/* printable char for pr_state */
+	char pr_nice;			/* nice for cpu usage */
+	short pr_syscall;		/* syscall number */
+	char pr_oldpri;			/* priority */
+	char pr_cpu;			/* CPU usage */
+	int pr_pri;			/* priority */
+	ushort_t pr_pctcpu;		/* % of recent cpu time */
+	ushort_t pr_pad;
+	timestruc_t pr_start;		/* lwp start time */
+	timestruc_t pr_time;		/* usr+sys cpu time */
+	char pr_clname[8];		/* scheduling class name */
+	char pr_name[16];		/* name */
+	processorid_t pr_onpro;		/* processor last ran on */
+	processorid_t pr_bindpro;	/* processor bound to */
+	psetid_t pr_bindpset;		/* processor set */
+	int pr_lgrp;			/* lwp home lgroup */
+	int pr_filler[4];
+} lwpsinfo_t;
+
+typedef id_t taskid_t;
+typedef id_t dprojid_t;
+typedef id_t poolid_t;
+typedef id_t zoneid_t;
+
+/*
+ * Translate from the kernel's task_struct structure to a Solaris proc(4)
+ * psinfo_t struct.
+ * We do not provide support for pr_size, pr_rssize, pr_pctcpu, and pr_pctmem.
+ * We also do not fill in pr_lwp (the lwpsinfo_t for the representative LWP)
+ * because we do not have the ability to select and stop any representative.
+ * Also, for the moment, pr_wstat, pr_time, and pr_ctime are not supported,
+ * but these could be supported by DTrace in the future using subroutines.
+ * Note that any member added to this translator should also be added to the
+ * kthread_t-to-psinfo_t translator, below.
+ */
+typedef struct psinfo {
+	int pr_flag;			/* process flags (DEPRECATED) */
+	int pr_nlwp;			/* number of active lwps (Linux: 1) */
+	pid_t pr_pid;			/* unique process id */
+	pid_t pr_ppid;			/* process id of parent */
+	pid_t pr_pgid;			/* pid of process group leader */
+	pid_t pr_sid;			/* session id */
+	uid_t pr_uid;			/* real user id */
+	uid_t pr_euid;			/* effective user id */
+	uid_t pr_gid;			/* real group id */
+	uid_t pr_egid;			/* effective group id */
+	uintptr_t pr_addr;		/* address of process */
+	size_t pr_size;			/* size of process image (in KB) */
+	size_t pr_rssize;		/* resident set sie (in KB) */
+	size_t pr_pad1;
+	struct tty_struct *pr_ttydev;	/* controlling tty (or -1) */
+	ushort_t pr_pctcpu;		/* % of recent cpu time used */
+	ushort_t pr_pctmem;		/* % of recent memory used */
+	timestruc_t pr_start;		/* process start time */
+	timestruc_t pr_time;		/* usr+sys cpu time for process */
+	timestruc_t pr_ctime;		/* usr+sys cpu time for children */
+	char pr_fname[16];		/* name of exec'd file */
+	char pr_psargs[80];		/* initial chars of arg list */
+	int pr_wstat;			/* if zombie, wait() status */
+	int pr_argc;			/* initial argument count */
+	uintptr_t pr_argv;		/* address of initial arg vector */
+	uintptr_t pr_envp;		/* address of initial env vector */
+	char pr_dmodel;			/* data model */
+	char pr_pad2[3];
+	taskid_t pr_taskid;		/* task id */
+	dprojid_t pr_projid;		/* project id */
+	int pr_nzomb;			/* number of zombie lwps (Linux: 0) */
+	poolid_t pr_poolid;		/* pool id */
+	zoneid_t pr_zoneid;		/* zone id */
+	id_t pr_contract;		/* process contract */
+	int pr_filler[1];
+	lwpsinfo_t pr_lwp;
+} psinfo_t;
+
+inline char PR_MODEL_ILP32 = 1;
+#pragma D binding "1.0" PR_MODEL_ILP32
+inline char PR_MODEL_LP64 = 2;
+#pragma D binding "1.0" PR_MODEL_LP64
+
+ 
+ 
+inline	int PIDTYPE_PID = 0;
+#pragma D binding "1.0" PIDTYPE_PID
+inline	int PIDTYPE_TGID = 1;
+#pragma D binding "1.0" PIDTYPE_TGID
+inline	int PIDTYPE_PGID = 2;
+#pragma D binding "1.0" PIDTYPE_PGID
+inline	int PIDTYPE_SID = 3;
+#pragma D binding "1.0" PIDTYPE_SID
+
+ 
+ 
+ 
+ 
+ 
+ 
+ 
+#pragma D binding "1.0" translator
+translator psinfo_t < struct task_struct *T > {
+	pr_nlwp = 1;
+	pr_pid = T->tgid;
+	pr_ppid = T->real_parent->tgid;
+	pr_pgid = T->signal->pids[PIDTYPE_PGID]->numbers[0].nr;
+	pr_sid = T->signal->pids[PIDTYPE_SID]->numbers[0].nr;
+	pr_uid = T->cred->uid.val;
+	pr_euid = T->cred->euid.val;
+	pr_gid = T->cred->gid.val;
+	pr_egid = T->cred->egid.val;
+	pr_addr = (uintptr_t)T;
+
+	pr_ttydev = T->signal->tty ? T->signal->tty
+				   : (struct tty_struct *)-1;
+
+	pr_fname = T->comm;
+/*
+	pr_psargs = stringof(get_psinfo(T)->__psinfo(psargs));
+ */
+	pr_wstat = 0;
+/*
+	pr_argc = get_psinfo(T)->__psinfo(argc);
+	pr_argv = (uintptr_t)get_psinfo(T)->__psinfo(argv);
+	pr_envp = (uintptr_t)get_psinfo(T)->__psinfo(envp);
+ */
+
+	pr_dmodel = PR_MODEL_LP64;
+
+	pr_taskid = 0;
+	pr_projid = 0;
+	pr_nzomb = 0;
+	pr_poolid = 0;
+	pr_zoneid = 0;
+	pr_contract = 0;
+};
+
+inline int PR_STOPPED = 0x00000001;
+#pragma D binding "1.0" PR_STOPPED
+inline int PR_ISTOP = 0x00000002;
+#pragma D binding "1.0" PR_ISTOP
+inline int PR_DSTOP = 0x00000004;
+#pragma D binding "1.0" PR_DSTOP
+inline int PR_IDLE = 0x10000000;
+#pragma D binding "1.0" PR_IDLE
+
+inline char SSLEEP = 1;
+#pragma D binding "1.0" SSLEEP
+inline char SRUN = 2;
+#pragma D binding "1.0" SRUN
+inline char SZOMB = 3;
+#pragma D binding "1.0" SZOMB
+inline char SSTOP = 4;
+#pragma D binding "1.0" SSTOP
+inline char SIDL = 5;
+#pragma D binding "1.0" SIDL
+inline char SONPROC = 6;
+#pragma D binding "1.0" SONPROC
+inline char SWAIT = 7;
+#pragma D binding "1.0" SWAIT
+
+/*
+ * Translate from the kernel's task_struct structure to a Solaris proc(4)
+ * lwpsinfo_t.
+ * We do not provide support for pr_nice, pr_oldpri, pr_cpu, or pr_pctcpu.
+ * Also, for the moment, pr_start and pr_time are not supported, but these
+ * could be supported by DTrace in the future using subroutines.
+ */
+#pragma D binding "1.0" translator
+translator lwpsinfo_t < struct task_struct *T > {
+	pr_flag = (T->__state & 0x00000004) ? PR_STOPPED : 0;
+/*
+	pr_flag = ((T->t_state == TS_STOPPED) ? (PR_STOPPED |
+	    ((!(T->t_schedflag & TS_PSTART)) ? PR_ISTOP : 0)) :
+	    ((T->t_proc_flag & TP_PRVSTOP) ? PR_STOPPED | PR_ISTOP : 0)) |
+	    ((T == T->t_procp->p_agenttp) ? PR_AGENT : 0) |
+	    ((!(T->t_proc_flag & TP_TWAIT)) ? PR_DETACH : 0) |
+	    ((T->t_proc_flag & TP_DAEMON) ? PR_DAEMON : 0) |
+	    ((T->t_procp->p_pidflag & CLDNOSIGCHLD) ? PR_NOSIGCHLD : 0) |
+	    ((T->t_procp->p_pidflag & CLDWAITPID) ? PR_WAITPID : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_FORK) ? PR_FORK : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_RUNLCL) ? PR_RLC : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_KILLCL) ? PR_KLC : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_ASYNC) ? PR_ASYNC : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_BPTADJ) ? PR_BPTADJ : 0) |
+	    ((T->t_procp->p_proc_flag & P_PR_PTRACE) ? PR_PTRACE : 0) |
+	    ((T->t_procp->p_flag & SMSACCT) ? PR_MSACCT : 0) |
+	    ((T->t_procp->p_flag & SMSFORK) ? PR_MSFORK : 0) |
+	    ((T->t_procp->p_flag & SVFWAIT) ? PR_VFORKP : 0) |
+	    (((T->t_procp->p_flag & SSYS) ||
+	    (T->t_procp->p_as == &`kas)) ? PR_ISSYS : 0) |
+	    ((T == T->t_cpu->cpu_idle_thread) ? PR_IDLE : 0);
+*/
+
+	pr_lwpid = T->pid;
+	pr_addr = (uintptr_t)T;
+	pr_wchan = NULL;
+	pr_stype = 0;
+
+	pr_state = (T->__state & 0x00000001) ? SSLEEP :
+		   (T->__state & 0x00000002) ? SSLEEP :
+		   (T->__state & 0x00000004) ? SSTOP :
+		   (T->__state & 0x00000008) ? SSTOP :
+		   (T->__state & 0x00000020) ? SZOMB :
+		   (T->__state & 0x00000010) ? SZOMB :
+		   (T->__state & 0x00000080) ? SZOMB :
+		   (T->__state & 0x00000100) ? SWAIT :
+		   (T->__state & 0x00000200) ? SWAIT : SRUN;
+	pr_sname = (T->__state & 0x00000001) ? 'S' :
+		   (T->__state & 0x00000002) ? 'S' :
+		   (T->__state & 0x00000004) ? 'T' :
+		   (T->__state & 0x00000008) ? 'T' :
+		   (T->__state & 0x00000020) ? 'Z' :
+		   (T->__state & 0x00000010) ? 'Z' :
+		   (T->__state & 0x00000080) ? 'Z' :
+		   (T->__state & 0x00000100) ? 'W' :
+		   (T->__state & 0x00000200) ? 'W' : 'R';
+
+	pr_pri = T->prio;
+	pr_name = T->comm;
+	pr_onpro = ((struct thread_info *)T->stack)->cpu;
+};
+
+inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread);
+#pragma D attributes Stable/Stable/Common curpsinfo
+#pragma D binding "1.0" curpsinfo
+
+inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
+#pragma D attributes Stable/Stable/Common curlwpsinfo
+#pragma D binding "1.0" curlwpsinfo
+
+inline string cwd = d_path(&(curthread->fs->pwd));
+#pragma D attributes Stable/Stable/Common cwd
+#pragma D binding "1.0" cwd
+
+inline string root = d_path(&(curthread->fs->root));
+#pragma D attributes Stable/Stable/Common root
+#pragma D binding "1.0" root
+
+inline int CLD_EXITED = 1;
+#pragma D binding "1.0" CLD_EXITED
+inline int CLD_KILLED = 2;
+#pragma D binding "1.0" CLD_KILLED
+inline int CLD_DUMPED = 3;
+#pragma D binding "1.0" CLD_DUMPED
+inline int CLD_TRAPPED = 4;
+#pragma D binding "1.0" CLD_TRAPPED
+inline int CLD_STOPPED = 5;
+#pragma D binding "1.0" CLD_STOPPED
+inline int CLD_CONTINUED = 6;
+#pragma D binding "1.0" CLD_CONTINUED
+
+/*
+ * Below we provide some inline definitions to simplify converting from
+ * a struct pid * to a pid_t.  structpid2pid is a DTrace-ized version of
+ * pid_vnr().
+ */
+ /*
+inline	struct pid_namespace *pid_namespace[struct pid *p] = p != NULL ?
+	p->numbers[p->level].ns : NULL;
+
+inline	int pid_namespace_level[struct pid *p] = p != NULL && pid_namespace[p] ?
+	pid_namespace[p]->level : 0;
+
+m4_dnl 4.19 and above use thread_pid for this.
+define_for_kernel([[__task_pid]], [[ m4_dnl
+	(m4_kver(4, 19, 0), [[task->thread_pid]])]], m4_dnl
+	[[task->pids[PIDTYPE_PID].pid]]) m4_dnl
+
+inline	struct pid *task_pid[struct task_struct *task] =
+	task != NULL ? __task_pid : NULL;
+
+inline	int current_namespace_level = pid_namespace_level[task_pid[curthread]];
+
+inline	pid_t structpid2pid[struct pid *p] =
+	p != NULL && current_namespace_level <= p->level &&
+	((struct upid *)&(p->numbers[current_namespace_level]))->ns ==
+	pid_namespace[task_pid[curthread]] ?
+	((struct upid *)&(p->numbers[current_namespace_level]))->nr : 0;
+*/
diff --git a/dlibs/x86_64/6.10.0/regs.d b/dlibs/x86_64/6.10.0/regs.d
new file mode 100644
index 0000000000000..12ce3ac9a1507
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/regs.d
@@ -0,0 +1,94 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+inline int R_TRAPNO = 25;
+#pragma D binding "1.0" R_TRAPNO
+inline int R_GS = 24;
+#pragma D binding "1.0" R_GS
+inline int R_FS = 23;
+#pragma D binding "1.0" R_FS
+inline int R_ES = 22;
+#pragma D binding "1.0" R_ES
+inline int R_DS = 21;
+#pragma D binding "1.0" R_DS
+
+inline int R_SS = 20;
+#pragma D binding "1.0" R_SS
+inline int R_RSP = 19;
+#pragma D binding "1.0" R_RSP
+inline int R_RFL = 18;
+#pragma D binding "1.0" R_RFL
+inline int R_CS = 17;
+#pragma D binding "1.0" R_CS
+inline int R_RIP = 16;
+#pragma D binding "1.0" R_RIP
+inline int R_ERR = 15;
+#pragma D binding "1.0" R_ERR
+inline int R_RDI = 14;
+#pragma D binding "1.0" R_RDI
+inline int R_RSI = 13;
+#pragma D binding "1.0" R_RSI
+inline int R_RDX = 12;
+#pragma D binding "1.0" R_RDX
+inline int R_RCX = 11;
+#pragma D binding "1.0" R_RCX
+inline int R_RAX = 10;
+#pragma D binding "1.0" R_RAX
+inline int R_R8 = 9;
+#pragma D binding "1.0" R_R8
+inline int R_R9 = 8;
+#pragma D binding "1.0" R_R9
+inline int R_R10 = 7;
+#pragma D binding "1.0" R_R10
+inline int R_R11 = 6;
+#pragma D binding "1.0" R_R11
+inline int R_RBX = 5;
+#pragma D binding "1.0" R_RBX
+inline int R_RBP = 4;
+#pragma D binding "1.0" R_RBP
+inline int R_R12 = 3;
+#pragma D binding "1.0" R_R12
+inline int R_R13 = 2;
+#pragma D binding "1.0" R_R13
+inline int R_R14 = 1;
+#pragma D binding "1.0" R_R14
+inline int R_R15 = 0;
+#pragma D binding "1.0" R_R15
+
+inline int R_EBX = R_RBX;
+#pragma D binding "1.0" R_EBX
+inline int R_ECX = R_RCX;
+#pragma D binding "1.0" R_ECX
+inline int R_EDX = R_RDX;
+#pragma D binding "1.0" R_EDX
+inline int R_ESI = R_RSI;
+#pragma D binding "1.0" R_ESI
+inline int R_EDI = R_RDI;
+#pragma D binding "1.0" R_EDI
+inline int R_EBP = R_RBP;
+#pragma D binding "1.0" R_EBP
+inline int R_EAX = R_RAX;
+#pragma D binding "1.0" R_EAX
+inline int R_EIP = R_RIP;
+#pragma D binding "1.0" R_EIP
+inline int R_EFL = R_RFL;
+#pragma D binding "1.0" R_EFL
+inline int R_ESP = R_RSP;
+#pragma D binding "1.0" R_ESP
+
+inline int R_PC = R_EIP;
+#pragma D binding "1.0" R_PC
+inline int R_FP = R_EBP;
+#pragma D binding "1.0" R_FP
+inline int R_SP = R_ESP;
+#pragma D binding "1.0" R_SP
+inline int R_PS = R_EFL;
+#pragma D binding "1.0" R_PS
+inline int R_R0 = R_EAX;
+#pragma D binding "1.0" R_R0
+inline int R_R1 = R_EBX;
+#pragma D binding "1.0" R_R1
diff --git a/dlibs/x86_64/6.10.0/sched.d b/dlibs/x86_64/6.10.0/sched.d
new file mode 100644
index 0000000000000..271d84e057cde
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/sched.d
@@ -0,0 +1,38 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+
+typedef id_t		processorid_t;
+typedef id_t		psetid_t;
+typedef id_t		chipid_t;
+typedef id_t		lgrp_id_t;
+
+typedef struct cpuinfo {
+	processorid_t	cpu_id;
+	psetid_t	cpu_pset;
+	chipid_t	cpu_chip;
+	lgrp_id_t	cpu_lgrp;
+} cpuinfo_t;
+
+typedef cpuinfo_t	*cpuinfo_t_p;
+
+inline processorid_t cpu = curcpu->cpu_id;
+#pragma D attributes Stable/Stable/Common cpu
+#pragma D binding "1.0" cpu
+
+inline psetid_t pset = curcpu->cpu_pset;
+#pragma D attributes Stable/Stable/Common pset
+#pragma D binding "1.0" pset
+
+inline chipid_t chip = curcpu->cpu_chip;
+#pragma D attributes Stable/Stable/Common chip
+#pragma D binding "1.0" chip
+
+inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
+#pragma D attributes Stable/Stable/Common lgrp
+#pragma D binding "1.0" lgrp
diff --git a/dlibs/x86_64/6.10.0/signal.d b/dlibs/x86_64/6.10.0/signal.d
new file mode 100644
index 0000000000000..c72dfd4cbc13f
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/signal.d
@@ -0,0 +1,108 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
+ * Use is subject to license terms.
+ *
+ */
+inline int SIGSYS = 31;
+#pragma D binding "1.0" SIGSYS
+
+inline int SIGTERM = 15;
+#pragma D binding "1.0" SIGTERM
+
+inline int SIGTSTP = 20;
+#pragma D binding "1.0" SIGTSTP
+
+inline int SIGVTALRM = 26;
+#pragma D binding "1.0" SIGVTALRM
+
+inline int SIGBUS = 7;
+#pragma D binding "1.0" SIGBUS
+
+inline int SIGPIPE = 13;
+#pragma D binding "1.0" SIGPIPE
+
+inline int SIGSTKFLT = 16;
+#pragma D binding "1.0" SIGSTKFLT
+
+inline int SIGTRAP = 5;
+#pragma D binding "1.0" SIGTRAP
+
+inline int SIGHUP = 1;
+#pragma D binding "1.0" SIGHUP
+
+inline int SIGFPE = 8;
+#pragma D binding "1.0" SIGFPE
+
+inline int SIGURG = 23;
+#pragma D binding "1.0" SIGURG
+
+inline int SIGIO = 29;
+#pragma D binding "1.0" SIGIO
+
+inline int SIGKILL = 9;
+#pragma D binding "1.0" SIGKILL
+
+inline int SIGWINCH = 28;
+#pragma D binding "1.0" SIGWINCH
+
+inline int SIGXFSZ = 25;
+#pragma D binding "1.0" SIGXFSZ
+
+inline int SIGINT = 2;
+#pragma D binding "1.0" SIGINT
+
+inline int SIGTTOU = 22;
+#pragma D binding "1.0" SIGTTOU
+
+inline int SIGTTIN = 21;
+#pragma D binding "1.0" SIGTTIN
+
+inline int SIGCHLD = 17;
+#pragma D binding "1.0" SIGCHLD
+
+inline int SIGIOT = 6;
+#pragma D binding "1.0" SIGIOT
+
+inline int SIGCONT = 18;
+#pragma D binding "1.0" SIGCONT
+
+inline int SIGQUIT = 3;
+#pragma D binding "1.0" SIGQUIT
+
+inline int SIGABRT = 6;
+#pragma D binding "1.0" SIGABRT
+
+inline int SIGPROF = 27;
+#pragma D binding "1.0" SIGPROF
+
+inline int SIGXCPU = 24;
+#pragma D binding "1.0" SIGXCPU
+
+inline int SIGSTOP = 19;
+#pragma D binding "1.0" SIGSTOP
+
+inline int SIGPWR = 30;
+#pragma D binding "1.0" SIGPWR
+
+inline int SIGILL = 4;
+#pragma D binding "1.0" SIGILL
+
+inline int SIGUSR1 = 10;
+#pragma D binding "1.0" SIGUSR1
+
+inline int SIGPOLL = 29;
+#pragma D binding "1.0" SIGPOLL
+
+inline int SIGCLD = 17;
+#pragma D binding "1.0" SIGCLD
+
+inline int SIGSEGV = 11;
+#pragma D binding "1.0" SIGSEGV
+
+inline int SIGUSR2 = 12;
+#pragma D binding "1.0" SIGUSR2
+
+inline int SIGALRM = 14;
+#pragma D binding "1.0" SIGALRM
+
diff --git a/dlibs/x86_64/6.10.0/tcp.d b/dlibs/x86_64/6.10.0/tcp.d
new file mode 100644
index 0000000000000..54e310cb4c6ed
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/tcp.d
@@ -0,0 +1,231 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library net.d
+#pragma D depends_on provider ip
+#pragma D depends_on provider tcp
+
+inline int TH_FIN =	0x01;
+inline int TH_SYN =	0x02;
+inline int TH_RST =	0x04;
+inline int TH_PSH =	0x08;
+inline int TH_ACK =	0x10;
+inline int TH_URG =	0x20;
+inline int TH_ECE =	0x40;
+inline int TH_CWR =	0x80;
+
+inline int TCP_STATE_IDLE = 		0x00;
+inline int TCP_STATE_ESTABLISHED =	0x01;
+inline int TCP_STATE_SYN_SENT =		0x02;
+inline int TCP_STATE_SYN_RECEIVED =	0x03;
+inline int TCP_STATE_FIN_WAIT_1 =	0x04;
+inline int TCP_STATE_FIN_WAIT_2 =	0x05;
+inline int TCP_STATE_TIME_WAIT =	0x06;
+inline int TCP_STATE_CLOSED =		0x07;
+inline int TCP_STATE_CLOSE_WAIT =	0x08;
+inline int TCP_STATE_LAST_ACK =		0x09;
+inline int TCP_STATE_LISTEN =		0x0a;
+inline int TCP_STATE_CLOSING =		0x0b;
+
+/*
+ * Convert a TCP state value to a string.
+ */
+inline string tcp_state_string[int state] =
+	state == TCP_STATE_CLOSED ? "state-closed" :
+	state == TCP_STATE_IDLE ? "state-idle" :
+	state == TCP_STATE_LISTEN ? "state-listen" :
+	state == TCP_STATE_SYN_SENT ? "state-syn-sent" :
+	state == TCP_STATE_SYN_RECEIVED ? "state-syn-received" :
+	state == TCP_STATE_ESTABLISHED ? "state-established" :
+	state == TCP_STATE_CLOSE_WAIT ? "state-close-wait" :
+	state == TCP_STATE_FIN_WAIT_1 ? "state-fin-wait-1" :
+	state == TCP_STATE_CLOSING ? "state-closing" :
+	state == TCP_STATE_LAST_ACK ? "state-last-ack" :
+	state == TCP_STATE_FIN_WAIT_2 ? "state-fin-wait-2" :
+	state == TCP_STATE_TIME_WAIT ? "state-time-wait" :
+	"<unknown>";
+#pragma D binding "1.6.3" tcp_state_string
+
+/*
+ * tcpinfo is the TCP header fields.
+ */
+typedef struct tcpinfo {
+	uint16_t tcp_sport;		/* source port */
+	uint16_t tcp_dport;		/* destination port */
+	uint32_t tcp_seq;		/* sequence number */
+	uint32_t tcp_ack;		/* acknowledgment number */
+	uint8_t tcp_offset;		/* data offset, in bytes */
+	uint8_t tcp_flags;		/* flags */
+	uint16_t tcp_window;		/* window size */
+	uint16_t tcp_checksum;		/* checksum */
+	uint16_t tcp_urgent;		/* urgent data pointer */
+	uintptr_t tcp_hdr;		/* raw TCP header */
+} tcpinfo_t;
+
+/*
+ * tcpsinfo contains stable TCP details from tcp_t.
+ */
+typedef struct tcpsinfo {
+	uintptr_t tcps_addr;
+	int tcps_local;			/* is delivered locally, boolean */
+	uint16_t tcps_lport;		/* local port */
+	uint16_t tcps_rport;		/* remote port */
+	string tcps_laddr;		/* local address, as a string */
+	string tcps_raddr;		/* remote address, as a string */
+	int tcps_state;			/* TCP state */
+	uint32_t tcps_iss;		/* Initial sequence # sent */
+	uint32_t tcps_suna;		/* sequence # sent but unacked */
+	uint32_t tcps_snxt;		/* next sequence # to send */
+	uint32_t tcps_rnxt;		/* next sequence # expected */
+	uint32_t tcps_swnd;		/* send window size */
+	int32_t tcps_snd_ws;		/* send window scaling */
+	uint32_t tcps_rwnd;		/* receive window size */
+	int32_t tcps_rcv_ws;		/* receive window scaling */
+	uint32_t tcps_cwnd;		/* congestion window */
+	uint32_t tcps_cwnd_ssthresh;	/* threshold for congestion avoidance */
+	uint32_t tcps_sack_snxt;	/* next SACK seq # for retransmission */
+	uint32_t tcps_rto;		/* round-trip timeout, msec */
+	uint32_t tcps_mss;		/* max segment size */
+	int tcps_retransmit;		/* retransmit send event, boolean */
+	uint32_t tcps_rtt;		/* smoothed avg round-trip time, msec */
+	uint32_t tcps_rtt_sd;		/* standard deviation of RTT */
+	uint32_t tcps_irs;		/* Initial recv sequence # */
+} tcpsinfo_t;
+
+/*
+ * tcplsinfo provides the old tcp state for state changes.
+ */
+typedef struct tcplsinfo {
+	int tcps_state;		/* previous TCP state */
+} tcplsinfo_t;
+
+#pragma D binding "1.6.3" translator
+translator tcpinfo_t < struct tcphdr *T > {
+	tcp_sport = T ? ntohs(T->source) : 0;
+	tcp_dport = T ? ntohs(T->dest) : 0;
+	tcp_seq = T ? ntohl(T->seq) : 0;
+	tcp_ack = T ? ntohl(T->ack_seq) : 0;
+	tcp_offset = T ? (*(uint8_t *)(T + 12) & 0xf0) >> 2 : 0;
+	tcp_flags = T ? *(uint8_t *)(T + 13) : 0;
+	tcp_window = T ? ntohs(T->window) : 0;
+	tcp_checksum = T ? ntohs(T->check) : 0;
+	tcp_urgent = T ? ntohs(T->urg_ptr) : 0;
+	tcp_hdr = (uintptr_t)T;
+};
+
+/*
+ * In the main we simply translate from the "struct [tcp_]sock *" to
+ * a tcpsinfo_t *.  However there are a few exceptions:
+ *
+ * - tcps_state is always derived from arg6.  The reason is that in some
+ * state transitions sock->sk_state does not reflect the actual TCP
+ * connection state.  For example the TIME_WAIT state is handled in
+ * Linux by creating a separate timewait socket and the state of the
+ * original socket is CLOSED.  In some other cases we also need to
+ * instrument state transition prior to the update of sk_state.  To do
+ * all of this we rely on arg6.
+ * - we sometimes need to retrieve local/remote port/address settings from
+ * TCP and IP headers directly, for example prior to the address/port
+ * being committed to the socket.  To do this effectively we need to know
+ * if the packet data is inbound (in which case the local IP/port are the
+ * destination) or outbound (in which case the local IP/port are the source).
+ * arg7 is set to 0 for outbound traffic and 1 for inbound so we use these
+ * to reconstruct the address/port info where necessary.  arg2 used for IP
+ * information while arg4 contains the TCP header, so it is used for port data.
+ * NET_PROBE_INBOUND is defined as 1, NET_PROBE_OUTBOUND as 0 in net.d.
+ */
+#pragma D binding "1.6.3" translator
+translator tcpsinfo_t < struct tcp_sock *T > {
+	tcps_addr = (uintptr_t)T;
+	tcps_local =
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
+	    (((struct sock *)T)->__sk_common.skc_rcv_saddr ==
+	    ((struct sock *)T)->__sk_common.skc_daddr) :
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
+	    (((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[0]
+	    ==
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[0] &&
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[1]
+            ==
+            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[1] &&
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[2]
+            ==
+            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[2] &&
+	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[3])
+	    : 0;
+	tcps_lport = (T && ((struct inet_sock *)T)->inet_sport != 0) ?
+	    ntohs(((struct inet_sock *)T)->inet_sport) :
+	    (T && ((struct inet_sock *)T)->inet_sport == 0) ?
+	    ntohs(((struct sock *)T)->__sk_common.skc_num) :
+	    arg4 != NULL ?
+	    ntohs(arg7 == NET_PROBE_INBOUND ?
+	    ((struct tcphdr *)arg4)->dest : ((struct tcphdr *)arg4)->source) :
+	    0;
+	tcps_rport = T && ((struct sock *)T)->__sk_common.skc_dport != 0 ?
+	    ntohs(((struct sock *)T)->__sk_common.skc_dport) :
+	    arg4 != NULL ?
+	    ntohs(arg7 == NET_PROBE_INBOUND ?
+            ((struct tcphdr *)arg4)->source : ((struct tcphdr *)arg4)->dest) :
+	    0;
+	tcps_laddr =
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
+	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_rcv_saddr) :
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
+	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr) :
+	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct iphdr *)arg2)->daddr : &((struct iphdr *)arg2)->saddr) :
+	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct ipv6hdr *)arg2)->daddr :
+	    &((struct ipv6hdr *)arg2)->saddr) :
+	    "<unknown>";
+	tcps_raddr =
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
+	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_daddr) :
+	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
+	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_daddr) :
+	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
+	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
+	    &((struct iphdr *)arg2)->saddr : &((struct iphdr *)arg2)->daddr) :
+	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
+	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
+	    &((struct ipv6hdr *)arg2)->saddr :
+	    &((struct ipv6hdr *)arg2)->daddr) :
+	    "<unknown>";
+	tcps_state = arg6;
+	tcps_iss = T ?
+	    T->snd_una - (uint32_t)T->bytes_acked : 0;
+	tcps_suna = T ? T->snd_una : 0;
+	tcps_snxt = T ? T->snd_nxt : 0;
+	tcps_rnxt = T ? T->rcv_nxt : 0;
+	tcps_swnd = T ? T->snd_wnd : 0;
+	tcps_snd_ws = T ? T->rx_opt.snd_wscale : 0;
+	tcps_rwnd = T ? T->rcv_wnd : 0;
+	tcps_rcv_ws = T ? T->rx_opt.rcv_wscale : 0;
+	tcps_cwnd = T ? T->snd_cwnd : 0;
+	tcps_cwnd_ssthresh = T ? T->snd_ssthresh : 0;
+	tcps_sack_snxt = (T && T->sacked_out == 0) ? T->snd_una :
+	    (T && T->highest_sack == NULL) ? T->snd_nxt :
+	    (T && T->highest_sack != NULL) ?
+	    ((struct tcp_skb_cb *)&((T->highest_sack->cb[0])))->seq : 0;
+	tcps_rto = T ? T->inet_conn.icsk_rto : 0;
+	tcps_mss = T ? T->mss_cache : 0;
+	tcps_retransmit = T && arg0 ?
+	    (((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq
+	    < T->snd_nxt - 1) : 0;
+	tcps_rtt = T ? (T->srtt_us >> 3)/1000 : 0;
+	tcps_rtt_sd = T ? (T->mdev_us >> 2)/1000 : 0;
+	tcps_irs = T && T->bytes_received > 0 ?
+	    T->rcv_nxt - (uint32_t)T->bytes_received : 0;
+};
+
+#pragma D binding "1.6.3" translator
+translator tcplsinfo_t < int I > {
+	tcps_state = I;
+};
diff --git a/dlibs/x86_64/6.10.0/udp.d b/dlibs/x86_64/6.10.0/udp.d
new file mode 100644
index 0000000000000..0e44ed6480415
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/udp.d
@@ -0,0 +1,71 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+#pragma D depends_on module vmlinux
+#pragma D depends_on library net.d
+#pragma D depends_on provider udp
+
+/*
+ * udpinfo is the UDP header fields.
+ */
+typedef struct udpinfo {
+	uint16_t udp_sport;		/* source port */
+	uint16_t udp_dport;		/* destination port */
+	uint16_t udp_length;		/* total length */
+	uint16_t udp_checksum;          /* headers + data checksum */
+	struct udphdr *udp_hdr;		/* raw UDP header */
+} udpinfo_t;
+
+/*
+ * udpsinfo contains stable UDP details from udp_t.
+ */
+typedef struct udpsinfo {
+	uintptr_t udps_addr;
+	uint16_t udps_lport;		/* local port */
+	uint16_t udps_rport;		/* remote port */
+	string udps_laddr;		/* local address, as a string */
+	string udps_raddr;		/* remote address, as a string */
+} udpsinfo_t;
+
+#pragma D binding "1.6.3" translator
+translator udpinfo_t < struct udphdr *U > {
+	udp_sport = ntohs(U->source);
+	udp_dport = ntohs(U->dest);
+	udp_length = ntohs(U->len);
+	udp_checksum = ntohs(U->check);
+	udp_hdr = U;
+};
+
+#pragma D binding "1.6.3" translator
+translator udpsinfo_t < struct udp_sock *S > {
+	/*
+	 * We source udp info from other args but retain the sock arg here
+	 * as it may be used in the future.
+	 */
+	udps_addr = (uintptr_t)S;
+	udps_lport = arg4 ?
+	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->source) :
+	    ntohs(((struct udphdr *)arg4)->dest)) : 0;
+	udps_rport = arg4 ?
+	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->dest) :
+	    ntohs(((struct udphdr *)arg4)->source)) : 0;
+	udps_laddr = arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
+            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->saddr :
+	    &((struct iphdr *)arg2)->daddr) :
+	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
+	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->saddr :
+	    &((struct ipv6hdr *)arg2)->daddr) :
+	    "<unknown>";
+	udps_raddr =
+	    arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
+            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->daddr :
+	    &((struct iphdr *)arg2)->saddr) :
+	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
+	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->daddr :
+	    &((struct ipv6hdr *)arg2)->saddr) :
+	    "<unknown>";
+};
diff --git a/dlibs/x86_64/6.10.0/unistd.d b/dlibs/x86_64/6.10.0/unistd.d
new file mode 100644
index 0000000000000..c38bbed4bc85e
--- /dev/null
+++ b/dlibs/x86_64/6.10.0/unistd.d
@@ -0,0 +1,36 @@
+/*
+ * Oracle Linux DTrace.
+ * Copyright (c) 2007, Oracle and/or its affiliates. All rights reserved.
+ * Licensed under the Universal Permissive License v 1.0 as shown at
+ * http://oss.oracle.com/licenses/upl.
+ */
+
+inline int DTRACEFLT_UNKNOWN = 0;	/* Unknown fault */
+#pragma D binding "1.0" DTRACEFLT_UNKNOWN
+
+inline int DTRACEFLT_BADADDR = 1;	/* Bad address */
+#pragma D binding "1.0" DTRACEFLT_BADADDR
+
+inline int DTRACEFLT_BADALIGN = 2;	/* Bad alignment */
+#pragma D binding "1.0" DTRACEFLT_BADALIGN
+
+inline int DTRACEFLT_ILLOP = 3;		/* Illegal operation */
+#pragma D binding "1.0" DTRACEFLT_ILLOP
+
+inline int DTRACEFLT_DIVZERO = 4;	/* Divide-by-zero */
+#pragma D binding "1.0" DTRACEFLT_DIVZERO
+
+inline int DTRACEFLT_NOSCRATCH = 5;	/* Out of scratch space */
+#pragma D binding "1.0" DTRACEFLT_NOSCRATCH
+
+inline int DTRACEFLT_KPRIV = 6;		/* Illegal kernel access */
+#pragma D binding "1.0" DTRACEFLT_KPRIV
+
+inline int DTRACEFLT_UPRIV = 7;		/* Illegal user access */
+#pragma D binding "1.0" DTRACEFLT_UPRIV
+
+inline int DTRACEFLT_TUPOFLOW = 8;	/* Tuple stack overflow */
+#pragma D binding "1.0" DTRACEFLT_TUPOFLOW
+
+inline int DTRACEFLT_BADSTACK = 9;	/* Bad stack */
+#pragma D binding "1.4.1" DTRACEFLT_BADSTACK
-- 
2.45.1.275.g567cb0950c


^ permalink raw reply related	[flat|nested] 11+ messages in thread

* Re: [DTrace-devel] [PATCH v2 2/2] dlibs: pregenerated translators for 6.10
  2024-06-07 18:41 ` [PATCH v2 2/2] dlibs: pregenerated translators for 6.10 Nick Alcock
@ 2024-06-13 12:22   ` Alan Maguire
  2024-06-14 12:25     ` Alan Maguire
  0 siblings, 1 reply; 11+ messages in thread
From: Alan Maguire @ 2024-06-13 12:22 UTC (permalink / raw)
  To: Nick Alcock, dtrace, dtrace-devel

On 07/06/2024 19:41, Nick Alcock via DTrace-devel wrote:
> All differences from the previous translators (6.1) are no-effect
> ordering changes other than those one would expect from the changes to
> the .d files.
> 
> Signed-off-by: Nick Alcock <nick.alcock@oracle.com>


I hit the issue with the disappearing bd_partno field in io.d on 6.10 so
this is great!

nit: I guess defining

inline int dev_partno[struct block_device *B] = B->__bd_flags.counter &
0xff;

...might reduce complexity of some of the statements in io.d


Reviewed-by: Alan Maguire <alan.maguire@oracle.com>

> ---
>  dlibs/aarch64/6.10/errno.d     | 275 ++++++++++++++++++++++++++
>  dlibs/aarch64/6.10/io.d        | 234 ++++++++++++++++++++++
>  dlibs/aarch64/6.10/ip.d        | 341 +++++++++++++++++++++++++++++++++
>  dlibs/aarch64/6.10/lockstat.d  |  14 ++
>  dlibs/aarch64/6.10/net.d       |  33 ++++
>  dlibs/aarch64/6.10/pcap.d      |  35 ++++
>  dlibs/aarch64/6.10/procfs.d    | 306 +++++++++++++++++++++++++++++
>  dlibs/aarch64/6.10/regs.d      |  78 ++++++++
>  dlibs/aarch64/6.10/sched.d     |  38 ++++
>  dlibs/aarch64/6.10/signal.d    | 108 +++++++++++
>  dlibs/aarch64/6.10/tcp.d       | 231 ++++++++++++++++++++++
>  dlibs/aarch64/6.10/udp.d       |  71 +++++++
>  dlibs/aarch64/6.10/unistd.d    |  36 ++++
>  dlibs/x86_64/6.10.0/errno.d    | 275 ++++++++++++++++++++++++++
>  dlibs/x86_64/6.10.0/io.d       | 235 +++++++++++++++++++++++
>  dlibs/x86_64/6.10.0/ip.d       | 341 +++++++++++++++++++++++++++++++++
>  dlibs/x86_64/6.10.0/lockstat.d |  14 ++
>  dlibs/x86_64/6.10.0/net.d      |  33 ++++
>  dlibs/x86_64/6.10.0/pcap.d     |  35 ++++
>  dlibs/x86_64/6.10.0/procfs.d   | 306 +++++++++++++++++++++++++++++
>  dlibs/x86_64/6.10.0/regs.d     |  94 +++++++++
>  dlibs/x86_64/6.10.0/sched.d    |  38 ++++
>  dlibs/x86_64/6.10.0/signal.d   | 108 +++++++++++
>  dlibs/x86_64/6.10.0/tcp.d      | 231 ++++++++++++++++++++++
>  dlibs/x86_64/6.10.0/udp.d      |  71 +++++++
>  dlibs/x86_64/6.10.0/unistd.d   |  36 ++++
>  26 files changed, 3617 insertions(+)
>  create mode 100644 dlibs/aarch64/6.10/errno.d
>  create mode 100644 dlibs/aarch64/6.10/io.d
>  create mode 100644 dlibs/aarch64/6.10/ip.d
>  create mode 100644 dlibs/aarch64/6.10/lockstat.d
>  create mode 100644 dlibs/aarch64/6.10/net.d
>  create mode 100644 dlibs/aarch64/6.10/pcap.d
>  create mode 100644 dlibs/aarch64/6.10/procfs.d
>  create mode 100644 dlibs/aarch64/6.10/regs.d
>  create mode 100644 dlibs/aarch64/6.10/sched.d
>  create mode 100644 dlibs/aarch64/6.10/signal.d
>  create mode 100644 dlibs/aarch64/6.10/tcp.d
>  create mode 100644 dlibs/aarch64/6.10/udp.d
>  create mode 100644 dlibs/aarch64/6.10/unistd.d
>  create mode 100644 dlibs/x86_64/6.10.0/errno.d
>  create mode 100644 dlibs/x86_64/6.10.0/io.d
>  create mode 100644 dlibs/x86_64/6.10.0/ip.d
>  create mode 100644 dlibs/x86_64/6.10.0/lockstat.d
>  create mode 100644 dlibs/x86_64/6.10.0/net.d
>  create mode 100644 dlibs/x86_64/6.10.0/pcap.d
>  create mode 100644 dlibs/x86_64/6.10.0/procfs.d
>  create mode 100644 dlibs/x86_64/6.10.0/regs.d
>  create mode 100644 dlibs/x86_64/6.10.0/sched.d
>  create mode 100644 dlibs/x86_64/6.10.0/signal.d
>  create mode 100644 dlibs/x86_64/6.10.0/tcp.d
>  create mode 100644 dlibs/x86_64/6.10.0/udp.d
>  create mode 100644 dlibs/x86_64/6.10.0/unistd.d
> 
> diff --git a/dlibs/aarch64/6.10/errno.d b/dlibs/aarch64/6.10/errno.d
> new file mode 100644
> index 0000000000000..f54fafe1861cc
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/errno.d
> @@ -0,0 +1,275 @@
> +
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
> + * Use is subject to license terms.
> + */
> +
> +inline int EPERM = 1;
> +#pragma D binding "1.0" EPERM
> +inline int ENOENT = 2;
> +#pragma D binding "1.0" ENOENT
> +inline int ESRCH = 3;
> +#pragma D binding "1.0" ESRCH
> +inline int EINTR = 4;
> +#pragma D binding "1.0" EINTR
> +inline int EIO = 5;
> +#pragma D binding "1.0" EIO
> +inline int ENXIO = 6;
> +#pragma D binding "1.0" ENXIO
> +inline int E2BIG = 7;
> +#pragma D binding "1.0" E2BIG
> +inline int ENOEXEC = 8;
> +#pragma D binding "1.0" ENOEXEC
> +inline int EBADF = 9;
> +#pragma D binding "1.0" EBADF
> +inline int ECHILD = 10;
> +#pragma D binding "1.0" ECHILD
> +inline int EAGAIN = 11;
> +#pragma D binding "1.0" EAGAIN
> +inline int ENOMEM = 12;
> +#pragma D binding "1.0" ENOMEM
> +inline int EACCES = 13;
> +#pragma D binding "1.0" EACCES
> +inline int EFAULT = 14;
> +#pragma D binding "1.0" EFAULT
> +inline int ENOTBLK = 15;
> +#pragma D binding "1.0" ENOTBLK
> +inline int EBUSY = 16;
> +#pragma D binding "1.0" EBUSY
> +inline int EEXIST = 17;
> +#pragma D binding "1.0" EEXIST
> +inline int EXDEV = 18;
> +#pragma D binding "1.0" EXDEV
> +inline int ENODEV = 19;
> +#pragma D binding "1.0" ENODEV
> +inline int ENOTDIR = 20;
> +#pragma D binding "1.0" ENOTDIR
> +inline int EISDIR = 21;
> +#pragma D binding "1.0" EISDIR
> +inline int EINVAL = 22;
> +#pragma D binding "1.0" EINVAL
> +inline int ENFILE = 23;
> +#pragma D binding "1.0" ENFILE
> +inline int EMFILE = 24;
> +#pragma D binding "1.0" EMFILE
> +inline int ENOTTY = 25;
> +#pragma D binding "1.0" ENOTTY
> +inline int ETXTBSY = 26;
> +#pragma D binding "1.0" ETXTBSY
> +inline int EFBIG = 27;
> +#pragma D binding "1.0" EFBIG
> +inline int ENOSPC = 28;
> +#pragma D binding "1.0" ENOSPC
> +inline int ESPIPE = 29;
> +#pragma D binding "1.0" ESPIPE
> +inline int EROFS = 30;
> +#pragma D binding "1.0" EROFS
> +inline int EMLINK = 31;
> +#pragma D binding "1.0" EMLINK
> +inline int EPIPE = 32;
> +#pragma D binding "1.0" EPIPE
> +inline int EDOM = 33;
> +#pragma D binding "1.0" EDOM
> +inline int ERANGE = 34;
> +#pragma D binding "1.0" ERANGE
> +inline int EDEADLK = 35;
> +#pragma D binding "1.0" EDEADLK
> +inline int ENAMETOOLONG = 36;
> +#pragma D binding "1.0" ENAMETOOLONG
> +inline int ENOLCK = 37;
> +#pragma D binding "1.0" ENOLCK
> +inline int ENOSYS = 38;
> +#pragma D binding "1.0" ENOSYS
> +inline int ENOTEMPTY = 39;
> +#pragma D binding "1.0" ENOTEMPTY
> +inline int ELOOP = 40;
> +#pragma D binding "1.0" ELOOP
> +inline int EWOULDBLOCK = 11;
> +#pragma D binding "1.0" EWOULDBLOCK
> +inline int ENOMSG = 42;
> +#pragma D binding "1.0" ENOMSG
> +inline int EIDRM = 43;
> +#pragma D binding "1.0" EIDRM
> +inline int ECHRNG = 44;
> +#pragma D binding "1.0" ECHRNG
> +inline int EL2NSYNC = 45;
> +#pragma D binding "1.0" EL2NSYNC
> +inline int EL3HLT = 46;
> +#pragma D binding "1.0" EL3HLT
> +inline int EL3RST = 47;
> +#pragma D binding "1.0" EL3RST
> +inline int ELNRNG = 48;
> +#pragma D binding "1.0" ELNRNG
> +inline int EUNATCH = 49;
> +#pragma D binding "1.0" EUNATCH
> +inline int ENOCSI = 50;
> +#pragma D binding "1.0" ENOCSI
> +inline int EL2HLT = 51;
> +#pragma D binding "1.0" EL2HLT
> +inline int EBADE = 52;
> +#pragma D binding "1.0" EBADE
> +inline int EBADR = 53;
> +#pragma D binding "1.0" EBADR
> +inline int EXFULL = 54;
> +#pragma D binding "1.0" EXFULL
> +inline int ENOANO = 55;
> +#pragma D binding "1.0" ENOANO
> +inline int EBADRQC = 56;
> +#pragma D binding "1.0" EBADRQC
> +inline int EBADSLT = 57;
> +#pragma D binding "1.0" EBADSLT
> +inline int EDEADLOCK = 35;
> +#pragma D binding "1.0" EDEADLOCK
> +inline int EBFONT = 59;
> +#pragma D binding "1.0" EBFONT
> +inline int ENOSTR = 60;
> +#pragma D binding "1.0" ENOSTR
> +inline int ENODATA = 61;
> +#pragma D binding "1.0" ENODATA
> +inline int ETIME = 62;
> +#pragma D binding "1.0" ETIME
> +inline int ENOSR = 63;
> +#pragma D binding "1.0" ENOSR
> +inline int ENONET = 64;
> +#pragma D binding "1.0" ENONET
> +inline int ENOPKG = 65;
> +#pragma D binding "1.0" ENOPKG
> +inline int EREMOTE = 66;
> +#pragma D binding "1.0" EREMOTE
> +inline int ENOLINK = 67;
> +#pragma D binding "1.0" ENOLINK
> +inline int EADV = 68;
> +#pragma D binding "1.0" EADV
> +inline int ESRMNT = 69;
> +#pragma D binding "1.0" ESRMNT
> +inline int ECOMM = 70;
> +#pragma D binding "1.0" ECOMM
> +inline int EPROTO = 71;
> +#pragma D binding "1.0" EPROTO
> +inline int EMULTIHOP = 72;
> +#pragma D binding "1.0" EMULTIHOP
> +inline int EDOTDOT = 73;
> +#pragma D binding "1.0" EDOTDOT
> +inline int EBADMSG = 74;
> +#pragma D binding "1.0" EBADMSG
> +inline int EOVERFLOW = 75;
> +#pragma D binding "1.0" EOVERFLOW
> +inline int ENOTUNIQ = 76;
> +#pragma D binding "1.0" ENOTUNIQ
> +inline int EBADFD = 77;
> +#pragma D binding "1.0" EBADFD
> +inline int EREMCHG = 78;
> +#pragma D binding "1.0" EREMCHG
> +inline int ELIBACC = 79;
> +#pragma D binding "1.0" ELIBACC
> +inline int ELIBBAD = 80;
> +#pragma D binding "1.0" ELIBBAD
> +inline int ELIBSCN = 81;
> +#pragma D binding "1.0" ELIBSCN
> +inline int ELIBMAX = 82;
> +#pragma D binding "1.0" ELIBMAX
> +inline int ELIBEXEC = 83;
> +#pragma D binding "1.0" ELIBEXEC
> +inline int EILSEQ = 84;
> +#pragma D binding "1.0" EILSEQ
> +inline int ERESTART = 85;
> +#pragma D binding "1.0" ERESTART
> +inline int ESTRPIPE = 86;
> +#pragma D binding "1.0" ESTRPIPE
> +inline int EUSERS = 87;
> +#pragma D binding "1.0" EUSERS
> +inline int ENOTSOCK = 88;
> +#pragma D binding "1.0" ENOTSOCK
> +inline int EDESTADDRREQ = 89;
> +#pragma D binding "1.0" EDESTADDRREQ
> +inline int EMSGSIZE = 90;
> +#pragma D binding "1.0" EMSGSIZE
> +inline int EPROTOTYPE = 91;
> +#pragma D binding "1.0" EPROTOTYPE
> +inline int ENOPROTOOPT = 92;
> +#pragma D binding "1.0" ENOPROTOOPT
> +inline int EPROTONOSUPPORT = 93;
> +#pragma D binding "1.0" EPROTONOSUPPORT
> +inline int ESOCKTNOSUPPORT = 94;
> +#pragma D binding "1.0" ESOCKTNOSUPPORT
> +inline int EOPNOTSUPP = 95;
> +#pragma D binding "1.0" EOPNOTSUPP
> +inline int EPFNOSUPPORT = 96;
> +#pragma D binding "1.0" EPFNOSUPPORT
> +inline int EAFNOSUPPORT = 97;
> +#pragma D binding "1.0" EAFNOSUPPORT
> +inline int EADDRINUSE = 98;
> +#pragma D binding "1.0" EADDRINUSE
> +inline int EADDRNOTAVAIL = 99;
> +#pragma D binding "1.0" EADDRNOTAVAIL
> +inline int ENETDOWN = 100;
> +#pragma D binding "1.0" ENETDOWN
> +inline int ENETUNREACH = 101;
> +#pragma D binding "1.0" ENETUNREACH
> +inline int ENETRESET = 102;
> +#pragma D binding "1.0" ENETRESET
> +inline int ECONNABORTED = 103;
> +#pragma D binding "1.0" ECONNABORTED
> +inline int ECONNRESET = 104;
> +#pragma D binding "1.0" ECONNRESET
> +inline int ENOBUFS = 105;
> +#pragma D binding "1.0" ENOBUFS
> +inline int EISCONN = 106;
> +#pragma D binding "1.0" EISCONN
> +inline int ENOTCONN = 107;
> +#pragma D binding "1.0" ENOTCONN
> +inline int ESHUTDOWN = 108;
> +#pragma D binding "1.0" ESHUTDOWN
> +inline int ETOOMANYREFS = 109;
> +#pragma D binding "1.0" ETOOMANYREFS
> +inline int ETIMEDOUT = 110;
> +#pragma D binding "1.0" ETIMEDOUT
> +inline int ECONNREFUSED = 111;
> +#pragma D binding "1.0" ECONNREFUSED
> +inline int EHOSTDOWN = 112;
> +#pragma D binding "1.0" EHOSTDOWN
> +inline int EHOSTUNREACH = 113;
> +#pragma D binding "1.0" EHOSTUNREACH
> +inline int EALREADY = 114;
> +#pragma D binding "1.0" EALREADY
> +inline int EINPROGRESS = 115;
> +#pragma D binding "1.0" EINPROGRESS
> +inline int ESTALE = 116;
> +#pragma D binding "1.0" ESTALE
> +inline int EUCLEAN = 117;
> +#pragma D binding "1.0" EUCLEAN
> +inline int ENOTNAM = 118;
> +#pragma D binding "1.0" ENOTNAM
> +inline int ENAVAIL = 119;
> +#pragma D binding "1.0" ENAVAIL
> +inline int EISNAM = 120;
> +#pragma D binding "1.0" EISNAM
> +inline int EREMOTEIO = 121;
> +#pragma D binding "1.0" EREMOTEIO
> +inline int EDQUOT = 122;
> +#pragma D binding "1.0" EDQUOT
> +inline int ENOMEDIUM = 123;
> +#pragma D binding "1.0" ENOMEDIUM
> +inline int EMEDIUMTYPE = 124;
> +#pragma D binding "1.0" EMEDIUMTYPE
> +inline int ECANCELED = 125;
> +#pragma D binding "1.0" ECANCELED
> +inline int ENOKEY = 126;
> +#pragma D binding "1.0" ENOKEY
> +inline int EKEYEXPIRED = 127;
> +#pragma D binding "1.0" EKEYEXPIRED
> +inline int EKEYREVOKED = 128;
> +#pragma D binding "1.0" EKEYREVOKED
> +inline int EKEYREJECTED = 129;
> +#pragma D binding "1.0" EKEYREJECTED
> +inline int EOWNERDEAD = 130;
> +#pragma D binding "1.0" EOWNERDEAD
> +inline int ENOTRECOVERABLE = 131;
> +#pragma D binding "1.0" ENOTRECOVERABLE
> +inline int ERFKILL = 132;
> +#pragma D binding "1.0" ERFKILL
> +inline int EHWPOISON = 133;
> +#pragma D binding "1.0" EHWPOISON
> +inline int ENOTSUP = 95;
> +#pragma D binding "1.0" ENOTSUP
> diff --git a/dlibs/aarch64/6.10/io.d b/dlibs/aarch64/6.10/io.d
> new file mode 100644
> index 0000000000000..ffccf5b3e3f18
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/io.d
> @@ -0,0 +1,234 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on provider sched
> +
> +typedef char	*caddr_t;
> +
> +typedef struct bufinfo {
> +	int b_flags;			/* buffer status */
> +	size_t b_bcount;		/* number of bytes */
> +	caddr_t b_addr;			/* buffer address */
> +	uint64_t b_lblkno;		/* block # on device */
> +	uint64_t b_blkno;		/* expanded block # on device */
> +	size_t b_resid;			/* # of bytes not transferred */
> +	size_t b_bufsize;		/* size of allocated buffer */
> +	caddr_t b_iodone;		/* I/O completion routine */
> +	int b_error;			/* expanded error field */
> +	dev_t b_edev;			/* extended device */
> +} bufinfo_t;
> +
> +inline int B_BUSY = 0x000001;
> +#pragma D binding "1.0" B_BUSY
> +inline int B_DONE = 0x000002;
> +#pragma D binding "1.0" B_DONE
> +inline int B_ERROR = 0x000004;
> +#pragma D binding "1.0" B_ERROR
> +inline int B_PAGEIO = 0x000010;
> +#pragma D binding "1.0" B_PAGEIO
> +inline int B_PHYS = 0x000020;
> +#pragma D binding "1.0" B_PHYS
> +inline int B_READ = 0x000040;
> +#pragma D binding "1.0" B_READ
> +inline int B_WRITE = 0x000100;
> +#pragma D binding "1.0" B_WRITE
> +inline int B_ASYNC = 0x000400;
> +#pragma D binding "1.0" B_ASYNC
> +
> +#pragma D binding "1.0" translator
> +translator bufinfo_t < struct buffer_head *B > {
> +	b_flags = (int)arg1 & 0x01 ? B_WRITE : B_READ;
> +	b_addr = B->b_data;
> +	b_bcount = B->b_size;
> +	b_lblkno = B->b_blocknr;
> +	b_blkno = B->b_blocknr;
> +	b_resid = 0;
> +	b_bufsize = B->b_size;
> +	b_iodone = (caddr_t)B->b_end_io;
> +	b_error = 0;			/* b_state ?? */
> +	b_edev = B->b_bdev->bd_dev;
> +};
> +
> +/*
> + * From linux/blk_types.h.
> + */
> +
> +/* bit # in bi_flags */
> +inline int BIO_USER_MAPPED = 6;
> +
> +/* bit mask in bi_rw */
> +inline int REQ_WRITE = 0x01;
> +
> +inline int REQ_SYNC = 0x800;
> +
> +
> +
> +
> +
> +
> +
> +#pragma D binding "1.6.3" translator
> +translator bufinfo_t < struct bio *B > {
> +	b_flags = ((int)B->bi_opf & REQ_WRITE ? B_WRITE : B_READ) |
> +		((int)B->bi_opf & REQ_SYNC ? 0 : B_ASYNC) |
> +		((int)B->bi_flags & (1 << BIO_USER_MAPPED) ? B_PAGEIO : B_PHYS);
> +	b_addr = 0;
> +	b_bcount = B->bi_iter.bi_size;
> +	b_lblkno = B->bi_iter.bi_sector;
> +	b_blkno = B->bi_iter.bi_sector;
> +	b_resid = 0;
> +	b_bufsize = B->bi_iter.bi_size;
> +	b_iodone = (caddr_t)B->bi_end_io;
> +	b_error = 0;
> +	b_edev = B->bi_bdev == NULL ? 0 : B->bi_bdev->bd_dev;
> +};
> +
> +typedef struct devinfo {
> +	int dev_major;			/* major number */
> +	int dev_minor;			/* minor number */
> +	int dev_instance;		/* instance number */
> +	string dev_name;		/* name of device */
> +	string dev_statname;		/* name of device + instance/minor */
> +	string dev_pathname;		/* pathname of device */
> +} devinfo_t;
> +
> +
> +
> +#pragma D binding "1.0" translator
> +translator devinfo_t < struct buffer_head *B > {
> +	dev_major = getmajor(B->b_bdev->bd_dev);
> +	dev_minor = getminor(B->b_bdev->bd_dev);
> +	dev_instance = 0;		/* not used? */
> +	dev_name = B->b_bdev->bd_disk->part0->bd_device.parent
> +	    ? B->b_bdev->bd_disk->part0->bd_device.parent->driver->name
> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.parent->driver->name)
> +		: "<none>"
> +	    : B->b_bdev->bd_disk->part0->bd_device.driver->name
> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.driver->name)
> +		: "<none>";
> +	dev_statname = B->b_bdev->__bd_flags.counter & 255 == 0
> +			? stringof(B->b_bdev->bd_disk->disk_name)
> +			: strjoin(stringof(B->b_bdev->bd_disk->disk_name),
> +				  lltostr(B->b_bdev->__bd_flags.counter & 255));
> +	dev_pathname = strjoin(
> +			"/dev/",
> +			B->b_bdev->__bd_flags.counter & 255 == 0
> +			    ? stringof(B->b_bdev->bd_disk->disk_name)
> +			    : strjoin(stringof(B->b_bdev->bd_disk->disk_name),
> +				      lltostr(B->b_bdev->__bd_flags.counter & 255))
> +		       );
> +};
> +
> +#pragma D binding "1.6.3" translator
> +translator devinfo_t < struct bio *B > {
> +	dev_major = B->bi_bdev == NULL ? 0 : getmajor(B->bi_bdev->bd_dev);
> +	dev_minor = B->bi_bdev == NULL ? 0 : getminor(B->bi_bdev->bd_dev);
> +	dev_instance = 0;
> +	dev_name = B->bi_bdev == NULL
> +			? "nfs"
> +			: stringof(((struct blk_major_name **)`major_names)[
> +					getmajor(B->bi_bdev->bd_dev) % 255
> +				   ]->name);
> +	dev_statname = B->bi_bdev == NULL ? "nfs" :
> +	    B->bi_bdev->__bd_flags.counter & 255 == 0 ? stringof(B->bi_bdev->bd_disk->disk_name) :
> +	    strjoin(stringof(B->bi_bdev->bd_disk->disk_name), lltostr(B->bi_bdev->__bd_flags.counter & 255));
> +	dev_pathname = B->bi_bdev == NULL ? "<nfs>" : "<unknown>";
> +};
> +
> +typedef struct fileinfo {
> +	string fi_name;			/* name (basename of fi_pathname) */
> +	string fi_dirname;		/* directory (dirname of fi_pathname) */
> +	string fi_pathname;		/* full pathname */
> +	loff_t fi_offset;		/* offset within file */
> +	string fi_fs;			/* filesystem */
> +	string fi_mount;		/* mount point of file system */
> +	int fi_oflags;			/* open(2) flags for file descriptor */
> +} fileinfo_t;
> +
> +#pragma D binding "1.0" translator
> +translator fileinfo_t < struct buffer_head *B > {
> +	fi_name = "<unknown>";
> +	fi_dirname = "<unknown>";
> +	fi_pathname = "<unknown>";
> +	fi_offset = 0;
> +	fi_fs = "<unknown>";
> +	fi_mount = "<unknown>";
> +	fi_oflags = 0;
> +};
> +
> +inline int O_ACCMODE = 0003;
> +#pragma D binding "1.1" O_ACCMODE
> +inline int O_RDONLY = 00;
> +#pragma D binding "1.1" O_RDONLY
> +inline int O_WRONLY = 01;
> +#pragma D binding "1.1" O_WRONLY
> +inline int O_RDWR = 02;
> +#pragma D binding "1.1" O_RDWR
> +inline int O_CREAT = 00000100;
> +#pragma D binding "1.1" O_CREAT
> +inline int O_EXCL = 00000200;
> +#pragma D binding "1.1" O_EXCL
> +inline int O_NOCTTY = 00000400;
> +#pragma D binding "1.1" O_NOCTTY
> +inline int O_TRUNC = 00001000;
> +#pragma D binding "1.1" O_TRUNC
> +inline int O_APPEND = 00002000;
> +#pragma D binding "1.1" O_APPEND
> +inline int O_NONBLOCK = 00004000;
> +#pragma D binding "1.1" O_NONBLOCK
> +inline int O_NDELAY = 00004000;
> +#pragma D binding "1.1" O_NDELAY
> +inline int O_SYNC = (04000000|010000);
> +#pragma D binding "1.1" O_SYNC
> +
> +inline int O_ASYNC = 020000;
> +#pragma D binding "1.1" O_ASYNC
> +inline int O_DIRECTORY = 040000;
> +#pragma D binding "1.1" O_DIRECTORY
> +inline int O_NOFOLLOW = 0100000;
> +#pragma D binding "1.1" O_NOFOLLOW
> +inline int O_CLOEXEC = 02000000;
> +#pragma D binding "1.1" O_CLOEXEC
> +inline int O_DSYNC = 010000;
> +#pragma D binding "1.1" O_DSYNC
> +inline int O_RSYNC = (04000000|010000);
> +#pragma D binding "1.1" O_RSYNC
> +
> +#pragma D binding "1.1" translator
> +translator fileinfo_t < struct file *F > {
> +	fi_name = F == NULL
> +			? "<none>"
> +			: stringof(F->f_path.dentry->d_name.name);
> +	fi_dirname = F == NULL
> +			? "<none>"
> +			: dirname(d_path(&(F->f_path)));
> +	fi_pathname = F == NULL
> +			? "<none>"
> +			: d_path(&(F->f_path));
> +	fi_offset = F == NULL
> +			? 0
> +			: F->f_pos;
> +	fi_fs = F == NULL
> +			? "<none>"
> +			: stringof(F->f_path.mnt->mnt_sb->s_type->name);
> +	fi_mount = F == NULL
> +			? "<none>"
> +			: "<unknown>";
> +	fi_oflags = F == NULL
> +			? 0
> +			: F->f_flags;
> +};
> +
> +inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
> +				 fd >= 0 && fd < curthread->files->fdt->max_fds
> +					? curthread->files->fdt->fd[fd]
> +					: NULL
> +				);
> +
> +#pragma D attributes Stable/Stable/Common fds
> +#pragma D binding "1.1" fds
> diff --git a/dlibs/aarch64/6.10/ip.d b/dlibs/aarch64/6.10/ip.d
> new file mode 100644
> index 0000000000000..f8b77f1224115
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/ip.d
> @@ -0,0 +1,341 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2007, 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library net.d
> +#pragma D depends_on library procfs.d
> +#pragma D depends_on provider ip
> +
> +inline int IPPROTO_IP		=	0;
> +inline int IPPROTO_ICMP		=	1;
> +inline int IPPROTO_IGMP		=	2;
> +inline int IPPROTO_IPIP		=	4;
> +inline int IPPROTO_TCP		=	6;
> +inline int IPPROTO_EGP		=	8;
> +inline int IPPROTO_PUP		=	12;
> +inline int IPPROTO_UDP		=	17;
> +inline int IPPROTO_IDP		=	22;
> +inline int IPPROTO_TP		=	29;
> +inline int IPPROTO_DCCP		=	33;
> +inline int IPPROTO_IPV6		=	41;
> +inline int IPPROTO_RSVP		=	46;
> +inline int IPPROTO_GRE		=	47;
> +inline int IPPROTO_ESP		=	50;
> +inline int IPPROTO_AH		=	51;
> +inline int IPPROTO_OSPF		=	89;
> +inline int IPPROTO_MTP		=	92;
> +inline int IPPROTO_BEETPH	=	94;
> +inline int IPPROTO_ENCAP	=	98;
> +inline int IPPROTO_PIM		=	103;
> +inline int IPPROTO_COMP		=	108;
> +inline int IPPROTO_SCTP		=	132;
> +inline int IPPROTO_UDPLITE	=	136;
> +inline int IPPROTO_RAW		=	255;
> +inline int IPPROTO_MAX		=	256;
> +inline int IPPROTO_HOPOPTS	=	0;
> +inline int IPPROTO_ROUTING	=	43;
> +inline int IPPROTO_FRAGMENT	=	44;
> +inline int IPPROTO_ICMPV6	=	58;
> +inline int IPPROTO_NONE		=	59;
> +inline int IPPROTO_DSTOPTS	=	60;
> +inline int IPPROTO_MH		=	135;
> +
> +inline int TCP_MIN_HEADER_LENGTH =	20;
> +
> +/*
> + * For compatibility with Solaris.  Here the netstackid will be the pointer
> + * to the net namespace (nd_net in struct net_device).
> + */
> +typedef uint64_t	netstackid_t;
> +typedef __be32		ipaddr_t;
> +typedef struct in6_addr	in6_addr_t;
> +
> +/*
> + * pktinfo is where packet ID info can be made available for deeper
> + * analysis if packet IDs become supported by the kernel in the future.
> + * The pkt_addr member is currently always NULL.
> + */
> +typedef struct pktinfo {
> +	uintptr_t pkt_addr;
> +} pktinfo_t;
> +
> +/*
> + * csinfo is where connection state info is made available.
> + */
> +typedef struct csinfo {
> +	uintptr_t cs_addr;
> +	uint64_t cs_cid;
> +} csinfo_t;
> +
> +/*
> + * ipinfo contains common IP info for both IPv4 and IPv6.
> + */
> +typedef struct ipinfo {
> +	uint8_t ip_ver;			/* IP version (4, 6) */
> +	uint32_t ip_plength;		/* payload length */
> +	string ip_saddr;		/* source address */
> +	string ip_daddr;		/* destination address */
> +} ipinfo_t;
> +
> +/*
> + * ifinfo contains network interface info.
> + */
> +typedef struct ifinfo {
> +	string if_name;			/* interface name */
> +	int8_t if_local;		/* is delivered locally */
> +	netstackid_t if_ipstack;	/* netns pointer on Linux */
> +	uintptr_t if_addr;		/* pointer to raw struct net_device */
> +} ifinfo_t;
> +
> +/*
> + * ipv4info is a translated version of the IPv4 header (with raw pointer).
> + * These values are NULL if the packet is not IPv4.
> + */
> +typedef struct ipv4info {
> +	uint8_t ipv4_ver;		/* IP version (4) */
> +	uint8_t ipv4_ihl;		/* header length, bytes */
> +	uint8_t ipv4_tos;		/* type of service field */
> +	uint16_t ipv4_length;		/* length (header + payload) */
> +	uint16_t ipv4_ident;		/* identification */
> +	uint8_t ipv4_flags;		/* IP flags */
> +	uint16_t ipv4_offset;		/* fragment offset */
> +	uint8_t ipv4_ttl;		/* time to live */
> +	uint8_t ipv4_protocol;		/* next level protocol */
> +	string ipv4_protostr;		/* next level protocol, as string */
> +	uint16_t ipv4_checksum;		/* header checksum */
> +	ipaddr_t ipv4_src;		/* source address */
> +	ipaddr_t ipv4_dst;		/* destination address */
> +	string ipv4_saddr;		/* source address, string */
> +	string ipv4_daddr;		/* destination address, string */
> +	struct iphdr *ipv4_hdr;		/* pointer to raw header */
> +} ipv4info_t;
> +
> +/*
> + * ipv6info is a translated version of the IPv6 header (with raw pointer).
> + * These values are NULL if the packet is not IPv6.
> + */
> +typedef struct ipv6info {
> +	uint8_t ipv6_ver;		/* IP version (6) */
> +	uint8_t ipv6_tclass;		/* traffic class */
> +	uint32_t ipv6_flow;		/* flow label */
> +	uint16_t ipv6_plen;		/* payload length */
> +	uint8_t ipv6_nexthdr;		/* next header protocol */
> +	string ipv6_nextstr;		/* next header protocol, as string */
> +	uint8_t ipv6_hlim;		/* hop limit */
> +	in6_addr_t *ipv6_src;		/* source address */
> +	in6_addr_t *ipv6_dst;		/* destination address */
> +	string ipv6_saddr;		/* source address, string */
> +	string ipv6_daddr;		/* destination address, string */
> +	struct ipv6hdr *ipv6_hdr;	/* pointer to raw header */
> +} ipv6info_t;
> +
> +/*
> + * void_ip_t is a void pointer to either an IPv4 or IPv6 header.  It has
> + * its own type name so that a translator can be determined.
> + */
> +typedef uintptr_t void_ip_t;
> +
> +/*
> + * __dtrace_tcp_void_ip_t is used by the translator to take either the
> + * non-NULL void_ip_t * passed in or, if it is NULL, uses arg3 (struct tcp *)
> + * from the tcp:::send probe to translate to an ipinfo_t.
> + * This allows us to present the consumer with header data based on the
> + * struct tcp * when IP information is not yet present (for TCP send).
> + */
> +typedef void * __dtrace_tcp_void_ip_t;
> +
> +#pragma D binding "1.5" translator
> +translator pktinfo_t < struct sk_buff *s > {
> +	pkt_addr = (uintptr_t)s;
> +};
> +
> +#pragma D binding "1.5" translator
> +translator csinfo_t < struct sock *s > {
> +	cs_addr = (uintptr_t)s;
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < struct iphdr *I > {
> +	ip_ver = 4;
> +        ip_plength = I != NULL ? (ntohs(I->tot_len) - I->ihl << 2) : 0;
> +	ip_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<unknown>";
> +	ip_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<unknown>";
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < struct ipv6hdr *I > {
> +	ip_ver = 6;
> +	ip_plength = I != NULL ? ntohs(I->payload_len) : 0;
> +	ip_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<unknown>";
> +	ip_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<unknown>";
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < void_ip_t *I > {
> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 : 0;
> +	ip_plength = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
> +	    (ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2)) :
> +	    *(uint8_t *)I >> 4 == 6 ?
> +	    ntohs(((struct ipv6hdr *)I)->payload_len) : 0) : 0;
> +	ip_saddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->saddr) : *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) : "<unknown>") :
> +	    "<unknown>";
> +	ip_daddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->daddr) : *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) : "<unknown>") :
> +	    "<unknown>";
> +};
> +
> +/*
> + * In some cases where the ipinfo_t * is NULL we wish to construct IP info
> + * using the struct tcp_sock * (arg3).  In order to map local IP to source
> + * or destination IP address appropriately we need to check if the associated
> + * data is inbound (NET_PROBE_INBOUND in arg7) or outbound (NET_PROBE_OUTBOUND);
> + * the value is stored in arg7.  If inbound, we map the local IP address to
> + * ip_daddr (destination), and if outbound it is mapped to ip_saddr.
> + */
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < __dtrace_tcp_void_ip_t *I > {
> +	/*
> +	 * General strategy used is to rely on the IP header I if it is
> +	 * non-null; otherwise we try to reconstruct IP values from arg3
> +	 * (a struct tcp_sock *).
> +	 */
> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET ? 4 :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ? 6 : 0;
> +	/*
> +	 * For ip_plength we fall back to using TCP skb data from the tcp_skb_cb
> +	 * to determine payload length.
> +	 */
> +	ip_plength = I != NULL && *(uint8_t *)I >> 4 == 4 ?
> +	    ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2) :
> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
> +	    ntohs(((struct ipv6hdr *)I)->payload_len) :
> +	    arg0 != NULL ?
> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq -
> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->seq :
> +	    0;
> +	/*
> +	 * For source/destination addresses, we again try to use the IP header I
> +	 * if available.  If I is NULL, we utilize arg3 (struct tcp_sock *)
> +	 * but the problem here is that it stores local and remote IP addresses
> +	 * _not_ source and destination.  So we need to know if traffic is
> +	 * inbound or outbound. If inbound, IP source address is remote
> +	 * socket address (skc_daddr) and destination IP address is local socket
> +	 * address (skc_rcv_saddr).  If outbound, IP source address is local
> +	 * socket address and IP destination address is remote socket address.
> +	 */
> +	ip_saddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->saddr) :
> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_daddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr) :
> +	    "<unknown>";
> +	ip_daddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->daddr) :
> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_daddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr) :
> +	    "<unknown>";
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ifinfo_t < struct net_device *N > {
> +	if_name = N != NULL ? stringof(N->name) : "<unknown>";
> +	if_ipstack = (N != NULL && sizeof(N->nd_net) > 0) ?
> +	    ((uint64_t)N->nd_net.net) : 0;
> +	if_local = (N == NULL);	/* is delivered locally */
> +	if_addr = (uintptr_t)N;	/* pointer to raw struct net_device ptr */
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipv4info_t < struct iphdr *I > {
> +	ipv4_ver = I != NULL ? 4 : 0;
> +	ipv4_ihl = I != NULL ? ((*(uint8_t *)I & 0xf) << 2) : 0;
> +	ipv4_tos = I != NULL ? I->tos : 0;
> +	ipv4_length = I != NULL ? ntohs(I->tot_len) : 0;
> +	ipv4_ident = I != NULL ? ntohs(I->id) : 0;
> +	ipv4_flags = I != NULL ? ntohs(I->frag_off) >> 12 : 0;
> +	ipv4_offset = I != NULL ? ntohs(I->frag_off) & 0x0fff : 0;
> +	ipv4_ttl = I != NULL ? I->ttl : 0;
> +	ipv4_protocol = I != NULL ? I->protocol : 0;
> +	ipv4_protostr = I == NULL ? "<null>" :
> +	    I->protocol == IPPROTO_TCP     ? "TCP"    :
> +	    I->protocol == IPPROTO_UDP     ? "UDP"    :
> +	    I->protocol == IPPROTO_IP      ? "IP"     :
> +	    I->protocol == IPPROTO_ICMP    ? "ICMP"   :
> +	    I->protocol == IPPROTO_IGMP    ? "IGMP"   :
> +	    I->protocol == IPPROTO_EGP     ? "EGP"    :
> +	    I->protocol == IPPROTO_IPV6    ? "IPv6"   :
> +	    I->protocol == IPPROTO_ROUTING ? "ROUTE"  :
> +	    I->protocol == IPPROTO_ESP     ? "ESP"    :
> +	    I->protocol == IPPROTO_AH      ? "AH"     :
> +	    I->protocol == IPPROTO_ICMPV6  ? "ICMPv6" :
> +	    I->protocol == IPPROTO_OSPF    ? "OSPF"   :
> +	    I->protocol == IPPROTO_SCTP    ? "SCTP"   :
> +	    I->protocol == IPPROTO_RAW     ? "RAW"    :
> +	    lltostr((uint64_t)I->protocol);
> +	ipv4_checksum = I != NULL ? ntohs(I->check) : 0;
> +	ipv4_src = I != NULL ? I->saddr : 0;
> +	ipv4_dst = I != NULL ? I->daddr : 0;
> +	ipv4_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<null>";
> +	ipv4_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<null>";
> +	ipv4_hdr = I;
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipv6info_t < struct ipv6hdr *I > {
> +	ipv6_ver = I != NULL ? ((*(uint8_t *)I) >> 4) : 0;
> +	ipv6_tclass = I != NULL ? ((ntohl(*(uint32_t *)I) & 0x0fffffff) >> 20) : 0;
> +	ipv6_flow = I != NULL ? (ntohl(*(uint32_t *)I) & 0x000fffff) : 0;
> +	ipv6_plen = I != NULL ? ntohs(I->payload_len) : 0;
> +	ipv6_nexthdr = I != NULL ? I->nexthdr : 0;
> +	ipv6_nextstr = I == NULL ? "<null>" :
> +	    I->nexthdr == IPPROTO_TCP	?	"TCP"		:
> +	    I->nexthdr == IPPROTO_UDP	?	"UDP"		:
> +	    I->nexthdr == IPPROTO_IP	?	"IP"		:
> +	    I->nexthdr == IPPROTO_ICMP	?	"ICMP"		:
> +	    I->nexthdr == IPPROTO_IGMP	?	"IGMP"		:
> +	    I->nexthdr == IPPROTO_EGP	?	"EGP"		:
> +	    I->nexthdr == IPPROTO_IPV6	?	"IPv6"		:
> +	    I->nexthdr == IPPROTO_ROUTING ?	"ROUTE"		:
> +	    I->nexthdr == IPPROTO_ESP	?	"ESP"		:
> +	    I->nexthdr == IPPROTO_AH	?	"AH"		:
> +	    I->nexthdr == IPPROTO_ICMPV6 ?	"ICMPv6"	:
> +	    I->nexthdr == IPPROTO_OSPF ?	"OSPF"		:
> +	    I->nexthdr == IPPROTO_SCTP	?	"SCTP"		:
> +	    I->nexthdr == IPPROTO_RAW	?	"RAW"		:
> +	    lltostr((uint64_t)I->nexthdr);
> +	ipv6_hlim = I != NULL ? I->hop_limit : 0;
> +	ipv6_src = I != NULL ? &I->saddr : NULL;
> +	ipv6_dst = I != NULL ? &I->daddr : 0;
> +	ipv6_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<null>";
> +	ipv6_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<null>";
> +	ipv6_hdr = I;
> +};
> diff --git a/dlibs/aarch64/6.10/lockstat.d b/dlibs/aarch64/6.10/lockstat.d
> new file mode 100644
> index 0000000000000..cb8b4bd96f1ac
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/lockstat.d
> @@ -0,0 +1,14 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on provider lockstat
> +
> +inline int RW_WRITER = 0x00;
> +#pragma D binding "1.6.4" RW_WRITER
> +inline int RW_READER = 0x01;
> +#pragma D binding "1.6.4" RW_READER
> diff --git a/dlibs/aarch64/6.10/net.d b/dlibs/aarch64/6.10/net.d
> new file mode 100644
> index 0000000000000..6ac3428747a77
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/net.d
> @@ -0,0 +1,33 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2007, 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* These are needed for inet_ntop() DTrace function. */
> +inline int AF_INET              =       2;
> +inline int AF_INET6             =       10;
> +
> +/* These are needed for link_ntop() DTrace function. */
> +inline int ARPHRD_ETHER         =       1;
> +inline int ARPHRD_INFINIBAND    =       32;
> +
> +/*
> + * The conninfo_t structure should be used by all application protocol
> + * providers as the first arguments to indicate some basic information
> + * about the connection. This structure may be augmented to accommodate
> + * the particularities of additional protocols in the future.
> + */
> +typedef struct conninfo {
> +	 string ci_local;	/* local host address */
> +	 string ci_remote;	/* remote host address */
> +	 string ci_protocol;	/* protocol (ipv4, ipv6, etc) */
> +} conninfo_t;
> +
> +/*
> + * We use these values to determine if a probe point is associated
> + * with sending (outbound) or receiving (inbound).
> + */
> +inline int NET_PROBE_OUTBOUND =		0x00;
> +inline int NET_PROBE_INBOUND =		0x01;
> diff --git a/dlibs/aarch64/6.10/pcap.d b/dlibs/aarch64/6.10/pcap.d
> new file mode 100644
> index 0000000000000..21a8e74a4036d
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/pcap.d
> @@ -0,0 +1,35 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on provider ip
> +
> +/*
> + * In general, PCAP_<type> names are chosen to match DL_<type> DLPI
> + * datalink types.
> + */
> +
> +/*
> + * Network-related capture types.  Raw DLT_* values can be used for those
> + * not present here; see /usr/include/pcap/bpf.h for the full list.
> + */
> +
> +inline int PCAP_NULL = 0;
> +#pragma D binding "1.12" PCAP_NULL
> +inline int PCAP_ETHER = 1;
> +#pragma D binding "1.12" PCAP_ETHER
> +inline int PCAP_WIFI = 105;
> +#pragma D binding "1.12" PCAP_WIFI
> +inline int PCAP_PPP = 9;
> +#pragma D binding "1.12" PCAP_PPP
> +/* PCAP_IP can signify IPv4 or IPv6 header follows. */
> +inline int PCAP_IP = 12;
> +#pragma D binding "1.12" PCAP_IP
> +
> +/* InfiniBand-related capture types. */
> +inline int PCAP_IPOIB = 242;
> +#pragma D binding "1.12" PCAP_IPOIB
> diff --git a/dlibs/aarch64/6.10/procfs.d b/dlibs/aarch64/6.10/procfs.d
> new file mode 100644
> index 0000000000000..5d7873b5e0091
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/procfs.d
> @@ -0,0 +1,306 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, 2022, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/*
> + * This file defines the standard set of inlines and translators to be made
> + * available for all D programs to use to examine process model state.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library sched.d
> +
> +typedef time64_t time_t;
> +
> +typedef struct timestruc {
> +	time_t tv_sec;
> +	long tv_nsec;
> +} timestruc_t;
> +
> +typedef struct lwpsinfo {
> +	int pr_flag;			/* lwp flags (DEPRECATED) */
> +	int pr_lwpid;			/* lwp id */
> +	uintptr_t pr_addr;		/* internal address of lwp */
> +	uintptr_t pr_wchan;		/* wait addr for sleeping lwp */
> +	char pr_stype;			/* sync event type */
> +	char pr_state;			/* numeric lwp state */
> +	char pr_sname;			/* printable char for pr_state */
> +	char pr_nice;			/* nice for cpu usage */
> +	short pr_syscall;		/* syscall number */
> +	char pr_oldpri;			/* priority */
> +	char pr_cpu;			/* CPU usage */
> +	int pr_pri;			/* priority */
> +	ushort_t pr_pctcpu;		/* % of recent cpu time */
> +	ushort_t pr_pad;
> +	timestruc_t pr_start;		/* lwp start time */
> +	timestruc_t pr_time;		/* usr+sys cpu time */
> +	char pr_clname[8];		/* scheduling class name */
> +	char pr_name[16];		/* name */
> +	processorid_t pr_onpro;		/* processor last ran on */
> +	processorid_t pr_bindpro;	/* processor bound to */
> +	psetid_t pr_bindpset;		/* processor set */
> +	int pr_lgrp;			/* lwp home lgroup */
> +	int pr_filler[4];
> +} lwpsinfo_t;
> +
> +typedef id_t taskid_t;
> +typedef id_t dprojid_t;
> +typedef id_t poolid_t;
> +typedef id_t zoneid_t;
> +
> +/*
> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
> + * psinfo_t struct.
> + * We do not provide support for pr_size, pr_rssize, pr_pctcpu, and pr_pctmem.
> + * We also do not fill in pr_lwp (the lwpsinfo_t for the representative LWP)
> + * because we do not have the ability to select and stop any representative.
> + * Also, for the moment, pr_wstat, pr_time, and pr_ctime are not supported,
> + * but these could be supported by DTrace in the future using subroutines.
> + * Note that any member added to this translator should also be added to the
> + * kthread_t-to-psinfo_t translator, below.
> + */
> +typedef struct psinfo {
> +	int pr_flag;			/* process flags (DEPRECATED) */
> +	int pr_nlwp;			/* number of active lwps (Linux: 1) */
> +	pid_t pr_pid;			/* unique process id */
> +	pid_t pr_ppid;			/* process id of parent */
> +	pid_t pr_pgid;			/* pid of process group leader */
> +	pid_t pr_sid;			/* session id */
> +	uid_t pr_uid;			/* real user id */
> +	uid_t pr_euid;			/* effective user id */
> +	uid_t pr_gid;			/* real group id */
> +	uid_t pr_egid;			/* effective group id */
> +	uintptr_t pr_addr;		/* address of process */
> +	size_t pr_size;			/* size of process image (in KB) */
> +	size_t pr_rssize;		/* resident set sie (in KB) */
> +	size_t pr_pad1;
> +	struct tty_struct *pr_ttydev;	/* controlling tty (or -1) */
> +	ushort_t pr_pctcpu;		/* % of recent cpu time used */
> +	ushort_t pr_pctmem;		/* % of recent memory used */
> +	timestruc_t pr_start;		/* process start time */
> +	timestruc_t pr_time;		/* usr+sys cpu time for process */
> +	timestruc_t pr_ctime;		/* usr+sys cpu time for children */
> +	char pr_fname[16];		/* name of exec'd file */
> +	char pr_psargs[80];		/* initial chars of arg list */
> +	int pr_wstat;			/* if zombie, wait() status */
> +	int pr_argc;			/* initial argument count */
> +	uintptr_t pr_argv;		/* address of initial arg vector */
> +	uintptr_t pr_envp;		/* address of initial env vector */
> +	char pr_dmodel;			/* data model */
> +	char pr_pad2[3];
> +	taskid_t pr_taskid;		/* task id */
> +	dprojid_t pr_projid;		/* project id */
> +	int pr_nzomb;			/* number of zombie lwps (Linux: 0) */
> +	poolid_t pr_poolid;		/* pool id */
> +	zoneid_t pr_zoneid;		/* zone id */
> +	id_t pr_contract;		/* process contract */
> +	int pr_filler[1];
> +	lwpsinfo_t pr_lwp;
> +} psinfo_t;
> +
> +inline char PR_MODEL_ILP32 = 1;
> +#pragma D binding "1.0" PR_MODEL_ILP32
> +inline char PR_MODEL_LP64 = 2;
> +#pragma D binding "1.0" PR_MODEL_LP64
> +
> + 
> + 
> +inline	int PIDTYPE_PID = 0;
> +#pragma D binding "1.0" PIDTYPE_PID
> +inline	int PIDTYPE_TGID = 1;
> +#pragma D binding "1.0" PIDTYPE_TGID
> +inline	int PIDTYPE_PGID = 2;
> +#pragma D binding "1.0" PIDTYPE_PGID
> +inline	int PIDTYPE_SID = 3;
> +#pragma D binding "1.0" PIDTYPE_SID
> +
> + 
> + 
> + 
> + 
> + 
> + 
> + 
> +#pragma D binding "1.0" translator
> +translator psinfo_t < struct task_struct *T > {
> +	pr_nlwp = 1;
> +	pr_pid = T->tgid;
> +	pr_ppid = T->real_parent->tgid;
> +	pr_pgid = T->signal->pids[PIDTYPE_PGID]->numbers[0].nr;
> +	pr_sid = T->signal->pids[PIDTYPE_SID]->numbers[0].nr;
> +	pr_uid = T->cred->uid.val;
> +	pr_euid = T->cred->euid.val;
> +	pr_gid = T->cred->gid.val;
> +	pr_egid = T->cred->egid.val;
> +	pr_addr = (uintptr_t)T;
> +
> +	pr_ttydev = T->signal->tty ? T->signal->tty
> +				   : (struct tty_struct *)-1;
> +
> +	pr_fname = T->comm;
> +/*
> +	pr_psargs = stringof(get_psinfo(T)->__psinfo(psargs));
> + */
> +	pr_wstat = 0;
> +/*
> +	pr_argc = get_psinfo(T)->__psinfo(argc);
> +	pr_argv = (uintptr_t)get_psinfo(T)->__psinfo(argv);
> +	pr_envp = (uintptr_t)get_psinfo(T)->__psinfo(envp);
> + */
> +
> +	pr_dmodel = PR_MODEL_LP64;
> +
> +	pr_taskid = 0;
> +	pr_projid = 0;
> +	pr_nzomb = 0;
> +	pr_poolid = 0;
> +	pr_zoneid = 0;
> +	pr_contract = 0;
> +};
> +
> +inline int PR_STOPPED = 0x00000001;
> +#pragma D binding "1.0" PR_STOPPED
> +inline int PR_ISTOP = 0x00000002;
> +#pragma D binding "1.0" PR_ISTOP
> +inline int PR_DSTOP = 0x00000004;
> +#pragma D binding "1.0" PR_DSTOP
> +inline int PR_IDLE = 0x10000000;
> +#pragma D binding "1.0" PR_IDLE
> +
> +inline char SSLEEP = 1;
> +#pragma D binding "1.0" SSLEEP
> +inline char SRUN = 2;
> +#pragma D binding "1.0" SRUN
> +inline char SZOMB = 3;
> +#pragma D binding "1.0" SZOMB
> +inline char SSTOP = 4;
> +#pragma D binding "1.0" SSTOP
> +inline char SIDL = 5;
> +#pragma D binding "1.0" SIDL
> +inline char SONPROC = 6;
> +#pragma D binding "1.0" SONPROC
> +inline char SWAIT = 7;
> +#pragma D binding "1.0" SWAIT
> +
> +/*
> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
> + * lwpsinfo_t.
> + * We do not provide support for pr_nice, pr_oldpri, pr_cpu, or pr_pctcpu.
> + * Also, for the moment, pr_start and pr_time are not supported, but these
> + * could be supported by DTrace in the future using subroutines.
> + */
> +#pragma D binding "1.0" translator
> +translator lwpsinfo_t < struct task_struct *T > {
> +	pr_flag = (T->__state & 0x00000004) ? PR_STOPPED : 0;
> +/*
> +	pr_flag = ((T->t_state == TS_STOPPED) ? (PR_STOPPED |
> +	    ((!(T->t_schedflag & TS_PSTART)) ? PR_ISTOP : 0)) :
> +	    ((T->t_proc_flag & TP_PRVSTOP) ? PR_STOPPED | PR_ISTOP : 0)) |
> +	    ((T == T->t_procp->p_agenttp) ? PR_AGENT : 0) |
> +	    ((!(T->t_proc_flag & TP_TWAIT)) ? PR_DETACH : 0) |
> +	    ((T->t_proc_flag & TP_DAEMON) ? PR_DAEMON : 0) |
> +	    ((T->t_procp->p_pidflag & CLDNOSIGCHLD) ? PR_NOSIGCHLD : 0) |
> +	    ((T->t_procp->p_pidflag & CLDWAITPID) ? PR_WAITPID : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_FORK) ? PR_FORK : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_RUNLCL) ? PR_RLC : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_KILLCL) ? PR_KLC : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_ASYNC) ? PR_ASYNC : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_BPTADJ) ? PR_BPTADJ : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_PTRACE) ? PR_PTRACE : 0) |
> +	    ((T->t_procp->p_flag & SMSACCT) ? PR_MSACCT : 0) |
> +	    ((T->t_procp->p_flag & SMSFORK) ? PR_MSFORK : 0) |
> +	    ((T->t_procp->p_flag & SVFWAIT) ? PR_VFORKP : 0) |
> +	    (((T->t_procp->p_flag & SSYS) ||
> +	    (T->t_procp->p_as == &`kas)) ? PR_ISSYS : 0) |
> +	    ((T == T->t_cpu->cpu_idle_thread) ? PR_IDLE : 0);
> +*/
> +
> +	pr_lwpid = T->pid;
> +	pr_addr = (uintptr_t)T;
> +	pr_wchan = NULL;
> +	pr_stype = 0;
> +
> +	pr_state = (T->__state & 0x00000001) ? SSLEEP :
> +		   (T->__state & 0x00000002) ? SSLEEP :
> +		   (T->__state & 0x00000004) ? SSTOP :
> +		   (T->__state & 0x00000008) ? SSTOP :
> +		   (T->__state & 0x00000020) ? SZOMB :
> +		   (T->__state & 0x00000010) ? SZOMB :
> +		   (T->__state & 0x00000080) ? SZOMB :
> +		   (T->__state & 0x00000100) ? SWAIT :
> +		   (T->__state & 0x00000200) ? SWAIT : SRUN;
> +	pr_sname = (T->__state & 0x00000001) ? 'S' :
> +		   (T->__state & 0x00000002) ? 'S' :
> +		   (T->__state & 0x00000004) ? 'T' :
> +		   (T->__state & 0x00000008) ? 'T' :
> +		   (T->__state & 0x00000020) ? 'Z' :
> +		   (T->__state & 0x00000010) ? 'Z' :
> +		   (T->__state & 0x00000080) ? 'Z' :
> +		   (T->__state & 0x00000100) ? 'W' :
> +		   (T->__state & 0x00000200) ? 'W' : 'R';
> +
> +	pr_pri = T->prio;
> +	pr_name = T->comm;
> +	pr_onpro = ((struct thread_info *)T->stack)->cpu;
> +};
> +
> +inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread);
> +#pragma D attributes Stable/Stable/Common curpsinfo
> +#pragma D binding "1.0" curpsinfo
> +
> +inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
> +#pragma D attributes Stable/Stable/Common curlwpsinfo
> +#pragma D binding "1.0" curlwpsinfo
> +
> +inline string cwd = d_path(&(curthread->fs->pwd));
> +#pragma D attributes Stable/Stable/Common cwd
> +#pragma D binding "1.0" cwd
> +
> +inline string root = d_path(&(curthread->fs->root));
> +#pragma D attributes Stable/Stable/Common root
> +#pragma D binding "1.0" root
> +
> +inline int CLD_EXITED = 1;
> +#pragma D binding "1.0" CLD_EXITED
> +inline int CLD_KILLED = 2;
> +#pragma D binding "1.0" CLD_KILLED
> +inline int CLD_DUMPED = 3;
> +#pragma D binding "1.0" CLD_DUMPED
> +inline int CLD_TRAPPED = 4;
> +#pragma D binding "1.0" CLD_TRAPPED
> +inline int CLD_STOPPED = 5;
> +#pragma D binding "1.0" CLD_STOPPED
> +inline int CLD_CONTINUED = 6;
> +#pragma D binding "1.0" CLD_CONTINUED
> +
> +/*
> + * Below we provide some inline definitions to simplify converting from
> + * a struct pid * to a pid_t.  structpid2pid is a DTrace-ized version of
> + * pid_vnr().
> + */
> + /*
> +inline	struct pid_namespace *pid_namespace[struct pid *p] = p != NULL ?
> +	p->numbers[p->level].ns : NULL;
> +
> +inline	int pid_namespace_level[struct pid *p] = p != NULL && pid_namespace[p] ?
> +	pid_namespace[p]->level : 0;
> +
> +m4_dnl 4.19 and above use thread_pid for this.
> +define_for_kernel([[__task_pid]], [[ m4_dnl
> +	(m4_kver(4, 19, 0), [[task->thread_pid]])]], m4_dnl
> +	[[task->pids[PIDTYPE_PID].pid]]) m4_dnl
> +
> +inline	struct pid *task_pid[struct task_struct *task] =
> +	task != NULL ? __task_pid : NULL;
> +
> +inline	int current_namespace_level = pid_namespace_level[task_pid[curthread]];
> +
> +inline	pid_t structpid2pid[struct pid *p] =
> +	p != NULL && current_namespace_level <= p->level &&
> +	((struct upid *)&(p->numbers[current_namespace_level]))->ns ==
> +	pid_namespace[task_pid[curthread]] ?
> +	((struct upid *)&(p->numbers[current_namespace_level]))->nr : 0;
> +*/
> diff --git a/dlibs/aarch64/6.10/regs.d b/dlibs/aarch64/6.10/regs.d
> new file mode 100644
> index 0000000000000..e47f8cfc11825
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/regs.d
> @@ -0,0 +1,78 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +inline int R_X0 = 0 ;
> +#pragma D binding "1.0" R_X0
> +inline int R_X1 = 1 ;
> +#pragma D binding "1.0" R_X1
> +inline int R_X2 = 2 ;
> +#pragma D binding "1.0" R_X2
> +inline int R_X3 = 3 ;
> +#pragma D binding "1.0" R_X3
> +inline int R_X4 = 4 ;
> +#pragma D binding "1.0" R_X4
> +inline int R_X5 = 5 ;
> +#pragma D binding "1.0" R_X5
> +inline int R_X6 = 6 ;
> +#pragma D binding "1.0" R_X6
> +inline int R_X7 = 7 ;
> +#pragma D binding "1.0" R_X7
> +inline int R_X8 = 8 ;
> +#pragma D binding "1.0" R_X8
> +inline int R_X9 = 9 ;
> +#pragma D binding "1.0" R_X9
> +inline int R_X10 = 10 ;
> +#pragma D binding "1.0" R_X10
> +inline int R_X11 = 11 ;
> +#pragma D binding "1.0" R_X11
> +inline int R_X12 = 12 ;
> +#pragma D binding "1.0" R_X12
> +inline int R_X13 = 13 ;
> +#pragma D binding "1.0" R_X13
> +inline int R_X14 = 14 ;
> +#pragma D binding "1.0" R_X14
> +inline int R_X15 = 15 ;
> +#pragma D binding "1.0" R_X15
> +inline int R_X16 = 16 ;
> +#pragma D binding "1.0" R_X16
> +inline int R_X17 = 17 ;
> +#pragma D binding "1.0" R_X17
> +inline int R_X18 = 18 ;
> +#pragma D binding "1.0" R_X18
> +inline int R_X19 = 19 ;
> +#pragma D binding "1.0" R_X19
> +inline int R_X20 = 20 ;
> +#pragma D binding "1.0" R_X20
> +inline int R_X21 = 21 ;
> +#pragma D binding "1.0" R_X21
> +inline int R_X22 = 22 ;
> +#pragma D binding "1.0" R_X22
> +inline int R_X23 = 23 ;
> +#pragma D binding "1.0" R_X23
> +inline int R_X24 = 24 ;
> +#pragma D binding "1.0" R_X24
> +inline int R_X25 = 25 ;
> +#pragma D binding "1.0" R_X25
> +inline int R_X26 = 26 ;
> +#pragma D binding "1.0" R_X26
> +inline int R_X27 = 27 ;
> +#pragma D binding "1.0" R_X27
> +inline int R_X28 = 28 ;
> +#pragma D binding "1.0" R_X28
> +inline int R_X29 = 29 ;
> +#pragma D binding "1.0" R_X29
> +inline int R_X30 = 30 ;
> +#pragma D binding "1.0" R_X30
> +
> +inline int R_SP = 31 ;
> +#pragma D binding "1.0" R_SP
> +inline int R_PC = 32 ;
> +#pragma D binding "1.0" R_PC
> +inline int R_PSTATE = 33 ;
> +#pragma D binding "1.0" R_PSTATE
> +
> +inline int R_FP = R_X29;
> +#pragma D binding "1.0" R_FP
> diff --git a/dlibs/aarch64/6.10/sched.d b/dlibs/aarch64/6.10/sched.d
> new file mode 100644
> index 0000000000000..271d84e057cde
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/sched.d
> @@ -0,0 +1,38 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +
> +typedef id_t		processorid_t;
> +typedef id_t		psetid_t;
> +typedef id_t		chipid_t;
> +typedef id_t		lgrp_id_t;
> +
> +typedef struct cpuinfo {
> +	processorid_t	cpu_id;
> +	psetid_t	cpu_pset;
> +	chipid_t	cpu_chip;
> +	lgrp_id_t	cpu_lgrp;
> +} cpuinfo_t;
> +
> +typedef cpuinfo_t	*cpuinfo_t_p;
> +
> +inline processorid_t cpu = curcpu->cpu_id;
> +#pragma D attributes Stable/Stable/Common cpu
> +#pragma D binding "1.0" cpu
> +
> +inline psetid_t pset = curcpu->cpu_pset;
> +#pragma D attributes Stable/Stable/Common pset
> +#pragma D binding "1.0" pset
> +
> +inline chipid_t chip = curcpu->cpu_chip;
> +#pragma D attributes Stable/Stable/Common chip
> +#pragma D binding "1.0" chip
> +
> +inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
> +#pragma D attributes Stable/Stable/Common lgrp
> +#pragma D binding "1.0" lgrp
> diff --git a/dlibs/aarch64/6.10/signal.d b/dlibs/aarch64/6.10/signal.d
> new file mode 100644
> index 0000000000000..88493b427050f
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/signal.d
> @@ -0,0 +1,108 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
> + * Use is subject to license terms.
> + *
> + */
> +inline int SIGSYS = 31;
> +#pragma D binding "1.0" SIGSYS
> +
> +inline int SIGTERM = 15;
> +#pragma D binding "1.0" SIGTERM
> +
> +inline int SIGTSTP = 20;
> +#pragma D binding "1.0" SIGTSTP
> +
> +inline int SIGVTALRM = 26;
> +#pragma D binding "1.0" SIGVTALRM
> +
> +inline int SIGPIPE = 13;
> +#pragma D binding "1.0" SIGPIPE
> +
> +inline int SIGBUS = 7;
> +#pragma D binding "1.0" SIGBUS
> +
> +inline int SIGSTKFLT = 16;
> +#pragma D binding "1.0" SIGSTKFLT
> +
> +inline int SIGTRAP = 5;
> +#pragma D binding "1.0" SIGTRAP
> +
> +inline int SIGHUP = 1;
> +#pragma D binding "1.0" SIGHUP
> +
> +inline int SIGFPE = 8;
> +#pragma D binding "1.0" SIGFPE
> +
> +inline int SIGIO = 29;
> +#pragma D binding "1.0" SIGIO
> +
> +inline int SIGURG = 23;
> +#pragma D binding "1.0" SIGURG
> +
> +inline int SIGKILL = 9;
> +#pragma D binding "1.0" SIGKILL
> +
> +inline int SIGWINCH = 28;
> +#pragma D binding "1.0" SIGWINCH
> +
> +inline int SIGXFSZ = 25;
> +#pragma D binding "1.0" SIGXFSZ
> +
> +inline int SIGINT = 2;
> +#pragma D binding "1.0" SIGINT
> +
> +inline int SIGIOT = 6;
> +#pragma D binding "1.0" SIGIOT
> +
> +inline int SIGTTOU = 22;
> +#pragma D binding "1.0" SIGTTOU
> +
> +inline int SIGTTIN = 21;
> +#pragma D binding "1.0" SIGTTIN
> +
> +inline int SIGCHLD = 17;
> +#pragma D binding "1.0" SIGCHLD
> +
> +inline int SIGCONT = 18;
> +#pragma D binding "1.0" SIGCONT
> +
> +inline int SIGQUIT = 3;
> +#pragma D binding "1.0" SIGQUIT
> +
> +inline int SIGABRT = 6;
> +#pragma D binding "1.0" SIGABRT
> +
> +inline int SIGPWR = 30;
> +#pragma D binding "1.0" SIGPWR
> +
> +inline int SIGPROF = 27;
> +#pragma D binding "1.0" SIGPROF
> +
> +inline int SIGXCPU = 24;
> +#pragma D binding "1.0" SIGXCPU
> +
> +inline int SIGSTOP = 19;
> +#pragma D binding "1.0" SIGSTOP
> +
> +inline int SIGILL = 4;
> +#pragma D binding "1.0" SIGILL
> +
> +inline int SIGCLD = 17;
> +#pragma D binding "1.0" SIGCLD
> +
> +inline int SIGUSR1 = 10;
> +#pragma D binding "1.0" SIGUSR1
> +
> +inline int SIGPOLL = 29;
> +#pragma D binding "1.0" SIGPOLL
> +
> +inline int SIGSEGV = 11;
> +#pragma D binding "1.0" SIGSEGV
> +
> +inline int SIGUSR2 = 12;
> +#pragma D binding "1.0" SIGUSR2
> +
> +inline int SIGALRM = 14;
> +#pragma D binding "1.0" SIGALRM
> +
> diff --git a/dlibs/aarch64/6.10/tcp.d b/dlibs/aarch64/6.10/tcp.d
> new file mode 100644
> index 0000000000000..54e310cb4c6ed
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/tcp.d
> @@ -0,0 +1,231 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library net.d
> +#pragma D depends_on provider ip
> +#pragma D depends_on provider tcp
> +
> +inline int TH_FIN =	0x01;
> +inline int TH_SYN =	0x02;
> +inline int TH_RST =	0x04;
> +inline int TH_PSH =	0x08;
> +inline int TH_ACK =	0x10;
> +inline int TH_URG =	0x20;
> +inline int TH_ECE =	0x40;
> +inline int TH_CWR =	0x80;
> +
> +inline int TCP_STATE_IDLE = 		0x00;
> +inline int TCP_STATE_ESTABLISHED =	0x01;
> +inline int TCP_STATE_SYN_SENT =		0x02;
> +inline int TCP_STATE_SYN_RECEIVED =	0x03;
> +inline int TCP_STATE_FIN_WAIT_1 =	0x04;
> +inline int TCP_STATE_FIN_WAIT_2 =	0x05;
> +inline int TCP_STATE_TIME_WAIT =	0x06;
> +inline int TCP_STATE_CLOSED =		0x07;
> +inline int TCP_STATE_CLOSE_WAIT =	0x08;
> +inline int TCP_STATE_LAST_ACK =		0x09;
> +inline int TCP_STATE_LISTEN =		0x0a;
> +inline int TCP_STATE_CLOSING =		0x0b;
> +
> +/*
> + * Convert a TCP state value to a string.
> + */
> +inline string tcp_state_string[int state] =
> +	state == TCP_STATE_CLOSED ? "state-closed" :
> +	state == TCP_STATE_IDLE ? "state-idle" :
> +	state == TCP_STATE_LISTEN ? "state-listen" :
> +	state == TCP_STATE_SYN_SENT ? "state-syn-sent" :
> +	state == TCP_STATE_SYN_RECEIVED ? "state-syn-received" :
> +	state == TCP_STATE_ESTABLISHED ? "state-established" :
> +	state == TCP_STATE_CLOSE_WAIT ? "state-close-wait" :
> +	state == TCP_STATE_FIN_WAIT_1 ? "state-fin-wait-1" :
> +	state == TCP_STATE_CLOSING ? "state-closing" :
> +	state == TCP_STATE_LAST_ACK ? "state-last-ack" :
> +	state == TCP_STATE_FIN_WAIT_2 ? "state-fin-wait-2" :
> +	state == TCP_STATE_TIME_WAIT ? "state-time-wait" :
> +	"<unknown>";
> +#pragma D binding "1.6.3" tcp_state_string
> +
> +/*
> + * tcpinfo is the TCP header fields.
> + */
> +typedef struct tcpinfo {
> +	uint16_t tcp_sport;		/* source port */
> +	uint16_t tcp_dport;		/* destination port */
> +	uint32_t tcp_seq;		/* sequence number */
> +	uint32_t tcp_ack;		/* acknowledgment number */
> +	uint8_t tcp_offset;		/* data offset, in bytes */
> +	uint8_t tcp_flags;		/* flags */
> +	uint16_t tcp_window;		/* window size */
> +	uint16_t tcp_checksum;		/* checksum */
> +	uint16_t tcp_urgent;		/* urgent data pointer */
> +	uintptr_t tcp_hdr;		/* raw TCP header */
> +} tcpinfo_t;
> +
> +/*
> + * tcpsinfo contains stable TCP details from tcp_t.
> + */
> +typedef struct tcpsinfo {
> +	uintptr_t tcps_addr;
> +	int tcps_local;			/* is delivered locally, boolean */
> +	uint16_t tcps_lport;		/* local port */
> +	uint16_t tcps_rport;		/* remote port */
> +	string tcps_laddr;		/* local address, as a string */
> +	string tcps_raddr;		/* remote address, as a string */
> +	int tcps_state;			/* TCP state */
> +	uint32_t tcps_iss;		/* Initial sequence # sent */
> +	uint32_t tcps_suna;		/* sequence # sent but unacked */
> +	uint32_t tcps_snxt;		/* next sequence # to send */
> +	uint32_t tcps_rnxt;		/* next sequence # expected */
> +	uint32_t tcps_swnd;		/* send window size */
> +	int32_t tcps_snd_ws;		/* send window scaling */
> +	uint32_t tcps_rwnd;		/* receive window size */
> +	int32_t tcps_rcv_ws;		/* receive window scaling */
> +	uint32_t tcps_cwnd;		/* congestion window */
> +	uint32_t tcps_cwnd_ssthresh;	/* threshold for congestion avoidance */
> +	uint32_t tcps_sack_snxt;	/* next SACK seq # for retransmission */
> +	uint32_t tcps_rto;		/* round-trip timeout, msec */
> +	uint32_t tcps_mss;		/* max segment size */
> +	int tcps_retransmit;		/* retransmit send event, boolean */
> +	uint32_t tcps_rtt;		/* smoothed avg round-trip time, msec */
> +	uint32_t tcps_rtt_sd;		/* standard deviation of RTT */
> +	uint32_t tcps_irs;		/* Initial recv sequence # */
> +} tcpsinfo_t;
> +
> +/*
> + * tcplsinfo provides the old tcp state for state changes.
> + */
> +typedef struct tcplsinfo {
> +	int tcps_state;		/* previous TCP state */
> +} tcplsinfo_t;
> +
> +#pragma D binding "1.6.3" translator
> +translator tcpinfo_t < struct tcphdr *T > {
> +	tcp_sport = T ? ntohs(T->source) : 0;
> +	tcp_dport = T ? ntohs(T->dest) : 0;
> +	tcp_seq = T ? ntohl(T->seq) : 0;
> +	tcp_ack = T ? ntohl(T->ack_seq) : 0;
> +	tcp_offset = T ? (*(uint8_t *)(T + 12) & 0xf0) >> 2 : 0;
> +	tcp_flags = T ? *(uint8_t *)(T + 13) : 0;
> +	tcp_window = T ? ntohs(T->window) : 0;
> +	tcp_checksum = T ? ntohs(T->check) : 0;
> +	tcp_urgent = T ? ntohs(T->urg_ptr) : 0;
> +	tcp_hdr = (uintptr_t)T;
> +};
> +
> +/*
> + * In the main we simply translate from the "struct [tcp_]sock *" to
> + * a tcpsinfo_t *.  However there are a few exceptions:
> + *
> + * - tcps_state is always derived from arg6.  The reason is that in some
> + * state transitions sock->sk_state does not reflect the actual TCP
> + * connection state.  For example the TIME_WAIT state is handled in
> + * Linux by creating a separate timewait socket and the state of the
> + * original socket is CLOSED.  In some other cases we also need to
> + * instrument state transition prior to the update of sk_state.  To do
> + * all of this we rely on arg6.
> + * - we sometimes need to retrieve local/remote port/address settings from
> + * TCP and IP headers directly, for example prior to the address/port
> + * being committed to the socket.  To do this effectively we need to know
> + * if the packet data is inbound (in which case the local IP/port are the
> + * destination) or outbound (in which case the local IP/port are the source).
> + * arg7 is set to 0 for outbound traffic and 1 for inbound so we use these
> + * to reconstruct the address/port info where necessary.  arg2 used for IP
> + * information while arg4 contains the TCP header, so it is used for port data.
> + * NET_PROBE_INBOUND is defined as 1, NET_PROBE_OUTBOUND as 0 in net.d.
> + */
> +#pragma D binding "1.6.3" translator
> +translator tcpsinfo_t < struct tcp_sock *T > {
> +	tcps_addr = (uintptr_t)T;
> +	tcps_local =
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
> +	    (((struct sock *)T)->__sk_common.skc_rcv_saddr ==
> +	    ((struct sock *)T)->__sk_common.skc_daddr) :
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
> +	    (((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[0]
> +	    ==
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[0] &&
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[1]
> +            ==
> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[1] &&
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[2]
> +            ==
> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[2] &&
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[3])
> +	    : 0;
> +	tcps_lport = (T && ((struct inet_sock *)T)->inet_sport != 0) ?
> +	    ntohs(((struct inet_sock *)T)->inet_sport) :
> +	    (T && ((struct inet_sock *)T)->inet_sport == 0) ?
> +	    ntohs(((struct sock *)T)->__sk_common.skc_num) :
> +	    arg4 != NULL ?
> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
> +	    ((struct tcphdr *)arg4)->dest : ((struct tcphdr *)arg4)->source) :
> +	    0;
> +	tcps_rport = T && ((struct sock *)T)->__sk_common.skc_dport != 0 ?
> +	    ntohs(((struct sock *)T)->__sk_common.skc_dport) :
> +	    arg4 != NULL ?
> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
> +            ((struct tcphdr *)arg4)->source : ((struct tcphdr *)arg4)->dest) :
> +	    0;
> +	tcps_laddr =
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_rcv_saddr) :
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr) :
> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct iphdr *)arg2)->daddr : &((struct iphdr *)arg2)->saddr) :
> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct ipv6hdr *)arg2)->daddr :
> +	    &((struct ipv6hdr *)arg2)->saddr) :
> +	    "<unknown>";
> +	tcps_raddr =
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_daddr) :
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_daddr) :
> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct iphdr *)arg2)->saddr : &((struct iphdr *)arg2)->daddr) :
> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct ipv6hdr *)arg2)->saddr :
> +	    &((struct ipv6hdr *)arg2)->daddr) :
> +	    "<unknown>";
> +	tcps_state = arg6;
> +	tcps_iss = T ?
> +	    T->snd_una - (uint32_t)T->bytes_acked : 0;
> +	tcps_suna = T ? T->snd_una : 0;
> +	tcps_snxt = T ? T->snd_nxt : 0;
> +	tcps_rnxt = T ? T->rcv_nxt : 0;
> +	tcps_swnd = T ? T->snd_wnd : 0;
> +	tcps_snd_ws = T ? T->rx_opt.snd_wscale : 0;
> +	tcps_rwnd = T ? T->rcv_wnd : 0;
> +	tcps_rcv_ws = T ? T->rx_opt.rcv_wscale : 0;
> +	tcps_cwnd = T ? T->snd_cwnd : 0;
> +	tcps_cwnd_ssthresh = T ? T->snd_ssthresh : 0;
> +	tcps_sack_snxt = (T && T->sacked_out == 0) ? T->snd_una :
> +	    (T && T->highest_sack == NULL) ? T->snd_nxt :
> +	    (T && T->highest_sack != NULL) ?
> +	    ((struct tcp_skb_cb *)&((T->highest_sack->cb[0])))->seq : 0;
> +	tcps_rto = T ? T->inet_conn.icsk_rto : 0;
> +	tcps_mss = T ? T->mss_cache : 0;
> +	tcps_retransmit = T && arg0 ?
> +	    (((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq
> +	    < T->snd_nxt - 1) : 0;
> +	tcps_rtt = T ? (T->srtt_us >> 3)/1000 : 0;
> +	tcps_rtt_sd = T ? (T->mdev_us >> 2)/1000 : 0;
> +	tcps_irs = T && T->bytes_received > 0 ?
> +	    T->rcv_nxt - (uint32_t)T->bytes_received : 0;
> +};
> +
> +#pragma D binding "1.6.3" translator
> +translator tcplsinfo_t < int I > {
> +	tcps_state = I;
> +};
> diff --git a/dlibs/aarch64/6.10/udp.d b/dlibs/aarch64/6.10/udp.d
> new file mode 100644
> index 0000000000000..0e44ed6480415
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/udp.d
> @@ -0,0 +1,71 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library net.d
> +#pragma D depends_on provider udp
> +
> +/*
> + * udpinfo is the UDP header fields.
> + */
> +typedef struct udpinfo {
> +	uint16_t udp_sport;		/* source port */
> +	uint16_t udp_dport;		/* destination port */
> +	uint16_t udp_length;		/* total length */
> +	uint16_t udp_checksum;          /* headers + data checksum */
> +	struct udphdr *udp_hdr;		/* raw UDP header */
> +} udpinfo_t;
> +
> +/*
> + * udpsinfo contains stable UDP details from udp_t.
> + */
> +typedef struct udpsinfo {
> +	uintptr_t udps_addr;
> +	uint16_t udps_lport;		/* local port */
> +	uint16_t udps_rport;		/* remote port */
> +	string udps_laddr;		/* local address, as a string */
> +	string udps_raddr;		/* remote address, as a string */
> +} udpsinfo_t;
> +
> +#pragma D binding "1.6.3" translator
> +translator udpinfo_t < struct udphdr *U > {
> +	udp_sport = ntohs(U->source);
> +	udp_dport = ntohs(U->dest);
> +	udp_length = ntohs(U->len);
> +	udp_checksum = ntohs(U->check);
> +	udp_hdr = U;
> +};
> +
> +#pragma D binding "1.6.3" translator
> +translator udpsinfo_t < struct udp_sock *S > {
> +	/*
> +	 * We source udp info from other args but retain the sock arg here
> +	 * as it may be used in the future.
> +	 */
> +	udps_addr = (uintptr_t)S;
> +	udps_lport = arg4 ?
> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->source) :
> +	    ntohs(((struct udphdr *)arg4)->dest)) : 0;
> +	udps_rport = arg4 ?
> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->dest) :
> +	    ntohs(((struct udphdr *)arg4)->source)) : 0;
> +	udps_laddr = arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->saddr :
> +	    &((struct iphdr *)arg2)->daddr) :
> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->saddr :
> +	    &((struct ipv6hdr *)arg2)->daddr) :
> +	    "<unknown>";
> +	udps_raddr =
> +	    arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->daddr :
> +	    &((struct iphdr *)arg2)->saddr) :
> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->daddr :
> +	    &((struct ipv6hdr *)arg2)->saddr) :
> +	    "<unknown>";
> +};
> diff --git a/dlibs/aarch64/6.10/unistd.d b/dlibs/aarch64/6.10/unistd.d
> new file mode 100644
> index 0000000000000..c38bbed4bc85e
> --- /dev/null
> +++ b/dlibs/aarch64/6.10/unistd.d
> @@ -0,0 +1,36 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2007, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +inline int DTRACEFLT_UNKNOWN = 0;	/* Unknown fault */
> +#pragma D binding "1.0" DTRACEFLT_UNKNOWN
> +
> +inline int DTRACEFLT_BADADDR = 1;	/* Bad address */
> +#pragma D binding "1.0" DTRACEFLT_BADADDR
> +
> +inline int DTRACEFLT_BADALIGN = 2;	/* Bad alignment */
> +#pragma D binding "1.0" DTRACEFLT_BADALIGN
> +
> +inline int DTRACEFLT_ILLOP = 3;		/* Illegal operation */
> +#pragma D binding "1.0" DTRACEFLT_ILLOP
> +
> +inline int DTRACEFLT_DIVZERO = 4;	/* Divide-by-zero */
> +#pragma D binding "1.0" DTRACEFLT_DIVZERO
> +
> +inline int DTRACEFLT_NOSCRATCH = 5;	/* Out of scratch space */
> +#pragma D binding "1.0" DTRACEFLT_NOSCRATCH
> +
> +inline int DTRACEFLT_KPRIV = 6;		/* Illegal kernel access */
> +#pragma D binding "1.0" DTRACEFLT_KPRIV
> +
> +inline int DTRACEFLT_UPRIV = 7;		/* Illegal user access */
> +#pragma D binding "1.0" DTRACEFLT_UPRIV
> +
> +inline int DTRACEFLT_TUPOFLOW = 8;	/* Tuple stack overflow */
> +#pragma D binding "1.0" DTRACEFLT_TUPOFLOW
> +
> +inline int DTRACEFLT_BADSTACK = 9;	/* Bad stack */
> +#pragma D binding "1.4.1" DTRACEFLT_BADSTACK
> diff --git a/dlibs/x86_64/6.10.0/errno.d b/dlibs/x86_64/6.10.0/errno.d
> new file mode 100644
> index 0000000000000..f54fafe1861cc
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/errno.d
> @@ -0,0 +1,275 @@
> +
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
> + * Use is subject to license terms.
> + */
> +
> +inline int EPERM = 1;
> +#pragma D binding "1.0" EPERM
> +inline int ENOENT = 2;
> +#pragma D binding "1.0" ENOENT
> +inline int ESRCH = 3;
> +#pragma D binding "1.0" ESRCH
> +inline int EINTR = 4;
> +#pragma D binding "1.0" EINTR
> +inline int EIO = 5;
> +#pragma D binding "1.0" EIO
> +inline int ENXIO = 6;
> +#pragma D binding "1.0" ENXIO
> +inline int E2BIG = 7;
> +#pragma D binding "1.0" E2BIG
> +inline int ENOEXEC = 8;
> +#pragma D binding "1.0" ENOEXEC
> +inline int EBADF = 9;
> +#pragma D binding "1.0" EBADF
> +inline int ECHILD = 10;
> +#pragma D binding "1.0" ECHILD
> +inline int EAGAIN = 11;
> +#pragma D binding "1.0" EAGAIN
> +inline int ENOMEM = 12;
> +#pragma D binding "1.0" ENOMEM
> +inline int EACCES = 13;
> +#pragma D binding "1.0" EACCES
> +inline int EFAULT = 14;
> +#pragma D binding "1.0" EFAULT
> +inline int ENOTBLK = 15;
> +#pragma D binding "1.0" ENOTBLK
> +inline int EBUSY = 16;
> +#pragma D binding "1.0" EBUSY
> +inline int EEXIST = 17;
> +#pragma D binding "1.0" EEXIST
> +inline int EXDEV = 18;
> +#pragma D binding "1.0" EXDEV
> +inline int ENODEV = 19;
> +#pragma D binding "1.0" ENODEV
> +inline int ENOTDIR = 20;
> +#pragma D binding "1.0" ENOTDIR
> +inline int EISDIR = 21;
> +#pragma D binding "1.0" EISDIR
> +inline int EINVAL = 22;
> +#pragma D binding "1.0" EINVAL
> +inline int ENFILE = 23;
> +#pragma D binding "1.0" ENFILE
> +inline int EMFILE = 24;
> +#pragma D binding "1.0" EMFILE
> +inline int ENOTTY = 25;
> +#pragma D binding "1.0" ENOTTY
> +inline int ETXTBSY = 26;
> +#pragma D binding "1.0" ETXTBSY
> +inline int EFBIG = 27;
> +#pragma D binding "1.0" EFBIG
> +inline int ENOSPC = 28;
> +#pragma D binding "1.0" ENOSPC
> +inline int ESPIPE = 29;
> +#pragma D binding "1.0" ESPIPE
> +inline int EROFS = 30;
> +#pragma D binding "1.0" EROFS
> +inline int EMLINK = 31;
> +#pragma D binding "1.0" EMLINK
> +inline int EPIPE = 32;
> +#pragma D binding "1.0" EPIPE
> +inline int EDOM = 33;
> +#pragma D binding "1.0" EDOM
> +inline int ERANGE = 34;
> +#pragma D binding "1.0" ERANGE
> +inline int EDEADLK = 35;
> +#pragma D binding "1.0" EDEADLK
> +inline int ENAMETOOLONG = 36;
> +#pragma D binding "1.0" ENAMETOOLONG
> +inline int ENOLCK = 37;
> +#pragma D binding "1.0" ENOLCK
> +inline int ENOSYS = 38;
> +#pragma D binding "1.0" ENOSYS
> +inline int ENOTEMPTY = 39;
> +#pragma D binding "1.0" ENOTEMPTY
> +inline int ELOOP = 40;
> +#pragma D binding "1.0" ELOOP
> +inline int EWOULDBLOCK = 11;
> +#pragma D binding "1.0" EWOULDBLOCK
> +inline int ENOMSG = 42;
> +#pragma D binding "1.0" ENOMSG
> +inline int EIDRM = 43;
> +#pragma D binding "1.0" EIDRM
> +inline int ECHRNG = 44;
> +#pragma D binding "1.0" ECHRNG
> +inline int EL2NSYNC = 45;
> +#pragma D binding "1.0" EL2NSYNC
> +inline int EL3HLT = 46;
> +#pragma D binding "1.0" EL3HLT
> +inline int EL3RST = 47;
> +#pragma D binding "1.0" EL3RST
> +inline int ELNRNG = 48;
> +#pragma D binding "1.0" ELNRNG
> +inline int EUNATCH = 49;
> +#pragma D binding "1.0" EUNATCH
> +inline int ENOCSI = 50;
> +#pragma D binding "1.0" ENOCSI
> +inline int EL2HLT = 51;
> +#pragma D binding "1.0" EL2HLT
> +inline int EBADE = 52;
> +#pragma D binding "1.0" EBADE
> +inline int EBADR = 53;
> +#pragma D binding "1.0" EBADR
> +inline int EXFULL = 54;
> +#pragma D binding "1.0" EXFULL
> +inline int ENOANO = 55;
> +#pragma D binding "1.0" ENOANO
> +inline int EBADRQC = 56;
> +#pragma D binding "1.0" EBADRQC
> +inline int EBADSLT = 57;
> +#pragma D binding "1.0" EBADSLT
> +inline int EDEADLOCK = 35;
> +#pragma D binding "1.0" EDEADLOCK
> +inline int EBFONT = 59;
> +#pragma D binding "1.0" EBFONT
> +inline int ENOSTR = 60;
> +#pragma D binding "1.0" ENOSTR
> +inline int ENODATA = 61;
> +#pragma D binding "1.0" ENODATA
> +inline int ETIME = 62;
> +#pragma D binding "1.0" ETIME
> +inline int ENOSR = 63;
> +#pragma D binding "1.0" ENOSR
> +inline int ENONET = 64;
> +#pragma D binding "1.0" ENONET
> +inline int ENOPKG = 65;
> +#pragma D binding "1.0" ENOPKG
> +inline int EREMOTE = 66;
> +#pragma D binding "1.0" EREMOTE
> +inline int ENOLINK = 67;
> +#pragma D binding "1.0" ENOLINK
> +inline int EADV = 68;
> +#pragma D binding "1.0" EADV
> +inline int ESRMNT = 69;
> +#pragma D binding "1.0" ESRMNT
> +inline int ECOMM = 70;
> +#pragma D binding "1.0" ECOMM
> +inline int EPROTO = 71;
> +#pragma D binding "1.0" EPROTO
> +inline int EMULTIHOP = 72;
> +#pragma D binding "1.0" EMULTIHOP
> +inline int EDOTDOT = 73;
> +#pragma D binding "1.0" EDOTDOT
> +inline int EBADMSG = 74;
> +#pragma D binding "1.0" EBADMSG
> +inline int EOVERFLOW = 75;
> +#pragma D binding "1.0" EOVERFLOW
> +inline int ENOTUNIQ = 76;
> +#pragma D binding "1.0" ENOTUNIQ
> +inline int EBADFD = 77;
> +#pragma D binding "1.0" EBADFD
> +inline int EREMCHG = 78;
> +#pragma D binding "1.0" EREMCHG
> +inline int ELIBACC = 79;
> +#pragma D binding "1.0" ELIBACC
> +inline int ELIBBAD = 80;
> +#pragma D binding "1.0" ELIBBAD
> +inline int ELIBSCN = 81;
> +#pragma D binding "1.0" ELIBSCN
> +inline int ELIBMAX = 82;
> +#pragma D binding "1.0" ELIBMAX
> +inline int ELIBEXEC = 83;
> +#pragma D binding "1.0" ELIBEXEC
> +inline int EILSEQ = 84;
> +#pragma D binding "1.0" EILSEQ
> +inline int ERESTART = 85;
> +#pragma D binding "1.0" ERESTART
> +inline int ESTRPIPE = 86;
> +#pragma D binding "1.0" ESTRPIPE
> +inline int EUSERS = 87;
> +#pragma D binding "1.0" EUSERS
> +inline int ENOTSOCK = 88;
> +#pragma D binding "1.0" ENOTSOCK
> +inline int EDESTADDRREQ = 89;
> +#pragma D binding "1.0" EDESTADDRREQ
> +inline int EMSGSIZE = 90;
> +#pragma D binding "1.0" EMSGSIZE
> +inline int EPROTOTYPE = 91;
> +#pragma D binding "1.0" EPROTOTYPE
> +inline int ENOPROTOOPT = 92;
> +#pragma D binding "1.0" ENOPROTOOPT
> +inline int EPROTONOSUPPORT = 93;
> +#pragma D binding "1.0" EPROTONOSUPPORT
> +inline int ESOCKTNOSUPPORT = 94;
> +#pragma D binding "1.0" ESOCKTNOSUPPORT
> +inline int EOPNOTSUPP = 95;
> +#pragma D binding "1.0" EOPNOTSUPP
> +inline int EPFNOSUPPORT = 96;
> +#pragma D binding "1.0" EPFNOSUPPORT
> +inline int EAFNOSUPPORT = 97;
> +#pragma D binding "1.0" EAFNOSUPPORT
> +inline int EADDRINUSE = 98;
> +#pragma D binding "1.0" EADDRINUSE
> +inline int EADDRNOTAVAIL = 99;
> +#pragma D binding "1.0" EADDRNOTAVAIL
> +inline int ENETDOWN = 100;
> +#pragma D binding "1.0" ENETDOWN
> +inline int ENETUNREACH = 101;
> +#pragma D binding "1.0" ENETUNREACH
> +inline int ENETRESET = 102;
> +#pragma D binding "1.0" ENETRESET
> +inline int ECONNABORTED = 103;
> +#pragma D binding "1.0" ECONNABORTED
> +inline int ECONNRESET = 104;
> +#pragma D binding "1.0" ECONNRESET
> +inline int ENOBUFS = 105;
> +#pragma D binding "1.0" ENOBUFS
> +inline int EISCONN = 106;
> +#pragma D binding "1.0" EISCONN
> +inline int ENOTCONN = 107;
> +#pragma D binding "1.0" ENOTCONN
> +inline int ESHUTDOWN = 108;
> +#pragma D binding "1.0" ESHUTDOWN
> +inline int ETOOMANYREFS = 109;
> +#pragma D binding "1.0" ETOOMANYREFS
> +inline int ETIMEDOUT = 110;
> +#pragma D binding "1.0" ETIMEDOUT
> +inline int ECONNREFUSED = 111;
> +#pragma D binding "1.0" ECONNREFUSED
> +inline int EHOSTDOWN = 112;
> +#pragma D binding "1.0" EHOSTDOWN
> +inline int EHOSTUNREACH = 113;
> +#pragma D binding "1.0" EHOSTUNREACH
> +inline int EALREADY = 114;
> +#pragma D binding "1.0" EALREADY
> +inline int EINPROGRESS = 115;
> +#pragma D binding "1.0" EINPROGRESS
> +inline int ESTALE = 116;
> +#pragma D binding "1.0" ESTALE
> +inline int EUCLEAN = 117;
> +#pragma D binding "1.0" EUCLEAN
> +inline int ENOTNAM = 118;
> +#pragma D binding "1.0" ENOTNAM
> +inline int ENAVAIL = 119;
> +#pragma D binding "1.0" ENAVAIL
> +inline int EISNAM = 120;
> +#pragma D binding "1.0" EISNAM
> +inline int EREMOTEIO = 121;
> +#pragma D binding "1.0" EREMOTEIO
> +inline int EDQUOT = 122;
> +#pragma D binding "1.0" EDQUOT
> +inline int ENOMEDIUM = 123;
> +#pragma D binding "1.0" ENOMEDIUM
> +inline int EMEDIUMTYPE = 124;
> +#pragma D binding "1.0" EMEDIUMTYPE
> +inline int ECANCELED = 125;
> +#pragma D binding "1.0" ECANCELED
> +inline int ENOKEY = 126;
> +#pragma D binding "1.0" ENOKEY
> +inline int EKEYEXPIRED = 127;
> +#pragma D binding "1.0" EKEYEXPIRED
> +inline int EKEYREVOKED = 128;
> +#pragma D binding "1.0" EKEYREVOKED
> +inline int EKEYREJECTED = 129;
> +#pragma D binding "1.0" EKEYREJECTED
> +inline int EOWNERDEAD = 130;
> +#pragma D binding "1.0" EOWNERDEAD
> +inline int ENOTRECOVERABLE = 131;
> +#pragma D binding "1.0" ENOTRECOVERABLE
> +inline int ERFKILL = 132;
> +#pragma D binding "1.0" ERFKILL
> +inline int EHWPOISON = 133;
> +#pragma D binding "1.0" EHWPOISON
> +inline int ENOTSUP = 95;
> +#pragma D binding "1.0" ENOTSUP
> diff --git a/dlibs/x86_64/6.10.0/io.d b/dlibs/x86_64/6.10.0/io.d
> new file mode 100644
> index 0000000000000..de693c187efcf
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/io.d
> @@ -0,0 +1,235 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on provider sched
> +
> +typedef char	*caddr_t;
> +
> +typedef struct bufinfo {
> +	int b_flags;			/* buffer status */
> +	size_t b_bcount;		/* number of bytes */
> +	caddr_t b_addr;			/* buffer address */
> +	uint64_t b_lblkno;		/* block # on device */
> +	uint64_t b_blkno;		/* expanded block # on device */
> +	size_t b_resid;			/* # of bytes not transferred */
> +	size_t b_bufsize;		/* size of allocated buffer */
> +	caddr_t b_iodone;		/* I/O completion routine */
> +	int b_error;			/* expanded error field */
> +	dev_t b_edev;			/* extended device */
> +} bufinfo_t;
> +
> +inline int B_BUSY = 0x000001;
> +#pragma D binding "1.0" B_BUSY
> +inline int B_DONE = 0x000002;
> +#pragma D binding "1.0" B_DONE
> +inline int B_ERROR = 0x000004;
> +#pragma D binding "1.0" B_ERROR
> +inline int B_PAGEIO = 0x000010;
> +#pragma D binding "1.0" B_PAGEIO
> +inline int B_PHYS = 0x000020;
> +#pragma D binding "1.0" B_PHYS
> +inline int B_READ = 0x000040;
> +#pragma D binding "1.0" B_READ
> +inline int B_WRITE = 0x000100;
> +#pragma D binding "1.0" B_WRITE
> +inline int B_ASYNC = 0x000400;
> +#pragma D binding "1.0" B_ASYNC
> +
> +#pragma D binding "1.0" translator
> +translator bufinfo_t < struct buffer_head *B > {
> +	b_flags = (int)arg1 & 0x01 ? B_WRITE : B_READ;
> +	b_addr = B->b_data;
> +	b_bcount = B->b_size;
> +	b_lblkno = B->b_blocknr;
> +	b_blkno = B->b_blocknr;
> +	b_resid = 0;
> +	b_bufsize = B->b_size;
> +	b_iodone = (caddr_t)B->b_end_io;
> +	b_error = 0;			/* b_state ?? */
> +	b_edev = B->b_bdev->bd_dev;
> +};
> +
> +/*
> + * From linux/blk_types.h.
> + */
> +
> +/* bit # in bi_flags */
> +inline int BIO_USER_MAPPED = 6;
> +
> +/* bit mask in bi_rw */
> +inline int REQ_WRITE = 0x01;
> +
> +inline int REQ_SYNC = 0x800;
> +
> +
> +
> +
> +
> +
> +
> +#pragma D binding "1.6.3" translator
> +translator bufinfo_t < struct bio *B > {
> +	b_flags = ((int)B->bi_opf & REQ_WRITE ? B_WRITE : B_READ) |
> +		((int)B->bi_opf & REQ_SYNC ? 0 : B_ASYNC) |
> +		((int)B->bi_flags & (1 << BIO_USER_MAPPED) ? B_PAGEIO : B_PHYS);
> +	b_addr = 0;
> +	b_bcount = B->bi_iter.bi_size;
> +	b_lblkno = B->bi_iter.bi_sector;
> +	b_blkno = B->bi_iter.bi_sector;
> +	b_resid = 0;
> +	b_bufsize = B->bi_iter.bi_size;
> +	b_iodone = (caddr_t)B->bi_end_io;
> +	b_error = 0;
> +	b_edev = B->bi_bdev == NULL ? 0 : B->bi_bdev->bd_dev;
> +};
> +
> +typedef struct devinfo {
> +	int dev_major;			/* major number */
> +	int dev_minor;			/* minor number */
> +	int dev_instance;		/* instance number */
> +	string dev_name;		/* name of device */
> +	string dev_statname;		/* name of device + instance/minor */
> +	string dev_pathname;		/* pathname of device */
> +} devinfo_t;
> +
> +
> +
> +#pragma D binding "1.0" translator
> +translator devinfo_t < struct buffer_head *B > {
> +	dev_major = getmajor(B->b_bdev->bd_dev);
> +	dev_minor = getminor(B->b_bdev->bd_dev);
> +	dev_instance = 0;		/* not used? */
> +	dev_name = B->b_bdev->bd_disk->part0->bd_device.parent
> +	    ? B->b_bdev->bd_disk->part0->bd_device.parent->driver->name
> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.parent->driver->name)
> +		: "<none>"
> +	    : B->b_bdev->bd_disk->part0->bd_device.driver->name
> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.driver->name)
> +		: "<none>";
> +	dev_statname = B->b_bdev->__bd_flags.counter & 255 == 0
> +			? stringof(B->b_bdev->bd_disk->disk_name)
> +			: strjoin(stringof(B->b_bdev->bd_disk->disk_name),
> +				  lltostr(B->b_bdev->__bd_flags.counter & 255));
> +	dev_pathname = strjoin(
> +			"/dev/",
> +			B->b_bdev->__bd_flags.counter & 255 == 0
> +			    ? stringof(B->b_bdev->bd_disk->disk_name)
> +			    : strjoin(stringof(B->b_bdev->bd_disk->disk_name),
> +				      lltostr(B->b_bdev->__bd_flags.counter & 255))
> +		       );
> +};
> +
> +#pragma D binding "1.6.3" translator
> +translator devinfo_t < struct bio *B > {
> +	dev_major = B->bi_bdev == NULL ? 0 : getmajor(B->bi_bdev->bd_dev);
> +	dev_minor = B->bi_bdev == NULL ? 0 : getminor(B->bi_bdev->bd_dev);
> +	dev_instance = 0;
> +	dev_name = B->bi_bdev == NULL
> +			? "nfs"
> +			: stringof(((struct blk_major_name **)`major_names)[
> +					getmajor(B->bi_bdev->bd_dev) % 255
> +				   ]->name);
> +	dev_statname = B->bi_bdev == NULL ? "nfs" :
> +	    B->bi_bdev->__bd_flags.counter & 255 == 0 ? stringof(B->bi_bdev->bd_disk->disk_name) :
> +	    strjoin(stringof(B->bi_bdev->bd_disk->disk_name), lltostr(B->bi_bdev->__bd_flags.counter & 255));
> +	dev_pathname = B->bi_bdev == NULL ? "<nfs>" : "<unknown>";
> +};
> +
> +typedef struct fileinfo {
> +	string fi_name;			/* name (basename of fi_pathname) */
> +	string fi_dirname;		/* directory (dirname of fi_pathname) */
> +	string fi_pathname;		/* full pathname */
> +	loff_t fi_offset;		/* offset within file */
> +	string fi_fs;			/* filesystem */
> +	string fi_mount;		/* mount point of file system */
> +	int fi_oflags;			/* open(2) flags for file descriptor */
> +} fileinfo_t;
> +
> +#pragma D binding "1.0" translator
> +translator fileinfo_t < struct buffer_head *B > {
> +	fi_name = "<unknown>";
> +	fi_dirname = "<unknown>";
> +	fi_pathname = "<unknown>";
> +	fi_offset = 0;
> +	fi_fs = "<unknown>";
> +	fi_mount = "<unknown>";
> +	fi_oflags = 0;
> +};
> +
> +inline int O_ACCMODE = 0003;
> +#pragma D binding "1.1" O_ACCMODE
> +inline int O_RDONLY = 00;
> +#pragma D binding "1.1" O_RDONLY
> +inline int O_WRONLY = 01;
> +#pragma D binding "1.1" O_WRONLY
> +inline int O_RDWR = 02;
> +#pragma D binding "1.1" O_RDWR
> +inline int O_CREAT = 00000100;
> +#pragma D binding "1.1" O_CREAT
> +inline int O_EXCL = 00000200;
> +#pragma D binding "1.1" O_EXCL
> +inline int O_NOCTTY = 00000400;
> +#pragma D binding "1.1" O_NOCTTY
> +inline int O_TRUNC = 00001000;
> +#pragma D binding "1.1" O_TRUNC
> +inline int O_APPEND = 00002000;
> +#pragma D binding "1.1" O_APPEND
> +inline int O_NONBLOCK = 00004000;
> +#pragma D binding "1.1" O_NONBLOCK
> +inline int O_NDELAY = 00004000;
> +#pragma D binding "1.1" O_NDELAY
> +inline int O_SYNC = (04000000|010000);
> +#pragma D binding "1.1" O_SYNC
> +inline int O_FSYNC = (04000000|010000);
> +#pragma D binding "1.1" O_FSYNC
> +inline int O_ASYNC = 020000;
> +#pragma D binding "1.1" O_ASYNC
> +inline int O_DIRECTORY = 0200000;
> +#pragma D binding "1.1" O_DIRECTORY
> +inline int O_NOFOLLOW = 0400000;
> +#pragma D binding "1.1" O_NOFOLLOW
> +inline int O_CLOEXEC = 02000000;
> +#pragma D binding "1.1" O_CLOEXEC
> +inline int O_DSYNC = 010000;
> +#pragma D binding "1.1" O_DSYNC
> +inline int O_RSYNC = (04000000|010000);
> +#pragma D binding "1.1" O_RSYNC
> +
> +#pragma D binding "1.1" translator
> +translator fileinfo_t < struct file *F > {
> +	fi_name = F == NULL
> +			? "<none>"
> +			: stringof(F->f_path.dentry->d_name.name);
> +	fi_dirname = F == NULL
> +			? "<none>"
> +			: dirname(d_path(&(F->f_path)));
> +	fi_pathname = F == NULL
> +			? "<none>"
> +			: d_path(&(F->f_path));
> +	fi_offset = F == NULL
> +			? 0
> +			: F->f_pos;
> +	fi_fs = F == NULL
> +			? "<none>"
> +			: stringof(F->f_path.mnt->mnt_sb->s_type->name);
> +	fi_mount = F == NULL
> +			? "<none>"
> +			: "<unknown>";
> +	fi_oflags = F == NULL
> +			? 0
> +			: F->f_flags;
> +};
> +
> +inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
> +				 fd >= 0 && fd < curthread->files->fdt->max_fds
> +					? curthread->files->fdt->fd[fd]
> +					: NULL
> +				);
> +
> +#pragma D attributes Stable/Stable/Common fds
> +#pragma D binding "1.1" fds
> diff --git a/dlibs/x86_64/6.10.0/ip.d b/dlibs/x86_64/6.10.0/ip.d
> new file mode 100644
> index 0000000000000..f8b77f1224115
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/ip.d
> @@ -0,0 +1,341 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2007, 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library net.d
> +#pragma D depends_on library procfs.d
> +#pragma D depends_on provider ip
> +
> +inline int IPPROTO_IP		=	0;
> +inline int IPPROTO_ICMP		=	1;
> +inline int IPPROTO_IGMP		=	2;
> +inline int IPPROTO_IPIP		=	4;
> +inline int IPPROTO_TCP		=	6;
> +inline int IPPROTO_EGP		=	8;
> +inline int IPPROTO_PUP		=	12;
> +inline int IPPROTO_UDP		=	17;
> +inline int IPPROTO_IDP		=	22;
> +inline int IPPROTO_TP		=	29;
> +inline int IPPROTO_DCCP		=	33;
> +inline int IPPROTO_IPV6		=	41;
> +inline int IPPROTO_RSVP		=	46;
> +inline int IPPROTO_GRE		=	47;
> +inline int IPPROTO_ESP		=	50;
> +inline int IPPROTO_AH		=	51;
> +inline int IPPROTO_OSPF		=	89;
> +inline int IPPROTO_MTP		=	92;
> +inline int IPPROTO_BEETPH	=	94;
> +inline int IPPROTO_ENCAP	=	98;
> +inline int IPPROTO_PIM		=	103;
> +inline int IPPROTO_COMP		=	108;
> +inline int IPPROTO_SCTP		=	132;
> +inline int IPPROTO_UDPLITE	=	136;
> +inline int IPPROTO_RAW		=	255;
> +inline int IPPROTO_MAX		=	256;
> +inline int IPPROTO_HOPOPTS	=	0;
> +inline int IPPROTO_ROUTING	=	43;
> +inline int IPPROTO_FRAGMENT	=	44;
> +inline int IPPROTO_ICMPV6	=	58;
> +inline int IPPROTO_NONE		=	59;
> +inline int IPPROTO_DSTOPTS	=	60;
> +inline int IPPROTO_MH		=	135;
> +
> +inline int TCP_MIN_HEADER_LENGTH =	20;
> +
> +/*
> + * For compatibility with Solaris.  Here the netstackid will be the pointer
> + * to the net namespace (nd_net in struct net_device).
> + */
> +typedef uint64_t	netstackid_t;
> +typedef __be32		ipaddr_t;
> +typedef struct in6_addr	in6_addr_t;
> +
> +/*
> + * pktinfo is where packet ID info can be made available for deeper
> + * analysis if packet IDs become supported by the kernel in the future.
> + * The pkt_addr member is currently always NULL.
> + */
> +typedef struct pktinfo {
> +	uintptr_t pkt_addr;
> +} pktinfo_t;
> +
> +/*
> + * csinfo is where connection state info is made available.
> + */
> +typedef struct csinfo {
> +	uintptr_t cs_addr;
> +	uint64_t cs_cid;
> +} csinfo_t;
> +
> +/*
> + * ipinfo contains common IP info for both IPv4 and IPv6.
> + */
> +typedef struct ipinfo {
> +	uint8_t ip_ver;			/* IP version (4, 6) */
> +	uint32_t ip_plength;		/* payload length */
> +	string ip_saddr;		/* source address */
> +	string ip_daddr;		/* destination address */
> +} ipinfo_t;
> +
> +/*
> + * ifinfo contains network interface info.
> + */
> +typedef struct ifinfo {
> +	string if_name;			/* interface name */
> +	int8_t if_local;		/* is delivered locally */
> +	netstackid_t if_ipstack;	/* netns pointer on Linux */
> +	uintptr_t if_addr;		/* pointer to raw struct net_device */
> +} ifinfo_t;
> +
> +/*
> + * ipv4info is a translated version of the IPv4 header (with raw pointer).
> + * These values are NULL if the packet is not IPv4.
> + */
> +typedef struct ipv4info {
> +	uint8_t ipv4_ver;		/* IP version (4) */
> +	uint8_t ipv4_ihl;		/* header length, bytes */
> +	uint8_t ipv4_tos;		/* type of service field */
> +	uint16_t ipv4_length;		/* length (header + payload) */
> +	uint16_t ipv4_ident;		/* identification */
> +	uint8_t ipv4_flags;		/* IP flags */
> +	uint16_t ipv4_offset;		/* fragment offset */
> +	uint8_t ipv4_ttl;		/* time to live */
> +	uint8_t ipv4_protocol;		/* next level protocol */
> +	string ipv4_protostr;		/* next level protocol, as string */
> +	uint16_t ipv4_checksum;		/* header checksum */
> +	ipaddr_t ipv4_src;		/* source address */
> +	ipaddr_t ipv4_dst;		/* destination address */
> +	string ipv4_saddr;		/* source address, string */
> +	string ipv4_daddr;		/* destination address, string */
> +	struct iphdr *ipv4_hdr;		/* pointer to raw header */
> +} ipv4info_t;
> +
> +/*
> + * ipv6info is a translated version of the IPv6 header (with raw pointer).
> + * These values are NULL if the packet is not IPv6.
> + */
> +typedef struct ipv6info {
> +	uint8_t ipv6_ver;		/* IP version (6) */
> +	uint8_t ipv6_tclass;		/* traffic class */
> +	uint32_t ipv6_flow;		/* flow label */
> +	uint16_t ipv6_plen;		/* payload length */
> +	uint8_t ipv6_nexthdr;		/* next header protocol */
> +	string ipv6_nextstr;		/* next header protocol, as string */
> +	uint8_t ipv6_hlim;		/* hop limit */
> +	in6_addr_t *ipv6_src;		/* source address */
> +	in6_addr_t *ipv6_dst;		/* destination address */
> +	string ipv6_saddr;		/* source address, string */
> +	string ipv6_daddr;		/* destination address, string */
> +	struct ipv6hdr *ipv6_hdr;	/* pointer to raw header */
> +} ipv6info_t;
> +
> +/*
> + * void_ip_t is a void pointer to either an IPv4 or IPv6 header.  It has
> + * its own type name so that a translator can be determined.
> + */
> +typedef uintptr_t void_ip_t;
> +
> +/*
> + * __dtrace_tcp_void_ip_t is used by the translator to take either the
> + * non-NULL void_ip_t * passed in or, if it is NULL, uses arg3 (struct tcp *)
> + * from the tcp:::send probe to translate to an ipinfo_t.
> + * This allows us to present the consumer with header data based on the
> + * struct tcp * when IP information is not yet present (for TCP send).
> + */
> +typedef void * __dtrace_tcp_void_ip_t;
> +
> +#pragma D binding "1.5" translator
> +translator pktinfo_t < struct sk_buff *s > {
> +	pkt_addr = (uintptr_t)s;
> +};
> +
> +#pragma D binding "1.5" translator
> +translator csinfo_t < struct sock *s > {
> +	cs_addr = (uintptr_t)s;
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < struct iphdr *I > {
> +	ip_ver = 4;
> +        ip_plength = I != NULL ? (ntohs(I->tot_len) - I->ihl << 2) : 0;
> +	ip_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<unknown>";
> +	ip_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<unknown>";
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < struct ipv6hdr *I > {
> +	ip_ver = 6;
> +	ip_plength = I != NULL ? ntohs(I->payload_len) : 0;
> +	ip_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<unknown>";
> +	ip_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<unknown>";
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < void_ip_t *I > {
> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 : 0;
> +	ip_plength = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
> +	    (ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2)) :
> +	    *(uint8_t *)I >> 4 == 6 ?
> +	    ntohs(((struct ipv6hdr *)I)->payload_len) : 0) : 0;
> +	ip_saddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->saddr) : *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) : "<unknown>") :
> +	    "<unknown>";
> +	ip_daddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->daddr) : *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) : "<unknown>") :
> +	    "<unknown>";
> +};
> +
> +/*
> + * In some cases where the ipinfo_t * is NULL we wish to construct IP info
> + * using the struct tcp_sock * (arg3).  In order to map local IP to source
> + * or destination IP address appropriately we need to check if the associated
> + * data is inbound (NET_PROBE_INBOUND in arg7) or outbound (NET_PROBE_OUTBOUND);
> + * the value is stored in arg7.  If inbound, we map the local IP address to
> + * ip_daddr (destination), and if outbound it is mapped to ip_saddr.
> + */
> +#pragma D binding "1.5" translator
> +translator ipinfo_t < __dtrace_tcp_void_ip_t *I > {
> +	/*
> +	 * General strategy used is to rely on the IP header I if it is
> +	 * non-null; otherwise we try to reconstruct IP values from arg3
> +	 * (a struct tcp_sock *).
> +	 */
> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET ? 4 :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ? 6 : 0;
> +	/*
> +	 * For ip_plength we fall back to using TCP skb data from the tcp_skb_cb
> +	 * to determine payload length.
> +	 */
> +	ip_plength = I != NULL && *(uint8_t *)I >> 4 == 4 ?
> +	    ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2) :
> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
> +	    ntohs(((struct ipv6hdr *)I)->payload_len) :
> +	    arg0 != NULL ?
> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq -
> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->seq :
> +	    0;
> +	/*
> +	 * For source/destination addresses, we again try to use the IP header I
> +	 * if available.  If I is NULL, we utilize arg3 (struct tcp_sock *)
> +	 * but the problem here is that it stores local and remote IP addresses
> +	 * _not_ source and destination.  So we need to know if traffic is
> +	 * inbound or outbound. If inbound, IP source address is remote
> +	 * socket address (skc_daddr) and destination IP address is local socket
> +	 * address (skc_rcv_saddr).  If outbound, IP source address is local
> +	 * socket address and IP destination address is remote socket address.
> +	 */
> +	ip_saddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->saddr) :
> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_daddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr) :
> +	    "<unknown>";
> +	ip_daddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
> +	    inet_ntoa(&((struct iphdr *)I)->daddr) :
> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_daddr) :
> +	    arg3 != NULL &&
> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr :
> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr) :
> +	    "<unknown>";
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ifinfo_t < struct net_device *N > {
> +	if_name = N != NULL ? stringof(N->name) : "<unknown>";
> +	if_ipstack = (N != NULL && sizeof(N->nd_net) > 0) ?
> +	    ((uint64_t)N->nd_net.net) : 0;
> +	if_local = (N == NULL);	/* is delivered locally */
> +	if_addr = (uintptr_t)N;	/* pointer to raw struct net_device ptr */
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipv4info_t < struct iphdr *I > {
> +	ipv4_ver = I != NULL ? 4 : 0;
> +	ipv4_ihl = I != NULL ? ((*(uint8_t *)I & 0xf) << 2) : 0;
> +	ipv4_tos = I != NULL ? I->tos : 0;
> +	ipv4_length = I != NULL ? ntohs(I->tot_len) : 0;
> +	ipv4_ident = I != NULL ? ntohs(I->id) : 0;
> +	ipv4_flags = I != NULL ? ntohs(I->frag_off) >> 12 : 0;
> +	ipv4_offset = I != NULL ? ntohs(I->frag_off) & 0x0fff : 0;
> +	ipv4_ttl = I != NULL ? I->ttl : 0;
> +	ipv4_protocol = I != NULL ? I->protocol : 0;
> +	ipv4_protostr = I == NULL ? "<null>" :
> +	    I->protocol == IPPROTO_TCP     ? "TCP"    :
> +	    I->protocol == IPPROTO_UDP     ? "UDP"    :
> +	    I->protocol == IPPROTO_IP      ? "IP"     :
> +	    I->protocol == IPPROTO_ICMP    ? "ICMP"   :
> +	    I->protocol == IPPROTO_IGMP    ? "IGMP"   :
> +	    I->protocol == IPPROTO_EGP     ? "EGP"    :
> +	    I->protocol == IPPROTO_IPV6    ? "IPv6"   :
> +	    I->protocol == IPPROTO_ROUTING ? "ROUTE"  :
> +	    I->protocol == IPPROTO_ESP     ? "ESP"    :
> +	    I->protocol == IPPROTO_AH      ? "AH"     :
> +	    I->protocol == IPPROTO_ICMPV6  ? "ICMPv6" :
> +	    I->protocol == IPPROTO_OSPF    ? "OSPF"   :
> +	    I->protocol == IPPROTO_SCTP    ? "SCTP"   :
> +	    I->protocol == IPPROTO_RAW     ? "RAW"    :
> +	    lltostr((uint64_t)I->protocol);
> +	ipv4_checksum = I != NULL ? ntohs(I->check) : 0;
> +	ipv4_src = I != NULL ? I->saddr : 0;
> +	ipv4_dst = I != NULL ? I->daddr : 0;
> +	ipv4_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<null>";
> +	ipv4_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<null>";
> +	ipv4_hdr = I;
> +};
> +
> +#pragma D binding "1.5" translator
> +translator ipv6info_t < struct ipv6hdr *I > {
> +	ipv6_ver = I != NULL ? ((*(uint8_t *)I) >> 4) : 0;
> +	ipv6_tclass = I != NULL ? ((ntohl(*(uint32_t *)I) & 0x0fffffff) >> 20) : 0;
> +	ipv6_flow = I != NULL ? (ntohl(*(uint32_t *)I) & 0x000fffff) : 0;
> +	ipv6_plen = I != NULL ? ntohs(I->payload_len) : 0;
> +	ipv6_nexthdr = I != NULL ? I->nexthdr : 0;
> +	ipv6_nextstr = I == NULL ? "<null>" :
> +	    I->nexthdr == IPPROTO_TCP	?	"TCP"		:
> +	    I->nexthdr == IPPROTO_UDP	?	"UDP"		:
> +	    I->nexthdr == IPPROTO_IP	?	"IP"		:
> +	    I->nexthdr == IPPROTO_ICMP	?	"ICMP"		:
> +	    I->nexthdr == IPPROTO_IGMP	?	"IGMP"		:
> +	    I->nexthdr == IPPROTO_EGP	?	"EGP"		:
> +	    I->nexthdr == IPPROTO_IPV6	?	"IPv6"		:
> +	    I->nexthdr == IPPROTO_ROUTING ?	"ROUTE"		:
> +	    I->nexthdr == IPPROTO_ESP	?	"ESP"		:
> +	    I->nexthdr == IPPROTO_AH	?	"AH"		:
> +	    I->nexthdr == IPPROTO_ICMPV6 ?	"ICMPv6"	:
> +	    I->nexthdr == IPPROTO_OSPF ?	"OSPF"		:
> +	    I->nexthdr == IPPROTO_SCTP	?	"SCTP"		:
> +	    I->nexthdr == IPPROTO_RAW	?	"RAW"		:
> +	    lltostr((uint64_t)I->nexthdr);
> +	ipv6_hlim = I != NULL ? I->hop_limit : 0;
> +	ipv6_src = I != NULL ? &I->saddr : NULL;
> +	ipv6_dst = I != NULL ? &I->daddr : 0;
> +	ipv6_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<null>";
> +	ipv6_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<null>";
> +	ipv6_hdr = I;
> +};
> diff --git a/dlibs/x86_64/6.10.0/lockstat.d b/dlibs/x86_64/6.10.0/lockstat.d
> new file mode 100644
> index 0000000000000..cb8b4bd96f1ac
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/lockstat.d
> @@ -0,0 +1,14 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on provider lockstat
> +
> +inline int RW_WRITER = 0x00;
> +#pragma D binding "1.6.4" RW_WRITER
> +inline int RW_READER = 0x01;
> +#pragma D binding "1.6.4" RW_READER
> diff --git a/dlibs/x86_64/6.10.0/net.d b/dlibs/x86_64/6.10.0/net.d
> new file mode 100644
> index 0000000000000..6ac3428747a77
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/net.d
> @@ -0,0 +1,33 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2007, 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/* These are needed for inet_ntop() DTrace function. */
> +inline int AF_INET              =       2;
> +inline int AF_INET6             =       10;
> +
> +/* These are needed for link_ntop() DTrace function. */
> +inline int ARPHRD_ETHER         =       1;
> +inline int ARPHRD_INFINIBAND    =       32;
> +
> +/*
> + * The conninfo_t structure should be used by all application protocol
> + * providers as the first arguments to indicate some basic information
> + * about the connection. This structure may be augmented to accommodate
> + * the particularities of additional protocols in the future.
> + */
> +typedef struct conninfo {
> +	 string ci_local;	/* local host address */
> +	 string ci_remote;	/* remote host address */
> +	 string ci_protocol;	/* protocol (ipv4, ipv6, etc) */
> +} conninfo_t;
> +
> +/*
> + * We use these values to determine if a probe point is associated
> + * with sending (outbound) or receiving (inbound).
> + */
> +inline int NET_PROBE_OUTBOUND =		0x00;
> +inline int NET_PROBE_INBOUND =		0x01;
> diff --git a/dlibs/x86_64/6.10.0/pcap.d b/dlibs/x86_64/6.10.0/pcap.d
> new file mode 100644
> index 0000000000000..21a8e74a4036d
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/pcap.d
> @@ -0,0 +1,35 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on provider ip
> +
> +/*
> + * In general, PCAP_<type> names are chosen to match DL_<type> DLPI
> + * datalink types.
> + */
> +
> +/*
> + * Network-related capture types.  Raw DLT_* values can be used for those
> + * not present here; see /usr/include/pcap/bpf.h for the full list.
> + */
> +
> +inline int PCAP_NULL = 0;
> +#pragma D binding "1.12" PCAP_NULL
> +inline int PCAP_ETHER = 1;
> +#pragma D binding "1.12" PCAP_ETHER
> +inline int PCAP_WIFI = 105;
> +#pragma D binding "1.12" PCAP_WIFI
> +inline int PCAP_PPP = 9;
> +#pragma D binding "1.12" PCAP_PPP
> +/* PCAP_IP can signify IPv4 or IPv6 header follows. */
> +inline int PCAP_IP = 12;
> +#pragma D binding "1.12" PCAP_IP
> +
> +/* InfiniBand-related capture types. */
> +inline int PCAP_IPOIB = 242;
> +#pragma D binding "1.12" PCAP_IPOIB
> diff --git a/dlibs/x86_64/6.10.0/procfs.d b/dlibs/x86_64/6.10.0/procfs.d
> new file mode 100644
> index 0000000000000..5d7873b5e0091
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/procfs.d
> @@ -0,0 +1,306 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, 2022, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +/*
> + * This file defines the standard set of inlines and translators to be made
> + * available for all D programs to use to examine process model state.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library sched.d
> +
> +typedef time64_t time_t;
> +
> +typedef struct timestruc {
> +	time_t tv_sec;
> +	long tv_nsec;
> +} timestruc_t;
> +
> +typedef struct lwpsinfo {
> +	int pr_flag;			/* lwp flags (DEPRECATED) */
> +	int pr_lwpid;			/* lwp id */
> +	uintptr_t pr_addr;		/* internal address of lwp */
> +	uintptr_t pr_wchan;		/* wait addr for sleeping lwp */
> +	char pr_stype;			/* sync event type */
> +	char pr_state;			/* numeric lwp state */
> +	char pr_sname;			/* printable char for pr_state */
> +	char pr_nice;			/* nice for cpu usage */
> +	short pr_syscall;		/* syscall number */
> +	char pr_oldpri;			/* priority */
> +	char pr_cpu;			/* CPU usage */
> +	int pr_pri;			/* priority */
> +	ushort_t pr_pctcpu;		/* % of recent cpu time */
> +	ushort_t pr_pad;
> +	timestruc_t pr_start;		/* lwp start time */
> +	timestruc_t pr_time;		/* usr+sys cpu time */
> +	char pr_clname[8];		/* scheduling class name */
> +	char pr_name[16];		/* name */
> +	processorid_t pr_onpro;		/* processor last ran on */
> +	processorid_t pr_bindpro;	/* processor bound to */
> +	psetid_t pr_bindpset;		/* processor set */
> +	int pr_lgrp;			/* lwp home lgroup */
> +	int pr_filler[4];
> +} lwpsinfo_t;
> +
> +typedef id_t taskid_t;
> +typedef id_t dprojid_t;
> +typedef id_t poolid_t;
> +typedef id_t zoneid_t;
> +
> +/*
> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
> + * psinfo_t struct.
> + * We do not provide support for pr_size, pr_rssize, pr_pctcpu, and pr_pctmem.
> + * We also do not fill in pr_lwp (the lwpsinfo_t for the representative LWP)
> + * because we do not have the ability to select and stop any representative.
> + * Also, for the moment, pr_wstat, pr_time, and pr_ctime are not supported,
> + * but these could be supported by DTrace in the future using subroutines.
> + * Note that any member added to this translator should also be added to the
> + * kthread_t-to-psinfo_t translator, below.
> + */
> +typedef struct psinfo {
> +	int pr_flag;			/* process flags (DEPRECATED) */
> +	int pr_nlwp;			/* number of active lwps (Linux: 1) */
> +	pid_t pr_pid;			/* unique process id */
> +	pid_t pr_ppid;			/* process id of parent */
> +	pid_t pr_pgid;			/* pid of process group leader */
> +	pid_t pr_sid;			/* session id */
> +	uid_t pr_uid;			/* real user id */
> +	uid_t pr_euid;			/* effective user id */
> +	uid_t pr_gid;			/* real group id */
> +	uid_t pr_egid;			/* effective group id */
> +	uintptr_t pr_addr;		/* address of process */
> +	size_t pr_size;			/* size of process image (in KB) */
> +	size_t pr_rssize;		/* resident set sie (in KB) */
> +	size_t pr_pad1;
> +	struct tty_struct *pr_ttydev;	/* controlling tty (or -1) */
> +	ushort_t pr_pctcpu;		/* % of recent cpu time used */
> +	ushort_t pr_pctmem;		/* % of recent memory used */
> +	timestruc_t pr_start;		/* process start time */
> +	timestruc_t pr_time;		/* usr+sys cpu time for process */
> +	timestruc_t pr_ctime;		/* usr+sys cpu time for children */
> +	char pr_fname[16];		/* name of exec'd file */
> +	char pr_psargs[80];		/* initial chars of arg list */
> +	int pr_wstat;			/* if zombie, wait() status */
> +	int pr_argc;			/* initial argument count */
> +	uintptr_t pr_argv;		/* address of initial arg vector */
> +	uintptr_t pr_envp;		/* address of initial env vector */
> +	char pr_dmodel;			/* data model */
> +	char pr_pad2[3];
> +	taskid_t pr_taskid;		/* task id */
> +	dprojid_t pr_projid;		/* project id */
> +	int pr_nzomb;			/* number of zombie lwps (Linux: 0) */
> +	poolid_t pr_poolid;		/* pool id */
> +	zoneid_t pr_zoneid;		/* zone id */
> +	id_t pr_contract;		/* process contract */
> +	int pr_filler[1];
> +	lwpsinfo_t pr_lwp;
> +} psinfo_t;
> +
> +inline char PR_MODEL_ILP32 = 1;
> +#pragma D binding "1.0" PR_MODEL_ILP32
> +inline char PR_MODEL_LP64 = 2;
> +#pragma D binding "1.0" PR_MODEL_LP64
> +
> + 
> + 
> +inline	int PIDTYPE_PID = 0;
> +#pragma D binding "1.0" PIDTYPE_PID
> +inline	int PIDTYPE_TGID = 1;
> +#pragma D binding "1.0" PIDTYPE_TGID
> +inline	int PIDTYPE_PGID = 2;
> +#pragma D binding "1.0" PIDTYPE_PGID
> +inline	int PIDTYPE_SID = 3;
> +#pragma D binding "1.0" PIDTYPE_SID
> +
> + 
> + 
> + 
> + 
> + 
> + 
> + 
> +#pragma D binding "1.0" translator
> +translator psinfo_t < struct task_struct *T > {
> +	pr_nlwp = 1;
> +	pr_pid = T->tgid;
> +	pr_ppid = T->real_parent->tgid;
> +	pr_pgid = T->signal->pids[PIDTYPE_PGID]->numbers[0].nr;
> +	pr_sid = T->signal->pids[PIDTYPE_SID]->numbers[0].nr;
> +	pr_uid = T->cred->uid.val;
> +	pr_euid = T->cred->euid.val;
> +	pr_gid = T->cred->gid.val;
> +	pr_egid = T->cred->egid.val;
> +	pr_addr = (uintptr_t)T;
> +
> +	pr_ttydev = T->signal->tty ? T->signal->tty
> +				   : (struct tty_struct *)-1;
> +
> +	pr_fname = T->comm;
> +/*
> +	pr_psargs = stringof(get_psinfo(T)->__psinfo(psargs));
> + */
> +	pr_wstat = 0;
> +/*
> +	pr_argc = get_psinfo(T)->__psinfo(argc);
> +	pr_argv = (uintptr_t)get_psinfo(T)->__psinfo(argv);
> +	pr_envp = (uintptr_t)get_psinfo(T)->__psinfo(envp);
> + */
> +
> +	pr_dmodel = PR_MODEL_LP64;
> +
> +	pr_taskid = 0;
> +	pr_projid = 0;
> +	pr_nzomb = 0;
> +	pr_poolid = 0;
> +	pr_zoneid = 0;
> +	pr_contract = 0;
> +};
> +
> +inline int PR_STOPPED = 0x00000001;
> +#pragma D binding "1.0" PR_STOPPED
> +inline int PR_ISTOP = 0x00000002;
> +#pragma D binding "1.0" PR_ISTOP
> +inline int PR_DSTOP = 0x00000004;
> +#pragma D binding "1.0" PR_DSTOP
> +inline int PR_IDLE = 0x10000000;
> +#pragma D binding "1.0" PR_IDLE
> +
> +inline char SSLEEP = 1;
> +#pragma D binding "1.0" SSLEEP
> +inline char SRUN = 2;
> +#pragma D binding "1.0" SRUN
> +inline char SZOMB = 3;
> +#pragma D binding "1.0" SZOMB
> +inline char SSTOP = 4;
> +#pragma D binding "1.0" SSTOP
> +inline char SIDL = 5;
> +#pragma D binding "1.0" SIDL
> +inline char SONPROC = 6;
> +#pragma D binding "1.0" SONPROC
> +inline char SWAIT = 7;
> +#pragma D binding "1.0" SWAIT
> +
> +/*
> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
> + * lwpsinfo_t.
> + * We do not provide support for pr_nice, pr_oldpri, pr_cpu, or pr_pctcpu.
> + * Also, for the moment, pr_start and pr_time are not supported, but these
> + * could be supported by DTrace in the future using subroutines.
> + */
> +#pragma D binding "1.0" translator
> +translator lwpsinfo_t < struct task_struct *T > {
> +	pr_flag = (T->__state & 0x00000004) ? PR_STOPPED : 0;
> +/*
> +	pr_flag = ((T->t_state == TS_STOPPED) ? (PR_STOPPED |
> +	    ((!(T->t_schedflag & TS_PSTART)) ? PR_ISTOP : 0)) :
> +	    ((T->t_proc_flag & TP_PRVSTOP) ? PR_STOPPED | PR_ISTOP : 0)) |
> +	    ((T == T->t_procp->p_agenttp) ? PR_AGENT : 0) |
> +	    ((!(T->t_proc_flag & TP_TWAIT)) ? PR_DETACH : 0) |
> +	    ((T->t_proc_flag & TP_DAEMON) ? PR_DAEMON : 0) |
> +	    ((T->t_procp->p_pidflag & CLDNOSIGCHLD) ? PR_NOSIGCHLD : 0) |
> +	    ((T->t_procp->p_pidflag & CLDWAITPID) ? PR_WAITPID : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_FORK) ? PR_FORK : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_RUNLCL) ? PR_RLC : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_KILLCL) ? PR_KLC : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_ASYNC) ? PR_ASYNC : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_BPTADJ) ? PR_BPTADJ : 0) |
> +	    ((T->t_procp->p_proc_flag & P_PR_PTRACE) ? PR_PTRACE : 0) |
> +	    ((T->t_procp->p_flag & SMSACCT) ? PR_MSACCT : 0) |
> +	    ((T->t_procp->p_flag & SMSFORK) ? PR_MSFORK : 0) |
> +	    ((T->t_procp->p_flag & SVFWAIT) ? PR_VFORKP : 0) |
> +	    (((T->t_procp->p_flag & SSYS) ||
> +	    (T->t_procp->p_as == &`kas)) ? PR_ISSYS : 0) |
> +	    ((T == T->t_cpu->cpu_idle_thread) ? PR_IDLE : 0);
> +*/
> +
> +	pr_lwpid = T->pid;
> +	pr_addr = (uintptr_t)T;
> +	pr_wchan = NULL;
> +	pr_stype = 0;
> +
> +	pr_state = (T->__state & 0x00000001) ? SSLEEP :
> +		   (T->__state & 0x00000002) ? SSLEEP :
> +		   (T->__state & 0x00000004) ? SSTOP :
> +		   (T->__state & 0x00000008) ? SSTOP :
> +		   (T->__state & 0x00000020) ? SZOMB :
> +		   (T->__state & 0x00000010) ? SZOMB :
> +		   (T->__state & 0x00000080) ? SZOMB :
> +		   (T->__state & 0x00000100) ? SWAIT :
> +		   (T->__state & 0x00000200) ? SWAIT : SRUN;
> +	pr_sname = (T->__state & 0x00000001) ? 'S' :
> +		   (T->__state & 0x00000002) ? 'S' :
> +		   (T->__state & 0x00000004) ? 'T' :
> +		   (T->__state & 0x00000008) ? 'T' :
> +		   (T->__state & 0x00000020) ? 'Z' :
> +		   (T->__state & 0x00000010) ? 'Z' :
> +		   (T->__state & 0x00000080) ? 'Z' :
> +		   (T->__state & 0x00000100) ? 'W' :
> +		   (T->__state & 0x00000200) ? 'W' : 'R';
> +
> +	pr_pri = T->prio;
> +	pr_name = T->comm;
> +	pr_onpro = ((struct thread_info *)T->stack)->cpu;
> +};
> +
> +inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread);
> +#pragma D attributes Stable/Stable/Common curpsinfo
> +#pragma D binding "1.0" curpsinfo
> +
> +inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
> +#pragma D attributes Stable/Stable/Common curlwpsinfo
> +#pragma D binding "1.0" curlwpsinfo
> +
> +inline string cwd = d_path(&(curthread->fs->pwd));
> +#pragma D attributes Stable/Stable/Common cwd
> +#pragma D binding "1.0" cwd
> +
> +inline string root = d_path(&(curthread->fs->root));
> +#pragma D attributes Stable/Stable/Common root
> +#pragma D binding "1.0" root
> +
> +inline int CLD_EXITED = 1;
> +#pragma D binding "1.0" CLD_EXITED
> +inline int CLD_KILLED = 2;
> +#pragma D binding "1.0" CLD_KILLED
> +inline int CLD_DUMPED = 3;
> +#pragma D binding "1.0" CLD_DUMPED
> +inline int CLD_TRAPPED = 4;
> +#pragma D binding "1.0" CLD_TRAPPED
> +inline int CLD_STOPPED = 5;
> +#pragma D binding "1.0" CLD_STOPPED
> +inline int CLD_CONTINUED = 6;
> +#pragma D binding "1.0" CLD_CONTINUED
> +
> +/*
> + * Below we provide some inline definitions to simplify converting from
> + * a struct pid * to a pid_t.  structpid2pid is a DTrace-ized version of
> + * pid_vnr().
> + */
> + /*
> +inline	struct pid_namespace *pid_namespace[struct pid *p] = p != NULL ?
> +	p->numbers[p->level].ns : NULL;
> +
> +inline	int pid_namespace_level[struct pid *p] = p != NULL && pid_namespace[p] ?
> +	pid_namespace[p]->level : 0;
> +
> +m4_dnl 4.19 and above use thread_pid for this.
> +define_for_kernel([[__task_pid]], [[ m4_dnl
> +	(m4_kver(4, 19, 0), [[task->thread_pid]])]], m4_dnl
> +	[[task->pids[PIDTYPE_PID].pid]]) m4_dnl
> +
> +inline	struct pid *task_pid[struct task_struct *task] =
> +	task != NULL ? __task_pid : NULL;
> +
> +inline	int current_namespace_level = pid_namespace_level[task_pid[curthread]];
> +
> +inline	pid_t structpid2pid[struct pid *p] =
> +	p != NULL && current_namespace_level <= p->level &&
> +	((struct upid *)&(p->numbers[current_namespace_level]))->ns ==
> +	pid_namespace[task_pid[curthread]] ?
> +	((struct upid *)&(p->numbers[current_namespace_level]))->nr : 0;
> +*/
> diff --git a/dlibs/x86_64/6.10.0/regs.d b/dlibs/x86_64/6.10.0/regs.d
> new file mode 100644
> index 0000000000000..12ce3ac9a1507
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/regs.d
> @@ -0,0 +1,94 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +inline int R_TRAPNO = 25;
> +#pragma D binding "1.0" R_TRAPNO
> +inline int R_GS = 24;
> +#pragma D binding "1.0" R_GS
> +inline int R_FS = 23;
> +#pragma D binding "1.0" R_FS
> +inline int R_ES = 22;
> +#pragma D binding "1.0" R_ES
> +inline int R_DS = 21;
> +#pragma D binding "1.0" R_DS
> +
> +inline int R_SS = 20;
> +#pragma D binding "1.0" R_SS
> +inline int R_RSP = 19;
> +#pragma D binding "1.0" R_RSP
> +inline int R_RFL = 18;
> +#pragma D binding "1.0" R_RFL
> +inline int R_CS = 17;
> +#pragma D binding "1.0" R_CS
> +inline int R_RIP = 16;
> +#pragma D binding "1.0" R_RIP
> +inline int R_ERR = 15;
> +#pragma D binding "1.0" R_ERR
> +inline int R_RDI = 14;
> +#pragma D binding "1.0" R_RDI
> +inline int R_RSI = 13;
> +#pragma D binding "1.0" R_RSI
> +inline int R_RDX = 12;
> +#pragma D binding "1.0" R_RDX
> +inline int R_RCX = 11;
> +#pragma D binding "1.0" R_RCX
> +inline int R_RAX = 10;
> +#pragma D binding "1.0" R_RAX
> +inline int R_R8 = 9;
> +#pragma D binding "1.0" R_R8
> +inline int R_R9 = 8;
> +#pragma D binding "1.0" R_R9
> +inline int R_R10 = 7;
> +#pragma D binding "1.0" R_R10
> +inline int R_R11 = 6;
> +#pragma D binding "1.0" R_R11
> +inline int R_RBX = 5;
> +#pragma D binding "1.0" R_RBX
> +inline int R_RBP = 4;
> +#pragma D binding "1.0" R_RBP
> +inline int R_R12 = 3;
> +#pragma D binding "1.0" R_R12
> +inline int R_R13 = 2;
> +#pragma D binding "1.0" R_R13
> +inline int R_R14 = 1;
> +#pragma D binding "1.0" R_R14
> +inline int R_R15 = 0;
> +#pragma D binding "1.0" R_R15
> +
> +inline int R_EBX = R_RBX;
> +#pragma D binding "1.0" R_EBX
> +inline int R_ECX = R_RCX;
> +#pragma D binding "1.0" R_ECX
> +inline int R_EDX = R_RDX;
> +#pragma D binding "1.0" R_EDX
> +inline int R_ESI = R_RSI;
> +#pragma D binding "1.0" R_ESI
> +inline int R_EDI = R_RDI;
> +#pragma D binding "1.0" R_EDI
> +inline int R_EBP = R_RBP;
> +#pragma D binding "1.0" R_EBP
> +inline int R_EAX = R_RAX;
> +#pragma D binding "1.0" R_EAX
> +inline int R_EIP = R_RIP;
> +#pragma D binding "1.0" R_EIP
> +inline int R_EFL = R_RFL;
> +#pragma D binding "1.0" R_EFL
> +inline int R_ESP = R_RSP;
> +#pragma D binding "1.0" R_ESP
> +
> +inline int R_PC = R_EIP;
> +#pragma D binding "1.0" R_PC
> +inline int R_FP = R_EBP;
> +#pragma D binding "1.0" R_FP
> +inline int R_SP = R_ESP;
> +#pragma D binding "1.0" R_SP
> +inline int R_PS = R_EFL;
> +#pragma D binding "1.0" R_PS
> +inline int R_R0 = R_EAX;
> +#pragma D binding "1.0" R_R0
> +inline int R_R1 = R_EBX;
> +#pragma D binding "1.0" R_R1
> diff --git a/dlibs/x86_64/6.10.0/sched.d b/dlibs/x86_64/6.10.0/sched.d
> new file mode 100644
> index 0000000000000..271d84e057cde
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/sched.d
> @@ -0,0 +1,38 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +
> +typedef id_t		processorid_t;
> +typedef id_t		psetid_t;
> +typedef id_t		chipid_t;
> +typedef id_t		lgrp_id_t;
> +
> +typedef struct cpuinfo {
> +	processorid_t	cpu_id;
> +	psetid_t	cpu_pset;
> +	chipid_t	cpu_chip;
> +	lgrp_id_t	cpu_lgrp;
> +} cpuinfo_t;
> +
> +typedef cpuinfo_t	*cpuinfo_t_p;
> +
> +inline processorid_t cpu = curcpu->cpu_id;
> +#pragma D attributes Stable/Stable/Common cpu
> +#pragma D binding "1.0" cpu
> +
> +inline psetid_t pset = curcpu->cpu_pset;
> +#pragma D attributes Stable/Stable/Common pset
> +#pragma D binding "1.0" pset
> +
> +inline chipid_t chip = curcpu->cpu_chip;
> +#pragma D attributes Stable/Stable/Common chip
> +#pragma D binding "1.0" chip
> +
> +inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
> +#pragma D attributes Stable/Stable/Common lgrp
> +#pragma D binding "1.0" lgrp
> diff --git a/dlibs/x86_64/6.10.0/signal.d b/dlibs/x86_64/6.10.0/signal.d
> new file mode 100644
> index 0000000000000..c72dfd4cbc13f
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/signal.d
> @@ -0,0 +1,108 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
> + * Use is subject to license terms.
> + *
> + */
> +inline int SIGSYS = 31;
> +#pragma D binding "1.0" SIGSYS
> +
> +inline int SIGTERM = 15;
> +#pragma D binding "1.0" SIGTERM
> +
> +inline int SIGTSTP = 20;
> +#pragma D binding "1.0" SIGTSTP
> +
> +inline int SIGVTALRM = 26;
> +#pragma D binding "1.0" SIGVTALRM
> +
> +inline int SIGBUS = 7;
> +#pragma D binding "1.0" SIGBUS
> +
> +inline int SIGPIPE = 13;
> +#pragma D binding "1.0" SIGPIPE
> +
> +inline int SIGSTKFLT = 16;
> +#pragma D binding "1.0" SIGSTKFLT
> +
> +inline int SIGTRAP = 5;
> +#pragma D binding "1.0" SIGTRAP
> +
> +inline int SIGHUP = 1;
> +#pragma D binding "1.0" SIGHUP
> +
> +inline int SIGFPE = 8;
> +#pragma D binding "1.0" SIGFPE
> +
> +inline int SIGURG = 23;
> +#pragma D binding "1.0" SIGURG
> +
> +inline int SIGIO = 29;
> +#pragma D binding "1.0" SIGIO
> +
> +inline int SIGKILL = 9;
> +#pragma D binding "1.0" SIGKILL
> +
> +inline int SIGWINCH = 28;
> +#pragma D binding "1.0" SIGWINCH
> +
> +inline int SIGXFSZ = 25;
> +#pragma D binding "1.0" SIGXFSZ
> +
> +inline int SIGINT = 2;
> +#pragma D binding "1.0" SIGINT
> +
> +inline int SIGTTOU = 22;
> +#pragma D binding "1.0" SIGTTOU
> +
> +inline int SIGTTIN = 21;
> +#pragma D binding "1.0" SIGTTIN
> +
> +inline int SIGCHLD = 17;
> +#pragma D binding "1.0" SIGCHLD
> +
> +inline int SIGIOT = 6;
> +#pragma D binding "1.0" SIGIOT
> +
> +inline int SIGCONT = 18;
> +#pragma D binding "1.0" SIGCONT
> +
> +inline int SIGQUIT = 3;
> +#pragma D binding "1.0" SIGQUIT
> +
> +inline int SIGABRT = 6;
> +#pragma D binding "1.0" SIGABRT
> +
> +inline int SIGPROF = 27;
> +#pragma D binding "1.0" SIGPROF
> +
> +inline int SIGXCPU = 24;
> +#pragma D binding "1.0" SIGXCPU
> +
> +inline int SIGSTOP = 19;
> +#pragma D binding "1.0" SIGSTOP
> +
> +inline int SIGPWR = 30;
> +#pragma D binding "1.0" SIGPWR
> +
> +inline int SIGILL = 4;
> +#pragma D binding "1.0" SIGILL
> +
> +inline int SIGUSR1 = 10;
> +#pragma D binding "1.0" SIGUSR1
> +
> +inline int SIGPOLL = 29;
> +#pragma D binding "1.0" SIGPOLL
> +
> +inline int SIGCLD = 17;
> +#pragma D binding "1.0" SIGCLD
> +
> +inline int SIGSEGV = 11;
> +#pragma D binding "1.0" SIGSEGV
> +
> +inline int SIGUSR2 = 12;
> +#pragma D binding "1.0" SIGUSR2
> +
> +inline int SIGALRM = 14;
> +#pragma D binding "1.0" SIGALRM
> +
> diff --git a/dlibs/x86_64/6.10.0/tcp.d b/dlibs/x86_64/6.10.0/tcp.d
> new file mode 100644
> index 0000000000000..54e310cb4c6ed
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/tcp.d
> @@ -0,0 +1,231 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library net.d
> +#pragma D depends_on provider ip
> +#pragma D depends_on provider tcp
> +
> +inline int TH_FIN =	0x01;
> +inline int TH_SYN =	0x02;
> +inline int TH_RST =	0x04;
> +inline int TH_PSH =	0x08;
> +inline int TH_ACK =	0x10;
> +inline int TH_URG =	0x20;
> +inline int TH_ECE =	0x40;
> +inline int TH_CWR =	0x80;
> +
> +inline int TCP_STATE_IDLE = 		0x00;
> +inline int TCP_STATE_ESTABLISHED =	0x01;
> +inline int TCP_STATE_SYN_SENT =		0x02;
> +inline int TCP_STATE_SYN_RECEIVED =	0x03;
> +inline int TCP_STATE_FIN_WAIT_1 =	0x04;
> +inline int TCP_STATE_FIN_WAIT_2 =	0x05;
> +inline int TCP_STATE_TIME_WAIT =	0x06;
> +inline int TCP_STATE_CLOSED =		0x07;
> +inline int TCP_STATE_CLOSE_WAIT =	0x08;
> +inline int TCP_STATE_LAST_ACK =		0x09;
> +inline int TCP_STATE_LISTEN =		0x0a;
> +inline int TCP_STATE_CLOSING =		0x0b;
> +
> +/*
> + * Convert a TCP state value to a string.
> + */
> +inline string tcp_state_string[int state] =
> +	state == TCP_STATE_CLOSED ? "state-closed" :
> +	state == TCP_STATE_IDLE ? "state-idle" :
> +	state == TCP_STATE_LISTEN ? "state-listen" :
> +	state == TCP_STATE_SYN_SENT ? "state-syn-sent" :
> +	state == TCP_STATE_SYN_RECEIVED ? "state-syn-received" :
> +	state == TCP_STATE_ESTABLISHED ? "state-established" :
> +	state == TCP_STATE_CLOSE_WAIT ? "state-close-wait" :
> +	state == TCP_STATE_FIN_WAIT_1 ? "state-fin-wait-1" :
> +	state == TCP_STATE_CLOSING ? "state-closing" :
> +	state == TCP_STATE_LAST_ACK ? "state-last-ack" :
> +	state == TCP_STATE_FIN_WAIT_2 ? "state-fin-wait-2" :
> +	state == TCP_STATE_TIME_WAIT ? "state-time-wait" :
> +	"<unknown>";
> +#pragma D binding "1.6.3" tcp_state_string
> +
> +/*
> + * tcpinfo is the TCP header fields.
> + */
> +typedef struct tcpinfo {
> +	uint16_t tcp_sport;		/* source port */
> +	uint16_t tcp_dport;		/* destination port */
> +	uint32_t tcp_seq;		/* sequence number */
> +	uint32_t tcp_ack;		/* acknowledgment number */
> +	uint8_t tcp_offset;		/* data offset, in bytes */
> +	uint8_t tcp_flags;		/* flags */
> +	uint16_t tcp_window;		/* window size */
> +	uint16_t tcp_checksum;		/* checksum */
> +	uint16_t tcp_urgent;		/* urgent data pointer */
> +	uintptr_t tcp_hdr;		/* raw TCP header */
> +} tcpinfo_t;
> +
> +/*
> + * tcpsinfo contains stable TCP details from tcp_t.
> + */
> +typedef struct tcpsinfo {
> +	uintptr_t tcps_addr;
> +	int tcps_local;			/* is delivered locally, boolean */
> +	uint16_t tcps_lport;		/* local port */
> +	uint16_t tcps_rport;		/* remote port */
> +	string tcps_laddr;		/* local address, as a string */
> +	string tcps_raddr;		/* remote address, as a string */
> +	int tcps_state;			/* TCP state */
> +	uint32_t tcps_iss;		/* Initial sequence # sent */
> +	uint32_t tcps_suna;		/* sequence # sent but unacked */
> +	uint32_t tcps_snxt;		/* next sequence # to send */
> +	uint32_t tcps_rnxt;		/* next sequence # expected */
> +	uint32_t tcps_swnd;		/* send window size */
> +	int32_t tcps_snd_ws;		/* send window scaling */
> +	uint32_t tcps_rwnd;		/* receive window size */
> +	int32_t tcps_rcv_ws;		/* receive window scaling */
> +	uint32_t tcps_cwnd;		/* congestion window */
> +	uint32_t tcps_cwnd_ssthresh;	/* threshold for congestion avoidance */
> +	uint32_t tcps_sack_snxt;	/* next SACK seq # for retransmission */
> +	uint32_t tcps_rto;		/* round-trip timeout, msec */
> +	uint32_t tcps_mss;		/* max segment size */
> +	int tcps_retransmit;		/* retransmit send event, boolean */
> +	uint32_t tcps_rtt;		/* smoothed avg round-trip time, msec */
> +	uint32_t tcps_rtt_sd;		/* standard deviation of RTT */
> +	uint32_t tcps_irs;		/* Initial recv sequence # */
> +} tcpsinfo_t;
> +
> +/*
> + * tcplsinfo provides the old tcp state for state changes.
> + */
> +typedef struct tcplsinfo {
> +	int tcps_state;		/* previous TCP state */
> +} tcplsinfo_t;
> +
> +#pragma D binding "1.6.3" translator
> +translator tcpinfo_t < struct tcphdr *T > {
> +	tcp_sport = T ? ntohs(T->source) : 0;
> +	tcp_dport = T ? ntohs(T->dest) : 0;
> +	tcp_seq = T ? ntohl(T->seq) : 0;
> +	tcp_ack = T ? ntohl(T->ack_seq) : 0;
> +	tcp_offset = T ? (*(uint8_t *)(T + 12) & 0xf0) >> 2 : 0;
> +	tcp_flags = T ? *(uint8_t *)(T + 13) : 0;
> +	tcp_window = T ? ntohs(T->window) : 0;
> +	tcp_checksum = T ? ntohs(T->check) : 0;
> +	tcp_urgent = T ? ntohs(T->urg_ptr) : 0;
> +	tcp_hdr = (uintptr_t)T;
> +};
> +
> +/*
> + * In the main we simply translate from the "struct [tcp_]sock *" to
> + * a tcpsinfo_t *.  However there are a few exceptions:
> + *
> + * - tcps_state is always derived from arg6.  The reason is that in some
> + * state transitions sock->sk_state does not reflect the actual TCP
> + * connection state.  For example the TIME_WAIT state is handled in
> + * Linux by creating a separate timewait socket and the state of the
> + * original socket is CLOSED.  In some other cases we also need to
> + * instrument state transition prior to the update of sk_state.  To do
> + * all of this we rely on arg6.
> + * - we sometimes need to retrieve local/remote port/address settings from
> + * TCP and IP headers directly, for example prior to the address/port
> + * being committed to the socket.  To do this effectively we need to know
> + * if the packet data is inbound (in which case the local IP/port are the
> + * destination) or outbound (in which case the local IP/port are the source).
> + * arg7 is set to 0 for outbound traffic and 1 for inbound so we use these
> + * to reconstruct the address/port info where necessary.  arg2 used for IP
> + * information while arg4 contains the TCP header, so it is used for port data.
> + * NET_PROBE_INBOUND is defined as 1, NET_PROBE_OUTBOUND as 0 in net.d.
> + */
> +#pragma D binding "1.6.3" translator
> +translator tcpsinfo_t < struct tcp_sock *T > {
> +	tcps_addr = (uintptr_t)T;
> +	tcps_local =
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
> +	    (((struct sock *)T)->__sk_common.skc_rcv_saddr ==
> +	    ((struct sock *)T)->__sk_common.skc_daddr) :
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
> +	    (((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[0]
> +	    ==
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[0] &&
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[1]
> +            ==
> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[1] &&
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[2]
> +            ==
> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[2] &&
> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[3])
> +	    : 0;
> +	tcps_lport = (T && ((struct inet_sock *)T)->inet_sport != 0) ?
> +	    ntohs(((struct inet_sock *)T)->inet_sport) :
> +	    (T && ((struct inet_sock *)T)->inet_sport == 0) ?
> +	    ntohs(((struct sock *)T)->__sk_common.skc_num) :
> +	    arg4 != NULL ?
> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
> +	    ((struct tcphdr *)arg4)->dest : ((struct tcphdr *)arg4)->source) :
> +	    0;
> +	tcps_rport = T && ((struct sock *)T)->__sk_common.skc_dport != 0 ?
> +	    ntohs(((struct sock *)T)->__sk_common.skc_dport) :
> +	    arg4 != NULL ?
> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
> +            ((struct tcphdr *)arg4)->source : ((struct tcphdr *)arg4)->dest) :
> +	    0;
> +	tcps_laddr =
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_rcv_saddr) :
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr) :
> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct iphdr *)arg2)->daddr : &((struct iphdr *)arg2)->saddr) :
> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct ipv6hdr *)arg2)->daddr :
> +	    &((struct ipv6hdr *)arg2)->saddr) :
> +	    "<unknown>";
> +	tcps_raddr =
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_daddr) :
> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_daddr) :
> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct iphdr *)arg2)->saddr : &((struct iphdr *)arg2)->daddr) :
> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
> +	    &((struct ipv6hdr *)arg2)->saddr :
> +	    &((struct ipv6hdr *)arg2)->daddr) :
> +	    "<unknown>";
> +	tcps_state = arg6;
> +	tcps_iss = T ?
> +	    T->snd_una - (uint32_t)T->bytes_acked : 0;
> +	tcps_suna = T ? T->snd_una : 0;
> +	tcps_snxt = T ? T->snd_nxt : 0;
> +	tcps_rnxt = T ? T->rcv_nxt : 0;
> +	tcps_swnd = T ? T->snd_wnd : 0;
> +	tcps_snd_ws = T ? T->rx_opt.snd_wscale : 0;
> +	tcps_rwnd = T ? T->rcv_wnd : 0;
> +	tcps_rcv_ws = T ? T->rx_opt.rcv_wscale : 0;
> +	tcps_cwnd = T ? T->snd_cwnd : 0;
> +	tcps_cwnd_ssthresh = T ? T->snd_ssthresh : 0;
> +	tcps_sack_snxt = (T && T->sacked_out == 0) ? T->snd_una :
> +	    (T && T->highest_sack == NULL) ? T->snd_nxt :
> +	    (T && T->highest_sack != NULL) ?
> +	    ((struct tcp_skb_cb *)&((T->highest_sack->cb[0])))->seq : 0;
> +	tcps_rto = T ? T->inet_conn.icsk_rto : 0;
> +	tcps_mss = T ? T->mss_cache : 0;
> +	tcps_retransmit = T && arg0 ?
> +	    (((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq
> +	    < T->snd_nxt - 1) : 0;
> +	tcps_rtt = T ? (T->srtt_us >> 3)/1000 : 0;
> +	tcps_rtt_sd = T ? (T->mdev_us >> 2)/1000 : 0;
> +	tcps_irs = T && T->bytes_received > 0 ?
> +	    T->rcv_nxt - (uint32_t)T->bytes_received : 0;
> +};
> +
> +#pragma D binding "1.6.3" translator
> +translator tcplsinfo_t < int I > {
> +	tcps_state = I;
> +};
> diff --git a/dlibs/x86_64/6.10.0/udp.d b/dlibs/x86_64/6.10.0/udp.d
> new file mode 100644
> index 0000000000000..0e44ed6480415
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/udp.d
> @@ -0,0 +1,71 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +#pragma D depends_on module vmlinux
> +#pragma D depends_on library net.d
> +#pragma D depends_on provider udp
> +
> +/*
> + * udpinfo is the UDP header fields.
> + */
> +typedef struct udpinfo {
> +	uint16_t udp_sport;		/* source port */
> +	uint16_t udp_dport;		/* destination port */
> +	uint16_t udp_length;		/* total length */
> +	uint16_t udp_checksum;          /* headers + data checksum */
> +	struct udphdr *udp_hdr;		/* raw UDP header */
> +} udpinfo_t;
> +
> +/*
> + * udpsinfo contains stable UDP details from udp_t.
> + */
> +typedef struct udpsinfo {
> +	uintptr_t udps_addr;
> +	uint16_t udps_lport;		/* local port */
> +	uint16_t udps_rport;		/* remote port */
> +	string udps_laddr;		/* local address, as a string */
> +	string udps_raddr;		/* remote address, as a string */
> +} udpsinfo_t;
> +
> +#pragma D binding "1.6.3" translator
> +translator udpinfo_t < struct udphdr *U > {
> +	udp_sport = ntohs(U->source);
> +	udp_dport = ntohs(U->dest);
> +	udp_length = ntohs(U->len);
> +	udp_checksum = ntohs(U->check);
> +	udp_hdr = U;
> +};
> +
> +#pragma D binding "1.6.3" translator
> +translator udpsinfo_t < struct udp_sock *S > {
> +	/*
> +	 * We source udp info from other args but retain the sock arg here
> +	 * as it may be used in the future.
> +	 */
> +	udps_addr = (uintptr_t)S;
> +	udps_lport = arg4 ?
> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->source) :
> +	    ntohs(((struct udphdr *)arg4)->dest)) : 0;
> +	udps_rport = arg4 ?
> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->dest) :
> +	    ntohs(((struct udphdr *)arg4)->source)) : 0;
> +	udps_laddr = arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->saddr :
> +	    &((struct iphdr *)arg2)->daddr) :
> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->saddr :
> +	    &((struct ipv6hdr *)arg2)->daddr) :
> +	    "<unknown>";
> +	udps_raddr =
> +	    arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->daddr :
> +	    &((struct iphdr *)arg2)->saddr) :
> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->daddr :
> +	    &((struct ipv6hdr *)arg2)->saddr) :
> +	    "<unknown>";
> +};
> diff --git a/dlibs/x86_64/6.10.0/unistd.d b/dlibs/x86_64/6.10.0/unistd.d
> new file mode 100644
> index 0000000000000..c38bbed4bc85e
> --- /dev/null
> +++ b/dlibs/x86_64/6.10.0/unistd.d
> @@ -0,0 +1,36 @@
> +/*
> + * Oracle Linux DTrace.
> + * Copyright (c) 2007, Oracle and/or its affiliates. All rights reserved.
> + * Licensed under the Universal Permissive License v 1.0 as shown at
> + * http://oss.oracle.com/licenses/upl.
> + */
> +
> +inline int DTRACEFLT_UNKNOWN = 0;	/* Unknown fault */
> +#pragma D binding "1.0" DTRACEFLT_UNKNOWN
> +
> +inline int DTRACEFLT_BADADDR = 1;	/* Bad address */
> +#pragma D binding "1.0" DTRACEFLT_BADADDR
> +
> +inline int DTRACEFLT_BADALIGN = 2;	/* Bad alignment */
> +#pragma D binding "1.0" DTRACEFLT_BADALIGN
> +
> +inline int DTRACEFLT_ILLOP = 3;		/* Illegal operation */
> +#pragma D binding "1.0" DTRACEFLT_ILLOP
> +
> +inline int DTRACEFLT_DIVZERO = 4;	/* Divide-by-zero */
> +#pragma D binding "1.0" DTRACEFLT_DIVZERO
> +
> +inline int DTRACEFLT_NOSCRATCH = 5;	/* Out of scratch space */
> +#pragma D binding "1.0" DTRACEFLT_NOSCRATCH
> +
> +inline int DTRACEFLT_KPRIV = 6;		/* Illegal kernel access */
> +#pragma D binding "1.0" DTRACEFLT_KPRIV
> +
> +inline int DTRACEFLT_UPRIV = 7;		/* Illegal user access */
> +#pragma D binding "1.0" DTRACEFLT_UPRIV
> +
> +inline int DTRACEFLT_TUPOFLOW = 8;	/* Tuple stack overflow */
> +#pragma D binding "1.0" DTRACEFLT_TUPOFLOW
> +
> +inline int DTRACEFLT_BADSTACK = 9;	/* Bad stack */
> +#pragma D binding "1.4.1" DTRACEFLT_BADSTACK

^ permalink raw reply	[flat|nested] 11+ messages in thread

* Re: [DTrace-devel] [PATCH v2 2/2] dlibs: pregenerated translators for 6.10
  2024-06-13 12:22   ` [DTrace-devel] " Alan Maguire
@ 2024-06-14 12:25     ` Alan Maguire
  2024-06-19 13:23       ` Nick Alcock
  0 siblings, 1 reply; 11+ messages in thread
From: Alan Maguire @ 2024-06-14 12:25 UTC (permalink / raw)
  To: Nick Alcock, dtrace, dtrace-devel

On 13/06/2024 13:22, Alan Maguire wrote:
> On 07/06/2024 19:41, Nick Alcock via DTrace-devel wrote:
>> All differences from the previous translators (6.1) are no-effect
>> ordering changes other than those one would expect from the changes to
>> the .d files.
>>
>> Signed-off-by: Nick Alcock <nick.alcock@oracle.com>
> 
> 
> I hit the issue with the disappearing bd_partno field in io.d on 6.10 so
> this is great!
> 
> nit: I guess defining
> 
> inline int dev_partno[struct block_device *B] = B->__bd_flags.counter &
> 0xff;
> 
> ...might reduce complexity of some of the statements in io.d
>

sorry, ignore this I missed the handling in patch 1..

> 
> Reviewed-by: Alan Maguire <alan.maguire@oracle.com>
> 
>> ---
>>  dlibs/aarch64/6.10/errno.d     | 275 ++++++++++++++++++++++++++
>>  dlibs/aarch64/6.10/io.d        | 234 ++++++++++++++++++++++
>>  dlibs/aarch64/6.10/ip.d        | 341 +++++++++++++++++++++++++++++++++
>>  dlibs/aarch64/6.10/lockstat.d  |  14 ++
>>  dlibs/aarch64/6.10/net.d       |  33 ++++
>>  dlibs/aarch64/6.10/pcap.d      |  35 ++++
>>  dlibs/aarch64/6.10/procfs.d    | 306 +++++++++++++++++++++++++++++
>>  dlibs/aarch64/6.10/regs.d      |  78 ++++++++
>>  dlibs/aarch64/6.10/sched.d     |  38 ++++
>>  dlibs/aarch64/6.10/signal.d    | 108 +++++++++++
>>  dlibs/aarch64/6.10/tcp.d       | 231 ++++++++++++++++++++++
>>  dlibs/aarch64/6.10/udp.d       |  71 +++++++
>>  dlibs/aarch64/6.10/unistd.d    |  36 ++++
>>  dlibs/x86_64/6.10.0/errno.d    | 275 ++++++++++++++++++++++++++
>>  dlibs/x86_64/6.10.0/io.d       | 235 +++++++++++++++++++++++
>>  dlibs/x86_64/6.10.0/ip.d       | 341 +++++++++++++++++++++++++++++++++
>>  dlibs/x86_64/6.10.0/lockstat.d |  14 ++
>>  dlibs/x86_64/6.10.0/net.d      |  33 ++++
>>  dlibs/x86_64/6.10.0/pcap.d     |  35 ++++
>>  dlibs/x86_64/6.10.0/procfs.d   | 306 +++++++++++++++++++++++++++++
>>  dlibs/x86_64/6.10.0/regs.d     |  94 +++++++++
>>  dlibs/x86_64/6.10.0/sched.d    |  38 ++++
>>  dlibs/x86_64/6.10.0/signal.d   | 108 +++++++++++
>>  dlibs/x86_64/6.10.0/tcp.d      | 231 ++++++++++++++++++++++
>>  dlibs/x86_64/6.10.0/udp.d      |  71 +++++++
>>  dlibs/x86_64/6.10.0/unistd.d   |  36 ++++
>>  26 files changed, 3617 insertions(+)
>>  create mode 100644 dlibs/aarch64/6.10/errno.d
>>  create mode 100644 dlibs/aarch64/6.10/io.d
>>  create mode 100644 dlibs/aarch64/6.10/ip.d
>>  create mode 100644 dlibs/aarch64/6.10/lockstat.d
>>  create mode 100644 dlibs/aarch64/6.10/net.d
>>  create mode 100644 dlibs/aarch64/6.10/pcap.d
>>  create mode 100644 dlibs/aarch64/6.10/procfs.d
>>  create mode 100644 dlibs/aarch64/6.10/regs.d
>>  create mode 100644 dlibs/aarch64/6.10/sched.d
>>  create mode 100644 dlibs/aarch64/6.10/signal.d
>>  create mode 100644 dlibs/aarch64/6.10/tcp.d
>>  create mode 100644 dlibs/aarch64/6.10/udp.d
>>  create mode 100644 dlibs/aarch64/6.10/unistd.d
>>  create mode 100644 dlibs/x86_64/6.10.0/errno.d
>>  create mode 100644 dlibs/x86_64/6.10.0/io.d
>>  create mode 100644 dlibs/x86_64/6.10.0/ip.d
>>  create mode 100644 dlibs/x86_64/6.10.0/lockstat.d
>>  create mode 100644 dlibs/x86_64/6.10.0/net.d
>>  create mode 100644 dlibs/x86_64/6.10.0/pcap.d
>>  create mode 100644 dlibs/x86_64/6.10.0/procfs.d
>>  create mode 100644 dlibs/x86_64/6.10.0/regs.d
>>  create mode 100644 dlibs/x86_64/6.10.0/sched.d
>>  create mode 100644 dlibs/x86_64/6.10.0/signal.d
>>  create mode 100644 dlibs/x86_64/6.10.0/tcp.d
>>  create mode 100644 dlibs/x86_64/6.10.0/udp.d
>>  create mode 100644 dlibs/x86_64/6.10.0/unistd.d
>>
>> diff --git a/dlibs/aarch64/6.10/errno.d b/dlibs/aarch64/6.10/errno.d
>> new file mode 100644
>> index 0000000000000..f54fafe1861cc
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/errno.d
>> @@ -0,0 +1,275 @@
>> +
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
>> + * Use is subject to license terms.
>> + */
>> +
>> +inline int EPERM = 1;
>> +#pragma D binding "1.0" EPERM
>> +inline int ENOENT = 2;
>> +#pragma D binding "1.0" ENOENT
>> +inline int ESRCH = 3;
>> +#pragma D binding "1.0" ESRCH
>> +inline int EINTR = 4;
>> +#pragma D binding "1.0" EINTR
>> +inline int EIO = 5;
>> +#pragma D binding "1.0" EIO
>> +inline int ENXIO = 6;
>> +#pragma D binding "1.0" ENXIO
>> +inline int E2BIG = 7;
>> +#pragma D binding "1.0" E2BIG
>> +inline int ENOEXEC = 8;
>> +#pragma D binding "1.0" ENOEXEC
>> +inline int EBADF = 9;
>> +#pragma D binding "1.0" EBADF
>> +inline int ECHILD = 10;
>> +#pragma D binding "1.0" ECHILD
>> +inline int EAGAIN = 11;
>> +#pragma D binding "1.0" EAGAIN
>> +inline int ENOMEM = 12;
>> +#pragma D binding "1.0" ENOMEM
>> +inline int EACCES = 13;
>> +#pragma D binding "1.0" EACCES
>> +inline int EFAULT = 14;
>> +#pragma D binding "1.0" EFAULT
>> +inline int ENOTBLK = 15;
>> +#pragma D binding "1.0" ENOTBLK
>> +inline int EBUSY = 16;
>> +#pragma D binding "1.0" EBUSY
>> +inline int EEXIST = 17;
>> +#pragma D binding "1.0" EEXIST
>> +inline int EXDEV = 18;
>> +#pragma D binding "1.0" EXDEV
>> +inline int ENODEV = 19;
>> +#pragma D binding "1.0" ENODEV
>> +inline int ENOTDIR = 20;
>> +#pragma D binding "1.0" ENOTDIR
>> +inline int EISDIR = 21;
>> +#pragma D binding "1.0" EISDIR
>> +inline int EINVAL = 22;
>> +#pragma D binding "1.0" EINVAL
>> +inline int ENFILE = 23;
>> +#pragma D binding "1.0" ENFILE
>> +inline int EMFILE = 24;
>> +#pragma D binding "1.0" EMFILE
>> +inline int ENOTTY = 25;
>> +#pragma D binding "1.0" ENOTTY
>> +inline int ETXTBSY = 26;
>> +#pragma D binding "1.0" ETXTBSY
>> +inline int EFBIG = 27;
>> +#pragma D binding "1.0" EFBIG
>> +inline int ENOSPC = 28;
>> +#pragma D binding "1.0" ENOSPC
>> +inline int ESPIPE = 29;
>> +#pragma D binding "1.0" ESPIPE
>> +inline int EROFS = 30;
>> +#pragma D binding "1.0" EROFS
>> +inline int EMLINK = 31;
>> +#pragma D binding "1.0" EMLINK
>> +inline int EPIPE = 32;
>> +#pragma D binding "1.0" EPIPE
>> +inline int EDOM = 33;
>> +#pragma D binding "1.0" EDOM
>> +inline int ERANGE = 34;
>> +#pragma D binding "1.0" ERANGE
>> +inline int EDEADLK = 35;
>> +#pragma D binding "1.0" EDEADLK
>> +inline int ENAMETOOLONG = 36;
>> +#pragma D binding "1.0" ENAMETOOLONG
>> +inline int ENOLCK = 37;
>> +#pragma D binding "1.0" ENOLCK
>> +inline int ENOSYS = 38;
>> +#pragma D binding "1.0" ENOSYS
>> +inline int ENOTEMPTY = 39;
>> +#pragma D binding "1.0" ENOTEMPTY
>> +inline int ELOOP = 40;
>> +#pragma D binding "1.0" ELOOP
>> +inline int EWOULDBLOCK = 11;
>> +#pragma D binding "1.0" EWOULDBLOCK
>> +inline int ENOMSG = 42;
>> +#pragma D binding "1.0" ENOMSG
>> +inline int EIDRM = 43;
>> +#pragma D binding "1.0" EIDRM
>> +inline int ECHRNG = 44;
>> +#pragma D binding "1.0" ECHRNG
>> +inline int EL2NSYNC = 45;
>> +#pragma D binding "1.0" EL2NSYNC
>> +inline int EL3HLT = 46;
>> +#pragma D binding "1.0" EL3HLT
>> +inline int EL3RST = 47;
>> +#pragma D binding "1.0" EL3RST
>> +inline int ELNRNG = 48;
>> +#pragma D binding "1.0" ELNRNG
>> +inline int EUNATCH = 49;
>> +#pragma D binding "1.0" EUNATCH
>> +inline int ENOCSI = 50;
>> +#pragma D binding "1.0" ENOCSI
>> +inline int EL2HLT = 51;
>> +#pragma D binding "1.0" EL2HLT
>> +inline int EBADE = 52;
>> +#pragma D binding "1.0" EBADE
>> +inline int EBADR = 53;
>> +#pragma D binding "1.0" EBADR
>> +inline int EXFULL = 54;
>> +#pragma D binding "1.0" EXFULL
>> +inline int ENOANO = 55;
>> +#pragma D binding "1.0" ENOANO
>> +inline int EBADRQC = 56;
>> +#pragma D binding "1.0" EBADRQC
>> +inline int EBADSLT = 57;
>> +#pragma D binding "1.0" EBADSLT
>> +inline int EDEADLOCK = 35;
>> +#pragma D binding "1.0" EDEADLOCK
>> +inline int EBFONT = 59;
>> +#pragma D binding "1.0" EBFONT
>> +inline int ENOSTR = 60;
>> +#pragma D binding "1.0" ENOSTR
>> +inline int ENODATA = 61;
>> +#pragma D binding "1.0" ENODATA
>> +inline int ETIME = 62;
>> +#pragma D binding "1.0" ETIME
>> +inline int ENOSR = 63;
>> +#pragma D binding "1.0" ENOSR
>> +inline int ENONET = 64;
>> +#pragma D binding "1.0" ENONET
>> +inline int ENOPKG = 65;
>> +#pragma D binding "1.0" ENOPKG
>> +inline int EREMOTE = 66;
>> +#pragma D binding "1.0" EREMOTE
>> +inline int ENOLINK = 67;
>> +#pragma D binding "1.0" ENOLINK
>> +inline int EADV = 68;
>> +#pragma D binding "1.0" EADV
>> +inline int ESRMNT = 69;
>> +#pragma D binding "1.0" ESRMNT
>> +inline int ECOMM = 70;
>> +#pragma D binding "1.0" ECOMM
>> +inline int EPROTO = 71;
>> +#pragma D binding "1.0" EPROTO
>> +inline int EMULTIHOP = 72;
>> +#pragma D binding "1.0" EMULTIHOP
>> +inline int EDOTDOT = 73;
>> +#pragma D binding "1.0" EDOTDOT
>> +inline int EBADMSG = 74;
>> +#pragma D binding "1.0" EBADMSG
>> +inline int EOVERFLOW = 75;
>> +#pragma D binding "1.0" EOVERFLOW
>> +inline int ENOTUNIQ = 76;
>> +#pragma D binding "1.0" ENOTUNIQ
>> +inline int EBADFD = 77;
>> +#pragma D binding "1.0" EBADFD
>> +inline int EREMCHG = 78;
>> +#pragma D binding "1.0" EREMCHG
>> +inline int ELIBACC = 79;
>> +#pragma D binding "1.0" ELIBACC
>> +inline int ELIBBAD = 80;
>> +#pragma D binding "1.0" ELIBBAD
>> +inline int ELIBSCN = 81;
>> +#pragma D binding "1.0" ELIBSCN
>> +inline int ELIBMAX = 82;
>> +#pragma D binding "1.0" ELIBMAX
>> +inline int ELIBEXEC = 83;
>> +#pragma D binding "1.0" ELIBEXEC
>> +inline int EILSEQ = 84;
>> +#pragma D binding "1.0" EILSEQ
>> +inline int ERESTART = 85;
>> +#pragma D binding "1.0" ERESTART
>> +inline int ESTRPIPE = 86;
>> +#pragma D binding "1.0" ESTRPIPE
>> +inline int EUSERS = 87;
>> +#pragma D binding "1.0" EUSERS
>> +inline int ENOTSOCK = 88;
>> +#pragma D binding "1.0" ENOTSOCK
>> +inline int EDESTADDRREQ = 89;
>> +#pragma D binding "1.0" EDESTADDRREQ
>> +inline int EMSGSIZE = 90;
>> +#pragma D binding "1.0" EMSGSIZE
>> +inline int EPROTOTYPE = 91;
>> +#pragma D binding "1.0" EPROTOTYPE
>> +inline int ENOPROTOOPT = 92;
>> +#pragma D binding "1.0" ENOPROTOOPT
>> +inline int EPROTONOSUPPORT = 93;
>> +#pragma D binding "1.0" EPROTONOSUPPORT
>> +inline int ESOCKTNOSUPPORT = 94;
>> +#pragma D binding "1.0" ESOCKTNOSUPPORT
>> +inline int EOPNOTSUPP = 95;
>> +#pragma D binding "1.0" EOPNOTSUPP
>> +inline int EPFNOSUPPORT = 96;
>> +#pragma D binding "1.0" EPFNOSUPPORT
>> +inline int EAFNOSUPPORT = 97;
>> +#pragma D binding "1.0" EAFNOSUPPORT
>> +inline int EADDRINUSE = 98;
>> +#pragma D binding "1.0" EADDRINUSE
>> +inline int EADDRNOTAVAIL = 99;
>> +#pragma D binding "1.0" EADDRNOTAVAIL
>> +inline int ENETDOWN = 100;
>> +#pragma D binding "1.0" ENETDOWN
>> +inline int ENETUNREACH = 101;
>> +#pragma D binding "1.0" ENETUNREACH
>> +inline int ENETRESET = 102;
>> +#pragma D binding "1.0" ENETRESET
>> +inline int ECONNABORTED = 103;
>> +#pragma D binding "1.0" ECONNABORTED
>> +inline int ECONNRESET = 104;
>> +#pragma D binding "1.0" ECONNRESET
>> +inline int ENOBUFS = 105;
>> +#pragma D binding "1.0" ENOBUFS
>> +inline int EISCONN = 106;
>> +#pragma D binding "1.0" EISCONN
>> +inline int ENOTCONN = 107;
>> +#pragma D binding "1.0" ENOTCONN
>> +inline int ESHUTDOWN = 108;
>> +#pragma D binding "1.0" ESHUTDOWN
>> +inline int ETOOMANYREFS = 109;
>> +#pragma D binding "1.0" ETOOMANYREFS
>> +inline int ETIMEDOUT = 110;
>> +#pragma D binding "1.0" ETIMEDOUT
>> +inline int ECONNREFUSED = 111;
>> +#pragma D binding "1.0" ECONNREFUSED
>> +inline int EHOSTDOWN = 112;
>> +#pragma D binding "1.0" EHOSTDOWN
>> +inline int EHOSTUNREACH = 113;
>> +#pragma D binding "1.0" EHOSTUNREACH
>> +inline int EALREADY = 114;
>> +#pragma D binding "1.0" EALREADY
>> +inline int EINPROGRESS = 115;
>> +#pragma D binding "1.0" EINPROGRESS
>> +inline int ESTALE = 116;
>> +#pragma D binding "1.0" ESTALE
>> +inline int EUCLEAN = 117;
>> +#pragma D binding "1.0" EUCLEAN
>> +inline int ENOTNAM = 118;
>> +#pragma D binding "1.0" ENOTNAM
>> +inline int ENAVAIL = 119;
>> +#pragma D binding "1.0" ENAVAIL
>> +inline int EISNAM = 120;
>> +#pragma D binding "1.0" EISNAM
>> +inline int EREMOTEIO = 121;
>> +#pragma D binding "1.0" EREMOTEIO
>> +inline int EDQUOT = 122;
>> +#pragma D binding "1.0" EDQUOT
>> +inline int ENOMEDIUM = 123;
>> +#pragma D binding "1.0" ENOMEDIUM
>> +inline int EMEDIUMTYPE = 124;
>> +#pragma D binding "1.0" EMEDIUMTYPE
>> +inline int ECANCELED = 125;
>> +#pragma D binding "1.0" ECANCELED
>> +inline int ENOKEY = 126;
>> +#pragma D binding "1.0" ENOKEY
>> +inline int EKEYEXPIRED = 127;
>> +#pragma D binding "1.0" EKEYEXPIRED
>> +inline int EKEYREVOKED = 128;
>> +#pragma D binding "1.0" EKEYREVOKED
>> +inline int EKEYREJECTED = 129;
>> +#pragma D binding "1.0" EKEYREJECTED
>> +inline int EOWNERDEAD = 130;
>> +#pragma D binding "1.0" EOWNERDEAD
>> +inline int ENOTRECOVERABLE = 131;
>> +#pragma D binding "1.0" ENOTRECOVERABLE
>> +inline int ERFKILL = 132;
>> +#pragma D binding "1.0" ERFKILL
>> +inline int EHWPOISON = 133;
>> +#pragma D binding "1.0" EHWPOISON
>> +inline int ENOTSUP = 95;
>> +#pragma D binding "1.0" ENOTSUP
>> diff --git a/dlibs/aarch64/6.10/io.d b/dlibs/aarch64/6.10/io.d
>> new file mode 100644
>> index 0000000000000..ffccf5b3e3f18
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/io.d
>> @@ -0,0 +1,234 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on provider sched
>> +
>> +typedef char	*caddr_t;
>> +
>> +typedef struct bufinfo {
>> +	int b_flags;			/* buffer status */
>> +	size_t b_bcount;		/* number of bytes */
>> +	caddr_t b_addr;			/* buffer address */
>> +	uint64_t b_lblkno;		/* block # on device */
>> +	uint64_t b_blkno;		/* expanded block # on device */
>> +	size_t b_resid;			/* # of bytes not transferred */
>> +	size_t b_bufsize;		/* size of allocated buffer */
>> +	caddr_t b_iodone;		/* I/O completion routine */
>> +	int b_error;			/* expanded error field */
>> +	dev_t b_edev;			/* extended device */
>> +} bufinfo_t;
>> +
>> +inline int B_BUSY = 0x000001;
>> +#pragma D binding "1.0" B_BUSY
>> +inline int B_DONE = 0x000002;
>> +#pragma D binding "1.0" B_DONE
>> +inline int B_ERROR = 0x000004;
>> +#pragma D binding "1.0" B_ERROR
>> +inline int B_PAGEIO = 0x000010;
>> +#pragma D binding "1.0" B_PAGEIO
>> +inline int B_PHYS = 0x000020;
>> +#pragma D binding "1.0" B_PHYS
>> +inline int B_READ = 0x000040;
>> +#pragma D binding "1.0" B_READ
>> +inline int B_WRITE = 0x000100;
>> +#pragma D binding "1.0" B_WRITE
>> +inline int B_ASYNC = 0x000400;
>> +#pragma D binding "1.0" B_ASYNC
>> +
>> +#pragma D binding "1.0" translator
>> +translator bufinfo_t < struct buffer_head *B > {
>> +	b_flags = (int)arg1 & 0x01 ? B_WRITE : B_READ;
>> +	b_addr = B->b_data;
>> +	b_bcount = B->b_size;
>> +	b_lblkno = B->b_blocknr;
>> +	b_blkno = B->b_blocknr;
>> +	b_resid = 0;
>> +	b_bufsize = B->b_size;
>> +	b_iodone = (caddr_t)B->b_end_io;
>> +	b_error = 0;			/* b_state ?? */
>> +	b_edev = B->b_bdev->bd_dev;
>> +};
>> +
>> +/*
>> + * From linux/blk_types.h.
>> + */
>> +
>> +/* bit # in bi_flags */
>> +inline int BIO_USER_MAPPED = 6;
>> +
>> +/* bit mask in bi_rw */
>> +inline int REQ_WRITE = 0x01;
>> +
>> +inline int REQ_SYNC = 0x800;
>> +
>> +
>> +
>> +
>> +
>> +
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator bufinfo_t < struct bio *B > {
>> +	b_flags = ((int)B->bi_opf & REQ_WRITE ? B_WRITE : B_READ) |
>> +		((int)B->bi_opf & REQ_SYNC ? 0 : B_ASYNC) |
>> +		((int)B->bi_flags & (1 << BIO_USER_MAPPED) ? B_PAGEIO : B_PHYS);
>> +	b_addr = 0;
>> +	b_bcount = B->bi_iter.bi_size;
>> +	b_lblkno = B->bi_iter.bi_sector;
>> +	b_blkno = B->bi_iter.bi_sector;
>> +	b_resid = 0;
>> +	b_bufsize = B->bi_iter.bi_size;
>> +	b_iodone = (caddr_t)B->bi_end_io;
>> +	b_error = 0;
>> +	b_edev = B->bi_bdev == NULL ? 0 : B->bi_bdev->bd_dev;
>> +};
>> +
>> +typedef struct devinfo {
>> +	int dev_major;			/* major number */
>> +	int dev_minor;			/* minor number */
>> +	int dev_instance;		/* instance number */
>> +	string dev_name;		/* name of device */
>> +	string dev_statname;		/* name of device + instance/minor */
>> +	string dev_pathname;		/* pathname of device */
>> +} devinfo_t;
>> +
>> +
>> +
>> +#pragma D binding "1.0" translator
>> +translator devinfo_t < struct buffer_head *B > {
>> +	dev_major = getmajor(B->b_bdev->bd_dev);
>> +	dev_minor = getminor(B->b_bdev->bd_dev);
>> +	dev_instance = 0;		/* not used? */
>> +	dev_name = B->b_bdev->bd_disk->part0->bd_device.parent
>> +	    ? B->b_bdev->bd_disk->part0->bd_device.parent->driver->name
>> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.parent->driver->name)
>> +		: "<none>"
>> +	    : B->b_bdev->bd_disk->part0->bd_device.driver->name
>> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.driver->name)
>> +		: "<none>";
>> +	dev_statname = B->b_bdev->__bd_flags.counter & 255 == 0
>> +			? stringof(B->b_bdev->bd_disk->disk_name)
>> +			: strjoin(stringof(B->b_bdev->bd_disk->disk_name),
>> +				  lltostr(B->b_bdev->__bd_flags.counter & 255));
>> +	dev_pathname = strjoin(
>> +			"/dev/",
>> +			B->b_bdev->__bd_flags.counter & 255 == 0
>> +			    ? stringof(B->b_bdev->bd_disk->disk_name)
>> +			    : strjoin(stringof(B->b_bdev->bd_disk->disk_name),
>> +				      lltostr(B->b_bdev->__bd_flags.counter & 255))
>> +		       );
>> +};
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator devinfo_t < struct bio *B > {
>> +	dev_major = B->bi_bdev == NULL ? 0 : getmajor(B->bi_bdev->bd_dev);
>> +	dev_minor = B->bi_bdev == NULL ? 0 : getminor(B->bi_bdev->bd_dev);
>> +	dev_instance = 0;
>> +	dev_name = B->bi_bdev == NULL
>> +			? "nfs"
>> +			: stringof(((struct blk_major_name **)`major_names)[
>> +					getmajor(B->bi_bdev->bd_dev) % 255
>> +				   ]->name);
>> +	dev_statname = B->bi_bdev == NULL ? "nfs" :
>> +	    B->bi_bdev->__bd_flags.counter & 255 == 0 ? stringof(B->bi_bdev->bd_disk->disk_name) :
>> +	    strjoin(stringof(B->bi_bdev->bd_disk->disk_name), lltostr(B->bi_bdev->__bd_flags.counter & 255));
>> +	dev_pathname = B->bi_bdev == NULL ? "<nfs>" : "<unknown>";
>> +};
>> +
>> +typedef struct fileinfo {
>> +	string fi_name;			/* name (basename of fi_pathname) */
>> +	string fi_dirname;		/* directory (dirname of fi_pathname) */
>> +	string fi_pathname;		/* full pathname */
>> +	loff_t fi_offset;		/* offset within file */
>> +	string fi_fs;			/* filesystem */
>> +	string fi_mount;		/* mount point of file system */
>> +	int fi_oflags;			/* open(2) flags for file descriptor */
>> +} fileinfo_t;
>> +
>> +#pragma D binding "1.0" translator
>> +translator fileinfo_t < struct buffer_head *B > {
>> +	fi_name = "<unknown>";
>> +	fi_dirname = "<unknown>";
>> +	fi_pathname = "<unknown>";
>> +	fi_offset = 0;
>> +	fi_fs = "<unknown>";
>> +	fi_mount = "<unknown>";
>> +	fi_oflags = 0;
>> +};
>> +
>> +inline int O_ACCMODE = 0003;
>> +#pragma D binding "1.1" O_ACCMODE
>> +inline int O_RDONLY = 00;
>> +#pragma D binding "1.1" O_RDONLY
>> +inline int O_WRONLY = 01;
>> +#pragma D binding "1.1" O_WRONLY
>> +inline int O_RDWR = 02;
>> +#pragma D binding "1.1" O_RDWR
>> +inline int O_CREAT = 00000100;
>> +#pragma D binding "1.1" O_CREAT
>> +inline int O_EXCL = 00000200;
>> +#pragma D binding "1.1" O_EXCL
>> +inline int O_NOCTTY = 00000400;
>> +#pragma D binding "1.1" O_NOCTTY
>> +inline int O_TRUNC = 00001000;
>> +#pragma D binding "1.1" O_TRUNC
>> +inline int O_APPEND = 00002000;
>> +#pragma D binding "1.1" O_APPEND
>> +inline int O_NONBLOCK = 00004000;
>> +#pragma D binding "1.1" O_NONBLOCK
>> +inline int O_NDELAY = 00004000;
>> +#pragma D binding "1.1" O_NDELAY
>> +inline int O_SYNC = (04000000|010000);
>> +#pragma D binding "1.1" O_SYNC
>> +
>> +inline int O_ASYNC = 020000;
>> +#pragma D binding "1.1" O_ASYNC
>> +inline int O_DIRECTORY = 040000;
>> +#pragma D binding "1.1" O_DIRECTORY
>> +inline int O_NOFOLLOW = 0100000;
>> +#pragma D binding "1.1" O_NOFOLLOW
>> +inline int O_CLOEXEC = 02000000;
>> +#pragma D binding "1.1" O_CLOEXEC
>> +inline int O_DSYNC = 010000;
>> +#pragma D binding "1.1" O_DSYNC
>> +inline int O_RSYNC = (04000000|010000);
>> +#pragma D binding "1.1" O_RSYNC
>> +
>> +#pragma D binding "1.1" translator
>> +translator fileinfo_t < struct file *F > {
>> +	fi_name = F == NULL
>> +			? "<none>"
>> +			: stringof(F->f_path.dentry->d_name.name);
>> +	fi_dirname = F == NULL
>> +			? "<none>"
>> +			: dirname(d_path(&(F->f_path)));
>> +	fi_pathname = F == NULL
>> +			? "<none>"
>> +			: d_path(&(F->f_path));
>> +	fi_offset = F == NULL
>> +			? 0
>> +			: F->f_pos;
>> +	fi_fs = F == NULL
>> +			? "<none>"
>> +			: stringof(F->f_path.mnt->mnt_sb->s_type->name);
>> +	fi_mount = F == NULL
>> +			? "<none>"
>> +			: "<unknown>";
>> +	fi_oflags = F == NULL
>> +			? 0
>> +			: F->f_flags;
>> +};
>> +
>> +inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
>> +				 fd >= 0 && fd < curthread->files->fdt->max_fds
>> +					? curthread->files->fdt->fd[fd]
>> +					: NULL
>> +				);
>> +
>> +#pragma D attributes Stable/Stable/Common fds
>> +#pragma D binding "1.1" fds
>> diff --git a/dlibs/aarch64/6.10/ip.d b/dlibs/aarch64/6.10/ip.d
>> new file mode 100644
>> index 0000000000000..f8b77f1224115
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/ip.d
>> @@ -0,0 +1,341 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2007, 2023, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library net.d
>> +#pragma D depends_on library procfs.d
>> +#pragma D depends_on provider ip
>> +
>> +inline int IPPROTO_IP		=	0;
>> +inline int IPPROTO_ICMP		=	1;
>> +inline int IPPROTO_IGMP		=	2;
>> +inline int IPPROTO_IPIP		=	4;
>> +inline int IPPROTO_TCP		=	6;
>> +inline int IPPROTO_EGP		=	8;
>> +inline int IPPROTO_PUP		=	12;
>> +inline int IPPROTO_UDP		=	17;
>> +inline int IPPROTO_IDP		=	22;
>> +inline int IPPROTO_TP		=	29;
>> +inline int IPPROTO_DCCP		=	33;
>> +inline int IPPROTO_IPV6		=	41;
>> +inline int IPPROTO_RSVP		=	46;
>> +inline int IPPROTO_GRE		=	47;
>> +inline int IPPROTO_ESP		=	50;
>> +inline int IPPROTO_AH		=	51;
>> +inline int IPPROTO_OSPF		=	89;
>> +inline int IPPROTO_MTP		=	92;
>> +inline int IPPROTO_BEETPH	=	94;
>> +inline int IPPROTO_ENCAP	=	98;
>> +inline int IPPROTO_PIM		=	103;
>> +inline int IPPROTO_COMP		=	108;
>> +inline int IPPROTO_SCTP		=	132;
>> +inline int IPPROTO_UDPLITE	=	136;
>> +inline int IPPROTO_RAW		=	255;
>> +inline int IPPROTO_MAX		=	256;
>> +inline int IPPROTO_HOPOPTS	=	0;
>> +inline int IPPROTO_ROUTING	=	43;
>> +inline int IPPROTO_FRAGMENT	=	44;
>> +inline int IPPROTO_ICMPV6	=	58;
>> +inline int IPPROTO_NONE		=	59;
>> +inline int IPPROTO_DSTOPTS	=	60;
>> +inline int IPPROTO_MH		=	135;
>> +
>> +inline int TCP_MIN_HEADER_LENGTH =	20;
>> +
>> +/*
>> + * For compatibility with Solaris.  Here the netstackid will be the pointer
>> + * to the net namespace (nd_net in struct net_device).
>> + */
>> +typedef uint64_t	netstackid_t;
>> +typedef __be32		ipaddr_t;
>> +typedef struct in6_addr	in6_addr_t;
>> +
>> +/*
>> + * pktinfo is where packet ID info can be made available for deeper
>> + * analysis if packet IDs become supported by the kernel in the future.
>> + * The pkt_addr member is currently always NULL.
>> + */
>> +typedef struct pktinfo {
>> +	uintptr_t pkt_addr;
>> +} pktinfo_t;
>> +
>> +/*
>> + * csinfo is where connection state info is made available.
>> + */
>> +typedef struct csinfo {
>> +	uintptr_t cs_addr;
>> +	uint64_t cs_cid;
>> +} csinfo_t;
>> +
>> +/*
>> + * ipinfo contains common IP info for both IPv4 and IPv6.
>> + */
>> +typedef struct ipinfo {
>> +	uint8_t ip_ver;			/* IP version (4, 6) */
>> +	uint32_t ip_plength;		/* payload length */
>> +	string ip_saddr;		/* source address */
>> +	string ip_daddr;		/* destination address */
>> +} ipinfo_t;
>> +
>> +/*
>> + * ifinfo contains network interface info.
>> + */
>> +typedef struct ifinfo {
>> +	string if_name;			/* interface name */
>> +	int8_t if_local;		/* is delivered locally */
>> +	netstackid_t if_ipstack;	/* netns pointer on Linux */
>> +	uintptr_t if_addr;		/* pointer to raw struct net_device */
>> +} ifinfo_t;
>> +
>> +/*
>> + * ipv4info is a translated version of the IPv4 header (with raw pointer).
>> + * These values are NULL if the packet is not IPv4.
>> + */
>> +typedef struct ipv4info {
>> +	uint8_t ipv4_ver;		/* IP version (4) */
>> +	uint8_t ipv4_ihl;		/* header length, bytes */
>> +	uint8_t ipv4_tos;		/* type of service field */
>> +	uint16_t ipv4_length;		/* length (header + payload) */
>> +	uint16_t ipv4_ident;		/* identification */
>> +	uint8_t ipv4_flags;		/* IP flags */
>> +	uint16_t ipv4_offset;		/* fragment offset */
>> +	uint8_t ipv4_ttl;		/* time to live */
>> +	uint8_t ipv4_protocol;		/* next level protocol */
>> +	string ipv4_protostr;		/* next level protocol, as string */
>> +	uint16_t ipv4_checksum;		/* header checksum */
>> +	ipaddr_t ipv4_src;		/* source address */
>> +	ipaddr_t ipv4_dst;		/* destination address */
>> +	string ipv4_saddr;		/* source address, string */
>> +	string ipv4_daddr;		/* destination address, string */
>> +	struct iphdr *ipv4_hdr;		/* pointer to raw header */
>> +} ipv4info_t;
>> +
>> +/*
>> + * ipv6info is a translated version of the IPv6 header (with raw pointer).
>> + * These values are NULL if the packet is not IPv6.
>> + */
>> +typedef struct ipv6info {
>> +	uint8_t ipv6_ver;		/* IP version (6) */
>> +	uint8_t ipv6_tclass;		/* traffic class */
>> +	uint32_t ipv6_flow;		/* flow label */
>> +	uint16_t ipv6_plen;		/* payload length */
>> +	uint8_t ipv6_nexthdr;		/* next header protocol */
>> +	string ipv6_nextstr;		/* next header protocol, as string */
>> +	uint8_t ipv6_hlim;		/* hop limit */
>> +	in6_addr_t *ipv6_src;		/* source address */
>> +	in6_addr_t *ipv6_dst;		/* destination address */
>> +	string ipv6_saddr;		/* source address, string */
>> +	string ipv6_daddr;		/* destination address, string */
>> +	struct ipv6hdr *ipv6_hdr;	/* pointer to raw header */
>> +} ipv6info_t;
>> +
>> +/*
>> + * void_ip_t is a void pointer to either an IPv4 or IPv6 header.  It has
>> + * its own type name so that a translator can be determined.
>> + */
>> +typedef uintptr_t void_ip_t;
>> +
>> +/*
>> + * __dtrace_tcp_void_ip_t is used by the translator to take either the
>> + * non-NULL void_ip_t * passed in or, if it is NULL, uses arg3 (struct tcp *)
>> + * from the tcp:::send probe to translate to an ipinfo_t.
>> + * This allows us to present the consumer with header data based on the
>> + * struct tcp * when IP information is not yet present (for TCP send).
>> + */
>> +typedef void * __dtrace_tcp_void_ip_t;
>> +
>> +#pragma D binding "1.5" translator
>> +translator pktinfo_t < struct sk_buff *s > {
>> +	pkt_addr = (uintptr_t)s;
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator csinfo_t < struct sock *s > {
>> +	cs_addr = (uintptr_t)s;
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < struct iphdr *I > {
>> +	ip_ver = 4;
>> +        ip_plength = I != NULL ? (ntohs(I->tot_len) - I->ihl << 2) : 0;
>> +	ip_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<unknown>";
>> +	ip_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<unknown>";
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < struct ipv6hdr *I > {
>> +	ip_ver = 6;
>> +	ip_plength = I != NULL ? ntohs(I->payload_len) : 0;
>> +	ip_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<unknown>";
>> +	ip_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<unknown>";
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < void_ip_t *I > {
>> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 : 0;
>> +	ip_plength = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
>> +	    (ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2)) :
>> +	    *(uint8_t *)I >> 4 == 6 ?
>> +	    ntohs(((struct ipv6hdr *)I)->payload_len) : 0) : 0;
>> +	ip_saddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->saddr) : *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) : "<unknown>") :
>> +	    "<unknown>";
>> +	ip_daddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->daddr) : *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) : "<unknown>") :
>> +	    "<unknown>";
>> +};
>> +
>> +/*
>> + * In some cases where the ipinfo_t * is NULL we wish to construct IP info
>> + * using the struct tcp_sock * (arg3).  In order to map local IP to source
>> + * or destination IP address appropriately we need to check if the associated
>> + * data is inbound (NET_PROBE_INBOUND in arg7) or outbound (NET_PROBE_OUTBOUND);
>> + * the value is stored in arg7.  If inbound, we map the local IP address to
>> + * ip_daddr (destination), and if outbound it is mapped to ip_saddr.
>> + */
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < __dtrace_tcp_void_ip_t *I > {
>> +	/*
>> +	 * General strategy used is to rely on the IP header I if it is
>> +	 * non-null; otherwise we try to reconstruct IP values from arg3
>> +	 * (a struct tcp_sock *).
>> +	 */
>> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET ? 4 :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ? 6 : 0;
>> +	/*
>> +	 * For ip_plength we fall back to using TCP skb data from the tcp_skb_cb
>> +	 * to determine payload length.
>> +	 */
>> +	ip_plength = I != NULL && *(uint8_t *)I >> 4 == 4 ?
>> +	    ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2) :
>> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
>> +	    ntohs(((struct ipv6hdr *)I)->payload_len) :
>> +	    arg0 != NULL ?
>> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq -
>> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->seq :
>> +	    0;
>> +	/*
>> +	 * For source/destination addresses, we again try to use the IP header I
>> +	 * if available.  If I is NULL, we utilize arg3 (struct tcp_sock *)
>> +	 * but the problem here is that it stores local and remote IP addresses
>> +	 * _not_ source and destination.  So we need to know if traffic is
>> +	 * inbound or outbound. If inbound, IP source address is remote
>> +	 * socket address (skc_daddr) and destination IP address is local socket
>> +	 * address (skc_rcv_saddr).  If outbound, IP source address is local
>> +	 * socket address and IP destination address is remote socket address.
>> +	 */
>> +	ip_saddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->saddr) :
>> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_daddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr) :
>> +	    "<unknown>";
>> +	ip_daddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->daddr) :
>> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_daddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr) :
>> +	    "<unknown>";
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ifinfo_t < struct net_device *N > {
>> +	if_name = N != NULL ? stringof(N->name) : "<unknown>";
>> +	if_ipstack = (N != NULL && sizeof(N->nd_net) > 0) ?
>> +	    ((uint64_t)N->nd_net.net) : 0;
>> +	if_local = (N == NULL);	/* is delivered locally */
>> +	if_addr = (uintptr_t)N;	/* pointer to raw struct net_device ptr */
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipv4info_t < struct iphdr *I > {
>> +	ipv4_ver = I != NULL ? 4 : 0;
>> +	ipv4_ihl = I != NULL ? ((*(uint8_t *)I & 0xf) << 2) : 0;
>> +	ipv4_tos = I != NULL ? I->tos : 0;
>> +	ipv4_length = I != NULL ? ntohs(I->tot_len) : 0;
>> +	ipv4_ident = I != NULL ? ntohs(I->id) : 0;
>> +	ipv4_flags = I != NULL ? ntohs(I->frag_off) >> 12 : 0;
>> +	ipv4_offset = I != NULL ? ntohs(I->frag_off) & 0x0fff : 0;
>> +	ipv4_ttl = I != NULL ? I->ttl : 0;
>> +	ipv4_protocol = I != NULL ? I->protocol : 0;
>> +	ipv4_protostr = I == NULL ? "<null>" :
>> +	    I->protocol == IPPROTO_TCP     ? "TCP"    :
>> +	    I->protocol == IPPROTO_UDP     ? "UDP"    :
>> +	    I->protocol == IPPROTO_IP      ? "IP"     :
>> +	    I->protocol == IPPROTO_ICMP    ? "ICMP"   :
>> +	    I->protocol == IPPROTO_IGMP    ? "IGMP"   :
>> +	    I->protocol == IPPROTO_EGP     ? "EGP"    :
>> +	    I->protocol == IPPROTO_IPV6    ? "IPv6"   :
>> +	    I->protocol == IPPROTO_ROUTING ? "ROUTE"  :
>> +	    I->protocol == IPPROTO_ESP     ? "ESP"    :
>> +	    I->protocol == IPPROTO_AH      ? "AH"     :
>> +	    I->protocol == IPPROTO_ICMPV6  ? "ICMPv6" :
>> +	    I->protocol == IPPROTO_OSPF    ? "OSPF"   :
>> +	    I->protocol == IPPROTO_SCTP    ? "SCTP"   :
>> +	    I->protocol == IPPROTO_RAW     ? "RAW"    :
>> +	    lltostr((uint64_t)I->protocol);
>> +	ipv4_checksum = I != NULL ? ntohs(I->check) : 0;
>> +	ipv4_src = I != NULL ? I->saddr : 0;
>> +	ipv4_dst = I != NULL ? I->daddr : 0;
>> +	ipv4_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<null>";
>> +	ipv4_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<null>";
>> +	ipv4_hdr = I;
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipv6info_t < struct ipv6hdr *I > {
>> +	ipv6_ver = I != NULL ? ((*(uint8_t *)I) >> 4) : 0;
>> +	ipv6_tclass = I != NULL ? ((ntohl(*(uint32_t *)I) & 0x0fffffff) >> 20) : 0;
>> +	ipv6_flow = I != NULL ? (ntohl(*(uint32_t *)I) & 0x000fffff) : 0;
>> +	ipv6_plen = I != NULL ? ntohs(I->payload_len) : 0;
>> +	ipv6_nexthdr = I != NULL ? I->nexthdr : 0;
>> +	ipv6_nextstr = I == NULL ? "<null>" :
>> +	    I->nexthdr == IPPROTO_TCP	?	"TCP"		:
>> +	    I->nexthdr == IPPROTO_UDP	?	"UDP"		:
>> +	    I->nexthdr == IPPROTO_IP	?	"IP"		:
>> +	    I->nexthdr == IPPROTO_ICMP	?	"ICMP"		:
>> +	    I->nexthdr == IPPROTO_IGMP	?	"IGMP"		:
>> +	    I->nexthdr == IPPROTO_EGP	?	"EGP"		:
>> +	    I->nexthdr == IPPROTO_IPV6	?	"IPv6"		:
>> +	    I->nexthdr == IPPROTO_ROUTING ?	"ROUTE"		:
>> +	    I->nexthdr == IPPROTO_ESP	?	"ESP"		:
>> +	    I->nexthdr == IPPROTO_AH	?	"AH"		:
>> +	    I->nexthdr == IPPROTO_ICMPV6 ?	"ICMPv6"	:
>> +	    I->nexthdr == IPPROTO_OSPF ?	"OSPF"		:
>> +	    I->nexthdr == IPPROTO_SCTP	?	"SCTP"		:
>> +	    I->nexthdr == IPPROTO_RAW	?	"RAW"		:
>> +	    lltostr((uint64_t)I->nexthdr);
>> +	ipv6_hlim = I != NULL ? I->hop_limit : 0;
>> +	ipv6_src = I != NULL ? &I->saddr : NULL;
>> +	ipv6_dst = I != NULL ? &I->daddr : 0;
>> +	ipv6_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<null>";
>> +	ipv6_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<null>";
>> +	ipv6_hdr = I;
>> +};
>> diff --git a/dlibs/aarch64/6.10/lockstat.d b/dlibs/aarch64/6.10/lockstat.d
>> new file mode 100644
>> index 0000000000000..cb8b4bd96f1ac
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/lockstat.d
>> @@ -0,0 +1,14 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on provider lockstat
>> +
>> +inline int RW_WRITER = 0x00;
>> +#pragma D binding "1.6.4" RW_WRITER
>> +inline int RW_READER = 0x01;
>> +#pragma D binding "1.6.4" RW_READER
>> diff --git a/dlibs/aarch64/6.10/net.d b/dlibs/aarch64/6.10/net.d
>> new file mode 100644
>> index 0000000000000..6ac3428747a77
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/net.d
>> @@ -0,0 +1,33 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2007, 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +/* These are needed for inet_ntop() DTrace function. */
>> +inline int AF_INET              =       2;
>> +inline int AF_INET6             =       10;
>> +
>> +/* These are needed for link_ntop() DTrace function. */
>> +inline int ARPHRD_ETHER         =       1;
>> +inline int ARPHRD_INFINIBAND    =       32;
>> +
>> +/*
>> + * The conninfo_t structure should be used by all application protocol
>> + * providers as the first arguments to indicate some basic information
>> + * about the connection. This structure may be augmented to accommodate
>> + * the particularities of additional protocols in the future.
>> + */
>> +typedef struct conninfo {
>> +	 string ci_local;	/* local host address */
>> +	 string ci_remote;	/* remote host address */
>> +	 string ci_protocol;	/* protocol (ipv4, ipv6, etc) */
>> +} conninfo_t;
>> +
>> +/*
>> + * We use these values to determine if a probe point is associated
>> + * with sending (outbound) or receiving (inbound).
>> + */
>> +inline int NET_PROBE_OUTBOUND =		0x00;
>> +inline int NET_PROBE_INBOUND =		0x01;
>> diff --git a/dlibs/aarch64/6.10/pcap.d b/dlibs/aarch64/6.10/pcap.d
>> new file mode 100644
>> index 0000000000000..21a8e74a4036d
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/pcap.d
>> @@ -0,0 +1,35 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on provider ip
>> +
>> +/*
>> + * In general, PCAP_<type> names are chosen to match DL_<type> DLPI
>> + * datalink types.
>> + */
>> +
>> +/*
>> + * Network-related capture types.  Raw DLT_* values can be used for those
>> + * not present here; see /usr/include/pcap/bpf.h for the full list.
>> + */
>> +
>> +inline int PCAP_NULL = 0;
>> +#pragma D binding "1.12" PCAP_NULL
>> +inline int PCAP_ETHER = 1;
>> +#pragma D binding "1.12" PCAP_ETHER
>> +inline int PCAP_WIFI = 105;
>> +#pragma D binding "1.12" PCAP_WIFI
>> +inline int PCAP_PPP = 9;
>> +#pragma D binding "1.12" PCAP_PPP
>> +/* PCAP_IP can signify IPv4 or IPv6 header follows. */
>> +inline int PCAP_IP = 12;
>> +#pragma D binding "1.12" PCAP_IP
>> +
>> +/* InfiniBand-related capture types. */
>> +inline int PCAP_IPOIB = 242;
>> +#pragma D binding "1.12" PCAP_IPOIB
>> diff --git a/dlibs/aarch64/6.10/procfs.d b/dlibs/aarch64/6.10/procfs.d
>> new file mode 100644
>> index 0000000000000..5d7873b5e0091
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/procfs.d
>> @@ -0,0 +1,306 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, 2022, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +/*
>> + * This file defines the standard set of inlines and translators to be made
>> + * available for all D programs to use to examine process model state.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library sched.d
>> +
>> +typedef time64_t time_t;
>> +
>> +typedef struct timestruc {
>> +	time_t tv_sec;
>> +	long tv_nsec;
>> +} timestruc_t;
>> +
>> +typedef struct lwpsinfo {
>> +	int pr_flag;			/* lwp flags (DEPRECATED) */
>> +	int pr_lwpid;			/* lwp id */
>> +	uintptr_t pr_addr;		/* internal address of lwp */
>> +	uintptr_t pr_wchan;		/* wait addr for sleeping lwp */
>> +	char pr_stype;			/* sync event type */
>> +	char pr_state;			/* numeric lwp state */
>> +	char pr_sname;			/* printable char for pr_state */
>> +	char pr_nice;			/* nice for cpu usage */
>> +	short pr_syscall;		/* syscall number */
>> +	char pr_oldpri;			/* priority */
>> +	char pr_cpu;			/* CPU usage */
>> +	int pr_pri;			/* priority */
>> +	ushort_t pr_pctcpu;		/* % of recent cpu time */
>> +	ushort_t pr_pad;
>> +	timestruc_t pr_start;		/* lwp start time */
>> +	timestruc_t pr_time;		/* usr+sys cpu time */
>> +	char pr_clname[8];		/* scheduling class name */
>> +	char pr_name[16];		/* name */
>> +	processorid_t pr_onpro;		/* processor last ran on */
>> +	processorid_t pr_bindpro;	/* processor bound to */
>> +	psetid_t pr_bindpset;		/* processor set */
>> +	int pr_lgrp;			/* lwp home lgroup */
>> +	int pr_filler[4];
>> +} lwpsinfo_t;
>> +
>> +typedef id_t taskid_t;
>> +typedef id_t dprojid_t;
>> +typedef id_t poolid_t;
>> +typedef id_t zoneid_t;
>> +
>> +/*
>> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
>> + * psinfo_t struct.
>> + * We do not provide support for pr_size, pr_rssize, pr_pctcpu, and pr_pctmem.
>> + * We also do not fill in pr_lwp (the lwpsinfo_t for the representative LWP)
>> + * because we do not have the ability to select and stop any representative.
>> + * Also, for the moment, pr_wstat, pr_time, and pr_ctime are not supported,
>> + * but these could be supported by DTrace in the future using subroutines.
>> + * Note that any member added to this translator should also be added to the
>> + * kthread_t-to-psinfo_t translator, below.
>> + */
>> +typedef struct psinfo {
>> +	int pr_flag;			/* process flags (DEPRECATED) */
>> +	int pr_nlwp;			/* number of active lwps (Linux: 1) */
>> +	pid_t pr_pid;			/* unique process id */
>> +	pid_t pr_ppid;			/* process id of parent */
>> +	pid_t pr_pgid;			/* pid of process group leader */
>> +	pid_t pr_sid;			/* session id */
>> +	uid_t pr_uid;			/* real user id */
>> +	uid_t pr_euid;			/* effective user id */
>> +	uid_t pr_gid;			/* real group id */
>> +	uid_t pr_egid;			/* effective group id */
>> +	uintptr_t pr_addr;		/* address of process */
>> +	size_t pr_size;			/* size of process image (in KB) */
>> +	size_t pr_rssize;		/* resident set sie (in KB) */
>> +	size_t pr_pad1;
>> +	struct tty_struct *pr_ttydev;	/* controlling tty (or -1) */
>> +	ushort_t pr_pctcpu;		/* % of recent cpu time used */
>> +	ushort_t pr_pctmem;		/* % of recent memory used */
>> +	timestruc_t pr_start;		/* process start time */
>> +	timestruc_t pr_time;		/* usr+sys cpu time for process */
>> +	timestruc_t pr_ctime;		/* usr+sys cpu time for children */
>> +	char pr_fname[16];		/* name of exec'd file */
>> +	char pr_psargs[80];		/* initial chars of arg list */
>> +	int pr_wstat;			/* if zombie, wait() status */
>> +	int pr_argc;			/* initial argument count */
>> +	uintptr_t pr_argv;		/* address of initial arg vector */
>> +	uintptr_t pr_envp;		/* address of initial env vector */
>> +	char pr_dmodel;			/* data model */
>> +	char pr_pad2[3];
>> +	taskid_t pr_taskid;		/* task id */
>> +	dprojid_t pr_projid;		/* project id */
>> +	int pr_nzomb;			/* number of zombie lwps (Linux: 0) */
>> +	poolid_t pr_poolid;		/* pool id */
>> +	zoneid_t pr_zoneid;		/* zone id */
>> +	id_t pr_contract;		/* process contract */
>> +	int pr_filler[1];
>> +	lwpsinfo_t pr_lwp;
>> +} psinfo_t;
>> +
>> +inline char PR_MODEL_ILP32 = 1;
>> +#pragma D binding "1.0" PR_MODEL_ILP32
>> +inline char PR_MODEL_LP64 = 2;
>> +#pragma D binding "1.0" PR_MODEL_LP64
>> +
>> + 
>> + 
>> +inline	int PIDTYPE_PID = 0;
>> +#pragma D binding "1.0" PIDTYPE_PID
>> +inline	int PIDTYPE_TGID = 1;
>> +#pragma D binding "1.0" PIDTYPE_TGID
>> +inline	int PIDTYPE_PGID = 2;
>> +#pragma D binding "1.0" PIDTYPE_PGID
>> +inline	int PIDTYPE_SID = 3;
>> +#pragma D binding "1.0" PIDTYPE_SID
>> +
>> + 
>> + 
>> + 
>> + 
>> + 
>> + 
>> + 
>> +#pragma D binding "1.0" translator
>> +translator psinfo_t < struct task_struct *T > {
>> +	pr_nlwp = 1;
>> +	pr_pid = T->tgid;
>> +	pr_ppid = T->real_parent->tgid;
>> +	pr_pgid = T->signal->pids[PIDTYPE_PGID]->numbers[0].nr;
>> +	pr_sid = T->signal->pids[PIDTYPE_SID]->numbers[0].nr;
>> +	pr_uid = T->cred->uid.val;
>> +	pr_euid = T->cred->euid.val;
>> +	pr_gid = T->cred->gid.val;
>> +	pr_egid = T->cred->egid.val;
>> +	pr_addr = (uintptr_t)T;
>> +
>> +	pr_ttydev = T->signal->tty ? T->signal->tty
>> +				   : (struct tty_struct *)-1;
>> +
>> +	pr_fname = T->comm;
>> +/*
>> +	pr_psargs = stringof(get_psinfo(T)->__psinfo(psargs));
>> + */
>> +	pr_wstat = 0;
>> +/*
>> +	pr_argc = get_psinfo(T)->__psinfo(argc);
>> +	pr_argv = (uintptr_t)get_psinfo(T)->__psinfo(argv);
>> +	pr_envp = (uintptr_t)get_psinfo(T)->__psinfo(envp);
>> + */
>> +
>> +	pr_dmodel = PR_MODEL_LP64;
>> +
>> +	pr_taskid = 0;
>> +	pr_projid = 0;
>> +	pr_nzomb = 0;
>> +	pr_poolid = 0;
>> +	pr_zoneid = 0;
>> +	pr_contract = 0;
>> +};
>> +
>> +inline int PR_STOPPED = 0x00000001;
>> +#pragma D binding "1.0" PR_STOPPED
>> +inline int PR_ISTOP = 0x00000002;
>> +#pragma D binding "1.0" PR_ISTOP
>> +inline int PR_DSTOP = 0x00000004;
>> +#pragma D binding "1.0" PR_DSTOP
>> +inline int PR_IDLE = 0x10000000;
>> +#pragma D binding "1.0" PR_IDLE
>> +
>> +inline char SSLEEP = 1;
>> +#pragma D binding "1.0" SSLEEP
>> +inline char SRUN = 2;
>> +#pragma D binding "1.0" SRUN
>> +inline char SZOMB = 3;
>> +#pragma D binding "1.0" SZOMB
>> +inline char SSTOP = 4;
>> +#pragma D binding "1.0" SSTOP
>> +inline char SIDL = 5;
>> +#pragma D binding "1.0" SIDL
>> +inline char SONPROC = 6;
>> +#pragma D binding "1.0" SONPROC
>> +inline char SWAIT = 7;
>> +#pragma D binding "1.0" SWAIT
>> +
>> +/*
>> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
>> + * lwpsinfo_t.
>> + * We do not provide support for pr_nice, pr_oldpri, pr_cpu, or pr_pctcpu.
>> + * Also, for the moment, pr_start and pr_time are not supported, but these
>> + * could be supported by DTrace in the future using subroutines.
>> + */
>> +#pragma D binding "1.0" translator
>> +translator lwpsinfo_t < struct task_struct *T > {
>> +	pr_flag = (T->__state & 0x00000004) ? PR_STOPPED : 0;
>> +/*
>> +	pr_flag = ((T->t_state == TS_STOPPED) ? (PR_STOPPED |
>> +	    ((!(T->t_schedflag & TS_PSTART)) ? PR_ISTOP : 0)) :
>> +	    ((T->t_proc_flag & TP_PRVSTOP) ? PR_STOPPED | PR_ISTOP : 0)) |
>> +	    ((T == T->t_procp->p_agenttp) ? PR_AGENT : 0) |
>> +	    ((!(T->t_proc_flag & TP_TWAIT)) ? PR_DETACH : 0) |
>> +	    ((T->t_proc_flag & TP_DAEMON) ? PR_DAEMON : 0) |
>> +	    ((T->t_procp->p_pidflag & CLDNOSIGCHLD) ? PR_NOSIGCHLD : 0) |
>> +	    ((T->t_procp->p_pidflag & CLDWAITPID) ? PR_WAITPID : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_FORK) ? PR_FORK : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_RUNLCL) ? PR_RLC : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_KILLCL) ? PR_KLC : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_ASYNC) ? PR_ASYNC : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_BPTADJ) ? PR_BPTADJ : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_PTRACE) ? PR_PTRACE : 0) |
>> +	    ((T->t_procp->p_flag & SMSACCT) ? PR_MSACCT : 0) |
>> +	    ((T->t_procp->p_flag & SMSFORK) ? PR_MSFORK : 0) |
>> +	    ((T->t_procp->p_flag & SVFWAIT) ? PR_VFORKP : 0) |
>> +	    (((T->t_procp->p_flag & SSYS) ||
>> +	    (T->t_procp->p_as == &`kas)) ? PR_ISSYS : 0) |
>> +	    ((T == T->t_cpu->cpu_idle_thread) ? PR_IDLE : 0);
>> +*/
>> +
>> +	pr_lwpid = T->pid;
>> +	pr_addr = (uintptr_t)T;
>> +	pr_wchan = NULL;
>> +	pr_stype = 0;
>> +
>> +	pr_state = (T->__state & 0x00000001) ? SSLEEP :
>> +		   (T->__state & 0x00000002) ? SSLEEP :
>> +		   (T->__state & 0x00000004) ? SSTOP :
>> +		   (T->__state & 0x00000008) ? SSTOP :
>> +		   (T->__state & 0x00000020) ? SZOMB :
>> +		   (T->__state & 0x00000010) ? SZOMB :
>> +		   (T->__state & 0x00000080) ? SZOMB :
>> +		   (T->__state & 0x00000100) ? SWAIT :
>> +		   (T->__state & 0x00000200) ? SWAIT : SRUN;
>> +	pr_sname = (T->__state & 0x00000001) ? 'S' :
>> +		   (T->__state & 0x00000002) ? 'S' :
>> +		   (T->__state & 0x00000004) ? 'T' :
>> +		   (T->__state & 0x00000008) ? 'T' :
>> +		   (T->__state & 0x00000020) ? 'Z' :
>> +		   (T->__state & 0x00000010) ? 'Z' :
>> +		   (T->__state & 0x00000080) ? 'Z' :
>> +		   (T->__state & 0x00000100) ? 'W' :
>> +		   (T->__state & 0x00000200) ? 'W' : 'R';
>> +
>> +	pr_pri = T->prio;
>> +	pr_name = T->comm;
>> +	pr_onpro = ((struct thread_info *)T->stack)->cpu;
>> +};
>> +
>> +inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread);
>> +#pragma D attributes Stable/Stable/Common curpsinfo
>> +#pragma D binding "1.0" curpsinfo
>> +
>> +inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
>> +#pragma D attributes Stable/Stable/Common curlwpsinfo
>> +#pragma D binding "1.0" curlwpsinfo
>> +
>> +inline string cwd = d_path(&(curthread->fs->pwd));
>> +#pragma D attributes Stable/Stable/Common cwd
>> +#pragma D binding "1.0" cwd
>> +
>> +inline string root = d_path(&(curthread->fs->root));
>> +#pragma D attributes Stable/Stable/Common root
>> +#pragma D binding "1.0" root
>> +
>> +inline int CLD_EXITED = 1;
>> +#pragma D binding "1.0" CLD_EXITED
>> +inline int CLD_KILLED = 2;
>> +#pragma D binding "1.0" CLD_KILLED
>> +inline int CLD_DUMPED = 3;
>> +#pragma D binding "1.0" CLD_DUMPED
>> +inline int CLD_TRAPPED = 4;
>> +#pragma D binding "1.0" CLD_TRAPPED
>> +inline int CLD_STOPPED = 5;
>> +#pragma D binding "1.0" CLD_STOPPED
>> +inline int CLD_CONTINUED = 6;
>> +#pragma D binding "1.0" CLD_CONTINUED
>> +
>> +/*
>> + * Below we provide some inline definitions to simplify converting from
>> + * a struct pid * to a pid_t.  structpid2pid is a DTrace-ized version of
>> + * pid_vnr().
>> + */
>> + /*
>> +inline	struct pid_namespace *pid_namespace[struct pid *p] = p != NULL ?
>> +	p->numbers[p->level].ns : NULL;
>> +
>> +inline	int pid_namespace_level[struct pid *p] = p != NULL && pid_namespace[p] ?
>> +	pid_namespace[p]->level : 0;
>> +
>> +m4_dnl 4.19 and above use thread_pid for this.
>> +define_for_kernel([[__task_pid]], [[ m4_dnl
>> +	(m4_kver(4, 19, 0), [[task->thread_pid]])]], m4_dnl
>> +	[[task->pids[PIDTYPE_PID].pid]]) m4_dnl
>> +
>> +inline	struct pid *task_pid[struct task_struct *task] =
>> +	task != NULL ? __task_pid : NULL;
>> +
>> +inline	int current_namespace_level = pid_namespace_level[task_pid[curthread]];
>> +
>> +inline	pid_t structpid2pid[struct pid *p] =
>> +	p != NULL && current_namespace_level <= p->level &&
>> +	((struct upid *)&(p->numbers[current_namespace_level]))->ns ==
>> +	pid_namespace[task_pid[curthread]] ?
>> +	((struct upid *)&(p->numbers[current_namespace_level]))->nr : 0;
>> +*/
>> diff --git a/dlibs/aarch64/6.10/regs.d b/dlibs/aarch64/6.10/regs.d
>> new file mode 100644
>> index 0000000000000..e47f8cfc11825
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/regs.d
>> @@ -0,0 +1,78 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +inline int R_X0 = 0 ;
>> +#pragma D binding "1.0" R_X0
>> +inline int R_X1 = 1 ;
>> +#pragma D binding "1.0" R_X1
>> +inline int R_X2 = 2 ;
>> +#pragma D binding "1.0" R_X2
>> +inline int R_X3 = 3 ;
>> +#pragma D binding "1.0" R_X3
>> +inline int R_X4 = 4 ;
>> +#pragma D binding "1.0" R_X4
>> +inline int R_X5 = 5 ;
>> +#pragma D binding "1.0" R_X5
>> +inline int R_X6 = 6 ;
>> +#pragma D binding "1.0" R_X6
>> +inline int R_X7 = 7 ;
>> +#pragma D binding "1.0" R_X7
>> +inline int R_X8 = 8 ;
>> +#pragma D binding "1.0" R_X8
>> +inline int R_X9 = 9 ;
>> +#pragma D binding "1.0" R_X9
>> +inline int R_X10 = 10 ;
>> +#pragma D binding "1.0" R_X10
>> +inline int R_X11 = 11 ;
>> +#pragma D binding "1.0" R_X11
>> +inline int R_X12 = 12 ;
>> +#pragma D binding "1.0" R_X12
>> +inline int R_X13 = 13 ;
>> +#pragma D binding "1.0" R_X13
>> +inline int R_X14 = 14 ;
>> +#pragma D binding "1.0" R_X14
>> +inline int R_X15 = 15 ;
>> +#pragma D binding "1.0" R_X15
>> +inline int R_X16 = 16 ;
>> +#pragma D binding "1.0" R_X16
>> +inline int R_X17 = 17 ;
>> +#pragma D binding "1.0" R_X17
>> +inline int R_X18 = 18 ;
>> +#pragma D binding "1.0" R_X18
>> +inline int R_X19 = 19 ;
>> +#pragma D binding "1.0" R_X19
>> +inline int R_X20 = 20 ;
>> +#pragma D binding "1.0" R_X20
>> +inline int R_X21 = 21 ;
>> +#pragma D binding "1.0" R_X21
>> +inline int R_X22 = 22 ;
>> +#pragma D binding "1.0" R_X22
>> +inline int R_X23 = 23 ;
>> +#pragma D binding "1.0" R_X23
>> +inline int R_X24 = 24 ;
>> +#pragma D binding "1.0" R_X24
>> +inline int R_X25 = 25 ;
>> +#pragma D binding "1.0" R_X25
>> +inline int R_X26 = 26 ;
>> +#pragma D binding "1.0" R_X26
>> +inline int R_X27 = 27 ;
>> +#pragma D binding "1.0" R_X27
>> +inline int R_X28 = 28 ;
>> +#pragma D binding "1.0" R_X28
>> +inline int R_X29 = 29 ;
>> +#pragma D binding "1.0" R_X29
>> +inline int R_X30 = 30 ;
>> +#pragma D binding "1.0" R_X30
>> +
>> +inline int R_SP = 31 ;
>> +#pragma D binding "1.0" R_SP
>> +inline int R_PC = 32 ;
>> +#pragma D binding "1.0" R_PC
>> +inline int R_PSTATE = 33 ;
>> +#pragma D binding "1.0" R_PSTATE
>> +
>> +inline int R_FP = R_X29;
>> +#pragma D binding "1.0" R_FP
>> diff --git a/dlibs/aarch64/6.10/sched.d b/dlibs/aarch64/6.10/sched.d
>> new file mode 100644
>> index 0000000000000..271d84e057cde
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/sched.d
>> @@ -0,0 +1,38 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +
>> +typedef id_t		processorid_t;
>> +typedef id_t		psetid_t;
>> +typedef id_t		chipid_t;
>> +typedef id_t		lgrp_id_t;
>> +
>> +typedef struct cpuinfo {
>> +	processorid_t	cpu_id;
>> +	psetid_t	cpu_pset;
>> +	chipid_t	cpu_chip;
>> +	lgrp_id_t	cpu_lgrp;
>> +} cpuinfo_t;
>> +
>> +typedef cpuinfo_t	*cpuinfo_t_p;
>> +
>> +inline processorid_t cpu = curcpu->cpu_id;
>> +#pragma D attributes Stable/Stable/Common cpu
>> +#pragma D binding "1.0" cpu
>> +
>> +inline psetid_t pset = curcpu->cpu_pset;
>> +#pragma D attributes Stable/Stable/Common pset
>> +#pragma D binding "1.0" pset
>> +
>> +inline chipid_t chip = curcpu->cpu_chip;
>> +#pragma D attributes Stable/Stable/Common chip
>> +#pragma D binding "1.0" chip
>> +
>> +inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
>> +#pragma D attributes Stable/Stable/Common lgrp
>> +#pragma D binding "1.0" lgrp
>> diff --git a/dlibs/aarch64/6.10/signal.d b/dlibs/aarch64/6.10/signal.d
>> new file mode 100644
>> index 0000000000000..88493b427050f
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/signal.d
>> @@ -0,0 +1,108 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
>> + * Use is subject to license terms.
>> + *
>> + */
>> +inline int SIGSYS = 31;
>> +#pragma D binding "1.0" SIGSYS
>> +
>> +inline int SIGTERM = 15;
>> +#pragma D binding "1.0" SIGTERM
>> +
>> +inline int SIGTSTP = 20;
>> +#pragma D binding "1.0" SIGTSTP
>> +
>> +inline int SIGVTALRM = 26;
>> +#pragma D binding "1.0" SIGVTALRM
>> +
>> +inline int SIGPIPE = 13;
>> +#pragma D binding "1.0" SIGPIPE
>> +
>> +inline int SIGBUS = 7;
>> +#pragma D binding "1.0" SIGBUS
>> +
>> +inline int SIGSTKFLT = 16;
>> +#pragma D binding "1.0" SIGSTKFLT
>> +
>> +inline int SIGTRAP = 5;
>> +#pragma D binding "1.0" SIGTRAP
>> +
>> +inline int SIGHUP = 1;
>> +#pragma D binding "1.0" SIGHUP
>> +
>> +inline int SIGFPE = 8;
>> +#pragma D binding "1.0" SIGFPE
>> +
>> +inline int SIGIO = 29;
>> +#pragma D binding "1.0" SIGIO
>> +
>> +inline int SIGURG = 23;
>> +#pragma D binding "1.0" SIGURG
>> +
>> +inline int SIGKILL = 9;
>> +#pragma D binding "1.0" SIGKILL
>> +
>> +inline int SIGWINCH = 28;
>> +#pragma D binding "1.0" SIGWINCH
>> +
>> +inline int SIGXFSZ = 25;
>> +#pragma D binding "1.0" SIGXFSZ
>> +
>> +inline int SIGINT = 2;
>> +#pragma D binding "1.0" SIGINT
>> +
>> +inline int SIGIOT = 6;
>> +#pragma D binding "1.0" SIGIOT
>> +
>> +inline int SIGTTOU = 22;
>> +#pragma D binding "1.0" SIGTTOU
>> +
>> +inline int SIGTTIN = 21;
>> +#pragma D binding "1.0" SIGTTIN
>> +
>> +inline int SIGCHLD = 17;
>> +#pragma D binding "1.0" SIGCHLD
>> +
>> +inline int SIGCONT = 18;
>> +#pragma D binding "1.0" SIGCONT
>> +
>> +inline int SIGQUIT = 3;
>> +#pragma D binding "1.0" SIGQUIT
>> +
>> +inline int SIGABRT = 6;
>> +#pragma D binding "1.0" SIGABRT
>> +
>> +inline int SIGPWR = 30;
>> +#pragma D binding "1.0" SIGPWR
>> +
>> +inline int SIGPROF = 27;
>> +#pragma D binding "1.0" SIGPROF
>> +
>> +inline int SIGXCPU = 24;
>> +#pragma D binding "1.0" SIGXCPU
>> +
>> +inline int SIGSTOP = 19;
>> +#pragma D binding "1.0" SIGSTOP
>> +
>> +inline int SIGILL = 4;
>> +#pragma D binding "1.0" SIGILL
>> +
>> +inline int SIGCLD = 17;
>> +#pragma D binding "1.0" SIGCLD
>> +
>> +inline int SIGUSR1 = 10;
>> +#pragma D binding "1.0" SIGUSR1
>> +
>> +inline int SIGPOLL = 29;
>> +#pragma D binding "1.0" SIGPOLL
>> +
>> +inline int SIGSEGV = 11;
>> +#pragma D binding "1.0" SIGSEGV
>> +
>> +inline int SIGUSR2 = 12;
>> +#pragma D binding "1.0" SIGUSR2
>> +
>> +inline int SIGALRM = 14;
>> +#pragma D binding "1.0" SIGALRM
>> +
>> diff --git a/dlibs/aarch64/6.10/tcp.d b/dlibs/aarch64/6.10/tcp.d
>> new file mode 100644
>> index 0000000000000..54e310cb4c6ed
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/tcp.d
>> @@ -0,0 +1,231 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library net.d
>> +#pragma D depends_on provider ip
>> +#pragma D depends_on provider tcp
>> +
>> +inline int TH_FIN =	0x01;
>> +inline int TH_SYN =	0x02;
>> +inline int TH_RST =	0x04;
>> +inline int TH_PSH =	0x08;
>> +inline int TH_ACK =	0x10;
>> +inline int TH_URG =	0x20;
>> +inline int TH_ECE =	0x40;
>> +inline int TH_CWR =	0x80;
>> +
>> +inline int TCP_STATE_IDLE = 		0x00;
>> +inline int TCP_STATE_ESTABLISHED =	0x01;
>> +inline int TCP_STATE_SYN_SENT =		0x02;
>> +inline int TCP_STATE_SYN_RECEIVED =	0x03;
>> +inline int TCP_STATE_FIN_WAIT_1 =	0x04;
>> +inline int TCP_STATE_FIN_WAIT_2 =	0x05;
>> +inline int TCP_STATE_TIME_WAIT =	0x06;
>> +inline int TCP_STATE_CLOSED =		0x07;
>> +inline int TCP_STATE_CLOSE_WAIT =	0x08;
>> +inline int TCP_STATE_LAST_ACK =		0x09;
>> +inline int TCP_STATE_LISTEN =		0x0a;
>> +inline int TCP_STATE_CLOSING =		0x0b;
>> +
>> +/*
>> + * Convert a TCP state value to a string.
>> + */
>> +inline string tcp_state_string[int state] =
>> +	state == TCP_STATE_CLOSED ? "state-closed" :
>> +	state == TCP_STATE_IDLE ? "state-idle" :
>> +	state == TCP_STATE_LISTEN ? "state-listen" :
>> +	state == TCP_STATE_SYN_SENT ? "state-syn-sent" :
>> +	state == TCP_STATE_SYN_RECEIVED ? "state-syn-received" :
>> +	state == TCP_STATE_ESTABLISHED ? "state-established" :
>> +	state == TCP_STATE_CLOSE_WAIT ? "state-close-wait" :
>> +	state == TCP_STATE_FIN_WAIT_1 ? "state-fin-wait-1" :
>> +	state == TCP_STATE_CLOSING ? "state-closing" :
>> +	state == TCP_STATE_LAST_ACK ? "state-last-ack" :
>> +	state == TCP_STATE_FIN_WAIT_2 ? "state-fin-wait-2" :
>> +	state == TCP_STATE_TIME_WAIT ? "state-time-wait" :
>> +	"<unknown>";
>> +#pragma D binding "1.6.3" tcp_state_string
>> +
>> +/*
>> + * tcpinfo is the TCP header fields.
>> + */
>> +typedef struct tcpinfo {
>> +	uint16_t tcp_sport;		/* source port */
>> +	uint16_t tcp_dport;		/* destination port */
>> +	uint32_t tcp_seq;		/* sequence number */
>> +	uint32_t tcp_ack;		/* acknowledgment number */
>> +	uint8_t tcp_offset;		/* data offset, in bytes */
>> +	uint8_t tcp_flags;		/* flags */
>> +	uint16_t tcp_window;		/* window size */
>> +	uint16_t tcp_checksum;		/* checksum */
>> +	uint16_t tcp_urgent;		/* urgent data pointer */
>> +	uintptr_t tcp_hdr;		/* raw TCP header */
>> +} tcpinfo_t;
>> +
>> +/*
>> + * tcpsinfo contains stable TCP details from tcp_t.
>> + */
>> +typedef struct tcpsinfo {
>> +	uintptr_t tcps_addr;
>> +	int tcps_local;			/* is delivered locally, boolean */
>> +	uint16_t tcps_lport;		/* local port */
>> +	uint16_t tcps_rport;		/* remote port */
>> +	string tcps_laddr;		/* local address, as a string */
>> +	string tcps_raddr;		/* remote address, as a string */
>> +	int tcps_state;			/* TCP state */
>> +	uint32_t tcps_iss;		/* Initial sequence # sent */
>> +	uint32_t tcps_suna;		/* sequence # sent but unacked */
>> +	uint32_t tcps_snxt;		/* next sequence # to send */
>> +	uint32_t tcps_rnxt;		/* next sequence # expected */
>> +	uint32_t tcps_swnd;		/* send window size */
>> +	int32_t tcps_snd_ws;		/* send window scaling */
>> +	uint32_t tcps_rwnd;		/* receive window size */
>> +	int32_t tcps_rcv_ws;		/* receive window scaling */
>> +	uint32_t tcps_cwnd;		/* congestion window */
>> +	uint32_t tcps_cwnd_ssthresh;	/* threshold for congestion avoidance */
>> +	uint32_t tcps_sack_snxt;	/* next SACK seq # for retransmission */
>> +	uint32_t tcps_rto;		/* round-trip timeout, msec */
>> +	uint32_t tcps_mss;		/* max segment size */
>> +	int tcps_retransmit;		/* retransmit send event, boolean */
>> +	uint32_t tcps_rtt;		/* smoothed avg round-trip time, msec */
>> +	uint32_t tcps_rtt_sd;		/* standard deviation of RTT */
>> +	uint32_t tcps_irs;		/* Initial recv sequence # */
>> +} tcpsinfo_t;
>> +
>> +/*
>> + * tcplsinfo provides the old tcp state for state changes.
>> + */
>> +typedef struct tcplsinfo {
>> +	int tcps_state;		/* previous TCP state */
>> +} tcplsinfo_t;
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator tcpinfo_t < struct tcphdr *T > {
>> +	tcp_sport = T ? ntohs(T->source) : 0;
>> +	tcp_dport = T ? ntohs(T->dest) : 0;
>> +	tcp_seq = T ? ntohl(T->seq) : 0;
>> +	tcp_ack = T ? ntohl(T->ack_seq) : 0;
>> +	tcp_offset = T ? (*(uint8_t *)(T + 12) & 0xf0) >> 2 : 0;
>> +	tcp_flags = T ? *(uint8_t *)(T + 13) : 0;
>> +	tcp_window = T ? ntohs(T->window) : 0;
>> +	tcp_checksum = T ? ntohs(T->check) : 0;
>> +	tcp_urgent = T ? ntohs(T->urg_ptr) : 0;
>> +	tcp_hdr = (uintptr_t)T;
>> +};
>> +
>> +/*
>> + * In the main we simply translate from the "struct [tcp_]sock *" to
>> + * a tcpsinfo_t *.  However there are a few exceptions:
>> + *
>> + * - tcps_state is always derived from arg6.  The reason is that in some
>> + * state transitions sock->sk_state does not reflect the actual TCP
>> + * connection state.  For example the TIME_WAIT state is handled in
>> + * Linux by creating a separate timewait socket and the state of the
>> + * original socket is CLOSED.  In some other cases we also need to
>> + * instrument state transition prior to the update of sk_state.  To do
>> + * all of this we rely on arg6.
>> + * - we sometimes need to retrieve local/remote port/address settings from
>> + * TCP and IP headers directly, for example prior to the address/port
>> + * being committed to the socket.  To do this effectively we need to know
>> + * if the packet data is inbound (in which case the local IP/port are the
>> + * destination) or outbound (in which case the local IP/port are the source).
>> + * arg7 is set to 0 for outbound traffic and 1 for inbound so we use these
>> + * to reconstruct the address/port info where necessary.  arg2 used for IP
>> + * information while arg4 contains the TCP header, so it is used for port data.
>> + * NET_PROBE_INBOUND is defined as 1, NET_PROBE_OUTBOUND as 0 in net.d.
>> + */
>> +#pragma D binding "1.6.3" translator
>> +translator tcpsinfo_t < struct tcp_sock *T > {
>> +	tcps_addr = (uintptr_t)T;
>> +	tcps_local =
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
>> +	    (((struct sock *)T)->__sk_common.skc_rcv_saddr ==
>> +	    ((struct sock *)T)->__sk_common.skc_daddr) :
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
>> +	    (((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[0]
>> +	    ==
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[0] &&
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[1]
>> +            ==
>> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[1] &&
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[2]
>> +            ==
>> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[2] &&
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[3])
>> +	    : 0;
>> +	tcps_lport = (T && ((struct inet_sock *)T)->inet_sport != 0) ?
>> +	    ntohs(((struct inet_sock *)T)->inet_sport) :
>> +	    (T && ((struct inet_sock *)T)->inet_sport == 0) ?
>> +	    ntohs(((struct sock *)T)->__sk_common.skc_num) :
>> +	    arg4 != NULL ?
>> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
>> +	    ((struct tcphdr *)arg4)->dest : ((struct tcphdr *)arg4)->source) :
>> +	    0;
>> +	tcps_rport = T && ((struct sock *)T)->__sk_common.skc_dport != 0 ?
>> +	    ntohs(((struct sock *)T)->__sk_common.skc_dport) :
>> +	    arg4 != NULL ?
>> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
>> +            ((struct tcphdr *)arg4)->source : ((struct tcphdr *)arg4)->dest) :
>> +	    0;
>> +	tcps_laddr =
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
>> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_rcv_saddr) :
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
>> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr) :
>> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct iphdr *)arg2)->daddr : &((struct iphdr *)arg2)->saddr) :
>> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct ipv6hdr *)arg2)->daddr :
>> +	    &((struct ipv6hdr *)arg2)->saddr) :
>> +	    "<unknown>";
>> +	tcps_raddr =
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
>> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_daddr) :
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
>> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_daddr) :
>> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct iphdr *)arg2)->saddr : &((struct iphdr *)arg2)->daddr) :
>> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct ipv6hdr *)arg2)->saddr :
>> +	    &((struct ipv6hdr *)arg2)->daddr) :
>> +	    "<unknown>";
>> +	tcps_state = arg6;
>> +	tcps_iss = T ?
>> +	    T->snd_una - (uint32_t)T->bytes_acked : 0;
>> +	tcps_suna = T ? T->snd_una : 0;
>> +	tcps_snxt = T ? T->snd_nxt : 0;
>> +	tcps_rnxt = T ? T->rcv_nxt : 0;
>> +	tcps_swnd = T ? T->snd_wnd : 0;
>> +	tcps_snd_ws = T ? T->rx_opt.snd_wscale : 0;
>> +	tcps_rwnd = T ? T->rcv_wnd : 0;
>> +	tcps_rcv_ws = T ? T->rx_opt.rcv_wscale : 0;
>> +	tcps_cwnd = T ? T->snd_cwnd : 0;
>> +	tcps_cwnd_ssthresh = T ? T->snd_ssthresh : 0;
>> +	tcps_sack_snxt = (T && T->sacked_out == 0) ? T->snd_una :
>> +	    (T && T->highest_sack == NULL) ? T->snd_nxt :
>> +	    (T && T->highest_sack != NULL) ?
>> +	    ((struct tcp_skb_cb *)&((T->highest_sack->cb[0])))->seq : 0;
>> +	tcps_rto = T ? T->inet_conn.icsk_rto : 0;
>> +	tcps_mss = T ? T->mss_cache : 0;
>> +	tcps_retransmit = T && arg0 ?
>> +	    (((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq
>> +	    < T->snd_nxt - 1) : 0;
>> +	tcps_rtt = T ? (T->srtt_us >> 3)/1000 : 0;
>> +	tcps_rtt_sd = T ? (T->mdev_us >> 2)/1000 : 0;
>> +	tcps_irs = T && T->bytes_received > 0 ?
>> +	    T->rcv_nxt - (uint32_t)T->bytes_received : 0;
>> +};
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator tcplsinfo_t < int I > {
>> +	tcps_state = I;
>> +};
>> diff --git a/dlibs/aarch64/6.10/udp.d b/dlibs/aarch64/6.10/udp.d
>> new file mode 100644
>> index 0000000000000..0e44ed6480415
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/udp.d
>> @@ -0,0 +1,71 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library net.d
>> +#pragma D depends_on provider udp
>> +
>> +/*
>> + * udpinfo is the UDP header fields.
>> + */
>> +typedef struct udpinfo {
>> +	uint16_t udp_sport;		/* source port */
>> +	uint16_t udp_dport;		/* destination port */
>> +	uint16_t udp_length;		/* total length */
>> +	uint16_t udp_checksum;          /* headers + data checksum */
>> +	struct udphdr *udp_hdr;		/* raw UDP header */
>> +} udpinfo_t;
>> +
>> +/*
>> + * udpsinfo contains stable UDP details from udp_t.
>> + */
>> +typedef struct udpsinfo {
>> +	uintptr_t udps_addr;
>> +	uint16_t udps_lport;		/* local port */
>> +	uint16_t udps_rport;		/* remote port */
>> +	string udps_laddr;		/* local address, as a string */
>> +	string udps_raddr;		/* remote address, as a string */
>> +} udpsinfo_t;
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator udpinfo_t < struct udphdr *U > {
>> +	udp_sport = ntohs(U->source);
>> +	udp_dport = ntohs(U->dest);
>> +	udp_length = ntohs(U->len);
>> +	udp_checksum = ntohs(U->check);
>> +	udp_hdr = U;
>> +};
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator udpsinfo_t < struct udp_sock *S > {
>> +	/*
>> +	 * We source udp info from other args but retain the sock arg here
>> +	 * as it may be used in the future.
>> +	 */
>> +	udps_addr = (uintptr_t)S;
>> +	udps_lport = arg4 ?
>> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->source) :
>> +	    ntohs(((struct udphdr *)arg4)->dest)) : 0;
>> +	udps_rport = arg4 ?
>> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->dest) :
>> +	    ntohs(((struct udphdr *)arg4)->source)) : 0;
>> +	udps_laddr = arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
>> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->saddr :
>> +	    &((struct iphdr *)arg2)->daddr) :
>> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
>> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->saddr :
>> +	    &((struct ipv6hdr *)arg2)->daddr) :
>> +	    "<unknown>";
>> +	udps_raddr =
>> +	    arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
>> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->daddr :
>> +	    &((struct iphdr *)arg2)->saddr) :
>> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
>> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->daddr :
>> +	    &((struct ipv6hdr *)arg2)->saddr) :
>> +	    "<unknown>";
>> +};
>> diff --git a/dlibs/aarch64/6.10/unistd.d b/dlibs/aarch64/6.10/unistd.d
>> new file mode 100644
>> index 0000000000000..c38bbed4bc85e
>> --- /dev/null
>> +++ b/dlibs/aarch64/6.10/unistd.d
>> @@ -0,0 +1,36 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2007, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +inline int DTRACEFLT_UNKNOWN = 0;	/* Unknown fault */
>> +#pragma D binding "1.0" DTRACEFLT_UNKNOWN
>> +
>> +inline int DTRACEFLT_BADADDR = 1;	/* Bad address */
>> +#pragma D binding "1.0" DTRACEFLT_BADADDR
>> +
>> +inline int DTRACEFLT_BADALIGN = 2;	/* Bad alignment */
>> +#pragma D binding "1.0" DTRACEFLT_BADALIGN
>> +
>> +inline int DTRACEFLT_ILLOP = 3;		/* Illegal operation */
>> +#pragma D binding "1.0" DTRACEFLT_ILLOP
>> +
>> +inline int DTRACEFLT_DIVZERO = 4;	/* Divide-by-zero */
>> +#pragma D binding "1.0" DTRACEFLT_DIVZERO
>> +
>> +inline int DTRACEFLT_NOSCRATCH = 5;	/* Out of scratch space */
>> +#pragma D binding "1.0" DTRACEFLT_NOSCRATCH
>> +
>> +inline int DTRACEFLT_KPRIV = 6;		/* Illegal kernel access */
>> +#pragma D binding "1.0" DTRACEFLT_KPRIV
>> +
>> +inline int DTRACEFLT_UPRIV = 7;		/* Illegal user access */
>> +#pragma D binding "1.0" DTRACEFLT_UPRIV
>> +
>> +inline int DTRACEFLT_TUPOFLOW = 8;	/* Tuple stack overflow */
>> +#pragma D binding "1.0" DTRACEFLT_TUPOFLOW
>> +
>> +inline int DTRACEFLT_BADSTACK = 9;	/* Bad stack */
>> +#pragma D binding "1.4.1" DTRACEFLT_BADSTACK
>> diff --git a/dlibs/x86_64/6.10.0/errno.d b/dlibs/x86_64/6.10.0/errno.d
>> new file mode 100644
>> index 0000000000000..f54fafe1861cc
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/errno.d
>> @@ -0,0 +1,275 @@
>> +
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
>> + * Use is subject to license terms.
>> + */
>> +
>> +inline int EPERM = 1;
>> +#pragma D binding "1.0" EPERM
>> +inline int ENOENT = 2;
>> +#pragma D binding "1.0" ENOENT
>> +inline int ESRCH = 3;
>> +#pragma D binding "1.0" ESRCH
>> +inline int EINTR = 4;
>> +#pragma D binding "1.0" EINTR
>> +inline int EIO = 5;
>> +#pragma D binding "1.0" EIO
>> +inline int ENXIO = 6;
>> +#pragma D binding "1.0" ENXIO
>> +inline int E2BIG = 7;
>> +#pragma D binding "1.0" E2BIG
>> +inline int ENOEXEC = 8;
>> +#pragma D binding "1.0" ENOEXEC
>> +inline int EBADF = 9;
>> +#pragma D binding "1.0" EBADF
>> +inline int ECHILD = 10;
>> +#pragma D binding "1.0" ECHILD
>> +inline int EAGAIN = 11;
>> +#pragma D binding "1.0" EAGAIN
>> +inline int ENOMEM = 12;
>> +#pragma D binding "1.0" ENOMEM
>> +inline int EACCES = 13;
>> +#pragma D binding "1.0" EACCES
>> +inline int EFAULT = 14;
>> +#pragma D binding "1.0" EFAULT
>> +inline int ENOTBLK = 15;
>> +#pragma D binding "1.0" ENOTBLK
>> +inline int EBUSY = 16;
>> +#pragma D binding "1.0" EBUSY
>> +inline int EEXIST = 17;
>> +#pragma D binding "1.0" EEXIST
>> +inline int EXDEV = 18;
>> +#pragma D binding "1.0" EXDEV
>> +inline int ENODEV = 19;
>> +#pragma D binding "1.0" ENODEV
>> +inline int ENOTDIR = 20;
>> +#pragma D binding "1.0" ENOTDIR
>> +inline int EISDIR = 21;
>> +#pragma D binding "1.0" EISDIR
>> +inline int EINVAL = 22;
>> +#pragma D binding "1.0" EINVAL
>> +inline int ENFILE = 23;
>> +#pragma D binding "1.0" ENFILE
>> +inline int EMFILE = 24;
>> +#pragma D binding "1.0" EMFILE
>> +inline int ENOTTY = 25;
>> +#pragma D binding "1.0" ENOTTY
>> +inline int ETXTBSY = 26;
>> +#pragma D binding "1.0" ETXTBSY
>> +inline int EFBIG = 27;
>> +#pragma D binding "1.0" EFBIG
>> +inline int ENOSPC = 28;
>> +#pragma D binding "1.0" ENOSPC
>> +inline int ESPIPE = 29;
>> +#pragma D binding "1.0" ESPIPE
>> +inline int EROFS = 30;
>> +#pragma D binding "1.0" EROFS
>> +inline int EMLINK = 31;
>> +#pragma D binding "1.0" EMLINK
>> +inline int EPIPE = 32;
>> +#pragma D binding "1.0" EPIPE
>> +inline int EDOM = 33;
>> +#pragma D binding "1.0" EDOM
>> +inline int ERANGE = 34;
>> +#pragma D binding "1.0" ERANGE
>> +inline int EDEADLK = 35;
>> +#pragma D binding "1.0" EDEADLK
>> +inline int ENAMETOOLONG = 36;
>> +#pragma D binding "1.0" ENAMETOOLONG
>> +inline int ENOLCK = 37;
>> +#pragma D binding "1.0" ENOLCK
>> +inline int ENOSYS = 38;
>> +#pragma D binding "1.0" ENOSYS
>> +inline int ENOTEMPTY = 39;
>> +#pragma D binding "1.0" ENOTEMPTY
>> +inline int ELOOP = 40;
>> +#pragma D binding "1.0" ELOOP
>> +inline int EWOULDBLOCK = 11;
>> +#pragma D binding "1.0" EWOULDBLOCK
>> +inline int ENOMSG = 42;
>> +#pragma D binding "1.0" ENOMSG
>> +inline int EIDRM = 43;
>> +#pragma D binding "1.0" EIDRM
>> +inline int ECHRNG = 44;
>> +#pragma D binding "1.0" ECHRNG
>> +inline int EL2NSYNC = 45;
>> +#pragma D binding "1.0" EL2NSYNC
>> +inline int EL3HLT = 46;
>> +#pragma D binding "1.0" EL3HLT
>> +inline int EL3RST = 47;
>> +#pragma D binding "1.0" EL3RST
>> +inline int ELNRNG = 48;
>> +#pragma D binding "1.0" ELNRNG
>> +inline int EUNATCH = 49;
>> +#pragma D binding "1.0" EUNATCH
>> +inline int ENOCSI = 50;
>> +#pragma D binding "1.0" ENOCSI
>> +inline int EL2HLT = 51;
>> +#pragma D binding "1.0" EL2HLT
>> +inline int EBADE = 52;
>> +#pragma D binding "1.0" EBADE
>> +inline int EBADR = 53;
>> +#pragma D binding "1.0" EBADR
>> +inline int EXFULL = 54;
>> +#pragma D binding "1.0" EXFULL
>> +inline int ENOANO = 55;
>> +#pragma D binding "1.0" ENOANO
>> +inline int EBADRQC = 56;
>> +#pragma D binding "1.0" EBADRQC
>> +inline int EBADSLT = 57;
>> +#pragma D binding "1.0" EBADSLT
>> +inline int EDEADLOCK = 35;
>> +#pragma D binding "1.0" EDEADLOCK
>> +inline int EBFONT = 59;
>> +#pragma D binding "1.0" EBFONT
>> +inline int ENOSTR = 60;
>> +#pragma D binding "1.0" ENOSTR
>> +inline int ENODATA = 61;
>> +#pragma D binding "1.0" ENODATA
>> +inline int ETIME = 62;
>> +#pragma D binding "1.0" ETIME
>> +inline int ENOSR = 63;
>> +#pragma D binding "1.0" ENOSR
>> +inline int ENONET = 64;
>> +#pragma D binding "1.0" ENONET
>> +inline int ENOPKG = 65;
>> +#pragma D binding "1.0" ENOPKG
>> +inline int EREMOTE = 66;
>> +#pragma D binding "1.0" EREMOTE
>> +inline int ENOLINK = 67;
>> +#pragma D binding "1.0" ENOLINK
>> +inline int EADV = 68;
>> +#pragma D binding "1.0" EADV
>> +inline int ESRMNT = 69;
>> +#pragma D binding "1.0" ESRMNT
>> +inline int ECOMM = 70;
>> +#pragma D binding "1.0" ECOMM
>> +inline int EPROTO = 71;
>> +#pragma D binding "1.0" EPROTO
>> +inline int EMULTIHOP = 72;
>> +#pragma D binding "1.0" EMULTIHOP
>> +inline int EDOTDOT = 73;
>> +#pragma D binding "1.0" EDOTDOT
>> +inline int EBADMSG = 74;
>> +#pragma D binding "1.0" EBADMSG
>> +inline int EOVERFLOW = 75;
>> +#pragma D binding "1.0" EOVERFLOW
>> +inline int ENOTUNIQ = 76;
>> +#pragma D binding "1.0" ENOTUNIQ
>> +inline int EBADFD = 77;
>> +#pragma D binding "1.0" EBADFD
>> +inline int EREMCHG = 78;
>> +#pragma D binding "1.0" EREMCHG
>> +inline int ELIBACC = 79;
>> +#pragma D binding "1.0" ELIBACC
>> +inline int ELIBBAD = 80;
>> +#pragma D binding "1.0" ELIBBAD
>> +inline int ELIBSCN = 81;
>> +#pragma D binding "1.0" ELIBSCN
>> +inline int ELIBMAX = 82;
>> +#pragma D binding "1.0" ELIBMAX
>> +inline int ELIBEXEC = 83;
>> +#pragma D binding "1.0" ELIBEXEC
>> +inline int EILSEQ = 84;
>> +#pragma D binding "1.0" EILSEQ
>> +inline int ERESTART = 85;
>> +#pragma D binding "1.0" ERESTART
>> +inline int ESTRPIPE = 86;
>> +#pragma D binding "1.0" ESTRPIPE
>> +inline int EUSERS = 87;
>> +#pragma D binding "1.0" EUSERS
>> +inline int ENOTSOCK = 88;
>> +#pragma D binding "1.0" ENOTSOCK
>> +inline int EDESTADDRREQ = 89;
>> +#pragma D binding "1.0" EDESTADDRREQ
>> +inline int EMSGSIZE = 90;
>> +#pragma D binding "1.0" EMSGSIZE
>> +inline int EPROTOTYPE = 91;
>> +#pragma D binding "1.0" EPROTOTYPE
>> +inline int ENOPROTOOPT = 92;
>> +#pragma D binding "1.0" ENOPROTOOPT
>> +inline int EPROTONOSUPPORT = 93;
>> +#pragma D binding "1.0" EPROTONOSUPPORT
>> +inline int ESOCKTNOSUPPORT = 94;
>> +#pragma D binding "1.0" ESOCKTNOSUPPORT
>> +inline int EOPNOTSUPP = 95;
>> +#pragma D binding "1.0" EOPNOTSUPP
>> +inline int EPFNOSUPPORT = 96;
>> +#pragma D binding "1.0" EPFNOSUPPORT
>> +inline int EAFNOSUPPORT = 97;
>> +#pragma D binding "1.0" EAFNOSUPPORT
>> +inline int EADDRINUSE = 98;
>> +#pragma D binding "1.0" EADDRINUSE
>> +inline int EADDRNOTAVAIL = 99;
>> +#pragma D binding "1.0" EADDRNOTAVAIL
>> +inline int ENETDOWN = 100;
>> +#pragma D binding "1.0" ENETDOWN
>> +inline int ENETUNREACH = 101;
>> +#pragma D binding "1.0" ENETUNREACH
>> +inline int ENETRESET = 102;
>> +#pragma D binding "1.0" ENETRESET
>> +inline int ECONNABORTED = 103;
>> +#pragma D binding "1.0" ECONNABORTED
>> +inline int ECONNRESET = 104;
>> +#pragma D binding "1.0" ECONNRESET
>> +inline int ENOBUFS = 105;
>> +#pragma D binding "1.0" ENOBUFS
>> +inline int EISCONN = 106;
>> +#pragma D binding "1.0" EISCONN
>> +inline int ENOTCONN = 107;
>> +#pragma D binding "1.0" ENOTCONN
>> +inline int ESHUTDOWN = 108;
>> +#pragma D binding "1.0" ESHUTDOWN
>> +inline int ETOOMANYREFS = 109;
>> +#pragma D binding "1.0" ETOOMANYREFS
>> +inline int ETIMEDOUT = 110;
>> +#pragma D binding "1.0" ETIMEDOUT
>> +inline int ECONNREFUSED = 111;
>> +#pragma D binding "1.0" ECONNREFUSED
>> +inline int EHOSTDOWN = 112;
>> +#pragma D binding "1.0" EHOSTDOWN
>> +inline int EHOSTUNREACH = 113;
>> +#pragma D binding "1.0" EHOSTUNREACH
>> +inline int EALREADY = 114;
>> +#pragma D binding "1.0" EALREADY
>> +inline int EINPROGRESS = 115;
>> +#pragma D binding "1.0" EINPROGRESS
>> +inline int ESTALE = 116;
>> +#pragma D binding "1.0" ESTALE
>> +inline int EUCLEAN = 117;
>> +#pragma D binding "1.0" EUCLEAN
>> +inline int ENOTNAM = 118;
>> +#pragma D binding "1.0" ENOTNAM
>> +inline int ENAVAIL = 119;
>> +#pragma D binding "1.0" ENAVAIL
>> +inline int EISNAM = 120;
>> +#pragma D binding "1.0" EISNAM
>> +inline int EREMOTEIO = 121;
>> +#pragma D binding "1.0" EREMOTEIO
>> +inline int EDQUOT = 122;
>> +#pragma D binding "1.0" EDQUOT
>> +inline int ENOMEDIUM = 123;
>> +#pragma D binding "1.0" ENOMEDIUM
>> +inline int EMEDIUMTYPE = 124;
>> +#pragma D binding "1.0" EMEDIUMTYPE
>> +inline int ECANCELED = 125;
>> +#pragma D binding "1.0" ECANCELED
>> +inline int ENOKEY = 126;
>> +#pragma D binding "1.0" ENOKEY
>> +inline int EKEYEXPIRED = 127;
>> +#pragma D binding "1.0" EKEYEXPIRED
>> +inline int EKEYREVOKED = 128;
>> +#pragma D binding "1.0" EKEYREVOKED
>> +inline int EKEYREJECTED = 129;
>> +#pragma D binding "1.0" EKEYREJECTED
>> +inline int EOWNERDEAD = 130;
>> +#pragma D binding "1.0" EOWNERDEAD
>> +inline int ENOTRECOVERABLE = 131;
>> +#pragma D binding "1.0" ENOTRECOVERABLE
>> +inline int ERFKILL = 132;
>> +#pragma D binding "1.0" ERFKILL
>> +inline int EHWPOISON = 133;
>> +#pragma D binding "1.0" EHWPOISON
>> +inline int ENOTSUP = 95;
>> +#pragma D binding "1.0" ENOTSUP
>> diff --git a/dlibs/x86_64/6.10.0/io.d b/dlibs/x86_64/6.10.0/io.d
>> new file mode 100644
>> index 0000000000000..de693c187efcf
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/io.d
>> @@ -0,0 +1,235 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on provider sched
>> +
>> +typedef char	*caddr_t;
>> +
>> +typedef struct bufinfo {
>> +	int b_flags;			/* buffer status */
>> +	size_t b_bcount;		/* number of bytes */
>> +	caddr_t b_addr;			/* buffer address */
>> +	uint64_t b_lblkno;		/* block # on device */
>> +	uint64_t b_blkno;		/* expanded block # on device */
>> +	size_t b_resid;			/* # of bytes not transferred */
>> +	size_t b_bufsize;		/* size of allocated buffer */
>> +	caddr_t b_iodone;		/* I/O completion routine */
>> +	int b_error;			/* expanded error field */
>> +	dev_t b_edev;			/* extended device */
>> +} bufinfo_t;
>> +
>> +inline int B_BUSY = 0x000001;
>> +#pragma D binding "1.0" B_BUSY
>> +inline int B_DONE = 0x000002;
>> +#pragma D binding "1.0" B_DONE
>> +inline int B_ERROR = 0x000004;
>> +#pragma D binding "1.0" B_ERROR
>> +inline int B_PAGEIO = 0x000010;
>> +#pragma D binding "1.0" B_PAGEIO
>> +inline int B_PHYS = 0x000020;
>> +#pragma D binding "1.0" B_PHYS
>> +inline int B_READ = 0x000040;
>> +#pragma D binding "1.0" B_READ
>> +inline int B_WRITE = 0x000100;
>> +#pragma D binding "1.0" B_WRITE
>> +inline int B_ASYNC = 0x000400;
>> +#pragma D binding "1.0" B_ASYNC
>> +
>> +#pragma D binding "1.0" translator
>> +translator bufinfo_t < struct buffer_head *B > {
>> +	b_flags = (int)arg1 & 0x01 ? B_WRITE : B_READ;
>> +	b_addr = B->b_data;
>> +	b_bcount = B->b_size;
>> +	b_lblkno = B->b_blocknr;
>> +	b_blkno = B->b_blocknr;
>> +	b_resid = 0;
>> +	b_bufsize = B->b_size;
>> +	b_iodone = (caddr_t)B->b_end_io;
>> +	b_error = 0;			/* b_state ?? */
>> +	b_edev = B->b_bdev->bd_dev;
>> +};
>> +
>> +/*
>> + * From linux/blk_types.h.
>> + */
>> +
>> +/* bit # in bi_flags */
>> +inline int BIO_USER_MAPPED = 6;
>> +
>> +/* bit mask in bi_rw */
>> +inline int REQ_WRITE = 0x01;
>> +
>> +inline int REQ_SYNC = 0x800;
>> +
>> +
>> +
>> +
>> +
>> +
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator bufinfo_t < struct bio *B > {
>> +	b_flags = ((int)B->bi_opf & REQ_WRITE ? B_WRITE : B_READ) |
>> +		((int)B->bi_opf & REQ_SYNC ? 0 : B_ASYNC) |
>> +		((int)B->bi_flags & (1 << BIO_USER_MAPPED) ? B_PAGEIO : B_PHYS);
>> +	b_addr = 0;
>> +	b_bcount = B->bi_iter.bi_size;
>> +	b_lblkno = B->bi_iter.bi_sector;
>> +	b_blkno = B->bi_iter.bi_sector;
>> +	b_resid = 0;
>> +	b_bufsize = B->bi_iter.bi_size;
>> +	b_iodone = (caddr_t)B->bi_end_io;
>> +	b_error = 0;
>> +	b_edev = B->bi_bdev == NULL ? 0 : B->bi_bdev->bd_dev;
>> +};
>> +
>> +typedef struct devinfo {
>> +	int dev_major;			/* major number */
>> +	int dev_minor;			/* minor number */
>> +	int dev_instance;		/* instance number */
>> +	string dev_name;		/* name of device */
>> +	string dev_statname;		/* name of device + instance/minor */
>> +	string dev_pathname;		/* pathname of device */
>> +} devinfo_t;
>> +
>> +
>> +
>> +#pragma D binding "1.0" translator
>> +translator devinfo_t < struct buffer_head *B > {
>> +	dev_major = getmajor(B->b_bdev->bd_dev);
>> +	dev_minor = getminor(B->b_bdev->bd_dev);
>> +	dev_instance = 0;		/* not used? */
>> +	dev_name = B->b_bdev->bd_disk->part0->bd_device.parent
>> +	    ? B->b_bdev->bd_disk->part0->bd_device.parent->driver->name
>> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.parent->driver->name)
>> +		: "<none>"
>> +	    : B->b_bdev->bd_disk->part0->bd_device.driver->name
>> +		? stringof(B->b_bdev->bd_disk->part0->bd_device.driver->name)
>> +		: "<none>";
>> +	dev_statname = B->b_bdev->__bd_flags.counter & 255 == 0
>> +			? stringof(B->b_bdev->bd_disk->disk_name)
>> +			: strjoin(stringof(B->b_bdev->bd_disk->disk_name),
>> +				  lltostr(B->b_bdev->__bd_flags.counter & 255));
>> +	dev_pathname = strjoin(
>> +			"/dev/",
>> +			B->b_bdev->__bd_flags.counter & 255 == 0
>> +			    ? stringof(B->b_bdev->bd_disk->disk_name)
>> +			    : strjoin(stringof(B->b_bdev->bd_disk->disk_name),
>> +				      lltostr(B->b_bdev->__bd_flags.counter & 255))
>> +		       );
>> +};
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator devinfo_t < struct bio *B > {
>> +	dev_major = B->bi_bdev == NULL ? 0 : getmajor(B->bi_bdev->bd_dev);
>> +	dev_minor = B->bi_bdev == NULL ? 0 : getminor(B->bi_bdev->bd_dev);
>> +	dev_instance = 0;
>> +	dev_name = B->bi_bdev == NULL
>> +			? "nfs"
>> +			: stringof(((struct blk_major_name **)`major_names)[
>> +					getmajor(B->bi_bdev->bd_dev) % 255
>> +				   ]->name);
>> +	dev_statname = B->bi_bdev == NULL ? "nfs" :
>> +	    B->bi_bdev->__bd_flags.counter & 255 == 0 ? stringof(B->bi_bdev->bd_disk->disk_name) :
>> +	    strjoin(stringof(B->bi_bdev->bd_disk->disk_name), lltostr(B->bi_bdev->__bd_flags.counter & 255));
>> +	dev_pathname = B->bi_bdev == NULL ? "<nfs>" : "<unknown>";
>> +};
>> +
>> +typedef struct fileinfo {
>> +	string fi_name;			/* name (basename of fi_pathname) */
>> +	string fi_dirname;		/* directory (dirname of fi_pathname) */
>> +	string fi_pathname;		/* full pathname */
>> +	loff_t fi_offset;		/* offset within file */
>> +	string fi_fs;			/* filesystem */
>> +	string fi_mount;		/* mount point of file system */
>> +	int fi_oflags;			/* open(2) flags for file descriptor */
>> +} fileinfo_t;
>> +
>> +#pragma D binding "1.0" translator
>> +translator fileinfo_t < struct buffer_head *B > {
>> +	fi_name = "<unknown>";
>> +	fi_dirname = "<unknown>";
>> +	fi_pathname = "<unknown>";
>> +	fi_offset = 0;
>> +	fi_fs = "<unknown>";
>> +	fi_mount = "<unknown>";
>> +	fi_oflags = 0;
>> +};
>> +
>> +inline int O_ACCMODE = 0003;
>> +#pragma D binding "1.1" O_ACCMODE
>> +inline int O_RDONLY = 00;
>> +#pragma D binding "1.1" O_RDONLY
>> +inline int O_WRONLY = 01;
>> +#pragma D binding "1.1" O_WRONLY
>> +inline int O_RDWR = 02;
>> +#pragma D binding "1.1" O_RDWR
>> +inline int O_CREAT = 00000100;
>> +#pragma D binding "1.1" O_CREAT
>> +inline int O_EXCL = 00000200;
>> +#pragma D binding "1.1" O_EXCL
>> +inline int O_NOCTTY = 00000400;
>> +#pragma D binding "1.1" O_NOCTTY
>> +inline int O_TRUNC = 00001000;
>> +#pragma D binding "1.1" O_TRUNC
>> +inline int O_APPEND = 00002000;
>> +#pragma D binding "1.1" O_APPEND
>> +inline int O_NONBLOCK = 00004000;
>> +#pragma D binding "1.1" O_NONBLOCK
>> +inline int O_NDELAY = 00004000;
>> +#pragma D binding "1.1" O_NDELAY
>> +inline int O_SYNC = (04000000|010000);
>> +#pragma D binding "1.1" O_SYNC
>> +inline int O_FSYNC = (04000000|010000);
>> +#pragma D binding "1.1" O_FSYNC
>> +inline int O_ASYNC = 020000;
>> +#pragma D binding "1.1" O_ASYNC
>> +inline int O_DIRECTORY = 0200000;
>> +#pragma D binding "1.1" O_DIRECTORY
>> +inline int O_NOFOLLOW = 0400000;
>> +#pragma D binding "1.1" O_NOFOLLOW
>> +inline int O_CLOEXEC = 02000000;
>> +#pragma D binding "1.1" O_CLOEXEC
>> +inline int O_DSYNC = 010000;
>> +#pragma D binding "1.1" O_DSYNC
>> +inline int O_RSYNC = (04000000|010000);
>> +#pragma D binding "1.1" O_RSYNC
>> +
>> +#pragma D binding "1.1" translator
>> +translator fileinfo_t < struct file *F > {
>> +	fi_name = F == NULL
>> +			? "<none>"
>> +			: stringof(F->f_path.dentry->d_name.name);
>> +	fi_dirname = F == NULL
>> +			? "<none>"
>> +			: dirname(d_path(&(F->f_path)));
>> +	fi_pathname = F == NULL
>> +			? "<none>"
>> +			: d_path(&(F->f_path));
>> +	fi_offset = F == NULL
>> +			? 0
>> +			: F->f_pos;
>> +	fi_fs = F == NULL
>> +			? "<none>"
>> +			: stringof(F->f_path.mnt->mnt_sb->s_type->name);
>> +	fi_mount = F == NULL
>> +			? "<none>"
>> +			: "<unknown>";
>> +	fi_oflags = F == NULL
>> +			? 0
>> +			: F->f_flags;
>> +};
>> +
>> +inline fileinfo_t fds[int fd] = xlate <fileinfo_t> (
>> +				 fd >= 0 && fd < curthread->files->fdt->max_fds
>> +					? curthread->files->fdt->fd[fd]
>> +					: NULL
>> +				);
>> +
>> +#pragma D attributes Stable/Stable/Common fds
>> +#pragma D binding "1.1" fds
>> diff --git a/dlibs/x86_64/6.10.0/ip.d b/dlibs/x86_64/6.10.0/ip.d
>> new file mode 100644
>> index 0000000000000..f8b77f1224115
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/ip.d
>> @@ -0,0 +1,341 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2007, 2023, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library net.d
>> +#pragma D depends_on library procfs.d
>> +#pragma D depends_on provider ip
>> +
>> +inline int IPPROTO_IP		=	0;
>> +inline int IPPROTO_ICMP		=	1;
>> +inline int IPPROTO_IGMP		=	2;
>> +inline int IPPROTO_IPIP		=	4;
>> +inline int IPPROTO_TCP		=	6;
>> +inline int IPPROTO_EGP		=	8;
>> +inline int IPPROTO_PUP		=	12;
>> +inline int IPPROTO_UDP		=	17;
>> +inline int IPPROTO_IDP		=	22;
>> +inline int IPPROTO_TP		=	29;
>> +inline int IPPROTO_DCCP		=	33;
>> +inline int IPPROTO_IPV6		=	41;
>> +inline int IPPROTO_RSVP		=	46;
>> +inline int IPPROTO_GRE		=	47;
>> +inline int IPPROTO_ESP		=	50;
>> +inline int IPPROTO_AH		=	51;
>> +inline int IPPROTO_OSPF		=	89;
>> +inline int IPPROTO_MTP		=	92;
>> +inline int IPPROTO_BEETPH	=	94;
>> +inline int IPPROTO_ENCAP	=	98;
>> +inline int IPPROTO_PIM		=	103;
>> +inline int IPPROTO_COMP		=	108;
>> +inline int IPPROTO_SCTP		=	132;
>> +inline int IPPROTO_UDPLITE	=	136;
>> +inline int IPPROTO_RAW		=	255;
>> +inline int IPPROTO_MAX		=	256;
>> +inline int IPPROTO_HOPOPTS	=	0;
>> +inline int IPPROTO_ROUTING	=	43;
>> +inline int IPPROTO_FRAGMENT	=	44;
>> +inline int IPPROTO_ICMPV6	=	58;
>> +inline int IPPROTO_NONE		=	59;
>> +inline int IPPROTO_DSTOPTS	=	60;
>> +inline int IPPROTO_MH		=	135;
>> +
>> +inline int TCP_MIN_HEADER_LENGTH =	20;
>> +
>> +/*
>> + * For compatibility with Solaris.  Here the netstackid will be the pointer
>> + * to the net namespace (nd_net in struct net_device).
>> + */
>> +typedef uint64_t	netstackid_t;
>> +typedef __be32		ipaddr_t;
>> +typedef struct in6_addr	in6_addr_t;
>> +
>> +/*
>> + * pktinfo is where packet ID info can be made available for deeper
>> + * analysis if packet IDs become supported by the kernel in the future.
>> + * The pkt_addr member is currently always NULL.
>> + */
>> +typedef struct pktinfo {
>> +	uintptr_t pkt_addr;
>> +} pktinfo_t;
>> +
>> +/*
>> + * csinfo is where connection state info is made available.
>> + */
>> +typedef struct csinfo {
>> +	uintptr_t cs_addr;
>> +	uint64_t cs_cid;
>> +} csinfo_t;
>> +
>> +/*
>> + * ipinfo contains common IP info for both IPv4 and IPv6.
>> + */
>> +typedef struct ipinfo {
>> +	uint8_t ip_ver;			/* IP version (4, 6) */
>> +	uint32_t ip_plength;		/* payload length */
>> +	string ip_saddr;		/* source address */
>> +	string ip_daddr;		/* destination address */
>> +} ipinfo_t;
>> +
>> +/*
>> + * ifinfo contains network interface info.
>> + */
>> +typedef struct ifinfo {
>> +	string if_name;			/* interface name */
>> +	int8_t if_local;		/* is delivered locally */
>> +	netstackid_t if_ipstack;	/* netns pointer on Linux */
>> +	uintptr_t if_addr;		/* pointer to raw struct net_device */
>> +} ifinfo_t;
>> +
>> +/*
>> + * ipv4info is a translated version of the IPv4 header (with raw pointer).
>> + * These values are NULL if the packet is not IPv4.
>> + */
>> +typedef struct ipv4info {
>> +	uint8_t ipv4_ver;		/* IP version (4) */
>> +	uint8_t ipv4_ihl;		/* header length, bytes */
>> +	uint8_t ipv4_tos;		/* type of service field */
>> +	uint16_t ipv4_length;		/* length (header + payload) */
>> +	uint16_t ipv4_ident;		/* identification */
>> +	uint8_t ipv4_flags;		/* IP flags */
>> +	uint16_t ipv4_offset;		/* fragment offset */
>> +	uint8_t ipv4_ttl;		/* time to live */
>> +	uint8_t ipv4_protocol;		/* next level protocol */
>> +	string ipv4_protostr;		/* next level protocol, as string */
>> +	uint16_t ipv4_checksum;		/* header checksum */
>> +	ipaddr_t ipv4_src;		/* source address */
>> +	ipaddr_t ipv4_dst;		/* destination address */
>> +	string ipv4_saddr;		/* source address, string */
>> +	string ipv4_daddr;		/* destination address, string */
>> +	struct iphdr *ipv4_hdr;		/* pointer to raw header */
>> +} ipv4info_t;
>> +
>> +/*
>> + * ipv6info is a translated version of the IPv6 header (with raw pointer).
>> + * These values are NULL if the packet is not IPv6.
>> + */
>> +typedef struct ipv6info {
>> +	uint8_t ipv6_ver;		/* IP version (6) */
>> +	uint8_t ipv6_tclass;		/* traffic class */
>> +	uint32_t ipv6_flow;		/* flow label */
>> +	uint16_t ipv6_plen;		/* payload length */
>> +	uint8_t ipv6_nexthdr;		/* next header protocol */
>> +	string ipv6_nextstr;		/* next header protocol, as string */
>> +	uint8_t ipv6_hlim;		/* hop limit */
>> +	in6_addr_t *ipv6_src;		/* source address */
>> +	in6_addr_t *ipv6_dst;		/* destination address */
>> +	string ipv6_saddr;		/* source address, string */
>> +	string ipv6_daddr;		/* destination address, string */
>> +	struct ipv6hdr *ipv6_hdr;	/* pointer to raw header */
>> +} ipv6info_t;
>> +
>> +/*
>> + * void_ip_t is a void pointer to either an IPv4 or IPv6 header.  It has
>> + * its own type name so that a translator can be determined.
>> + */
>> +typedef uintptr_t void_ip_t;
>> +
>> +/*
>> + * __dtrace_tcp_void_ip_t is used by the translator to take either the
>> + * non-NULL void_ip_t * passed in or, if it is NULL, uses arg3 (struct tcp *)
>> + * from the tcp:::send probe to translate to an ipinfo_t.
>> + * This allows us to present the consumer with header data based on the
>> + * struct tcp * when IP information is not yet present (for TCP send).
>> + */
>> +typedef void * __dtrace_tcp_void_ip_t;
>> +
>> +#pragma D binding "1.5" translator
>> +translator pktinfo_t < struct sk_buff *s > {
>> +	pkt_addr = (uintptr_t)s;
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator csinfo_t < struct sock *s > {
>> +	cs_addr = (uintptr_t)s;
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < struct iphdr *I > {
>> +	ip_ver = 4;
>> +        ip_plength = I != NULL ? (ntohs(I->tot_len) - I->ihl << 2) : 0;
>> +	ip_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<unknown>";
>> +	ip_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<unknown>";
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < struct ipv6hdr *I > {
>> +	ip_ver = 6;
>> +	ip_plength = I != NULL ? ntohs(I->payload_len) : 0;
>> +	ip_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<unknown>";
>> +	ip_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<unknown>";
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < void_ip_t *I > {
>> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 : 0;
>> +	ip_plength = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
>> +	    (ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2)) :
>> +	    *(uint8_t *)I >> 4 == 6 ?
>> +	    ntohs(((struct ipv6hdr *)I)->payload_len) : 0) : 0;
>> +	ip_saddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->saddr) : *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) : "<unknown>") :
>> +	    "<unknown>";
>> +	ip_daddr = I != NULL ? (*(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->daddr) : *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) : "<unknown>") :
>> +	    "<unknown>";
>> +};
>> +
>> +/*
>> + * In some cases where the ipinfo_t * is NULL we wish to construct IP info
>> + * using the struct tcp_sock * (arg3).  In order to map local IP to source
>> + * or destination IP address appropriately we need to check if the associated
>> + * data is inbound (NET_PROBE_INBOUND in arg7) or outbound (NET_PROBE_OUTBOUND);
>> + * the value is stored in arg7.  If inbound, we map the local IP address to
>> + * ip_daddr (destination), and if outbound it is mapped to ip_saddr.
>> + */
>> +#pragma D binding "1.5" translator
>> +translator ipinfo_t < __dtrace_tcp_void_ip_t *I > {
>> +	/*
>> +	 * General strategy used is to rely on the IP header I if it is
>> +	 * non-null; otherwise we try to reconstruct IP values from arg3
>> +	 * (a struct tcp_sock *).
>> +	 */
>> +	ip_ver = I != NULL ? *(uint8_t *)I >> 4 :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET ? 4 :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ? 6 : 0;
>> +	/*
>> +	 * For ip_plength we fall back to using TCP skb data from the tcp_skb_cb
>> +	 * to determine payload length.
>> +	 */
>> +	ip_plength = I != NULL && *(uint8_t *)I >> 4 == 4 ?
>> +	    ntohs(((struct iphdr *)I)->tot_len) - ((*(uint8_t *)I & 0xf) << 2) :
>> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
>> +	    ntohs(((struct ipv6hdr *)I)->payload_len) :
>> +	    arg0 != NULL ?
>> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq -
>> +	    ((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->seq :
>> +	    0;
>> +	/*
>> +	 * For source/destination addresses, we again try to use the IP header I
>> +	 * if available.  If I is NULL, we utilize arg3 (struct tcp_sock *)
>> +	 * but the problem here is that it stores local and remote IP addresses
>> +	 * _not_ source and destination.  So we need to know if traffic is
>> +	 * inbound or outbound. If inbound, IP source address is remote
>> +	 * socket address (skc_daddr) and destination IP address is local socket
>> +	 * address (skc_rcv_saddr).  If outbound, IP source address is local
>> +	 * socket address and IP destination address is remote socket address.
>> +	 */
>> +	ip_saddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->saddr) :
>> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->saddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_daddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family == AF_INET6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr) :
>> +	    "<unknown>";
>> +	ip_daddr = I != NULL && *(uint8_t *)I >> 4 == 4 ?
>> +	    inet_ntoa(&((struct iphdr *)I)->daddr) :
>> +	    I != NULL && *(uint8_t *)I >> 4 == 6 ?
>> +	    inet_ntoa6(&((struct ipv6hdr *)I)->daddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_rcv_saddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_daddr) :
>> +	    arg3 != NULL &&
>> +	    ((struct sock *)arg3)->__sk_common.skc_family== AF_INET6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_rcv_saddr :
>> +	    &((struct sock *)arg3)->__sk_common.skc_v6_daddr) :
>> +	    "<unknown>";
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ifinfo_t < struct net_device *N > {
>> +	if_name = N != NULL ? stringof(N->name) : "<unknown>";
>> +	if_ipstack = (N != NULL && sizeof(N->nd_net) > 0) ?
>> +	    ((uint64_t)N->nd_net.net) : 0;
>> +	if_local = (N == NULL);	/* is delivered locally */
>> +	if_addr = (uintptr_t)N;	/* pointer to raw struct net_device ptr */
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipv4info_t < struct iphdr *I > {
>> +	ipv4_ver = I != NULL ? 4 : 0;
>> +	ipv4_ihl = I != NULL ? ((*(uint8_t *)I & 0xf) << 2) : 0;
>> +	ipv4_tos = I != NULL ? I->tos : 0;
>> +	ipv4_length = I != NULL ? ntohs(I->tot_len) : 0;
>> +	ipv4_ident = I != NULL ? ntohs(I->id) : 0;
>> +	ipv4_flags = I != NULL ? ntohs(I->frag_off) >> 12 : 0;
>> +	ipv4_offset = I != NULL ? ntohs(I->frag_off) & 0x0fff : 0;
>> +	ipv4_ttl = I != NULL ? I->ttl : 0;
>> +	ipv4_protocol = I != NULL ? I->protocol : 0;
>> +	ipv4_protostr = I == NULL ? "<null>" :
>> +	    I->protocol == IPPROTO_TCP     ? "TCP"    :
>> +	    I->protocol == IPPROTO_UDP     ? "UDP"    :
>> +	    I->protocol == IPPROTO_IP      ? "IP"     :
>> +	    I->protocol == IPPROTO_ICMP    ? "ICMP"   :
>> +	    I->protocol == IPPROTO_IGMP    ? "IGMP"   :
>> +	    I->protocol == IPPROTO_EGP     ? "EGP"    :
>> +	    I->protocol == IPPROTO_IPV6    ? "IPv6"   :
>> +	    I->protocol == IPPROTO_ROUTING ? "ROUTE"  :
>> +	    I->protocol == IPPROTO_ESP     ? "ESP"    :
>> +	    I->protocol == IPPROTO_AH      ? "AH"     :
>> +	    I->protocol == IPPROTO_ICMPV6  ? "ICMPv6" :
>> +	    I->protocol == IPPROTO_OSPF    ? "OSPF"   :
>> +	    I->protocol == IPPROTO_SCTP    ? "SCTP"   :
>> +	    I->protocol == IPPROTO_RAW     ? "RAW"    :
>> +	    lltostr((uint64_t)I->protocol);
>> +	ipv4_checksum = I != NULL ? ntohs(I->check) : 0;
>> +	ipv4_src = I != NULL ? I->saddr : 0;
>> +	ipv4_dst = I != NULL ? I->daddr : 0;
>> +	ipv4_saddr = I != NULL ? inet_ntoa(&I->saddr) : "<null>";
>> +	ipv4_daddr = I != NULL ? inet_ntoa(&I->daddr) : "<null>";
>> +	ipv4_hdr = I;
>> +};
>> +
>> +#pragma D binding "1.5" translator
>> +translator ipv6info_t < struct ipv6hdr *I > {
>> +	ipv6_ver = I != NULL ? ((*(uint8_t *)I) >> 4) : 0;
>> +	ipv6_tclass = I != NULL ? ((ntohl(*(uint32_t *)I) & 0x0fffffff) >> 20) : 0;
>> +	ipv6_flow = I != NULL ? (ntohl(*(uint32_t *)I) & 0x000fffff) : 0;
>> +	ipv6_plen = I != NULL ? ntohs(I->payload_len) : 0;
>> +	ipv6_nexthdr = I != NULL ? I->nexthdr : 0;
>> +	ipv6_nextstr = I == NULL ? "<null>" :
>> +	    I->nexthdr == IPPROTO_TCP	?	"TCP"		:
>> +	    I->nexthdr == IPPROTO_UDP	?	"UDP"		:
>> +	    I->nexthdr == IPPROTO_IP	?	"IP"		:
>> +	    I->nexthdr == IPPROTO_ICMP	?	"ICMP"		:
>> +	    I->nexthdr == IPPROTO_IGMP	?	"IGMP"		:
>> +	    I->nexthdr == IPPROTO_EGP	?	"EGP"		:
>> +	    I->nexthdr == IPPROTO_IPV6	?	"IPv6"		:
>> +	    I->nexthdr == IPPROTO_ROUTING ?	"ROUTE"		:
>> +	    I->nexthdr == IPPROTO_ESP	?	"ESP"		:
>> +	    I->nexthdr == IPPROTO_AH	?	"AH"		:
>> +	    I->nexthdr == IPPROTO_ICMPV6 ?	"ICMPv6"	:
>> +	    I->nexthdr == IPPROTO_OSPF ?	"OSPF"		:
>> +	    I->nexthdr == IPPROTO_SCTP	?	"SCTP"		:
>> +	    I->nexthdr == IPPROTO_RAW	?	"RAW"		:
>> +	    lltostr((uint64_t)I->nexthdr);
>> +	ipv6_hlim = I != NULL ? I->hop_limit : 0;
>> +	ipv6_src = I != NULL ? &I->saddr : NULL;
>> +	ipv6_dst = I != NULL ? &I->daddr : 0;
>> +	ipv6_saddr = I != NULL ? inet_ntoa6(&I->saddr) : "<null>";
>> +	ipv6_daddr = I != NULL ? inet_ntoa6(&I->daddr) : "<null>";
>> +	ipv6_hdr = I;
>> +};
>> diff --git a/dlibs/x86_64/6.10.0/lockstat.d b/dlibs/x86_64/6.10.0/lockstat.d
>> new file mode 100644
>> index 0000000000000..cb8b4bd96f1ac
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/lockstat.d
>> @@ -0,0 +1,14 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on provider lockstat
>> +
>> +inline int RW_WRITER = 0x00;
>> +#pragma D binding "1.6.4" RW_WRITER
>> +inline int RW_READER = 0x01;
>> +#pragma D binding "1.6.4" RW_READER
>> diff --git a/dlibs/x86_64/6.10.0/net.d b/dlibs/x86_64/6.10.0/net.d
>> new file mode 100644
>> index 0000000000000..6ac3428747a77
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/net.d
>> @@ -0,0 +1,33 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2007, 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +/* These are needed for inet_ntop() DTrace function. */
>> +inline int AF_INET              =       2;
>> +inline int AF_INET6             =       10;
>> +
>> +/* These are needed for link_ntop() DTrace function. */
>> +inline int ARPHRD_ETHER         =       1;
>> +inline int ARPHRD_INFINIBAND    =       32;
>> +
>> +/*
>> + * The conninfo_t structure should be used by all application protocol
>> + * providers as the first arguments to indicate some basic information
>> + * about the connection. This structure may be augmented to accommodate
>> + * the particularities of additional protocols in the future.
>> + */
>> +typedef struct conninfo {
>> +	 string ci_local;	/* local host address */
>> +	 string ci_remote;	/* remote host address */
>> +	 string ci_protocol;	/* protocol (ipv4, ipv6, etc) */
>> +} conninfo_t;
>> +
>> +/*
>> + * We use these values to determine if a probe point is associated
>> + * with sending (outbound) or receiving (inbound).
>> + */
>> +inline int NET_PROBE_OUTBOUND =		0x00;
>> +inline int NET_PROBE_INBOUND =		0x01;
>> diff --git a/dlibs/x86_64/6.10.0/pcap.d b/dlibs/x86_64/6.10.0/pcap.d
>> new file mode 100644
>> index 0000000000000..21a8e74a4036d
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/pcap.d
>> @@ -0,0 +1,35 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2016, 2023, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on provider ip
>> +
>> +/*
>> + * In general, PCAP_<type> names are chosen to match DL_<type> DLPI
>> + * datalink types.
>> + */
>> +
>> +/*
>> + * Network-related capture types.  Raw DLT_* values can be used for those
>> + * not present here; see /usr/include/pcap/bpf.h for the full list.
>> + */
>> +
>> +inline int PCAP_NULL = 0;
>> +#pragma D binding "1.12" PCAP_NULL
>> +inline int PCAP_ETHER = 1;
>> +#pragma D binding "1.12" PCAP_ETHER
>> +inline int PCAP_WIFI = 105;
>> +#pragma D binding "1.12" PCAP_WIFI
>> +inline int PCAP_PPP = 9;
>> +#pragma D binding "1.12" PCAP_PPP
>> +/* PCAP_IP can signify IPv4 or IPv6 header follows. */
>> +inline int PCAP_IP = 12;
>> +#pragma D binding "1.12" PCAP_IP
>> +
>> +/* InfiniBand-related capture types. */
>> +inline int PCAP_IPOIB = 242;
>> +#pragma D binding "1.12" PCAP_IPOIB
>> diff --git a/dlibs/x86_64/6.10.0/procfs.d b/dlibs/x86_64/6.10.0/procfs.d
>> new file mode 100644
>> index 0000000000000..5d7873b5e0091
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/procfs.d
>> @@ -0,0 +1,306 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, 2022, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +/*
>> + * This file defines the standard set of inlines and translators to be made
>> + * available for all D programs to use to examine process model state.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library sched.d
>> +
>> +typedef time64_t time_t;
>> +
>> +typedef struct timestruc {
>> +	time_t tv_sec;
>> +	long tv_nsec;
>> +} timestruc_t;
>> +
>> +typedef struct lwpsinfo {
>> +	int pr_flag;			/* lwp flags (DEPRECATED) */
>> +	int pr_lwpid;			/* lwp id */
>> +	uintptr_t pr_addr;		/* internal address of lwp */
>> +	uintptr_t pr_wchan;		/* wait addr for sleeping lwp */
>> +	char pr_stype;			/* sync event type */
>> +	char pr_state;			/* numeric lwp state */
>> +	char pr_sname;			/* printable char for pr_state */
>> +	char pr_nice;			/* nice for cpu usage */
>> +	short pr_syscall;		/* syscall number */
>> +	char pr_oldpri;			/* priority */
>> +	char pr_cpu;			/* CPU usage */
>> +	int pr_pri;			/* priority */
>> +	ushort_t pr_pctcpu;		/* % of recent cpu time */
>> +	ushort_t pr_pad;
>> +	timestruc_t pr_start;		/* lwp start time */
>> +	timestruc_t pr_time;		/* usr+sys cpu time */
>> +	char pr_clname[8];		/* scheduling class name */
>> +	char pr_name[16];		/* name */
>> +	processorid_t pr_onpro;		/* processor last ran on */
>> +	processorid_t pr_bindpro;	/* processor bound to */
>> +	psetid_t pr_bindpset;		/* processor set */
>> +	int pr_lgrp;			/* lwp home lgroup */
>> +	int pr_filler[4];
>> +} lwpsinfo_t;
>> +
>> +typedef id_t taskid_t;
>> +typedef id_t dprojid_t;
>> +typedef id_t poolid_t;
>> +typedef id_t zoneid_t;
>> +
>> +/*
>> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
>> + * psinfo_t struct.
>> + * We do not provide support for pr_size, pr_rssize, pr_pctcpu, and pr_pctmem.
>> + * We also do not fill in pr_lwp (the lwpsinfo_t for the representative LWP)
>> + * because we do not have the ability to select and stop any representative.
>> + * Also, for the moment, pr_wstat, pr_time, and pr_ctime are not supported,
>> + * but these could be supported by DTrace in the future using subroutines.
>> + * Note that any member added to this translator should also be added to the
>> + * kthread_t-to-psinfo_t translator, below.
>> + */
>> +typedef struct psinfo {
>> +	int pr_flag;			/* process flags (DEPRECATED) */
>> +	int pr_nlwp;			/* number of active lwps (Linux: 1) */
>> +	pid_t pr_pid;			/* unique process id */
>> +	pid_t pr_ppid;			/* process id of parent */
>> +	pid_t pr_pgid;			/* pid of process group leader */
>> +	pid_t pr_sid;			/* session id */
>> +	uid_t pr_uid;			/* real user id */
>> +	uid_t pr_euid;			/* effective user id */
>> +	uid_t pr_gid;			/* real group id */
>> +	uid_t pr_egid;			/* effective group id */
>> +	uintptr_t pr_addr;		/* address of process */
>> +	size_t pr_size;			/* size of process image (in KB) */
>> +	size_t pr_rssize;		/* resident set sie (in KB) */
>> +	size_t pr_pad1;
>> +	struct tty_struct *pr_ttydev;	/* controlling tty (or -1) */
>> +	ushort_t pr_pctcpu;		/* % of recent cpu time used */
>> +	ushort_t pr_pctmem;		/* % of recent memory used */
>> +	timestruc_t pr_start;		/* process start time */
>> +	timestruc_t pr_time;		/* usr+sys cpu time for process */
>> +	timestruc_t pr_ctime;		/* usr+sys cpu time for children */
>> +	char pr_fname[16];		/* name of exec'd file */
>> +	char pr_psargs[80];		/* initial chars of arg list */
>> +	int pr_wstat;			/* if zombie, wait() status */
>> +	int pr_argc;			/* initial argument count */
>> +	uintptr_t pr_argv;		/* address of initial arg vector */
>> +	uintptr_t pr_envp;		/* address of initial env vector */
>> +	char pr_dmodel;			/* data model */
>> +	char pr_pad2[3];
>> +	taskid_t pr_taskid;		/* task id */
>> +	dprojid_t pr_projid;		/* project id */
>> +	int pr_nzomb;			/* number of zombie lwps (Linux: 0) */
>> +	poolid_t pr_poolid;		/* pool id */
>> +	zoneid_t pr_zoneid;		/* zone id */
>> +	id_t pr_contract;		/* process contract */
>> +	int pr_filler[1];
>> +	lwpsinfo_t pr_lwp;
>> +} psinfo_t;
>> +
>> +inline char PR_MODEL_ILP32 = 1;
>> +#pragma D binding "1.0" PR_MODEL_ILP32
>> +inline char PR_MODEL_LP64 = 2;
>> +#pragma D binding "1.0" PR_MODEL_LP64
>> +
>> + 
>> + 
>> +inline	int PIDTYPE_PID = 0;
>> +#pragma D binding "1.0" PIDTYPE_PID
>> +inline	int PIDTYPE_TGID = 1;
>> +#pragma D binding "1.0" PIDTYPE_TGID
>> +inline	int PIDTYPE_PGID = 2;
>> +#pragma D binding "1.0" PIDTYPE_PGID
>> +inline	int PIDTYPE_SID = 3;
>> +#pragma D binding "1.0" PIDTYPE_SID
>> +
>> + 
>> + 
>> + 
>> + 
>> + 
>> + 
>> + 
>> +#pragma D binding "1.0" translator
>> +translator psinfo_t < struct task_struct *T > {
>> +	pr_nlwp = 1;
>> +	pr_pid = T->tgid;
>> +	pr_ppid = T->real_parent->tgid;
>> +	pr_pgid = T->signal->pids[PIDTYPE_PGID]->numbers[0].nr;
>> +	pr_sid = T->signal->pids[PIDTYPE_SID]->numbers[0].nr;
>> +	pr_uid = T->cred->uid.val;
>> +	pr_euid = T->cred->euid.val;
>> +	pr_gid = T->cred->gid.val;
>> +	pr_egid = T->cred->egid.val;
>> +	pr_addr = (uintptr_t)T;
>> +
>> +	pr_ttydev = T->signal->tty ? T->signal->tty
>> +				   : (struct tty_struct *)-1;
>> +
>> +	pr_fname = T->comm;
>> +/*
>> +	pr_psargs = stringof(get_psinfo(T)->__psinfo(psargs));
>> + */
>> +	pr_wstat = 0;
>> +/*
>> +	pr_argc = get_psinfo(T)->__psinfo(argc);
>> +	pr_argv = (uintptr_t)get_psinfo(T)->__psinfo(argv);
>> +	pr_envp = (uintptr_t)get_psinfo(T)->__psinfo(envp);
>> + */
>> +
>> +	pr_dmodel = PR_MODEL_LP64;
>> +
>> +	pr_taskid = 0;
>> +	pr_projid = 0;
>> +	pr_nzomb = 0;
>> +	pr_poolid = 0;
>> +	pr_zoneid = 0;
>> +	pr_contract = 0;
>> +};
>> +
>> +inline int PR_STOPPED = 0x00000001;
>> +#pragma D binding "1.0" PR_STOPPED
>> +inline int PR_ISTOP = 0x00000002;
>> +#pragma D binding "1.0" PR_ISTOP
>> +inline int PR_DSTOP = 0x00000004;
>> +#pragma D binding "1.0" PR_DSTOP
>> +inline int PR_IDLE = 0x10000000;
>> +#pragma D binding "1.0" PR_IDLE
>> +
>> +inline char SSLEEP = 1;
>> +#pragma D binding "1.0" SSLEEP
>> +inline char SRUN = 2;
>> +#pragma D binding "1.0" SRUN
>> +inline char SZOMB = 3;
>> +#pragma D binding "1.0" SZOMB
>> +inline char SSTOP = 4;
>> +#pragma D binding "1.0" SSTOP
>> +inline char SIDL = 5;
>> +#pragma D binding "1.0" SIDL
>> +inline char SONPROC = 6;
>> +#pragma D binding "1.0" SONPROC
>> +inline char SWAIT = 7;
>> +#pragma D binding "1.0" SWAIT
>> +
>> +/*
>> + * Translate from the kernel's task_struct structure to a Solaris proc(4)
>> + * lwpsinfo_t.
>> + * We do not provide support for pr_nice, pr_oldpri, pr_cpu, or pr_pctcpu.
>> + * Also, for the moment, pr_start and pr_time are not supported, but these
>> + * could be supported by DTrace in the future using subroutines.
>> + */
>> +#pragma D binding "1.0" translator
>> +translator lwpsinfo_t < struct task_struct *T > {
>> +	pr_flag = (T->__state & 0x00000004) ? PR_STOPPED : 0;
>> +/*
>> +	pr_flag = ((T->t_state == TS_STOPPED) ? (PR_STOPPED |
>> +	    ((!(T->t_schedflag & TS_PSTART)) ? PR_ISTOP : 0)) :
>> +	    ((T->t_proc_flag & TP_PRVSTOP) ? PR_STOPPED | PR_ISTOP : 0)) |
>> +	    ((T == T->t_procp->p_agenttp) ? PR_AGENT : 0) |
>> +	    ((!(T->t_proc_flag & TP_TWAIT)) ? PR_DETACH : 0) |
>> +	    ((T->t_proc_flag & TP_DAEMON) ? PR_DAEMON : 0) |
>> +	    ((T->t_procp->p_pidflag & CLDNOSIGCHLD) ? PR_NOSIGCHLD : 0) |
>> +	    ((T->t_procp->p_pidflag & CLDWAITPID) ? PR_WAITPID : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_FORK) ? PR_FORK : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_RUNLCL) ? PR_RLC : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_KILLCL) ? PR_KLC : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_ASYNC) ? PR_ASYNC : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_BPTADJ) ? PR_BPTADJ : 0) |
>> +	    ((T->t_procp->p_proc_flag & P_PR_PTRACE) ? PR_PTRACE : 0) |
>> +	    ((T->t_procp->p_flag & SMSACCT) ? PR_MSACCT : 0) |
>> +	    ((T->t_procp->p_flag & SMSFORK) ? PR_MSFORK : 0) |
>> +	    ((T->t_procp->p_flag & SVFWAIT) ? PR_VFORKP : 0) |
>> +	    (((T->t_procp->p_flag & SSYS) ||
>> +	    (T->t_procp->p_as == &`kas)) ? PR_ISSYS : 0) |
>> +	    ((T == T->t_cpu->cpu_idle_thread) ? PR_IDLE : 0);
>> +*/
>> +
>> +	pr_lwpid = T->pid;
>> +	pr_addr = (uintptr_t)T;
>> +	pr_wchan = NULL;
>> +	pr_stype = 0;
>> +
>> +	pr_state = (T->__state & 0x00000001) ? SSLEEP :
>> +		   (T->__state & 0x00000002) ? SSLEEP :
>> +		   (T->__state & 0x00000004) ? SSTOP :
>> +		   (T->__state & 0x00000008) ? SSTOP :
>> +		   (T->__state & 0x00000020) ? SZOMB :
>> +		   (T->__state & 0x00000010) ? SZOMB :
>> +		   (T->__state & 0x00000080) ? SZOMB :
>> +		   (T->__state & 0x00000100) ? SWAIT :
>> +		   (T->__state & 0x00000200) ? SWAIT : SRUN;
>> +	pr_sname = (T->__state & 0x00000001) ? 'S' :
>> +		   (T->__state & 0x00000002) ? 'S' :
>> +		   (T->__state & 0x00000004) ? 'T' :
>> +		   (T->__state & 0x00000008) ? 'T' :
>> +		   (T->__state & 0x00000020) ? 'Z' :
>> +		   (T->__state & 0x00000010) ? 'Z' :
>> +		   (T->__state & 0x00000080) ? 'Z' :
>> +		   (T->__state & 0x00000100) ? 'W' :
>> +		   (T->__state & 0x00000200) ? 'W' : 'R';
>> +
>> +	pr_pri = T->prio;
>> +	pr_name = T->comm;
>> +	pr_onpro = ((struct thread_info *)T->stack)->cpu;
>> +};
>> +
>> +inline psinfo_t *curpsinfo = xlate <psinfo_t *> (curthread);
>> +#pragma D attributes Stable/Stable/Common curpsinfo
>> +#pragma D binding "1.0" curpsinfo
>> +
>> +inline lwpsinfo_t *curlwpsinfo = xlate <lwpsinfo_t *> (curthread);
>> +#pragma D attributes Stable/Stable/Common curlwpsinfo
>> +#pragma D binding "1.0" curlwpsinfo
>> +
>> +inline string cwd = d_path(&(curthread->fs->pwd));
>> +#pragma D attributes Stable/Stable/Common cwd
>> +#pragma D binding "1.0" cwd
>> +
>> +inline string root = d_path(&(curthread->fs->root));
>> +#pragma D attributes Stable/Stable/Common root
>> +#pragma D binding "1.0" root
>> +
>> +inline int CLD_EXITED = 1;
>> +#pragma D binding "1.0" CLD_EXITED
>> +inline int CLD_KILLED = 2;
>> +#pragma D binding "1.0" CLD_KILLED
>> +inline int CLD_DUMPED = 3;
>> +#pragma D binding "1.0" CLD_DUMPED
>> +inline int CLD_TRAPPED = 4;
>> +#pragma D binding "1.0" CLD_TRAPPED
>> +inline int CLD_STOPPED = 5;
>> +#pragma D binding "1.0" CLD_STOPPED
>> +inline int CLD_CONTINUED = 6;
>> +#pragma D binding "1.0" CLD_CONTINUED
>> +
>> +/*
>> + * Below we provide some inline definitions to simplify converting from
>> + * a struct pid * to a pid_t.  structpid2pid is a DTrace-ized version of
>> + * pid_vnr().
>> + */
>> + /*
>> +inline	struct pid_namespace *pid_namespace[struct pid *p] = p != NULL ?
>> +	p->numbers[p->level].ns : NULL;
>> +
>> +inline	int pid_namespace_level[struct pid *p] = p != NULL && pid_namespace[p] ?
>> +	pid_namespace[p]->level : 0;
>> +
>> +m4_dnl 4.19 and above use thread_pid for this.
>> +define_for_kernel([[__task_pid]], [[ m4_dnl
>> +	(m4_kver(4, 19, 0), [[task->thread_pid]])]], m4_dnl
>> +	[[task->pids[PIDTYPE_PID].pid]]) m4_dnl
>> +
>> +inline	struct pid *task_pid[struct task_struct *task] =
>> +	task != NULL ? __task_pid : NULL;
>> +
>> +inline	int current_namespace_level = pid_namespace_level[task_pid[curthread]];
>> +
>> +inline	pid_t structpid2pid[struct pid *p] =
>> +	p != NULL && current_namespace_level <= p->level &&
>> +	((struct upid *)&(p->numbers[current_namespace_level]))->ns ==
>> +	pid_namespace[task_pid[curthread]] ?
>> +	((struct upid *)&(p->numbers[current_namespace_level]))->nr : 0;
>> +*/
>> diff --git a/dlibs/x86_64/6.10.0/regs.d b/dlibs/x86_64/6.10.0/regs.d
>> new file mode 100644
>> index 0000000000000..12ce3ac9a1507
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/regs.d
>> @@ -0,0 +1,94 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +inline int R_TRAPNO = 25;
>> +#pragma D binding "1.0" R_TRAPNO
>> +inline int R_GS = 24;
>> +#pragma D binding "1.0" R_GS
>> +inline int R_FS = 23;
>> +#pragma D binding "1.0" R_FS
>> +inline int R_ES = 22;
>> +#pragma D binding "1.0" R_ES
>> +inline int R_DS = 21;
>> +#pragma D binding "1.0" R_DS
>> +
>> +inline int R_SS = 20;
>> +#pragma D binding "1.0" R_SS
>> +inline int R_RSP = 19;
>> +#pragma D binding "1.0" R_RSP
>> +inline int R_RFL = 18;
>> +#pragma D binding "1.0" R_RFL
>> +inline int R_CS = 17;
>> +#pragma D binding "1.0" R_CS
>> +inline int R_RIP = 16;
>> +#pragma D binding "1.0" R_RIP
>> +inline int R_ERR = 15;
>> +#pragma D binding "1.0" R_ERR
>> +inline int R_RDI = 14;
>> +#pragma D binding "1.0" R_RDI
>> +inline int R_RSI = 13;
>> +#pragma D binding "1.0" R_RSI
>> +inline int R_RDX = 12;
>> +#pragma D binding "1.0" R_RDX
>> +inline int R_RCX = 11;
>> +#pragma D binding "1.0" R_RCX
>> +inline int R_RAX = 10;
>> +#pragma D binding "1.0" R_RAX
>> +inline int R_R8 = 9;
>> +#pragma D binding "1.0" R_R8
>> +inline int R_R9 = 8;
>> +#pragma D binding "1.0" R_R9
>> +inline int R_R10 = 7;
>> +#pragma D binding "1.0" R_R10
>> +inline int R_R11 = 6;
>> +#pragma D binding "1.0" R_R11
>> +inline int R_RBX = 5;
>> +#pragma D binding "1.0" R_RBX
>> +inline int R_RBP = 4;
>> +#pragma D binding "1.0" R_RBP
>> +inline int R_R12 = 3;
>> +#pragma D binding "1.0" R_R12
>> +inline int R_R13 = 2;
>> +#pragma D binding "1.0" R_R13
>> +inline int R_R14 = 1;
>> +#pragma D binding "1.0" R_R14
>> +inline int R_R15 = 0;
>> +#pragma D binding "1.0" R_R15
>> +
>> +inline int R_EBX = R_RBX;
>> +#pragma D binding "1.0" R_EBX
>> +inline int R_ECX = R_RCX;
>> +#pragma D binding "1.0" R_ECX
>> +inline int R_EDX = R_RDX;
>> +#pragma D binding "1.0" R_EDX
>> +inline int R_ESI = R_RSI;
>> +#pragma D binding "1.0" R_ESI
>> +inline int R_EDI = R_RDI;
>> +#pragma D binding "1.0" R_EDI
>> +inline int R_EBP = R_RBP;
>> +#pragma D binding "1.0" R_EBP
>> +inline int R_EAX = R_RAX;
>> +#pragma D binding "1.0" R_EAX
>> +inline int R_EIP = R_RIP;
>> +#pragma D binding "1.0" R_EIP
>> +inline int R_EFL = R_RFL;
>> +#pragma D binding "1.0" R_EFL
>> +inline int R_ESP = R_RSP;
>> +#pragma D binding "1.0" R_ESP
>> +
>> +inline int R_PC = R_EIP;
>> +#pragma D binding "1.0" R_PC
>> +inline int R_FP = R_EBP;
>> +#pragma D binding "1.0" R_FP
>> +inline int R_SP = R_ESP;
>> +#pragma D binding "1.0" R_SP
>> +inline int R_PS = R_EFL;
>> +#pragma D binding "1.0" R_PS
>> +inline int R_R0 = R_EAX;
>> +#pragma D binding "1.0" R_R0
>> +inline int R_R1 = R_EBX;
>> +#pragma D binding "1.0" R_R1
>> diff --git a/dlibs/x86_64/6.10.0/sched.d b/dlibs/x86_64/6.10.0/sched.d
>> new file mode 100644
>> index 0000000000000..271d84e057cde
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/sched.d
>> @@ -0,0 +1,38 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2012, 2019, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +
>> +typedef id_t		processorid_t;
>> +typedef id_t		psetid_t;
>> +typedef id_t		chipid_t;
>> +typedef id_t		lgrp_id_t;
>> +
>> +typedef struct cpuinfo {
>> +	processorid_t	cpu_id;
>> +	psetid_t	cpu_pset;
>> +	chipid_t	cpu_chip;
>> +	lgrp_id_t	cpu_lgrp;
>> +} cpuinfo_t;
>> +
>> +typedef cpuinfo_t	*cpuinfo_t_p;
>> +
>> +inline processorid_t cpu = curcpu->cpu_id;
>> +#pragma D attributes Stable/Stable/Common cpu
>> +#pragma D binding "1.0" cpu
>> +
>> +inline psetid_t pset = curcpu->cpu_pset;
>> +#pragma D attributes Stable/Stable/Common pset
>> +#pragma D binding "1.0" pset
>> +
>> +inline chipid_t chip = curcpu->cpu_chip;
>> +#pragma D attributes Stable/Stable/Common chip
>> +#pragma D binding "1.0" chip
>> +
>> +inline lgrp_id_t lgrp = curcpu->cpu_lgrp;
>> +#pragma D attributes Stable/Stable/Common lgrp
>> +#pragma D binding "1.0" lgrp
>> diff --git a/dlibs/x86_64/6.10.0/signal.d b/dlibs/x86_64/6.10.0/signal.d
>> new file mode 100644
>> index 0000000000000..c72dfd4cbc13f
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/signal.d
>> @@ -0,0 +1,108 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2018, Oracle and/or its affiliates. All rights reserved.
>> + * Use is subject to license terms.
>> + *
>> + */
>> +inline int SIGSYS = 31;
>> +#pragma D binding "1.0" SIGSYS
>> +
>> +inline int SIGTERM = 15;
>> +#pragma D binding "1.0" SIGTERM
>> +
>> +inline int SIGTSTP = 20;
>> +#pragma D binding "1.0" SIGTSTP
>> +
>> +inline int SIGVTALRM = 26;
>> +#pragma D binding "1.0" SIGVTALRM
>> +
>> +inline int SIGBUS = 7;
>> +#pragma D binding "1.0" SIGBUS
>> +
>> +inline int SIGPIPE = 13;
>> +#pragma D binding "1.0" SIGPIPE
>> +
>> +inline int SIGSTKFLT = 16;
>> +#pragma D binding "1.0" SIGSTKFLT
>> +
>> +inline int SIGTRAP = 5;
>> +#pragma D binding "1.0" SIGTRAP
>> +
>> +inline int SIGHUP = 1;
>> +#pragma D binding "1.0" SIGHUP
>> +
>> +inline int SIGFPE = 8;
>> +#pragma D binding "1.0" SIGFPE
>> +
>> +inline int SIGURG = 23;
>> +#pragma D binding "1.0" SIGURG
>> +
>> +inline int SIGIO = 29;
>> +#pragma D binding "1.0" SIGIO
>> +
>> +inline int SIGKILL = 9;
>> +#pragma D binding "1.0" SIGKILL
>> +
>> +inline int SIGWINCH = 28;
>> +#pragma D binding "1.0" SIGWINCH
>> +
>> +inline int SIGXFSZ = 25;
>> +#pragma D binding "1.0" SIGXFSZ
>> +
>> +inline int SIGINT = 2;
>> +#pragma D binding "1.0" SIGINT
>> +
>> +inline int SIGTTOU = 22;
>> +#pragma D binding "1.0" SIGTTOU
>> +
>> +inline int SIGTTIN = 21;
>> +#pragma D binding "1.0" SIGTTIN
>> +
>> +inline int SIGCHLD = 17;
>> +#pragma D binding "1.0" SIGCHLD
>> +
>> +inline int SIGIOT = 6;
>> +#pragma D binding "1.0" SIGIOT
>> +
>> +inline int SIGCONT = 18;
>> +#pragma D binding "1.0" SIGCONT
>> +
>> +inline int SIGQUIT = 3;
>> +#pragma D binding "1.0" SIGQUIT
>> +
>> +inline int SIGABRT = 6;
>> +#pragma D binding "1.0" SIGABRT
>> +
>> +inline int SIGPROF = 27;
>> +#pragma D binding "1.0" SIGPROF
>> +
>> +inline int SIGXCPU = 24;
>> +#pragma D binding "1.0" SIGXCPU
>> +
>> +inline int SIGSTOP = 19;
>> +#pragma D binding "1.0" SIGSTOP
>> +
>> +inline int SIGPWR = 30;
>> +#pragma D binding "1.0" SIGPWR
>> +
>> +inline int SIGILL = 4;
>> +#pragma D binding "1.0" SIGILL
>> +
>> +inline int SIGUSR1 = 10;
>> +#pragma D binding "1.0" SIGUSR1
>> +
>> +inline int SIGPOLL = 29;
>> +#pragma D binding "1.0" SIGPOLL
>> +
>> +inline int SIGCLD = 17;
>> +#pragma D binding "1.0" SIGCLD
>> +
>> +inline int SIGSEGV = 11;
>> +#pragma D binding "1.0" SIGSEGV
>> +
>> +inline int SIGUSR2 = 12;
>> +#pragma D binding "1.0" SIGUSR2
>> +
>> +inline int SIGALRM = 14;
>> +#pragma D binding "1.0" SIGALRM
>> +
>> diff --git a/dlibs/x86_64/6.10.0/tcp.d b/dlibs/x86_64/6.10.0/tcp.d
>> new file mode 100644
>> index 0000000000000..54e310cb4c6ed
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/tcp.d
>> @@ -0,0 +1,231 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library net.d
>> +#pragma D depends_on provider ip
>> +#pragma D depends_on provider tcp
>> +
>> +inline int TH_FIN =	0x01;
>> +inline int TH_SYN =	0x02;
>> +inline int TH_RST =	0x04;
>> +inline int TH_PSH =	0x08;
>> +inline int TH_ACK =	0x10;
>> +inline int TH_URG =	0x20;
>> +inline int TH_ECE =	0x40;
>> +inline int TH_CWR =	0x80;
>> +
>> +inline int TCP_STATE_IDLE = 		0x00;
>> +inline int TCP_STATE_ESTABLISHED =	0x01;
>> +inline int TCP_STATE_SYN_SENT =		0x02;
>> +inline int TCP_STATE_SYN_RECEIVED =	0x03;
>> +inline int TCP_STATE_FIN_WAIT_1 =	0x04;
>> +inline int TCP_STATE_FIN_WAIT_2 =	0x05;
>> +inline int TCP_STATE_TIME_WAIT =	0x06;
>> +inline int TCP_STATE_CLOSED =		0x07;
>> +inline int TCP_STATE_CLOSE_WAIT =	0x08;
>> +inline int TCP_STATE_LAST_ACK =		0x09;
>> +inline int TCP_STATE_LISTEN =		0x0a;
>> +inline int TCP_STATE_CLOSING =		0x0b;
>> +
>> +/*
>> + * Convert a TCP state value to a string.
>> + */
>> +inline string tcp_state_string[int state] =
>> +	state == TCP_STATE_CLOSED ? "state-closed" :
>> +	state == TCP_STATE_IDLE ? "state-idle" :
>> +	state == TCP_STATE_LISTEN ? "state-listen" :
>> +	state == TCP_STATE_SYN_SENT ? "state-syn-sent" :
>> +	state == TCP_STATE_SYN_RECEIVED ? "state-syn-received" :
>> +	state == TCP_STATE_ESTABLISHED ? "state-established" :
>> +	state == TCP_STATE_CLOSE_WAIT ? "state-close-wait" :
>> +	state == TCP_STATE_FIN_WAIT_1 ? "state-fin-wait-1" :
>> +	state == TCP_STATE_CLOSING ? "state-closing" :
>> +	state == TCP_STATE_LAST_ACK ? "state-last-ack" :
>> +	state == TCP_STATE_FIN_WAIT_2 ? "state-fin-wait-2" :
>> +	state == TCP_STATE_TIME_WAIT ? "state-time-wait" :
>> +	"<unknown>";
>> +#pragma D binding "1.6.3" tcp_state_string
>> +
>> +/*
>> + * tcpinfo is the TCP header fields.
>> + */
>> +typedef struct tcpinfo {
>> +	uint16_t tcp_sport;		/* source port */
>> +	uint16_t tcp_dport;		/* destination port */
>> +	uint32_t tcp_seq;		/* sequence number */
>> +	uint32_t tcp_ack;		/* acknowledgment number */
>> +	uint8_t tcp_offset;		/* data offset, in bytes */
>> +	uint8_t tcp_flags;		/* flags */
>> +	uint16_t tcp_window;		/* window size */
>> +	uint16_t tcp_checksum;		/* checksum */
>> +	uint16_t tcp_urgent;		/* urgent data pointer */
>> +	uintptr_t tcp_hdr;		/* raw TCP header */
>> +} tcpinfo_t;
>> +
>> +/*
>> + * tcpsinfo contains stable TCP details from tcp_t.
>> + */
>> +typedef struct tcpsinfo {
>> +	uintptr_t tcps_addr;
>> +	int tcps_local;			/* is delivered locally, boolean */
>> +	uint16_t tcps_lport;		/* local port */
>> +	uint16_t tcps_rport;		/* remote port */
>> +	string tcps_laddr;		/* local address, as a string */
>> +	string tcps_raddr;		/* remote address, as a string */
>> +	int tcps_state;			/* TCP state */
>> +	uint32_t tcps_iss;		/* Initial sequence # sent */
>> +	uint32_t tcps_suna;		/* sequence # sent but unacked */
>> +	uint32_t tcps_snxt;		/* next sequence # to send */
>> +	uint32_t tcps_rnxt;		/* next sequence # expected */
>> +	uint32_t tcps_swnd;		/* send window size */
>> +	int32_t tcps_snd_ws;		/* send window scaling */
>> +	uint32_t tcps_rwnd;		/* receive window size */
>> +	int32_t tcps_rcv_ws;		/* receive window scaling */
>> +	uint32_t tcps_cwnd;		/* congestion window */
>> +	uint32_t tcps_cwnd_ssthresh;	/* threshold for congestion avoidance */
>> +	uint32_t tcps_sack_snxt;	/* next SACK seq # for retransmission */
>> +	uint32_t tcps_rto;		/* round-trip timeout, msec */
>> +	uint32_t tcps_mss;		/* max segment size */
>> +	int tcps_retransmit;		/* retransmit send event, boolean */
>> +	uint32_t tcps_rtt;		/* smoothed avg round-trip time, msec */
>> +	uint32_t tcps_rtt_sd;		/* standard deviation of RTT */
>> +	uint32_t tcps_irs;		/* Initial recv sequence # */
>> +} tcpsinfo_t;
>> +
>> +/*
>> + * tcplsinfo provides the old tcp state for state changes.
>> + */
>> +typedef struct tcplsinfo {
>> +	int tcps_state;		/* previous TCP state */
>> +} tcplsinfo_t;
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator tcpinfo_t < struct tcphdr *T > {
>> +	tcp_sport = T ? ntohs(T->source) : 0;
>> +	tcp_dport = T ? ntohs(T->dest) : 0;
>> +	tcp_seq = T ? ntohl(T->seq) : 0;
>> +	tcp_ack = T ? ntohl(T->ack_seq) : 0;
>> +	tcp_offset = T ? (*(uint8_t *)(T + 12) & 0xf0) >> 2 : 0;
>> +	tcp_flags = T ? *(uint8_t *)(T + 13) : 0;
>> +	tcp_window = T ? ntohs(T->window) : 0;
>> +	tcp_checksum = T ? ntohs(T->check) : 0;
>> +	tcp_urgent = T ? ntohs(T->urg_ptr) : 0;
>> +	tcp_hdr = (uintptr_t)T;
>> +};
>> +
>> +/*
>> + * In the main we simply translate from the "struct [tcp_]sock *" to
>> + * a tcpsinfo_t *.  However there are a few exceptions:
>> + *
>> + * - tcps_state is always derived from arg6.  The reason is that in some
>> + * state transitions sock->sk_state does not reflect the actual TCP
>> + * connection state.  For example the TIME_WAIT state is handled in
>> + * Linux by creating a separate timewait socket and the state of the
>> + * original socket is CLOSED.  In some other cases we also need to
>> + * instrument state transition prior to the update of sk_state.  To do
>> + * all of this we rely on arg6.
>> + * - we sometimes need to retrieve local/remote port/address settings from
>> + * TCP and IP headers directly, for example prior to the address/port
>> + * being committed to the socket.  To do this effectively we need to know
>> + * if the packet data is inbound (in which case the local IP/port are the
>> + * destination) or outbound (in which case the local IP/port are the source).
>> + * arg7 is set to 0 for outbound traffic and 1 for inbound so we use these
>> + * to reconstruct the address/port info where necessary.  arg2 used for IP
>> + * information while arg4 contains the TCP header, so it is used for port data.
>> + * NET_PROBE_INBOUND is defined as 1, NET_PROBE_OUTBOUND as 0 in net.d.
>> + */
>> +#pragma D binding "1.6.3" translator
>> +translator tcpsinfo_t < struct tcp_sock *T > {
>> +	tcps_addr = (uintptr_t)T;
>> +	tcps_local =
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
>> +	    (((struct sock *)T)->__sk_common.skc_rcv_saddr ==
>> +	    ((struct sock *)T)->__sk_common.skc_daddr) :
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
>> +	    (((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[0]
>> +	    ==
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[0] &&
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[1]
>> +            ==
>> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[1] &&
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[2]
>> +            ==
>> +            ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_daddr)[2] &&
>> +	    ((uint32_t *)&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr)[3])
>> +	    : 0;
>> +	tcps_lport = (T && ((struct inet_sock *)T)->inet_sport != 0) ?
>> +	    ntohs(((struct inet_sock *)T)->inet_sport) :
>> +	    (T && ((struct inet_sock *)T)->inet_sport == 0) ?
>> +	    ntohs(((struct sock *)T)->__sk_common.skc_num) :
>> +	    arg4 != NULL ?
>> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
>> +	    ((struct tcphdr *)arg4)->dest : ((struct tcphdr *)arg4)->source) :
>> +	    0;
>> +	tcps_rport = T && ((struct sock *)T)->__sk_common.skc_dport != 0 ?
>> +	    ntohs(((struct sock *)T)->__sk_common.skc_dport) :
>> +	    arg4 != NULL ?
>> +	    ntohs(arg7 == NET_PROBE_INBOUND ?
>> +            ((struct tcphdr *)arg4)->source : ((struct tcphdr *)arg4)->dest) :
>> +	    0;
>> +	tcps_laddr =
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
>> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_rcv_saddr) :
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
>> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_rcv_saddr) :
>> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct iphdr *)arg2)->daddr : &((struct iphdr *)arg2)->saddr) :
>> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct ipv6hdr *)arg2)->daddr :
>> +	    &((struct ipv6hdr *)arg2)->saddr) :
>> +	    "<unknown>";
>> +	tcps_raddr =
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET ?
>> +	    inet_ntoa(&((struct sock *)T)->__sk_common.skc_daddr) :
>> +	    T && ((struct sock *)T)->__sk_common.skc_family == AF_INET6 ?
>> +	    inet_ntoa6(&((struct sock *)T)->__sk_common.skc_v6_daddr) :
>> +	    arg2 != NULL && (*(uint8_t *)arg2) >> 4 == 4 ?
>> +	    inet_ntoa(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct iphdr *)arg2)->saddr : &((struct iphdr *)arg2)->daddr) :
>> +	    arg2 != NULL && *((uint8_t *)arg2) >> 4 == 6 ?
>> +	    inet_ntoa6(arg7 == NET_PROBE_INBOUND ?
>> +	    &((struct ipv6hdr *)arg2)->saddr :
>> +	    &((struct ipv6hdr *)arg2)->daddr) :
>> +	    "<unknown>";
>> +	tcps_state = arg6;
>> +	tcps_iss = T ?
>> +	    T->snd_una - (uint32_t)T->bytes_acked : 0;
>> +	tcps_suna = T ? T->snd_una : 0;
>> +	tcps_snxt = T ? T->snd_nxt : 0;
>> +	tcps_rnxt = T ? T->rcv_nxt : 0;
>> +	tcps_swnd = T ? T->snd_wnd : 0;
>> +	tcps_snd_ws = T ? T->rx_opt.snd_wscale : 0;
>> +	tcps_rwnd = T ? T->rcv_wnd : 0;
>> +	tcps_rcv_ws = T ? T->rx_opt.rcv_wscale : 0;
>> +	tcps_cwnd = T ? T->snd_cwnd : 0;
>> +	tcps_cwnd_ssthresh = T ? T->snd_ssthresh : 0;
>> +	tcps_sack_snxt = (T && T->sacked_out == 0) ? T->snd_una :
>> +	    (T && T->highest_sack == NULL) ? T->snd_nxt :
>> +	    (T && T->highest_sack != NULL) ?
>> +	    ((struct tcp_skb_cb *)&((T->highest_sack->cb[0])))->seq : 0;
>> +	tcps_rto = T ? T->inet_conn.icsk_rto : 0;
>> +	tcps_mss = T ? T->mss_cache : 0;
>> +	tcps_retransmit = T && arg0 ?
>> +	    (((struct tcp_skb_cb *)&(((struct sk_buff *)arg0)->cb[0]))->end_seq
>> +	    < T->snd_nxt - 1) : 0;
>> +	tcps_rtt = T ? (T->srtt_us >> 3)/1000 : 0;
>> +	tcps_rtt_sd = T ? (T->mdev_us >> 2)/1000 : 0;
>> +	tcps_irs = T && T->bytes_received > 0 ?
>> +	    T->rcv_nxt - (uint32_t)T->bytes_received : 0;
>> +};
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator tcplsinfo_t < int I > {
>> +	tcps_state = I;
>> +};
>> diff --git a/dlibs/x86_64/6.10.0/udp.d b/dlibs/x86_64/6.10.0/udp.d
>> new file mode 100644
>> index 0000000000000..0e44ed6480415
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/udp.d
>> @@ -0,0 +1,71 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2010, 2017, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +#pragma D depends_on module vmlinux
>> +#pragma D depends_on library net.d
>> +#pragma D depends_on provider udp
>> +
>> +/*
>> + * udpinfo is the UDP header fields.
>> + */
>> +typedef struct udpinfo {
>> +	uint16_t udp_sport;		/* source port */
>> +	uint16_t udp_dport;		/* destination port */
>> +	uint16_t udp_length;		/* total length */
>> +	uint16_t udp_checksum;          /* headers + data checksum */
>> +	struct udphdr *udp_hdr;		/* raw UDP header */
>> +} udpinfo_t;
>> +
>> +/*
>> + * udpsinfo contains stable UDP details from udp_t.
>> + */
>> +typedef struct udpsinfo {
>> +	uintptr_t udps_addr;
>> +	uint16_t udps_lport;		/* local port */
>> +	uint16_t udps_rport;		/* remote port */
>> +	string udps_laddr;		/* local address, as a string */
>> +	string udps_raddr;		/* remote address, as a string */
>> +} udpsinfo_t;
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator udpinfo_t < struct udphdr *U > {
>> +	udp_sport = ntohs(U->source);
>> +	udp_dport = ntohs(U->dest);
>> +	udp_length = ntohs(U->len);
>> +	udp_checksum = ntohs(U->check);
>> +	udp_hdr = U;
>> +};
>> +
>> +#pragma D binding "1.6.3" translator
>> +translator udpsinfo_t < struct udp_sock *S > {
>> +	/*
>> +	 * We source udp info from other args but retain the sock arg here
>> +	 * as it may be used in the future.
>> +	 */
>> +	udps_addr = (uintptr_t)S;
>> +	udps_lport = arg4 ?
>> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->source) :
>> +	    ntohs(((struct udphdr *)arg4)->dest)) : 0;
>> +	udps_rport = arg4 ?
>> +	    (probename == "send" ? ntohs(((struct udphdr *)arg4)->dest) :
>> +	    ntohs(((struct udphdr *)arg4)->source)) : 0;
>> +	udps_laddr = arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
>> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->saddr :
>> +	    &((struct iphdr *)arg2)->daddr) :
>> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
>> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->saddr :
>> +	    &((struct ipv6hdr *)arg2)->daddr) :
>> +	    "<unknown>";
>> +	udps_raddr =
>> +	    arg2 && *(uint8_t *)arg2 >> 4 == 4 ?
>> +            inet_ntoa(probename == "send" ? &((struct iphdr *)arg2)->daddr :
>> +	    &((struct iphdr *)arg2)->saddr) :
>> +	    arg2 && *(uint8_t *)arg2 >> 4 == 6 ?
>> +	    inet_ntoa6(probename == "send" ? &((struct ipv6hdr *)arg2)->daddr :
>> +	    &((struct ipv6hdr *)arg2)->saddr) :
>> +	    "<unknown>";
>> +};
>> diff --git a/dlibs/x86_64/6.10.0/unistd.d b/dlibs/x86_64/6.10.0/unistd.d
>> new file mode 100644
>> index 0000000000000..c38bbed4bc85e
>> --- /dev/null
>> +++ b/dlibs/x86_64/6.10.0/unistd.d
>> @@ -0,0 +1,36 @@
>> +/*
>> + * Oracle Linux DTrace.
>> + * Copyright (c) 2007, Oracle and/or its affiliates. All rights reserved.
>> + * Licensed under the Universal Permissive License v 1.0 as shown at
>> + * http://oss.oracle.com/licenses/upl.
>> + */
>> +
>> +inline int DTRACEFLT_UNKNOWN = 0;	/* Unknown fault */
>> +#pragma D binding "1.0" DTRACEFLT_UNKNOWN
>> +
>> +inline int DTRACEFLT_BADADDR = 1;	/* Bad address */
>> +#pragma D binding "1.0" DTRACEFLT_BADADDR
>> +
>> +inline int DTRACEFLT_BADALIGN = 2;	/* Bad alignment */
>> +#pragma D binding "1.0" DTRACEFLT_BADALIGN
>> +
>> +inline int DTRACEFLT_ILLOP = 3;		/* Illegal operation */
>> +#pragma D binding "1.0" DTRACEFLT_ILLOP
>> +
>> +inline int DTRACEFLT_DIVZERO = 4;	/* Divide-by-zero */
>> +#pragma D binding "1.0" DTRACEFLT_DIVZERO
>> +
>> +inline int DTRACEFLT_NOSCRATCH = 5;	/* Out of scratch space */
>> +#pragma D binding "1.0" DTRACEFLT_NOSCRATCH
>> +
>> +inline int DTRACEFLT_KPRIV = 6;		/* Illegal kernel access */
>> +#pragma D binding "1.0" DTRACEFLT_KPRIV
>> +
>> +inline int DTRACEFLT_UPRIV = 7;		/* Illegal user access */
>> +#pragma D binding "1.0" DTRACEFLT_UPRIV
>> +
>> +inline int DTRACEFLT_TUPOFLOW = 8;	/* Tuple stack overflow */
>> +#pragma D binding "1.0" DTRACEFLT_TUPOFLOW
>> +
>> +inline int DTRACEFLT_BADSTACK = 9;	/* Bad stack */
>> +#pragma D binding "1.4.1" DTRACEFLT_BADSTACK

^ permalink raw reply	[flat|nested] 11+ messages in thread

* Re: [PATCH v2 1/2] translators: support 6.10
  2024-06-07 18:41 [PATCH v2 1/2] translators: support 6.10 Nick Alcock
  2024-06-07 18:41 ` [PATCH v2 2/2] dlibs: pregenerated translators for 6.10 Nick Alcock
@ 2024-06-19  3:32 ` Kris Van Hees
  2024-06-19 12:41   ` Nick Alcock
  2024-06-19 13:15   ` Nick Alcock
  2024-06-19 13:21 ` [PATCH v3] " Nick Alcock
  2 siblings, 2 replies; 11+ messages in thread
From: Kris Van Hees @ 2024-06-19  3:32 UTC (permalink / raw)
  To: Nick Alcock; +Cc: dtrace, dtrace-devel, kris.van.hees

This patch breaks generation dlibs for kernels < 6.10...  See bwlow.

On Fri, Jun 07, 2024 at 07:41:54PM +0100, Nick Alcock wrote:
> This changed the block device into a component of an atomic
> flags word (so we need to change the .d.in as well to pull in
> the releavnt #define for the blockdev portion of that flags word).
> 
> See kernel commit 1116b9fa15c09748ae05d2365a305fa22671eb1e.
> 
> Signed-off-by: Nick Alcock <nick.alcock@oracle.com>
> ---
>  libdtrace/io.d.in | 6 +++---
>  libdtrace/io.m4   | 5 +++--
>  2 files changed, 6 insertions(+), 5 deletions(-)
> 
> diff --git a/libdtrace/io.d.in b/libdtrace/io.d.in
> index b3da517778264..f44f53f092dce 100644
> --- a/libdtrace/io.d.in
> +++ b/libdtrace/io.d.in
> @@ -1,6 +1,6 @@
>  /*
>   * Oracle Linux DTrace.
> - * Copyright (c) 2012, 2023, Oracle and/or its affiliates. All rights reserved.
> + * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
>   * Licensed under the Universal Permissive License v 1.0 as shown at
>   * http://oss.oracle.com/licenses/upl.
>   */
> @@ -69,7 +69,7 @@ inline int REQ_SYNC = REQ_SYNC_VAL;
>  define_for_kernel([[__bi_rw]], [[(m4_kver(4,8,0), [[bi_opf]])]], [[bi_rw]])
>  define_for_kernel([[__disk]], [[(m4_kver(5,12,0), [[bi_bdev->bd_disk]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev->bd_disk]])
>  define_for_kernel([[__disk_chk]], [[(m4_kver(5,12,0), [[bi_bdev]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev]])
> -define_for_kernel([[__bio_partno]], [[(m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
> +define_for_kernel([[__bio_partno]], [[(m4_kver(6,10,0), [[bi_bdev->__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
>  define_for_kernel([[__bio_part_dev]], [[(m4_kver(5,12,0), [[bi_bdev->bd_dev]]), (m4_kver(5,11,0), [[bi_disk->part_tbl->part[B->bi_partno]->bd_dev]]), (m4_kver(4,14,0), [[bi_disk->part_tbl->part[B->bi_partno]->__dev.devt]])]], [[bi_bdev->bd_part->__dev.devt]])
>  
>  #pragma D binding "1.6.3" translator
> @@ -98,7 +98,7 @@ typedef struct devinfo {
>  } devinfo_t;
>  
>  define_for_kernel([[__bh_bdev_dev]], [[(m4_kver(5,11,0), [[b_bdev->bd_disk->part0->bd_device]])]], [[b_bdev->bd_disk->part0.__dev]])
> -define_for_kernel([[__bdev_partno]], [[(m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
> +define_for_kernel([[__bdev_partno]], [[(m4_kver(6,10,0), [[__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
>  #pragma D binding "1.0" translator
>  translator devinfo_t < struct buffer_head *B > {
>  	dev_major = getmajor(B->b_bdev->bd_dev);
> diff --git a/libdtrace/io.m4 b/libdtrace/io.m4
> index e837ef65b86f7..aa406ec375698 100644
> --- a/libdtrace/io.m4
> +++ b/libdtrace/io.m4
> @@ -1,6 +1,6 @@
>  /*
>   * Oracle Linux DTrace.
> - * Copyright (c) 2005, 2013, Oracle and/or its affiliates. All rights reserved.
> + * Copyright (c) 2005, 2024, Oracle and/or its affiliates. All rights reserved.
>   * Licensed under the Universal Permissive License v 1.0 as shown at
>   * http://oss.oracle.com/licenses/upl.
>   */
> @@ -11,7 +11,7 @@
>   * to replace those tokens with their values to create the finished io.d.
>   */
>  
> -/* #include <linux/buffer_head.h> */
> +#include <linux/blk_types.h>

This causing a dlib generation failure because this include is not sufficient:

In file included from /home/kvanhees/linux-uek/arch/x86/include/asm/pgtable_types.h:380,
                 from /home/kvanhees/linux-uek/arch/x86/include/asm/processor.h:21,
                 from /home/kvanhees/linux-uek/arch/x86/include/asm/cpufeature.h:5,
                 from /home/kvanhees/linux-uek/arch/x86/include/asm/thread_info.h:59,
                 from /home/kvanhees/linux-uek/include/linux/thread_info.h:60,
                 from /home/kvanhees/linux-uek/include/linux/spinlock.h:60,
                 from /home/kvanhees/linux-uek/include/linux/wait.h:9,
                 from /home/kvanhees/linux-uek/include/linux/wait_bit.h:8,
                 from /home/kvanhees/linux-uek/include/linux/fs.h:6,
                 from /home/kvanhees/linux-uek/include/linux/highmem.h:5,
                 from /home/kvanhees/linux-uek/include/linux/bvec.h:10,
                 from /home/kvanhees/linux-uek/include/linux/blk_types.h:10,
                 from libdtrace/io.m4:14:
/home/kvanhees/linux-uek/include/asm-generic/pgtable-nopud.h:18: warning: "PUD_SHIFT" redefined
   18 | #define PUD_SHIFT       P4D_SHIFT

The cause seems to be that you should add an include of linux/kconfig.h prior
to including linux/blk_types.h.  And in all, including linux/buffer_head.h seems
to be safer because blk_types.h says it shouldn't be included explicitly except
to break include loops.

>  #include <sys/file.h>
>  #if 0
>  #ifndef __USE_UNIX98
> @@ -43,4 +43,5 @@ DEF_REPLACE(O_NOFOLLOW)
>  DEF_REPLACE(O_CLOEXEC)
>  DEF_REPLACE(O_DSYNC)
>  DEF_REPLACE(O_RSYNC)
> +DEF_REPLACE(BD_PARTNO)

Thus reports an error when BD_PARTNO is not defined (and that is the case for
kernels < 6.10).  Wrapping this in #ifdef BD_PARTNO // #endif might be enough
to fix that.

>  #include "io.platform.m4"
> 
> base-commit: 454c6d47bf408415f7eb52ea701779f041aa6957
> -- 
> 2.45.1.275.g567cb0950c

^ permalink raw reply	[flat|nested] 11+ messages in thread

* Re: [PATCH v2 1/2] translators: support 6.10
  2024-06-19  3:32 ` [PATCH v2 1/2] translators: support 6.10 Kris Van Hees
@ 2024-06-19 12:41   ` Nick Alcock
  2024-06-19 13:15   ` Nick Alcock
  1 sibling, 0 replies; 11+ messages in thread
From: Nick Alcock @ 2024-06-19 12:41 UTC (permalink / raw)
  To: Kris Van Hees; +Cc: Nick Alcock, dtrace, dtrace-devel

On 19 Jun 2024, Kris Van Hees verbalised:

> This patch breaks generation dlibs for kernels < 6.10...  See bwlow.

Dammit, I tested this! But clearly I messed up the testing :(

> On Fri, Jun 07, 2024 at 07:41:54PM +0100, Nick Alcock wrote:
>> diff --git a/libdtrace/io.m4 b/libdtrace/io.m4
>> index e837ef65b86f7..aa406ec375698 100644
>> --- a/libdtrace/io.m4
>> +++ b/libdtrace/io.m4
>> @@ -1,6 +1,6 @@
>>  /*
>>   * Oracle Linux DTrace.
>> - * Copyright (c) 2005, 2013, Oracle and/or its affiliates. All rights reserved.
>> + * Copyright (c) 2005, 2024, Oracle and/or its affiliates. All rights reserved.
>>   * Licensed under the Universal Permissive License v 1.0 as shown at
>>   * http://oss.oracle.com/licenses/upl.
>>   */
>> @@ -11,7 +11,7 @@
>>   * to replace those tokens with their values to create the finished io.d.
>>   */
>>  
>> -/* #include <linux/buffer_head.h> */
>> +#include <linux/blk_types.h>
>
> This causing a dlib generation failure because this include is not sufficient:

Oh curses.

> The cause seems to be that you should add an include of linux/kconfig.h prior
> to including linux/blk_types.h.  And in all, including linux/buffer_head.h seems
> to be safer because blk_types.h says it shouldn't be included explicitly except
> to break include loops.

The real problem is that the set of valid includes can vary on a
kernel-by-kernel basis... but for now, I guess that'll work.

>>  #include <sys/file.h>
>>  #if 0
>>  #ifndef __USE_UNIX98
>> @@ -43,4 +43,5 @@ DEF_REPLACE(O_NOFOLLOW)
>>  DEF_REPLACE(O_CLOEXEC)
>>  DEF_REPLACE(O_DSYNC)
>>  DEF_REPLACE(O_RSYNC)
>> +DEF_REPLACE(BD_PARTNO)
>
> Thus reports an error when BD_PARTNO is not defined (and that is the case for
> kernels < 6.10).  Wrapping this in #ifdef BD_PARTNO // #endif might be enough
> to fix that.

Yeah, that's, uh, obvious, isn't it! I thought of that, he lies.

Fixing.

(And of course this is arch-specific. Does this mean that every
translation addition requires re-verification of translator generation
on every supported kernel, on every supported arch? Because that's an
incredible drag, particularly given that we have to do it under time
pressure.)

-- 
NULL && (void)

^ permalink raw reply	[flat|nested] 11+ messages in thread

* Re: [PATCH v2 1/2] translators: support 6.10
  2024-06-19  3:32 ` [PATCH v2 1/2] translators: support 6.10 Kris Van Hees
  2024-06-19 12:41   ` Nick Alcock
@ 2024-06-19 13:15   ` Nick Alcock
  2024-06-20 17:54     ` Kris Van Hees
  1 sibling, 1 reply; 11+ messages in thread
From: Nick Alcock @ 2024-06-19 13:15 UTC (permalink / raw)
  To: Kris Van Hees; +Cc: Nick Alcock, dtrace, dtrace-devel

On 19 Jun 2024, Kris Van Hees stated:

>> -/* #include <linux/buffer_head.h> */
>> +#include <linux/blk_types.h>
>
> This causing a dlib generation failure because this include is not sufficient:
>
> In file included from /home/kvanhees/linux-uek/arch/x86/include/asm/pgtable_types.h:380,
>                  from /home/kvanhees/linux-uek/arch/x86/include/asm/processor.h:21,
>                  from /home/kvanhees/linux-uek/arch/x86/include/asm/cpufeature.h:5,
>                  from /home/kvanhees/linux-uek/arch/x86/include/asm/thread_info.h:59,
>                  from /home/kvanhees/linux-uek/include/linux/thread_info.h:60,
>                  from /home/kvanhees/linux-uek/include/linux/spinlock.h:60,
>                  from /home/kvanhees/linux-uek/include/linux/wait.h:9,
>                  from /home/kvanhees/linux-uek/include/linux/wait_bit.h:8,
>                  from /home/kvanhees/linux-uek/include/linux/fs.h:6,
>                  from /home/kvanhees/linux-uek/include/linux/highmem.h:5,
>                  from /home/kvanhees/linux-uek/include/linux/bvec.h:10,
>                  from /home/kvanhees/linux-uek/include/linux/blk_types.h:10,
>                  from libdtrace/io.m4:14:
> /home/kvanhees/linux-uek/include/asm-generic/pgtable-nopud.h:18: warning: "PUD_SHIFT" redefined
>    18 | #define PUD_SHIFT       P4D_SHIFT

Not observed on 5.4.17, nor on 5.15.0. What kernel is this with?

> The cause seems to be that you should add an include of linux/kconfig.h prior
> to including linux/blk_types.h.  And in all, including linux/buffer_head.h seems
> to be safer because blk_types.h says it shouldn't be included explicitly except
> to break include loops.

Oops, I didn't look at the header comment because it's usually just a
copyright message :)

It works, but at first sight it's not obvious how linux/buffer_head.h
defines BD_PARTNO: I guess it's doing it transitively via some tangle of
other headers. I guess it's always going to include blk_types.h
*somehow*, so I suppose it's safe.

-- 
NULL && (void)

^ permalink raw reply	[flat|nested] 11+ messages in thread

* [PATCH v3] translators: support 6.10
  2024-06-07 18:41 [PATCH v2 1/2] translators: support 6.10 Nick Alcock
  2024-06-07 18:41 ` [PATCH v2 2/2] dlibs: pregenerated translators for 6.10 Nick Alcock
  2024-06-19  3:32 ` [PATCH v2 1/2] translators: support 6.10 Kris Van Hees
@ 2024-06-19 13:21 ` Nick Alcock
  2024-06-20 17:55   ` Kris Van Hees
  2 siblings, 1 reply; 11+ messages in thread
From: Nick Alcock @ 2024-06-19 13:21 UTC (permalink / raw)
  To: dtrace, dtrace-devel; +Cc: kris.van.hees

This changed the block device into a component of an atomic
flags word (so we need to change the .d.in as well to pull in
the relevant #define for the blockdev portion of that flags word).

See kernel commit 1116b9fa15c09748ae05d2365a305fa22671eb1e.

Signed-off-by: Nick Alcock <nick.alcock@oracle.com>
---
 libdtrace/io.d.in | 6 +++---
 libdtrace/io.m4   | 8 ++++++--
 2 files changed, 9 insertions(+), 5 deletions(-)

diff --git a/libdtrace/io.d.in b/libdtrace/io.d.in
index b3da517778264..f44f53f092dce 100644
--- a/libdtrace/io.d.in
+++ b/libdtrace/io.d.in
@@ -1,6 +1,6 @@
 /*
  * Oracle Linux DTrace.
- * Copyright (c) 2012, 2023, Oracle and/or its affiliates. All rights reserved.
+ * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
  * Licensed under the Universal Permissive License v 1.0 as shown at
  * http://oss.oracle.com/licenses/upl.
  */
@@ -69,7 +69,7 @@ inline int REQ_SYNC = REQ_SYNC_VAL;
 define_for_kernel([[__bi_rw]], [[(m4_kver(4,8,0), [[bi_opf]])]], [[bi_rw]])
 define_for_kernel([[__disk]], [[(m4_kver(5,12,0), [[bi_bdev->bd_disk]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev->bd_disk]])
 define_for_kernel([[__disk_chk]], [[(m4_kver(5,12,0), [[bi_bdev]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev]])
-define_for_kernel([[__bio_partno]], [[(m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
+define_for_kernel([[__bio_partno]], [[(m4_kver(6,10,0), [[bi_bdev->__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
 define_for_kernel([[__bio_part_dev]], [[(m4_kver(5,12,0), [[bi_bdev->bd_dev]]), (m4_kver(5,11,0), [[bi_disk->part_tbl->part[B->bi_partno]->bd_dev]]), (m4_kver(4,14,0), [[bi_disk->part_tbl->part[B->bi_partno]->__dev.devt]])]], [[bi_bdev->bd_part->__dev.devt]])
 
 #pragma D binding "1.6.3" translator
@@ -98,7 +98,7 @@ typedef struct devinfo {
 } devinfo_t;
 
 define_for_kernel([[__bh_bdev_dev]], [[(m4_kver(5,11,0), [[b_bdev->bd_disk->part0->bd_device]])]], [[b_bdev->bd_disk->part0.__dev]])
-define_for_kernel([[__bdev_partno]], [[(m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
+define_for_kernel([[__bdev_partno]], [[(m4_kver(6,10,0), [[__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
 #pragma D binding "1.0" translator
 translator devinfo_t < struct buffer_head *B > {
 	dev_major = getmajor(B->b_bdev->bd_dev);
diff --git a/libdtrace/io.m4 b/libdtrace/io.m4
index e837ef65b86f7..d57225c911059 100644
--- a/libdtrace/io.m4
+++ b/libdtrace/io.m4
@@ -1,6 +1,6 @@
 /*
  * Oracle Linux DTrace.
- * Copyright (c) 2005, 2013, Oracle and/or its affiliates. All rights reserved.
+ * Copyright (c) 2005, 2024, Oracle and/or its affiliates. All rights reserved.
  * Licensed under the Universal Permissive License v 1.0 as shown at
  * http://oss.oracle.com/licenses/upl.
  */
@@ -11,7 +11,8 @@
  * to replace those tokens with their values to create the finished io.d.
  */
 
-/* #include <linux/buffer_head.h> */
+#include <linux/kconfig.h>
+#include <linux/buffer_head.h>
 #include <sys/file.h>
 #if 0
 #ifndef __USE_UNIX98
@@ -43,4 +44,7 @@ DEF_REPLACE(O_NOFOLLOW)
 DEF_REPLACE(O_CLOEXEC)
 DEF_REPLACE(O_DSYNC)
 DEF_REPLACE(O_RSYNC)
+#ifdef BD_PARTNO
+DEF_REPLACE(BD_PARTNO)
+#endif
 #include "io.platform.m4"

base-commit: 454c6d47bf408415f7eb52ea701779f041aa6957
-- 
2.45.1.275.g567cb0950c


^ permalink raw reply related	[flat|nested] 11+ messages in thread

* Re: [DTrace-devel] [PATCH v2 2/2] dlibs: pregenerated translators for 6.10
  2024-06-14 12:25     ` Alan Maguire
@ 2024-06-19 13:23       ` Nick Alcock
  0 siblings, 0 replies; 11+ messages in thread
From: Nick Alcock @ 2024-06-19 13:23 UTC (permalink / raw)
  To: Alan Maguire; +Cc: Nick Alcock, dtrace, dtrace-devel

On 14 Jun 2024, Alan Maguire spake thusly:

> On 13/06/2024 13:22, Alan Maguire wrote:
>> On 07/06/2024 19:41, Nick Alcock via DTrace-devel wrote:
>>> All differences from the previous translators (6.1) are no-effect
>>> ordering changes other than those one would expect from the changes to
>>> the .d files.
>>>
>>> Signed-off-by: Nick Alcock <nick.alcock@oracle.com>
>> 
>> 
>> I hit the issue with the disappearing bd_partno field in io.d on 6.10 so
>> this is great!
>> 
>> nit: I guess defining
>> 
>> inline int dev_partno[struct block_device *B] = B->__bd_flags.counter &
>> 0xff;
>> 
>> ...might reduce complexity of some of the statements in io.d
>>
>
> sorry, ignore this I missed the handling in patch 1..

Yeah this is all generated code -- and the advantage of doing this in M4
is that it means we can do things like this even where variables aren't
allowed, because the D parser never knows.

Downside: it means dealing with M4, which is a deeply lovely language
which we should be using for everything right about the time we rewrite
the Linux kernel in Befunge.

^ permalink raw reply	[flat|nested] 11+ messages in thread

* Re: [PATCH v2 1/2] translators: support 6.10
  2024-06-19 13:15   ` Nick Alcock
@ 2024-06-20 17:54     ` Kris Van Hees
  0 siblings, 0 replies; 11+ messages in thread
From: Kris Van Hees @ 2024-06-20 17:54 UTC (permalink / raw)
  To: Nick Alcock; +Cc: Kris Van Hees, dtrace, dtrace-devel

On Wed, Jun 19, 2024 at 02:15:21PM +0100, Nick Alcock wrote:
> On 19 Jun 2024, Kris Van Hees stated:
> 
> >> -/* #include <linux/buffer_head.h> */
> >> +#include <linux/blk_types.h>
> >
> > This causing a dlib generation failure because this include is not sufficient:
> >
> > In file included from /home/kvanhees/linux-uek/arch/x86/include/asm/pgtable_types.h:380,
> >                  from /home/kvanhees/linux-uek/arch/x86/include/asm/processor.h:21,
> >                  from /home/kvanhees/linux-uek/arch/x86/include/asm/cpufeature.h:5,
> >                  from /home/kvanhees/linux-uek/arch/x86/include/asm/thread_info.h:59,
> >                  from /home/kvanhees/linux-uek/include/linux/thread_info.h:60,
> >                  from /home/kvanhees/linux-uek/include/linux/spinlock.h:60,
> >                  from /home/kvanhees/linux-uek/include/linux/wait.h:9,
> >                  from /home/kvanhees/linux-uek/include/linux/wait_bit.h:8,
> >                  from /home/kvanhees/linux-uek/include/linux/fs.h:6,
> >                  from /home/kvanhees/linux-uek/include/linux/highmem.h:5,
> >                  from /home/kvanhees/linux-uek/include/linux/bvec.h:10,
> >                  from /home/kvanhees/linux-uek/include/linux/blk_types.h:10,
> >                  from libdtrace/io.m4:14:
> > /home/kvanhees/linux-uek/include/asm-generic/pgtable-nopud.h:18: warning: "PUD_SHIFT" redefined
> >    18 | #define PUD_SHIFT       P4D_SHIFT
> 
> Not observed on 5.4.17, nor on 5.15.0. What kernel is this with?

Upstream 6.9.3 and 6.9.5

> > The cause seems to be that you should add an include of linux/kconfig.h prior
> > to including linux/blk_types.h.  And in all, including linux/buffer_head.h seems
> > to be safer because blk_types.h says it shouldn't be included explicitly except
> > to break include loops.
> 
> Oops, I didn't look at the header comment because it's usually just a
> copyright message :)
> 
> It works, but at first sight it's not obvious how linux/buffer_head.h
> defines BD_PARTNO: I guess it's doing it transitively via some tangle of
> other headers. I guess it's always going to include blk_types.h
> *somehow*, so I suppose it's safe.
> 
> -- 
> NULL && (void)

^ permalink raw reply	[flat|nested] 11+ messages in thread

* Re: [PATCH v3] translators: support 6.10
  2024-06-19 13:21 ` [PATCH v3] " Nick Alcock
@ 2024-06-20 17:55   ` Kris Van Hees
  0 siblings, 0 replies; 11+ messages in thread
From: Kris Van Hees @ 2024-06-20 17:55 UTC (permalink / raw)
  To: Nick Alcock; +Cc: dtrace, dtrace-devel, kris.van.hees

On Wed, Jun 19, 2024 at 02:21:09PM +0100, Nick Alcock wrote:
> This changed the block device into a component of an atomic
> flags word (so we need to change the .d.in as well to pull in
> the relevant #define for the blockdev portion of that flags word).
> 
> See kernel commit 1116b9fa15c09748ae05d2365a305fa22671eb1e.
> 
> Signed-off-by: Nick Alcock <nick.alcock@oracle.com>

Reviewed-by: Kris Van Hees <kris.van.hees@oracle.com>

> ---
>  libdtrace/io.d.in | 6 +++---
>  libdtrace/io.m4   | 8 ++++++--
>  2 files changed, 9 insertions(+), 5 deletions(-)
> 
> diff --git a/libdtrace/io.d.in b/libdtrace/io.d.in
> index b3da517778264..f44f53f092dce 100644
> --- a/libdtrace/io.d.in
> +++ b/libdtrace/io.d.in
> @@ -1,6 +1,6 @@
>  /*
>   * Oracle Linux DTrace.
> - * Copyright (c) 2012, 2023, Oracle and/or its affiliates. All rights reserved.
> + * Copyright (c) 2012, 2024, Oracle and/or its affiliates. All rights reserved.
>   * Licensed under the Universal Permissive License v 1.0 as shown at
>   * http://oss.oracle.com/licenses/upl.
>   */
> @@ -69,7 +69,7 @@ inline int REQ_SYNC = REQ_SYNC_VAL;
>  define_for_kernel([[__bi_rw]], [[(m4_kver(4,8,0), [[bi_opf]])]], [[bi_rw]])
>  define_for_kernel([[__disk]], [[(m4_kver(5,12,0), [[bi_bdev->bd_disk]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev->bd_disk]])
>  define_for_kernel([[__disk_chk]], [[(m4_kver(5,12,0), [[bi_bdev]]), (m4_kver(4,14,0), [[bi_disk]])]], [[bi_bdev]])
> -define_for_kernel([[__bio_partno]], [[(m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
> +define_for_kernel([[__bio_partno]], [[(m4_kver(6,10,0), [[bi_bdev->__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,12,0), [[bi_bdev->bd_partno]]), (m4_kver(4,14,0), [[bi_partno]])]], [[bi_bdev->bd_part->partno]])
>  define_for_kernel([[__bio_part_dev]], [[(m4_kver(5,12,0), [[bi_bdev->bd_dev]]), (m4_kver(5,11,0), [[bi_disk->part_tbl->part[B->bi_partno]->bd_dev]]), (m4_kver(4,14,0), [[bi_disk->part_tbl->part[B->bi_partno]->__dev.devt]])]], [[bi_bdev->bd_part->__dev.devt]])
>  
>  #pragma D binding "1.6.3" translator
> @@ -98,7 +98,7 @@ typedef struct devinfo {
>  } devinfo_t;
>  
>  define_for_kernel([[__bh_bdev_dev]], [[(m4_kver(5,11,0), [[b_bdev->bd_disk->part0->bd_device]])]], [[b_bdev->bd_disk->part0.__dev]])
> -define_for_kernel([[__bdev_partno]], [[(m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
> +define_for_kernel([[__bdev_partno]], [[(m4_kver(6,10,0), [[__bd_flags.counter & BD_PARTNO]]), (m4_kver(5,11,0), [[bd_partno]])]], [[bd_part->partno]])
>  #pragma D binding "1.0" translator
>  translator devinfo_t < struct buffer_head *B > {
>  	dev_major = getmajor(B->b_bdev->bd_dev);
> diff --git a/libdtrace/io.m4 b/libdtrace/io.m4
> index e837ef65b86f7..d57225c911059 100644
> --- a/libdtrace/io.m4
> +++ b/libdtrace/io.m4
> @@ -1,6 +1,6 @@
>  /*
>   * Oracle Linux DTrace.
> - * Copyright (c) 2005, 2013, Oracle and/or its affiliates. All rights reserved.
> + * Copyright (c) 2005, 2024, Oracle and/or its affiliates. All rights reserved.
>   * Licensed under the Universal Permissive License v 1.0 as shown at
>   * http://oss.oracle.com/licenses/upl.
>   */
> @@ -11,7 +11,8 @@
>   * to replace those tokens with their values to create the finished io.d.
>   */
>  
> -/* #include <linux/buffer_head.h> */
> +#include <linux/kconfig.h>
> +#include <linux/buffer_head.h>
>  #include <sys/file.h>
>  #if 0
>  #ifndef __USE_UNIX98
> @@ -43,4 +44,7 @@ DEF_REPLACE(O_NOFOLLOW)
>  DEF_REPLACE(O_CLOEXEC)
>  DEF_REPLACE(O_DSYNC)
>  DEF_REPLACE(O_RSYNC)
> +#ifdef BD_PARTNO
> +DEF_REPLACE(BD_PARTNO)
> +#endif
>  #include "io.platform.m4"
> 
> base-commit: 454c6d47bf408415f7eb52ea701779f041aa6957
> -- 
> 2.45.1.275.g567cb0950c

^ permalink raw reply	[flat|nested] 11+ messages in thread

end of thread, other threads:[~2024-06-20 17:55 UTC | newest]

Thread overview: 11+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2024-06-07 18:41 [PATCH v2 1/2] translators: support 6.10 Nick Alcock
2024-06-07 18:41 ` [PATCH v2 2/2] dlibs: pregenerated translators for 6.10 Nick Alcock
2024-06-13 12:22   ` [DTrace-devel] " Alan Maguire
2024-06-14 12:25     ` Alan Maguire
2024-06-19 13:23       ` Nick Alcock
2024-06-19  3:32 ` [PATCH v2 1/2] translators: support 6.10 Kris Van Hees
2024-06-19 12:41   ` Nick Alcock
2024-06-19 13:15   ` Nick Alcock
2024-06-20 17:54     ` Kris Van Hees
2024-06-19 13:21 ` [PATCH v3] " Nick Alcock
2024-06-20 17:55   ` Kris Van Hees

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox