1 # This file is part of ltrace. 2 # Copyright (C) 2012 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 19 # This tests lookup of per-library configure files. 20 21 set dir [ltraceDir] 22 23 ltraceNamedSource "$dir/liba.so.conf" { 24 void fun(); 25 } 26 27 set liba [ltraceCompile liba.so [ltraceSource c { 28 void fun(void) {} 29 }]] 30 31 set bin [ltraceCompile {} $liba [ltraceSource c { 32 int main(void) { 33 fun(); 34 } 35 }]] 36 37 ltraceMatch1 [ltraceRun -F $dir -L -x fun -- $bin] {fun@liba.so\(\)} == 1 38 ltraceMatch1 [ltraceRun -F $dir -e fun -- $bin] {fun\(\)} == 1 39 40 ltraceDone 41