[384] | 1 | #!/usr/bin/perl -w
|
---|
| 2 | #
|
---|
| 3 | # Init script for mondo with Project-Builder
|
---|
| 4 | #
|
---|
| 5 |
|
---|
| 6 | # Export documentation to generate what is needed
|
---|
[418] | 7 | use ProjectBuilder::Base;
|
---|
| 8 | use ProjectBuilder::Filter;
|
---|
| 9 | use ProjectBuilder::CMS;
|
---|
| 10 | use ProjectBuilder::Env;
|
---|
[384] | 11 | use File::Basename;
|
---|
| 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";
|
---|
[418] | 22 | my $pbproj = "PBPROJ";
|
---|
[431] | 23 | my $pbrepo = "PBREPO";
|
---|
[384] | 24 |
|
---|
[418] | 25 | # Action needs to be pbinit
|
---|
| 26 | my ($filteredfiles, $supfiles, $defpkgdir, $extpkgdir) = pb_env_init($pbproj,undef,"pbinit");
|
---|
[384] | 27 | my ($scheme,$uri) = pb_cms_init(undef);
|
---|
| 28 |
|
---|
| 29 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondoarchive.8","docs/mantmp");
|
---|
| 30 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondorestore.8","docs/mantmp");
|
---|
| 31 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/images","docs/en/images");
|
---|
| 32 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/fdl.sgml","docs/en");
|
---|
| 33 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondorescue-howto.sgml","docs/entmp");
|
---|
| 34 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/mondorescue-howto.dsl","docs/en");
|
---|
| 35 | pb_cms_export($uri,"$ENV{'PBDIR'}/mondo-doc/Makefile.howto","docs/en");
|
---|
| 36 | # should call filter_file here
|
---|
| 37 |
|
---|
| 38 | my $ptr = pb_get_filters($pbpkg);
|
---|
| 39 | foreach my $f (<docs/mantmp/*>) {
|
---|
[431] | 40 | pb_filter_file("$f",$ptr,"docs/man/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"","",$pbproj,$pbrepo);
|
---|
[384] | 41 | }
|
---|
| 42 | foreach my $f (<docs/entmp/*>) {
|
---|
[431] | 43 | pb_filter_file("$f",$ptr,"docs/en/".basename($f),$pbpkg,$pbver,$pbtag,$pbrev,"","",$pbproj,$pbrepo);
|
---|
[384] | 44 | }
|
---|
| 45 | pb_rm_rf("docs/entmp");
|
---|
| 46 | pb_rm_rf("docs/mantmp");
|
---|
| 47 |
|
---|
| 48 | system("cd docs/en ; make -f Makefile.howto mondorescue-howto.pdf mondorescue-howto.html");
|
---|