nexmon – Blame information for rev 1
?pathlinks?
Rev | Author | Line No. | Line |
---|---|---|---|
1 | office | 1 | #!/usr/bin/env python |
2 | |||
3 | import os, Logs |
||
4 | from samba_utils import MODE_755 |
||
5 | |||
6 | # This function checks if a perl module is installed on the system. |
||
7 | def check_system_perl_module(conf, module, version=None): |
||
8 | bundle_name = module.replace('::', '_') |
||
9 | module_check = module |
||
10 | |||
11 | # Create module string with version |
||
12 | if version: |
||
13 | module_check = module + ' ' + str(version) |
||
14 | |||
15 | # Check if we have to bundle it. |
||
16 | if conf.LIB_MUST_BE_BUNDLED(bundle_name.lower()): |
||
17 | return False |
||
18 | |||
19 | # Check for system perl module |
||
20 | if not conf.check_perl_module(module_check): |
||
21 | return False |
||
22 | |||
23 | conf.define('USING_SYSTEM_%s' % bundle_name.upper(), 1) |
||
24 | |||
25 | return True |
||
26 | |||
27 | def set_options(opt): |
||
28 | return |
||
29 | |||
30 | def configure(conf): |
||
31 | # Check if perl(Parse::Yapp::Driver) is available. |
||
32 | check_system_perl_module(conf, "Parse::Yapp::Driver", 1.05) |
||
33 | |||
34 | # we need a recent version of MakeMaker to get the right man page names |
||
35 | if conf.CHECK_PERL_MANPAGE(): |
||
36 | conf.env.PERLMAN1EXT = conf.CHECK_PERL_MANPAGE(section='1') |
||
37 | conf.env.PERLMAN3EXT = conf.CHECK_PERL_MANPAGE(section='3') |
||
38 | conf.DEFINE('HAVE_PERL_MAKEMAKER', 1) |
||
39 | |||
40 | # yapp is used for building the parser |
||
41 | conf.find_program('yapp', var='YAPP') |
||
42 | conf.find_program('pod2man', var='POD2MAN') |
||
43 | |||
44 | def build(bld): |
||
45 | bld.INSTALL_FILES('${BINDIR}', 'pidl', chmod=MODE_755, perl_fixup=True) |
||
46 | |||
47 | bld.RECURSE('lib') |
||
48 | |||
49 | if not bld.CONFIG_SET('HAVE_PERL_MAKEMAKER'): |
||
50 | return |
||
51 | |||
52 | pidl_manpages = { |
||
53 | 'pidl': 'man1/pidl.${PERLMAN1EXT}', |
||
54 | 'lib/Parse/Pidl/NDR.pm': 'man3/Parse::Pidl::NDR.${PERLMAN3EXT}', |
||
55 | 'lib/Parse/Pidl/Wireshark/Conformance.pm': 'man3/Parse::Pidl::Wireshark::Conformance.${PERLMAN3EXT}', |
||
56 | 'lib/Parse/Pidl/Dump.pm': 'man3/Parse::Pidl::Dump.${PERLMAN3EXT}', |
||
57 | 'lib/Parse/Pidl/Util.pm': 'man3/Parse::Pidl::Util.${PERLMAN3EXT}', |
||
58 | 'lib/Parse/Pidl/Wireshark/NDR.pm': 'man3/Parse::Pidl::Wireshark::NDR.${PERLMAN3EXT}' |
||
59 | } |
||
60 | |||
61 | for k, v in pidl_manpages.iteritems(): |
||
62 | pidl_manpages[k] = bld.EXPAND_VARIABLES(v) |
||
63 | |||
64 | # use perl to build the manpages |
||
65 | bld.env.pidl_srcdir = os.path.join(bld.srcnode.abspath(), 'pidl') |
||
66 | |||
67 | bld.SET_BUILD_GROUP('final') |
||
68 | if 'POD2MAN' in bld.env and bld.env['POD2MAN'] != '': |
||
69 | for src, manpage in pidl_manpages.iteritems(): |
||
70 | bld(rule='${POD2MAN} -c "Samba Documentation" ${SRC} ${TGT}', |
||
71 | shell=True, |
||
72 | source=src, |
||
73 | install_path=os.path.dirname(bld.EXPAND_VARIABLES('${MANDIR}/'+manpage)), |
||
74 | target=os.path.basename(manpage)) |
||
75 | |||
76 | # we want to prefer the git version of the parsers if we can. |
||
77 | # Only if the source has changed do we want to re-run yapp |
||
78 | # But we force the developer to use the pidl standalone build |
||
79 | # to regenerate the files. |
||
80 | # TODO: only warn in developer mode and if 'git diff HEAD' |
||
81 | # shows a difference |
||
82 | warn_about_grammar_changes = ('PIDL_BUILD_WARNINGS' in bld.env and ( |
||
83 | bld.IS_NEWER('idl.yp', 'lib/Parse/Pidl/IDL.pm') or |
||
84 | bld.IS_NEWER('expr.yp', 'lib/Parse/Pidl/Expr.pm'))) |
||
85 | |||
86 | if warn_about_grammar_changes: |
||
87 | Logs.warn(''' |
||
88 | Pidl grammar files have changed. Please use the pidl standalone build |
||
89 | to regenerate them with yapp. |
||
90 | |||
91 | $ cd ../pidl |
||
92 | $ perl Makefile.PL |
||
93 | $ make lib/Parse/Pidl/IDL.pm lib/Parse/Pidl/Expr.pm |
||
94 | $ git add lib/Parse/Pidl/IDL.pm lib/Parse/Pidl/Expr.pm |
||
95 | $ git commit |
||
96 | $ cd - |
||
97 | |||
98 | If your 100% sure you haven't changed idl.yp and expr.yp |
||
99 | try this to avoid this message: |
||
100 | |||
101 | $ touch ../pidl/lib/Parse/Pidl/IDL.pm ../pidl/lib/Parse/Pidl/Expr.pm |
||
102 | ''') |
||
103 |