pidl:NDR: keep interface->{ORIGINAL}
[Samba.git] / lib / dbwrap / dbwrap_util.c
blob22f910de992534871de7d62f4b44c3c48db3a2df
1 /*
2 Unix SMB/CIFS implementation.
3 Utility functions for the dbwrap API
4 Copyright (C) Volker Lendecke 2007
5 Copyright (C) Michael Adam 2009
6 Copyright (C) Jim McDonough <jmcd@us.ibm.com> 2006
8 Major code contributions from Aleksey Fedoseev (fedoseev@ru.ibm.com)
10 This program is free software; you can redistribute it and/or modify
11 it under the terms of the GNU General Public License as published by
12 the Free Software Foundation; either version 2 of the License, or
13 (at your option) any later version.
15 This program 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
18 GNU General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
25 #include "includes.h"
26 #include "dbwrap.h"
27 #include "lib/util/util_tdb.h"
29 struct dbwrap_fetch_int32_state {
30 NTSTATUS status;
31 int32_t result;
34 static void dbwrap_fetch_int32_parser(TDB_DATA key, TDB_DATA data,
35 void *private_data)
37 struct dbwrap_fetch_int32_state *state =
38 (struct dbwrap_fetch_int32_state *)private_data;
40 if (data.dsize != sizeof(state->result)) {
41 state->status = NT_STATUS_INTERNAL_DB_CORRUPTION;
42 return;
44 state->result = IVAL(data.dptr, 0);
45 state->status = NT_STATUS_OK;
48 NTSTATUS dbwrap_fetch_int32(struct db_context *db, TDB_DATA key,
49 int32_t *result)
51 struct dbwrap_fetch_int32_state state;
52 NTSTATUS status;
54 if (result == NULL) {
55 return NT_STATUS_INVALID_PARAMETER;
58 state.status = NT_STATUS_INTERNAL_ERROR;
60 status = dbwrap_parse_record(db, key, dbwrap_fetch_int32_parser, &state);
61 if (!NT_STATUS_IS_OK(status)) {
62 return status;
65 if (NT_STATUS_IS_OK(state.status)) {
66 *result = state.result;
68 return state.status;
71 NTSTATUS dbwrap_fetch_int32_bystring(struct db_context *db, const char *keystr,
72 int32_t *result)
74 return dbwrap_fetch_int32(db, string_term_tdb_data(keystr), result);
77 NTSTATUS dbwrap_store_int32_bystring(struct db_context *db, const char *keystr,
78 int32_t v)
80 struct db_record *rec;
81 int32_t v_store;
82 NTSTATUS status;
84 rec = dbwrap_fetch_locked(db, talloc_tos(),
85 string_term_tdb_data(keystr));
86 if (rec == NULL) {
87 return NT_STATUS_UNSUCCESSFUL;
90 SIVAL(&v_store, 0, v);
92 status = dbwrap_record_store(rec,
93 make_tdb_data((const uint8_t *)&v_store,
94 sizeof(v_store)),
95 TDB_REPLACE);
96 TALLOC_FREE(rec);
97 return status;
100 struct dbwrap_fetch_uint32_state {
101 NTSTATUS status;
102 uint32_t result;
105 static void dbwrap_fetch_uint32_parser(TDB_DATA key, TDB_DATA data,
106 void *private_data)
108 struct dbwrap_fetch_uint32_state *state =
109 (struct dbwrap_fetch_uint32_state *)private_data;
111 if (data.dsize != sizeof(state->result)) {
112 state->status = NT_STATUS_INTERNAL_DB_CORRUPTION;
113 return;
115 state->result = IVAL(data.dptr, 0);
116 state->status = NT_STATUS_OK;
119 NTSTATUS dbwrap_fetch_uint32_bystring(struct db_context *db,
120 const char *keystr, uint32_t *val)
122 struct dbwrap_fetch_uint32_state state;
123 NTSTATUS status;
125 if (val == NULL) {
126 return NT_STATUS_INVALID_PARAMETER;
129 state.status = NT_STATUS_INTERNAL_ERROR;
131 status = dbwrap_parse_record(db, string_term_tdb_data(keystr),
132 dbwrap_fetch_uint32_parser, &state);
133 if (!NT_STATUS_IS_OK(status)) {
134 return status;
136 if (NT_STATUS_IS_OK(state.status)) {
137 *val = state.result;
139 return state.status;
142 NTSTATUS dbwrap_store_uint32_bystring(struct db_context *db,
143 const char *keystr, uint32_t v)
145 struct db_record *rec;
146 uint32_t v_store;
147 NTSTATUS status;
149 rec = dbwrap_fetch_locked(db, talloc_tos(),
150 string_term_tdb_data(keystr));
151 if (rec == NULL) {
152 return NT_STATUS_INVALID_PARAMETER;
155 SIVAL(&v_store, 0, v);
157 status = dbwrap_record_store(rec,
158 make_tdb_data((const uint8_t *)&v_store,
159 sizeof(v_store)),
160 TDB_REPLACE);
161 TALLOC_FREE(rec);
162 return status;
166 * Atomic unsigned integer change (addition):
168 * if value does not exist yet in the db, use *oldval as initial old value.
169 * return old value in *oldval.
170 * store *oldval + change_val to db.
173 struct dbwrap_change_uint32_atomic_context {
174 const char *keystr;
175 uint32_t *oldval;
176 uint32_t change_val;
179 static NTSTATUS dbwrap_change_uint32_atomic_action(struct db_context *db,
180 void *private_data)
182 struct db_record *rec;
183 uint32_t val = (uint32_t)-1;
184 uint32_t v_store;
185 NTSTATUS ret;
186 struct dbwrap_change_uint32_atomic_context *state;
187 TDB_DATA value;
189 state = (struct dbwrap_change_uint32_atomic_context *)private_data;
191 rec = dbwrap_fetch_locked(db, talloc_tos(),
192 string_term_tdb_data(state->keystr));
193 if (!rec) {
194 return NT_STATUS_UNSUCCESSFUL;
197 value = dbwrap_record_get_value(rec);
199 if (value.dptr == NULL) {
200 val = *(state->oldval);
201 } else if (value.dsize == sizeof(val)) {
202 val = IVAL(value.dptr, 0);
203 *(state->oldval) = val;
204 } else {
205 ret = NT_STATUS_UNSUCCESSFUL;
206 goto done;
209 val += state->change_val;
211 SIVAL(&v_store, 0, val);
213 ret = dbwrap_record_store(rec,
214 make_tdb_data((const uint8_t *)&v_store,
215 sizeof(v_store)),
216 TDB_REPLACE);
218 done:
219 TALLOC_FREE(rec);
220 return ret;
223 NTSTATUS dbwrap_change_uint32_atomic_bystring(struct db_context *db,
224 const char *keystr,
225 uint32_t *oldval,
226 uint32_t change_val)
228 NTSTATUS ret;
229 struct dbwrap_change_uint32_atomic_context state;
231 state.keystr = keystr;
232 state.oldval = oldval;
233 state.change_val = change_val;
235 ret = dbwrap_change_uint32_atomic_action(db, &state);
237 return ret;
240 NTSTATUS dbwrap_trans_change_uint32_atomic_bystring(struct db_context *db,
241 const char *keystr,
242 uint32_t *oldval,
243 uint32_t change_val)
245 NTSTATUS ret;
246 struct dbwrap_change_uint32_atomic_context state;
248 state.keystr = keystr;
249 state.oldval = oldval;
250 state.change_val = change_val;
252 ret = dbwrap_trans_do(db, dbwrap_change_uint32_atomic_action, &state);
254 return ret;
258 * Atomic integer change (addition):
260 * if value does not exist yet in the db, use *oldval as initial old value.
261 * return old value in *oldval.
262 * store *oldval + change_val to db.
265 struct dbwrap_change_int32_atomic_context {
266 TDB_DATA key;
267 int32_t *oldval;
268 int32_t change_val;
271 static NTSTATUS dbwrap_change_int32_atomic_action(struct db_context *db,
272 void *private_data)
274 struct db_record *rec;
275 int32_t val = -1;
276 int32_t v_store;
277 NTSTATUS ret;
278 struct dbwrap_change_int32_atomic_context *state;
279 TDB_DATA value;
281 state = (struct dbwrap_change_int32_atomic_context *)private_data;
283 rec = dbwrap_fetch_locked(db, talloc_tos(), state->key);
284 if (!rec) {
285 return NT_STATUS_UNSUCCESSFUL;
288 value = dbwrap_record_get_value(rec);
290 if (value.dptr == NULL) {
291 val = *(state->oldval);
292 } else if (value.dsize == sizeof(val)) {
293 val = IVAL(value.dptr, 0);
294 *(state->oldval) = val;
295 } else {
296 ret = NT_STATUS_UNSUCCESSFUL;
297 goto done;
300 val += state->change_val;
302 SIVAL(&v_store, 0, val);
304 ret = dbwrap_record_store(rec,
305 make_tdb_data((const uint8_t *)&v_store,
306 sizeof(v_store)),
307 TDB_REPLACE);
309 done:
310 TALLOC_FREE(rec);
311 return ret;
314 NTSTATUS dbwrap_change_int32_atomic(struct db_context *db,
315 TDB_DATA key,
316 int32_t *oldval,
317 int32_t change_val)
319 NTSTATUS ret;
320 struct dbwrap_change_int32_atomic_context state;
322 state.key = key;
323 state.oldval = oldval;
324 state.change_val = change_val;
326 ret = dbwrap_change_int32_atomic_action(db, &state);
328 return ret;
331 NTSTATUS dbwrap_change_int32_atomic_bystring(struct db_context *db,
332 const char *keystr,
333 int32_t *oldval,
334 int32_t change_val)
336 return dbwrap_change_int32_atomic(db, string_term_tdb_data(keystr),
337 oldval, change_val);
340 NTSTATUS dbwrap_trans_change_int32_atomic_bystring(struct db_context *db,
341 const char *keystr,
342 int32_t *oldval,
343 int32_t change_val)
345 NTSTATUS ret;
346 struct dbwrap_change_int32_atomic_context state;
348 state.key = string_term_tdb_data(keystr);
349 state.oldval = oldval;
350 state.change_val = change_val;
352 ret = dbwrap_trans_do(db, dbwrap_change_int32_atomic_action, &state);
354 return ret;
357 struct dbwrap_store_context {
358 TDB_DATA *key;
359 TDB_DATA *dbuf;
360 int flag;
363 static NTSTATUS dbwrap_store_action(struct db_context *db, void *private_data)
365 struct db_record *rec = NULL;
366 NTSTATUS status;
367 struct dbwrap_store_context *store_ctx;
369 store_ctx = (struct dbwrap_store_context *)private_data;
371 rec = dbwrap_fetch_locked(db, talloc_tos(), *(store_ctx->key));
372 if (rec == NULL) {
373 DEBUG(5, ("fetch_locked failed\n"));
374 return NT_STATUS_NO_MEMORY;
377 status = dbwrap_record_store(rec, *(store_ctx->dbuf), store_ctx->flag);
378 if (!NT_STATUS_IS_OK(status)) {
379 DEBUG(5, ("store returned %s\n", nt_errstr(status)));
382 TALLOC_FREE(rec);
383 return status;
386 NTSTATUS dbwrap_trans_store(struct db_context *db, TDB_DATA key, TDB_DATA dbuf,
387 int flag)
389 NTSTATUS status;
390 struct dbwrap_store_context store_ctx;
392 store_ctx.key = &key;
393 store_ctx.dbuf = &dbuf;
394 store_ctx.flag = flag;
396 status = dbwrap_trans_do(db, dbwrap_store_action, &store_ctx);
398 return status;
401 static NTSTATUS dbwrap_delete_action(struct db_context * db, void *private_data)
403 NTSTATUS status;
404 struct db_record *rec;
405 TDB_DATA *key = (TDB_DATA *)private_data;
407 rec = dbwrap_fetch_locked(db, talloc_tos(), *key);
408 if (rec == NULL) {
409 DEBUG(5, ("fetch_locked failed\n"));
410 return NT_STATUS_NO_MEMORY;
413 status = dbwrap_record_delete(rec);
414 if (!NT_STATUS_IS_OK(status)) {
415 DBG_INFO("dbwrap_record_delete returned %s\n",
416 nt_errstr(status));
419 talloc_free(rec);
420 return status;
423 NTSTATUS dbwrap_trans_delete(struct db_context *db, TDB_DATA key)
425 NTSTATUS status;
427 status = dbwrap_trans_do(db, dbwrap_delete_action, &key);
429 return status;
432 NTSTATUS dbwrap_trans_store_int32_bystring(struct db_context *db,
433 const char *keystr,
434 int32_t v)
436 int32_t v_store;
438 SIVAL(&v_store, 0, v);
440 return dbwrap_trans_store(db, string_term_tdb_data(keystr),
441 make_tdb_data((const uint8_t *)&v_store,
442 sizeof(v_store)),
443 TDB_REPLACE);
446 NTSTATUS dbwrap_trans_store_uint32_bystring(struct db_context *db,
447 const char *keystr,
448 uint32_t v)
450 uint32_t v_store;
452 SIVAL(&v_store, 0, v);
454 return dbwrap_trans_store(db, string_term_tdb_data(keystr),
455 make_tdb_data((const uint8_t *)&v_store,
456 sizeof(v_store)),
457 TDB_REPLACE);
460 NTSTATUS dbwrap_trans_store_bystring(struct db_context *db, const char *key,
461 TDB_DATA data, int flags)
463 return dbwrap_trans_store(db, string_term_tdb_data(key), data, flags);
466 NTSTATUS dbwrap_trans_delete_bystring(struct db_context *db, const char *key)
468 return dbwrap_trans_delete(db, string_term_tdb_data(key));
472 * Wrap db action(s) into a transaction.
474 NTSTATUS dbwrap_trans_do(struct db_context *db,
475 NTSTATUS (*action)(struct db_context *, void *),
476 void *private_data)
478 int res;
479 NTSTATUS status;
481 res = dbwrap_transaction_start(db);
482 if (res != 0) {
483 DEBUG(5, ("transaction_start failed\n"));
484 return NT_STATUS_INTERNAL_DB_CORRUPTION;
487 status = action(db, private_data);
488 if (!NT_STATUS_IS_OK(status)) {
489 if (dbwrap_transaction_cancel(db) != 0) {
490 smb_panic("Cancelling transaction failed");
492 return status;
495 res = dbwrap_transaction_commit(db);
496 if (res == 0) {
497 return NT_STATUS_OK;
500 DEBUG(2, ("transaction_commit failed\n"));
501 return NT_STATUS_INTERNAL_DB_CORRUPTION;
504 struct dbwrap_trans_traverse_action_ctx {
505 int (*f)(struct db_record* rec, void* private_data);
506 void* private_data;
510 static NTSTATUS dbwrap_trans_traverse_action(struct db_context* db, void* private_data)
512 struct dbwrap_trans_traverse_action_ctx* ctx =
513 (struct dbwrap_trans_traverse_action_ctx*)private_data;
515 NTSTATUS status = dbwrap_traverse(db, ctx->f, ctx->private_data, NULL);
517 return status;
520 NTSTATUS dbwrap_trans_traverse(struct db_context *db,
521 int (*f)(struct db_record*, void*),
522 void *private_data)
524 struct dbwrap_trans_traverse_action_ctx ctx = {
525 .f = f,
526 .private_data = private_data,
528 return dbwrap_trans_do(db, dbwrap_trans_traverse_action, &ctx);
531 NTSTATUS dbwrap_purge(struct db_context *db, TDB_DATA key)
533 NTSTATUS status;
535 status = dbwrap_delete(db, key);
536 if (NT_STATUS_EQUAL(status, NT_STATUS_NOT_FOUND)) {
537 status = NT_STATUS_OK;
540 return status;
543 NTSTATUS dbwrap_purge_bystring(struct db_context *db, const char *key)
545 return dbwrap_purge(db, string_term_tdb_data(key));
548 NTSTATUS dbwrap_delete_bystring(struct db_context *db, const char *key)
550 return dbwrap_delete(db, string_term_tdb_data(key));
553 NTSTATUS dbwrap_store_bystring(struct db_context *db, const char *key,
554 TDB_DATA data, int flags)
556 return dbwrap_store(db, string_term_tdb_data(key), data, flags);
559 NTSTATUS dbwrap_fetch_bystring(struct db_context *db, TALLOC_CTX *mem_ctx,
560 const char *key, TDB_DATA *value)
562 return dbwrap_fetch(db, mem_ctx, string_term_tdb_data(key), value);
567 NTSTATUS dbwrap_delete_bystring_upper(struct db_context *db, const char *key)
569 char *key_upper;
570 NTSTATUS status;
572 key_upper = talloc_strdup_upper(talloc_tos(), key);
573 if (key_upper == NULL) {
574 return NT_STATUS_NO_MEMORY;
577 status = dbwrap_delete_bystring(db, key_upper);
579 talloc_free(key_upper);
580 return status;
583 NTSTATUS dbwrap_store_bystring_upper(struct db_context *db, const char *key,
584 TDB_DATA data, int flags)
586 char *key_upper;
587 NTSTATUS status;
589 key_upper = talloc_strdup_upper(talloc_tos(), key);
590 if (key_upper == NULL) {
591 return NT_STATUS_NO_MEMORY;
594 status = dbwrap_store_bystring(db, key_upper, data, flags);
596 talloc_free(key_upper);
597 return status;
600 NTSTATUS dbwrap_fetch_bystring_upper(struct db_context *db, TALLOC_CTX *mem_ctx,
601 const char *key, TDB_DATA *value)
603 char *key_upper;
604 NTSTATUS status;
606 key_upper = talloc_strdup_upper(talloc_tos(), key);
607 if (key_upper == NULL) {
608 return NT_STATUS_NO_MEMORY;
611 status = dbwrap_fetch_bystring(db, mem_ctx, key_upper, value);
613 talloc_free(key_upper);
614 return status;
617 struct dbwrap_marshall_state {
618 uint8_t *buf;
619 size_t bufsize;
620 size_t dbsize;
623 static int dbwrap_marshall_fn(struct db_record *rec, void *private_data)
625 struct dbwrap_marshall_state *state = private_data;
626 TDB_DATA key, value;
627 size_t new_dbsize;
629 key = dbwrap_record_get_key(rec);
630 value = dbwrap_record_get_value(rec);
632 new_dbsize = state->dbsize;
633 new_dbsize += 8 + key.dsize;
634 new_dbsize += 8 + value.dsize;
636 if (new_dbsize <= state->bufsize) {
637 uint8_t *p = state->buf + state->dbsize;
639 SBVAL(p, 0, key.dsize);
640 p += 8;
641 memcpy(p, key.dptr, key.dsize);
642 p += key.dsize;
644 SBVAL(p, 0, value.dsize);
645 p += 8;
646 memcpy(p, value.dptr, value.dsize);
648 state->dbsize = new_dbsize;
649 return 0;
652 size_t dbwrap_marshall(struct db_context *db, uint8_t *buf, size_t bufsize)
654 struct dbwrap_marshall_state state;
656 state.bufsize = bufsize;
657 state.buf = buf;
658 state.dbsize = 0;
660 dbwrap_traverse_read(db, dbwrap_marshall_fn, &state, NULL);
662 return state.dbsize;
665 static ssize_t dbwrap_unmarshall_get_data(const uint8_t *buf, size_t buflen,
666 size_t ofs, TDB_DATA *pdata)
668 uint64_t space, len;
669 const uint8_t *p;
671 if (ofs == buflen) {
672 return 0;
674 if (ofs > buflen) {
675 return -1;
678 space = buflen - ofs;
679 if (space < 8) {
680 return -1;
683 p = buf + ofs;
684 len = BVAL(p, 0);
686 p += 8;
687 space -= 8;
689 if (len > space) {
690 return -1;
693 *pdata = (TDB_DATA) { .dptr = discard_const_p(uint8_t, p),
694 .dsize = len };
695 return len + 8;
698 NTSTATUS dbwrap_parse_marshall_buf(const uint8_t *buf, size_t buflen,
699 bool (*fn)(TDB_DATA key, TDB_DATA value,
700 void *private_data),
701 void *private_data)
703 size_t ofs = 0;
705 while (true) {
706 ssize_t len;
707 TDB_DATA key, value;
708 bool ok;
710 len = dbwrap_unmarshall_get_data(buf, buflen, ofs, &key);
711 if (len == 0) {
712 break;
714 if (len == -1) {
715 return NT_STATUS_INVALID_PARAMETER;
717 ofs += len;
719 len = dbwrap_unmarshall_get_data(buf, buflen, ofs, &value);
720 if (len == 0) {
721 break;
723 if (len == -1) {
724 return NT_STATUS_INVALID_PARAMETER;
726 ofs += len;
728 ok = fn(key, value, private_data);
729 if (!ok) {
730 break;
734 return NT_STATUS_OK;
737 struct dbwrap_unmarshall_state {
738 struct db_context *db;
739 NTSTATUS ret;
742 static bool dbwrap_unmarshall_fn(TDB_DATA key, TDB_DATA value,
743 void *private_data)
745 struct dbwrap_unmarshall_state *state = private_data;
746 struct db_record *rec;
747 NTSTATUS status;
749 rec = dbwrap_fetch_locked(state->db, state->db, key);
750 if (rec == NULL) {
751 DEBUG(10, ("%s: dbwrap_fetch_locked failed\n",
752 __func__));
753 state->ret = NT_STATUS_NO_MEMORY;
754 return false;
757 status = dbwrap_record_store(rec, value, 0);
758 TALLOC_FREE(rec);
759 if (!NT_STATUS_IS_OK(status)) {
760 DEBUG(10, ("%s: dbwrap_record_store failed: %s\n",
761 __func__, nt_errstr(status)));
762 state->ret = status;
763 return false;
766 return true;
769 NTSTATUS dbwrap_unmarshall(struct db_context *db, const uint8_t *buf,
770 size_t buflen)
772 struct dbwrap_unmarshall_state state = { .db = db };
773 NTSTATUS status;
775 status = dbwrap_parse_marshall_buf(buf, buflen,
776 dbwrap_unmarshall_fn, &state);
777 if (!NT_STATUS_IS_OK(status)) {
778 return status;
780 return state.ret;