database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-07-30 11:03:19 +03:00
Code Activity

Remove obsolete documentation build tools for Windows

Browse Source 
The scripts and instructions have been nonfunctional at least since
PostgreSQL 10 (commit 510074f9f0) and
nobody has stepped up to fix them.  So right now just remove them until
someone wants to resurrect them.

Discussion: https://www.postgresql.org/message-id/flat/B74C0219-6BA9-46E1-A524-5B9E8CD3BDB3%40yesql.se
This commit is contained in:
Peter Eisentraut
2018-07-13 10:01:04 +02:00
parent e8d9caa436
commit 1f4ec89459
4 changed files with 0 additions and 179 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
src/tools/msvc/README
View File

@ -47,7 +47,6 @@ arguments.
- User tools -
build.pl tool to build the binaries
builddoc.pl tool to build the docs
clean.bat batch file for cleaning up generated files
install.pl tool to install the generated files
mkvcbuild.pl tool to generate the Visual Studio build files

7
src/tools/msvc/builddoc.bat
View File

@ -1,7 +0,0 @@
@echo off
REM src/tools/msvc/builddoc.bat
REM all the logic for this now belongs in builddoc.pl. This file really
REM only exists so you don't have to type "perl builddoc.pl"
REM Resist any temptation to add any logic here.
@perl builddoc.pl %*

124
src/tools/msvc/builddoc.pl
View File

@ -1,124 +0,0 @@
# -*-perl-*- hey - emacs - this is a perl file
# Adjust path for your docbook installation in buildenv.pl
# src/tools/msvc/builddoc.pl
# translated from an earlier .bat file
use strict;
use File::Copy;
use Cwd qw(abs_path getcwd);
my $startdir = getcwd();
my $openjade = 'openjade-1.3.1';
my $dsssl = 'docbook-dsssl-1.79';
chdir '../../..' if (-d '../msvc' && -d '../../../src');
noversion() unless -e 'doc/src/sgml/version.sgml';
do 'src/tools/msvc/buildenv.pl' if -e 'src/tools/msvc/buildenv.pl';
my $docroot = $ENV{DOCROOT};
die "bad DOCROOT '$docroot'" unless ($docroot && -d $docroot);
my @notfound;
foreach my $dir ('docbook', $openjade, $dsssl)
{
push(@notfound, $dir) unless -d "$docroot/$dir";
}
missing() if @notfound;
my $arg = shift;
renamefiles();
chdir 'doc/src/sgml';
$ENV{SGML_CATALOG_FILES} =
"$docroot/$openjade/dsssl/catalog;" . "$docroot/docbook/docbook.cat";
my $cmd;
# openjade exits below with a harmless non-zero status, so we
# can't die on "failure"
$cmd =
"perl mk_feature_tables.pl YES "
. "../../../src/backend/catalog/sql_feature_packages.txt "
. "../../../src/backend/catalog/sql_features.txt "
. "> features-supported.sgml";
system($cmd);
die "features_supported" if $?;
$cmd =
"perl mk_feature_tables.pl NO "
. "\"../../../src/backend/catalog/sql_feature_packages.txt\" "
. "\"../../../src/backend/catalog/sql_features.txt\" "
. "> features-unsupported.sgml";
system($cmd);
die "features_unsupported" if $?;
$cmd =
"perl generate-errcodes-table.pl \"../../../src/backend/utils/errcodes.txt\" "
. "> errcodes-table.sgml";
system($cmd);
die "errcodes-table" if $?;
print "Running first build...\n";
$cmd =
"\"$docroot/$openjade/bin/openjade\" -V html-index -wall "
. "-wno-unused-param -wno-empty -D . -c \"$docroot/$dsssl/catalog\" "
. "-d stylesheet.dsl -i output-html -t sgml postgres.sgml 2>&1 "
. "| findstr /V \"DTDDECL catalog entries are not supported\" ";
system($cmd); # die "openjade" if $?;
print "Running collateindex...\n";
$cmd = "perl \"$docroot/$dsssl/bin/collateindex.pl\" -f -g -i bookindex "
. "-o bookindex.sgml HTML.index";
system($cmd);
die "collateindex" if $?;
mkdir "html";
print "Running second build...\n";
$cmd =
"\"$docroot/$openjade/bin/openjade\" -wall -wno-unused-param -wno-empty "
. "-D . -c \"$docroot/$dsssl/catalog\" -d stylesheet.dsl -t sgml "
. "-i output-html -i include-index postgres.sgml 2>&1 "
. "| findstr /V \"DTDDECL catalog entries are not supported\" ";
system($cmd); # die "openjade" if $?;
copy "stylesheet.css", "html/stylesheet.css";
print "Docs build complete.\n";
exit;
########################################################
sub renamefiles
{
# Rename ISO entity files
my $savedir = getcwd();
chdir "$docroot/docbook";
foreach my $f (glob('ISO*'))
{
next if $f =~ /\.gml$/i;
my $nf = $f;
$nf =~ s/ISO(.*)/ISO-$1.gml/;
move $f, $nf;
}
chdir $savedir;
return;
}
sub missing
{
print STDERR "could not find $docroot/$_\n" foreach (@notfound);
exit 1;
}
sub noversion
{
print STDERR "Could not find version.sgml. ",
"Please run mkvcbuild.pl first!\n";
exit 1;
}