1 /* $Id: recctrl.c,v 1.6 2007-02-07 12:08:54 adam Exp $
2 Copyright (C) 1995-2007
5 This file is part of the Zebra server.
7 Zebra is free software; you can redistribute it and/or modify it under
8 the terms of the GNU General Public License as published by the Free
9 Software Foundation; either version 2, or (at your option) any later
12 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
13 WARRANTY; without even the implied warranty of MERCHANTABILITY or
14 FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
32 #include <idzebra/util.h>
33 #include <idzebra/recctrl.h>
37 struct recTypeClass *next;
41 struct recTypeInstance {
43 struct recTypeInstance *next;
50 struct recTypeInstance *entries;
53 static void recTypeClass_add (struct recTypeClass **rts, RecType *rt,
54 NMEM nmem, void *module_handle);
57 RecTypeClass recTypeClass_create (Res res, NMEM nmem)
59 struct recTypeClass *rts = 0;
61 #ifdef IDZEBRA_STATIC_GRS_SGML
64 extern RecType idzebra_filter_grs_sgml[];
65 recTypeClass_add (&rts, idzebra_filter_grs_sgml, nmem, 0);
69 #ifdef IDZEBRA_STATIC_TEXT
72 extern RecType idzebra_filter_text[];
73 recTypeClass_add (&rts, idzebra_filter_text, nmem, 0);
77 #ifdef IDZEBRA_STATIC_GRS_XML
81 extern RecType idzebra_filter_grs_xml[];
82 recTypeClass_add (&rts, idzebra_filter_grs_xml, nmem, 0);
87 #ifdef IDZEBRA_STATIC_GRS_REGX
90 extern RecType idzebra_filter_grs_regx[];
91 recTypeClass_add (&rts, idzebra_filter_grs_regx, nmem, 0);
95 #ifdef IDZEBRA_STATIC_GRS_MARC
98 extern RecType idzebra_filter_grs_marc[];
99 recTypeClass_add (&rts, idzebra_filter_grs_marc, nmem, 0);
103 #ifdef IDZEBRA_STATIC_SAFARI
106 extern RecType idzebra_filter_safari[];
107 recTypeClass_add (&rts, idzebra_filter_safari, nmem, 0);
111 #ifdef IDZEBRA_STATIC_ALVIS
114 extern RecType idzebra_filter_alvis[];
115 recTypeClass_add (&rts, idzebra_filter_alvis, nmem, 0);
119 #ifdef IDZEBRA_STATIC_DOM
122 extern RecType idzebra_filter_dom[];
123 recTypeClass_add (&rts, idzebra_filter_dom, nmem, 0);
130 static void load_from_dir(RecTypeClass *rts, NMEM nmem, const char *dirname)
133 DIR *dir = opendir(dirname);
138 while ((de = readdir(dir)))
140 size_t dlen = strlen(de->d_name);
142 !memcmp(de->d_name, "mod-", 4) &&
143 !strcmp(de->d_name + dlen - 3, ".so"))
146 char fname[FILENAME_MAX*2+1];
147 sprintf(fname, "%.*s/%.*s",
148 FILENAME_MAX, dirname,
149 FILENAME_MAX, de->d_name);
150 mod_p = dlopen(fname, RTLD_NOW|RTLD_GLOBAL);
151 if (mod_p && (fl = dlsym(mod_p, "idzebra_filter")))
153 yaz_log(YLOG_LOG, "Loaded filter module %s", fname);
154 recTypeClass_add(rts, fl, nmem, mod_p);
158 const char *err = dlerror();
159 yaz_log(YLOG_WARN, "dlsym failed %s %s",
160 fname, err ? err : "none");
165 const char *err = dlerror();
166 yaz_log(YLOG_WARN, "dlopen failed %s %s",
167 fname, err ? err : "none");
177 void recTypeClass_load_modules(RecTypeClass *rts, NMEM nmem,
178 const char *module_path)
182 const char *comp_ptr;
183 char comp[FILENAME_MAX+1];
186 len = yaz_filepath_comp(&module_path, &comp_ptr);
187 if (!len || len >= FILENAME_MAX)
190 memcpy(comp, comp_ptr, len);
193 load_from_dir(rts, nmem, comp);
197 static void recTypeClass_add(struct recTypeClass **rts, RecType *rt,
198 NMEM nmem, void *module_handle)
202 struct recTypeClass *r = (struct recTypeClass *)
203 nmem_malloc (nmem, sizeof(*r));
208 r->module_handle = module_handle;
209 module_handle = 0; /* so that we only store module_handle once */
216 void recTypeClass_info(RecTypeClass rtc, void *cd,
217 void (*cb)(void *cd, const char *s))
219 for (; rtc; rtc = rtc->next)
220 (*cb)(cd, rtc->recType->name);
223 void recTypeClass_destroy(RecTypeClass rtc)
225 for (; rtc; rtc = rtc->next)
228 if (rtc->module_handle)
229 dlclose(rtc->module_handle);
234 RecTypes recTypes_init(RecTypeClass rtc, data1_handle dh)
236 RecTypes rts = (RecTypes) nmem_malloc(data1_nmem_get(dh), sizeof(*rts));
238 struct recTypeInstance **rti = &rts->entries;
242 for (; rtc; rtc = rtc->next)
244 *rti = nmem_malloc(data1_nmem_get(dh), sizeof(**rti));
245 (*rti)->recType = rtc->recType;
246 (*rti)->init_flag = 0;
253 void recTypes_destroy (RecTypes rts)
255 struct recTypeInstance *rti;
257 for (rti = rts->entries; rti; rti = rti->next)
260 (*(rti->recType)->destroy)(rti->clientData);
264 RecType recType_byName (RecTypes rts, Res res, const char *name,
267 struct recTypeInstance *rti;
269 for (rti = rts->entries; rti; rti = rti->next)
271 size_t slen = strlen(rti->recType->name);
272 if (!strncmp (rti->recType->name, name, slen)
273 && (name[slen] == '\0' || name[slen] == '.'))
279 (*(rti->recType)->init)(res, rti->recType);
281 *clientDataP = rti->clientData;
285 if (rti->recType->config)
287 if ((*(rti->recType)->config)
288 (rti->clientData, res, name+slen) != ZEBRA_OK)
300 * indent-tabs-mode: nil
302 * vim: shiftwidth=4 tabstop=8 expandtab