Fix bug 7866 - "net" in v3-6-test broken.
[ddiss/samba.git] / source3 / utils / net_ads.c
1 /*
2    Samba Unix/Linux SMB client library
3    net ads commands
4    Copyright (C) 2001 Andrew Tridgell (tridge@samba.org)
5    Copyright (C) 2001 Remus Koos (remuskoos@yahoo.com)
6    Copyright (C) 2002 Jim McDonough (jmcd@us.ibm.com)
7    Copyright (C) 2006 Gerald (Jerry) Carter (jerry@samba.org)
8
9    This program is free software; you can redistribute it and/or modify
10    it under the terms of the GNU General Public License as published by
11    the Free Software Foundation; either version 3 of the License, or
12    (at your option) any later version.
13
14    This program is distributed in the hope that it will be useful,
15    but WITHOUT ANY WARRANTY; without even the implied warranty of
16    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17    GNU General Public License for more details.
18
19    You should have received a copy of the GNU General Public License
20    along with this program.  If not, see <http://www.gnu.org/licenses/>.
21 */
22
23 #include "includes.h"
24 #include "utils/net.h"
25 #include "librpc/gen_ndr/ndr_krb5pac.h"
26 #include "../librpc/gen_ndr/cli_spoolss.h"
27 #include "nsswitch/libwbclient/wbclient.h"
28 #include "ads.h"
29 #include "libads/cldap.h"
30 #include "libads/dns.h"
31 #include "../libds/common/flags.h"
32 #include "librpc/gen_ndr/libnet_join.h"
33 #include "libnet/libnet_join.h"
34 #include "smb_krb5.h"
35 #include "secrets.h"
36 #include "krb5_env.h"
37 #include "../libcli/security/security.h"
38
39 #ifdef HAVE_ADS
40
41 /* when we do not have sufficient input parameters to contact a remote domain
42  * we always fall back to our own realm - Guenther*/
43
44 static const char *assume_own_realm(struct net_context *c)
45 {
46         if (!c->opt_host && strequal(lp_workgroup(), c->opt_target_workgroup)) {
47                 return lp_realm();
48         }
49
50         return NULL;
51 }
52
53 /*
54   do a cldap netlogon query
55 */
56 static int net_ads_cldap_netlogon(struct net_context *c, ADS_STRUCT *ads)
57 {
58         char addr[INET6_ADDRSTRLEN];
59         struct NETLOGON_SAM_LOGON_RESPONSE_EX reply;
60
61         print_sockaddr(addr, sizeof(addr), &ads->ldap.ss);
62         if ( !ads_cldap_netlogon_5(talloc_tos(), addr, ads->server.realm, &reply ) ) {
63                 d_fprintf(stderr, _("CLDAP query failed!\n"));
64                 return -1;
65         }
66
67         d_printf(_("Information for Domain Controller: %s\n\n"),
68                 addr);
69
70         d_printf(_("Response Type: "));
71         switch (reply.command) {
72         case LOGON_SAM_LOGON_USER_UNKNOWN_EX:
73                 d_printf("LOGON_SAM_LOGON_USER_UNKNOWN_EX\n");
74                 break;
75         case LOGON_SAM_LOGON_RESPONSE_EX:
76                 d_printf("LOGON_SAM_LOGON_RESPONSE_EX\n");
77                 break;
78         default:
79                 d_printf("0x%x\n", reply.command);
80                 break;
81         }
82
83         d_printf(_("GUID: %s\n"), GUID_string(talloc_tos(),&reply.domain_uuid));
84
85         d_printf(_("Flags:\n"
86                    "\tIs a PDC:                                   %s\n"
87                    "\tIs a GC of the forest:                      %s\n"
88                    "\tIs an LDAP server:                          %s\n"
89                    "\tSupports DS:                                %s\n"
90                    "\tIs running a KDC:                           %s\n"
91                    "\tIs running time services:                   %s\n"
92                    "\tIs the closest DC:                          %s\n"
93                    "\tIs writable:                                %s\n"
94                    "\tHas a hardware clock:                       %s\n"
95                    "\tIs a non-domain NC serviced by LDAP server: %s\n"
96                    "\tIs NT6 DC that has some secrets:            %s\n"
97                    "\tIs NT6 DC that has all secrets:             %s\n"),
98                    (reply.server_type & NBT_SERVER_PDC) ? _("yes") : _("no"),
99                    (reply.server_type & NBT_SERVER_GC) ? _("yes") : _("no"),
100                    (reply.server_type & NBT_SERVER_LDAP) ? _("yes") : _("no"),
101                    (reply.server_type & NBT_SERVER_DS) ? _("yes") : _("no"),
102                    (reply.server_type & NBT_SERVER_KDC) ? _("yes") : _("no"),
103                    (reply.server_type & NBT_SERVER_TIMESERV) ? _("yes") : _("no"),
104                    (reply.server_type & NBT_SERVER_CLOSEST) ? _("yes") : _("no"),
105                    (reply.server_type & NBT_SERVER_WRITABLE) ? _("yes") : _("no"),
106                    (reply.server_type & NBT_SERVER_GOOD_TIMESERV) ? _("yes") : _("no"),
107                    (reply.server_type & NBT_SERVER_NDNC) ? _("yes") : _("no"),
108                    (reply.server_type & NBT_SERVER_SELECT_SECRET_DOMAIN_6) ? _("yes") : _("no"),
109                    (reply.server_type & NBT_SERVER_FULL_SECRET_DOMAIN_6) ? _("yes") : _("no"));
110
111
112         printf(_("Forest:\t\t\t%s\n"), reply.forest);
113         printf(_("Domain:\t\t\t%s\n"), reply.dns_domain);
114         printf(_("Domain Controller:\t%s\n"), reply.pdc_dns_name);
115
116         printf(_("Pre-Win2k Domain:\t%s\n"), reply.domain_name);
117         printf(_("Pre-Win2k Hostname:\t%s\n"), reply.pdc_name);
118
119         if (*reply.user_name) printf(_("User name:\t%s\n"), reply.user_name);
120
121         printf(_("Server Site Name :\t\t%s\n"), reply.server_site);
122         printf(_("Client Site Name :\t\t%s\n"), reply.client_site);
123
124         d_printf(_("NT Version: %d\n"), reply.nt_version);
125         d_printf(_("LMNT Token: %.2x\n"), reply.lmnt_token);
126         d_printf(_("LM20 Token: %.2x\n"), reply.lm20_token);
127
128         return 0;
129 }
130
131 /*
132   this implements the CLDAP based netlogon lookup requests
133   for finding the domain controller of a ADS domain
134 */
135 static int net_ads_lookup(struct net_context *c, int argc, const char **argv)
136 {
137         ADS_STRUCT *ads;
138         int ret;
139
140         if (c->display_usage) {
141                 d_printf("%s\n"
142                          "net ads lookup\n"
143                          "    %s",
144                          _("Usage:"),
145                          _("Find the ADS DC using CLDAP lookup.\n"));
146                 return 0;
147         }
148
149         if (!ADS_ERR_OK(ads_startup_nobind(c, false, &ads))) {
150                 d_fprintf(stderr, _("Didn't find the cldap server!\n"));
151                 ads_destroy(&ads);
152                 return -1;
153         }
154
155         if (!ads->config.realm) {
156                 ads->config.realm = CONST_DISCARD(char *, c->opt_target_workgroup);
157                 ads->ldap.port = 389;
158         }
159
160         ret = net_ads_cldap_netlogon(c, ads);
161         ads_destroy(&ads);
162         return ret;
163 }
164
165
166
167 static int net_ads_info(struct net_context *c, int argc, const char **argv)
168 {
169         ADS_STRUCT *ads;
170         char addr[INET6_ADDRSTRLEN];
171
172         if (c->display_usage) {
173                 d_printf("%s\n"
174                          "net ads info\n"
175                          "    %s",
176                          _("Usage:"),
177                          _("Display information about an Active Directory "
178                            "server.\n"));
179                 return 0;
180         }
181
182         if (!ADS_ERR_OK(ads_startup_nobind(c, false, &ads))) {
183                 d_fprintf(stderr, _("Didn't find the ldap server!\n"));
184                 return -1;
185         }
186
187         if (!ads || !ads->config.realm) {
188                 d_fprintf(stderr, _("Didn't find the ldap server!\n"));
189                 ads_destroy(&ads);
190                 return -1;
191         }
192
193         /* Try to set the server's current time since we didn't do a full
194            TCP LDAP session initially */
195
196         if ( !ADS_ERR_OK(ads_current_time( ads )) ) {
197                 d_fprintf( stderr, _("Failed to get server's current time!\n"));
198         }
199
200         print_sockaddr(addr, sizeof(addr), &ads->ldap.ss);
201
202         d_printf(_("LDAP server: %s\n"), addr);
203         d_printf(_("LDAP server name: %s\n"), ads->config.ldap_server_name);
204         d_printf(_("Realm: %s\n"), ads->config.realm);
205         d_printf(_("Bind Path: %s\n"), ads->config.bind_path);
206         d_printf(_("LDAP port: %d\n"), ads->ldap.port);
207         d_printf(_("Server time: %s\n"),
208                          http_timestring(talloc_tos(), ads->config.current_time));
209
210         d_printf(_("KDC server: %s\n"), ads->auth.kdc_server );
211         d_printf(_("Server time offset: %d\n"), ads->auth.time_offset );
212
213         ads_destroy(&ads);
214         return 0;
215 }
216
217 static void use_in_memory_ccache(void) {
218         /* Use in-memory credentials cache so we do not interfere with
219          * existing credentials */
220         setenv(KRB5_ENV_CCNAME, "MEMORY:net_ads", 1);
221 }
222
223 static ADS_STATUS ads_startup_int(struct net_context *c, bool only_own_domain,
224                                   uint32 auth_flags, ADS_STRUCT **ads_ret)
225 {
226         ADS_STRUCT *ads = NULL;
227         ADS_STATUS status;
228         bool need_password = false;
229         bool second_time = false;
230         char *cp;
231         const char *realm = NULL;
232         bool tried_closest_dc = false;
233
234         /* lp_realm() should be handled by a command line param,
235            However, the join requires that realm be set in smb.conf
236            and compares our realm with the remote server's so this is
237            ok until someone needs more flexibility */
238
239         *ads_ret = NULL;
240
241 retry_connect:
242         if (only_own_domain) {
243                 realm = lp_realm();
244         } else {
245                 realm = assume_own_realm(c);
246         }
247
248         ads = ads_init(realm, c->opt_target_workgroup, c->opt_host);
249
250         if (!c->opt_user_name) {
251                 c->opt_user_name = "administrator";
252         }
253
254         if (c->opt_user_specified) {
255                 need_password = true;
256         }
257
258 retry:
259         if (!c->opt_password && need_password && !c->opt_machine_pass) {
260                 c->opt_password = net_prompt_pass(c, c->opt_user_name);
261                 if (!c->opt_password) {
262                         ads_destroy(&ads);
263                         return ADS_ERROR(LDAP_NO_MEMORY);
264                 }
265         }
266
267         if (c->opt_password) {
268                 use_in_memory_ccache();
269                 SAFE_FREE(ads->auth.password);
270                 ads->auth.password = smb_xstrdup(c->opt_password);
271         }
272
273         ads->auth.flags |= auth_flags;
274         SAFE_FREE(ads->auth.user_name);
275         ads->auth.user_name = smb_xstrdup(c->opt_user_name);
276
277        /*
278         * If the username is of the form "name@realm",
279         * extract the realm and convert to upper case.
280         * This is only used to establish the connection.
281         */
282        if ((cp = strchr_m(ads->auth.user_name, '@'))!=0) {
283                 *cp++ = '\0';
284                 SAFE_FREE(ads->auth.realm);
285                 ads->auth.realm = smb_xstrdup(cp);
286                 strupper_m(ads->auth.realm);
287        }
288
289         status = ads_connect(ads);
290
291         if (!ADS_ERR_OK(status)) {
292
293                 if (NT_STATUS_EQUAL(ads_ntstatus(status),
294                                     NT_STATUS_NO_LOGON_SERVERS)) {
295                         DEBUG(0,("ads_connect: %s\n", ads_errstr(status)));
296                         ads_destroy(&ads);
297                         return status;
298                 }
299
300                 if (!need_password && !second_time && !(auth_flags & ADS_AUTH_NO_BIND)) {
301                         need_password = true;
302                         second_time = true;
303                         goto retry;
304                 } else {
305                         ads_destroy(&ads);
306                         return status;
307                 }
308         }
309
310         /* when contacting our own domain, make sure we use the closest DC.
311          * This is done by reconnecting to ADS because only the first call to
312          * ads_connect will give us our own sitename */
313
314         if ((only_own_domain || !c->opt_host) && !tried_closest_dc) {
315
316                 tried_closest_dc = true; /* avoid loop */
317
318                 if (!ads_closest_dc(ads)) {
319
320                         namecache_delete(ads->server.realm, 0x1C);
321                         namecache_delete(ads->server.workgroup, 0x1C);
322
323                         ads_destroy(&ads);
324                         ads = NULL;
325
326                         goto retry_connect;
327                 }
328         }
329
330         *ads_ret = ads;
331         return status;
332 }
333
334 ADS_STATUS ads_startup(struct net_context *c, bool only_own_domain, ADS_STRUCT **ads)
335 {
336         return ads_startup_int(c, only_own_domain, 0, ads);
337 }
338
339 ADS_STATUS ads_startup_nobind(struct net_context *c, bool only_own_domain, ADS_STRUCT **ads)
340 {
341         return ads_startup_int(c, only_own_domain, ADS_AUTH_NO_BIND, ads);
342 }
343
344 /*
345   Check to see if connection can be made via ads.
346   ads_startup() stores the password in opt_password if it needs to so
347   that rpc or rap can use it without re-prompting.
348 */
349 static int net_ads_check_int(const char *realm, const char *workgroup, const char *host)
350 {
351         ADS_STRUCT *ads;
352         ADS_STATUS status;
353
354         if ( (ads = ads_init( realm, workgroup, host )) == NULL ) {
355                 return -1;
356         }
357
358         ads->auth.flags |= ADS_AUTH_NO_BIND;
359
360         status = ads_connect(ads);
361         if ( !ADS_ERR_OK(status) ) {
362                 return -1;
363         }
364
365         ads_destroy(&ads);
366         return 0;
367 }
368
369 int net_ads_check_our_domain(struct net_context *c)
370 {
371         return net_ads_check_int(lp_realm(), lp_workgroup(), NULL);
372 }
373
374 int net_ads_check(struct net_context *c)
375 {
376         return net_ads_check_int(NULL, c->opt_workgroup, c->opt_host);
377 }
378
379 /*
380    determine the netbios workgroup name for a domain
381  */
382 static int net_ads_workgroup(struct net_context *c, int argc, const char **argv)
383 {
384         ADS_STRUCT *ads;
385         char addr[INET6_ADDRSTRLEN];
386         struct NETLOGON_SAM_LOGON_RESPONSE_EX reply;
387
388         if (c->display_usage) {
389                 d_printf  ("%s\n"
390                            "net ads workgroup\n"
391                            "    %s\n",
392                          _("Usage:"),
393                          _("Print the workgroup name"));
394                 return 0;
395         }
396
397         if (!ADS_ERR_OK(ads_startup_nobind(c, false, &ads))) {
398                 d_fprintf(stderr, _("Didn't find the cldap server!\n"));
399                 return -1;
400         }
401
402         if (!ads->config.realm) {
403                 ads->config.realm = CONST_DISCARD(char *, c->opt_target_workgroup);
404                 ads->ldap.port = 389;
405         }
406
407         print_sockaddr(addr, sizeof(addr), &ads->ldap.ss);
408         if ( !ads_cldap_netlogon_5(talloc_tos(), addr, ads->server.realm, &reply ) ) {
409                 d_fprintf(stderr, _("CLDAP query failed!\n"));
410                 ads_destroy(&ads);
411                 return -1;
412         }
413
414         d_printf(_("Workgroup: %s\n"), reply.domain_name);
415
416         ads_destroy(&ads);
417
418         return 0;
419 }
420
421
422
423 static bool usergrp_display(ADS_STRUCT *ads, char *field, void **values, void *data_area)
424 {
425         char **disp_fields = (char **) data_area;
426
427         if (!field) { /* must be end of record */
428                 if (disp_fields[0]) {
429                         if (!strchr_m(disp_fields[0], '$')) {
430                                 if (disp_fields[1])
431                                         d_printf("%-21.21s %s\n",
432                                                disp_fields[0], disp_fields[1]);
433                                 else
434                                         d_printf("%s\n", disp_fields[0]);
435                         }
436                 }
437                 SAFE_FREE(disp_fields[0]);
438                 SAFE_FREE(disp_fields[1]);
439                 return true;
440         }
441         if (!values) /* must be new field, indicate string field */
442                 return true;
443         if (StrCaseCmp(field, "sAMAccountName") == 0) {
444                 disp_fields[0] = SMB_STRDUP((char *) values[0]);
445         }
446         if (StrCaseCmp(field, "description") == 0)
447                 disp_fields[1] = SMB_STRDUP((char *) values[0]);
448         return true;
449 }
450
451 static int net_ads_user_usage(struct net_context *c, int argc, const char **argv)
452 {
453         return net_user_usage(c, argc, argv);
454 }
455
456 static int ads_user_add(struct net_context *c, int argc, const char **argv)
457 {
458         ADS_STRUCT *ads;
459         ADS_STATUS status;
460         char *upn, *userdn;
461         LDAPMessage *res=NULL;
462         int rc = -1;
463         char *ou_str = NULL;
464
465         if (argc < 1 || c->display_usage)
466                 return net_ads_user_usage(c, argc, argv);
467
468         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
469                 return -1;
470         }
471
472         status = ads_find_user_acct(ads, &res, argv[0]);
473
474         if (!ADS_ERR_OK(status)) {
475                 d_fprintf(stderr, _("ads_user_add: %s\n"), ads_errstr(status));
476                 goto done;
477         }
478
479         if (ads_count_replies(ads, res)) {
480                 d_fprintf(stderr, _("ads_user_add: User %s already exists\n"),
481                           argv[0]);
482                 goto done;
483         }
484
485         if (c->opt_container) {
486                 ou_str = SMB_STRDUP(c->opt_container);
487         } else {
488                 ou_str = ads_default_ou_string(ads, DS_GUID_USERS_CONTAINER);
489         }
490
491         status = ads_add_user_acct(ads, argv[0], ou_str, c->opt_comment);
492
493         if (!ADS_ERR_OK(status)) {
494                 d_fprintf(stderr, _("Could not add user %s: %s\n"), argv[0],
495                          ads_errstr(status));
496                 goto done;
497         }
498
499         /* if no password is to be set, we're done */
500         if (argc == 1) {
501                 d_printf(_("User %s added\n"), argv[0]);
502                 rc = 0;
503                 goto done;
504         }
505
506         /* try setting the password */
507         if (asprintf(&upn, "%s@%s", argv[0], ads->config.realm) == -1) {
508                 goto done;
509         }
510         status = ads_krb5_set_password(ads->auth.kdc_server, upn, argv[1],
511                                        ads->auth.time_offset);
512         SAFE_FREE(upn);
513         if (ADS_ERR_OK(status)) {
514                 d_printf(_("User %s added\n"), argv[0]);
515                 rc = 0;
516                 goto done;
517         }
518
519         /* password didn't set, delete account */
520         d_fprintf(stderr, _("Could not add user %s. "
521                             "Error setting password %s\n"),
522                  argv[0], ads_errstr(status));
523         ads_msgfree(ads, res);
524         status=ads_find_user_acct(ads, &res, argv[0]);
525         if (ADS_ERR_OK(status)) {
526                 userdn = ads_get_dn(ads, talloc_tos(), res);
527                 ads_del_dn(ads, userdn);
528                 TALLOC_FREE(userdn);
529         }
530
531  done:
532         if (res)
533                 ads_msgfree(ads, res);
534         ads_destroy(&ads);
535         SAFE_FREE(ou_str);
536         return rc;
537 }
538
539 static int ads_user_info(struct net_context *c, int argc, const char **argv)
540 {
541         ADS_STRUCT *ads = NULL;
542         ADS_STATUS rc;
543         LDAPMessage *res = NULL;
544         TALLOC_CTX *frame;
545         int ret = 0;
546         wbcErr wbc_status;
547         const char *attrs[] = {"memberOf", "primaryGroupID", NULL};
548         char *searchstring=NULL;
549         char **grouplist;
550         char *primary_group;
551         char *escaped_user;
552         struct dom_sid primary_group_sid;
553         uint32_t group_rid;
554         enum wbcSidType type;
555
556         if (argc < 1 || c->display_usage) {
557                 return net_ads_user_usage(c, argc, argv);
558         }
559
560         frame = talloc_new(talloc_tos());
561         if (frame == NULL) {
562                 return -1;
563         }
564
565         escaped_user = escape_ldap_string(frame, argv[0]);
566         if (!escaped_user) {
567                 d_fprintf(stderr,
568                           _("ads_user_info: failed to escape user %s\n"),
569                           argv[0]);
570                 return -1;
571         }
572
573         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
574                 ret = -1;
575                 goto error;
576         }
577
578         if (asprintf(&searchstring, "(sAMAccountName=%s)", escaped_user) == -1) {
579                 ret =-1;
580                 goto error;
581         }
582         rc = ads_search(ads, &res, searchstring, attrs);
583         SAFE_FREE(searchstring);
584
585         if (!ADS_ERR_OK(rc)) {
586                 d_fprintf(stderr, _("ads_search: %s\n"), ads_errstr(rc));
587                 ret = -1;
588                 goto error;
589         }
590
591         if (!ads_pull_uint32(ads, res, "primaryGroupID", &group_rid)) {
592                 d_fprintf(stderr, _("ads_pull_uint32 failed\n"));
593                 ret = -1;
594                 goto error;
595         }
596
597         rc = ads_domain_sid(ads, &primary_group_sid);
598         if (!ADS_ERR_OK(rc)) {
599                 d_fprintf(stderr, _("ads_domain_sid: %s\n"), ads_errstr(rc));
600                 ret = -1;
601                 goto error;
602         }
603
604         sid_append_rid(&primary_group_sid, group_rid);
605
606         wbc_status = wbcLookupSid((struct wbcDomainSid *)&primary_group_sid,
607                                   NULL, /* don't look up domain */
608                                   &primary_group,
609                                   &type);
610         if (!WBC_ERROR_IS_OK(wbc_status)) {
611                 d_fprintf(stderr, "wbcLookupSid: %s\n",
612                           wbcErrorString(wbc_status));
613                 ret = -1;
614                 goto error;
615         }
616
617         d_printf("%s\n", primary_group);
618
619         wbcFreeMemory(primary_group);
620
621         grouplist = ldap_get_values((LDAP *)ads->ldap.ld,
622                                     (LDAPMessage *)res, "memberOf");
623
624         if (grouplist) {
625                 int i;
626                 char **groupname;
627                 for (i=0;grouplist[i];i++) {
628                         groupname = ldap_explode_dn(grouplist[i], 1);
629                         d_printf("%s\n", groupname[0]);
630                         ldap_value_free(groupname);
631                 }
632                 ldap_value_free(grouplist);
633         }
634
635 error:
636         if (res) ads_msgfree(ads, res);
637         if (ads) ads_destroy(&ads);
638         TALLOC_FREE(frame);
639         return ret;
640 }
641
642 static int ads_user_delete(struct net_context *c, int argc, const char **argv)
643 {
644         ADS_STRUCT *ads;
645         ADS_STATUS rc;
646         LDAPMessage *res = NULL;
647         char *userdn;
648
649         if (argc < 1) {
650                 return net_ads_user_usage(c, argc, argv);
651         }
652
653         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
654                 return -1;
655         }
656
657         rc = ads_find_user_acct(ads, &res, argv[0]);
658         if (!ADS_ERR_OK(rc) || ads_count_replies(ads, res) != 1) {
659                 d_printf(_("User %s does not exist.\n"), argv[0]);
660                 ads_msgfree(ads, res);
661                 ads_destroy(&ads);
662                 return -1;
663         }
664         userdn = ads_get_dn(ads, talloc_tos(), res);
665         ads_msgfree(ads, res);
666         rc = ads_del_dn(ads, userdn);
667         TALLOC_FREE(userdn);
668         if (ADS_ERR_OK(rc)) {
669                 d_printf(_("User %s deleted\n"), argv[0]);
670                 ads_destroy(&ads);
671                 return 0;
672         }
673         d_fprintf(stderr, _("Error deleting user %s: %s\n"), argv[0],
674                  ads_errstr(rc));
675         ads_destroy(&ads);
676         return -1;
677 }
678
679 int net_ads_user(struct net_context *c, int argc, const char **argv)
680 {
681         struct functable func[] = {
682                 {
683                         "add",
684                         ads_user_add,
685                         NET_TRANSPORT_ADS,
686                         N_("Add an AD user"),
687                         N_("net ads user add\n"
688                            "    Add an AD user")
689                 },
690                 {
691                         "info",
692                         ads_user_info,
693                         NET_TRANSPORT_ADS,
694                         N_("Display information about an AD user"),
695                         N_("net ads user info\n"
696                            "    Display information about an AD user")
697                 },
698                 {
699                         "delete",
700                         ads_user_delete,
701                         NET_TRANSPORT_ADS,
702                         N_("Delete an AD user"),
703                         N_("net ads user delete\n"
704                            "    Delete an AD user")
705                 },
706                 {NULL, NULL, 0, NULL, NULL}
707         };
708         ADS_STRUCT *ads;
709         ADS_STATUS rc;
710         const char *shortattrs[] = {"sAMAccountName", NULL};
711         const char *longattrs[] = {"sAMAccountName", "description", NULL};
712         char *disp_fields[2] = {NULL, NULL};
713
714         if (argc == 0) {
715                 if (c->display_usage) {
716                         d_printf(  "%s\n"
717                                    "net ads user\n"
718                                    "    %s\n",
719                                  _("Usage:"),
720                                  _("List AD users"));
721                         net_display_usage_from_functable(func);
722                         return 0;
723                 }
724
725                 if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
726                         return -1;
727                 }
728
729                 if (c->opt_long_list_entries)
730                         d_printf(_("\nUser name             Comment"
731                                    "\n-----------------------------\n"));
732
733                 rc = ads_do_search_all_fn(ads, ads->config.bind_path,
734                                           LDAP_SCOPE_SUBTREE,
735                                           "(objectCategory=user)",
736                                           c->opt_long_list_entries ? longattrs :
737                                           shortattrs, usergrp_display,
738                                           disp_fields);
739                 ads_destroy(&ads);
740                 return ADS_ERR_OK(rc) ? 0 : -1;
741         }
742
743         return net_run_function(c, argc, argv, "net ads user", func);
744 }
745
746 static int net_ads_group_usage(struct net_context *c, int argc, const char **argv)
747 {
748         return net_group_usage(c, argc, argv);
749 }
750
751 static int ads_group_add(struct net_context *c, int argc, const char **argv)
752 {
753         ADS_STRUCT *ads;
754         ADS_STATUS status;
755         LDAPMessage *res=NULL;
756         int rc = -1;
757         char *ou_str = NULL;
758
759         if (argc < 1 || c->display_usage) {
760                 return net_ads_group_usage(c, argc, argv);
761         }
762
763         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
764                 return -1;
765         }
766
767         status = ads_find_user_acct(ads, &res, argv[0]);
768
769         if (!ADS_ERR_OK(status)) {
770                 d_fprintf(stderr, _("ads_group_add: %s\n"), ads_errstr(status));
771                 goto done;
772         }
773
774         if (ads_count_replies(ads, res)) {
775                 d_fprintf(stderr, _("ads_group_add: Group %s already exists\n"), argv[0]);
776                 goto done;
777         }
778
779         if (c->opt_container) {
780                 ou_str = SMB_STRDUP(c->opt_container);
781         } else {
782                 ou_str = ads_default_ou_string(ads, DS_GUID_USERS_CONTAINER);
783         }
784
785         status = ads_add_group_acct(ads, argv[0], ou_str, c->opt_comment);
786
787         if (ADS_ERR_OK(status)) {
788                 d_printf(_("Group %s added\n"), argv[0]);
789                 rc = 0;
790         } else {
791                 d_fprintf(stderr, _("Could not add group %s: %s\n"), argv[0],
792                          ads_errstr(status));
793         }
794
795  done:
796         if (res)
797                 ads_msgfree(ads, res);
798         ads_destroy(&ads);
799         SAFE_FREE(ou_str);
800         return rc;
801 }
802
803 static int ads_group_delete(struct net_context *c, int argc, const char **argv)
804 {
805         ADS_STRUCT *ads;
806         ADS_STATUS rc;
807         LDAPMessage *res = NULL;
808         char *groupdn;
809
810         if (argc < 1 || c->display_usage) {
811                 return net_ads_group_usage(c, argc, argv);
812         }
813
814         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
815                 return -1;
816         }
817
818         rc = ads_find_user_acct(ads, &res, argv[0]);
819         if (!ADS_ERR_OK(rc) || ads_count_replies(ads, res) != 1) {
820                 d_printf(_("Group %s does not exist.\n"), argv[0]);
821                 ads_msgfree(ads, res);
822                 ads_destroy(&ads);
823                 return -1;
824         }
825         groupdn = ads_get_dn(ads, talloc_tos(), res);
826         ads_msgfree(ads, res);
827         rc = ads_del_dn(ads, groupdn);
828         TALLOC_FREE(groupdn);
829         if (ADS_ERR_OK(rc)) {
830                 d_printf(_("Group %s deleted\n"), argv[0]);
831                 ads_destroy(&ads);
832                 return 0;
833         }
834         d_fprintf(stderr, _("Error deleting group %s: %s\n"), argv[0],
835                  ads_errstr(rc));
836         ads_destroy(&ads);
837         return -1;
838 }
839
840 int net_ads_group(struct net_context *c, int argc, const char **argv)
841 {
842         struct functable func[] = {
843                 {
844                         "add",
845                         ads_group_add,
846                         NET_TRANSPORT_ADS,
847                         N_("Add an AD group"),
848                         N_("net ads group add\n"
849                            "    Add an AD group")
850                 },
851                 {
852                         "delete",
853                         ads_group_delete,
854                         NET_TRANSPORT_ADS,
855                         N_("Delete an AD group"),
856                         N_("net ads group delete\n"
857                            "    Delete an AD group")
858                 },
859                 {NULL, NULL, 0, NULL, NULL}
860         };
861         ADS_STRUCT *ads;
862         ADS_STATUS rc;
863         const char *shortattrs[] = {"sAMAccountName", NULL};
864         const char *longattrs[] = {"sAMAccountName", "description", NULL};
865         char *disp_fields[2] = {NULL, NULL};
866
867         if (argc == 0) {
868                 if (c->display_usage) {
869                         d_printf(  "%s\n"
870                                    "net ads group\n"
871                                    "    %s\n",
872                                  _("Usage:"),
873                                  _("List AD groups"));
874                         net_display_usage_from_functable(func);
875                         return 0;
876                 }
877
878                 if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
879                         return -1;
880                 }
881
882                 if (c->opt_long_list_entries)
883                         d_printf(_("\nGroup name            Comment"
884                                    "\n-----------------------------\n"));
885                 rc = ads_do_search_all_fn(ads, ads->config.bind_path,
886                                           LDAP_SCOPE_SUBTREE,
887                                           "(objectCategory=group)",
888                                           c->opt_long_list_entries ? longattrs :
889                                           shortattrs, usergrp_display,
890                                           disp_fields);
891
892                 ads_destroy(&ads);
893                 return ADS_ERR_OK(rc) ? 0 : -1;
894         }
895         return net_run_function(c, argc, argv, "net ads group", func);
896 }
897
898 static int net_ads_status(struct net_context *c, int argc, const char **argv)
899 {
900         ADS_STRUCT *ads;
901         ADS_STATUS rc;
902         LDAPMessage *res;
903
904         if (c->display_usage) {
905                 d_printf(  "%s\n"
906                            "net ads status\n"
907                            "    %s\n",
908                          _("Usage:"),
909                          _("Display machine account details"));
910                 return 0;
911         }
912
913         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
914                 return -1;
915         }
916
917         rc = ads_find_machine_acct(ads, &res, global_myname());
918         if (!ADS_ERR_OK(rc)) {
919                 d_fprintf(stderr, _("ads_find_machine_acct: %s\n"), ads_errstr(rc));
920                 ads_destroy(&ads);
921                 return -1;
922         }
923
924         if (ads_count_replies(ads, res) == 0) {
925                 d_fprintf(stderr, _("No machine account for '%s' found\n"), global_myname());
926                 ads_destroy(&ads);
927                 return -1;
928         }
929
930         ads_dump(ads, res);
931         ads_destroy(&ads);
932         return 0;
933 }
934
935 /*******************************************************************
936  Leave an AD domain.  Windows XP disables the machine account.
937  We'll try the same.  The old code would do an LDAP delete.
938  That only worked using the machine creds because added the machine
939  with full control to the computer object's ACL.
940 *******************************************************************/
941
942 static int net_ads_leave(struct net_context *c, int argc, const char **argv)
943 {
944         TALLOC_CTX *ctx;
945         struct libnet_UnjoinCtx *r = NULL;
946         WERROR werr;
947
948         if (c->display_usage) {
949                 d_printf(  "%s\n"
950                            "net ads leave\n"
951                            "    %s\n",
952                          _("Usage:"),
953                          _("Leave an AD domain"));
954                 return 0;
955         }
956
957         if (!*lp_realm()) {
958                 d_fprintf(stderr, _("No realm set, are we joined ?\n"));
959                 return -1;
960         }
961
962         if (!(ctx = talloc_init("net_ads_leave"))) {
963                 d_fprintf(stderr, _("Could not initialise talloc context.\n"));
964                 return -1;
965         }
966
967         if (!c->opt_kerberos) {
968                 use_in_memory_ccache();
969         }
970
971         if (!c->msg_ctx) {
972                 d_fprintf(stderr, _("Could not initialise message context. "
973                         "Try running as root\n"));
974                 return -1;
975         }
976
977         werr = libnet_init_UnjoinCtx(ctx, &r);
978         if (!W_ERROR_IS_OK(werr)) {
979                 d_fprintf(stderr, _("Could not initialise unjoin context.\n"));
980                 return -1;
981         }
982
983         r->in.debug             = true;
984         r->in.use_kerberos      = c->opt_kerberos;
985         r->in.dc_name           = c->opt_host;
986         r->in.domain_name       = lp_realm();
987         r->in.admin_account     = c->opt_user_name;
988         r->in.admin_password    = net_prompt_pass(c, c->opt_user_name);
989         r->in.modify_config     = lp_config_backend_is_registry();
990
991         /* Try to delete it, but if that fails, disable it.  The
992            WKSSVC_JOIN_FLAGS_ACCOUNT_DELETE really means "disable */
993         r->in.unjoin_flags      = WKSSVC_JOIN_FLAGS_JOIN_TYPE |
994                                   WKSSVC_JOIN_FLAGS_ACCOUNT_DELETE;
995         r->in.delete_machine_account = true;
996         r->in.msg_ctx           = c->msg_ctx;
997
998         werr = libnet_Unjoin(ctx, r);
999         if (!W_ERROR_IS_OK(werr)) {
1000                 d_printf(_("Failed to leave domain: %s\n"),
1001                          r->out.error_string ? r->out.error_string :
1002                          get_friendly_werror_msg(werr));
1003                 goto done;
1004         }
1005
1006         if (r->out.deleted_machine_account) {
1007                 d_printf(_("Deleted account for '%s' in realm '%s'\n"),
1008                         r->in.machine_name, r->out.dns_domain_name);
1009                 goto done;
1010         }
1011
1012         /* We couldn't delete it - see if the disable succeeded. */
1013         if (r->out.disabled_machine_account) {
1014                 d_printf(_("Disabled account for '%s' in realm '%s'\n"),
1015                         r->in.machine_name, r->out.dns_domain_name);
1016                 werr = WERR_OK;
1017                 goto done;
1018         }
1019
1020         /* Based on what we requseted, we shouldn't get here, but if
1021            we did, it means the secrets were removed, and therefore
1022            we have left the domain */
1023         d_fprintf(stderr, _("Machine '%s' Left domain '%s'\n"),
1024                   r->in.machine_name, r->out.dns_domain_name);
1025
1026  done:
1027         TALLOC_FREE(r);
1028         TALLOC_FREE(ctx);
1029
1030         if (W_ERROR_IS_OK(werr)) {
1031                 return 0;
1032         }
1033
1034         return -1;
1035 }
1036
1037 static NTSTATUS net_ads_join_ok(struct net_context *c)
1038 {
1039         ADS_STRUCT *ads = NULL;
1040         ADS_STATUS status;
1041         fstring dc_name;
1042         struct sockaddr_storage dcip;
1043
1044         if (!secrets_init()) {
1045                 DEBUG(1,("Failed to initialise secrets database\n"));
1046                 return NT_STATUS_ACCESS_DENIED;
1047         }
1048
1049         net_use_krb_machine_account(c);
1050
1051         get_dc_name(lp_workgroup(), lp_realm(), dc_name, &dcip);
1052
1053         status = ads_startup(c, true, &ads);
1054         if (!ADS_ERR_OK(status)) {
1055                 return ads_ntstatus(status);
1056         }
1057
1058         ads_destroy(&ads);
1059         return NT_STATUS_OK;
1060 }
1061
1062 /*
1063   check that an existing join is OK
1064  */
1065 int net_ads_testjoin(struct net_context *c, int argc, const char **argv)
1066 {
1067         NTSTATUS status;
1068         use_in_memory_ccache();
1069
1070         if (c->display_usage) {
1071                 d_printf(  "%s\n"
1072                            "net ads testjoin\n"
1073                            "    %s\n",
1074                          _("Usage:"),
1075                          _("Test if the existing join is ok"));
1076                 return 0;
1077         }
1078
1079         /* Display success or failure */
1080         status = net_ads_join_ok(c);
1081         if (!NT_STATUS_IS_OK(status)) {
1082                 fprintf(stderr, _("Join to domain is not valid: %s\n"),
1083                         get_friendly_nt_error_msg(status));
1084                 return -1;
1085         }
1086
1087         printf(_("Join is OK\n"));
1088         return 0;
1089 }
1090
1091 /*******************************************************************
1092   Simple configu checks before beginning the join
1093  ********************************************************************/
1094
1095 static WERROR check_ads_config( void )
1096 {
1097         if (lp_server_role() != ROLE_DOMAIN_MEMBER ) {
1098                 d_printf(_("Host is not configured as a member server.\n"));
1099                 return WERR_INVALID_DOMAIN_ROLE;
1100         }
1101
1102         if (strlen(global_myname()) > 15) {
1103                 d_printf(_("Our netbios name can be at most 15 chars long, "
1104                            "\"%s\" is %u chars long\n"), global_myname(),
1105                          (unsigned int)strlen(global_myname()));
1106                 return WERR_INVALID_COMPUTERNAME;
1107         }
1108
1109         if ( lp_security() == SEC_ADS && !*lp_realm()) {
1110                 d_fprintf(stderr, _("realm must be set in in %s for ADS "
1111                           "join to succeed.\n"), get_dyn_CONFIGFILE());
1112                 return WERR_INVALID_PARAM;
1113         }
1114
1115         return WERR_OK;
1116 }
1117
1118 /*******************************************************************
1119  Send a DNS update request
1120 *******************************************************************/
1121
1122 #if defined(WITH_DNS_UPDATES)
1123 #include "dns.h"
1124 DNS_ERROR DoDNSUpdate(char *pszServerName,
1125                       const char *pszDomainName, const char *pszHostName,
1126                       const struct sockaddr_storage *sslist,
1127                       size_t num_addrs );
1128
1129 static NTSTATUS net_update_dns_internal(TALLOC_CTX *ctx, ADS_STRUCT *ads,
1130                                         const char *machine_name,
1131                                         const struct sockaddr_storage *addrs,
1132                                         int num_addrs)
1133 {
1134         struct dns_rr_ns *nameservers = NULL;
1135         int ns_count = 0;
1136         NTSTATUS status = NT_STATUS_UNSUCCESSFUL;
1137         DNS_ERROR dns_err;
1138         fstring dns_server;
1139         const char *dnsdomain = NULL;
1140         char *root_domain = NULL;
1141
1142         if ( (dnsdomain = strchr_m( machine_name, '.')) == NULL ) {
1143                 d_printf(_("No DNS domain configured for %s. "
1144                            "Unable to perform DNS Update.\n"), machine_name);
1145                 status = NT_STATUS_INVALID_PARAMETER;
1146                 goto done;
1147         }
1148         dnsdomain++;
1149
1150         status = ads_dns_lookup_ns( ctx, dnsdomain, &nameservers, &ns_count );
1151         if ( !NT_STATUS_IS_OK(status) || (ns_count == 0)) {
1152                 /* Child domains often do not have NS records.  Look
1153                    for the NS record for the forest root domain
1154                    (rootDomainNamingContext in therootDSE) */
1155
1156                 const char *rootname_attrs[] =  { "rootDomainNamingContext", NULL };
1157                 LDAPMessage *msg = NULL;
1158                 char *root_dn;
1159                 ADS_STATUS ads_status;
1160
1161                 if ( !ads->ldap.ld ) {
1162                         ads_status = ads_connect( ads );
1163                         if ( !ADS_ERR_OK(ads_status) ) {
1164                                 DEBUG(0,("net_update_dns_internal: Failed to connect to our DC!\n"));
1165                                 goto done;
1166                         }
1167                 }
1168
1169                 ads_status = ads_do_search(ads, "", LDAP_SCOPE_BASE,
1170                                        "(objectclass=*)", rootname_attrs, &msg);
1171                 if (!ADS_ERR_OK(ads_status)) {
1172                         goto done;
1173                 }
1174
1175                 root_dn = ads_pull_string(ads, ctx, msg,  "rootDomainNamingContext");
1176                 if ( !root_dn ) {
1177                         ads_msgfree( ads, msg );
1178                         goto done;
1179                 }
1180
1181                 root_domain = ads_build_domain( root_dn );
1182
1183                 /* cleanup */
1184                 ads_msgfree( ads, msg );
1185
1186                 /* try again for NS servers */
1187
1188                 status = ads_dns_lookup_ns( ctx, root_domain, &nameservers, &ns_count );
1189
1190                 if ( !NT_STATUS_IS_OK(status) || (ns_count == 0)) {
1191                         DEBUG(3,("net_ads_join: Failed to find name server for the %s "
1192                          "realm\n", ads->config.realm));
1193                         goto done;
1194                 }
1195
1196                 dnsdomain = root_domain;
1197
1198         }
1199
1200         /* Now perform the dns update - we'll try non-secure and if we fail,
1201            we'll follow it up with a secure update */
1202
1203         fstrcpy( dns_server, nameservers[0].hostname );
1204
1205         dns_err = DoDNSUpdate(dns_server, dnsdomain, machine_name, addrs, num_addrs);
1206         if (!ERR_DNS_IS_OK(dns_err)) {
1207                 d_printf(_("DNS Update for %s failed: %s\n"),
1208                         machine_name, dns_errstr(dns_err));
1209                 status = NT_STATUS_UNSUCCESSFUL;
1210         }
1211
1212 done:
1213
1214         SAFE_FREE( root_domain );
1215
1216         return status;
1217 }
1218
1219 static NTSTATUS net_update_dns(TALLOC_CTX *mem_ctx, ADS_STRUCT *ads, const char *hostname)
1220 {
1221         int num_addrs;
1222         struct sockaddr_storage *iplist = NULL;
1223         fstring machine_name;
1224         NTSTATUS status;
1225
1226         if (hostname) {
1227                 fstrcpy(machine_name, hostname);
1228         } else {
1229                 name_to_fqdn( machine_name, global_myname() );
1230         }
1231         strlower_m( machine_name );
1232
1233         /* Get our ip address (not the 127.0.0.x address but a real ip
1234          * address) */
1235
1236         num_addrs = get_my_ip_address( &iplist );
1237         if ( num_addrs <= 0 ) {
1238                 DEBUG(4,("net_update_dns: Failed to find my non-loopback IP "
1239                          "addresses!\n"));
1240                 return NT_STATUS_INVALID_PARAMETER;
1241         }
1242
1243         status = net_update_dns_internal(mem_ctx, ads, machine_name,
1244                                          iplist, num_addrs);
1245         SAFE_FREE( iplist );
1246         return status;
1247 }
1248 #endif
1249
1250
1251 /*******************************************************************
1252  ********************************************************************/
1253
1254 static int net_ads_join_usage(struct net_context *c, int argc, const char **argv)
1255 {
1256         d_printf(_("net ads join [options]\n"
1257                    "Valid options:\n"));
1258         d_printf(_("   createupn[=UPN]    Set the userPrincipalName attribute during the join.\n"
1259                    "                      The deault UPN is in the form host/netbiosname@REALM.\n"));
1260         d_printf(_("   createcomputer=OU  Precreate the computer account in a specific OU.\n"
1261                    "                      The OU string read from top to bottom without RDNs and delimited by a '/'.\n"
1262                    "                      E.g. \"createcomputer=Computers/Servers/Unix\"\n"
1263                    "                      NB: A backslash '\\' is used as escape at multiple levels and may\n"
1264                    "                          need to be doubled or even quadrupled.  It is not used as a separator.\n"));
1265         d_printf(_("   osName=string      Set the operatingSystem attribute during the join.\n"));
1266         d_printf(_("   osVer=string       Set the operatingSystemVersion attribute during the join.\n"
1267                    "                      NB: osName and osVer must be specified together for either to take effect.\n"
1268                    "                          Also, the operatingSystemService attribute is also set when along with\n"
1269                    "                          the two other attributes.\n"));
1270
1271         return -1;
1272 }
1273
1274 /*******************************************************************
1275  ********************************************************************/
1276
1277 int net_ads_join(struct net_context *c, int argc, const char **argv)
1278 {
1279         TALLOC_CTX *ctx = NULL;
1280         struct libnet_JoinCtx *r = NULL;
1281         const char *domain = lp_realm();
1282         WERROR werr = WERR_SETUP_NOT_JOINED;
1283         bool createupn = false;
1284         const char *machineupn = NULL;
1285         const char *create_in_ou = NULL;
1286         int i;
1287         const char *os_name = NULL;
1288         const char *os_version = NULL;
1289         bool modify_config = lp_config_backend_is_registry();
1290
1291         if (c->display_usage)
1292                 return net_ads_join_usage(c, argc, argv);
1293
1294         if (!modify_config) {
1295
1296                 werr = check_ads_config();
1297                 if (!W_ERROR_IS_OK(werr)) {
1298                         d_fprintf(stderr, _("Invalid configuration.  Exiting....\n"));
1299                         goto fail;
1300                 }
1301         }
1302
1303         if (!(ctx = talloc_init("net_ads_join"))) {
1304                 d_fprintf(stderr, _("Could not initialise talloc context.\n"));
1305                 werr = WERR_NOMEM;
1306                 goto fail;
1307         }
1308
1309         if (!c->opt_kerberos) {
1310                 use_in_memory_ccache();
1311         }
1312
1313         werr = libnet_init_JoinCtx(ctx, &r);
1314         if (!W_ERROR_IS_OK(werr)) {
1315                 goto fail;
1316         }
1317
1318         /* process additional command line args */
1319
1320         for ( i=0; i<argc; i++ ) {
1321                 if ( !StrnCaseCmp(argv[i], "createupn", strlen("createupn")) ) {
1322                         createupn = true;
1323                         machineupn = get_string_param(argv[i]);
1324                 }
1325                 else if ( !StrnCaseCmp(argv[i], "createcomputer", strlen("createcomputer")) ) {
1326                         if ( (create_in_ou = get_string_param(argv[i])) == NULL ) {
1327                                 d_fprintf(stderr, _("Please supply a valid OU path.\n"));
1328                                 werr = WERR_INVALID_PARAM;
1329                                 goto fail;
1330                         }
1331                 }
1332                 else if ( !StrnCaseCmp(argv[i], "osName", strlen("osName")) ) {
1333                         if ( (os_name = get_string_param(argv[i])) == NULL ) {
1334                                 d_fprintf(stderr, _("Please supply a operating system name.\n"));
1335                                 werr = WERR_INVALID_PARAM;
1336                                 goto fail;
1337                         }
1338                 }
1339                 else if ( !StrnCaseCmp(argv[i], "osVer", strlen("osVer")) ) {
1340                         if ( (os_version = get_string_param(argv[i])) == NULL ) {
1341                                 d_fprintf(stderr, _("Please supply a valid operating system version.\n"));
1342                                 werr = WERR_INVALID_PARAM;
1343                                 goto fail;
1344                         }
1345                 }
1346                 else {
1347                         domain = argv[i];
1348                 }
1349         }
1350
1351         if (!*domain) {
1352                 d_fprintf(stderr, _("Please supply a valid domain name\n"));
1353                 werr = WERR_INVALID_PARAM;
1354                 goto fail;
1355         }
1356
1357         if (!c->msg_ctx) {
1358                 d_fprintf(stderr, _("Could not initialise message context. "
1359                         "Try running as root\n"));
1360                 werr = WERR_ACCESS_DENIED;
1361                 goto fail;
1362         }
1363
1364         /* Do the domain join here */
1365
1366         r->in.domain_name       = domain;
1367         r->in.create_upn        = createupn;
1368         r->in.upn               = machineupn;
1369         r->in.account_ou        = create_in_ou;
1370         r->in.os_name           = os_name;
1371         r->in.os_version        = os_version;
1372         r->in.dc_name           = c->opt_host;
1373         r->in.admin_account     = c->opt_user_name;
1374         r->in.admin_password    = net_prompt_pass(c, c->opt_user_name);
1375         r->in.debug             = true;
1376         r->in.use_kerberos      = c->opt_kerberos;
1377         r->in.modify_config     = modify_config;
1378         r->in.join_flags        = WKSSVC_JOIN_FLAGS_JOIN_TYPE |
1379                                   WKSSVC_JOIN_FLAGS_ACCOUNT_CREATE |
1380                                   WKSSVC_JOIN_FLAGS_DOMAIN_JOIN_IF_JOINED;
1381         r->in.msg_ctx           = c->msg_ctx;
1382
1383         werr = libnet_Join(ctx, r);
1384         if (!W_ERROR_IS_OK(werr)) {
1385                 goto fail;
1386         }
1387
1388         /* Check the short name of the domain */
1389
1390         if (!modify_config && !strequal(lp_workgroup(), r->out.netbios_domain_name)) {
1391                 d_printf(_("The workgroup in %s does not match the short\n"
1392                            "domain name obtained from the server.\n"
1393                            "Using the name [%s] from the server.\n"
1394                            "You should set \"workgroup = %s\" in %s.\n"),
1395                          get_dyn_CONFIGFILE(), r->out.netbios_domain_name,
1396                          r->out.netbios_domain_name, get_dyn_CONFIGFILE());
1397         }
1398
1399         d_printf(_("Using short domain name -- %s\n"), r->out.netbios_domain_name);
1400
1401         if (r->out.dns_domain_name) {
1402                 d_printf(_("Joined '%s' to realm '%s'\n"), r->in.machine_name,
1403                         r->out.dns_domain_name);
1404         } else {
1405                 d_printf(_("Joined '%s' to domain '%s'\n"), r->in.machine_name,
1406                         r->out.netbios_domain_name);
1407         }
1408
1409 #if defined(WITH_DNS_UPDATES)
1410         if (r->out.domain_is_ad) {
1411                 /* We enter this block with user creds */
1412                 ADS_STRUCT *ads_dns = NULL;
1413
1414                 if ( (ads_dns = ads_init( lp_realm(), NULL, NULL )) != NULL ) {
1415                         /* kinit with the machine password */
1416
1417                         use_in_memory_ccache();
1418                         if (asprintf( &ads_dns->auth.user_name, "%s$", global_myname()) == -1) {
1419                                 goto fail;
1420                         }
1421                         ads_dns->auth.password = secrets_fetch_machine_password(
1422                                 r->out.netbios_domain_name, NULL, NULL );
1423                         ads_dns->auth.realm = SMB_STRDUP( r->out.dns_domain_name );
1424                         strupper_m(ads_dns->auth.realm );
1425                         ads_kinit_password( ads_dns );
1426                 }
1427
1428                 if ( !ads_dns || !NT_STATUS_IS_OK(net_update_dns( ctx, ads_dns, NULL)) ) {
1429                         d_fprintf( stderr, _("DNS update failed!\n") );
1430                 }
1431
1432                 /* exit from this block using machine creds */
1433                 ads_destroy(&ads_dns);
1434         }
1435 #endif
1436         TALLOC_FREE(r);
1437         TALLOC_FREE( ctx );
1438
1439         return 0;
1440
1441 fail:
1442         /* issue an overall failure message at the end. */
1443         d_printf(_("Failed to join domain: %s\n"),
1444                 r && r->out.error_string ? r->out.error_string :
1445                 get_friendly_werror_msg(werr));
1446         TALLOC_FREE( ctx );
1447
1448         return -1;
1449 }
1450
1451 /*******************************************************************
1452  ********************************************************************/
1453
1454 static int net_ads_dns_register(struct net_context *c, int argc, const char **argv)
1455 {
1456 #if defined(WITH_DNS_UPDATES)
1457         ADS_STRUCT *ads;
1458         ADS_STATUS status;
1459         TALLOC_CTX *ctx;
1460
1461 #ifdef DEVELOPER
1462         talloc_enable_leak_report();
1463 #endif
1464
1465         if (argc > 1 || c->display_usage) {
1466                 d_printf(  "%s\n"
1467                            "net ads dns register [hostname]\n"
1468                            "    %s\n",
1469                          _("Usage:"),
1470                          _("Register hostname with DNS\n"));
1471                 return -1;
1472         }
1473
1474         if (!(ctx = talloc_init("net_ads_dns"))) {
1475                 d_fprintf(stderr, _("Could not initialise talloc context\n"));
1476                 return -1;
1477         }
1478
1479         status = ads_startup(c, true, &ads);
1480         if ( !ADS_ERR_OK(status) ) {
1481                 DEBUG(1, ("error on ads_startup: %s\n", ads_errstr(status)));
1482                 TALLOC_FREE(ctx);
1483                 return -1;
1484         }
1485
1486         if ( !NT_STATUS_IS_OK(net_update_dns(ctx, ads, argc == 1 ? argv[0] : NULL)) ) {
1487                 d_fprintf( stderr, _("DNS update failed!\n") );
1488                 ads_destroy( &ads );
1489                 TALLOC_FREE( ctx );
1490                 return -1;
1491         }
1492
1493         d_fprintf( stderr, _("Successfully registered hostname with DNS\n") );
1494
1495         ads_destroy(&ads);
1496         TALLOC_FREE( ctx );
1497
1498         return 0;
1499 #else
1500         d_fprintf(stderr,
1501                   _("DNS update support not enabled at compile time!\n"));
1502         return -1;
1503 #endif
1504 }
1505
1506 #if defined(WITH_DNS_UPDATES)
1507 DNS_ERROR do_gethostbyname(const char *server, const char *host);
1508 #endif
1509
1510 static int net_ads_dns_gethostbyname(struct net_context *c, int argc, const char **argv)
1511 {
1512 #if defined(WITH_DNS_UPDATES)
1513         DNS_ERROR err;
1514
1515 #ifdef DEVELOPER
1516         talloc_enable_leak_report();
1517 #endif
1518
1519         if (argc != 2 || c->display_usage) {
1520                 d_printf(  "%s\n"
1521                            "    %s\n"
1522                            "    %s\n",
1523                          _("Usage:"),
1524                          _("net ads dns gethostbyname <server> <name>\n"),
1525                          _("  Look up hostname from the AD\n"
1526                            "    server\tName server to use\n"
1527                            "    name\tName to look up\n"));
1528                 return -1;
1529         }
1530
1531         err = do_gethostbyname(argv[0], argv[1]);
1532
1533         d_printf(_("do_gethostbyname returned %s (%d)\n"),
1534                 dns_errstr(err), ERROR_DNS_V(err));
1535 #endif
1536         return 0;
1537 }
1538
1539 static int net_ads_dns(struct net_context *c, int argc, const char *argv[])
1540 {
1541         struct functable func[] = {
1542                 {
1543                         "register",
1544                         net_ads_dns_register,
1545                         NET_TRANSPORT_ADS,
1546                         N_("Add host dns entry to AD"),
1547                         N_("net ads dns register\n"
1548                            "    Add host dns entry to AD")
1549                 },
1550                 {
1551                         "gethostbyname",
1552                         net_ads_dns_gethostbyname,
1553                         NET_TRANSPORT_ADS,
1554                         N_("Look up host"),
1555                         N_("net ads dns gethostbyname\n"
1556                            "    Look up host")
1557                 },
1558                 {NULL, NULL, 0, NULL, NULL}
1559         };
1560
1561         return net_run_function(c, argc, argv, "net ads dns", func);
1562 }
1563
1564 /*******************************************************************
1565  ********************************************************************/
1566
1567 int net_ads_printer_usage(struct net_context *c, int argc, const char **argv)
1568 {
1569         d_printf(_(
1570 "\nnet ads printer search <printer>"
1571 "\n\tsearch for a printer in the directory\n"
1572 "\nnet ads printer info <printer> <server>"
1573 "\n\tlookup info in directory for printer on server"
1574 "\n\t(note: printer defaults to \"*\", server defaults to local)\n"
1575 "\nnet ads printer publish <printername>"
1576 "\n\tpublish printer in directory"
1577 "\n\t(note: printer name is required)\n"
1578 "\nnet ads printer remove <printername>"
1579 "\n\tremove printer from directory"
1580 "\n\t(note: printer name is required)\n"));
1581         return -1;
1582 }
1583
1584 /*******************************************************************
1585  ********************************************************************/
1586
1587 static int net_ads_printer_search(struct net_context *c, int argc, const char **argv)
1588 {
1589         ADS_STRUCT *ads;
1590         ADS_STATUS rc;
1591         LDAPMessage *res = NULL;
1592
1593         if (c->display_usage) {
1594                 d_printf(  "%s\n"
1595                            "net ads printer search\n"
1596                            "    %s\n",
1597                          _("Usage:"),
1598                          _("List printers in the AD"));
1599                 return 0;
1600         }
1601
1602         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
1603                 return -1;
1604         }
1605
1606         rc = ads_find_printers(ads, &res);
1607
1608         if (!ADS_ERR_OK(rc)) {
1609                 d_fprintf(stderr, _("ads_find_printer: %s\n"), ads_errstr(rc));
1610                 ads_msgfree(ads, res);
1611                 ads_destroy(&ads);
1612                 return -1;
1613         }
1614
1615         if (ads_count_replies(ads, res) == 0) {
1616                 d_fprintf(stderr, _("No results found\n"));
1617                 ads_msgfree(ads, res);
1618                 ads_destroy(&ads);
1619                 return -1;
1620         }
1621
1622         ads_dump(ads, res);
1623         ads_msgfree(ads, res);
1624         ads_destroy(&ads);
1625         return 0;
1626 }
1627
1628 static int net_ads_printer_info(struct net_context *c, int argc, const char **argv)
1629 {
1630         ADS_STRUCT *ads;
1631         ADS_STATUS rc;
1632         const char *servername, *printername;
1633         LDAPMessage *res = NULL;
1634
1635         if (c->display_usage) {
1636                 d_printf("%s\n%s",
1637                          _("Usage:"),
1638                          _("net ads printer info [printername [servername]]\n"
1639                            "  Display printer info from AD\n"
1640                            "    printername\tPrinter name or wildcard\n"
1641                            "    servername\tName of the print server\n"));
1642                 return 0;
1643         }
1644
1645         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
1646                 return -1;
1647         }
1648
1649         if (argc > 0) {
1650                 printername = argv[0];
1651         } else {
1652                 printername = "*";
1653         }
1654
1655         if (argc > 1) {
1656                 servername =  argv[1];
1657         } else {
1658                 servername = global_myname();
1659         }
1660
1661         rc = ads_find_printer_on_server(ads, &res, printername, servername);
1662
1663         if (!ADS_ERR_OK(rc)) {
1664                 d_fprintf(stderr, _("Server '%s' not found: %s\n"),
1665                         servername, ads_errstr(rc));
1666                 ads_msgfree(ads, res);
1667                 ads_destroy(&ads);
1668                 return -1;
1669         }
1670
1671         if (ads_count_replies(ads, res) == 0) {
1672                 d_fprintf(stderr, _("Printer '%s' not found\n"), printername);
1673                 ads_msgfree(ads, res);
1674                 ads_destroy(&ads);
1675                 return -1;
1676         }
1677
1678         ads_dump(ads, res);
1679         ads_msgfree(ads, res);
1680         ads_destroy(&ads);
1681
1682         return 0;
1683 }
1684
1685 static int net_ads_printer_publish(struct net_context *c, int argc, const char **argv)
1686 {
1687         ADS_STRUCT *ads;
1688         ADS_STATUS rc;
1689         const char *servername, *printername;
1690         struct cli_state *cli = NULL;
1691         struct rpc_pipe_client *pipe_hnd = NULL;
1692         struct sockaddr_storage server_ss;
1693         NTSTATUS nt_status;
1694         TALLOC_CTX *mem_ctx = talloc_init("net_ads_printer_publish");
1695         ADS_MODLIST mods = ads_init_mods(mem_ctx);
1696         char *prt_dn, *srv_dn, **srv_cn;
1697         char *srv_cn_escaped = NULL, *printername_escaped = NULL;
1698         LDAPMessage *res = NULL;
1699
1700         if (argc < 1 || c->display_usage) {
1701                 d_printf("%s\n%s",
1702                          _("Usage:"),
1703                          _("net ads printer publish <printername> [servername]\n"
1704                            "  Publish printer in AD\n"
1705                            "    printername\tName of the printer\n"
1706                            "    servername\tName of the print server\n"));
1707                 talloc_destroy(mem_ctx);
1708                 return -1;
1709         }
1710
1711         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
1712                 talloc_destroy(mem_ctx);
1713                 return -1;
1714         }
1715
1716         printername = argv[0];
1717
1718         if (argc == 2) {
1719                 servername = argv[1];
1720         } else {
1721                 servername = global_myname();
1722         }
1723
1724         /* Get printer data from SPOOLSS */
1725
1726         resolve_name(servername, &server_ss, 0x20, false);
1727
1728         nt_status = cli_full_connection(&cli, global_myname(), servername,
1729                                         &server_ss, 0,
1730                                         "IPC$", "IPC",
1731                                         c->opt_user_name, c->opt_workgroup,
1732                                         c->opt_password ? c->opt_password : "",
1733                                         CLI_FULL_CONNECTION_USE_KERBEROS,
1734                                         Undefined, NULL);
1735
1736         if (NT_STATUS_IS_ERR(nt_status)) {
1737                 d_fprintf(stderr, _("Unable to open a connnection to %s to "
1738                                     "obtain data for %s\n"),
1739                           servername, printername);
1740                 ads_destroy(&ads);
1741                 talloc_destroy(mem_ctx);
1742                 return -1;
1743         }
1744
1745         /* Publish on AD server */
1746
1747         ads_find_machine_acct(ads, &res, servername);
1748
1749         if (ads_count_replies(ads, res) == 0) {
1750                 d_fprintf(stderr, _("Could not find machine account for server "
1751                                     "%s\n"),
1752                          servername);
1753                 ads_destroy(&ads);
1754                 talloc_destroy(mem_ctx);
1755                 return -1;
1756         }
1757
1758         srv_dn = ldap_get_dn((LDAP *)ads->ldap.ld, (LDAPMessage *)res);
1759         srv_cn = ldap_explode_dn(srv_dn, 1);
1760
1761         srv_cn_escaped = escape_rdn_val_string_alloc(srv_cn[0]);
1762         printername_escaped = escape_rdn_val_string_alloc(printername);
1763         if (!srv_cn_escaped || !printername_escaped) {
1764                 SAFE_FREE(srv_cn_escaped);
1765                 SAFE_FREE(printername_escaped);
1766                 d_fprintf(stderr, _("Internal error, out of memory!"));
1767                 ads_destroy(&ads);
1768                 talloc_destroy(mem_ctx);
1769                 return -1;
1770         }
1771
1772         if (asprintf(&prt_dn, "cn=%s-%s,%s", srv_cn_escaped, printername_escaped, srv_dn) == -1) {
1773                 SAFE_FREE(srv_cn_escaped);
1774                 SAFE_FREE(printername_escaped);
1775                 d_fprintf(stderr, _("Internal error, out of memory!"));
1776                 ads_destroy(&ads);
1777                 talloc_destroy(mem_ctx);
1778                 return -1;
1779         }
1780
1781         SAFE_FREE(srv_cn_escaped);
1782         SAFE_FREE(printername_escaped);
1783
1784         nt_status = cli_rpc_pipe_open_noauth(cli, &ndr_table_spoolss.syntax_id, &pipe_hnd);
1785         if (!NT_STATUS_IS_OK(nt_status)) {
1786                 d_fprintf(stderr, _("Unable to open a connnection to the spoolss pipe on %s\n"),
1787                          servername);
1788                 SAFE_FREE(prt_dn);
1789                 ads_destroy(&ads);
1790                 talloc_destroy(mem_ctx);
1791                 return -1;
1792         }
1793
1794         if (!W_ERROR_IS_OK(get_remote_printer_publishing_data(pipe_hnd, mem_ctx, &mods,
1795                                                               printername))) {
1796                 SAFE_FREE(prt_dn);
1797                 ads_destroy(&ads);
1798                 talloc_destroy(mem_ctx);
1799                 return -1;
1800         }
1801
1802         rc = ads_add_printer_entry(ads, prt_dn, mem_ctx, &mods);
1803         if (!ADS_ERR_OK(rc)) {
1804                 d_fprintf(stderr, "ads_publish_printer: %s\n", ads_errstr(rc));
1805                 SAFE_FREE(prt_dn);
1806                 ads_destroy(&ads);
1807                 talloc_destroy(mem_ctx);
1808                 return -1;
1809         }
1810
1811         d_printf("published printer\n");
1812         SAFE_FREE(prt_dn);
1813         ads_destroy(&ads);
1814         talloc_destroy(mem_ctx);
1815
1816         return 0;
1817 }
1818
1819 static int net_ads_printer_remove(struct net_context *c, int argc, const char **argv)
1820 {
1821         ADS_STRUCT *ads;
1822         ADS_STATUS rc;
1823         const char *servername;
1824         char *prt_dn;
1825         LDAPMessage *res = NULL;
1826
1827         if (argc < 1 || c->display_usage) {
1828                 d_printf("%s\n%s",
1829                          _("Usage:"),
1830                          _("net ads printer remove <printername> [servername]\n"
1831                            "  Remove a printer from the AD\n"
1832                            "    printername\tName of the printer\n"
1833                            "    servername\tName of the print server\n"));
1834                 return -1;
1835         }
1836
1837         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
1838                 return -1;
1839         }
1840
1841         if (argc > 1) {
1842                 servername = argv[1];
1843         } else {
1844                 servername = global_myname();
1845         }
1846
1847         rc = ads_find_printer_on_server(ads, &res, argv[0], servername);
1848
1849         if (!ADS_ERR_OK(rc)) {
1850                 d_fprintf(stderr, _("ads_find_printer_on_server: %s\n"), ads_errstr(rc));
1851                 ads_msgfree(ads, res);
1852                 ads_destroy(&ads);
1853                 return -1;
1854         }
1855
1856         if (ads_count_replies(ads, res) == 0) {
1857                 d_fprintf(stderr, _("Printer '%s' not found\n"), argv[1]);
1858                 ads_msgfree(ads, res);
1859                 ads_destroy(&ads);
1860                 return -1;
1861         }
1862
1863         prt_dn = ads_get_dn(ads, talloc_tos(), res);
1864         ads_msgfree(ads, res);
1865         rc = ads_del_dn(ads, prt_dn);
1866         TALLOC_FREE(prt_dn);
1867
1868         if (!ADS_ERR_OK(rc)) {
1869                 d_fprintf(stderr, _("ads_del_dn: %s\n"), ads_errstr(rc));
1870                 ads_destroy(&ads);
1871                 return -1;
1872         }
1873
1874         ads_destroy(&ads);
1875         return 0;
1876 }
1877
1878 static int net_ads_printer(struct net_context *c, int argc, const char **argv)
1879 {
1880         struct functable func[] = {
1881                 {
1882                         "search",
1883                         net_ads_printer_search,
1884                         NET_TRANSPORT_ADS,
1885                         N_("Search for a printer"),
1886                         N_("net ads printer search\n"
1887                            "    Search for a printer")
1888                 },
1889                 {
1890                         "info",
1891                         net_ads_printer_info,
1892                         NET_TRANSPORT_ADS,
1893                         N_("Display printer information"),
1894                         N_("net ads printer info\n"
1895                            "    Display printer information")
1896                 },
1897                 {
1898                         "publish",
1899                         net_ads_printer_publish,
1900                         NET_TRANSPORT_ADS,
1901                         N_("Publish a printer"),
1902                         N_("net ads printer publish\n"
1903                            "    Publish a printer")
1904                 },
1905                 {
1906                         "remove",
1907                         net_ads_printer_remove,
1908                         NET_TRANSPORT_ADS,
1909                         N_("Delete a printer"),
1910                         N_("net ads printer remove\n"
1911                            "    Delete a printer")
1912                 },
1913                 {NULL, NULL, 0, NULL, NULL}
1914         };
1915
1916         return net_run_function(c, argc, argv, "net ads printer", func);
1917 }
1918
1919
1920 static int net_ads_password(struct net_context *c, int argc, const char **argv)
1921 {
1922         ADS_STRUCT *ads;
1923         const char *auth_principal = c->opt_user_name;
1924         const char *auth_password = c->opt_password;
1925         char *realm = NULL;
1926         char *new_password = NULL;
1927         char *chr, *prompt;
1928         const char *user;
1929         ADS_STATUS ret;
1930
1931         if (c->display_usage) {
1932                 d_printf("%s\n%s",
1933                          _("Usage:"),
1934                          _("net ads password <username>\n"
1935                            "  Change password for user\n"
1936                            "    username\tName of user to change password for\n"));
1937                 return 0;
1938         }
1939
1940         if (c->opt_user_name == NULL || c->opt_password == NULL) {
1941                 d_fprintf(stderr, _("You must supply an administrator "
1942                                     "username/password\n"));
1943                 return -1;
1944         }
1945
1946         if (argc < 1) {
1947                 d_fprintf(stderr, _("ERROR: You must say which username to "
1948                                     "change password for\n"));
1949                 return -1;
1950         }
1951
1952         user = argv[0];
1953         if (!strchr_m(user, '@')) {
1954                 if (asprintf(&chr, "%s@%s", argv[0], lp_realm()) == -1) {
1955                         return -1;
1956                 }
1957                 user = chr;
1958         }
1959
1960         use_in_memory_ccache();
1961         chr = strchr_m(auth_principal, '@');
1962         if (chr) {
1963                 realm = ++chr;
1964         } else {
1965                 realm = lp_realm();
1966         }
1967
1968         /* use the realm so we can eventually change passwords for users
1969         in realms other than default */
1970         if (!(ads = ads_init(realm, c->opt_workgroup, c->opt_host))) {
1971                 return -1;
1972         }
1973
1974         /* we don't actually need a full connect, but it's the easy way to
1975                 fill in the KDC's addresss */
1976         ads_connect(ads);
1977
1978         if (!ads->config.realm) {
1979                 d_fprintf(stderr, _("Didn't find the kerberos server!\n"));
1980                 ads_destroy(&ads);
1981                 return -1;
1982         }
1983
1984         if (argv[1]) {
1985                 new_password = (char *)argv[1];
1986         } else {
1987                 if (asprintf(&prompt, _("Enter new password for %s:"), user) == -1) {
1988                         return -1;
1989                 }
1990                 new_password = getpass(prompt);
1991                 free(prompt);
1992         }
1993
1994         ret = kerberos_set_password(ads->auth.kdc_server, auth_principal,
1995                                 auth_password, user, new_password, ads->auth.time_offset);
1996         if (!ADS_ERR_OK(ret)) {
1997                 d_fprintf(stderr, _("Password change failed: %s\n"), ads_errstr(ret));
1998                 ads_destroy(&ads);
1999                 return -1;
2000         }
2001
2002         d_printf(_("Password change for %s completed.\n"), user);
2003         ads_destroy(&ads);
2004
2005         return 0;
2006 }
2007
2008 int net_ads_changetrustpw(struct net_context *c, int argc, const char **argv)
2009 {
2010         ADS_STRUCT *ads;
2011         char *host_principal;
2012         fstring my_name;
2013         ADS_STATUS ret;
2014
2015         if (c->display_usage) {
2016                 d_printf(  "%s\n"
2017                            "net ads changetrustpw\n"
2018                            "    %s\n",
2019                          _("Usage:"),
2020                          _("Change the machine account's trust password"));
2021                 return 0;
2022         }
2023
2024         if (!secrets_init()) {
2025                 DEBUG(1,("Failed to initialise secrets database\n"));
2026                 return -1;
2027         }
2028
2029         net_use_krb_machine_account(c);
2030
2031         use_in_memory_ccache();
2032
2033         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
2034                 return -1;
2035         }
2036
2037         fstrcpy(my_name, global_myname());
2038         strlower_m(my_name);
2039         if (asprintf(&host_principal, "%s$@%s", my_name, ads->config.realm) == -1) {
2040                 ads_destroy(&ads);
2041                 return -1;
2042         }
2043         d_printf(_("Changing password for principal: %s\n"), host_principal);
2044
2045         ret = ads_change_trust_account_password(ads, host_principal);
2046
2047         if (!ADS_ERR_OK(ret)) {
2048                 d_fprintf(stderr, _("Password change failed: %s\n"), ads_errstr(ret));
2049                 ads_destroy(&ads);
2050                 SAFE_FREE(host_principal);
2051                 return -1;
2052         }
2053
2054         d_printf(_("Password change for principal %s succeeded.\n"), host_principal);
2055
2056         if (USE_SYSTEM_KEYTAB) {
2057                 d_printf(_("Attempting to update system keytab with new password.\n"));
2058                 if (ads_keytab_create_default(ads)) {
2059                         d_printf(_("Failed to update system keytab.\n"));
2060                 }
2061         }
2062
2063         ads_destroy(&ads);
2064         SAFE_FREE(host_principal);
2065
2066         return 0;
2067 }
2068
2069 /*
2070   help for net ads search
2071 */
2072 static int net_ads_search_usage(struct net_context *c, int argc, const char **argv)
2073 {
2074         d_printf(_(
2075                 "\nnet ads search <expression> <attributes...>\n"
2076                 "\nPerform a raw LDAP search on a ADS server and dump the results.\n"
2077                 "The expression is a standard LDAP search expression, and the\n"
2078                 "attributes are a list of LDAP fields to show in the results.\n\n"
2079                 "Example: net ads search '(objectCategory=group)' sAMAccountName\n\n"
2080                 ));
2081         net_common_flags_usage(c, argc, argv);
2082         return -1;
2083 }
2084
2085
2086 /*
2087   general ADS search function. Useful in diagnosing problems in ADS
2088 */
2089 static int net_ads_search(struct net_context *c, int argc, const char **argv)
2090 {
2091         ADS_STRUCT *ads;
2092         ADS_STATUS rc;
2093         const char *ldap_exp;
2094         const char **attrs;
2095         LDAPMessage *res = NULL;
2096
2097         if (argc < 1 || c->display_usage) {
2098                 return net_ads_search_usage(c, argc, argv);
2099         }
2100
2101         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
2102                 return -1;
2103         }
2104
2105         ldap_exp = argv[0];
2106         attrs = (argv + 1);
2107
2108         rc = ads_do_search_all(ads, ads->config.bind_path,
2109                                LDAP_SCOPE_SUBTREE,
2110                                ldap_exp, attrs, &res);
2111         if (!ADS_ERR_OK(rc)) {
2112                 d_fprintf(stderr, _("search failed: %s\n"), ads_errstr(rc));
2113                 ads_destroy(&ads);
2114                 return -1;
2115         }
2116
2117         d_printf(_("Got %d replies\n\n"), ads_count_replies(ads, res));
2118
2119         /* dump the results */
2120         ads_dump(ads, res);
2121
2122         ads_msgfree(ads, res);
2123         ads_destroy(&ads);
2124
2125         return 0;
2126 }
2127
2128
2129 /*
2130   help for net ads search
2131 */
2132 static int net_ads_dn_usage(struct net_context *c, int argc, const char **argv)
2133 {
2134         d_printf(_(
2135                 "\nnet ads dn <dn> <attributes...>\n"
2136                 "\nperform a raw LDAP search on a ADS server and dump the results\n"
2137                 "The DN standard LDAP DN, and the attributes are a list of LDAP fields \n"
2138                 "to show in the results\n\n"
2139                 "Example: net ads dn 'CN=administrator,CN=Users,DC=my,DC=domain' sAMAccountName\n\n"
2140                 "Note: the DN must be provided properly escaped. See RFC 4514 for details\n\n"
2141                 ));
2142         net_common_flags_usage(c, argc, argv);
2143         return -1;
2144 }
2145
2146
2147 /*
2148   general ADS search function. Useful in diagnosing problems in ADS
2149 */
2150 static int net_ads_dn(struct net_context *c, int argc, const char **argv)
2151 {
2152         ADS_STRUCT *ads;
2153         ADS_STATUS rc;
2154         const char *dn;
2155         const char **attrs;
2156         LDAPMessage *res = NULL;
2157
2158         if (argc < 1 || c->display_usage) {
2159                 return net_ads_dn_usage(c, argc, argv);
2160         }
2161
2162         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
2163                 return -1;
2164         }
2165
2166         dn = argv[0];
2167         attrs = (argv + 1);
2168
2169         rc = ads_do_search_all(ads, dn,
2170                                LDAP_SCOPE_BASE,
2171                                "(objectclass=*)", attrs, &res);
2172         if (!ADS_ERR_OK(rc)) {
2173                 d_fprintf(stderr, _("search failed: %s\n"), ads_errstr(rc));
2174                 ads_destroy(&ads);
2175                 return -1;
2176         }
2177
2178         d_printf("Got %d replies\n\n", ads_count_replies(ads, res));
2179
2180         /* dump the results */
2181         ads_dump(ads, res);
2182
2183         ads_msgfree(ads, res);
2184         ads_destroy(&ads);
2185
2186         return 0;
2187 }
2188
2189 /*
2190   help for net ads sid search
2191 */
2192 static int net_ads_sid_usage(struct net_context *c, int argc, const char **argv)
2193 {
2194         d_printf(_(
2195                 "\nnet ads sid <sid> <attributes...>\n"
2196                 "\nperform a raw LDAP search on a ADS server and dump the results\n"
2197                 "The SID is in string format, and the attributes are a list of LDAP fields \n"
2198                 "to show in the results\n\n"
2199                 "Example: net ads sid 'S-1-5-32' distinguishedName\n\n"
2200                 ));
2201         net_common_flags_usage(c, argc, argv);
2202         return -1;
2203 }
2204
2205
2206 /*
2207   general ADS search function. Useful in diagnosing problems in ADS
2208 */
2209 static int net_ads_sid(struct net_context *c, int argc, const char **argv)
2210 {
2211         ADS_STRUCT *ads;
2212         ADS_STATUS rc;
2213         const char *sid_string;
2214         const char **attrs;
2215         LDAPMessage *res = NULL;
2216         struct dom_sid sid;
2217
2218         if (argc < 1 || c->display_usage) {
2219                 return net_ads_sid_usage(c, argc, argv);
2220         }
2221
2222         if (!ADS_ERR_OK(ads_startup(c, false, &ads))) {
2223                 return -1;
2224         }
2225
2226         sid_string = argv[0];
2227         attrs = (argv + 1);
2228
2229         if (!string_to_sid(&sid, sid_string)) {
2230                 d_fprintf(stderr, _("could not convert sid\n"));
2231                 ads_destroy(&ads);
2232                 return -1;
2233         }
2234
2235         rc = ads_search_retry_sid(ads, &res, &sid, attrs);
2236         if (!ADS_ERR_OK(rc)) {
2237                 d_fprintf(stderr, _("search failed: %s\n"), ads_errstr(rc));
2238                 ads_destroy(&ads);
2239                 return -1;
2240         }
2241
2242         d_printf(_("Got %d replies\n\n"), ads_count_replies(ads, res));
2243
2244         /* dump the results */
2245         ads_dump(ads, res);
2246
2247         ads_msgfree(ads, res);
2248         ads_destroy(&ads);
2249
2250         return 0;
2251 }
2252
2253 static int net_ads_keytab_flush(struct net_context *c, int argc, const char **argv)
2254 {
2255         int ret;
2256         ADS_STRUCT *ads;
2257
2258         if (c->display_usage) {
2259                 d_printf(  "%s\n"
2260                            "net ads keytab flush\n"
2261                            "    %s\n",
2262                          _("Usage:"),
2263                          _("Delete the whole keytab"));
2264                 return 0;
2265         }
2266
2267         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
2268                 return -1;
2269         }
2270         ret = ads_keytab_flush(ads);
2271         ads_destroy(&ads);
2272         return ret;
2273 }
2274
2275 static int net_ads_keytab_add(struct net_context *c, int argc, const char **argv)
2276 {
2277         int i;
2278         int ret = 0;
2279         ADS_STRUCT *ads;
2280
2281         if (c->display_usage) {
2282                 d_printf("%s\n%s",
2283                          _("Usage:"),
2284                          _("net ads keytab add <principal> [principal ...]\n"
2285                            "  Add principals to local keytab\n"
2286                            "    principal\tKerberos principal to add to "
2287                            "keytab\n"));
2288                 return 0;
2289         }
2290
2291         d_printf(_("Processing principals to add...\n"));
2292         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
2293                 return -1;
2294         }
2295         for (i = 0; i < argc; i++) {
2296                 ret |= ads_keytab_add_entry(ads, argv[i]);
2297         }
2298         ads_destroy(&ads);
2299         return ret;
2300 }
2301
2302 static int net_ads_keytab_create(struct net_context *c, int argc, const char **argv)
2303 {
2304         ADS_STRUCT *ads;
2305         int ret;
2306
2307         if (c->display_usage) {
2308                 d_printf(  "%s\n"
2309                            "net ads keytab create\n"
2310                            "    %s\n",
2311                          _("Usage:"),
2312                          _("Create new default keytab"));
2313                 return 0;
2314         }
2315
2316         if (!ADS_ERR_OK(ads_startup(c, true, &ads))) {
2317                 return -1;
2318         }
2319         ret = ads_keytab_create_default(ads);
2320         ads_destroy(&ads);
2321         return ret;
2322 }
2323
2324 static int net_ads_keytab_list(struct net_context *c, int argc, const char **argv)
2325 {
2326         const char *keytab = NULL;
2327
2328         if (c->display_usage) {
2329                 d_printf("%s\n%s",
2330                          _("Usage:"),
2331                          _("net ads keytab list [keytab]\n"
2332                            "  List a local keytab\n"
2333                            "    keytab\tKeytab to list\n"));
2334                 return 0;
2335         }
2336
2337         if (argc >= 1) {
2338                 keytab = argv[0];
2339         }
2340
2341         return ads_keytab_list(keytab);
2342 }
2343
2344
2345 int net_ads_keytab(struct net_context *c, int argc, const char **argv)
2346 {
2347         struct functable func[] = {
2348                 {
2349                         "add",
2350                         net_ads_keytab_add,
2351                         NET_TRANSPORT_ADS,
2352                         N_("Add a service principal"),
2353                         N_("net ads keytab add\n"
2354                            "    Add a service principal")
2355                 },
2356                 {
2357                         "create",
2358                         net_ads_keytab_create,
2359                         NET_TRANSPORT_ADS,
2360                         N_("Create a fresh keytab"),
2361                         N_("net ads keytab create\n"
2362                            "    Create a fresh keytab")
2363                 },
2364                 {
2365                         "flush",
2366                         net_ads_keytab_flush,
2367                         NET_TRANSPORT_ADS,
2368                         N_("Remove all keytab entries"),
2369                         N_("net ads keytab flush\n"
2370                            "    Remove all keytab entries")
2371                 },
2372                 {
2373                         "list",
2374                         net_ads_keytab_list,
2375                         NET_TRANSPORT_ADS,
2376                         N_("List a keytab"),
2377                         N_("net ads keytab list\n"
2378                            "    List a keytab")
2379                 },
2380                 {NULL, NULL, 0, NULL, NULL}
2381         };
2382
2383         if (!USE_KERBEROS_KEYTAB) {
2384                 d_printf(_("\nWarning: \"kerberos method\" must be set to a "
2385                     "keytab method to use keytab functions.\n"));
2386         }
2387
2388         return net_run_function(c, argc, argv, "net ads keytab", func);
2389 }
2390
2391 static int net_ads_kerberos_renew(struct net_context *c, int argc, const char **argv)
2392 {
2393         int ret = -1;
2394
2395         if (c->display_usage) {
2396                 d_printf(  "%s\n"
2397                            "net ads kerberos renew\n"
2398                            "    %s\n",
2399                          _("Usage:"),
2400                          _("Renew TGT from existing credential cache"));
2401                 return 0;
2402         }
2403
2404         ret = smb_krb5_renew_ticket(NULL, NULL, NULL, NULL);
2405         if (ret) {
2406                 d_printf(_("failed to renew kerberos ticket: %s\n"),
2407                         error_message(ret));
2408         }
2409         return ret;
2410 }
2411
2412 static int net_ads_kerberos_pac(struct net_context *c, int argc, const char **argv)
2413 {
2414         struct PAC_LOGON_INFO *info = NULL;
2415         TALLOC_CTX *mem_ctx = NULL;
2416         NTSTATUS status;
2417         int ret = -1;
2418         const char *impersonate_princ_s = NULL;
2419
2420         if (c->display_usage) {
2421                 d_printf(  "%s\n"
2422                            "net ads kerberos pac\n"
2423                            "    %s\n",
2424                          _("Usage:"),
2425                          _("Dump the Kerberos PAC"));
2426                 return 0;
2427         }
2428
2429         mem_ctx = talloc_init("net_ads_kerberos_pac");
2430         if (!mem_ctx) {
2431                 goto out;
2432         }
2433
2434         if (argc > 0) {
2435                 impersonate_princ_s = argv[0];
2436         }
2437
2438         c->opt_password = net_prompt_pass(c, c->opt_user_name);
2439
2440         status = kerberos_return_pac(mem_ctx,
2441                                      c->opt_user_name,
2442                                      c->opt_password,
2443                                      0,
2444                                      NULL,
2445                                      NULL,
2446                                      NULL,
2447                                      true,
2448                                      true,
2449                                      2592000, /* one month */
2450                                      impersonate_princ_s,
2451                                      &info);
2452         if (!NT_STATUS_IS_OK(status)) {
2453                 d_printf(_("failed to query kerberos PAC: %s\n"),
2454                         nt_errstr(status));
2455                 goto out;
2456         }
2457
2458         if (info) {
2459                 const char *s;
2460                 s = NDR_PRINT_STRUCT_STRING(mem_ctx, PAC_LOGON_INFO, info);
2461                 d_printf(_("The Pac: %s\n"), s);
2462         }
2463
2464         ret = 0;
2465  out:
2466         TALLOC_FREE(mem_ctx);
2467         return ret;
2468 }
2469
2470 static int net_ads_kerberos_kinit(struct net_context *c, int argc, const char **argv)
2471 {
2472         TALLOC_CTX *mem_ctx = NULL;
2473         int ret = -1;
2474         NTSTATUS status;
2475
2476         if (c->display_usage) {
2477                 d_printf(  "%s\n"
2478                            "net ads kerberos kinit\n"
2479                            "    %s\n",
2480                          _("Usage:"),
2481                          _("Get Ticket Granting Ticket (TGT) for the user"));
2482                 return 0;
2483         }
2484
2485         mem_ctx = talloc_init("net_ads_kerberos_kinit");
2486         if (!mem_ctx) {
2487                 goto out;
2488         }
2489
2490         c->opt_password = net_prompt_pass(c, c->opt_user_name);
2491
2492         ret = kerberos_kinit_password_ext(c->opt_user_name,
2493                                           c->opt_password,
2494                                           0,
2495                                           NULL,
2496                                           NULL,
2497                                           NULL,
2498                                           true,
2499                                           true,
2500                                           2592000, /* one month */
2501                                           &status);
2502         if (ret) {
2503                 d_printf(_("failed to kinit password: %s\n"),
2504                         nt_errstr(status));
2505         }
2506  out:
2507         return ret;
2508 }
2509
2510 int net_ads_kerberos(struct net_context *c, int argc, const char **argv)
2511 {
2512         struct functable func[] = {
2513                 {
2514                         "kinit",
2515                         net_ads_kerberos_kinit,
2516                         NET_TRANSPORT_ADS,
2517                         N_("Retrieve Ticket Granting Ticket (TGT)"),
2518                         N_("net ads kerberos kinit\n"
2519                            "    Receive Ticket Granting Ticket (TGT)")
2520                 },
2521                 {
2522                         "renew",
2523                         net_ads_kerberos_renew,
2524                         NET_TRANSPORT_ADS,
2525                         N_("Renew Ticket Granting Ticket from credential cache"),
2526                         N_("net ads kerberos renew\n"
2527                            "    Renew Ticket Granting Ticket (TGT) from "
2528                            "credential cache")
2529                 },
2530                 {
2531                         "pac",
2532                         net_ads_kerberos_pac,
2533                         NET_TRANSPORT_ADS,
2534                         N_("Dump Kerberos PAC"),
2535                         N_("net ads kerberos pac\n"
2536                            "    Dump Kerberos PAC")
2537                 },
2538                 {NULL, NULL, 0, NULL, NULL}
2539         };
2540
2541         return net_run_function(c, argc, argv, "net ads kerberos", func);
2542 }
2543
2544 int net_ads(struct net_context *c, int argc, const char **argv)
2545 {
2546         struct functable func[] = {
2547                 {
2548                         "info",
2549                         net_ads_info,
2550                         NET_TRANSPORT_ADS,
2551                         N_("Display details on remote ADS server"),
2552                         N_("net ads info\n"
2553                            "    Display details on remote ADS server")
2554                 },
2555                 {
2556                         "join",
2557                         net_ads_join,
2558                         NET_TRANSPORT_ADS,
2559                         N_("Join the local machine to ADS realm"),
2560                         N_("net ads join\n"
2561                            "    Join the local machine to ADS realm")
2562                 },
2563                 {
2564                         "testjoin",
2565                         net_ads_testjoin,
2566                         NET_TRANSPORT_ADS,
2567                         N_("Validate machine account"),
2568                         N_("net ads testjoin\n"
2569                            "    Validate machine account")
2570                 },
2571                 {
2572                         "leave",
2573                         net_ads_leave,
2574                         NET_TRANSPORT_ADS,
2575                         N_("Remove the local machine from ADS"),
2576                         N_("net ads leave\n"
2577                            "    Remove the local machine from ADS")
2578                 },
2579                 {
2580                         "status",
2581                         net_ads_status,
2582                         NET_TRANSPORT_ADS,
2583                         N_("Display machine account details"),
2584                         N_("net ads status\n"
2585                            "    Display machine account details")
2586                 },
2587                 {
2588                         "user",
2589                         net_ads_user,
2590                         NET_TRANSPORT_ADS,
2591                         N_("List/modify users"),
2592                         N_("net ads user\n"
2593                            "    List/modify users")
2594                 },
2595                 {
2596                         "group",
2597                         net_ads_group,
2598                         NET_TRANSPORT_ADS,
2599                         N_("List/modify groups"),
2600                         N_("net ads group\n"
2601                            "    List/modify groups")
2602                 },
2603                 {
2604                         "dns",
2605                         net_ads_dns,
2606                         NET_TRANSPORT_ADS,
2607                         N_("Issue dynamic DNS update"),
2608                         N_("net ads dns\n"
2609                            "    Issue dynamic DNS update")
2610                 },
2611                 {
2612                         "password",
2613                         net_ads_password,
2614                         NET_TRANSPORT_ADS,
2615                         N_("Change user passwords"),
2616                         N_("net ads password\n"
2617                            "    Change user passwords")
2618                 },
2619                 {
2620                         "changetrustpw",
2621                         net_ads_changetrustpw,
2622                         NET_TRANSPORT_ADS,
2623                         N_("Change trust account password"),
2624                         N_("net ads changetrustpw\n"
2625                            "    Change trust account password")
2626                 },
2627                 {
2628                         "printer",
2629                         net_ads_printer,
2630                         NET_TRANSPORT_ADS,
2631                         N_("List/modify printer entries"),
2632                         N_("net ads printer\n"
2633                            "    List/modify printer entries")
2634                 },
2635                 {
2636                         "search",
2637                         net_ads_search,
2638                         NET_TRANSPORT_ADS,
2639                         N_("Issue LDAP search using filter"),
2640                         N_("net ads search\n"
2641                            "    Issue LDAP search using filter")
2642                 },
2643                 {
2644                         "dn",
2645                         net_ads_dn,
2646                         NET_TRANSPORT_ADS,
2647                         N_("Issue LDAP search by DN"),
2648                         N_("net ads dn\n"
2649                            "    Issue LDAP search by DN")
2650                 },
2651                 {
2652                         "sid",
2653                         net_ads_sid,
2654                         NET_TRANSPORT_ADS,
2655                         N_("Issue LDAP search by SID"),
2656                         N_("net ads sid\n"
2657                            "    Issue LDAP search by SID")
2658                 },
2659                 {
2660                         "workgroup",
2661                         net_ads_workgroup,
2662                         NET_TRANSPORT_ADS,
2663                         N_("Display workgroup name"),
2664                         N_("net ads workgroup\n"
2665                            "    Display the workgroup name")
2666                 },
2667                 {
2668                         "lookup",
2669                         net_ads_lookup,
2670                         NET_TRANSPORT_ADS,
2671                         N_("Perfom CLDAP query on DC"),
2672                         N_("net ads lookup\n"
2673                            "    Find the ADS DC using CLDAP lookups")
2674                 },
2675                 {
2676                         "keytab",
2677                         net_ads_keytab,
2678                         NET_TRANSPORT_ADS,
2679                         N_("Manage local keytab file"),
2680                         N_("net ads keytab\n"
2681                            "    Manage local keytab file")
2682                 },
2683                 {
2684                         "gpo",
2685                         net_ads_gpo,
2686                         NET_TRANSPORT_ADS,
2687                         N_("Manage group policy objects"),
2688                         N_("net ads gpo\n"
2689                            "    Manage group policy objects")
2690                 },
2691                 {
2692                         "kerberos",
2693                         net_ads_kerberos,
2694                         NET_TRANSPORT_ADS,
2695                         N_("Manage kerberos keytab"),
2696                         N_("net ads kerberos\n"
2697                            "    Manage kerberos keytab")
2698                 },
2699                 {NULL, NULL, 0, NULL, NULL}
2700         };
2701
2702         return net_run_function(c, argc, argv, "net ads", func);
2703 }
2704
2705 #else
2706
2707 static int net_ads_noads(void)
2708 {
2709         d_fprintf(stderr, _("ADS support not compiled in\n"));
2710         return -1;
2711 }
2712
2713 int net_ads_keytab(struct net_context *c, int argc, const char **argv)
2714 {
2715         return net_ads_noads();
2716 }
2717
2718 int net_ads_kerberos(struct net_context *c, int argc, const char **argv)
2719 {
2720         return net_ads_noads();
2721 }
2722
2723 int net_ads_changetrustpw(struct net_context *c, int argc, const char **argv)
2724 {
2725         return net_ads_noads();
2726 }
2727
2728 int net_ads_join(struct net_context *c, int argc, const char **argv)
2729 {
2730         return net_ads_noads();
2731 }
2732
2733 int net_ads_user(struct net_context *c, int argc, const char **argv)
2734 {
2735         return net_ads_noads();
2736 }
2737
2738 int net_ads_group(struct net_context *c, int argc, const char **argv)
2739 {
2740         return net_ads_noads();
2741 }
2742
2743 int net_ads_gpo(struct net_context *c, int argc, const char **argv)
2744 {
2745         return net_ads_noads();
2746 }
2747
2748 /* this one shouldn't display a message */
2749 int net_ads_check(struct net_context *c)
2750 {
2751         return -1;
2752 }
2753
2754 int net_ads_check_our_domain(struct net_context *c)
2755 {
2756         return -1;
2757 }
2758
2759 int net_ads(struct net_context *c, int argc, const char **argv)
2760 {
2761         return net_ads_noads();
2762 }
2763
2764 #endif  /* WITH_ADS */