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_mkdir_p pb_rm_rf);
|
---|
8 | use ProjectBuilder::Filter qw (pb_filter_file pb_get_filters);
|
---|
9 | use ProjectBuilder::CMS qw (pb_cms_init pb_cms_export);
|
---|
10 | use File::Basename;
|
---|
11 |
|
---|
12 |
|
---|
13 | system("./bootstrap");
|
---|
14 | pb_mkdir_p("docs/entmp");
|
---|
15 | pb_mkdir_p("docs/mantmp");
|
---|
16 | pb_mkdir_p("docs/en");
|
---|
17 | pb_mkdir_p("docs/man");
|
---|
18 | my $pbpkg = "PBPKG";
|
---|
19 | my $pbver = "PBVER";
|
---|
20 | my $pbtag = "PBTAG";
|
---|
21 | my $pbrev = "PBREV";
|
---|
22 |
|
---|
23 | my ($scheme,$uri) = pb_cms_init(undef);
|
---|
24 |
|
---|
25 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondoarchive.8","docs/mantmp");
|
---|
26 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondorestore.8","docs/mantmp");
|
---|
27 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/images","docs/en/images");
|
---|
28 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/fdl.sgml","docs/en");
|
---|
29 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondorescue-howto.sgml","docs/entmp");
|
---|
30 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondorescue-howto.dsl","docs/en");
|
---|
31 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/Makefile.howto","docs/en");
|
---|
32 | # should call filter_file here
|
---|
33 |
|
---|
34 | my $ptr = pb_get_filters($pbpkg);
|
---|
35 | foreach my $f (<docs/mantmp/*>) {
|
---|
36 | pb_filter_file("$f",$ptr,"docs/man/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"","");
|
---|
37 | }
|
---|
38 | foreach my $f (<docs/entmp/*>) {
|
---|
39 | pb_filter_file("$f",$ptr,"docs/en/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"","");
|
---|
40 | }
|
---|
41 | pb_rm_rf("docs/entmp");
|
---|
42 | pb_rm_rf("docs/mantmp");
|
---|
43 |
|
---|
44 | system("cd docs/en ; make -f Makefile.howto mondorescue-howto.pdf mondorescue-howto.html");
|
---|