Fix perl @INC for scripts which include make.pl

In perl 5.26, and some earlier perls that have been proactively
patched (Debian's perl 5.24, for example), '.' was removed from @INC
for security reasons.  For details, see:
  http://blogs.perl.org/users/todd_rinaldo/2016/11/how-removing-from-inc-is-about-to-break-cpan.html
  https://www.masteringperl.org/2017/01/perl-v5-26-removes-from-inc-but-dont-think-youre-safe/
et cetera.

This breaks the generation scripts which source make.pl with
  do 'bin/make.pl'

Although this might be indicative that it's time to refactor these
scripts, I opted for the simplest possible fix for now: restoring '.'
to @INC in each script that depends on make.pl.
This commit is contained in:
Julian Squires 2017-03-26 15:44:59 -04:00
parent 6ee72f2fce
commit 7f510379f6
No known key found for this signature in database
GPG Key ID: E66D2011DA6D1862
15 changed files with 15 additions and 0 deletions

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
# function pointer declaration

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
my @extlist = ();

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
##

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
# token

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
#---------------------------------------------------------------------------------------

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
##

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
#---------------------------------------------------------------------------------------

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
#---------------------------------------------------------------------------------------

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
#-------------------------------------------------------------------------------

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
## Output declarations for the _glewInit_[extension] functions defined

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
#---------------------------------------------------------------------------------------

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
#---------------------------------------------------------------------------------------

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
my @extlist = ();

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
# function pointer declaration

View File

@ -10,6 +10,7 @@
use strict;
use warnings;
use lib '.';
do 'bin/make.pl';
my @extlist = ();