source4/scripting/ejs/ejsrpc.c

   1 /*
   2    Unix SMB/CIFS implementation.
   3
   4    provide interfaces to rpc calls from ejs scripts
   5
   6    Copyright (C) Andrew Tridgell 2005
   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 2 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, write to the Free Software
  20    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  21 */
  22
  23 #include "includes.h"
  24 #include "lib/appweb/ejs/ejs.h"
  25 #include "scripting/ejs/smbcalls.h"
  26 #include "librpc/gen_ndr/ndr_security.h"
  27 #include "librpc/gen_ndr/ndr_lsa.h"
  28 #include "librpc/gen_ndr/ndr_winreg.h"
  29 #include "scripting/ejs/ejsrpc.h"
  30
  31 /*
  32   set the switch var to be used by the next union switch
  33 */
  34 void ejs_set_switch(struct ejs_rpc *ejs, uint32_t switch_var)
  35 {
  36         ejs->switch_var = switch_var;
  37 }
  38
  39 /*
  40   panic in the ejs wrapper code
  41  */
  42 NTSTATUS ejs_panic(struct ejs_rpc *ejs, const char *why)
  43 {
  44         ejsSetErrorMsg(ejs->eid, "rpc_call '%s' failed - %s", ejs->callname, why);
  45         return NT_STATUS_INTERNAL_ERROR;
  46 }
  47
  48 /*
  49   start the ejs pull process for a structure
  50 */
  51 NTSTATUS ejs_pull_struct_start(struct ejs_rpc *ejs, struct MprVar **v, const char *name)
  52 {
  53         return mprGetVar(v, name);
  54 }
  55
  56
  57 /*
  58   start the ejs push process for a structure
  59 */
  60 NTSTATUS ejs_push_struct_start(struct ejs_rpc *ejs, struct MprVar **v, const char *name)
  61 {
  62         NDR_CHECK(mprSetVar(*v, name, mprObject(name)));
  63         return mprGetVar(v, name);
  64 }
  65
  66 /*
  67   pull a uint8 from a mpr variable to a C element
  68 */
  69 NTSTATUS ejs_pull_uint8(struct ejs_rpc *ejs,
  70                         struct MprVar *v, const char *name, uint8_t *r)
  71 {
  72         NDR_CHECK(mprGetVar(&v, name));
  73         *r = mprVarToInteger(v);
  74         return NT_STATUS_OK;
  75
  76 }
  77
  78 NTSTATUS ejs_push_uint8(struct ejs_rpc *ejs,
  79                         struct MprVar *v, const char *name, const uint8_t *r)
  80 {
  81         return mprSetVar(v, name, mprCreateIntegerVar(*r));
  82 }
  83
  84 /*
  85   pull a uint16 from a mpr variable to a C element
  86 */
  87 NTSTATUS ejs_pull_uint16(struct ejs_rpc *ejs,
  88                          struct MprVar *v, const char *name, uint16_t *r)
  89 {
  90         NDR_CHECK(mprGetVar(&v, name));
  91         *r = mprVarToInteger(v);
  92         return NT_STATUS_OK;
  93
  94 }
  95
  96 NTSTATUS ejs_push_uint16(struct ejs_rpc *ejs,
  97                          struct MprVar *v, const char *name, const uint16_t *r)
  98 {
  99         return mprSetVar(v, name, mprCreateIntegerVar(*r));
 100 }
 101
 102 /*
 103   pull a uint32 from a mpr variable to a C element
 104 */
 105 NTSTATUS ejs_pull_uint32(struct ejs_rpc *ejs,
 106                          struct MprVar *v, const char *name, uint32_t *r)
 107 {
 108         NDR_CHECK(mprGetVar(&v, name));
 109         *r = mprVarToInteger(v);
 110         return NT_STATUS_OK;
 111 }
 112
 113 NTSTATUS ejs_push_uint32(struct ejs_rpc *ejs,
 114                          struct MprVar *v, const char *name, const uint32_t *r)
 115 {
 116         return mprSetVar(v, name, mprCreateIntegerVar(*r));
 117 }
 118
 119 /*
 120   pull a int32 from a mpr variable to a C element
 121 */
 122 NTSTATUS ejs_pull_int32(struct ejs_rpc *ejs,
 123                          struct MprVar *v, const char *name, int32_t *r)
 124 {
 125         NDR_CHECK(mprGetVar(&v, name));
 126         *r = mprVarToInteger(v);
 127         return NT_STATUS_OK;
 128 }
 129
 130 NTSTATUS ejs_push_int32(struct ejs_rpc *ejs,
 131                          struct MprVar *v, const char *name, const int32_t *r)
 132 {
 133         return mprSetVar(v, name, mprCreateIntegerVar(*r));
 134 }
 135
 136 NTSTATUS ejs_pull_hyper(struct ejs_rpc *ejs,
 137                         struct MprVar *v, const char *name, uint64_t *r)
 138 {
 139         NDR_CHECK(mprGetVar(&v, name));
 140         *r = mprVarToNumber(v);
 141         return NT_STATUS_OK;
 142 }
 143
 144 NTSTATUS ejs_push_hyper(struct ejs_rpc *ejs,
 145                         struct MprVar *v, const char *name, const uint64_t *r)
 146 {
 147         return mprSetVar(v, name, mprCreateNumberVar(*r));
 148 }
 149
 150 NTSTATUS ejs_pull_dlong(struct ejs_rpc *ejs,
 151                         struct MprVar *v, const char *name, uint64_t *r)
 152 {
 153         return ejs_pull_hyper(ejs, v, name, r);
 154 }
 155
 156 NTSTATUS ejs_push_dlong(struct ejs_rpc *ejs,
 157                         struct MprVar *v, const char *name, const uint64_t *r)
 158 {
 159         return ejs_push_hyper(ejs, v, name, r);
 160 }
 161
 162 NTSTATUS ejs_pull_udlong(struct ejs_rpc *ejs,
 163                         struct MprVar *v, const char *name, uint64_t *r)
 164 {
 165         return ejs_pull_hyper(ejs, v, name, r);
 166 }
 167
 168 NTSTATUS ejs_push_udlong(struct ejs_rpc *ejs,
 169                         struct MprVar *v, const char *name, const uint64_t *r)
 170 {
 171         return ejs_push_hyper(ejs, v, name, r);
 172 }
 173
 174 NTSTATUS ejs_pull_NTTIME(struct ejs_rpc *ejs,
 175                         struct MprVar *v, const char *name, uint64_t *r)
 176 {
 177         return ejs_pull_hyper(ejs, v, name, r);
 178 }
 179
 180 NTSTATUS ejs_push_NTTIME(struct ejs_rpc *ejs,
 181                         struct MprVar *v, const char *name, const uint64_t *r)
 182 {
 183         return ejs_push_hyper(ejs, v, name, r);
 184 }
 185
 186 NTSTATUS ejs_push_WERROR(struct ejs_rpc *ejs,
 187                         struct MprVar *v, const char *name, const WERROR *r)
 188 {
 189         return ejs_push_string(ejs, v, name, win_errstr(*r));
 190 }
 191
 192 NTSTATUS ejs_push_NTSTATUS(struct ejs_rpc *ejs,
 193                            struct MprVar *v, const char *name, const NTSTATUS *r)
 194 {
 195         return ejs_push_string(ejs, v, name, nt_errstr(*r));
 196 }
 197
 198
 199 /*
 200   pull a enum from a mpr variable to a C element
 201   a enum is just treating as an unsigned integer at this level
 202 */
 203 NTSTATUS ejs_pull_enum(struct ejs_rpc *ejs,
 204                        struct MprVar *v, const char *name, unsigned *r)
 205 {
 206         NDR_CHECK(mprGetVar(&v, name));
 207         *r = mprVarToInteger(v);
 208         return NT_STATUS_OK;
 209
 210 }
 211
 212 NTSTATUS ejs_push_enum(struct ejs_rpc *ejs,
 213                        struct MprVar *v, const char *name, const unsigned *r)
 214 {
 215         return mprSetVar(v, name, mprCreateIntegerVar(*r));
 216 }
 217
 218
 219 /*
 220   pull a string
 221 */
 222 NTSTATUS ejs_pull_string(struct ejs_rpc *ejs,
 223                          struct MprVar *v, const char *name, const char **s)
 224 {
 225         NDR_CHECK(mprGetVar(&v, name));
 226         *s = mprToString(v);
 227         return NT_STATUS_OK;
 228 }
 229
 230 /*
 231   push a string
 232 */
 233 NTSTATUS ejs_push_string(struct ejs_rpc *ejs,
 234                          struct MprVar *v, const char *name, const char *s)
 235 {
 236         return mprSetVar(v, name, mprString(s));
 237 }
 238
 239 NTSTATUS ejs_pull_dom_sid(struct ejs_rpc *ejs,
 240                           struct MprVar *v, const char *name, struct dom_sid *r)
 241 {
 242         struct dom_sid *sid;
 243         NDR_CHECK(mprGetVar(&v, name));
 244         sid = dom_sid_parse_talloc(ejs, mprToString(v));
 245         NT_STATUS_HAVE_NO_MEMORY(sid);
 246         *r = *sid;
 247         return NT_STATUS_OK;
 248 }
 249
 250 NTSTATUS ejs_push_dom_sid(struct ejs_rpc *ejs,
 251                           struct MprVar *v, const char *name, const struct dom_sid *r)
 252 {
 253         char *sidstr = dom_sid_string(ejs, r);
 254         NT_STATUS_HAVE_NO_MEMORY(sidstr);
 255         return mprSetVar(v, name, mprString(sidstr));
 256 }
 257
 258 NTSTATUS ejs_pull_GUID(struct ejs_rpc *ejs,
 259                        struct MprVar *v, const char *name, struct GUID *r)
 260 {
 261         NDR_CHECK(mprGetVar(&v, name));
 262         return GUID_from_string(mprToString(v), r);
 263 }
 264
 265 NTSTATUS ejs_push_GUID(struct ejs_rpc *ejs,
 266                        struct MprVar *v, const char *name, const struct GUID *r)
 267 {
 268         char *guid = GUID_string(ejs, r);
 269         NT_STATUS_HAVE_NO_MEMORY(guid);
 270         return mprSetVar(v, name, mprString(guid));
 271 }
 272
 273 NTSTATUS ejs_push_null(struct ejs_rpc *ejs, struct MprVar *v, const char *name)
 274 {
 275         return mprSetVar(v, name, mprCreatePtrVar(NULL));
 276 }
 277
 278 BOOL ejs_pull_null(struct ejs_rpc *ejs, struct MprVar *v, const char *name)
 279 {
 280         NTSTATUS status = mprGetVar(&v, name);
 281         if (!NT_STATUS_IS_OK(status)) {
 282                 return False;
 283         }
 284         if (v->type == MPR_TYPE_PTR && v->ptr == NULL) {
 285                 return True;
 286         }
 287         return False;
 288 }
 289
 290 /*
 291   pull a lsa_String
 292 */
 293 NTSTATUS ejs_pull_lsa_String(struct ejs_rpc *ejs,
 294                              struct MprVar *v, const char *name, struct lsa_String *r)
 295 {
 296         return ejs_pull_string(ejs, v, name, &r->string);
 297 }
 298
 299 /*
 300   push a lsa_String
 301 */
 302 NTSTATUS ejs_push_lsa_String(struct ejs_rpc *ejs,
 303                              struct MprVar *v, const char *name, const struct lsa_String *r)
 304 {
 305         return ejs_push_string(ejs, v, name, r->string);
 306 }
 307
 308 /*
 309   pull a winreg_String
 310 */
 311 NTSTATUS ejs_pull_winreg_String(struct ejs_rpc *ejs,
 312                              struct MprVar *v, const char *name, struct winreg_String *r)
 313 {
 314         return ejs_pull_string(ejs, v, name, &r->name);
 315 }
 316
 317 /*
 318   push a winreg_String
 319 */
 320 NTSTATUS ejs_push_winreg_String(struct ejs_rpc *ejs,
 321                              struct MprVar *v, const char *name, const struct winreg_String *r)
 322 {
 323         return ejs_push_string(ejs, v, name, r->name);
 324 }
 325
 326 NTSTATUS ejs_pull_DATA_BLOB(struct ejs_rpc *ejs,
 327                             struct MprVar *v, const char *name, DATA_BLOB *r)
 328 {
 329         return NT_STATUS_NOT_IMPLEMENTED;
 330 }
 331
 332 NTSTATUS ejs_push_DATA_BLOB(struct ejs_rpc *ejs,
 333                             struct MprVar *v, const char *name,
 334                             const DATA_BLOB *r)
 335 {
 336         return NT_STATUS_NOT_IMPLEMENTED;
 337 }
 338
 339 NTSTATUS ejs_pull_BOOL(struct ejs_rpc *ejs,
 340                        struct MprVar *v, const char *name, BOOL *r)
 341 {
 342         NDR_CHECK(mprGetVar(&v, name));
 343         *r = mprVarToBool(v);
 344         return NT_STATUS_OK;
 345 }
 346
 347 NTSTATUS ejs_push_BOOL(struct ejs_rpc *ejs,
 348                        struct MprVar *v, const char *name, const BOOL *r)
 349 {
 350         return mprSetVar(v, name, mprCreateBoolVar(*r));
 351 }