static struct MprVar mprDomainSecrets(struct samba3_domainsecrets *ds) { struct MprVar v, e = mprObject("domainsecrets"); char *tmp; DATA_BLOB blob; mprSetVar(&e, "name", mprString(ds->name)); tmp = dom_sid_string(NULL, &ds->sid); mprSetVar(&e, "sid", mprString(tmp)); talloc_free(tmp); tmp = GUID_string(NULL, &ds->guid); mprSetVar(&e, "guid", mprString(tmp)); talloc_free(tmp); mprSetVar(&e, "plaintext_pw", mprString(ds->plaintext_pw)); mprSetVar(&e, "last_change_time", mprCreateIntegerVar(ds->last_change_time)); mprSetVar(&e, "sec_channel_type", mprCreateIntegerVar(ds->sec_channel_type)); v = mprObject("hash_pw"); blob.data = ds->hash_pw.hash; blob.length = 16; mprSetVar(&v, "hash", mprDataBlob(blob)); mprSetVar(&v, "mod_time", mprCreateIntegerVar(ds->hash_pw.mod_time)); mprSetVar(&e, "hash_pw", v); return e; }
static struct MprVar mprWinsEntries(struct samba3 *samba3) { struct MprVar mpv = mprArray("array"); int i, j; for (i = 0; i < samba3->winsdb_count; i++) { struct MprVar w = mprObject("wins_entry"), ips; mprSetVar(&w, "name", mprString(samba3->winsdb_entries[i].name)); mprSetVar(&w, "nb_flags", mprCreateIntegerVar(samba3->winsdb_entries[i].nb_flags)); mprSetVar(&w, "type", mprCreateIntegerVar(samba3->winsdb_entries[i].type)); mprSetVar(&w, "ttl", mprCreateIntegerVar(samba3->winsdb_entries[i].ttl)); ips = mprObject("array"); for (j = 0; j < samba3->winsdb_entries[i].ip_count; j++) { const char *addr; addr = sys_inet_ntoa(samba3->winsdb_entries[i].ips[j]); mprAddArray(&ips, j, mprString(addr)); } mprSetVar(&w, "ips", ips); mprAddArray(&mpv, i, w); } if (i == 0) { mprSetVar(&mpv, "length", mprCreateIntegerVar(i)); } return mpv; }
static struct MprVar mprGroupMappings(struct samba3_groupdb *db) { struct MprVar mpv = mprArray("array"), g; int i; for (i = 0; i < db->groupmap_count; i++) { char *tmp; g = mprObject("group"); mprSetVar(&g, "gid", mprCreateIntegerVar(db->groupmappings[i].gid)); tmp = dom_sid_string(NULL, db->groupmappings[i].sid); mprSetVar(&g, "sid", mprString(tmp)); talloc_free(tmp); mprSetVar(&g, "sid_name_use", mprCreateIntegerVar(db->groupmappings[i].sid_name_use)); mprSetVar(&g, "nt_name", mprString(db->groupmappings[i].nt_name)); mprSetVar(&g, "comment", mprString(db->groupmappings[i].comment)); mprAddArray(&mpv, i, g); } if (i == 0) { mprSetVar(&mpv, "length", mprCreateIntegerVar(i)); } return mpv; }
static struct MprVar mprAliases(struct samba3_groupdb *db) { struct MprVar mpv = mprObject("array"), a, am; int i, j; for (i = 0; i < db->alias_count; i++) { char *tmp; a = mprObject("alias"); tmp = dom_sid_string(NULL, db->aliases[i].sid); mprSetVar(&a, "sid", mprString(tmp)); talloc_free(tmp); am = mprArray("array"); for (j = 0; j < db->aliases[i].member_count; j++) { tmp = dom_sid_string(NULL, db->aliases[i].members[j]); mprAddArray(&am, j, mprString(tmp)); talloc_free(tmp); } mprSetVar(&a, "members", am); } if (i == 0) { mprSetVar(&mpv, "length", mprCreateIntegerVar(i)); } return mpv; }
/* Properties: UserInfo.AccountName UserInfo.FullName UserInfo.Description UserInfo.HomeDirectory UserInfo.HomeDrive UserInfo.Comment UserInfo.LogonScript UserInfo.AcctExpiry UserInfo.AllowPasswordChange UserInfo.ForcePasswordChange */ struct MprVar mprCreateUserInfo(TALLOC_CTX *mem_ctx, struct libnet_UserInfo *info) { const char *name = "UserInfo"; NTSTATUS status; struct MprVar mprUserInfo; struct MprVar mprAccountName, mprFullName, mprDescription; struct MprVar mprHomeDir, mprHomeDrive, mprComment; struct MprVar mprLogonScript; struct MprVar mprAcctExpiry, mprAllowPassChange, mprForcePassChange; if (info == NULL || mem_ctx == NULL) { mprUserInfo = mprCreateNullVar(); goto done; } mprUserInfo = mprObject(name); mprAccountName = mprString(info->out.account_name); mprFullName = mprString(info->out.full_name); mprDescription = mprString(info->out.description); mprHomeDir = mprString(info->out.home_directory); mprHomeDrive = mprString(info->out.home_drive); mprComment = mprString(info->out.comment); mprLogonScript = mprString(info->out.logon_script); mprAcctExpiry = mprString(timestring(mem_ctx, info->out.acct_expiry->tv_sec)); mprAllowPassChange = mprString(timestring(mem_ctx, info->out.allow_password_change->tv_sec)); mprForcePassChange = mprString(timestring(mem_ctx, info->out.force_password_change->tv_sec)); status = mprSetVar(&mprUserInfo, "AccountName", mprAccountName); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "FullName", mprFullName); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "Description", mprDescription); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "HomeDirectory", mprHomeDir); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "HomeDrive", mprHomeDrive); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "Comment", mprComment); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "LogonScript", mprLogonScript); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "AcctExpiry", mprAcctExpiry); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "AllowPasswordChange", mprAllowPassChange); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprUserInfo, "ForcePasswordChange", mprForcePassChange); if (!NT_STATUS_IS_OK(status)) goto done; done: return mprUserInfo; }
/* Properties: UserListCtx.Users[] UserListCtx.ResumeIndex UserListCtx.Count UserListCtx.EndOfList UserListCtx.Status */ struct MprVar mprUserListCtx(TALLOC_CTX *mem_ctx, struct libnet_UserList *list, NTSTATUS result) { const char *name = "UserListCtx"; NTSTATUS status; bool endOfList; struct MprVar mprListCtx, mprUserList; struct MprVar mprUser, mprSid, mprUsername; int i; if (list == NULL || mem_ctx == NULL) { mprListCtx = mprCreateNullVar(); goto done; } endOfList = (NT_STATUS_EQUAL(result, NT_STATUS_NO_MORE_ENTRIES) || NT_STATUS_IS_OK(result)); mprUserList = mprArray("Users"); for (i = 0; i < list->out.count; i++) { struct userlist u = list->out.users[i]; /* get userlist fields */ mprSid = mprString(u.sid); mprUsername = mprString(u.username); /* create userlist object */ mprUser = mprObject("User"); mprSetVar(&mprUser, "Username", mprUsername); mprSetVar(&mprUser, "SID", mprSid); /* add the object to the array being constructed */ mprAddArray(&mprUserList, i, mprUser); } mprListCtx = mprObject(name); status = mprSetVar(&mprListCtx, "Users", mprUserList); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprListCtx, "Count", mprCreateIntegerVar(list->out.count)); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprListCtx, "ResumeIndex", mprCreateIntegerVar((int)list->out.resume_index)); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprListCtx, "EndOfList", mprCreateBoolVar(endOfList)); if (!NT_STATUS_IS_OK(status)) goto done; status = mprSetVar(&mprListCtx, "Status", mprNTSTATUS(result)); done: return mprListCtx; }
static struct MprVar mprIdmapDb(struct samba3_idmapdb *db) { struct MprVar mpv = mprObject("idmapdb"), mps, mp; int i; mprSetVar(&mpv, "user_hwm", mprCreateIntegerVar(db->user_hwm)); mprSetVar(&mpv, "group_hwm", mprCreateIntegerVar(db->group_hwm)); mps = mprArray("array"); for (i = 0; i < db->mapping_count; i++) { char *tmp; mp = mprObject("idmap"); mprSetVar(&mp, "IDMAP_GROUP", mprCreateIntegerVar(IDMAP_GROUP)); mprSetVar(&mp, "IDMAP_USER", mprCreateIntegerVar(IDMAP_USER)); mprSetVar(&mp, "type", mprCreateIntegerVar(db->mappings[i].type)); mprSetVar(&mp, "unix_id", mprCreateIntegerVar(db->mappings[i].unix_id)); tmp = dom_sid_string(NULL, db->mappings[i].sid); mprSetVar(&mp, "sid", mprString(tmp)); talloc_free(tmp); mprAddArray(&mps, i, mp); } if (i == 0) { mprSetVar(&mpv, "length", mprCreateIntegerVar(i)); } mprSetVar(&mpv, "mappings", mps); return mpv; }
static int ejs_net_join_domain(MprVarHandle eid, int argc, struct MprVar **argv) { TALLOC_CTX *mem_ctx; struct libnet_context *ctx; struct libnet_Join *join; NTSTATUS status; ctx = mprGetThisPtr(eid, "ctx"); mem_ctx = talloc_new(mprMemCtx()); join = talloc(mem_ctx, struct libnet_Join); if (!join) { talloc_free(mem_ctx); return -1; } /* prepare parameters for the join */ join->in.netbios_name = NULL; join->in.join_type = SEC_CHAN_WKSTA; join->in.domain_name = cli_credentials_get_domain(ctx->cred); join->in.level = LIBNET_JOIN_AUTOMATIC; join->out.error_string = NULL; if (argc == 1 && argv[0]->type == MPR_TYPE_OBJECT) { MprVar *netbios_name = mprGetProperty(argv[0], "netbios_name", NULL); MprVar *domain_name = mprGetProperty(argv[0], "domain_name", NULL); MprVar *join_type = mprGetProperty(argv[0], "join_type", NULL); if (netbios_name) { join->in.netbios_name = mprToString(netbios_name); } if (domain_name) { join->in.domain_name = mprToString(domain_name); } if (join_type) { join->in.join_type = mprToInt(join_type); } } if (!join->in.domain_name) { ejsSetErrorMsg(eid, "a domain must be specified for to join"); talloc_free(mem_ctx); return -1; } /* do the domain join */ status = libnet_Join(ctx, join, join); if (!NT_STATUS_IS_OK(status)) { MprVar error_string = mprString(join->out.error_string); mprSetPropertyValue(argv[0], "error_string", error_string); mpr_Return(eid, mprCreateBoolVar(False)); } else { mpr_Return(eid, mprCreateBoolVar(True)); } talloc_free(mem_ctx); return 0; }
static void ejs_list_helper(struct clilist_file_info *info, const char *mask, void *state) { MprVar *result = (MprVar *)state; char idx[16]; mprItoa(result->properties->numDataItems, idx, sizeof(idx)); mprSetVar(result, idx, mprString(info->name)); }
/* construct a MprVar from a list */ struct MprVar mprList(const char *name, const char **list) { struct MprVar var; int i; var = mprArray(name); for (i=0;list && list[i];i++) { mprAddArray(&var, i, mprString(list[i])); } return var; }
/* construct a string MprVar from a lump of data */ struct MprVar mprData(const uint8_t *p, size_t length) { struct MprVar var; char *s = talloc_strndup(mprMemCtx(), (const char *)p, length); if (s == NULL) { return mprCreateUndefinedVar(); } var = mprString(s); talloc_free(s); return var; }
/* turn a NTSTATUS into a MprVar object with lots of funky properties */ struct MprVar mprNTSTATUS(NTSTATUS status) { struct MprVar res; res = mprObject("ntstatus"); mprSetVar(&res, "errstr", mprString(nt_errstr(status))); mprSetVar(&res, "v", mprCreateIntegerVar(NT_STATUS_V(status))); mprSetVar(&res, "is_ok", mprCreateBoolVar(NT_STATUS_IS_OK(status))); mprSetVar(&res, "is_err", mprCreateBoolVar(NT_STATUS_IS_ERR(status))); return res; }
/* turn a WERROR into a MprVar object with lots of funky properties */ struct MprVar mprWERROR(WERROR status) { struct MprVar res; res = mprObject("werror"); mprSetVar(&res, "errstr", mprString(win_errstr(status))); mprSetVar(&res, "v", mprCreateIntegerVar(W_ERROR_V(status))); mprSetVar(&res, "is_ok", mprCreateBoolVar(W_ERROR_IS_OK(status))); mprSetVar(&res, "is_err", mprCreateBoolVar(!W_ERROR_IS_OK(status))); return res; }
static struct MprVar mprRegistry(struct samba3_regdb *reg) { struct MprVar mpv = mprObject("registry"), ks, vs, k, v; int i, j; ks = mprArray("array"); for (i = 0; i < reg->key_count; i++) { k = mprObject("regkey"); mprSetVar(&k, "name", mprString(reg->keys[i].name)); vs = mprArray("array"); for (j = 0; j < reg->keys[i].value_count; j++) { v = mprObject("regval"); mprSetVar(&v, "name", mprString(reg->keys[i].values[j].name)); mprSetVar(&v, "type", mprCreateIntegerVar(reg->keys[i].values[j].type)); mprSetVar(&v, "data", mprDataBlob(reg->keys[i].values[j].data)); mprAddArray(&vs, j, v); } mprSetVar(&k, "values", vs); mprAddArray(&ks, i, k); } if (i == 0) { mprSetVar(&ks, "length", mprCreateIntegerVar(i)); } mprSetVar(&mpv, "keys", ks); return mpv; }
static int ejs_resolve_name(MprVarHandle eid, int argc, struct MprVar **argv) { int result = -1; struct nbt_name name; TALLOC_CTX *tmp_ctx = talloc_new(mprMemCtx()); NTSTATUS nt_status; const char *reply_addr; /* validate arguments */ if (argc < 2 || argc > 3) { ejsSetErrorMsg(eid, "resolveName invalid arguments"); goto done; } if (argv[0]->type != MPR_TYPE_OBJECT) { ejsSetErrorMsg(eid, "resolvename invalid arguments"); goto done; } if (argv[1]->type != MPR_TYPE_STRING) { ejsSetErrorMsg(eid, "resolveName invalid arguments"); goto done; } if (argc == 2) { make_nbt_name_client(&name, mprToString(argv[1])); } else { if (!mprVarIsNumber(argv[1]->type)) { ejsSetErrorMsg(eid, "resolveName invalid arguments"); goto done; } make_nbt_name(&name, mprToString(argv[1]), mprToInt(argv[2])); } result = 0; nt_status = resolve_name(&name, tmp_ctx, &reply_addr, event_context_find(tmp_ctx)); if (NT_STATUS_IS_OK(nt_status)) { mprSetPropertyValue(argv[0], "value", mprString(reply_addr)); } mpr_Return(eid, mprNTSTATUS(nt_status)); done: talloc_free(tmp_ctx); return result; }
static struct MprVar mprShares(struct samba3 *samba3) { struct MprVar mpv = mprArray("array"), s; int i; for (i = 0; i < samba3->share_count; i++) { s = mprObject("share"); mprSetVar(&s, "name", mprString(samba3->shares[i].name)); /* FIXME: secdesc */ mprAddArray(&mpv, i, s); } if (i == 0) { mprSetVar(&mpv, "length", mprCreateIntegerVar(i)); } return mpv; }
/* set the return value then free the variable */ void mpr_ReturnString(int eid, const char *s) { mpr_Return(eid, mprString(s)); }
static struct MprVar mprSamAccounts(struct samba3 *samba3) { struct MprVar mpv = mprArray("array"), m; int i; for (i = 0; i < samba3->samaccount_count; i++) { struct samba3_samaccount *a = &samba3->samaccounts[i]; DATA_BLOB blob; m = mprObject("samba3_samaccount"); mprSetVar(&m, "logon_time", mprCreateIntegerVar(a->logon_time)); mprSetVar(&m, "logoff_time", mprCreateIntegerVar(a->logoff_time)); mprSetVar(&m, "kickoff_time", mprCreateIntegerVar(a->kickoff_time)); mprSetVar(&m, "bad_password_time", mprCreateIntegerVar(a->bad_password_time)); mprSetVar(&m, "pass_last_set_time", mprCreateIntegerVar(a->pass_last_set_time)); mprSetVar(&m, "pass_can_change_time", mprCreateIntegerVar(a->pass_can_change_time)); mprSetVar(&m, "pass_must_change_time", mprCreateIntegerVar(a->pass_must_change_time)); mprSetVar(&m, "user_rid", mprCreateIntegerVar(a->user_rid)); mprSetVar(&m, "group_rid", mprCreateIntegerVar(a->group_rid)); mprSetVar(&m, "acct_ctrl", mprCreateIntegerVar(a->acct_ctrl)); mprSetVar(&m, "logon_divs", mprCreateIntegerVar(a->logon_divs)); mprSetVar(&m, "bad_password_count", mprCreateIntegerVar(a->bad_password_count)); mprSetVar(&m, "logon_count", mprCreateIntegerVar(a->logon_count)); mprSetVar(&m, "username", mprString(a->username)); mprSetVar(&m, "domain", mprString(a->domain)); mprSetVar(&m, "nt_username", mprString(a->nt_username)); mprSetVar(&m, "dir_drive", mprString(a->dir_drive)); mprSetVar(&m, "munged_dial", mprString(a->munged_dial)); mprSetVar(&m, "fullname", mprString(a->fullname)); mprSetVar(&m, "homedir", mprString(a->homedir)); mprSetVar(&m, "logon_script", mprString(a->logon_script)); mprSetVar(&m, "profile_path", mprString(a->profile_path)); mprSetVar(&m, "acct_desc", mprString(a->acct_desc)); mprSetVar(&m, "workstations", mprString(a->workstations)); blob.length = 16; blob.data = a->lm_pw.hash; mprSetVar(&m, "lm_pw", mprDataBlob(blob)); blob.data = a->nt_pw.hash; mprSetVar(&m, "nt_pw", mprDataBlob(blob)); mprAddArray(&mpv, i, m); } if (i == 0) { mprSetVar(&mpv, "length", mprCreateIntegerVar(i)); } return mpv; }
static struct MprVar mprSecrets(struct samba3_secrets *sec) { struct MprVar mpv = mprObject("samba3_secrets"), es, e; int i; es = mprArray("array"); for (i = 0; i < sec->ldappw_count; i++) { e = mprObject("ldappw"); mprSetVar(&e, "dn", mprString(sec->ldappws[i].dn)); mprSetVar(&e, "password", mprString(sec->ldappws[i].password)); mprAddArray(&es, i, e); } mprSetVar(&mpv, "ldappws", es); es = mprArray("array"); for (i = 0; i < sec->domain_count; i++) { mprAddArray(&es, i, mprDomainSecrets(&sec->domains[i])); } if (i == 0) { mprSetVar(&es, "length", mprCreateIntegerVar(i)); } mprSetVar(&mpv, "domains", es); es = mprArray("trusted_domains"); for (i = 0; i < sec->trusted_domain_count; i++) { struct MprVar ns; char *tmp; int j; e = mprObject("trusted_domain"); ns = mprArray("array"); for (j = 0; j < sec->trusted_domains[i].uni_name_len; j++) { mprAddArray(&ns, j, mprString(sec->trusted_domains[i].uni_name[j])); } mprSetVar(&e, "uni_name", ns); mprSetVar(&e, "pass", mprString(sec->trusted_domains[i].pass)); mprSetVar(&e, "mod_time", mprCreateIntegerVar(sec->trusted_domains[i].mod_time)); tmp = dom_sid_string(NULL, &sec->trusted_domains[i].domain_sid); mprSetVar(&e, "domains_sid", mprString(tmp)); talloc_free(tmp); mprAddArray(&es, i, e); } if (i == 0) { mprSetVar(&es, "length", mprCreateIntegerVar(i)); } mprSetVar(&mpv, "trusted_domains", es); es = mprArray("array"); for (i = 0; i < sec->afs_keyfile_count; i++) { struct MprVar ks; int j; e = mprObject("afs_keyfile"); mprSetVar(&e, "cell", mprString(sec->afs_keyfiles[i].cell)); ks = mprArray("array"); for (j = 0; j < 8; j++) { struct MprVar k = mprObject("entry"); DATA_BLOB blob; mprSetVar(&k, "kvno", mprCreateIntegerVar(sec->afs_keyfiles[i].entry[j].kvno)); blob.data = (uint8_t*)sec->afs_keyfiles[i].entry[j].key; blob.length = 8; mprSetVar(&k, "key", mprDataBlob(blob)); mprAddArray(&ks, j, k); } mprSetVar(&e, "entry", ks); mprSetVar(&e, "nkeys", mprCreateIntegerVar(sec->afs_keyfiles[i].nkeys)); mprAddArray(&es, i, e); } if (i == 0) { mprSetVar(&es, "length", mprCreateIntegerVar(i)); } mprSetVar(&mpv, "afs_keyfiles", es); mprSetVar(&mpv, "ipc_cred", mprCredentials(sec->ipc_cred)); return mpv; }
/* turn a ldb_message into a ejs object variable */ static struct MprVar mprLdbMessage(struct ldb_context *ldb, struct ldb_message *msg) { struct MprVar var; int i; /* we force some attributes to always be an array in the returned structure. This makes the scripting easier, as you don't need a special case for the single value case */ const char *multivalued[] = { "objectClass", "memberOf", "privilege", "member", NULL }; var = mprObject(ldb_dn_alloc_linearized(msg, msg->dn)); for (i=0;i<msg->num_elements;i++) { struct ldb_message_element *el = &msg->elements[i]; struct MprVar val; const struct ldb_attrib_handler *attr; struct ldb_val v; attr = ldb_attrib_handler(ldb, el->name); if (attr == NULL) { goto failed; } if (el->num_values == 1 && !str_list_check_ci(multivalued, el->name)) { if (attr->ldif_write_fn(ldb, msg, &el->values[0], &v) != 0) { goto failed; } /* FIXME: nasty hack, remove me when ejs will support * arbitrary string and does not truncate on \0 */ if (strlen((char *)v.data) != v.length) { val = mprDataBlob(v); } else { val = mprData(v.data, v.length); } } else { int j; val = mprArray(el->name); for (j=0;j<el->num_values;j++) { if (attr->ldif_write_fn(ldb, msg, &el->values[j], &v) != 0) { goto failed; } /* FIXME: nasty hack, remove me when ejs will support * arbitrary string and does not truncate on \0 */ if (strlen((char *)v.data) != v.length) { mprAddArray(&val, j, mprDataBlob(v)); } else { mprAddArray(&val, j, mprData(v.data, v.length)); } } } mprSetVar(&var, el->name, val); } /* add the dn if it is not already specified */ if (mprGetProperty(&var, "dn", 0) == 0) { mprSetVar(&var, "dn", mprString(ldb_dn_alloc_linearized(msg, msg->dn))); } return var; failed: return mprCreateUndefinedVar(); }