strace with backtrace thanks to gdb

gdb-strace.sh

#!/bin/sh
cmd=$1
shift

# FIXME: it would be good for every argument to be wrapped in quotes
echo run $@ | gdb "$cmd" -x strace.gdb &> gdb-strace-log

strace.gdb

set pagination off
set $clone_flags = -1


# clone

# call - determine if it's a thread
catch syscall clone
commands
bt
set $clone_flags = $rdi
c
end
condition $bpnum ($rax == -38)

# return - run gdb for pid
catch syscall clone
commands
eval "shell echo c | gdb -p %d -x strace.gdb &> gdb-strace-log.%d &", $rax, $rax
c
end
# CLONE_THREAD 0x10000
condition $bpnum ($rax != -38) && !($clone_flags & 0x10000)


# fork

catch syscall fork
commands
eval "shell echo c | gdb -p %d -x strace.gdb &> gdb-strace-log.%d &", $rax, $rax
c
end
condition $bpnum $rax != -38


# all the rest

catch syscall
commands
bt
continue
end
condition $bpnum $rax == -38