e5c4eaad1afaa87d3facafcaa7913d646129c982
[idzebra-moved-to-github.git] / data1 / d1_handle.c
1 /* This file is part of the Zebra server.
2    Copyright (C) 1994-2010 Index Data
3
4 Zebra is free software; you can redistribute it and/or modify it under
5 the terms of the GNU General Public License as published by the Free
6 Software Foundation; either version 2, or (at your option) any later
7 version.
8
9 Zebra is distributed in the hope that it will be useful, but WITHOUT ANY
10 WARRANTY; without even the implied warranty of MERCHANTABILITY or
11 FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
12 for more details.
13
14 You should have received a copy of the GNU General Public License
15 along with this program; if not, write to the Free Software
16 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
17
18 */
19
20 #include <stdio.h>
21 #include <stdlib.h>
22
23 #include <yaz/log.h>
24 #include <idzebra/data1.h>
25
26 #define DATA1_FLAG_XML  1
27
28 struct data1_handle_info {
29     WRBUF wrbuf;
30     char *tab_path;
31     char *tab_root;
32
33     char *read_buf;
34     int read_len;
35
36     data1_absyn_cache absyn_cache;
37     data1_attset_cache attset_cache;
38
39     char *map_buf;
40     int map_len;
41
42     NMEM mem;
43 };
44
45 data1_handle data1_create(void)
46 {
47     data1_handle p = (data1_handle)xmalloc (sizeof(*p));
48     if (!p)
49         return 0;
50     p->tab_path = NULL;
51     p->tab_root = NULL;
52     p->wrbuf = wrbuf_alloc();
53     p->read_buf = NULL;
54     p->read_len = 0;
55     p->map_buf = NULL;
56     p->map_len = 0;
57     p->absyn_cache = NULL;
58     p->attset_cache = NULL;
59     p->mem = nmem_create ();
60     return p;
61 }
62
63 NMEM data1_nmem_get (data1_handle dh)
64 {
65     return dh->mem;
66 }
67
68 data1_absyn_cache *data1_absyn_cache_get (data1_handle dh)
69 {
70     return &dh->absyn_cache;
71 }
72
73 data1_attset_cache *data1_attset_cache_get (data1_handle dh)
74 {
75     return &dh->attset_cache;
76 }
77
78 void data1_destroy (data1_handle dh)
79 {
80     if (!dh)
81         return;
82     
83     /* *ostrich*
84        We need to destroy DFAs, in xp_element (xelm) definitions 
85        pop, 2002-12-13
86     */
87     data1_absyn_destroy(dh);
88
89     wrbuf_destroy(dh->wrbuf);
90     if (dh->tab_path)
91         xfree (dh->tab_path);
92     if (dh->tab_root)
93         xfree (dh->tab_root);
94     if (dh->read_buf)
95         xfree (dh->read_buf);
96     if (dh->map_buf)
97         xfree (dh->map_buf);
98     nmem_destroy (dh->mem);
99     
100     xfree (dh);
101 }
102
103 WRBUF data1_get_wrbuf (data1_handle dp)
104 {
105     return dp->wrbuf;
106 }
107
108 char **data1_get_read_buf (data1_handle dp, int **lenp)
109 {
110     *lenp = &dp->read_len;
111     yaz_log (YLOG_DEBUG, "data1_get_read_buf lenp=%u", **lenp);
112     return &dp->read_buf;
113 }
114
115 char **data1_get_map_buf (data1_handle dp, int **lenp)
116 {
117     *lenp = &dp->map_len;
118     yaz_log (YLOG_DEBUG, "data1_get_map_buf lenp=%u", **lenp);
119     return &dp->map_buf;
120 }
121
122 void data1_set_tabpath (data1_handle dp, const char *p)
123 {
124     xfree (dp->tab_path);
125     dp->tab_path = NULL;
126     if (p)
127         dp->tab_path = xstrdup (p);
128 }
129
130 void data1_set_tabroot (data1_handle dp, const char *p)
131 {
132     xfree (dp->tab_root);
133     dp->tab_root = NULL;
134     if (p)
135         dp->tab_root = xstrdup (p);
136 }
137
138 const char *data1_get_tabpath (data1_handle dp)
139 {
140     return dp->tab_path;
141 }
142
143 const char *data1_get_tabroot (data1_handle dp)
144 {
145     return dp->tab_root;
146 }
147
148 FILE *data1_path_fopen (data1_handle dh, const char *file, const char *mode)
149 {
150     FILE *f;
151     const char *path = data1_get_tabpath(dh);
152     const char *root = data1_get_tabroot(dh);
153
154     yaz_log(YLOG_DEBUG, "data1_path_fopen path=%s root=%s "
155             "file=%s mode=%s", path ? path : "NULL",
156             root ? root : "NULL", file, mode);
157     if (!path || !*path)
158         return 0;
159     f = yaz_fopen(path, file, mode, root);
160     if (!f)
161     {
162         yaz_log(YLOG_WARN|YLOG_ERRNO, "Couldn't open %s", file);
163         if (root)
164             yaz_log(YLOG_LOG, "for root=%s", root);
165         if (path)
166             yaz_log(YLOG_LOG, "for profilePath=%s", path);
167     }
168     return f;
169 }
170
171 int data1_is_xmlmode(data1_handle dh)
172 {
173     return 1;
174 }
175 /*
176  * Local variables:
177  * c-basic-offset: 4
178  * c-file-style: "Stroustrup"
179  * indent-tabs-mode: nil
180  * End:
181  * vim: shiftwidth=4 tabstop=8 expandtab
182  */
183