d4fc67c2d401c5db25a0ad6787dbb6f2ae713763
[bbaumbach/samba-autobuild/.git] / source4 / lib / ldb / ldb_tdb / ldb_tdb_wrap.c
1 /* 
2    ldb database library
3
4    Copyright (C) Andrew Tridgell  2005
5
6      ** NOTE! The following LGPL license applies to the ldb
7      ** library. This does NOT imply that all of Samba is released
8      ** under the LGPL
9    
10    This library is free software; you can redistribute it and/or
11    modify it under the terms of the GNU Lesser General Public
12    License as published by the Free Software Foundation; either
13    version 2 of the License, or (at your option) any later version.
14
15    This library is distributed in the hope that it will be useful,
16    but WITHOUT ANY WARRANTY; without even the implied warranty of
17    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18    Lesser General Public License for more details.
19
20    You should have received a copy of the GNU Lesser General Public
21    License along with this library; if not, write to the Free Software
22    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
23 */
24
25 #include "includes.h"
26 #include "ldb/include/includes.h"
27
28 #include "ldb/ldb_tdb/ldb_tdb.h"
29
30 /*
31   the purpose of this code is to work around the braindead posix locking
32   rules, to allow us to have a ldb open more than once while allowing 
33   locking to work
34 */
35
36 struct ltdb_wrap {
37         struct ltdb_wrap *next, *prev;
38         struct tdb_context *tdb;
39         dev_t device;
40         ino_t inode;
41 };
42
43 static struct ltdb_wrap *tdb_list;
44
45 /* destroy the last connection to a tdb */
46 static int ltdb_wrap_destructor(void *ctx)
47 {
48         struct ltdb_wrap *w = talloc_get_type(ctx, struct ltdb_wrap);
49         tdb_close(w->tdb);
50         if (w->next) {
51                 w->next->prev = w->prev;
52         }
53         if (w->prev) {
54                 w->prev->next = w->next;
55         }
56         if (w == tdb_list) {
57                 tdb_list = w->next;
58         }
59         return 0;
60 }                                
61
62 /*
63   wrapped connection to a tdb database. The caller should _not_ free
64   this as it is not a talloc structure (as tdb does not use talloc
65   yet). It will auto-close when the caller frees the mem_ctx that is
66   passed to this call
67  */
68 struct tdb_context *ltdb_wrap_open(TALLOC_CTX *mem_ctx,
69                                    const char *path, int hash_size, int tdb_flags,
70                                    int open_flags, mode_t mode)
71 {
72         struct ltdb_wrap *w;
73         struct stat st;
74
75         if (stat(path, &st) == 0) {
76                 for (w=tdb_list;w;w=w->next) {
77                         if (st.st_dev == w->device && st.st_ino == w->inode) {
78                                 talloc_reference(mem_ctx, w);
79                                 return w->tdb;
80                         }
81                 }
82         }
83
84         w = talloc(mem_ctx, struct ltdb_wrap);
85         if (w == NULL) {
86                 return NULL;
87         }
88
89         w->tdb = tdb_open(path, hash_size, tdb_flags, open_flags, mode);
90         if (w->tdb == NULL) {
91                 talloc_free(w);
92                 return NULL;
93         }
94
95         if (fstat(tdb_fd(w->tdb), &st) != 0) {
96                 tdb_close(w->tdb);
97                 talloc_free(w);
98                 return NULL;
99         }
100
101         w->device = st.st_dev;
102         w->inode  = st.st_ino;
103
104         talloc_set_destructor(w, ltdb_wrap_destructor);
105
106         w->next = tdb_list;
107         w->prev = NULL;
108         if (tdb_list) {
109                 tdb_list->prev = w;
110         }
111         tdb_list = w;
112         
113         return w->tdb;
114 }
115