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