aboutsummaryrefslogtreecommitdiffstats
path: root/classes/cpan-base.bbclass
diff options
context:
space:
mode:
authorJamie Lenehan <lenehan@twibble.org>2007-05-04 01:24:59 +0000
committerJamie Lenehan <lenehan@twibble.org>2007-05-04 01:24:59 +0000
commit55764a7c52979405d4d7c07fd92c3c5f64744494 (patch)
tree319517d9ae5fddaf854b3b9782227ffaddf1ff3f /classes/cpan-base.bbclass
parenteaef2ca148ef7e89336978934ee202f2b4f25151 (diff)
downloadopenembedded-55764a7c52979405d4d7c07fd92c3c5f64744494.tar.gz
openembedded-55764a7c52979405d4d7c07fd92c3c5f64744494.tar.bz2
openembedded-55764a7c52979405d4d7c07fd92c3c5f64744494.zip
perl: Extract common functionality from cpan and cpan_build classes into a
cpan-base class and update cpan_build to work with the new perl layout that was added with perl 5.8.8.
Diffstat (limited to 'classes/cpan-base.bbclass')
-rw-r--r--classes/cpan-base.bbclass51
1 files changed, 51 insertions, 0 deletions
diff --git a/classes/cpan-base.bbclass b/classes/cpan-base.bbclass
new file mode 100644
index 0000000000..e10148aba8
--- /dev/null
+++ b/classes/cpan-base.bbclass
@@ -0,0 +1,51 @@
+#
+# This is for perl modules that use the old Makefile.PL build system
+#
+FILES_${PN} += '${libdir}/perl5 ${datadir}/perl5'
+EXTRA_CPANFLAGS ?= ""
+
+DEPENDS += "perl perl-native"
+RDEPENDS += "perl"
+
+# Determine the staged version of perl from the perl configuration file
+def get_perl_version(d):
+ import os, bb, re
+ cfg = bb.data.expand('${STAGING_DIR}/${HOST_SYS}/perl/config.sh', d)
+ try:
+ f = open(cfg, 'r')
+ except IOError:
+ return None
+ l = f.readlines();
+ f.close();
+ r = re.compile("version='(\d\.\d\.\d)'")
+ for s in l:
+ m = r.match(s)
+ if m:
+ return m.group(1)
+ return None
+
+# Only 5.8.7 and 5.8.4 existed at the time we moved to the new layout
+def is_new_perl(d):
+ ver = get_perl_version(d)
+ if ver == "5.8.4" or ver == "5.8.7":
+ return "no"
+ return "yes"
+
+# Determine where the library directories are
+def perl_get_libdirs(d):
+ import bb
+ libdir = bb.data.getVar('libdir', d, 1)
+ if is_new_perl(d) == "yes":
+ libdirs = libdir + '/perl5'
+ else:
+ libdirs = libdir + '/*/*/perl5'
+ return libdirs
+
+def is_target(d):
+ import bb
+ if not bb.data.inherits_class('native', d):
+ return "yes"
+ return "no"
+
+IS_NEW_PERL = "${@is_new_perl(d)}"
+PERLLIBDIRS = "${@perl_get_libdirs(d)}"