/[MITgcm]/mitgcm.org/devel/buildweb/pkg/swish-e/src/keychar_out.c
ViewVC logotype

Annotation of /mitgcm.org/devel/buildweb/pkg/swish-e/src/keychar_out.c

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.1.1.1 - (hide annotations) (download) (vendor branch)
Fri Sep 20 19:47:29 2002 UTC (22 years, 10 months ago) by adcroft
Branch: Import, MAIN
CVS Tags: baseline, HEAD
Changes since 1.1: +0 -0 lines
File MIME type: text/plain
Importing web-site building process.

1 adcroft 1.1 /*
2     $Id: keychar_out.c,v 1.8 2002/08/22 22:58:39 whmoseley Exp $
3     **
4     ** This program and library is free software; you can redistribute it and/or
5     ** modify it under the terms of the GNU (Library) General Public License
6     ** as published by the Free Software Foundation; either version 2
7     ** of the License, or any later version.
8     **
9     ** This program is distributed in the hope that it will be useful,
10     ** but WITHOUT ANY WARRANTY; without even the implied warranty of
11     ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12     ** GNU (Library) General Public License for more details.
13     **
14     ** You should have received a copy of the GNU (Library) General Public License
15     ** along with this program; if not, write to the Free Software
16     ** Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
17     **
18     **
19     **
20     ** 2001-03-20 rasc own module for this routine (from swish.c)
21     **
22     */
23    
24     #include "swish.h"
25     #include "string.h"
26     #include "error.h"
27     #include "mem.h"
28     #include "search.h"
29     #include "result_output.h"
30     #include "db.h"
31     #include "keychar_out.h"
32    
33    
34    
35    
36     /*
37     ** ----------------------------------------------
38     **
39     ** Module code starts here
40     **
41     ** ----------------------------------------------
42     */
43    
44    
45    
46     /*
47     -- output all indexed words starting with character "keychar"
48     -- keychar == '*' prints all words
49     */
50    
51    
52     void OutputKeyChar (SWISH *sw, int keychar)
53     {
54     IndexFILE *tmpindexlist;
55     int keychar2;
56     char *keywords;
57    
58     if ( !SwishAttach(sw) )
59     SwishAbortLastError( sw );
60    
61     resultHeaderOut(sw,1, "%s\n", INDEXHEADER);
62     /* print out "original" search words */
63     for(tmpindexlist=sw->indexlist;tmpindexlist;tmpindexlist=tmpindexlist->next)
64     {
65     resultHeaderOut(sw,1, "%s:",tmpindexlist->line);
66     if(keychar=='*')
67     {
68     for(keychar2=1;keychar2<256;keychar2++)
69     {
70     keywords=getfilewords(sw,(unsigned char )keychar2,tmpindexlist);
71     for(;keywords && keywords[0];keywords+=strlen(keywords)+1)
72     resultHeaderOut(sw,1, " %s",keywords);
73     }
74     } else {
75     keywords=getfilewords(sw,keychar,tmpindexlist);
76     for(;keywords && keywords[0];keywords+=strlen(keywords)+1)
77     resultHeaderOut(sw,1, " %s",keywords);
78     }
79     resultHeaderOut(sw,1, "\n");
80     }
81    
82     return;
83     }
84    
85    
86    

  ViewVC Help
Powered by ViewVC 1.1.22