Page MenuHomeFreeBSD
Files F142270280

D44041.diff
No OneTemporary
Actions

D44041.diff
View Options

diff --git a/tools/lldb/netinet.lua b/tools/lldb/netinet.lua
new file mode 100644
--- /dev/null
+++ b/tools/lldb/netinet.lua
@@ -0,0 +1,103 @@
+--
+-- SPDX-License-Identifier: BSD-2-Clause
+--
+-- Copyright (c) 2024 The FreeBSD Foundation
+--
+-- This software was developed by Tom Jones <thj@freebsd.org> under
+-- sponsorship from the FreeBSD Foundation.
+--
+
+local netinet = {}
+
+--
+-- Accessing vnet members takes the form:
+-- (struct inpcbinfo*)((((struct vnet *) vnet0 )->vnet_data_base) +
+-- (uintptr_t )&vnet_entry_tcbinfo)
+-- While we could feed this directly to EvaluateExpression (as we do with gdb),
+-- but lldb offers us a better form for constructing the final value.
+--
+-- We are expecting the full vnet member name, i.e. vnet_entry_tcbinfo
+-- and an output type, i.e. struct pcbinfo *
+--
+function netinet.vnet_get_member(self, vnet, value)
+ local db = vnet:GetChildMemberWithName("vnet_data_base")
+ local v = lldb.target:FindFirstGlobalVariable(value)
+ :AddressOf()
+ return db:GetValueAsUnsigned() + v:GetValueAsUnsigned()
+end
+
+function netinet.vnet_get_member_and_cast(self, vnet, value, outtype)
+ local db = vnet:GetChildMemberWithName("vnet_data_base")
+ local mb = lldb.target:FindFirstGlobalVariable(value)
+ :AddressOf()
+ local addr = db:GetValueAsUnsigned() + mb:GetValueAsUnsigned()
+
+ return lldb.frame:EvaluateExpression("(" .. outtype .. ") " .. addr)
+end
+
+--
+-- Take a V_xxx member and look it up in curvnet, i.e. go from V_tcpinfo to
+-- vnet_entry_tcbinfo then get it from the current vnet.
+function netinet.vnet_get_V_value(self, value, vnet)
+ -- if value starts with V_ it is virtualised
+ local basevar = value:match("V_(.+)")
+ if not basevar then
+ print("vnet_get_V_value: Requires a value name starting with V_, given: " .. value)
+ return nil
+ end
+
+ local vimage = lldb.target:
+ FindFirstGlobalVariable("sysctl___kern_features_vimage") ~= nil
+
+ if not vimage then
+ return lldb.target:FindFirstGlobalVariable(value)
+ end
+
+ if vnet == nil then
+ print("vnet_get_V_value: vnet is nil and this is a vimage kernel")
+ return nil
+ end
+
+ value = "vnet_entry_" .. value
+ return netinet:vnet_get_member(vnet, value)
+end
+
+function netinet.vnet_iter(self)
+ local vnet = nil
+ return function ()
+ if vnet == nil then
+ vnet = lldb.target:FindFirstGlobalVariable("vnet0")
+ return vnet
+ else
+ vnet = vnet:GetChildMemberWithName("vnet_le")
+ :GetChildMemberWithName("le_next")
+
+ if vnet:GetValueAsUnsigned() == 0x0 then
+ return nil
+ else
+ return vnet
+ end
+ end
+ end
+end
+
+function netinet.inpcb_iter(self, inpcbinfo)
+ local inp = nil
+ return function ()
+ if inp == nil then
+ inp = inpcbinfo:GetChildMemberWithName("ipi_listhead")
+ :GetChildMemberWithName("clh_first")
+ return inp
+ else
+ inp = inp :GetChildMemberWithName("inp_list")
+ :GetChildMemberWithName("cle_next")
+ if inp:GetValueAsUnsigned() == 0x0 then
+ return nil
+ else
+ return inp
+ end
+ end
+ end
+end
+
+return netinet

File Metadata

Mime Type
text/plain
Expires
Mon, Jan 19, 12:33 AM (6 h, 54 m)
Storage Engine
blob
Storage Format
Raw Data
Storage Handle
27724828
Default Alt Text
D44041.diff (3 KB)

Event Timeline