1# This file is part of ltrace.
2# Copyright (C) 2012, 2013 Petr Machata, Red Hat Inc.
3#
4# This program is free software; you can redistribute it and/or
5# modify it under the terms of the GNU General Public License as
6# published by the Free Software Foundation; either version 2 of the
7# License, or (at your option) any later version.
8#
9# This program is distributed in the hope that it will be useful, but
10# WITHOUT ANY WARRANTY; without even the implied warranty of
11# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
12# General Public License for more details.
13#
14# You should have received a copy of the GNU General Public License
15# along with this program; if not, write to the Free Software
16# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
17# 02110-1301 USA
18
19set libll [ltraceCompile libll.so [ltraceSource c {
20    #include <unistd.h>
21    void sym(void) {
22	sleep(1);
23    }
24}]]
25
26spawn [ltraceCompile exe -ldl [ltraceSource c {
27    #include <unistd.h>
28    #include <dlfcn.h>
29    #include <assert.h>
30    #include <stdio.h>
31    #include <string.h>
32    int main(int argc, char **argv) {
33	assert(argc == 2);
34    #define FN "libll.so"
35	char buf[strlen(argv[1]) + 1 + sizeof FN];
36	sprintf(buf, "%s/%s", argv[1], FN);
37	void *libll = dlopen(buf, RTLD_LAZY | RTLD_LOCAL);
38	assert(libll != NULL);
39	sleep(1);
40	void (*sym)(void) = dlsym(libll, "sym");
41	assert(sym != NULL);
42	sym();
43	return 0;
44    }
45}]] $objdir/$subdir
46
47ltraceMatch1 [ltraceRun -e* -p [exp_pid]] {libll.so->sleep} == 1
48
49ltraceDone
50