cvs commit: apache-site manual-index.cgi
brian 99/02/28 18:51:38 Removed: .manual-index.cgi Log: I copied the CVS history for this over to apache-1.3/htdocs/manual/search/.
cvs commit: apache-site manual-index.cgi
coar97/08/07 05:17:37 Modified:. manual-index.cgi Log: Work around problem with mod_mime_magic by changing the name of the data file manual-index.cgi uses. Revision ChangesPath 1.8 +1 -1 apache-site/manual-index.cgi Index: manual-index.cgi === RCS file: /export/home/cvs/apache-site/manual-index.cgi,v retrieving revision 1.7 retrieving revision 1.8 diff -u -r1.7 -r1.8 --- manual-index.cgi 1997/07/06 13:54:26 1.7 +++ manual-index.cgi 1997/08/07 12:17:36 1.8 @@ -60,7 +60,7 @@ # apache/htdocs/manual directory of the Apache distribution tree). #*** #*** -$INDEX = "/export/pub/apache/manual-index.dat"; +$INDEX = "/export/pub/apache/manual-index-data"; #*** #***
cvs commit: apache-site manual-index.cgi
coar97/07/06 06:54:26 Modified:. manual-index.cgi Log: Correct the BODY tag's colour attributes to be in RGB values rather than proper colour-names (which older browsers don't understand). Revision ChangesPath 1.7 +8 -1 apache-site/manual-index.cgi Index: manual-index.cgi === RCS file: /export/home/cvs/apache-site/manual-index.cgi,v retrieving revision 1.6 retrieving revision 1.7 diff -C3 -r1.6 -r1.7 *** manual-index.cgi 1997/06/04 00:31:23 1.6 --- manual-index.cgi 1997/07/06 13:54:26 1.7 *** *** 114,120 $title ! $title ! !
cvs commit: apache-site manual-index.cgi
coar97/06/03 17:31:24
Modified:. manual-index.cgi
Log:
Fixed a Perl misteak (used "leave" instead of "last" - too
much BLISS lately.. ;-).
Revision ChangesPath
1.6 +60 -58apache-site/manual-index.cgi
Index: manual-index.cgi
===
RCS file: /export/home/cvs/apache-site/manual-index.cgi,v
retrieving revision 1.5
retrieving revision 1.6
diff -C3 -r1.5 -r1.6
*** manual-index.cgi 1997/06/02 14:53:31 1.5
--- manual-index.cgi 1997/06/04 00:31:23 1.6
***
*** 157,221
# closure code.
#
QUERY:
! if ($word) {
! #
! # Try and open the index file; complain bitterly if we can't.
! #
! if (! open (INDEX, "<$INDEX")) {
! printf ("Can't find documentation index!");
! leave QUERY;
}
- #
- # Got it; display the search-results header.
- #
- printf ($HTML);
- #
- # Read the entire index in and turn it into an hash for the
- # lookup.
- #
- @index = ;
- close (INDEX);
- chomp (@index);
- foreach (@index) {
- ($key, $files) = split (/:/, $_);
- $Index{$key} = $files;
- }
- #
- # The dictionary is all lowercase words. Smash our query value
- # and try to find it.
- #
- $word = lc ($word);
- if (! exists ($Index{$word})) {
- printf (" \n Sorry, no matches found.\n \n");
- leave QUERY;
- }
- #
- # Found an entry, so turn the hash value (a comma-separated list
- # of relative file names) into an array for display.
- # Incidentally, tell the user how many there are.
- #
- @files = split (/,/, $Index{$word});
- printf (" Total of %d match", scalar (@files));
- #
- # Be smart about plurals.
- #
- if (scalar (@files) != 1) {
- printf ("es") ;
- }
- printf (" found.\n \n");
- #
- # Right. Now display the files as they're listed.
- #
- printf (" \n");
- foreach (@files) {
- printf (" ");
- printf ("$_\n");
- printf (" \n");
- }
- printf (" \n");
- #
- # C'est tout!
- #
}
#
--- 157,223
# closure code.
#
QUERY:
! {
! if ($word) {
! #
! # Try and open the index file; complain bitterly if we can't.
! #
! if (! open (INDEX, "<$INDEX")) {
! printf ("Can't find documentation index!");
! last QUERY;
! }
! #
! # Got it; display the search-results header.
! #
! printf ($HTML);
! #
! # Read the entire index in and turn it into an hash for the
! # lookup.
! #
! @index = ;
! close (INDEX);
! chomp (@index);
! foreach (@index) {
! ($key, $files) = split (/:/, $_);
! $Index{$key} = $files;
! }
! #
! # The dictionary is all lowercase words. Smash our query value
! # and try to find it.
! #
! $word = lc ($word);
! if (! exists ($Index{$word})) {
! printf (" \n Sorry, no matches found.\n \n");
! last QUERY;
! }
! #
! # Found an entry, so turn the hash value (a comma-separated list
! # of relative file names) into an array for display.
! # Incidentally, tell the user how many there are.
! #
! @files = split (/,/, $Index{$word});
! printf (" Total of %d match", scalar (@files));
! #
! # Be smart about plurals.
! #
! if (scalar (@files) != 1) {
! printf ("es") ;
! }
! printf (" found.\n \n");
! #
! # Right. Now display the files as they're listed.
! #
! printf (" \n");
! foreach (@files) {
! printf (" ");
! printf ("$_\n");
! printf (" \n");
! }
! printf (" \n");
! #
! # C'est tout!
! #
}
}
#
cvs commit: apache-site manual-index.cgi
coar97/06/02 07:53:32 Modified:. manual-index.cgi Log: Changed prompt on ISINDEX field to say "press ENTER". Turning this into a GET-method form would require parsing I'd rather not add right now.. Submitted by: Rob Hartill Revision ChangesPath 1.5 +1 -1 apache-site/manual-index.cgi Index: manual-index.cgi === RCS file: /export/home/cvs/apache-site/manual-index.cgi,v retrieving revision 1.4 retrieving revision 1.5 diff -C3 -r1.4 -r1.5 *** manual-index.cgi 1997/06/02 10:30:22 1.4 --- manual-index.cgi 1997/06/02 14:53:31 1.5 *** *** 136,142 Documents containing the search word are not listed in any sort of priority order. ! EOHT printf ($HTML); --- 136,142 Documents containing the search word are not listed in any sort of priority order. ! EOHT printf ($HTML);
cvs commit: apache-site manual-index.cgi
coar97/06/02 03:30:23
Modified:. manual-index.cgi
Log:
{sigh} This script was originally designed to be part of the
distribution. Since it's now destined to live only at the
WWW.Apache.Org site, some things need to be hard-coded -
and remote development makes it a little more difficult to
get everything right. This fixes the "home" links in the
context of WWW.Apache.Org.
Revision ChangesPath
1.4 +2 -2 apache-site/manual-index.cgi
Index: manual-index.cgi
===
RCS file: /export/home/cvs/apache-site/manual-index.cgi,v
retrieving revision 1.3
retrieving revision 1.4
diff -C3 -r1.3 -r1.4
*** manual-index.cgi 1997/06/02 10:24:46 1.3
--- manual-index.cgi 1997/06/02 10:30:22 1.4
***
*** 223,231
#
$HTML = <
--- 223,231
#
$HTML = <
cvs commit: apache-site manual-index.cgi
coar97/06/02 03:24:47 Modified:. manual-index.cgi Log: Add attributes defining text colours to make sure text and links are visible with our white background; also added the "home" link. Revision ChangesPath 1.3 +11 -3 apache-site/manual-index.cgi Index: manual-index.cgi === RCS file: /export/home/cvs/apache-site/manual-index.cgi,v retrieving revision 1.2 retrieving revision 1.3 diff -C3 -r1.2 -r1.3 *** manual-index.cgi 1997/05/04 20:59:06 1.2 --- manual-index.cgi 1997/06/02 10:24:46 1.3 *** *** 68,73 --- 68,75 #*** #*** + $HTML = ""; + # # If we have a FILEPATH_INFO or PATH_INFO, it's there to remap the # documents to the manual root directory. If this script is already in *** *** 102,118 # # We'll re-use the HTML scalar several times; we use it with here ! # documents for multi-line statis HTML code. Lets' do the standard page # header. # $HTML = < $title ! $title !
cvs commit: apache-site manual-index.cgi
coar97/05/04 13:59:07 Modified:. manual-index.cgi Log: Correct for Taz's Perl5 location, and likewise the location of the Taz index. Revision ChangesPath 1.2 +2 -2 apache-site/manual-index.cgi Index: manual-index.cgi === RCS file: /export/home/cvs/apache-site/manual-index.cgi,v retrieving revision 1.1 retrieving revision 1.2 diff -C3 -r1.1 -r1.2 *** manual-index.cgi 1997/05/04 20:48:40 1.1 --- manual-index.cgi 1997/05/04 20:59:06 1.2 *** *** 1,4 ! #!/usr/local/bin/perl -w # # Copyright (c) 1995-1997 The Apache Group. All rights reserved. # --- 1,4 ! #!/usr/local/bin/perl5 -w # # Copyright (c) 1995-1997 The Apache Group. All rights reserved. # *** *** 60,66 # apache/htdocs/manual directory of the Apache distribution tree). #*** #*** ! $INDEX = "/export/pub/apache/docs/index.txt"; #*** #*** --- 60,66 # apache/htdocs/manual directory of the Apache distribution tree). #*** #*** ! $INDEX = "/export/pub/apache/manual-index.dat"; #*** #***
cvs commit: apache-site manual-index.cgi
coar97/05/04 13:48:40 Added: . manual-index.cgi Log: New CGI script to do single-neuron searching of the online documentation (actually, of a pre-built index of same).
