]> git.sur5r.net Git - openldap/blob - servers/slapd/backover.c
61f8acbe35ac4290cf711bc0178661285c1e2e0a
[openldap] / servers / slapd / backover.c
1 /* backover.c - backend overlay routines */
2 /* $OpenLDAP$ */
3 /*
4  * Copyright 2003 The OpenLDAP Foundation, All Rights Reserved.
5  * COPYING RESTRICTIONS APPLY, see COPYRIGHT file
6  */
7
8 /*
9  * Functions to overlay other modules over a backend.
10  *
11  *  -- Howard Chu
12  */
13
14 #include "portable.h"
15
16 #include <stdio.h>
17
18 #include <ac/string.h>
19 #include <ac/socket.h>
20
21 #define SLAPD_TOOLS
22 #include "slap.h"
23
24 static slap_overinst *overlays;
25
26 enum db_which { db_open = 0, db_close, db_destroy };
27
28 static int
29 over_db_func(
30         BackendDB *be,
31         enum db_which which
32 )
33 {
34         slap_overinfo *oi = (slap_overinfo *) be->bd_info;
35         slap_overinst *on = oi->oi_list;
36         BackendDB bd;
37         BI_db_open **func;
38         int rc = 0;
39
40         func = &oi->oi_bi.bi_db_open;
41         if ( func[which] ) {
42                 rc = func[which]( &oi->oi_bd );
43                 if ( rc ) return rc;
44         }
45
46         bd = *be;
47         for (; on; on=on->on_next) {
48                 bd.bd_info = &on->on_bi;
49                 func = &on->on_bi.bi_db_open;
50                 if (func[which]) {
51                         rc = func[which]( &bd );
52                         if ( rc ) break;
53                 }
54         }
55         return rc;
56 }
57
58 static int
59 over_db_config(
60         BackendDB *be,
61         const char *fname,
62         int lineno,
63         int argc,
64         char **argv
65 )
66 {
67         slap_overinfo *oi = (slap_overinfo *) be->bd_info;
68         slap_overinst *on = oi->oi_list;
69         BackendDB bd;
70         int rc = 0;
71
72         if ( oi->oi_bi.bi_db_config ) {
73                 rc = oi->oi_bi.bi_db_config( &oi->oi_bd, fname, lineno,
74                         argc, argv );
75                 if ( rc ) return rc;
76         }
77
78         bd = *be;
79         for (; on; on=on->on_next) {
80                 bd.bd_info = &on->on_bi;
81                 if (on->on_bi.bi_db_config) {
82                         rc = on->on_bi.bi_db_config( &bd, fname, lineno,
83                                 argc, argv );
84                         if ( rc ) break;
85                 }
86         }
87         return rc;
88 }
89
90 static int
91 over_db_open(
92         BackendDB *be
93 )
94 {
95         return over_db_func( be, db_open );
96 }
97
98 static int
99 over_db_close(
100         BackendDB *be
101 )
102 {
103         return over_db_func( be, db_close );
104 }
105
106 static int
107 over_db_destroy(
108         BackendDB *be
109 )
110 {
111         slap_overinfo *oi = (slap_overinfo *) be->bd_info;
112         slap_overinst *on = oi->oi_list, *next;
113         int rc;
114
115         rc = over_db_func( be, db_destroy );
116
117         for (next = on->on_next; on; on=next) {
118                 next = on->on_next;
119                 free( on );
120         }
121         free( oi );
122         return rc;
123 }
124
125 static int
126 over_back_response ( Operation *op, SlapReply *rs )
127 {
128         slap_overinfo *oi = (slap_overinfo *) op->o_bd->bd_info;
129         slap_overinst *on = oi->oi_list;
130         int rc = 0;
131         BackendDB *be = op->o_bd, db = *op->o_bd;
132         slap_callback *sc = op->o_callback->sc_private;
133
134         op->o_bd = &db;
135         for (; on; on=on->on_next ) {
136                 if ( on->on_response ) {
137                         db.bd_info = (BackendInfo *)on;
138                         rc = on->on_response( op, rs );
139                         if ( rc ) break;
140                 }
141         }
142         op->o_callback = sc;
143         if ( rc == 0 && sc ) {
144                 rc = sc->sc_response( op, rs );
145         }
146         op->o_bd = be;
147         return rc;
148 }
149
150 enum op_which { op_bind = 0, op_unbind, op_search, op_compare,
151         op_modify, op_modrdn, op_add, op_delete, op_abandon,
152         op_cancel, op_extended };
153
154 static int
155 over_op_func(
156         Operation *op,
157         SlapReply *rs,
158         enum op_which which
159 )
160 {
161         slap_overinfo *oi = (slap_overinfo *) op->o_bd->bd_info;
162         slap_overinst *on = oi->oi_list;
163         BI_op_bind **func;
164         BackendDB *be = op->o_bd, db = *op->o_bd;
165         slap_callback cb = {over_back_response, NULL};
166         int rc = 0;
167
168         op->o_bd = &db;
169         cb.sc_private = op->o_callback;
170         op->o_callback = &cb;
171
172         for (; on; on=on->on_next ) {
173                 func = &on->on_bi.bi_op_bind;
174                 if ( func[which] ) {
175                         db.bd_info = (BackendInfo *)on;
176                         rc = func[which]( op, rs );
177                         if ( rc ) break;
178                 }
179         }
180
181         func = &oi->oi_bi.bi_op_bind;
182         if ( func[which] ) {
183                 rc = func[which]( op, rs );
184         }
185
186         op->o_bd = be;
187         return rc;
188 }
189
190 static int
191 over_op_bind( Operation *op, SlapReply *rs )
192 {
193         return over_op_func( op, rs, op_bind );
194 }
195
196 static int
197 over_op_unbind( Operation *op, SlapReply *rs )
198 {
199         return over_op_func( op, rs, op_unbind );
200 }
201
202 static int
203 over_op_search( Operation *op, SlapReply *rs )
204 {
205         return over_op_func( op, rs, op_search );
206 }
207
208 static int
209 over_op_compare( Operation *op, SlapReply *rs )
210 {
211         return over_op_func( op, rs, op_compare );
212 }
213
214 static int
215 over_op_modify( Operation *op, SlapReply *rs )
216 {
217         return over_op_func( op, rs, op_modify );
218 }
219
220 static int
221 over_op_modrdn( Operation *op, SlapReply *rs )
222 {
223         return over_op_func( op, rs, op_modrdn );
224 }
225
226 static int
227 over_op_add( Operation *op, SlapReply *rs )
228 {
229         return over_op_func( op, rs, op_add );
230 }
231
232 static int
233 over_op_delete( Operation *op, SlapReply *rs )
234 {
235         return over_op_func( op, rs, op_delete );
236 }
237
238 static int
239 over_op_abandon( Operation *op, SlapReply *rs )
240 {
241         return over_op_func( op, rs, op_abandon );
242 }
243
244 static int
245 over_op_cancel( Operation *op, SlapReply *rs )
246 {
247         return over_op_func( op, rs, op_cancel );
248 }
249
250 static int
251 over_op_extended( Operation *op, SlapReply *rs )
252 {
253         return over_op_func( op, rs, op_extended );
254 }
255
256 int
257 overlay_register(
258         slap_overinst *on
259 )
260 {
261         on->on_next = overlays;
262         overlays = on;
263         return 0;
264 }
265
266 static const char overtype[] = "over";
267
268 /* add an overlay to a particular backend. */
269 int
270 overlay_config( BackendDB *be, const char *ov )
271 {
272         slap_overinst *on, *on2, *prev;
273         slap_overinfo *oi;
274         BackendInfo *bi;
275
276         for ( on = overlays; on; on=on->on_next ) {
277                 if (!strcmp( ov, on->on_bi.bi_type ) )
278                         break;
279         }
280         if (!on) {
281                 Debug( LDAP_DEBUG_ANY, "overlay %s not found\n", ov, 0, 0 );
282                 return 1;
283         }
284
285         if ( be->bd_info->bi_type != overtype ) {
286                 oi = ch_malloc( sizeof(slap_overinfo) );
287                 oi->oi_bd = *be;
288                 oi->oi_bi = *be->bd_info;
289                 oi->oi_list = NULL;
290                 bi = (BackendInfo *)oi;
291
292                 bi->bi_type = (char *)overtype;
293
294                 bi->bi_db_config = over_db_config;
295                 bi->bi_db_open = over_db_open;
296                 bi->bi_db_close = over_db_close;
297                 bi->bi_db_destroy = over_db_destroy;
298
299                 bi->bi_op_bind = over_op_bind;
300                 bi->bi_op_unbind = over_op_unbind;
301                 bi->bi_op_search = over_op_search;
302                 bi->bi_op_compare = over_op_compare;
303                 bi->bi_op_modify = over_op_modify;
304                 bi->bi_op_modrdn = over_op_modrdn;
305                 bi->bi_op_add = over_op_add;
306                 bi->bi_op_delete = over_op_delete;
307                 bi->bi_op_abandon = over_op_abandon;
308                 bi->bi_op_cancel = over_op_cancel;
309                 bi->bi_extended = over_op_extended;
310
311                 be->bd_info = bi;
312         }
313
314         oi = (slap_overinfo *) be->bd_info;
315         for ( prev=NULL, on2 = oi->oi_list; on2; prev=on2, on2=on2->on_next );
316         on2 = ch_malloc( sizeof(slap_overinst) );
317         if ( !prev ) {
318                 oi->oi_list = on2;
319         } else {
320                 prev->on_next = on2;
321         }
322         *on2 = *on;
323
324         return 0;
325 }
326