xref: /xnu-12377.41.6/tools/trace/ktruss.lua (revision bbb1b6f9e71b8cdde6e5cd6f4841f207dee3d828)
1*bbb1b6f9SApple OSS Distributions#!/usr/local/bin/recon
2*bbb1b6f9SApple OSS Distributions
3*bbb1b6f9SApple OSS Distributionslocal ktrace = require 'ktrace'
4*bbb1b6f9SApple OSS Distributions
5*bbb1b6f9SApple OSS Distributionsif not arg[1] or arg[1] == '-h' then
6*bbb1b6f9SApple OSS Distributions  print[[
7*bbb1b6f9SApple OSS Distributionsusage: ktruss <syscall-name> [<more-names> ...]
8*bbb1b6f9SApple OSS Distributions
9*bbb1b6f9SApple OSS DistributionsUse Kernel TRace to print User Space Syscalls (ktruss).]]
10*bbb1b6f9SApple OSS Distributions  os.exit(arg[1] == nil)
11*bbb1b6f9SApple OSS Distributionsend
12*bbb1b6f9SApple OSS Distributions
13*bbb1b6f9SApple OSS Distributionslocal sess = ktrace.Session.new()
14*bbb1b6f9SApple OSS Distributions
15*bbb1b6f9SApple OSS Distributionsfor i = 1, #arg do
16*bbb1b6f9SApple OSS Distributions  sess:add_callback_pair('BSC_' .. arg[i], function (start, finish)
17*bbb1b6f9SApple OSS Distributions    print(('%s[%d]: %s(0x%x, 0x%x, 0x%x, 0x%x) -> %d'):format(
18*bbb1b6f9SApple OSS Distributions        sess:procname_for_threadid(start.threadid),
19*bbb1b6f9SApple OSS Distributions        sess:pid_for_threadid(start.threadid), arg[1], start[1], start[2],
20*bbb1b6f9SApple OSS Distributions        start[3], start[4], finish[2]))
21*bbb1b6f9SApple OSS Distributions  end)
22*bbb1b6f9SApple OSS Distributionsend
23*bbb1b6f9SApple OSS Distributions
24*bbb1b6f9SApple OSS Distributionslocal ok, err = sess:start()
25*bbb1b6f9SApple OSS Distributionsif not ok then
26*bbb1b6f9SApple OSS Distributions  io.stderr:write('tracing failed: ', err, '\n')
27*bbb1b6f9SApple OSS Distributions  os.exit(1)
28*bbb1b6f9SApple OSS Distributionsend
29