first public release of samba4 code
[kai/samba.git] / source4 / utils / smbtree.c
1 /* 
2    Unix SMB/CIFS implementation.
3    Network neighbourhood browser.
4    
5    Copyright (C) Tim Potter      2000
6    
7    This program is free software; you can redistribute it and/or modify
8    it under the terms of the GNU General Public License as published by
9    the Free Software Foundation; either version 2 of the License, or
10    (at your option) any later version.
11    
12    This program is distributed in the hope that it will be useful,
13    but WITHOUT ANY WARRANTY; without even the implied warranty of
14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15    GNU General Public License for more details.
16    
17    You should have received a copy of the GNU General Public License
18    along with this program; if not, write to the Free Software
19    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20 */
21
22 #include "includes.h"
23
24 static BOOL use_bcast;
25
26 struct user_auth_info {
27         pstring username;
28         pstring password;
29         pstring workgroup;
30 };
31
32 /* How low can we go? */
33
34 enum tree_level {LEV_WORKGROUP, LEV_SERVER, LEV_SHARE};
35 static enum tree_level level = LEV_SHARE;
36
37 static void usage(void)
38 {
39         printf(
40 "Usage: smbtree [options]\n\
41 \n\
42 \t-d debuglevel           set debug output level\n\
43 \t-U username             user to autheticate as\n\
44 \t-W workgroup            workgroup of user to authenticate as\n\
45 \t-D                      list only domains (workgroups) of tree\n\
46 \t-S                      list domains and servers of tree\n\
47 \t-b                      use bcast instead of using the master browser\n\
48 \n\
49 The username can be of the form username%%password or\n\
50 workgroup\\username%%password.\n\n\
51 ");
52 }
53
54 /* Holds a list of workgroups or servers */
55
56 struct name_list {
57         struct name_list *prev, *next;
58         pstring name, comment;
59         uint32 server_type;
60 };
61
62 static struct name_list *workgroups, *servers, *shares;
63
64 static void free_name_list(struct name_list *list)
65 {
66         while(list)
67                 DLIST_REMOVE(list, list);
68 }
69
70 static void add_name(const char *machine_name, uint32 server_type,
71                      const char *comment, void *state)
72 {
73         struct name_list **name_list = (struct name_list **)state;
74         struct name_list *new_name;
75
76         new_name = (struct name_list *)malloc(sizeof(struct name_list));
77
78         if (!new_name)
79                 return;
80
81         ZERO_STRUCTP(new_name);
82
83         pstrcpy(new_name->name, machine_name);
84         pstrcpy(new_name->comment, comment);
85         new_name->server_type = server_type;
86
87         DLIST_ADD(*name_list, new_name);
88 }
89
90 /* Return a cli_state pointing at the IPC$ share for the given server */
91
92 static struct cli_state *get_ipc_connect(char *server, struct in_addr *server_ip,
93                                          struct user_auth_info *user_info)
94 {
95         struct cli_state *cli;
96         char *myname;
97         NTSTATUS nt_status;
98
99     myname = get_myname();
100         
101         nt_status = cli_full_connection(&cli, myname, server, server_ip, 0, "IPC$", "IPC", 
102                                         user_info->username, lp_workgroup(), user_info->password, 
103                                         CLI_FULL_CONNECTION_ANNONYMOUS_FALLBACK, NULL);
104
105         free(myname);
106         if (NT_STATUS_IS_OK(nt_status)) {
107                 return cli;
108         } else {
109                 return NULL;
110         }
111 }
112
113 /* Return the IP address and workgroup of a master browser on the 
114    network. */
115
116 static BOOL find_master_ip_bcast(pstring workgroup, struct in_addr *server_ip)
117 {
118         struct in_addr *ip_list;
119         int i, count;
120
121         /* Go looking for workgroups by broadcasting on the local network */ 
122
123         if (!name_resolve_bcast(MSBROWSE, 1, &ip_list, &count)) {
124                 return False;
125         }
126
127         for (i = 0; i < count; i++) {
128                 static fstring name;
129
130                 if (!name_status_find("*", 0, 0x1d, ip_list[i], name))
131                         continue;
132
133                 if (!find_master_ip(name, server_ip))
134                         continue;
135
136                 pstrcpy(workgroup, name);
137
138                 DEBUG(4, ("found master browser %s, %s\n", 
139                           name, inet_ntoa(ip_list[i])));
140
141                 return True;
142         }
143
144         return False;
145 }
146
147 /****************************************************************************
148   display tree of smb workgroups, servers and shares
149 ****************************************************************************/
150 static BOOL get_workgroups(struct user_auth_info *user_info)
151 {
152         struct cli_state *cli;
153         struct in_addr server_ip;
154         pstring master_workgroup;
155
156         /* Try to connect to a #1d name of our current workgroup.  If that
157            doesn't work broadcast for a master browser and then jump off
158            that workgroup. */
159
160         pstrcpy(master_workgroup, lp_workgroup());
161
162         if (use_bcast || !find_master_ip(lp_workgroup(), &server_ip)) {
163                 DEBUG(4, ("Unable to find master browser for workgroup %s\n", 
164                           master_workgroup));
165                 if (!find_master_ip_bcast(master_workgroup, &server_ip)) {
166                         DEBUG(4, ("Unable to find master browser by "
167                                   "broadcast\n"));
168                         return False;
169                 }
170         }
171
172         if (!(cli = get_ipc_connect(inet_ntoa(server_ip), &server_ip, user_info)))
173                 return False;
174
175         if (!cli_NetServerEnum(cli, master_workgroup, 
176                                SV_TYPE_DOMAIN_ENUM, add_name, &workgroups))
177                 return False;
178
179         return True;
180 }
181
182 /* Retrieve the list of servers for a given workgroup */
183
184 static BOOL get_servers(char *workgroup, struct user_auth_info *user_info)
185 {
186         struct cli_state *cli;
187         struct in_addr server_ip;
188
189         /* Open an IPC$ connection to the master browser for the workgroup */
190
191         if (!find_master_ip(workgroup, &server_ip)) {
192                 DEBUG(4, ("Cannot find master browser for workgroup %s\n",
193                           workgroup));
194                 return False;
195         }
196
197         if (!(cli = get_ipc_connect(inet_ntoa(server_ip), &server_ip, user_info)))
198                 return False;
199
200         if (!cli_NetServerEnum(cli, workgroup, SV_TYPE_ALL, add_name, 
201                                &servers))
202                 return False;
203
204         return True;
205 }
206
207 static BOOL get_shares(char *server_name, struct user_auth_info *user_info)
208 {
209         struct cli_state *cli;
210
211         if (!(cli = get_ipc_connect(server_name, NULL, user_info)))
212                 return False;
213
214         if (!cli_RNetShareEnum(cli, add_name, &shares))
215                 return False;
216
217         return True;
218 }
219
220 static BOOL print_tree(struct user_auth_info *user_info)
221 {
222         struct name_list *wg, *sv, *sh;
223
224         /* List workgroups */
225
226         if (!get_workgroups(user_info))
227                 return False;
228
229         for (wg = workgroups; wg; wg = wg->next) {
230
231                 printf("%s\n", wg->name);
232
233                 /* List servers */
234
235                 free_name_list(servers);
236                 servers = NULL;
237
238                 if (level == LEV_WORKGROUP || 
239                     !get_servers(wg->name, user_info))
240                         continue;
241
242                 for (sv = servers; sv; sv = sv->next) {
243
244                         printf("\t\\\\%-15s\t\t%s\n", 
245                                sv->name, sv->comment);
246
247                         /* List shares */
248
249                         free_name_list(shares);
250                         shares = NULL;
251
252                         if (level == LEV_SERVER ||
253                             !get_shares(sv->name, user_info))
254                                 continue;
255
256                         for (sh = shares; sh; sh = sh->next) {
257                                 printf("\t\t\\\\%s\\%-15s\t%s\n", 
258                                        sv->name, sh->name, sh->comment);
259                         }
260                 }
261         }
262
263         return True;
264 }
265
266 /****************************************************************************
267   main program
268 ****************************************************************************/
269  int main(int argc,char *argv[])
270 {
271         extern char *optarg;
272         extern int optind;
273         int opt;
274         char *p;
275         struct user_auth_info user_info;
276         BOOL got_pass = False;
277
278         /* Initialise samba stuff */
279
280         setlinebuf(stdout);
281
282         dbf = x_stderr;
283
284         setup_logging(argv[0],True);
285
286         lp_load(dyn_CONFIGFILE,True,False,False);
287         load_interfaces();
288
289         if (getenv("USER")) {
290                 pstrcpy(user_info.username, getenv("USER"));
291
292                 if ((p=strchr(user_info.username, '%'))) {
293                         *p = 0;
294                         pstrcpy(user_info.password, p+1);
295                         got_pass = True;
296                         memset(strchr(getenv("USER"), '%') + 1, 'X',
297                                strlen(user_info.password));
298                 }
299         }
300
301         pstrcpy(user_info.workgroup, lp_workgroup());
302
303         /* Parse command line args */
304
305         while ((opt = getopt(argc, argv, "U:hd:W:DSb")) != EOF) {
306                 switch (opt) {
307                 case 'U':
308                         pstrcpy(user_info.username,optarg);
309                         p = strchr(user_info.username,'%');
310                         if (p) {
311                                 *p = 0;
312                                 pstrcpy(user_info.password, p+1);
313                                 got_pass = 1;
314                         }
315                         break;
316
317                 case 'b':
318                         use_bcast = True;
319                         break;
320
321                 case 'h':
322                         usage();
323                         exit(1);
324
325                 case 'd':
326                         DEBUGLEVEL = atoi(optarg);
327                         break;
328
329                 case 'W':
330                         pstrcpy(user_info.workgroup, optarg);
331                         break;
332
333                 case 'D':
334                         level = LEV_WORKGROUP;
335                         break;
336
337                 case 'S':
338                         level = LEV_SERVER;
339                         break;
340
341                 default:
342                         printf("Unknown option %c (%d)\n", (char)opt, opt);
343                         exit(1);
344                 }
345         }
346
347         argc -= optind;
348         argv += optind;
349         
350         if (argc > 0) {
351                 usage();
352                 exit(1);
353         }
354
355         if (!got_pass) {
356                 char *pass = getpass("Password: ");
357                 if (pass) {
358                         pstrcpy(user_info.password, pass);
359                 }
360                 got_pass = True;
361         }
362
363         /* Now do our stuff */
364
365         if (!print_tree(&user_info))
366                 return 1;
367
368         return 0;
369 }