os/doc
3
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Disable PDF/PostScript output option for catman-only releases (e.g. OpenBSD-*)

Browse source
This commit is contained in:
Wolfram Schneider 2008-11-09 18:29:53 +00:00
parent c094c02cac
commit 99e4a990c0
Notes: svn2git 2020-12-08 03:00:23 +00:00 
svn path=/www/; revision=33189
1 changed files with 48 additions and 9 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

57
en/cgi/man.cgi
View file

@ -33,8 +33,8 @@
# BSDI Id: bsdi-man,v 1.2 1995/01/11 02:30:01 polk Exp # BSDI Id: bsdi-man,v 1.2 1995/01/11 02:30:01 polk Exp
# Dual CGI/Plexus mode and new interface by sanders@bsdi.com 9/22/1995 # Dual CGI/Plexus mode and new interface by sanders@bsdi.com 9/22/1995
# #
# $Id: man.cgi,v 1.223 2008-11-09 17:52:24 wosch Exp $ # $Id: man.cgi,v 1.224 2008-11-09 18:29:53 wosch Exp $
# $FreeBSD: www/en/cgi/man.cgi,v 1.222 2008/09/22 19:13:42 wosch Exp $ # $FreeBSD: www/en/cgi/man.cgi,v 1.223 2008/11/09 17:52:24 wosch Exp $
############################################################################ ############################################################################
# !!! man.cgi is stale perl4 code !!! # !!! man.cgi is stale perl4 code !!!
@ -403,6 +403,44 @@ $manPathDefault = 'FreeBSD 7.0-RELEASE';
"OpenDarwin 7.2.1", "$manLocalDir/OpenDarwin-7.2.1", "OpenDarwin 7.2.1", "$manLocalDir/OpenDarwin-7.2.1",
); );
my @no_pdf_output = (
'386BSD 0.0',
'386BSD 0.1',
'4.4BSD Lite2',
'NetBSD 0.9',
'NetBSD 1.0',
'NetBSD 1.1',
'NetBSD 1.2',
'NetBSD 1.2.1',
'OpenBSD 2.0',
'OpenBSD 2.1',
'OpenBSD 2.2',
'OpenBSD 2.3',
'OpenBSD 2.4',
'OpenBSD 2.5',
'OpenBSD 2.6',
'OpenBSD 2.7',
'OpenBSD 2.8',
'OpenBSD 2.9',
'OpenBSD 3.0',
'OpenBSD 3.1',
'OpenBSD 3.2',
'OpenBSD 3.3',
'OpenBSD 3.4',
'OpenBSD 3.5',
'OpenBSD 3.6',
'OpenBSD 3.7',
'OpenBSD 3.8',
'OpenBSD 3.9',
'OpenBSD 4.0',
'OpenBSD 4.1',
'OpenBSD 4.2',
'OpenBSD 4.3',
'OpenBSD 4.4',
);
my %no_pdf_output = map { $_ => 1 } @no_pdf_output;
# delete not existing releases # delete not existing releases
while ( ( $key, $val ) = each %manPath ) { while ( ( $key, $val ) = each %manPath ) {
my $counter = 0; my $counter = 0;
@ -591,6 +629,8 @@ sub do_man {
} }
} }
$format = 'html' if $no_pdf_output{$manpath} && $format =~ /^(ps|pdf)$/;
local ($fform) = &dec($form); local ($fform) = &dec($form);
if ( $fform =~ m%^([a-zA-Z_\-\.:]+)$% ) { if ( $fform =~ m%^([a-zA-Z_\-\.:]+)$% ) {
return &man( $1, '' ); return &man( $1, '' );
@ -1288,13 +1328,12 @@ ETX
<select name="format"> <select name="format">
ETX ETX
foreach ( my @format = ('html');
'html', 'ps', 'pdf', push( @format, ( 'pdf', 'ps' ) ) if !$no_pdf_output{$manpath};
push( @format, ( 'latin1', 'ascii' ) )
; # you need a 8 bit clean man, e.g. jp-man
# you need a 8 bit clean man, e.g. jp-man foreach (@format) {
'ascii', 'latin1'
)
{
print qq{<option value="$_">$_</option>\n}; print qq{<option value="$_">$_</option>\n};
} }
@ -1334,7 +1373,7 @@ sub faq {
} }
local $id = local $id =
'$FreeBSD: www/en/cgi/man.cgi,v 1.222 2008/09/22 19:13:42 wosch Exp $'; '$FreeBSD: www/en/cgi/man.cgi,v 1.223 2008/11/09 17:52:24 wosch Exp $';
return qq{\ return qq{\
<pre> <pre>
Copyright (c) 1996-2008 <a href="$mailtoURL">Wolfram Schneider</a> Copyright (c) 1996-2008 <a href="$mailtoURL">Wolfram Schneider</a>