s3/getdcname: Fix 'net' crash.
[Samba.git] / source / utils / net_idmap.c
blobbd363922f659e90c62f8909d54fa410148125ece
1 /*
2 Samba Unix/Linux SMB client library
3 Distributed SMB/CIFS Server Management Utility
4 Copyright (C) 2003 Andrew Bartlett (abartlet@samba.org)
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.
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.
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/>.
20 #include "includes.h"
21 #include "utils/net.h"
23 #define ALLOC_CHECK(mem) do { \
24 if (!mem) { \
25 d_fprintf(stderr, "Out of memory!\n"); \
26 talloc_free(ctx); \
27 return -1; \
28 } } while(0)
30 /***********************************************************
31 Helper function for net_idmap_dump. Dump one entry.
32 **********************************************************/
33 static int net_idmap_dump_one_entry(TDB_CONTEXT *tdb,
34 TDB_DATA key,
35 TDB_DATA data,
36 void *unused)
38 if (strcmp((char *)key.dptr, "USER HWM") == 0) {
39 printf("USER HWM %d\n", IVAL(data.dptr,0));
40 return 0;
43 if (strcmp((char *)key.dptr, "GROUP HWM") == 0) {
44 printf("GROUP HWM %d\n", IVAL(data.dptr,0));
45 return 0;
48 if (strncmp((char *)key.dptr, "S-", 2) != 0)
49 return 0;
51 printf("%s %s\n", data.dptr, key.dptr);
52 return 0;
55 /***********************************************************
56 Dump the current idmap
57 **********************************************************/
58 static int net_idmap_dump(struct net_context *c, int argc, const char **argv)
60 TDB_CONTEXT *idmap_tdb;
62 if ( argc != 1 || c->display_usage) {
63 d_printf("Usage:\n"
64 "net idmap dump <inputfile>\n"
65 " Dump current ID mapping.\n"
66 " inputfile\tTDB file to read mappings from.\n");
67 return c->display_usage?0:-1;
70 idmap_tdb = tdb_open_log(argv[0], 0, TDB_DEFAULT, O_RDONLY, 0);
72 if (idmap_tdb == NULL) {
73 d_fprintf(stderr, "Could not open idmap: %s\n", argv[0]);
74 return -1;
77 tdb_traverse(idmap_tdb, net_idmap_dump_one_entry, NULL);
79 tdb_close(idmap_tdb);
81 return 0;
84 /***********************************************************
85 Write entries from stdin to current local idmap
86 **********************************************************/
88 static int net_idmap_restore(struct net_context *c, int argc, const char **argv)
90 TALLOC_CTX *ctx;
91 FILE *input;
93 if (c->display_usage) {
94 d_printf("Usage:\n"
95 "net idmap restore [inputfile]\n"
96 " Restore ID mappings from file\n"
97 " inputfile\tFile to load ID mappings from. If not "
98 "given, load data from stdin.\n");
99 return 0;
102 if (! winbind_ping()) {
103 d_fprintf(stderr, "To use net idmap Winbindd must be running.\n");
104 return -1;
107 ctx = talloc_new(NULL);
108 ALLOC_CHECK(ctx);
110 if (argc == 1) {
111 input = fopen(argv[0], "r");
112 } else {
113 input = stdin;
116 while (!feof(input)) {
117 char line[128], sid_string[128];
118 int len;
119 struct wbcDomainSid sid;
120 enum id_type type = ID_TYPE_NOT_SPECIFIED;
121 unsigned long idval;
122 wbcErr wbc_status;
124 if (fgets(line, 127, input) == NULL)
125 break;
127 len = strlen(line);
129 if ( (len > 0) && (line[len-1] == '\n') )
130 line[len-1] = '\0';
132 if (sscanf(line, "GID %lu %128s", &idval, sid_string) == 2) {
133 type = ID_TYPE_GID;
134 } else if (sscanf(line, "UID %lu %128s", &idval, sid_string) == 2) {
135 type = ID_TYPE_UID;
136 } else if (sscanf(line, "USER HWM %lu", &idval) == 1) {
137 /* set uid hwm */
138 wbc_status = wbcSetUidHwm(idval);
139 if (!WBC_ERROR_IS_OK(wbc_status)) {
140 d_fprintf(stderr, "Could not set USER HWM: %s\n",
141 wbcErrorString(wbc_status));
143 continue;
144 } else if (sscanf(line, "GROUP HWM %lu", &idval) == 1) {
145 /* set gid hwm */
146 wbc_status = wbcSetGidHwm(idval);
147 if (!WBC_ERROR_IS_OK(wbc_status)) {
148 d_fprintf(stderr, "Could not set GROUP HWM: %s\n",
149 wbcErrorString(wbc_status));
151 continue;
152 } else {
153 d_fprintf(stderr, "ignoring invalid line [%s]\n", line);
154 continue;
157 wbc_status = wbcStringToSid(sid_string, &sid);
158 if (!WBC_ERROR_IS_OK(wbc_status)) {
159 d_fprintf(stderr, "ignoring invalid sid [%s]: %s\n",
160 sid_string, wbcErrorString(wbc_status));
161 continue;
164 if (type == ID_TYPE_UID) {
165 wbc_status = wbcSetUidMapping(idval, &sid);
166 } else {
167 wbc_status = wbcSetGidMapping(idval, &sid);
169 if (!WBC_ERROR_IS_OK(wbc_status)) {
170 d_fprintf(stderr, "Could not set mapping of %s %lu to sid %s: %s\n",
171 (type == ID_TYPE_GID) ? "GID" : "UID",
172 idval, sid_string,
173 wbcErrorString(wbc_status));
174 continue;
178 if (input != stdin) {
179 fclose(input);
182 talloc_free(ctx);
183 return 0;
186 /***********************************************************
187 Delete a SID mapping from a winbindd_idmap.tdb
188 **********************************************************/
189 static int net_idmap_delete(struct net_context *c, int argc, const char **argv)
191 d_printf("Not Implemented yet\n");
192 return -1;
195 static int net_idmap_set(struct net_context *c, int argc, const char **argv)
197 d_printf("Not Implemented yet\n");
198 return -1;
200 bool idmap_store_secret(const char *backend, bool alloc,
201 const char *domain, const char *identity,
202 const char *secret)
204 char *tmp;
205 int r;
206 bool ret;
208 if (alloc) {
209 r = asprintf(&tmp, "IDMAP_ALLOC_%s", backend);
210 } else {
211 r = asprintf(&tmp, "IDMAP_%s_%s", backend, domain);
214 if (r < 0) return false;
216 strupper_m(tmp); /* make sure the key is case insensitive */
217 ret = secrets_store_generic(tmp, identity, secret);
219 free(tmp);
220 return ret;
224 static int net_idmap_secret(struct net_context *c, int argc, const char **argv)
226 TALLOC_CTX *ctx;
227 const char *secret;
228 const char *dn;
229 char *domain;
230 char *backend;
231 char *opt = NULL;
232 bool ret;
234 if (argc != 2 || c->display_usage) {
235 d_printf("Usage:\n"
236 "net idmap secret {<DOMAIN>|alloc} <secret>\n"
237 " Set the secret for the specified domain "
238 "(or alloc module)\n"
239 " DOMAIN\tDomain to set secret for.\n"
240 " alloc\tSet secret for the alloc module\n"
241 " secret\tNew secret to set.\n");
242 return c->display_usage?0:-1;
245 secret = argv[1];
247 ctx = talloc_new(NULL);
248 ALLOC_CHECK(ctx);
250 if (strcmp(argv[0], "alloc") == 0) {
251 domain = NULL;
252 backend = lp_idmap_alloc_backend();
253 } else {
254 domain = talloc_strdup(ctx, argv[0]);
255 ALLOC_CHECK(domain);
257 opt = talloc_asprintf(ctx, "idmap config %s", domain);
258 ALLOC_CHECK(opt);
260 backend = talloc_strdup(ctx, lp_parm_const_string(-1, opt, "backend", "tdb"));
261 ALLOC_CHECK(backend);
264 if ( ( ! backend) || ( ! strequal(backend, "ldap"))) {
265 d_fprintf(stderr, "The only currently supported backend is LDAP\n");
266 talloc_free(ctx);
267 return -1;
270 if (domain) {
272 dn = lp_parm_const_string(-1, opt, "ldap_user_dn", NULL);
273 if ( ! dn) {
274 d_fprintf(stderr, "Missing ldap_user_dn option for domain %s\n", domain);
275 talloc_free(ctx);
276 return -1;
279 ret = idmap_store_secret("ldap", false, domain, dn, secret);
280 } else {
281 dn = lp_parm_const_string(-1, "idmap alloc config", "ldap_user_dn", NULL);
282 if ( ! dn) {
283 d_fprintf(stderr, "Missing ldap_user_dn option for alloc backend\n");
284 talloc_free(ctx);
285 return -1;
288 ret = idmap_store_secret("ldap", true, NULL, dn, secret);
291 if ( ! ret) {
292 d_fprintf(stderr, "Failed to store secret\n");
293 talloc_free(ctx);
294 return -1;
297 d_printf("Secret stored\n");
298 return 0;
301 int net_help_idmap(struct net_context *c, int argc, const char **argv)
303 d_printf("net idmap dump <inputfile>\n"
304 " Dump current id mapping\n");
306 d_printf("net idmap restore\n"
307 " Restore entries from stdin\n");
309 /* Deliberately *not* document net idmap delete */
311 d_printf("net idmap secret <DOMAIN>|alloc <secret>\n"
312 " Set the secret for the specified DOMAIN (or the alloc module)\n");
314 return -1;
317 static int net_idmap_aclmapset(struct net_context *c, int argc, const char **argv)
319 TALLOC_CTX *mem_ctx;
320 int result = -1;
321 DOM_SID src_sid, dst_sid;
322 char *src, *dst;
323 struct db_context *db;
324 struct db_record *rec;
325 NTSTATUS status;
327 if (argc != 3 || c->display_usage) {
328 d_fprintf(stderr, "usage: net idmap aclmapset <tdb> "
329 "<src-sid> <dst-sid>\n");
330 return -1;
333 if (!(mem_ctx = talloc_init("net idmap aclmapset"))) {
334 d_fprintf(stderr, "talloc_init failed\n");
335 return -1;
338 if (!(db = db_open(mem_ctx, argv[0], 0, TDB_DEFAULT,
339 O_RDWR|O_CREAT, 0600))) {
340 d_fprintf(stderr, "db_open failed: %s\n", strerror(errno));
341 goto fail;
344 if (!string_to_sid(&src_sid, argv[1])) {
345 d_fprintf(stderr, "%s is not a valid sid\n", argv[1]);
346 goto fail;
349 if (!string_to_sid(&dst_sid, argv[2])) {
350 d_fprintf(stderr, "%s is not a valid sid\n", argv[2]);
351 goto fail;
354 if (!(src = sid_string_talloc(mem_ctx, &src_sid))
355 || !(dst = sid_string_talloc(mem_ctx, &dst_sid))) {
356 d_fprintf(stderr, "talloc_strdup failed\n");
357 goto fail;
360 if (!(rec = db->fetch_locked(
361 db, mem_ctx, string_term_tdb_data(src)))) {
362 d_fprintf(stderr, "could not fetch db record\n");
363 goto fail;
366 status = rec->store(rec, string_term_tdb_data(dst), 0);
367 TALLOC_FREE(rec);
369 if (!NT_STATUS_IS_OK(status)) {
370 d_fprintf(stderr, "could not store record: %s\n",
371 nt_errstr(status));
372 goto fail;
375 result = 0;
376 fail:
377 TALLOC_FREE(mem_ctx);
378 return result;
381 /***********************************************************
382 Look at the current idmap
383 **********************************************************/
384 int net_idmap(struct net_context *c, int argc, const char **argv)
386 struct functable func[] = {
388 "dump",
389 net_idmap_dump,
390 NET_TRANSPORT_LOCAL,
391 "Dump the current ID mappings",
392 "net idmap dump\n"
393 " Dump the current ID mappings"
396 "restore",
397 net_idmap_restore,
398 NET_TRANSPORT_LOCAL,
399 "Restore entries from stdin",
400 "net idmap restore\n"
401 " Restore entries from stdin"
404 "setmap",
405 net_idmap_set,
406 NET_TRANSPORT_LOCAL,
407 "Not implemented yet",
408 "net idmap setmap\n"
409 " Not implemented yet"
412 "delete",
413 net_idmap_delete,
414 NET_TRANSPORT_LOCAL,
415 "Not implemented yet",
416 "net idmap delete\n"
417 " Not implemented yet"
420 "secret",
421 net_idmap_secret,
422 NET_TRANSPORT_LOCAL,
423 "Set secret for specified domain",
424 "net idmap secret {<DOMAIN>|alloc} <secret>\n"
425 " Set secret for specified domain or alloc module"
428 "aclmapset",
429 net_idmap_aclmapset,
430 NET_TRANSPORT_LOCAL,
431 "Set acl map",
432 "net idmap aclmapset\n"
433 " Set acl map"
435 {NULL, NULL, 0, NULL, NULL}
438 return net_run_function(c, argc, argv, "net idmap", func);