1/*
2   Unix SMB/CIFS implementation.
3   Network neighbourhood browser.
4
5   Copyright (C) Tim Potter      2000
6   Copyright (C) Jelmer Vernooij 2003
7
8   This program is free software; you can redistribute it and/or modify
9   it under the terms of the GNU General Public License as published by
10   the Free Software Foundation; either version 2 of the License, or
11   (at your option) any later version.
12
13   This program is distributed in the hope that it will be useful,
14   but WITHOUT ANY WARRANTY; without even the implied warranty of
15   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16   GNU General Public License for more details.
17
18   You should have received a copy of the GNU General Public License
19   along with this program; if not, write to the Free Software
20   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21*/
22
23#include "includes.h"
24
25static BOOL use_bcast;
26
27/* How low can we go? */
28
29enum tree_level {LEV_WORKGROUP, LEV_SERVER, LEV_SHARE};
30static enum tree_level level = LEV_SHARE;
31
32/* Holds a list of workgroups or servers */
33
34struct name_list {
35        struct name_list *prev, *next;
36        pstring name, comment;
37        uint32 server_type;
38};
39
40static struct name_list *workgroups, *servers, *shares;
41
42static void free_name_list(struct name_list *list)
43{
44        while(list)
45                DLIST_REMOVE(list, list);
46}
47
48static void add_name(const char *machine_name, uint32 server_type,
49                     const char *comment, void *state)
50{
51        struct name_list **name_list = (struct name_list **)state;
52        struct name_list *new_name;
53
54        new_name = (struct name_list *)malloc(sizeof(struct name_list));
55
56        if (!new_name)
57                return;
58
59        ZERO_STRUCTP(new_name);
60
61        pstrcpy(new_name->name, machine_name);
62        pstrcpy(new_name->comment, comment);
63        new_name->server_type = server_type;
64
65        DLIST_ADD(*name_list, new_name);
66}
67
68/****************************************************************************
69  display tree of smb workgroups, servers and shares
70****************************************************************************/
71static BOOL get_workgroups(struct user_auth_info *user_info)
72{
73        struct cli_state *cli;
74        struct in_addr server_ip;
75	pstring master_workgroup;
76
77        /* Try to connect to a #1d name of our current workgroup.  If that
78           doesn't work broadcast for a master browser and then jump off
79           that workgroup. */
80
81	pstrcpy(master_workgroup, lp_workgroup());
82
83        if (!use_bcast && !find_master_ip(lp_workgroup(), &server_ip)) {
84                DEBUG(4, ("Unable to find master browser for workgroup %s, falling back to broadcast\n",
85			  master_workgroup));
86				use_bcast = True;
87		} else if(!use_bcast) {
88        	if (!(cli = get_ipc_connect(inet_ntoa(server_ip), &server_ip, user_info)))
89				return False;
90		}
91
92		if (!(cli = get_ipc_connect_master_ip_bcast(master_workgroup, user_info))) {
93			DEBUG(4, ("Unable to find master browser by "
94				  "broadcast\n"));
95			return False;
96        }
97
98        if (!cli_NetServerEnum(cli, master_workgroup,
99                               SV_TYPE_DOMAIN_ENUM, add_name, &workgroups))
100                return False;
101
102        return True;
103}
104
105/* Retrieve the list of servers for a given workgroup */
106
107static BOOL get_servers(char *workgroup, struct user_auth_info *user_info)
108{
109        struct cli_state *cli;
110        struct in_addr server_ip;
111
112        /* Open an IPC$ connection to the master browser for the workgroup */
113
114        if (!find_master_ip(workgroup, &server_ip)) {
115                DEBUG(4, ("Cannot find master browser for workgroup %s\n",
116                          workgroup));
117                return False;
118        }
119
120        if (!(cli = get_ipc_connect(inet_ntoa(server_ip), &server_ip, user_info)))
121                return False;
122
123        if (!cli_NetServerEnum(cli, workgroup, SV_TYPE_ALL, add_name,
124                               &servers))
125                return False;
126
127        return True;
128}
129
130static BOOL get_shares(char *server_name, struct user_auth_info *user_info)
131{
132        struct cli_state *cli;
133
134        if (!(cli = get_ipc_connect(server_name, NULL, user_info)))
135                return False;
136
137        if (!cli_RNetShareEnum(cli, add_name, &shares))
138                return False;
139
140        return True;
141}
142
143static BOOL print_tree(struct user_auth_info *user_info)
144{
145        struct name_list *wg, *sv, *sh;
146
147        /* List workgroups */
148
149        if (!get_workgroups(user_info))
150                return False;
151
152        for (wg = workgroups; wg; wg = wg->next) {
153
154                printf("%s\n", wg->name);
155
156                /* List servers */
157
158                free_name_list(servers);
159                servers = NULL;
160
161                if (level == LEV_WORKGROUP ||
162                    !get_servers(wg->name, user_info))
163                        continue;
164
165                for (sv = servers; sv; sv = sv->next) {
166
167                        printf("\t\\\\%-15s\t\t%s\n",
168			       sv->name, sv->comment);
169
170                        /* List shares */
171
172                        free_name_list(shares);
173                        shares = NULL;
174
175                        if (level == LEV_SERVER ||
176                            !get_shares(sv->name, user_info))
177                                continue;
178
179                        for (sh = shares; sh; sh = sh->next) {
180                                printf("\t\t\\\\%s\\%-15s\t%s\n",
181				       sv->name, sh->name, sh->comment);
182                        }
183                }
184        }
185
186        return True;
187}
188
189/****************************************************************************
190  main program
191****************************************************************************/
192 int main(int argc,char *argv[])
193{
194	struct poptOption long_options[] = {
195		POPT_AUTOHELP
196		{ "broadcast", 'b', POPT_ARG_VAL, &use_bcast, True, "Use broadcast instead of using the master browser" },
197		{ "domains", 'D', POPT_ARG_VAL, &level, LEV_WORKGROUP, "List only domains (workgroups) of tree" },
198		{ "servers", 'S', POPT_ARG_VAL, &level, LEV_SERVER, "List domains(workgroups) and servers of tree" },
199		POPT_COMMON_SAMBA
200		POPT_COMMON_CREDENTIALS
201		POPT_TABLEEND
202	};
203	poptContext pc;
204
205	/* Initialise samba stuff */
206
207	setlinebuf(stdout);
208
209	dbf = x_stderr;
210
211	setup_logging(argv[0],True);
212
213	pc = poptGetContext("smbtree", argc, (const char **)argv, long_options,
214						POPT_CONTEXT_KEEP_FIRST);
215	while(poptGetNextOpt(pc) != -1);
216	poptFreeContext(pc);
217
218	lp_load(dyn_CONFIGFILE,True,False,False);
219	load_interfaces();
220
221	/* Parse command line args */
222
223	if (!cmdline_auth_info.got_pass) {
224		char *pass = getpass("Password: ");
225		if (pass) {
226			pstrcpy(cmdline_auth_info.password, pass);
227		}
228        cmdline_auth_info.got_pass = True;
229	}
230
231	/* Now do our stuff */
232
233        if (!print_tree(&cmdline_auth_info))
234                return 1;
235
236	return 0;
237}
238