r25027: Fix more warnings.
[jelmer/samba4-debian.git] / source / scripting / ejs / smbcalls_reg.c
1 /* 
2    Unix SMB/CIFS implementation.
3
4    provide hooks into smbd C calls from ejs scripts
5
6    Copyright (C) Jelmer Vernooij 2007
7    
8    This program is free software; you can redistribute it and/or modify
9    it under the terms of the GNU General Public License as published by
10    the Free Software Foundation; either version 3 of the License, or
11    (at your option) any later version.
12    
13    This program is distributed in the hope that it will be useful,
14    but WITHOUT ANY WARRANTY; without even the implied warranty of
15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16    GNU General Public License for more details.
17    
18    You should have received a copy of the GNU General Public License
19    along with this program.  If not, see <http://www.gnu.org/licenses/>.
20 */
21
22 #include "includes.h"
23 #include "scripting/ejs/smbcalls.h"
24 #include "lib/appweb/ejs/ejs.h"
25 #include "db_wrap.h"
26 #include "dsdb/samdb/samdb.h"
27 #include "librpc/ndr/libndr.h"
28 #include "lib/registry/registry.h"
29
30 /*
31   get the connected db
32  */
33 static struct registry_context *ejs_get_reg_context(int eid)
34 {
35         struct registry_context *rctx = (struct registry_context *)mprGetThisPtr(eid, "registry");
36         if (rctx == NULL) {
37                 ejsSetErrorMsg(eid, "unable to find registry");
38         }
39         return rctx;
40 }
41
42 static int ejs_apply_patchfile(MprVarHandle eid, int argc, struct MprVar **argv)
43 {
44         struct registry_context *rctx;
45         WERROR error;
46
47         /* validate arguments */
48         if (argc != 1) {
49                 ejsSetErrorMsg(eid, "reg.apply_patchfile invalid number of arguments");
50                 return -1;
51         }
52
53         rctx = ejs_get_reg_context(eid);
54         if (rctx == NULL) {
55                 return -1;
56         }
57         
58         error = reg_diff_apply(mprToString(argv[0]), rctx);
59
60         mpr_Return(eid, mprWERROR(error));
61
62         return 0;
63 }
64
65 /*
66   initialise registry ejs subsystem
67 */
68 static int ejs_reg_open(MprVarHandle eid, int argc, struct MprVar **argv)
69 {
70         struct MprVar *reg = mprInitObject(eid, "registry", argc, argv);
71         struct registry_context *rctx;
72         WERROR error;
73
74         error = reg_open_samba(mprMemCtx(), &rctx, NULL, NULL);
75         SMB_ASSERT(W_ERROR_IS_OK(error));
76
77         mprSetPtrChild(reg, "registry", rctx);
78         mprSetCFunction(reg, "apply_patchfile", ejs_apply_patchfile);
79
80         return 0;
81 }
82
83
84 /*
85   setup C functions that be called from ejs
86 */
87 NTSTATUS smb_setup_ejs_reg(void)
88 {
89         ejsDefineCFunction(-1, "reg_open", ejs_reg_open, NULL, MPR_VAR_SCRIPT_HANDLE);
90         return NT_STATUS_OK;
91 }