2 Samba Unix/Linux SMB client library
4 Copyright (C) 2001 Andrew Tridgell (tridge@samba.org)
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */
21 #include "../utils/net.h"
23 int net_lookup_usage(int argc, const char **argv)
26 " net lookup host HOSTNAME <type>\n\tgives IP for a hostname\n\n"
27 " net lookup ldap [domain]\n\tgives IP of domain's ldap server\n\n"
28 " net lookup kdc [realm]\n\tgives IP of realm's kerberos KDC\n\n"
29 " net lookup dc [domain]\n\tgives IP of domains Domain Controllers\n\n"
30 " net lookup master [domain|wg]\n\tgive IP of master browser\n\n"
35 /* lookup a hostname giving an IP */
36 static int net_lookup_host(int argc, const char **argv)
41 if (argc == 0) return net_lookup_usage(argc, argv);
42 if (argc > 1) name_type = strtol(argv[1], NULL, 0);
44 if (!resolve_name(argv[0], &ip, name_type)) {
45 /* we deliberately use DEBUG() here to send it to stderr
46 so scripts aren't mucked up */
47 DEBUG(0,("Didn't find %s#%02x\n", argv[0], name_type));
51 d_printf("%s\n", inet_ntoa(ip));
55 static void print_ldap_srvlist(char *srvlist)
63 next = strchr(cur,':');
64 if (next) *next++='\0';
65 printit = resolve_name(cur, &ip, 0x20);
67 next=cur ? strchr(cur,' ') :NULL;
71 d_printf("%s:%s\n", inet_ntoa(ip), cur?cur:"");
77 static int net_lookup_ldap(int argc, const char **argv)
80 char *srvlist, *domain;
83 struct hostent *hostent;
88 domain = opt_target_workgroup;
90 DEBUG(9, ("Lookup up ldap for domain %s\n", domain));
91 rc = ldap_domain2hostlist(domain, &srvlist);
92 if ((rc == LDAP_SUCCESS) && srvlist) {
93 print_ldap_srvlist(srvlist);
97 DEBUG(9, ("Looking up DC for domain %s\n", domain));
98 if (!get_dc_list(True, domain, &addr, &count))
101 hostent = gethostbyaddr((char *) &addr->s_addr, sizeof(addr->s_addr),
106 DEBUG(9, ("Found DC with DNS name %s\n", hostent->h_name));
107 domain = strchr(hostent->h_name, '.');
112 DEBUG(9, ("Looking up ldap for domain %s\n", domain));
113 rc = ldap_domain2hostlist(domain, &srvlist);
114 if ((rc == LDAP_SUCCESS) && srvlist) {
115 print_ldap_srvlist(srvlist);
120 DEBUG(1,("No LDAP support\n"));
124 static int net_lookup_dc(int argc, const char **argv)
126 struct in_addr *ip_list;
127 char *pdc_str = NULL;
128 char *domain=opt_target_workgroup;
135 if (!get_dc_list(True, domain, &ip_list, &count))
138 asprintf(&pdc_str, "%s", inet_ntoa(*ip_list));
139 d_printf("%s\n", pdc_str);
141 if (!get_dc_list(False, domain, &ip_list, &count)) {
145 for (i=0;i<count;i++) {
146 char *dc_str = inet_ntoa(ip_list[i]);
147 if (!strequal(pdc_str, dc_str))
148 d_printf("%s\n", dc_str);
154 static int net_lookup_master(int argc, const char **argv)
156 struct in_addr master_ip;
157 char *domain=opt_target_workgroup;
162 if (!find_master_ip(domain, &master_ip))
164 d_printf("%s\n", inet_ntoa(master_ip));
168 static int net_lookup_kdc(int argc, const char **argv)
173 struct sockaddr_in *addrs;
178 rc = krb5_init_context(&ctx);
180 DEBUG(1,("krb5_init_context failed (%s)\n",
186 realm.data = (krb5_pointer) argv[0];
187 realm.length = strlen(argv[0]);
188 } else if (lp_realm() && *lp_realm()) {
189 realm.data = (krb5_pointer) lp_realm();
190 realm.length = strlen(realm.data);
192 rc = krb5_get_host_realm(ctx, NULL, &realms);
194 DEBUG(1,("krb5_gethost_realm failed (%s)\n",
198 realm.data = (krb5_pointer) *realms;
199 realm.length = strlen(realm.data);
202 rc = krb5_locate_kdc(ctx, &realm, &addrs, &num_kdcs, 0);
204 DEBUG(1, ("krb5_locate_kdc failed (%s)\n", error_message(rc)));
207 for (i=0;i<num_kdcs;i++)
208 if (addrs[i].sin_family == AF_INET)
209 d_printf("%s:%hd\n", inet_ntoa(addrs[i].sin_addr),
210 ntohs(addrs[i].sin_port));
214 DEBUG(1, ("No kerberos support\n"));
217 /* lookup hosts or IP addresses using internal samba lookup fns */
218 int net_lookup(int argc, const char **argv)
220 struct functable func[] = {
221 {"HOST", net_lookup_host},
222 {"LDAP", net_lookup_ldap},
223 {"DC", net_lookup_dc},
224 {"MASTER", net_lookup_master},
225 {"KDC", net_lookup_kdc},
229 return net_run_function(argc, argv, func, net_lookup_usage);