Work on dict_compact routine.
[idzebra-moved-to-github.git] / dict / open.c
1 /*
2  * Copyright (C) 1994-1999, Index Data
3  * All rights reserved.
4  * Sebastian Hammer, Adam Dickmeiss
5  *
6  * $Log: open.c,v $
7  * Revision 1.14  1999-03-09 13:07:06  adam
8  * Work on dict_compact routine.
9  *
10  * Revision 1.13  1999/02/02 14:50:27  adam
11  * Updated WIN32 code specific sections. Changed header.
12  *
13  * Revision 1.12  1997/09/17 12:19:07  adam
14  * Zebra version corresponds to YAZ version 1.4.
15  * Changed Zebra server so that it doesn't depend on global common_resource.
16  *
17  * Revision 1.11  1996/10/29 14:00:05  adam
18  * Page size given by DICT_DEFAULT_PAGESIZE in dict.h.
19  *
20  * Revision 1.10  1996/05/24 14:46:04  adam
21  * Added dict_grep_cmap function to define user-mapping in grep lookups.
22  *
23  * Revision 1.9  1996/02/02  13:43:51  adam
24  * The public functions simply use char instead of Dict_char to represent
25  * search strings. Dict_char is used internally only.
26  *
27  * Revision 1.8  1995/12/07  11:48:56  adam
28  * Insert operation obeys DICT_type = 1 (slack in page).
29  * Function dict_open exists if page size or magic aren't right.
30  *
31  * Revision 1.7  1995/09/04  12:33:32  adam
32  * Various cleanup. YAZ util used instead.
33  *
34  * Revision 1.6  1994/10/05  12:16:52  adam
35  * Pagesize is a resource now.
36  *
37  * Revision 1.5  1994/09/01  17:49:39  adam
38  * Removed stupid line. Work on insertion in dictionary. Not finished yet.
39  *
40  * Revision 1.4  1994/09/01  17:44:10  adam
41  * depend include change.
42  *
43  * Revision 1.3  1994/08/18  12:40:58  adam
44  * Some development of dictionary. Not finished at all!
45  *
46  * Revision 1.2  1994/08/17  13:32:20  adam
47  * Use cache in dict - not in bfile.
48  *
49  * Revision 1.1  1994/08/16  16:26:49  adam
50  * Added dict.
51  *
52  */
53
54 #include <stdlib.h>
55 #include <string.h>
56 #include <stdio.h>
57
58 #include <dict.h>
59
60 Dict dict_open (BFiles bfs, const char *name, int cache, int rw)
61 {
62     Dict dict;
63     void *head_buf;
64     struct Dict_head *dh;
65     char resource_str[80];
66     int page_size;
67
68     dict = xmalloc (sizeof(*dict));
69
70     if (cache < 5)
71         cache = 5;
72     sprintf (resource_str, "dict.%s.pagesize", name);
73
74     dict->grep_cmap = NULL;
75     page_size = DICT_DEFAULT_PAGESIZE;
76     if (page_size < 2048)
77     {
78         logf (LOG_WARN, "Resource %s was too small. Set to 2048",
79               resource_str);
80         page_size = 2048;
81     }
82     dict->dbf = dict_bf_open (bfs, name, page_size, cache, rw);
83     dict->rw = rw;
84
85     if(!dict->dbf)
86     {
87         logf (LOG_WARN, "Cannot open `%s'", name);
88         xfree (dict);
89         return NULL;
90     }
91     if (dict_bf_readp (dict->dbf, 0, &head_buf) <= 0)
92     {
93         if (rw) 
94         {   /* create header with information (page 0) */
95             dict_bf_newp (dict->dbf, 0, &head_buf);
96             dh = (struct Dict_head *) head_buf;
97             strcpy(dh->magic_str, DICT_MAGIC);
98             dh->free_list = dh->last = 1;
99             dh->page_size = page_size;
100             memcpy (&dict->head, dh, sizeof(*dh));
101         }
102         else
103         {   /* no header present, i.e. no dictionary at all */
104             dict->head.free_list = dict->head.last = 0;
105             dict->head.page_size = page_size;
106         }
107     }
108     else /* header was there, check magic and page size */
109     {
110         dh = (struct Dict_head *) head_buf;
111         if (strcmp (dh->magic_str, DICT_MAGIC))
112         {
113             logf (LOG_WARN, "Bad magic of `%s'", name);
114             exit (1);
115         }
116         if (dh->page_size != page_size)
117         {
118             logf (LOG_WARN, "Resource %s is %d and pagesize of `%s' is %d",
119                   resource_str, page_size, name, dh->page_size);
120             exit (1);
121         }
122         memcpy (&dict->head, dh, sizeof(*dh));
123     }
124     return dict;
125 }
126
127 int dict_strcmp (const Dict_char *s1, const Dict_char *s2)
128 {
129     return strcmp ((const char *) s1, (const char *) s2);
130 }
131
132 int dict_strlen (const Dict_char *s)
133 {
134     return strlen((const char *) s);
135 }