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