mirror of
https://sourceware.org/git/binutils-gdb.git
synced 2024-12-27 04:52:05 +08:00
4a94e36819
This commit brings all the changes made by running gdb/copyright.py as per GDB's Start of New Year Procedure. For the avoidance of doubt, all changes in this commits were performed by the script.
74 lines
2.9 KiB
Plaintext
74 lines
2.9 KiB
Plaintext
# Copyright 2014-2022 Free Software Foundation, Inc.
|
|
#
|
|
# This program is free software; you can redistribute it and/or modify
|
|
# it under the terms of the GNU General Public License as published by
|
|
# the Free Software Foundation; either version 3 of the License, or
|
|
# (at your option) any later version.
|
|
#
|
|
# This program is distributed in the hope that it will be useful,
|
|
# but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
# GNU General Public License for more details.
|
|
#
|
|
# You should have received a copy of the GNU General Public License
|
|
# along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
# Generate a test program containing DTrace USDT probes, whose sources
|
|
# are ${srcfile} and ${testfile}.d. The sequence of commands used to
|
|
# generate the test program is:
|
|
#
|
|
# 1. Generate a header file from ${testfile}.d using dtrace -h.
|
|
# 2. Compile ${srcfile}.c.
|
|
# 3. Generate an object file containing a DOF program using dtrace -G.
|
|
# 4. Link everything together to get the test program.
|
|
#
|
|
# Note that if DTrace is not found in the host system then this
|
|
# function uses the pdtrace implementation, which is located at
|
|
# testsuite/lib/pdtrace.
|
|
#
|
|
# This function requires 'testfile', 'srcfile' and 'binfile' to be
|
|
# properly set.
|
|
#
|
|
# This function returns -1 on failure, 0 otherwise
|
|
proc dtrace_build_usdt_test_program {} {
|
|
global testfile hex objdir srcdir srcfile subdir binfile
|
|
|
|
# Make sure that dtrace is installed, it is the real one (not the
|
|
# script installed by SystemTap, for example) and of the right
|
|
# version (>= 0.4.0). If it is not then use pdtrace instead.
|
|
set dtrace "dtrace"
|
|
set result [remote_exec host "$dtrace -V"]
|
|
if {[lindex $result 0] != 0 || ![regexp {^dtrace: Sun D [0-9]\.[0-9]\.[0-9]} [lindex $result 1]]} {
|
|
set dtrace "${objdir}/lib/pdtrace"
|
|
}
|
|
set dscript_file "${srcdir}/${subdir}/${testfile}.d"
|
|
|
|
# 1. Generate a header file from testprogram.d using dtrace -h.
|
|
set out_header_file [standard_output_file "${testfile}.h"]
|
|
set result [remote_exec host "$dtrace -h -s $dscript_file -o $out_header_file"]
|
|
verbose -log [lindex $result 1]
|
|
if {[lindex $result 0] != 0} {
|
|
return -1
|
|
}
|
|
|
|
# 2. Compile testprogram.c.
|
|
set options [list debug quiet \
|
|
additional_flags=-I[file dirname $out_header_file]]
|
|
if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}.o" object ${options}] != ""} {
|
|
return -1
|
|
}
|
|
|
|
# 3. Generate an object file containing a DOF program using dtrace -G.
|
|
set result [remote_exec host "$dtrace -G -s $dscript_file -o ${binfile}-p.o ${binfile}.o"]
|
|
verbose -log [lindex $result 1]
|
|
if {[lindex $result 0] != 0} {
|
|
return -1
|
|
}
|
|
|
|
# 4. Link everything together to get the test program.
|
|
if {[gdb_compile "${binfile}.o ${binfile}-p.o" ${binfile} executable \
|
|
{debug quiet}] != ""} {
|
|
return -1
|
|
}
|
|
}
|