dslinux/user/perl/Cross Makefile Makefile.SH.patch README TODO config config.sh-arm-linux generate_config_sh installperl.patch warp
cayenne
dslinux_cayenne at user.in-berlin.de
Mon Dec 4 17:58:57 CET 2006
Update of /cvsroot/dslinux/dslinux/user/perl/Cross
In directory antilope:/tmp/cvs-serv17422/Cross
Added Files:
Makefile Makefile.SH.patch README TODO config
config.sh-arm-linux generate_config_sh installperl.patch warp
Log Message:
Adding fresh perl source to HEAD to branch from
--- NEW FILE: config ---
##############################################################################
#
# This is the configuration file used to specify the target platform and
# required level of debug or optimisation.
#
##############################################################################
### Target Arch
ARCH = arm
#ARCH = i386-pc
#ARCH = sh4
#ARCH = mips
#ARCH = mipsel
#ARCH = ppc
## Specific arm
CONFIG_TARGET_ARM_SA11X0 = 1
#CONFIG_TARGET_ARM_XSCALE = 1
### Target OS
OS = linux
#OS = solaris2.8
--- NEW FILE: Makefile ---
## Toplevel Makefile for cross-compilation of perl
#
## $Id: Makefile,v 1.1 2006-12-04 16:58:55 dslinux_cayenne Exp $
export TOPDIR=${shell pwd}
include $(TOPDIR)/config
export CFLAGS
export SYS=$(ARCH)-$(OS)
export CROSS=$(ARCH)-$(OS)-
export FULL_OPTIMIZATION = -fexpensive-optimizations -fomit-frame-pointer -O2
export OPTIMIZATION = -O2
export CC = $(CROSS)gcc
export CXX = $(CROSS)g++
export LD = $(CROSS)ld
export STRIP = $(CROSS)strip
export AR = $(CROSS)ar
export RANLIB = $(CROSS)ranlib
## Optimisation work
ifeq ($(ARCH),arm)
ifdef CONFIG_TARGET_ARM_SA11X0
ifndef Architecture
Architecture = armv4l-strongarm
endif
FULL_OPTIMIZATION += -march=armv4 -mtune=strongarm1100 -mapcs-32
OPTIMIZATION += -march=armv4 -mtune=strongarm1100 -mapcs-32
endif
endif
CFLAGS+=$(FULL_OPTIMIZATION)
all:
@echo Please read the README file before doing anything else.
gen_patch:
diff -Bbur ../Makefile.SH Makefile.SH > Makefile.SH.patch
diff -Bbur ../installperl installperl > installperl.patch
patch:
cd .. ; if [ ! -e ./CROSS_PATCHED ] ; then \
patch -p1 < Cross/Makefile.SH.patch; \
patch -p1 < Cross/installperl.patch ; mv installperl installperl-patched; \
sed -e 's/XXSTRIPXX/$(SYS)/' installperl-patched > installperl; \
touch CROSS_PATCHED ; fi
dry_patch:
cd .. ; patch --dry-run -p1 < Cross/Makefile.SH.patch; \
patch --dry-run -p1 < Cross/installperl.patch; \
perl:
@echo Perl cross-build directory is $(TOPDIR)
@echo Target arch is $(SYS)
@echo toolchain: $(CC), $(CXX), $(LD), $(STRIP), $(AR), $(RANLIB)
@echo Optimizations: $(FULL_OPTIMIZATION)
$(TOPDIR)/generate_config_sh config.sh-$(SYS) > $(TOPDIR)/../config.sh
cd $(TOPDIR)/.. ; ./Configure -S ; make depend ; make ; make more
cd $(TOPDIR)/.. ; mkdir -p fake_config_library ; cp lib/Config.pm fake_config_library
cd $(TOPDIR)/.. ; $(MAKE) more2 "PERLRUN=/usr/bin/perl -I$(TOPDIR)/../fake_config_library -MConfig"
cd $(TOPDIR)/.. ; $(MAKE) more3 "PERLRUN=/usr/bin/perl -I$(TOPDIR)/../fake_config_library -MConfig"
cd $(TOPDIR)/.. ; $(MAKE) more4 "PERLRUN=/usr/bin/perl -I$(TOPDIR)/../fake_config_library -MConfig"
cd $(TOPDIR)/.. ; rm -rf install_me_here
cd $(TOPDIR)/.. ; make install-strip
cd $(TOPDIR)/.. ; sh -x Cross/warp
--- NEW FILE: warp ---
#!/bin/sh -x
## This script contains an rm -rf. This may alarm you.
## These directories need to be reccursively deleted.
## I don't see any method of making "Bad Things"[tm]
## Happen. But we don't run buildroot as root do we? :-)
for f in `find lib -name install_me_here`;do
cp -r $f/* ./install_me_here/
done
for f in `find lib -name install_me_here`;do
rm -rf $f
done
--- NEW FILE: config.sh-arm-linux ---
#!/bin/sh
#
# This file was produced by running the Configure script. It holds all the
# definitions figured out by Configure. Should you modify one of these values,
# do not forget to propagate your changes by running "Configure -der". You may
# instead choose to run each of the .SH files by yourself, or "Configure -S".
#
# Package name : perl5
# Source directory : .
# Configuration time: Wed Sep 3 22:24:58 EDT 2003
# Configured by : red
# Target system : linux openzaurus.criticalintegration.com 2.4.6-rmk1-np2-embedix #15 Wed Aug 6 07:49:44 UTC 2003 armv4l unknown
Author=''
Date='$Date'
Header=''
Id='$Id'
Locker=''
[...1004 lines suppressed...]
versiononly='undef'
vi=''
voidflags='15'
xlibpth='/usr/lib/386 /lib/386'
yacc='yacc'
yaccflags=''
zcat=''
zip='zip'
# Configure command line arguments.
config_arg0='Configure'
config_args=''
config_argc=0
PERL_REVISION=5
PERL_VERSION=8
PERL_SUBVERSION=8
PERL_API_REVISION=5
PERL_API_VERSION=8
PERL_API_SUBVERSION=0
PERL_PATCHLEVEL=
PERL_CONFIG_SH=true
--- NEW FILE: Makefile.SH.patch ---
--- ../Makefile.SH
+++ ../Makefile.SH
@@ -129,18 +129,7 @@
# INSTALL file, under "Building a shared perl library".
# If there is no pre-existing $libperl, we don't need
# to do anything further.
- if test -f $archlib/CORE/$libperl; then
- rm -f preload
- cat <<'EOT' > preload
-#! /bin/sh
-lib=$1
-shift
-test -r $lib && export LD_PRELOAD="$lib $LD_PRELOAD"
-exec "$@"
-EOT
- chmod 755 preload
- ldlibpth="$ldlibpth `pwd`/preload `pwd`/$libperl"
- fi
+ echo linux libraries overwritten by cross-compile patches
;;
os390) test -f /bin/env && ldlibpth="/bin/env $ldlibpth"
;;
@@ -389,9 +378,21 @@
.c.s:
$(CCCMDSRC) -S $*.c
-all: $(FIRSTMAKEFILE) miniperl$(EXE_EXT) extra.pods $(private) $(unidatafiles) $(public) $(dynamic_ext) $(nonxs_ext) extras.make
- @echo " ";
- @echo " Everything is up to date. Type '$(MAKE) test' to run test suite."
+#all: $(FIRSTMAKEFILE) miniperl$(EXE_EXT) extra.pods $(private) $(unidatafiles) $(public) $(dynamic_ext) $(nonxs_ext) extras.make
+# @echo " ";
+# @echo " Everything is up to date. Type '$(MAKE) test' to run test suite."
+
+all: $(FIRSTMAKEFILE) miniperl$(EXE_EXT)
+ mv miniperl miniperl-arm
+ ln -s /usr/bin/perl miniperl
+
+more: extra.pods $(private) $(public)
+
+more2: $(dynamic_ext)
+
+more3: $(nonxs_ext)
+
+more4: extras.make
.PHONY: all compile translators utilities
@@ -401,10 +402,10 @@
cd x2p; $(MAKE) compile;
cd pod; $(MAKE) compile;
-translators: miniperl$(EXE_EXT) $(CONFIGPM) FORCE
+translators: $(CONFIGPM) FORCE
@echo " "; echo " Making x2p stuff"; cd x2p; $(LDLIBPTH) $(MAKE) all
-utilities: miniperl$(EXE_EXT) $(CONFIGPM) $(plextract) lib/lib.pm FORCE
+utilities: $(CONFIGPM) $(plextract) lib/lib.pm FORCE
@echo " "; echo " Making utilities"; cd utils; $(LDLIBPTH) $(MAKE) all
@@ -579,7 +580,7 @@
$(CC) -o miniperl $(CLDFLAGS) \
`echo $(obj) | sed 's/ op$(OBJ_EXT) / /'` \
miniperlmain$(OBJ_EXT) opmini$(OBJ_EXT) perl$(OBJ_EXT) $(libs)
- $(LDLIBPTH) ./miniperl -w -Ilib -MExporter -e '<?>' || $(MAKE) minitest
+# $(LDLIBPTH) ./miniperl -w -Ilib -MExporter -e '<?>' || $(MAKE) minitest
!NO!SUBS!
;;
next4*)
@@ -587,7 +588,7 @@
miniperl: $& miniperlmain$(OBJ_EXT) $(LIBPERL) opmini$(OBJ_EXT)
$(CC) -o miniperl `echo $(obj) | sed 's/ op$(OBJ_EXT) / /'` \
miniperlmain$(OBJ_EXT) opmini$(OBJ_EXT) perl$(OBJ_EXT) $(libs)
- $(LDLIBPTH) ./miniperl -w -Ilib -MExporter -e '<?>' || $(MAKE) minitest
+# $(LDLIBPTH) ./miniperl -w -Ilib -MExporter -e '<?>' || $(MAKE) minitest
!NO!SUBS!
;;
darwin*)
@@ -754,7 +755,7 @@
# We need to autosplit in two steps because VOS can't handle so many args
#
.PHONY: preplibrary
-preplibrary: miniperl$(EXE_EXT) $(CONFIGPM) lib/lib.pm $(PREPLIBRARY_LIBPERL)
+preplibrary: $(CONFIGPM) lib/lib.pm $(PREPLIBRARY_LIBPERL)
@sh ./makedir lib/auto
@echo " AutoSplitting perl library"
$(LDLIBPTH) ./miniperl -Ilib -e 'use AutoSplit; \
@@ -763,35 +764,35 @@
autosplit_lib_modules(@ARGV)' lib/*/*.pm
$(MAKE) lib/re.pm
-lib/Config.pod: config.sh miniperl$(EXE_EXT) configpm Porting/Glossary
+lib/Config.pod: config.sh configpm Porting/Glossary
$(LDLIBPTH) ./miniperl -Ilib configpm --heavy=lib/Config_heavy.pl lib/Config.pm
$(CONFIGPM): lib/Config.pod
-lib/ExtUtils/Miniperl.pm: miniperlmain.c miniperl$(EXE_EXT) minimod.pl $(CONFIGPM)
+lib/ExtUtils/Miniperl.pm: miniperlmain.c minimod.pl $(CONFIGPM)
$(LDLIBPTH) ./miniperl minimod.pl > lib/ExtUtils/Miniperl.pm
lib/re.pm: ext/re/re.pm
cp ext/re/re.pm lib/re.pm
-$(plextract): miniperl$(EXE_EXT) $(CONFIGPM) x2p/s2p
+$(plextract): $(CONFIGPM) x2p/s2p
@-rm -f $@
$(LDLIBPTH) ./miniperl -I`pwd`/lib $@.PL
-x2p/s2p: miniperl$(EXE_EXT) $(CONFIGPM) x2p/s2p.PL
+x2p/s2p: $(CONFIGPM) x2p/s2p.PL
cd x2p; $(LDLIBPTH) $(MAKE) s2p
-lib/lib.pm: miniperl$(EXE_EXT) $(CONFIGPM)
+lib/lib.pm: $(CONFIGPM)
@-rm -f $@
$(LDLIBPTH) ./miniperl -Ilib lib/lib_pm.PL
unidatafiles $(unidatafiles): uni.data
-uni.data: miniperl$(EXE_EXT) $(CONFIGPM) lib/unicore/mktables
+uni.data: $(CONFIGPM) lib/unicore/mktables
cd lib/unicore && $(LDLIBPTH) ../../miniperl -I../../lib mktables -w
touch uni.data
-extra.pods: miniperl$(EXE_EXT)
+extra.pods:
- at test -f extra.pods && rm -f `cat extra.pods`
- at rm -f extra.pods
- at for x in `grep -l '^=[a-z]' README.* | grep -v README.vms` ; do \
@@ -798,18 +799,7 @@
INSTALL_DEPENDENCE = all
install.perl: $(INSTALL_DEPENDENCE) installperl
- if [ -n "$(COMPILE)" ]; \
- then \
- cd utils; $(MAKE) compile; \
- cd ../x2p; $(MAKE) compile; \
- cd ../pod; $(MAKE) compile; \
- else :; \
- fi
- $(LDLIBPTH) ./perl installperl --destdir=$(DESTDIR) $(INSTALLFLAGS) $(STRIPFLAGS)
- $(MAKE) extras.install
-
-install.man: all installman
- $(LDLIBPTH) ./perl installman --destdir=$(DESTDIR) $(INSTALLFLAGS)
+ /usr/bin/perl -Ifake_config_library -MConfig installperl $(INSTALLFLAGS) $(STRIPFLAGS)
# XXX Experimental. Hardwired values, but useful for testing.
# Eventually Configure could ask for some of these values.
@@ -925,16 +915,16 @@
#
# DynaLoader may be needed for extensions that use Makefile.PL.
-$(DYNALOADER): miniperl$(EXE_EXT) preplibrary FORCE
+$(DYNALOADER): preplibrary FORCE
@$(LDLIBPTH) sh ext/util/make_ext $(STATIC) $@ MAKE=$(MAKE) LIBPERL_A=$(LIBPERL)
-d_dummy $(dynamic_ext): miniperl$(EXE_EXT) preplibrary $(DYNALOADER) FORCE
+d_dummy $(dynamic_ext): preplibrary $(DYNALOADER) FORCE
@$(LDLIBPTH) sh ext/util/make_ext dynamic $@ MAKE=$(MAKE) LIBPERL_A=$(LIBPERL)
-s_dummy $(static_ext): miniperl$(EXE_EXT) preplibrary $(DYNALOADER) FORCE
+s_dummy $(static_ext): preplibrary $(DYNALOADER) FORCE
@$(LDLIBPTH) sh ext/util/make_ext $(STATIC) $@ MAKE=$(MAKE) LIBPERL_A=$(LIBPERL)
-n_dummy $(nonxs_ext): miniperl$(EXE_EXT) preplibrary $(DYNALOADER) FORCE
+n_dummy $(nonxs_ext): preplibrary $(DYNALOADER) FORCE
@$(LDLIBPTH) sh ext/util/make_ext nonxs $@ MAKE=$(MAKE) LIBPERL_A=$(LIBPERL)
.PHONY: clean _tidy _mopup _cleaner1 _cleaner2 \
@@ -1074,7 +1064,7 @@
test_prep_pre: preplibrary utilities $(nonxs_ext)
-test_prep: test_prep_pre miniperl$(EXE_EXT) $(unidatafiles) perl$(EXE_EXT) $(dynamic_ext) $(TEST_PERL_DLL)
+test_prep: test_prep_pre $(unidatafiles) perl$(EXE_EXT) $(dynamic_ext) $(TEST_PERL_DLL)
PERL=./perl $(MAKE) _test_prep
_test_tty:
@@ -1167,7 +1157,7 @@
# Can't depend on lib/Config.pm because that might be where miniperl
# is crashing.
-minitest: miniperl$(EXE_EXT) lib/re.pm minitest.prep
+minitest: lib/re.pm minitest.prep
- cd t && (rm -f perl$(EXE_EXT); $(LNS) ../miniperl$(EXE_EXT) perl$(EXE_EXT)) \
&& $(LDLIBPTH) ./perl TEST -minitest base/*.t comp/*.t cmd/*.t run/*.t io/*.t op/*.t uni/*.t </dev/tty
--- NEW FILE: README ---
Building for arm-linux
----------------------
The files in this directory add another cross-compilation
target to the Perl buildsystem. It was built as a part of
the Open Zaurus (http://www.openzaurus.com/) distribution.
Most / All of the arm compiler optimisations are "borrowed"
from this excellent project.
(Further discussion about cross-compiling Perl in the top level
INSTALL file, see the section "Cross-compilation".)
The main target is arm-linux but I have also managed to
successfully cross-compile Perl for Solaris x86 using the same
buildsystem.
We are currently dependent on an existing working local copy of
Perl ** of the same version and revision ** which is available
as /usr/bin/perl.
You need a working and tested cross-compiler for your build
and target combination. The binary directory must be in
your path.
1) You should be reading me (README) in perl-5.x.y/Cross
2) Make sure you are in the Cross directory.
3) Edit the file 'config' to contain your target platform information.
4) make patch ## This will patch the existing source-tree.
5) make perl ## Will make perl
Your built Perl environment is in install_me_here/ in your build
directory. From here you can package and deploy as you wish.
The Obvious Ommissions
----------------------
This does NOT perform any installation as site installation method
will be dependent on the target architecture and OS.
make test will NOT work as the binaries and libraries will not execute
on your BUILD machine.
Due to space limitations on the Zaurus (it's a PDA) we do not provide
documentation in the core - Therefore man pages are not even generated.
Other Targets (For Developers)
------------------------------
It is possible to extend the cross-compilation to other targets.
We have sucessfully compiled for the target solaris2.8/x86
on linux/x86 build system.
To attempt a cross-compile for another target using the methods
in this directory:
1) Copy the Perl source code onto your TARGET machine.
2) Execute sh Configure as normal and configure as required,
do not "make".
3) Copy the config.sh file that is generated to your BUILD
machine and place it in the Cross directory with the
filename config.sh-ARCH-OS. For example,
config.sh-i386-pc-solaris2.8. For the appropriate ARCH
and OS please refer to your cross-compiler documentation.
4) Edit Cross/config to reflect your new target and continue
with build as above.
Should you wish to produce optimised binaries for different
architectures you can add the appropriate compiler flags to
the Makefile in a new ifeq ($(ARCH),...) ... endif block.
Please refer to your cross-compiler documentation for details.
Note that the Cross/ directory is also used by a different
cross-compilation setup described in the INSTALL file, and
executed by Configure. There should be no conflicts since
it is unlikely both that cross-compilation setups are used
simultaneously.
Enjoy!
References
----------
Redvers Davies <red at criticalintegration.com>
Open Zaurus http://www.openzaurus.org/
Perl OZ Packages http://www.criticalintegration.com/perl-oz/
--- NEW FILE: generate_config_sh ---
#!/usr/bin/perl
##############################################################################
#
# generate_config_sh
# Process that takes an automatically generated config.sh
# file and allows the environment to overload the values
# automatically discovered by Configure on our target platform.
#
# Author Redvers Davies <red at criticalintegration.com>
#
##############################################################################
my $config = shift;
my $sys = $ENV{SYS};
my $callbacks = {};
$callbacks->{'ar'} = [\&simple_process, ["AR", "arm-linux-ar"]];
$callbacks->{'archname'} = [\&simple_process, ["SYS", "armv4l-linux"]];
$callbacks->{'cc'} = [\&simple_process, ["CC", "arm-linux-gcc"]];
$callbacks->{'cccdlflags'} = [\&simple_process, ["CFLAGS", ""]];
$callbacks->{'ccdlflags'} = [\&simple_process, ["CFLAGS", ""]];
$callbacks->{'ccflags'} = [\&simple_process, ["CFLAGS", "-fno-strict-aliasing -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64"]];
$callbacks->{'ccflags_uselargefiles'} = [\&simple_process, ["CFLAGS", "-D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64"]];
$callbacks->{'ccname'} = [\&simple_process, ["CC", "arm-linux-gcc"]];
$callbacks->{'cpp'} = [\&simple_process, ["CCP", "arm-linux-cpp"]];
$callbacks->{'cppflags'} = [\&simple_process, ["CCPFLAGS", "-fno-strict-aliasing"]];
$callbacks->{'cpprun'} = [\&simple_process_append, ["CC", "arm-linux-gcc -E", "-E"]];
$callbacks->{'cppstdin'} = [\&simple_process_append, ["CC", "arm-linux-gcc -E", "-E"]];
$callbacks->{'full_ar'} = [\&backtick, ["AR", "which $ENV{AR}", "/usr/local/arm/2.95.3/bin/arm-linux-ar"]];
$callbacks->{'ld'} = [\&simple_process, ["LD", "arm-linux-ld"]];
$callbacks->{'ldflags'} = [\&simple_process, ["LDFLAGS", ""]];
$callbacks->{'ldflags_uselargefiles'} = [\&simple_process, ["LDFLAGS", ""]];
$callbacks->{'myarchname'} = [\&simple_process, ["SYS", "armv4l-linux"]];
$callbacks->{'archlib'} = [\&library_munge, ["SYS", "armv4l-linux"]];
$callbacks->{'archlibexp'} = [\&library_munge, ["SYS", "armv4l-linux"]];
$callbacks->{'installarchlib'} = [\&library_munge, ["SYS", "armv4l-linux"]];
$callbacks->{'installsitearch'} = [\&library_munge, ["SYS", "armv4l-linux"]];
$callbacks->{'sitearch'} = [\&library_munge, ["SYS", "armv4l-linux"]];
$callbacks->{'sitearchexp'} = [\&library_munge, ["SYS", "armv4l-linux"]];
if ($config eq "") {
die("Please run me as generate_config_sh path/to/original/config.sh");
}
open(FILE, "$config") || die("Unable to open $config");
my $line_in;
while ($line_in = <FILE>) {
if ($line_in =~ /^#/) {
next;
}
if ($line_in !~ /./) {
next;
}
$line_in =~ /^([^=]+)=(.*)/;
my $key = $1;
my $value = $2;
if (ref($callbacks->{$key}) eq "ARRAY") {
($callbacks->{$key}[0])->($key,$value);
} else {
print($line_in);
}
}
sub backtick {
my $key = shift;
my $value = shift;
my $envvar = $callbacks->{$key}->[1][0];
if ($ENV{$envvar}) {
my $rawtext = `$callbacks->{$key}->[1][1]`;
chomp($rawtext);
print("$key=\'$rawtext\'\n");
} else {
print("$key=\'$callbacks->{$key}->[1][2]\'\n");
}
}
sub simple_process {
my $key = shift;
my $envvar = $callbacks->{$key}->[1][0];
if ($ENV{$envvar}) {
print("$key=\"$ENV{$envvar}\"\n");
} else {
print("$key=\'$callbacks->{$key}->[1][1]\'\n");
}
}
sub simple_process_append {
my $key = shift;
my $envvar = $callbacks->{$key}->[1][0];
if ($ENV{$envvar}) {
print("$key=\"$ENV{$envvar} $callbacks->{$key}->[1][2]\"\n");
} else {
print("$key=\'$callbacks->{$key}->[1][1]\'\n");
}
}
sub library_munge {
my $key = shift;
my $value = shift;
my $envvar = $callbacks->{$key}->[1][0];
if ($ENV{$envvar}) {
$value =~ s/$callbacks->{$key}->[1][1]/$ENV{$envvar}/g;
print("$key=$value\n");
} else {
print("$key=$value\n");
}
}
--- NEW FILE: TODO ---
Provide a better sandbox for building additional XS libraries.
--- NEW FILE: installperl.patch ---
--- ../installperl 2003-08-31 11:58:48.000000000 -0500
+++ installperl 2003-09-05 02:38:40.000000000 -0500
@@ -3,8 +3,8 @@
BEGIN {
require 5.004;
chdir '..' if !-d 'lib' and -d '../lib';
- @INC = 'lib';
- $ENV{PERL5LIB} = 'lib';
+# @INC = 'lib';
+# $ENV{PERL5LIB} = 'lib';
}
use strict;
@@ -946,7 +946,7 @@
print " " if (@opts);
print "$file\n";
}
- system("strip", @opts, $file);
+ system("XXSTRIPXX-strip", @opts, $file);
} else {
print "# file '$file' skipped\n" if $verbose;
}
More information about the dslinux-commit
mailing list