s4:pyglue Add a wrapper for loading the correct UTF8 casefolder
[ira/wip.git] / source4 / scripting / python / pyglue.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Copyright (C) Jelmer Vernooij <jelmer@samba.org> 2007
4    Copyright (C) Matthias Dieter Wallnöfer          2009
5    
6    This program is free software; you can redistribute it and/or modify
7    it under the terms of the GNU General Public License as published by
8    the Free Software Foundation; either version 3 of the License, or
9    (at your option) any later version.
10    
11    This program is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14    GNU General Public License for more details.
15    
16    You should have received a copy of the GNU General Public License
17    along with this program.  If not, see <http://www.gnu.org/licenses/>.
18 */
19
20 #include "includes.h"
21 #include "ldb.h"
22 #include "ldb_errors.h"
23 #include "ldb_wrap.h"
24 #include "param/param.h"
25 #include "auth/credentials/credentials.h"
26 #include "dsdb/samdb/samdb.h"
27 #include "lib/ldb-samba/ldif_handlers.h"
28 #include "librpc/ndr/libndr.h"
29 #include "version.h"
30 #include <Python.h>
31 #include "lib/ldb/pyldb.h"
32 #include "libcli/util/pyerrors.h"
33 #include "libcli/security/security.h"
34 #include "auth/pyauth.h"
35 #include "param/pyparam.h"
36 #include "auth/credentials/pycredentials.h"
37
38 #ifndef Py_RETURN_NONE
39 #define Py_RETURN_NONE return Py_INCREF(Py_None), Py_None
40 #endif
41
42 /* FIXME: These should be in a header file somewhere, once we finish moving
43  * away from SWIG .. */
44 #define PyErr_LDB_OR_RAISE(py_ldb, ldb) \
45 /*      if (!PyLdb_Check(py_ldb)) { \
46                 PyErr_SetString(py_ldb_get_exception(), "Ldb connection object required"); \
47                 return NULL; \
48         } */\
49         ldb = PyLdb_AsLdbContext(py_ldb);
50
51 static void PyErr_SetLdbError(PyObject *error, int ret, struct ldb_context *ldb_ctx)
52 {
53         if (ret == LDB_ERR_PYTHON_EXCEPTION)
54                 return; /* Python exception should already be set, just keep that */
55
56         PyErr_SetObject(error, 
57                                         Py_BuildValue(discard_const_p(char, "(i,s)"), ret, 
58                                   ldb_ctx == NULL?ldb_strerror(ret):ldb_errstring(ldb_ctx)));
59 }
60
61 static PyObject *py_ldb_get_exception(void)
62 {
63         PyObject *mod = PyImport_ImportModule("ldb");
64         if (mod == NULL)
65                 return NULL;
66
67         return PyObject_GetAttrString(mod, "LdbError");
68 }
69
70 static PyObject *py_generate_random_str(PyObject *self, PyObject *args)
71 {
72         int len;
73         PyObject *ret;
74         char *retstr;
75         if (!PyArg_ParseTuple(args, "i", &len))
76                 return NULL;
77
78         retstr = generate_random_str(NULL, len);
79         ret = PyString_FromString(retstr);
80         talloc_free(retstr);
81         return ret;
82 }
83
84 static PyObject *py_unix2nttime(PyObject *self, PyObject *args)
85 {
86         time_t t;
87         NTTIME nt;
88         if (!PyArg_ParseTuple(args, "I", &t))
89                 return NULL;
90
91         unix_to_nt_time(&nt, t);
92
93         return PyInt_FromLong((uint64_t)nt);
94 }
95
96 static PyObject *py_ldb_set_credentials(PyObject *self, PyObject *args)
97 {
98         PyObject *py_creds, *py_ldb;
99         struct cli_credentials *creds;
100         struct ldb_context *ldb;
101         if (!PyArg_ParseTuple(args, "OO", &py_ldb, &py_creds))
102                 return NULL;
103
104         PyErr_LDB_OR_RAISE(py_ldb, ldb);
105         
106         creds = cli_credentials_from_py_object(py_creds);
107         if (creds == NULL) {
108                 PyErr_SetString(PyExc_TypeError, "Expected credentials object");
109                 return NULL;
110         }
111
112         ldb_set_opaque(ldb, "credentials", creds);
113
114         Py_RETURN_NONE;
115 }
116
117 static PyObject *py_ldb_set_loadparm(PyObject *self, PyObject *args)
118 {
119         PyObject *py_lp_ctx, *py_ldb;
120         struct loadparm_context *lp_ctx;
121         struct ldb_context *ldb;
122         if (!PyArg_ParseTuple(args, "OO", &py_ldb, &py_lp_ctx))
123                 return NULL;
124
125         PyErr_LDB_OR_RAISE(py_ldb, ldb);
126
127         lp_ctx = lp_from_py_object(py_lp_ctx);
128         if (lp_ctx == NULL) {
129                 PyErr_SetString(PyExc_TypeError, "Expected loadparm object");
130                 return NULL;
131         }
132
133         ldb_set_opaque(ldb, "loadparm", lp_ctx);
134
135         Py_RETURN_NONE;
136 }
137
138
139 static PyObject *py_ldb_set_session_info(PyObject *self, PyObject *args)
140 {
141         PyObject *py_session_info, *py_ldb;
142         struct auth_session_info *info;
143         struct ldb_context *ldb;
144         if (!PyArg_ParseTuple(args, "OO", &py_ldb, &py_session_info))
145                 return NULL;
146
147         PyErr_LDB_OR_RAISE(py_ldb, ldb);
148         /*if (!PyAuthSession_Check(py_session_info)) {
149                 PyErr_SetString(PyExc_TypeError, "Expected session info object");
150                 return NULL;
151         }*/
152
153         info = PyAuthSession_AsSession(py_session_info);
154
155         ldb_set_opaque(ldb, "sessionInfo", info);
156
157         Py_RETURN_NONE;
158 }
159
160 static PyObject *py_ldb_set_utf8_casefold(PyObject *self, PyObject *args)
161 {
162         PyObject *py_ldb;
163         struct ldb_context *ldb;
164
165         if (!PyArg_ParseTuple(args, "O", &py_ldb))
166                 return NULL;
167
168         PyErr_LDB_OR_RAISE(py_ldb, ldb);
169
170         ldb_set_utf8_fns(ldb, NULL, wrap_casefold);
171
172         Py_RETURN_NONE;
173 }
174
175 static PyObject *py_samdb_set_domain_sid(PyLdbObject *self, PyObject *args)
176
177         PyObject *py_ldb, *py_sid;
178         struct ldb_context *ldb;
179         struct dom_sid *sid;
180         bool ret;
181
182         if (!PyArg_ParseTuple(args, "OO", &py_ldb, &py_sid))
183                 return NULL;
184         
185         PyErr_LDB_OR_RAISE(py_ldb, ldb);
186
187         sid = dom_sid_parse_talloc(NULL, PyString_AsString(py_sid));
188
189         ret = samdb_set_domain_sid(ldb, sid);
190         if (!ret) {
191                 PyErr_SetString(PyExc_RuntimeError, "set_domain_sid failed");
192                 return NULL;
193         } 
194         Py_RETURN_NONE;
195 }
196
197 static PyObject *py_ldb_register_samba_handlers(PyObject *self, PyObject *args)
198 {
199         PyObject *py_ldb;
200         struct ldb_context *ldb;
201         int ret;
202
203         if (!PyArg_ParseTuple(args, "O", &py_ldb))
204                 return NULL;
205
206         PyErr_LDB_OR_RAISE(py_ldb, ldb);
207         ret = ldb_register_samba_handlers(ldb);
208
209         PyErr_LDB_ERROR_IS_ERR_RAISE(py_ldb_get_exception(), ret, ldb);
210         Py_RETURN_NONE;
211 }
212
213 static PyObject *py_dsdb_set_ntds_invocation_id(PyObject *self, PyObject *args)
214 {
215         PyObject *py_ldb, *py_guid;
216         bool ret;
217         struct GUID guid;
218         struct ldb_context *ldb;
219         if (!PyArg_ParseTuple(args, "OO", &py_ldb, &py_guid))
220                 return NULL;
221
222         PyErr_LDB_OR_RAISE(py_ldb, ldb);
223         GUID_from_string(PyString_AsString(py_guid), &guid);
224
225         ret = samdb_set_ntds_invocation_id(ldb, &guid);
226         if (!ret) {
227                 PyErr_SetString(PyExc_RuntimeError, "set_ntds_invocation_id failed");
228                 return NULL;
229         }
230         Py_RETURN_NONE;
231 }
232
233 static PyObject *py_dsdb_set_opaque_integer(PyObject *self, PyObject *args)
234 {
235         PyObject *py_ldb;
236         int value;
237         int *old_val, *new_val;
238         char *py_opaque_name, *opaque_name_talloc;
239         struct ldb_context *ldb;
240         TALLOC_CTX *tmp_ctx;
241
242         if (!PyArg_ParseTuple(args, "Osi", &py_ldb, &py_opaque_name, &value))
243                 return NULL;
244
245         PyErr_LDB_OR_RAISE(py_ldb, ldb);
246
247         /* see if we have a cached copy */
248         old_val = (int *)ldb_get_opaque(ldb, 
249                                         py_opaque_name);
250
251         if (old_val) {
252                 *old_val = value;
253                 Py_RETURN_NONE;
254         } 
255
256         tmp_ctx = talloc_new(ldb);
257         if (tmp_ctx == NULL) {
258                 goto failed;
259         }
260         
261         new_val = talloc(tmp_ctx, int);
262         if (!new_val) {
263                 goto failed;
264         }
265         
266         opaque_name_talloc = talloc_strdup(tmp_ctx, py_opaque_name);
267         if (!opaque_name_talloc) {
268                 goto failed;
269         }
270         
271         *new_val = value;
272
273         /* cache the domain_sid in the ldb */
274         if (ldb_set_opaque(ldb, opaque_name_talloc, new_val) != LDB_SUCCESS) {
275                 goto failed;
276         }
277
278         talloc_steal(ldb, new_val);
279         talloc_steal(ldb, opaque_name_talloc);
280         talloc_free(tmp_ctx);
281
282         Py_RETURN_NONE;
283
284 failed:
285         talloc_free(tmp_ctx);
286         PyErr_SetString(PyExc_RuntimeError, "Failed to set opaque integer into the ldb!\n");
287         return NULL;
288 }
289
290 static PyObject *py_dsdb_set_global_schema(PyObject *self, PyObject *args)
291 {
292         PyObject *py_ldb;
293         struct ldb_context *ldb;
294         int ret;
295         if (!PyArg_ParseTuple(args, "O", &py_ldb))
296                 return NULL;
297
298         PyErr_LDB_OR_RAISE(py_ldb, ldb);
299
300         ret = dsdb_set_global_schema(ldb);
301         PyErr_LDB_ERROR_IS_ERR_RAISE(py_ldb_get_exception(), ret, ldb);
302
303         Py_RETURN_NONE;
304 }
305
306 static PyObject *py_dsdb_set_schema_from_ldif(PyObject *self, PyObject *args)
307 {
308         WERROR result;
309         char *pf, *df;
310         PyObject *py_ldb;
311         struct ldb_context *ldb;
312
313         if (!PyArg_ParseTuple(args, "Oss", &py_ldb, &pf, &df))
314                 return NULL;
315
316         PyErr_LDB_OR_RAISE(py_ldb, ldb);
317
318         result = dsdb_set_schema_from_ldif(ldb, pf, df);
319         PyErr_WERROR_IS_ERR_RAISE(result);
320
321         Py_RETURN_NONE;
322 }
323
324 static PyObject *py_dsdb_convert_schema_to_openldap(PyObject *self, PyObject *args)
325 {
326         char *target_str, *mapping;
327         PyObject *py_ldb;
328         struct ldb_context *ldb;
329         PyObject *ret;
330         char *retstr;
331
332         if (!PyArg_ParseTuple(args, "Oss", &py_ldb, &target_str, &mapping))
333                 return NULL;
334
335         PyErr_LDB_OR_RAISE(py_ldb, ldb);
336
337         retstr = dsdb_convert_schema_to_openldap(ldb, target_str, mapping);
338         if (!retstr) {
339                 PyErr_SetString(PyExc_RuntimeError, "dsdb_convert_schema_to_openldap failed");
340                 return NULL;
341         } 
342         ret = PyString_FromString(retstr);
343         talloc_free(retstr);
344         return ret;
345 }
346
347 static PyObject *py_dsdb_set_schema_from_ldb(PyObject *self, PyObject *args)
348 {
349         PyObject *py_ldb;
350         struct ldb_context *ldb;
351         PyObject *py_from_ldb;
352         struct ldb_context *from_ldb;
353         struct dsdb_schema *schema;
354         int ret;
355         if (!PyArg_ParseTuple(args, "OO", &py_ldb, &py_from_ldb))
356                 return NULL;
357
358         PyErr_LDB_OR_RAISE(py_ldb, ldb);
359
360         PyErr_LDB_OR_RAISE(py_from_ldb, from_ldb);
361
362         schema = dsdb_get_schema(from_ldb);
363         if (!schema) {
364                 PyErr_SetString(PyExc_RuntimeError, "Failed to set find a schema on 'from' ldb!\n");
365                 return NULL;
366         }
367
368         ret = dsdb_reference_schema(ldb, schema, true);
369         PyErr_LDB_ERROR_IS_ERR_RAISE(py_ldb_get_exception(), ret, ldb);
370
371         Py_RETURN_NONE;
372 }
373
374 static PyObject *py_dom_sid_to_rid(PyLdbObject *self, PyObject *args)
375 {
376         PyObject *py_sid;
377         struct dom_sid *sid;
378         uint32_t rid;
379         NTSTATUS status;
380         
381         if(!PyArg_ParseTuple(args, "O", &py_sid))
382                 return NULL;
383
384         sid = dom_sid_parse_talloc(NULL, PyString_AsString(py_sid));
385
386         status = dom_sid_split_rid(NULL, sid, NULL, &rid);
387         if (!NT_STATUS_IS_OK(status)) {
388                 PyErr_SetString(PyExc_RuntimeError, "dom_sid_split_rid failed");
389                 return NULL;
390         }
391
392         return PyInt_FromLong(rid);
393 }
394
395 static PyMethodDef py_misc_methods[] = {
396         { "generate_random_str", (PyCFunction)py_generate_random_str, METH_VARARGS,
397                 "random_password(len) -> string\n"
398                 "Generate random password with specified length." },
399         { "unix2nttime", (PyCFunction)py_unix2nttime, METH_VARARGS,
400                 "unix2nttime(timestamp) -> nttime" },
401         { "ldb_set_credentials", (PyCFunction)py_ldb_set_credentials, METH_VARARGS, 
402                 "ldb_set_credentials(ldb, credentials) -> None\n"
403                 "Set credentials to use when connecting." },
404         { "ldb_set_session_info", (PyCFunction)py_ldb_set_session_info, METH_VARARGS,
405                 "ldb_set_session_info(ldb, session_info)\n"
406                 "Set session info to use when connecting." },
407         { "ldb_set_loadparm", (PyCFunction)py_ldb_set_loadparm, METH_VARARGS,
408                 "ldb_set_loadparm(ldb, session_info)\n"
409                 "Set loadparm context to use when connecting." },
410         { "samdb_set_domain_sid", (PyCFunction)py_samdb_set_domain_sid, METH_VARARGS,
411                 "samdb_set_domain_sid(samdb, sid)\n"
412                 "Set SID of domain to use." },
413         { "ldb_register_samba_handlers", (PyCFunction)py_ldb_register_samba_handlers, METH_VARARGS,
414                 "ldb_register_samba_handlers(ldb)\n"
415                 "Register Samba-specific LDB modules and schemas." },
416         { "ldb_set_utf8_casefold", (PyCFunction)py_ldb_set_utf8_casefold, METH_VARARGS,
417                 "ldb_set_utf8_casefold(ldb)\n"
418                 "Set the right Samba casefolding function for UTF8 charset." },
419         { "dsdb_set_ntds_invocation_id", (PyCFunction)py_dsdb_set_ntds_invocation_id, METH_VARARGS,
420                 NULL },
421         { "dsdb_set_opaque_integer", (PyCFunction)py_dsdb_set_opaque_integer, METH_VARARGS,
422                 NULL },
423         { "dsdb_set_global_schema", (PyCFunction)py_dsdb_set_global_schema, METH_VARARGS,
424                 NULL },
425         { "dsdb_set_schema_from_ldif", (PyCFunction)py_dsdb_set_schema_from_ldif, METH_VARARGS,
426                 NULL },
427         { "dsdb_set_schema_from_ldb", (PyCFunction)py_dsdb_set_schema_from_ldb, METH_VARARGS,
428                 NULL },
429         { "dsdb_convert_schema_to_openldap", (PyCFunction)py_dsdb_convert_schema_to_openldap, METH_VARARGS,
430                 NULL },
431         { "dom_sid_to_rid", (PyCFunction)py_dom_sid_to_rid, METH_VARARGS,
432                 NULL },
433         { NULL }
434 };
435
436 void initglue(void)
437 {
438         PyObject *m;
439
440         m = Py_InitModule3("glue", py_misc_methods, 
441                            "Python bindings for miscellaneous Samba functions.");
442         if (m == NULL)
443                 return;
444
445         PyModule_AddObject(m, "version", PyString_FromString(SAMBA_VERSION_STRING));
446
447         PyModule_AddObject(m, "DS_BEHAVIOR_WIN2000", PyInt_FromLong(DS_BEHAVIOR_WIN2000));
448         PyModule_AddObject(m, "DS_BEHAVIOR_WIN2003_INTERIM", PyInt_FromLong(DS_BEHAVIOR_WIN2003_INTERIM));
449         PyModule_AddObject(m, "DS_BEHAVIOR_WIN2003", PyInt_FromLong(DS_BEHAVIOR_WIN2003));
450         PyModule_AddObject(m, "DS_BEHAVIOR_WIN2008", PyInt_FromLong(DS_BEHAVIOR_WIN2008));
451
452 }
453