s4:dsdb Rework modules create new partitions at runtime
[ira/wip.git] / source4 / dsdb / samdb / ldb_modules / instancetype.c
1 /* 
2    ldb database library
3
4    Copyright (C) Simo Sorce  2004-2008
5    Copyright (C) Andrew Bartlett <abartlet@samba.org> 2005
6    Copyright (C) Andrew Tridgell 2005
7    Copyright (C) Stefan Metzmacher <metze@samba.org> 2007
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 /*
24  *  Name: ldb
25  *
26  *  Component: ldb instancetype module
27  *
28  *  Description: add an instanceType onto every new record
29  *
30  *  Author: Andrew Bartlett
31  */
32
33 #include "includes.h"
34 #include "ldb.h"
35 #include "ldb_module.h"
36 #include "librpc/gen_ndr/ndr_misc.h"
37 #include "dsdb/samdb/samdb.h"
38 #include "../libds/common/flags.h"
39
40 struct it_context {
41         struct ldb_module *module;
42         struct ldb_request *req;
43         struct ldb_request *add_req;
44 };
45
46 static int it_add_callback(struct ldb_request *req, struct ldb_reply *ares)
47 {
48         struct ldb_context *ldb;
49         struct it_context *ac;
50
51         ac = talloc_get_type(req->context, struct it_context);
52         ldb = ldb_module_get_ctx(ac->module);
53
54         if (!ares) {
55                 return ldb_module_done(ac->req, NULL, NULL,
56                                         LDB_ERR_OPERATIONS_ERROR);
57         }
58
59         if (ares->error != LDB_SUCCESS) {
60                 return ldb_module_done(ac->req, ares->controls,
61                                         ares->response, ares->error);
62         }
63
64         if (ares->type != LDB_REPLY_DONE) {
65                 ldb_set_errstring(ldb, "Invalid reply type!");
66                 return ldb_module_done(ac->req, NULL, NULL,
67                                         LDB_ERR_OPERATIONS_ERROR);
68         }
69
70         /* Add the boilerplate entries */
71
72         return ldb_module_done(ac->req, ares->controls,
73                                ares->response, ares->error);
74 }
75
76 /* add_record: add instancetype attribute */
77 static int instancetype_add(struct ldb_module *module, struct ldb_request *req)
78 {
79         struct ldb_context *ldb;
80         struct ldb_request *down_req;
81         struct ldb_message *msg;
82         struct it_context *ac;
83         uint32_t instance_type;
84         int ret;
85
86         ldb = ldb_module_get_ctx(module);
87
88         ldb_debug(ldb, LDB_DEBUG_TRACE, "instancetype_add_record\n");
89
90         /* do not manipulate our control entries */
91         if (ldb_dn_is_special(req->op.add.message->dn)) {
92                 return ldb_next_request(module, req);
93         }
94
95         if (ldb_msg_find_element(req->op.add.message, "instanceType")) {
96                 unsigned int instanceType = ldb_msg_find_attr_as_uint(req->op.add.message, "instanceType", 0);
97                 if (!(instanceType & INSTANCE_TYPE_IS_NC_HEAD)) {
98                         return ldb_next_request(module, req);           
99                 }
100
101                 /* Forward the 'add' to the modules below, but if it
102                  * succeeds, then we might need to add the boilerplate
103                  * entries (lost+found, deleted objects) */
104                 ac = talloc(req, struct it_context);
105                 if (ac == NULL) {
106                         return LDB_ERR_OPERATIONS_ERROR;
107                 }
108                 ac->module = module;
109                 ac->req = req;
110                 
111                 ret = ldb_build_add_req(&ac->add_req, ldb_module_get_ctx(ac->module), ac,
112                                         ac->req->op.add.message,
113                                         ac->req->controls,
114                                         ac, it_add_callback,
115                                         ac->req);
116                 
117                 if (ret != LDB_SUCCESS) {
118                         return ret;
119                 }
120                 
121                 /* Do the original add */
122                 return ldb_next_request(ac->module, ac->add_req);
123         }
124
125         /* we have to copy the message as the caller might have it as a const */
126         msg = ldb_msg_copy_shallow(req, req->op.add.message);
127         if (msg == NULL) {
128                 ldb_oom(ldb);
129                 return LDB_ERR_OPERATIONS_ERROR;
130         }
131
132         /*
133          * TODO: calculate correct instance type
134          */
135         instance_type = INSTANCE_TYPE_WRITE;
136
137         ret = ldb_msg_add_fmt(msg, "instanceType", "%u", instance_type);
138         if (ret != LDB_SUCCESS) {
139                 ldb_oom(ldb);
140                 return LDB_ERR_OPERATIONS_ERROR;
141         }
142
143         ret = ldb_build_add_req(&down_req, ldb, req,
144                                 msg,
145                                 req->controls,
146                                 req->context, req->callback,
147                                 req);
148         if (ret != LDB_SUCCESS) {
149                 return ret;
150         }
151
152         /* go on with the call chain */
153         return ldb_next_request(module, down_req);
154 }
155
156 _PUBLIC_ const struct ldb_module_ops ldb_instancetype_module_ops = {
157         .name          = "instancetype",
158         .add           = instancetype_add,
159 };