mirror of
https://github.com/cookiengineer/audacity
synced 2025-11-06 09:03:51 +01:00
Update lilv, lv2, serd, sord, sratom, and add suil.
This commit is contained in:
80
lib-src/lv2/suil/waflib/Tools/perl.py
Normal file
80
lib-src/lv2/suil/waflib/Tools/perl.py
Normal file
@@ -0,0 +1,80 @@
|
||||
#! /usr/bin/env python
|
||||
# encoding: utf-8
|
||||
# WARNING! Do not edit! http://waf.googlecode.com/git/docs/wafbook/single.html#_obtaining_the_waf_file
|
||||
|
||||
import os
|
||||
from waflib import Task,Options,Utils
|
||||
from waflib.Configure import conf
|
||||
from waflib.TaskGen import extension,feature,before_method
|
||||
@before_method('apply_incpaths','apply_link','propagate_uselib_vars')
|
||||
@feature('perlext')
|
||||
def init_perlext(self):
|
||||
self.uselib=self.to_list(getattr(self,'uselib',[]))
|
||||
if not'PERLEXT'in self.uselib:self.uselib.append('PERLEXT')
|
||||
self.env['cshlib_PATTERN']=self.env['cxxshlib_PATTERN']=self.env['perlext_PATTERN']
|
||||
@extension('.xs')
|
||||
def xsubpp_file(self,node):
|
||||
outnode=node.change_ext('.c')
|
||||
self.create_task('xsubpp',node,outnode)
|
||||
self.source.append(outnode)
|
||||
class xsubpp(Task.Task):
|
||||
run_str='${PERL} ${XSUBPP} -noprototypes -typemap ${EXTUTILS_TYPEMAP} ${SRC} > ${TGT}'
|
||||
color='BLUE'
|
||||
ext_out=['.h']
|
||||
@conf
|
||||
def check_perl_version(self,minver=None):
|
||||
res=True
|
||||
if minver:
|
||||
cver='.'.join(map(str,minver))
|
||||
else:
|
||||
cver=''
|
||||
self.start_msg('Checking for minimum perl version %s'%cver)
|
||||
perl=getattr(Options.options,'perlbinary',None)
|
||||
if not perl:
|
||||
perl=self.find_program('perl',var='PERL')
|
||||
if not perl:
|
||||
self.end_msg("Perl not found",color="YELLOW")
|
||||
return False
|
||||
self.env['PERL']=perl
|
||||
version=self.cmd_and_log([perl,"-e",'printf \"%vd\", $^V'])
|
||||
if not version:
|
||||
res=False
|
||||
version="Unknown"
|
||||
elif not minver is None:
|
||||
ver=tuple(map(int,version.split(".")))
|
||||
if ver<minver:
|
||||
res=False
|
||||
self.end_msg(version,color=res and"GREEN"or"YELLOW")
|
||||
return res
|
||||
@conf
|
||||
def check_perl_module(self,module):
|
||||
cmd=[self.env['PERL'],'-e','use %s'%module]
|
||||
self.start_msg('perl module %s'%module)
|
||||
try:
|
||||
r=self.cmd_and_log(cmd)
|
||||
except Exception:
|
||||
self.end_msg(False)
|
||||
return None
|
||||
self.end_msg(r or True)
|
||||
return r
|
||||
@conf
|
||||
def check_perl_ext_devel(self):
|
||||
env=self.env
|
||||
perl=env.PERL
|
||||
if not perl:
|
||||
self.fatal('find perl first')
|
||||
def read_out(cmd):
|
||||
return Utils.to_list(self.cmd_and_log(perl+cmd))
|
||||
env['LINKFLAGS_PERLEXT']=read_out(" -MConfig -e'print $Config{lddlflags}'")
|
||||
env['INCLUDES_PERLEXT']=read_out(" -MConfig -e'print \"$Config{archlib}/CORE\"'")
|
||||
env['CFLAGS_PERLEXT']=read_out(" -MConfig -e'print \"$Config{ccflags} $Config{cccdlflags}\"'")
|
||||
env['XSUBPP']=read_out(" -MConfig -e'print \"$Config{privlib}/ExtUtils/xsubpp$Config{exe_ext}\"'")
|
||||
env['EXTUTILS_TYPEMAP']=read_out(" -MConfig -e'print \"$Config{privlib}/ExtUtils/typemap\"'")
|
||||
if not getattr(Options.options,'perlarchdir',None):
|
||||
env['ARCHDIR_PERL']=self.cmd_and_log(perl+" -MConfig -e'print $Config{sitearch}'")
|
||||
else:
|
||||
env['ARCHDIR_PERL']=getattr(Options.options,'perlarchdir')
|
||||
env['perlext_PATTERN']='%s.'+self.cmd_and_log(perl+" -MConfig -e'print $Config{dlext}'")
|
||||
def options(opt):
|
||||
opt.add_option('--with-perl-binary',type='string',dest='perlbinary',help='Specify alternate perl binary',default=None)
|
||||
opt.add_option('--with-perl-archdir',type='string',dest='perlarchdir',help='Specify directory where to install arch specific files',default=None)
|
||||
Reference in New Issue
Block a user