2 Unix SMB/CIFS implementation.
3 NBT netbios routines and daemon - version 2
4 Copyright (C) Andrew Tridgell 1994-1998
5 Copyright (C) Luke Kenneth Casson Leighton 1994-1998
6 Copyright (C) Jeremy Allison 1994-1998
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 3 of the License, or
11 (at your option) any later version.
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.
18 You should have received a copy of the GNU General Public License
19 along with this program. If not, see <http://www.gnu.org/licenses/>.
24 #include "../librpc/gen_ndr/svcctl.h"
25 #include "nmbd/nmbd.h"
29 /*******************************************************************
30 Remove all the servers in a work group.
31 ******************************************************************/
33 void remove_all_servers(struct work_record
*work
)
35 struct server_record
*servrec
;
36 struct server_record
*nexts
;
38 for (servrec
= work
->serverlist
; servrec
; servrec
= nexts
) {
39 DEBUG(7,("remove_all_servers: Removing server %s\n",servrec
->serv
.name
));
40 nexts
= servrec
->next
;
41 DLIST_REMOVE(work
->serverlist
, servrec
);
42 ZERO_STRUCTP(servrec
);
46 work
->subnet
->work_changed
= True
;
49 /***************************************************************************
50 Add a server into the a workgroup serverlist.
51 **************************************************************************/
53 static void add_server_to_workgroup(struct work_record
*work
,
54 struct server_record
*servrec
)
56 DLIST_ADD_END(work
->serverlist
, servrec
, struct server_record
*);
57 work
->subnet
->work_changed
= True
;
60 /****************************************************************************
61 Find a server in a server list.
62 **************************************************************************/
64 struct server_record
*find_server_in_workgroup(struct work_record
*work
, const char *name
)
66 struct server_record
*ret
;
68 for (ret
= work
->serverlist
; ret
; ret
= ret
->next
) {
69 if (strequal(ret
->serv
.name
,name
))
76 /****************************************************************************
77 Remove a server entry from this workgroup.
78 ****************************************************************************/
80 void remove_server_from_workgroup(struct work_record
*work
, struct server_record
*servrec
)
82 DLIST_REMOVE(work
->serverlist
, servrec
);
83 ZERO_STRUCTP(servrec
);
85 work
->subnet
->work_changed
= True
;
88 /****************************************************************************
89 Create a server entry on this workgroup.
90 ****************************************************************************/
92 struct server_record
*create_server_on_workgroup(struct work_record
*work
,
93 const char *name
,int servertype
,
94 int ttl
, const char *comment
)
96 struct server_record
*servrec
;
99 DEBUG(7,("create_server_on_workgroup: not adding name starting with '*' (%s)\n",
104 if(find_server_in_workgroup(work
, name
) != NULL
) {
105 DEBUG(0,("create_server_on_workgroup: Server %s already exists on \
106 workgroup %s. This is a bug.\n", name
, work
->work_group
));
110 if((servrec
= SMB_MALLOC_P(struct server_record
)) == NULL
) {
111 DEBUG(0,("create_server_entry_on_workgroup: malloc fail !\n"));
115 memset((char *)servrec
,'\0',sizeof(*servrec
));
117 servrec
->subnet
= work
->subnet
;
119 fstrcpy(servrec
->serv
.name
,name
);
120 fstrcpy(servrec
->serv
.comment
,comment
);
121 strupper_m(servrec
->serv
.name
);
122 servrec
->serv
.type
= servertype
;
124 update_server_ttl(servrec
, ttl
);
126 add_server_to_workgroup(work
, servrec
);
128 DEBUG(3,("create_server_on_workgroup: Created server entry %s of type %x (%s) on \
129 workgroup %s.\n", name
,servertype
,comment
, work
->work_group
));
131 work
->subnet
->work_changed
= True
;
136 /*******************************************************************
137 Update the ttl field of a server record.
138 *******************************************************************/
140 void update_server_ttl(struct server_record
*servrec
, int ttl
)
142 if(ttl
> lp_max_ttl())
145 if(is_myname(servrec
->serv
.name
))
146 servrec
->death_time
= PERMANENT_TTL
;
148 servrec
->death_time
= (ttl
!= PERMANENT_TTL
) ? time(NULL
)+(ttl
*3) : PERMANENT_TTL
;
150 servrec
->subnet
->work_changed
= True
;
153 /*******************************************************************
154 Expire old servers in the serverlist. A time of -1 indicates
155 everybody dies except those with a death_time of PERMANENT_TTL (which is 0).
156 This should only be called from expire_workgroups_and_servers().
157 ******************************************************************/
159 void expire_servers(struct work_record
*work
, time_t t
)
161 struct server_record
*servrec
;
162 struct server_record
*nexts
;
164 for (servrec
= work
->serverlist
; servrec
; servrec
= nexts
) {
165 nexts
= servrec
->next
;
167 if ((servrec
->death_time
!= PERMANENT_TTL
) && ((t
== -1) || (servrec
->death_time
< t
))) {
168 DEBUG(3,("expire_old_servers: Removing timed out server %s\n",servrec
->serv
.name
));
169 remove_server_from_workgroup(work
, servrec
);
170 work
->subnet
->work_changed
= True
;
175 /*******************************************************************
176 Decide if we should write out a server record for this server.
177 We return zero if we should not. Check if we've already written
178 out this server record from an earlier subnet.
179 ******************************************************************/
181 static uint32
write_this_server_name( struct subnet_record
*subrec
,
182 struct work_record
*work
,
183 struct server_record
*servrec
)
185 struct subnet_record
*ssub
;
186 struct work_record
*iwork
;
188 /* Go through all the subnets we have already seen. */
189 for (ssub
= FIRST_SUBNET
; ssub
&& (ssub
!= subrec
); ssub
= NEXT_SUBNET_INCLUDING_UNICAST(ssub
)) {
190 for(iwork
= ssub
->workgrouplist
; iwork
; iwork
= iwork
->next
) {
191 if(find_server_in_workgroup( iwork
, servrec
->serv
.name
) != NULL
) {
193 * We have already written out this server record, don't
194 * do it again. This gives precedence to servers we have seen
195 * on the broadcast subnets over servers that may have been
196 * added via a sync on the unicast_subet.
198 * The correct way to do this is to have a serverlist file
199 * per subnet - this means changes to smbd as well. I may
200 * add this at a later date (JRA).
208 return servrec
->serv
.type
;
211 /*******************************************************************
212 Decide if we should write out a workgroup record for this workgroup.
213 We return zero if we should not. Don't write out lp_workgroup() (we've
214 already done it) and also don't write out a second workgroup record
215 on the unicast subnet that we've already written out on one of the
217 ******************************************************************/
219 static uint32
write_this_workgroup_name( struct subnet_record
*subrec
,
220 struct work_record
*work
)
222 struct subnet_record
*ssub
;
224 if(strequal(lp_workgroup(), work
->work_group
))
227 /* This is a workgroup we have seen on a broadcast subnet. All
228 these have the same type. */
230 if(subrec
!= unicast_subnet
)
231 return (SV_TYPE_DOMAIN_ENUM
|SV_TYPE_NT
|SV_TYPE_LOCAL_LIST_ONLY
);
233 for(ssub
= FIRST_SUBNET
; ssub
; ssub
= NEXT_SUBNET_EXCLUDING_UNICAST(ssub
)) {
234 /* This is the unicast subnet so check if we've already written out
235 this subnet when we passed over the broadcast subnets. */
237 if(find_workgroup_on_subnet( ssub
, work
->work_group
) != NULL
)
241 /* All workgroups on the unicast subnet (except our own, which we
242 have already written out) cannot be local. */
244 return (SV_TYPE_DOMAIN_ENUM
|SV_TYPE_NT
);
247 /*******************************************************************
248 Write out the browse.dat file.
249 ******************************************************************/
251 void write_browse_list_entry(XFILE
*fp
, const char *name
, uint32 rec_type
,
252 const char *local_master_browser_name
, const char *description
)
256 slprintf(tmp
,sizeof(tmp
)-1, "\"%s\"", name
);
257 x_fprintf(fp
, "%-25s ", tmp
);
258 x_fprintf(fp
, "%08x ", rec_type
);
259 slprintf(tmp
, sizeof(tmp
)-1, "\"%s\" ", local_master_browser_name
);
260 x_fprintf(fp
, "%-30s", tmp
);
261 x_fprintf(fp
, "\"%s\"\n", description
);
264 void write_browse_list(time_t t
, bool force_write
)
266 struct subnet_record
*subrec
;
267 struct work_record
*work
;
268 struct server_record
*servrec
;
274 bool list_changed
= force_write
;
275 static time_t lasttime
= 0;
276 TALLOC_CTX
*ctx
= talloc_tos();
278 /* Always dump if we're being told to by a signal. */
279 if(force_write
== False
) {
282 if (t
- lasttime
< 5)
288 dump_workgroups(force_write
);
290 for (subrec
= FIRST_SUBNET
; subrec
; subrec
= NEXT_SUBNET_INCLUDING_UNICAST(subrec
)) {
291 if(subrec
->work_changed
) {
302 fname
= cache_path(SERVER_LIST
);
306 fnamenew
= talloc_asprintf(ctx
, "%s.",
312 fp
= x_fopen(fnamenew
,O_WRONLY
|O_CREAT
|O_TRUNC
, 0644);
315 DEBUG(0,("write_browse_list: Can't open file %s. Error was %s\n",
316 fnamenew
,strerror(errno
)));
321 * Write out a record for our workgroup. Use the record from the first
325 if((work
= find_workgroup_on_subnet(FIRST_SUBNET
, lp_workgroup())) == NULL
) {
326 DEBUG(0,("write_browse_list: Fatal error - cannot find my workgroup %s\n",
332 write_browse_list_entry(fp
, work
->work_group
,
333 SV_TYPE_DOMAIN_ENUM
|SV_TYPE_NT
|SV_TYPE_LOCAL_LIST_ONLY
,
334 work
->local_master_browser_name
, work
->work_group
);
337 * We need to do something special for our own names.
338 * This is due to the fact that we may be a local master browser on
339 * one of our broadcast subnets, and a domain master on the unicast
340 * subnet. We iterate over the subnets and only write out the name
344 for (i
=0; my_netbios_names(i
); i
++) {
346 for (subrec
= FIRST_SUBNET
; subrec
; subrec
= NEXT_SUBNET_INCLUDING_UNICAST(subrec
)) {
347 if((work
= find_workgroup_on_subnet( subrec
, lp_workgroup() )) == NULL
)
349 if((servrec
= find_server_in_workgroup( work
, my_netbios_names(i
))) == NULL
)
352 stype
|= servrec
->serv
.type
;
355 /* Output server details, plus what workgroup they're in. */
356 write_browse_list_entry(fp
, my_netbios_names(i
), stype
,
357 string_truncate(lp_serverstring(), MAX_SERVER_STRING_LENGTH
), lp_workgroup());
360 for (subrec
= FIRST_SUBNET
; subrec
; subrec
= NEXT_SUBNET_INCLUDING_UNICAST(subrec
)) {
361 subrec
->work_changed
= False
;
363 for (work
= subrec
->workgrouplist
; work
; work
= work
->next
) {
364 /* Write out a workgroup record for a workgroup. */
365 uint32 wg_type
= write_this_workgroup_name( subrec
, work
);
368 write_browse_list_entry(fp
, work
->work_group
, wg_type
,
369 work
->local_master_browser_name
,
373 /* Now write out any server records a workgroup may have. */
375 for (servrec
= work
->serverlist
; servrec
; servrec
= servrec
->next
) {
378 /* We have already written our names here. */
379 if(is_myname(servrec
->serv
.name
))
382 serv_type
= write_this_server_name(subrec
, work
, servrec
);
384 /* Output server details, plus what workgroup they're in. */
385 write_browse_list_entry(fp
, servrec
->serv
.name
, serv_type
,
386 servrec
->serv
.comment
, work
->work_group
);
394 chmod(fnamenew
,0644);
395 rename(fnamenew
,fname
);
396 DEBUG(3,("write_browse_list: Wrote browse list into file %s\n",fname
));