Move lib/util from source4 to top-level libutil.
[jra/samba/.git] / lib / util / util_ldb.c
1 /*
2    Unix SMB/CIFS implementation.
3
4    common share info functions
5
6    Copyright (C) Andrew Tridgell 2004
7    Copyright (C) Tim Potter 2004
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "lib/events/events.h"
25 #include "lib/ldb/include/ldb.h"
26 #include "lib/ldb/include/ldb_errors.h"
27 #include "lib/util/util_ldb.h"
28 /*
29   search the sam for the specified attributes - va_list variant
30 */
31 int gendb_search_v(struct ldb_context *ldb,
32                    TALLOC_CTX *mem_ctx,
33                    struct ldb_dn *basedn,
34                    struct ldb_message ***msgs,
35                    const char * const *attrs,
36                    const char *format,
37                    va_list ap) 
38 {
39         enum ldb_scope scope = LDB_SCOPE_SUBTREE;
40         struct ldb_result *res;
41         char *expr = NULL;
42         int ret;
43
44         if (format) {
45                 expr = talloc_vasprintf(mem_ctx, format, ap);
46                 if (expr == NULL) {
47                         return -1;
48                 }
49         } else {
50                 scope = LDB_SCOPE_BASE;
51         }
52
53         res = NULL;
54
55         ret = ldb_search(ldb, mem_ctx, &res, basedn, scope, attrs,
56                          expr?"%s":NULL, expr);
57
58         if (ret == LDB_SUCCESS) {
59                 talloc_steal(mem_ctx, res->msgs);
60
61                 DEBUG(6,("gendb_search_v: %s %s -> %d\n",
62                          basedn?ldb_dn_get_linearized(basedn):"NULL",
63                          expr?expr:"NULL", res->count));
64
65                 ret = res->count;
66                 *msgs = res->msgs;
67                 talloc_free(res);
68         } else if (scope == LDB_SCOPE_BASE && ret == LDB_ERR_NO_SUCH_OBJECT) {
69                 ret = 0;
70                 *msgs = NULL;
71         } else {
72                 DEBUG(4,("gendb_search_v: search failed: %s\n",
73                                         ldb_errstring(ldb)));
74                 ret = -1;
75         }
76
77         talloc_free(expr);
78
79         return ret;
80 }
81
82 /*
83   search the LDB for the specified attributes - varargs variant
84 */
85 int gendb_search(struct ldb_context *ldb,
86                  TALLOC_CTX *mem_ctx,
87                  struct ldb_dn *basedn,
88                  struct ldb_message ***res,
89                  const char * const *attrs,
90                  const char *format, ...) 
91 {
92         va_list ap;
93         int count;
94
95         va_start(ap, format);
96         count = gendb_search_v(ldb, mem_ctx, basedn, res, attrs, format, ap);
97         va_end(ap);
98
99         return count;
100 }
101
102 /*
103   search the LDB for a specified record (by DN)
104 */
105
106 int gendb_search_dn(struct ldb_context *ldb,
107                  TALLOC_CTX *mem_ctx,
108                  struct ldb_dn *dn,
109                  struct ldb_message ***res,
110                  const char * const *attrs)
111 {
112         return gendb_search(ldb, mem_ctx, dn, res, attrs, NULL);
113 }
114
115 /*
116   setup some initial ldif in a ldb
117 */
118 int gendb_add_ldif(struct ldb_context *ldb, const char *ldif_string)
119 {
120         struct ldb_ldif *ldif;
121         int ret;
122         ldif = ldb_ldif_read_string(ldb, &ldif_string);
123         if (ldif == NULL) return -1;
124         ret = ldb_add(ldb, ldif->msg);
125         talloc_free(ldif);
126         return ret;
127 }
128
129 char *wrap_casefold(void *context, void *mem_ctx, const char *s, size_t n)
130 {
131         return strupper_talloc_n(mem_ctx, s, n);
132 }
133
134