2 * Copyright (C) 1994-1995, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.6 1995-09-08 08:53:22 adam
8 * Record buffer maintained in server_info.
10 * Revision 1.5 1995/09/06 16:11:18 adam
11 * Option: only one word key per file.
13 * Revision 1.4 1995/09/06 10:33:04 adam
14 * More work on present. Some log messages removed.
16 * Revision 1.3 1995/09/05 15:28:40 adam
17 * More work on search engine.
19 * Revision 1.2 1995/09/04 12:33:43 adam
20 * Various cleanup. YAZ util used instead.
22 * Revision 1.1 1995/09/04 09:10:41 adam
23 * More work on index add/del/update.
24 * Merge sort implemented.
25 * Initial work on z39 server.
38 ZServerInfo server_info;
40 bend_initresult *bend_init (bend_initrequest *q)
42 static bend_initresult r;
43 static char *name = "zserver";
49 server_info.sets = NULL;
50 if (!(server_info.sys_idx_fd = open (FNAME_SYS_IDX, O_RDONLY)))
53 r.errstring = "dict_open fail: filedict";
56 if (!(server_info.fileDict = dict_open (FNAME_FILE_DICT, 10, 0)))
59 r.errstring = "dict_open fail: filedict";
62 if (!(server_info.wordDict = dict_open (FNAME_WORD_DICT, 40, 0)))
64 dict_close (server_info.fileDict);
66 r.errstring = "dict_open fail: worddict";
69 if (!(server_info.wordIsam = is_open (FNAME_WORD_ISAM, key_compare, 0,
70 sizeof (struct it_key))))
72 dict_close (server_info.wordDict);
73 dict_close (server_info.fileDict);
75 r.errstring = "is_open fail: wordisam";
78 server_info.recordBuf = NULL;
82 bend_searchresult *bend_search (void *handle, bend_searchrequest *q, int *fd)
84 static bend_searchresult r;
90 switch (q->query->which)
93 r.errcode = rpn_search (&server_info, q->query->u.type_1,
94 q->num_bases, q->basenames, q->setname,
103 bend_fetchresult *bend_fetch (void *handle, bend_fetchrequest *q, int *num)
105 static bend_fetchresult r;
107 ZServerRecord *records;
113 xfree (server_info.recordBuf);
114 server_info.recordBuf = NULL;
115 positions[0] = q->number;
116 records = resultSetRecordGet (&server_info, q->setname, 1, positions);
119 logf (LOG_DEBUG, "resultSetRecordGet, error");
126 logf (LOG_DEBUG, "Out of range. pos=%d", q->number);
129 r.len = records[0].size;
130 server_info.recordBuf = r.record = xmalloc (r.len+1);
131 strcpy (r.record, records[0].buf);
132 resultSetRecordDel (&server_info, records, 1);
133 r.format = VAL_SUTRS;
138 bend_deleteresult *bend_delete (void *handle, bend_deleterequest *q, int *num)
143 bend_scanresult *bend_scan (void *handle, bend_scanrequest *q, int *num)
145 static struct scan_entry list[200];
146 static char buf[200][200];
147 static bend_scanresult r;
150 r.term_position = q->term_position;
151 r.num_entries = q->num_entries;
153 for (i = 0; i < r.num_entries; i++)
155 list[i].term = buf[i];
156 sprintf(list[i].term, "term-%d", i+1);
157 list[i].occurrences = rand() % 100000;
164 void bend_close (void *handle)
166 dict_close (server_info.fileDict);
167 dict_close (server_info.wordDict);
168 is_close (server_info.wordIsam);
169 close (server_info.sys_idx_fd);
170 xfree (server_info.recordBuf);
171 server_info.recordBuf = NULL;
175 int main (int argc, char **argv)
177 char *base_name = "base";
179 if (!(common_resource = res_open (base_name)))
181 logf (LOG_FATAL, "Cannot open resource `%s'", base_name);
184 return statserv_main (argc, argv);