xref: /freebsd-11-stable/contrib/groff/src/libs/libbib/search.cpp (revision 22e7cbb8744990e63e02dc3985780d932c67b1a4)
1 // -*- C++ -*-
2 /* Copyright (C) 1989, 1990, 1991, 1992, 2000, 2001
3    Free Software Foundation, Inc.
4      Written by James Clark (jjc@jclark.com)
5 
6 This file is part of groff.
7 
8 groff is free software; you can redistribute it and/or modify it under
9 the terms of the GNU General Public License as published by the Free
10 Software Foundation; either version 2, or (at your option) any later
11 version.
12 
13 groff is distributed in the hope that it will be useful, but WITHOUT ANY
14 WARRANTY; without even the implied warranty of MERCHANTABILITY or
15 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
16 for more details.
17 
18 You should have received a copy of the GNU General Public License along
19 with groff; see the file COPYING.  If not, write to the Free Software
20 Foundation, 51 Franklin St - Fifth Floor, Boston, MA 02110-1301, USA. */
21 
22 #include "lib.h"
23 
24 #include <stdlib.h>
25 #include <assert.h>
26 #include <errno.h>
27 
28 #include "posix.h"
29 #include "errarg.h"
30 #include "error.h"
31 #include "nonposix.h"
32 
33 #include "refid.h"
34 #include "search.h"
35 
36 int linear_truncate_len = 6;
37 const char *linear_ignore_fields = "XYZ";
38 
search_list()39 search_list::search_list()
40 : list(0), niterators(0), next_fid(1)
41 {
42 }
43 
~search_list()44 search_list::~search_list()
45 {
46   assert(niterators == 0);
47   while (list) {
48     search_item *tem = list->next;
49     delete list;
50     list = tem;
51   }
52 }
53 
add_file(const char * filename,int silent)54 void search_list::add_file(const char *filename, int silent)
55 {
56   search_item *p = make_index_search_item(filename, next_fid);
57   if (!p) {
58     int fd = open(filename, O_RDONLY | O_BINARY);
59     if (fd < 0) {
60       if (!silent)
61 	error("can't open `%1': %2", filename, strerror(errno));
62     }
63     else
64       p = make_linear_search_item(fd, filename, next_fid);
65   }
66   if (p) {
67     search_item **pp;
68     for (pp = &list; *pp; pp = &(*pp)->next)
69       ;
70     *pp = p;
71     next_fid = p->next_filename_id();
72   }
73 }
74 
nfiles() const75 int search_list::nfiles() const
76 {
77   int n = 0;
78   for (search_item *ptr = list; ptr; ptr = ptr->next)
79     n++;
80   return n;
81 }
82 
search_list_iterator(search_list * p,const char * q)83 search_list_iterator::search_list_iterator(search_list *p, const char *q)
84 : list(p), ptr(p->list), iter(0), query(strsave(q)),
85   searcher(q, strlen(q), linear_ignore_fields, linear_truncate_len)
86 {
87   list->niterators += 1;
88 }
89 
~search_list_iterator()90 search_list_iterator::~search_list_iterator()
91 {
92   list->niterators -= 1;
93   a_delete query;
94   delete iter;
95 }
96 
next(const char ** pp,int * lenp,reference_id * ridp)97 int search_list_iterator::next(const char **pp, int *lenp, reference_id *ridp)
98 {
99   while (ptr) {
100     if (iter == 0)
101       iter = ptr->make_search_item_iterator(query);
102     if (iter->next(searcher, pp, lenp, ridp))
103       return 1;
104     delete iter;
105     iter = 0;
106     ptr = ptr->next;
107   }
108   return 0;
109 }
110 
search_item(const char * nm,int fid)111 search_item::search_item(const char *nm, int fid)
112 : name(strsave(nm)), filename_id(fid), next(0)
113 {
114 }
115 
~search_item()116 search_item::~search_item()
117 {
118   a_delete name;
119 }
120 
is_named(const char * nm) const121 int search_item::is_named(const char *nm) const
122 {
123   return strcmp(name, nm) == 0;
124 }
125 
next_filename_id() const126 int search_item::next_filename_id() const
127 {
128   return filename_id + 1;
129 }
130 
~search_item_iterator()131 search_item_iterator::~search_item_iterator()
132 {
133 }
134