1 | #!/usr/bin/perl -w |
---|
2 | # |
---|
3 | # Init script for mondo with Project-Builder |
---|
4 | # |
---|
5 | |
---|
6 | # Export documentation to generate what is needed |
---|
7 | use ProjectBuilder::Base qw (pb_cms_init pb_cms_export pb_mkdir_p pb_filter_file); |
---|
8 | use File::Basename; |
---|
9 | |
---|
10 | |
---|
11 | system("./bootstrap"); |
---|
12 | pb_mkdir_p("docs/entmp"); |
---|
13 | pb_mkdir_p("docs/mantmp"); |
---|
14 | pb_mkdir_p("docs/en"); |
---|
15 | pb_mkdir_p("docs/man"); |
---|
16 | my $pbpkg = "PBPKG"; |
---|
17 | my $pbver = "PBVER"; |
---|
18 | my $pbtag = "PBTAG"; |
---|
19 | my $pbrev = "PBREV"; |
---|
20 | |
---|
21 | my $cms = pb_cms_init($ENV{'PBPROJ'},undef); |
---|
22 | |
---|
23 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/mondoarchive.8","docs/mantmp"); |
---|
24 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/mondorestore.8","docs/mantmp"); |
---|
25 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/images","docs/en/images"); |
---|
26 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/fdl.sgml","docs/en"); |
---|
27 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/mondorescue-howto.sgml","docs/entmp"); |
---|
28 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/mondorescue-howto.dsl","docs/en"); |
---|
29 | pb_cms_export($cms,undef,"$ENV{'PBROOT'}/mondo-doc/Makefile.howto","docs/en"); |
---|
30 | # should call filter_file here |
---|
31 | |
---|
32 | my $ptr = pb_get_filters($pbpkg); |
---|
33 | foreach my $f (<docs/mantmp/*>) { |
---|
34 | pb_filter_file("$f",$ptr,"docs/man/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"",""); |
---|
35 | } |
---|
36 | foreach my $f (<docs/entmp/*>) { |
---|
37 | pb_filter_file("$f",$ptr,"docs/en/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"",""); |
---|
38 | } |
---|
39 | pb_rm_rf("docs/entmp"); |
---|
40 | pb_rm_rf("docs/mantmp"); |
---|
41 | |
---|
42 | system("cd docs/en ; make -f Makefile.howto mondorescue-howto.pdf mondorescue-howto.html"); |
---|