index/zserver.c

   1 /*
   2  * Copyright (C) 1994-1995, Index Data I/S
   3  * All rights reserved.
   4  * Sebastian Hammer, Adam Dickmeiss
   5  *
   6  * $Log: zserver.c,v $
   7  * Revision 1.6  1995-09-08 08:53:22  adam
   8  * Record buffer maintained in server_info.
   9  *
  10  * Revision 1.5  1995/09/06  16:11:18  adam
  11  * Option: only one word key per file.
  12  *
  13  * Revision 1.4  1995/09/06  10:33:04  adam
  14  * More work on present. Some log messages removed.
  15  *
  16  * Revision 1.3  1995/09/05  15:28:40  adam
  17  * More work on search engine.
  18  *
  19  * Revision 1.2  1995/09/04  12:33:43  adam
  20  * Various cleanup. YAZ util used instead.
  21  *
  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.
  26  *
  27  */
  28 #include <stdio.h>
  29 #include <assert.h>
  30 #include <unistd.h>
  31 #include <fcntl.h>
  32
  33 #include "zserver.h"
  34
  35 #include <backend.h>
  36 #include <dmalloc.h>
  37
  38 ZServerInfo server_info;
  39
  40 bend_initresult *bend_init (bend_initrequest *q)
  41 {
  42     static bend_initresult r;
  43     static char *name = "zserver";
  44
  45     r.errcode = 0;
  46     r.errstring = 0;
  47     r.handle = name;
  48
  49     server_info.sets = NULL;
  50     if (!(server_info.sys_idx_fd = open (FNAME_SYS_IDX, O_RDONLY)))
  51     {
  52         r.errcode = 1;
  53         r.errstring = "dict_open fail: filedict";
  54         return &r;
  55     }
  56     if (!(server_info.fileDict = dict_open (FNAME_FILE_DICT, 10, 0)))
  57     {
  58         r.errcode = 1;
  59         r.errstring = "dict_open fail: filedict";
  60         return &r;
  61     }
  62     if (!(server_info.wordDict = dict_open (FNAME_WORD_DICT, 40, 0)))
  63     {
  64         dict_close (server_info.fileDict);
  65         r.errcode = 1;
  66         r.errstring = "dict_open fail: worddict";
  67         return &r;
  68     }
  69     if (!(server_info.wordIsam = is_open (FNAME_WORD_ISAM, key_compare, 0,
  70                                           sizeof (struct it_key))))
  71     {
  72         dict_close (server_info.wordDict);
  73         dict_close (server_info.fileDict);
  74         r.errcode = 1;
  75         r.errstring = "is_open fail: wordisam";
  76         return &r;
  77     }
  78     server_info.recordBuf = NULL;
  79     return &r;
  80 }
  81
  82 bend_searchresult *bend_search (void *handle, bend_searchrequest *q, int *fd)
  83 {
  84     static bend_searchresult r;
  85
  86     r.errcode = 0;
  87     r.errstring = 0;
  88     r.hits = 0;
  89
  90     switch (q->query->which)
  91     {
  92     case Z_Query_type_1:
  93         r.errcode = rpn_search (&server_info, q->query->u.type_1,
  94                                 q->num_bases, q->basenames, q->setname,
  95                                 &r.hits);
  96         break;
  97     default:
  98         r.errcode = 107;
  99     }
 100     return &r;
 101 }
 102
 103 bend_fetchresult *bend_fetch (void *handle, bend_fetchrequest *q, int *num)
 104 {
 105     static bend_fetchresult r;
 106     int positions[2];
 107     ZServerRecord *records;
 108
 109     r.errstring = 0;
 110     r.last_in_set = 0;
 111     r.basename = "base";
 112
 113     xfree (server_info.recordBuf);
 114     server_info.recordBuf = NULL;
 115     positions[0] = q->number;
 116     records = resultSetRecordGet (&server_info, q->setname, 1, positions);
 117     if (!records)
 118     {
 119         logf (LOG_DEBUG, "resultSetRecordGet, error");
 120         r.errcode = 13;
 121         return &r;
 122     }
 123     if (!records[0].buf)
 124     {
 125         r.errcode = 13;
 126         logf (LOG_DEBUG, "Out of range. pos=%d", q->number);
 127         return &r;
 128     }
 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;
 134     r.errcode = 0;
 135     return &r;
 136 }
 137
 138 bend_deleteresult *bend_delete (void *handle, bend_deleterequest *q, int *num)
 139 {
 140     return 0;
 141 }
 142
 143 bend_scanresult *bend_scan (void *handle, bend_scanrequest *q, int *num)
 144 {
 145     static struct scan_entry list[200];
 146     static char buf[200][200];
 147     static bend_scanresult r;
 148     int i;
 149
 150     r.term_position = q->term_position;
 151     r.num_entries = q->num_entries;
 152     r.entries = list;
 153     for (i = 0; i < r.num_entries; i++)
 154     {
 155         list[i].term = buf[i];
 156         sprintf(list[i].term, "term-%d", i+1);
 157         list[i].occurrences = rand() % 100000;
 158     }
 159     r.errcode = 0;
 160     r.errstring = 0;
 161     return &r;
 162 }
 163
 164 void bend_close (void *handle)
 165 {
 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;
 172     return;
 173 }
 174
 175 int main (int argc, char **argv)
 176 {
 177     char *base_name = "base";
 178
 179     if (!(common_resource = res_open (base_name)))
 180     {
 181         logf (LOG_FATAL, "Cannot open resource `%s'", base_name);
 182         exit (1);
 183     }
 184     return statserv_main (argc, argv);
 185 }