mstoeck3/autopsy-flatpak
1
0
Fork 0
mirror of https://github.com/overcuriousity/autopsy-flatpak.git synced 2025-07-06 21:00:22 +00:00
Code Issues Packages Projects Releases Wiki Activity

Added new perl check into configure

Browse Source
This commit is contained in:
Brian Carrier 2008-10-14 04:07:11 +00:00
parent bf2274c8a4
commit ea7c19322d
2 changed files with 20 additions and 12 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
CHANGES.txt
View File

@ -16,6 +16,9 @@ support for it.
10/08/08: Bug Fix: Added some more HTML entity escaping to case management
values (such as description). Reported by Daniel Medianero.
10/13/08: Update: Added perl version check back into configure, but used
perl $] variable to do checking. Based on patch by Joerg Friedrich.
--------------------------- Version 2.10 --------------------------------
2/20/08: Bug Fix: Added 'tsk' to the path for sorter to find the 'images'
config file. Reported by Russell Reynolds.

29
configure vendored
View File

@ -61,12 +61,17 @@ found=0;
for d in $dirs
do if (test -x ${d}perl) then
if (test -n "`${d}perl -v 2> /dev/null | awk '/This is perl/ {print $0}'`") then
ver=`${d}perl -v 2> /dev/null | awk '/This is perl,/ {print $4}'`;
echo "perl found: ${d}perl (version $ver)";
echo "#!${d}perl -wT" > ./config.tmp;
echo "#!${d}perl" > ./config2.tmp;
found=1;
break;
ver=`${d}perl -e 'print $];'`;
if (`${d}perl -e 'exit( $] >= 5.008);'`) then
echo "old version of perl found: ${d}perl (version $ver) -- continuing";
else
echo "perl found: ${d}perl (version $ver)";
echo "#!${d}perl -wT" > ./config.tmp;
echo "#!${d}perl" > ./config2.tmp;
perlexe="${d}perl";
found=1;
break;
fi;
fi;
fi;
done
@ -79,13 +84,13 @@ if (test $found -eq 0) then
read perlexe;
if (test -x "$perlexe") then
if (test -n "`$perlexe -v 2> /dev/null | awk '/This is perl/ {print $0}'`") then
ver=`$perlexe -v 2> /dev/null | awk '/This is perl,/ {print $4}'`;
if (test "$ver" '<' "v5.8.0") then
ver=`$perlexe -e 'print $];'`;
if (`$perlexe -e 'exit( $] >= 5.008);'`) then
echo "This version of Perl is too old, 5.8.0 or older needed";
else
else
echo "Correct version found";
echo "#!${d}perl -wT" > ./config.tmp;
echo "#!${d}perl" > ./config2.tmp;
echo "#!${perlexe} -wT" > ./config.tmp;
echo "#!${perlexe}" > ./config2.tmp;
found=1;
break;
fi;
@ -99,7 +104,7 @@ if (test $found -eq 0) then
fi
# Check if this version of Perl supports large files
if (test -z "`${d}perl -V 2> /dev/null | awk '/USE_LARGE_FILES/ {print $0}'`") then
if (test -z "`$perlexe -V 2> /dev/null | awk '/USE_LARGE_FILES/ {print $0}'`") then
echo ''
echo ' NOTE: It appears that your Perl does not support large files.';
echo ' You therefore will not be able to analyze images larger than 2GB.';