2 * Copyright (C) 1994-1995, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.5 1995-09-06 16:11:18 adam
8 * Option: only one word key per file.
10 * Revision 1.4 1995/09/06 10:33:04 adam
11 * More work on present. Some log messages removed.
13 * Revision 1.3 1995/09/05 15:28:40 adam
14 * More work on search engine.
16 * Revision 1.2 1995/09/04 12:33:43 adam
17 * Various cleanup. YAZ util used instead.
19 * Revision 1.1 1995/09/04 09:10:41 adam
20 * More work on index add/del/update.
21 * Merge sort implemented.
22 * Initial work on z39 server.
35 ZServerInfo server_info;
37 bend_initresult *bend_init (bend_initrequest *q)
39 static bend_initresult r;
40 static char *name = "zserver";
46 server_info.sets = NULL;
47 if (!(server_info.sys_idx_fd = open (FNAME_SYS_IDX, O_RDONLY)))
50 r.errstring = "dict_open fail: filedict";
53 if (!(server_info.fileDict = dict_open (FNAME_FILE_DICT, 10, 0)))
56 r.errstring = "dict_open fail: filedict";
59 if (!(server_info.wordDict = dict_open (FNAME_WORD_DICT, 40, 0)))
61 dict_close (server_info.fileDict);
63 r.errstring = "dict_open fail: worddict";
66 if (!(server_info.wordIsam = is_open (FNAME_WORD_ISAM, key_compare, 0,
67 sizeof (struct it_key))))
69 dict_close (server_info.wordDict);
70 dict_close (server_info.fileDict);
72 r.errstring = "is_open fail: wordisam";
78 bend_searchresult *bend_search (void *handle, bend_searchrequest *q, int *fd)
80 static bend_searchresult r;
86 switch (q->query->which)
89 r.errcode = rpn_search (&server_info, q->query->u.type_1,
90 q->num_bases, q->basenames, q->setname,
99 bend_fetchresult *bend_fetch (void *handle, bend_fetchrequest *q, int *num)
101 static bend_fetchresult r;
103 ZServerRecord *records;
109 positions[0] = q->number;
110 records = resultSetRecordGet (&server_info, q->setname, 1, positions);
113 logf (LOG_DEBUG, "resultSetRecordGet, error");
120 logf (LOG_DEBUG, "Out of range. pos=%d", q->number);
123 r.len = records[0].size;
124 r.record = malloc (r.len+1);
125 strcpy (r.record, records[0].buf);
126 resultSetRecordDel (&server_info, records, 1);
127 r.format = VAL_SUTRS;
132 bend_deleteresult *bend_delete (void *handle, bend_deleterequest *q, int *num)
137 bend_scanresult *bend_scan (void *handle, bend_scanrequest *q, int *num)
139 static struct scan_entry list[200];
140 static char buf[200][200];
141 static bend_scanresult r;
144 r.term_position = q->term_position;
145 r.num_entries = q->num_entries;
147 for (i = 0; i < r.num_entries; i++)
149 list[i].term = buf[i];
150 sprintf(list[i].term, "term-%d", i+1);
151 list[i].occurrences = rand() % 100000;
158 void bend_close (void *handle)
160 dict_close (server_info.fileDict);
161 dict_close (server_info.wordDict);
162 is_close (server_info.wordIsam);
163 close (server_info.sys_idx_fd);
167 int main (int argc, char **argv)
169 char *base_name = "base";
171 if (!(common_resource = res_open (base_name)))
173 logf (LOG_FATAL, "Cannot open resource `%s'", base_name);
176 return statserv_main (argc, argv);