trunk/depend-tools/linking_libs.sh

#!/bin/bash

# CHANGES
#
# 20051211: Move most of the logic to check for bad links into get_libnames()
# 	seds, so we don't wrongly sed out whole link lines. Seems to catch more
# 	problems, such as ' or ` or -- in a link.
# 20051210: Prefer qfile from portage-utils over equery if it's available.
# 	Check for ... in "link" lines because configure checks are not links.
# 	Change get_link_generic() to handle whole lines at a time instead of single
# 	words, so get_linklines() works.
# 20051210: Rework get_libnames() to use a new style of grep, because the old
# 	way was broken on some packages from the \b. Also optimize the "Looking for
# 	libraries" section to only grep the log file once for links and cache it;
# 	also only grep the link lines ones for a given library, then parse the
# 	output for static or shared. Should speed things up considerably for large
# 	packages. I get 5 seconds in Analyzing log and 15 in Looking for libs on an
# 	xorg-x11-6.8.99.15 log on second run.
# 	Create get_link_generic() that both sections call with different options.

log=${1}

usage() {
	echo "${0##*/} compilation_log"
	echo "  Checks for -lfoo link commands and finds the library owners."
	exit 1
}

if [[ $# -ne 1 ]]; then
	usage
fi


# Finds all lines in a file that involve linking
# get_link_generic(char *grep_opts, char *filename)
get_link_generic() {
	egrep ${1} '\-l\w[^[:space:]]*' ${2} \
		| while read linker; do
			# -linker is passed through to ld and doesn't mean the inker lib.
			# The new -w in grep makes sure they're separate "words", but its
			# "word" characters only include alnum and underscore, so -- gets
			# through.
			# Some configure lines with ... match, so we drop them
			# Some of the configure options match, so we get rid of = for that.
			if \
				[[ "${linker}" != *...* ]] \
				&& [[ "${linker}" != -lib ]] \
				&& [[ "${linker}" != -libs ]]; then
				echo ${linker}
			fi
	done
}

# Note the lack of -o, as compared to get_libnames() egrep
get_linklines() {
	get_link_generic "-w" ${1} | sort | uniq
}

get_libnames() {
	get_link_generic "-o -w" ${1} \
		| sed \
			-e "/^-link/d" \
			-e "/^-lib/d" \
			-e "s:^-l::g" \
			-e "/=/d" \
			-e "/'/d" \
			-e "/^-/d" \
			-e "s:\.*$::g" \
			-e "s:|::g" \
			-e "s:\"::g" \
			-e "/^-link/d" \
			-e "/^-lib/d" \
		| sort \
		| uniq
}

get_libdirs() {
	cat /etc/ld.so.conf | sed -e "/^#/d"
}

# *64 needs to be first, as *lib is a symlink to it so equery screws up
libdirs="/lib64 /usr/lib64 /lib /usr/lib $(get_libdirs)"

echo "Analyzing log ..."
libnames="$(get_libnames ${1})"

#echo libnames=$libnames

echo "Looking for libraries ..."
linker_lines=$(get_linklines ${1})

#echo linker_lines=$linker_lines

for libname in ${libnames}; do
	static=0
	shared=0
	line=$(echo ${linker_lines} | grep "\b-l${libname}\b")
	if echo ${line} | grep -q '\b-static\b'; then
		static=1
	fi
	if ! echo ${line} | grep -q '\b-static\b'; then
		shared=1
	fi
	staticlibname="lib${libname}.a"
	sharedlibname="lib${libname}.so"
	if [[ ${static} -eq 1 ]]; then
		echo -n "  Looking for ${staticlibname} ... "
		for libdir in ${libdirs}; do
			found=0
			if [[ -e ${libdir}/${staticlibname} ]]; then
				libpaths="${libpaths} ${libdir}/${staticlibname}"
				found=1
				echo "OK"
				break
			fi
		done
		if [[ ${found} -ne 1 ]]; then
			echo "Not found!"
		fi
	fi
	if [[ ${shared} -eq 1 ]]; then
		echo -n "  Looking for ${sharedlibname} ... "
		for libdir in ${libdirs}; do
			found=0
			if [[ -e ${libdir}/${sharedlibname} ]]; then
				libpaths="${libpaths} ${libdir}/${sharedlibname}"
				found=1
				echo "OK"
				break
			fi
		done
		if [[ ${found} -ne 1 ]]; then
			echo "Not found!"
		fi
	fi
done

# Add backslashes in front of any + symbols
libpaths=${libpaths//+/\\+}

echo "Tracing libraries back to packages ..."
echo
if [[ -x $(which qfile 2> /dev/null) ]]; then
	qfile ${libpaths} | cut -d'(' -f1 | sort | uniq
elif [[ -x $(which equery 2> /dev/null) ]]; then
	equery -q belongs ${libpaths} | cut -d'(' -f1
elif [[ -x /sbin/magequery ]]; then
	for i in ${libpaths}; do
		/sbin/magequery -f ${i}
	done | sort -u
elif [[ -x $(which rpm 2> /dev/null) ]]; then
	rpm -qf ${libpaths}
else
	echo "Couldn't find package query tool! Printing libpaths instead."
	echo
	for libpath in ${libpaths}; do
		echo ${libpath}
	done
fi
1	niro	331	#!/bin/bash
2
3			# CHANGES
4			#
5			# 20051211: Move most of the logic to check for bad links into get_libnames()
6			# seds, so we don't wrongly sed out whole link lines. Seems to catch more
7			# problems, such as ' or ` or -- in a link.
8			# 20051210: Prefer qfile from portage-utils over equery if it's available.
9			# Check for ... in "link" lines because configure checks are not links.
10			# Change get_link_generic() to handle whole lines at a time instead of single
11			# words, so get_linklines() works.
12			# 20051210: Rework get_libnames() to use a new style of grep, because the old
13			# way was broken on some packages from the \b. Also optimize the "Looking for
14			# libraries" section to only grep the log file once for links and cache it;
15			# also only grep the link lines ones for a given library, then parse the
16			# output for static or shared. Should speed things up considerably for large
17			# packages. I get 5 seconds in Analyzing log and 15 in Looking for libs on an
18			# xorg-x11-6.8.99.15 log on second run.
19			# Create get_link_generic() that both sections call with different options.
20
21			log=${1}
22
23			usage() {
24			echo "${0##*/} compilation_log"
25			echo " Checks for -lfoo link commands and finds the library owners."
26			exit 1
27			}
28
29			if [[ $# -ne 1 ]]; then
30			usage
31			fi
32
33
34			# Finds all lines in a file that involve linking
35			# get_link_generic(char grep_opts, char filename)
36			get_link_generic() {
37			egrep ${1} '\-l\w[^[:space:]]*' ${2} \
38			\| while read linker; do
39			# -linker is passed through to ld and doesn't mean the inker lib.
40			# The new -w in grep makes sure they're separate "words", but its
41			# "word" characters only include alnum and underscore, so -- gets
42			# through.
43			# Some configure lines with ... match, so we drop them
44			# Some of the configure options match, so we get rid of = for that.
45			if \
46			[[ "${linker}" != ... ]] \
47			&& [[ "${linker}" != -lib ]] \
48			&& [[ "${linker}" != -libs ]]; then
49			echo ${linker}
50			fi
51			done
52			}
53
54			# Note the lack of -o, as compared to get_libnames() egrep
55			get_linklines() {
56			get_link_generic "-w" ${1} \| sort \| uniq
57			}
58
59			get_libnames() {
60			get_link_generic "-o -w" ${1} \
61			\| sed \
62			-e "/^-link/d" \
63			-e "/^-lib/d" \
64			-e "s:^-l::g" \
65			-e "/=/d" \
66			-e "/'/d" \
67			-e "/^-/d" \
68			-e "s:\.*$::g" \
69			-e "s:\|::g" \
70			-e "s:\"::g" \
71			-e "/^-link/d" \
72			-e "/^-lib/d" \
73			\| sort \
74			\| uniq
75			}
76
77			get_libdirs() {
78			cat /etc/ld.so.conf \| sed -e "/^#/d"
79			}
80
81			# 64 needs to be first, as lib is a symlink to it so equery screws up
82			libdirs="/lib64 /usr/lib64 /lib /usr/lib $(get_libdirs)"
83
84			echo "Analyzing log ..."
85			libnames="$(get_libnames ${1})"
86
87			#echo libnames=$libnames
88
89			echo "Looking for libraries ..."
90			linker_lines=$(get_linklines ${1})
91
92			#echo linker_lines=$linker_lines
93
94			for libname in ${libnames}; do
95			static=0
96			shared=0
97			line=$(echo ${linker_lines} \| grep "\b-l${libname}\b")
98			if echo ${line} \| grep -q '\b-static\b'; then
99			static=1
100			fi
101			if ! echo ${line} \| grep -q '\b-static\b'; then
102			shared=1
103			fi
104			staticlibname="lib${libname}.a"
105			sharedlibname="lib${libname}.so"
106			if [[ ${static} -eq 1 ]]; then
107			echo -n " Looking for ${staticlibname} ... "
108			for libdir in ${libdirs}; do
109			found=0
110			if [[ -e ${libdir}/${staticlibname} ]]; then
111			libpaths="${libpaths} ${libdir}/${staticlibname}"
112			found=1
113			echo "OK"
114			break
115			fi
116			done
117			if [[ ${found} -ne 1 ]]; then
118			echo "Not found!"
119			fi
120			fi
121			if [[ ${shared} -eq 1 ]]; then
122			echo -n " Looking for ${sharedlibname} ... "
123			for libdir in ${libdirs}; do
124			found=0
125			if [[ -e ${libdir}/${sharedlibname} ]]; then
126			libpaths="${libpaths} ${libdir}/${sharedlibname}"
127			found=1
128			echo "OK"
129			break
130			fi
131			done
132			if [[ ${found} -ne 1 ]]; then
133			echo "Not found!"
134			fi
135			fi
136			done
137
138			# Add backslashes in front of any + symbols
139			libpaths=${libpaths//+/\\+}
140
141			echo "Tracing libraries back to packages ..."
142			echo
143			if [[ -x $(which qfile 2> /dev/null) ]]; then
144			qfile ${libpaths} \| cut -d'(' -f1 \| sort \| uniq
145			elif [[ -x $(which equery 2> /dev/null) ]]; then
146			equery -q belongs ${libpaths} \| cut -d'(' -f1
147			elif [[ -x /sbin/magequery ]]; then
148			for i in ${libpaths}; do
149			/sbin/magequery -f ${i}
150			done \| sort -u
151			elif [[ -x $(which rpm 2> /dev/null) ]]; then
152			rpm -qf ${libpaths}
153			else
154			echo "Couldn't find package query tool! Printing libpaths instead."
155			echo
156			for libpath in ${libpaths}; do
157			echo ${libpath}
158			done
159			fi