1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
|
#!/bin/bash -
# libguestfs 'run' programs locally script
# Copyright (C) 2011-2023 Red Hat Inc.
#
# @configure_input@
#
# This library is free software; you can redistribute it and/or
# modify it under the terms of the GNU Lesser General Public
# License as published by the Free Software Foundation; either
# version 2 of the License, or (at your option) any later version.
#
# This library 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
# Lesser General Public License for more details.
#
# You should have received a copy of the GNU Lesser General Public
# License along with this library; if not, write to the Free Software
# Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
#----------------------------------------------------------------------
# With this script you can run all the virt tools without needing to
# install them first. You just have to do for example:
#
# ./run virt-inspector [args ...]
#
# This works for any C program, virt tools, and most non-C bindings
# and programs in the libguestfs distribution.
#
# For lots more ways to use this script, see the libguestfs
# guestfs-building(1) man page.
#
# The script should also be used for tests like this:
#
# TESTS_ENVIRONMENT = ... $(top_builddir)/run --test
#
# The --test parameter introduces a timeout, stopping tests from
# running forever.
#----------------------------------------------------------------------
if [ "$1" = "--test" ]; then
timeout_mode=1
shift
fi
# Function to intelligently prepend a path to an environment variable.
# See http://stackoverflow.com/a/9631350
prepend()
{
eval $1="$2\${$1:+:\$$1}"
}
# Source and build directories (absolute paths so this works from any
# directory).
s="$(cd @abs_srcdir@ && pwd)"
b="$(cd @abs_builddir@ && pwd)"
# Set tmpdir and cachedir so the appliance doesn't conflict with
# globally installed libguestfs.
#
# We set it to a subdirectory ('tmp') so that we can label this
# subdirectory to make libvirt + sVirt + SELinux enforcing work.
export LIBGUESTFS_TMPDIR="$b/tmp"
export LIBGUESTFS_CACHEDIR="$b/tmp"
mkdir -p "$b/tmp"
chcon --reference=/tmp "$b/tmp" 2>/dev/null ||:
# Set the PATH to contain all the libguestfs binaries. There are a
# lot of binaries, so a lot of path entries.
prepend PATH "$b/align"
prepend PATH "$b/builder"
prepend PATH "$b/cat"
prepend PATH "$b/customize"
prepend PATH "$b/df"
prepend PATH "$b/diff"
prepend PATH "$b/drivers"
prepend PATH "$b/edit"
prepend PATH "$b/erlang"
prepend PATH "$b/format"
prepend PATH "$b/fuse"
prepend PATH "$b/get-kernel"
prepend PATH "$b/inspector"
prepend PATH "$b/make-fs"
prepend PATH "$b/resize"
prepend PATH "$b/sparsify"
prepend PATH "$b/sysprep"
prepend PATH "$b/win-reg"
export PATH
# Make virt-builder use the local website copy to avoid hitting
# the network all the time.
if [ -z "$VIRT_BUILDER_DIRS" ]; then
prepend VIRT_BUILDER_DIRS "$b/builder/test-website"
export VIRT_BUILDER_DIRS
fi
# This is a cheap way to find some use-after-free and uninitialized
# read problems when using glibc. But if we are valgrinding then
# don't use this because it can stop valgrind from working.
if [ -z "$VG" ]; then
random_val="$(@AWK@ 'BEGIN{srand(); print 1+int(255*rand())}' < /dev/null)"
LD_PRELOAD="${LD_PRELOAD:+"$LD_PRELOAD:"}libc_malloc_debug.so.0"
GLIBC_TUNABLES=glibc.malloc.check=1:glibc.malloc.perturb=$random_val
export LD_PRELOAD GLIBC_TUNABLES
fi
# Do we have libtool? If we have it then we can use it to make
# running valgrind simpler. However don't depend on it.
if libtool --help >/dev/null 2>&1; then
libtool="libtool --mode=execute"
fi
# Avoid GNOME keyring stupidity
export GNOME_KEYRING_CONTROL=
export GNOME_KEYRING_PID=
# Run the program.
if [ -z "$timeout_mode" ]; then
exec $libtool "$@"
fi
# For tests (./run --test):
# - timeout if the test takes too long to run
# Originally 1h, but that is not long enough to run the C API
# tests on Koji.
timeout_period=4h
timeout_kill=30s
# Must use the --foreground option (RHBZ#1025269).
if timeout --foreground 2 sleep 0 >/dev/null 2>&1; then
# Does this version of timeout have the -k option? (Not on RHEL 6)
if timeout -k 10s 10s true >/dev/null 2>&1; then
timeout="timeout --foreground -k $timeout_kill $timeout_period"
fi
fi
$timeout $libtool "$@"
fail=$?
if [ "$fail" -eq 0 ]; then
# Test successful.
:
elif [ "$fail" -eq 77 ]; then
# Tests return 77 to mean skipped.
:
elif [ "$fail" -eq 124 ]; then
# Timed out.
echo "$b/run: command timed out after $timeout_period"
else
# Test failed.
echo "$b/run: command failed with exit code $fail"
fi
exit $fail
|
