Differential D1241 Diff 2644 Mk/Scripts/qa.sh

Changeset View

Standalone View

Mk/Scripts/qa.sh

Show First 20 Lines • Show All 200 Lines • ▼ Show 20 Lines	find ${STAGEDIR} -name '*.la' \| while read f; do
grep -q 'libtool library' "${f}" &&		grep -q 'libtool library' "${f}" &&
err ".la libraries found, port needs USES=libtool" &&		err ".la libraries found, port needs USES=libtool" &&
return 1 \|\| true		return 1 \|\| true
done		done
# The return above continues here.		# The return above continues here.
fi		fi
}		}

checks="shebang symlinks paths stripped desktopfileutils sharedmimeinfo suidfiles libtool"		libperl() {
		if [ ! -z ${SITE_ARCH_REL} ]; then
		find ${STAGEDIR}${PREFIX}/${SITE_ARCH_REL} -name '*.so' \| while read f; do
		found=`readelf -d $f \| awk 'BEGIN {libperl=0; rpath=0; runpath=0}
		/NEEDED.*libperl.so./ { libperl = 1 }
		antoineUnsubmitted Not Done Inline Actions Here I think you need to put this: No results presents a blank line [ -z "${f}" ] && continue (otherwise there will be like 5000 qa errors!) antoine: Here I think you need to put this: # No results presents a blank line…
		/RPATH.perl.CORE/ { rpath = 10 }
		/RUNPATH.perl.CORE/ { runpath = 100}
		END {print libperl+rpath+runpath}
		'`
		if [ "$found" -ne "111" ]; then
		case "$found" in
		0) err "${f} is not linked with libperl.so, not respecting lddlflags ?" ;;
		bdreweryUnsubmitted Not Done Inline Actions You'll need to return 1 for this case, but not you can't without refactoring or using a temp file since this is in a subshell/pipe. bdrewery: You'll need to return 1 for this case, but not you can't without refactoring or using a temp…
		1?) warn "${f} does not have the libperl.so rpath, not respecting lddlflags ?";;
		1??) warn "${f} does not have the libperl.so runpath, not respecting lddlflags ?";;
		esac
		fi
		done
		fi
		}

		checks="shebang symlinks paths stripped desktopfileutils sharedmimeinfo suidfiles libtool libperl"

ret=0		ret=0
cd ${STAGEDIR}		cd ${STAGEDIR}
for check in ${checks}; do		for check in ${checks}; do
${check} \|\| ret=1		${check} \|\| ret=1
done		done

exit $ret		exit $ret