Changeset View
Changeset View
Standalone View
Standalone View
head/Mk/Scripts/qa.sh
Show All 39 Lines | *.pm|*.pod|*.txt|${STAGEDIR}${LINUXBASE}/*) | ||||
return 0 | return 0 | ||||
;; | ;; | ||||
esac | esac | ||||
interp=$(sed -n -e '1s/^#![[:space:]]*\([^[:space:]]*\).*/\1/p;2q' "${f}") | interp=$(sed -n -e '1s/^#![[:space:]]*\([^[:space:]]*\).*/\1/p;2q' "${f}") | ||||
badinterp="" | badinterp="" | ||||
case "${interp}" in | case "${interp}" in | ||||
"") ;; | "") ;; | ||||
/bin/rc) | |||||
# whitelist some interpreters | |||||
;; | |||||
${LOCALBASE}/bin/python|${PREFIX}/bin/python) | ${LOCALBASE}/bin/python|${PREFIX}/bin/python) | ||||
badinterp="${interp}" | badinterp="${interp}" | ||||
;; | ;; | ||||
${LINUXBASE}/*) ;; | ${LINUXBASE}/*) ;; | ||||
${LOCALBASE}/bin/perl5.* | ${PREFIX}/bin/perl5.*) | ${LOCALBASE}/bin/perl5.* | ${PREFIX}/bin/perl5.*) | ||||
# lang/perl5* are allowed to have these shebangs. | # lang/perl5* are allowed to have these shebangs. | ||||
if ! expr ${PKGORIGIN} : '^lang/perl5.*' > /dev/null; then | if ! expr ${PKGORIGIN} : '^lang/perl5.*' > /dev/null; then | ||||
err "'${interp}' is an invalid shebang for '${f#${STAGEDIR}${PREFIX}/}' you must use ${LOCALBASE}/bin/perl." | err "'${interp}' is an invalid shebang for '${f#${STAGEDIR}${PREFIX}/}' you must use ${LOCALBASE}/bin/perl." | ||||
▲ Show 20 Lines • Show All 752 Lines • Show Last 20 Lines |