1/*
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
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
24#include "includes.h"
25
26/****************************************************************************
27 Deal with a response packet when releasing one of our names.
28****************************************************************************/
29
30static void release_name_response(struct subnet_record *subrec,
31				  struct response_record *rrec, struct packet_struct *p)
32{
33	/*
34	 * If we are releasing broadcast, then getting a response is an
35	 * error. If we are releasing unicast, then we expect to get a response.
36	 */
37	struct nmb_packet *nmb = &p->packet.nmb;
38	BOOL bcast = nmb->header.nm_flags.bcast;
39	BOOL success = True;
40	struct nmb_name *question_name = &rrec->packet->packet.nmb.question.question_name;
41	struct nmb_name *answer_name = &nmb->answers->rr_name;
42	struct in_addr released_ip;
43
44	/* Sanity check. Ensure that the answer name in the incoming packet is the
45	   same as the requested name in the outgoing packet. */
46	if (!nmb_name_equal(question_name, answer_name)) {
47		DEBUG(0,("release_name_response: Answer name %s differs from question name %s.\n",
48			 nmb_namestr(answer_name), nmb_namestr(question_name)));
49		return;
50	}
51
52	if (bcast) {
53		/* Someone sent a response to a bcast release? ignore it. */
54		return;
55	}
56
57	/* Unicast - check to see if the response allows us to release the name. */
58	if (nmb->header.rcode != 0) {
59		/* Error code - we were told not to release the name ! What now ! */
60		success = False;
61
62		DEBUG(0,("release_name_response: WINS server at IP %s rejected our \
63name release of name %s with error code %d.\n",
64			 inet_ntoa(p->ip),
65			 nmb_namestr(answer_name), nmb->header.rcode));
66	} else if (nmb->header.opcode == NMB_WACK_OPCODE) {
67		/* WINS server is telling us to wait. Pretend we didn't get
68		   the response but don't send out any more release requests. */
69
70		DEBUG(5,("release_name_response: WACK from WINS server %s in releasing \
71name %s on subnet %s.\n",
72			 inet_ntoa(p->ip), nmb_namestr(answer_name), subrec->subnet_name));
73
74		rrec->repeat_count = 0;
75		/* How long we should wait for. */
76		rrec->repeat_time = p->timestamp + nmb->answers->ttl;
77		rrec->num_msgs--;
78		return;
79	}
80
81	DEBUG(5,("release_name_response: %s in releasing name %s on subnet %s.\n",
82		 success ? "success" : "failure", nmb_namestr(answer_name), subrec->subnet_name));
83	if (success) {
84		putip((char*)&released_ip ,&nmb->answers->rdata[2]);
85
86		if(rrec->success_fn)
87			(*(release_name_success_function)rrec->success_fn)(subrec, rrec->userdata, answer_name, released_ip);
88		standard_success_release( subrec, rrec->userdata, answer_name, released_ip);
89	} else {
90		/* We have no standard_fail_release - maybe we should add one ? */
91		if (rrec->fail_fn) {
92			(*(release_name_fail_function)rrec->fail_fn)(subrec, rrec, answer_name);
93		}
94	}
95
96	remove_response_record(subrec, rrec);
97}
98
99/****************************************************************************
100 Deal with a timeout when releasing one of our names.
101****************************************************************************/
102
103static void release_name_timeout_response(struct subnet_record *subrec,
104					  struct response_record *rrec)
105{
106	/* a release is *always* considered to be successful when it
107	   times out. This doesn't cause problems as if a WINS server
108	   doesn't respond and someone else wants the name then the
109	   normal WACK/name query from the WINS server will cope */
110	struct nmb_packet *sent_nmb = &rrec->packet->packet.nmb;
111	BOOL bcast = sent_nmb->header.nm_flags.bcast;
112	struct nmb_name *question_name = &sent_nmb->question.question_name;
113	struct in_addr released_ip;
114
115	/* Get the ip address we were trying to release. */
116	putip((char*)&released_ip ,&sent_nmb->additional->rdata[2]);
117
118	if (!bcast) {
119		/* mark the WINS server temporarily dead */
120		wins_srv_died(rrec->packet->ip, released_ip);
121	}
122
123	DEBUG(5,("release_name_timeout_response: success in releasing name %s on subnet %s.\n",
124		 nmb_namestr(question_name), subrec->subnet_name));
125
126	if (rrec->success_fn) {
127		(*(release_name_success_function)rrec->success_fn)(subrec, rrec->userdata, question_name, released_ip);
128	}
129
130	standard_success_release( subrec, rrec->userdata, question_name, released_ip);
131	remove_response_record(subrec, rrec);
132}
133
134
135/*
136  when releasing a name with WINS we need to send the release to each of
137  the WINS groups
138*/
139static void wins_release_name(struct name_record *namerec,
140			      release_name_success_function success_fn,
141			      release_name_fail_function fail_fn,
142			      struct userdata_struct *userdata)
143{
144	int t, i;
145	char **wins_tags;
146
147	/* get the list of wins tags - we try to release for each of them */
148	wins_tags = wins_srv_tags();
149
150	for (t=0;wins_tags && wins_tags[t]; t++) {
151		for (i = 0; i < namerec->data.num_ips; i++) {
152			struct in_addr wins_ip = wins_srv_ip_tag(wins_tags[t], namerec->data.ip[i]);
153
154			BOOL last_one = ((i==namerec->data.num_ips - 1) && !wins_tags[t+1]);
155			if (queue_release_name(unicast_subnet,
156					       release_name_response,
157					       release_name_timeout_response,
158					       last_one?success_fn : NULL,
159					       last_one? fail_fn : NULL,
160					       last_one? userdata : NULL,
161					       &namerec->name,
162					       namerec->data.nb_flags,
163					       namerec->data.ip[i],
164					       wins_ip) == NULL) {
165				DEBUG(0,("release_name: Failed to send packet trying to release name %s IP %s\n",
166					 nmb_namestr(&namerec->name), inet_ntoa(namerec->data.ip[i]) ));
167			}
168		}
169	}
170
171	wins_srv_tags_free(wins_tags);
172}
173
174
175/****************************************************************************
176 Try and release one of our names.
177****************************************************************************/
178
179void release_name(struct subnet_record *subrec, struct name_record *namerec,
180		  release_name_success_function success_fn,
181		  release_name_fail_function fail_fn,
182		  struct userdata_struct *userdata)
183{
184	int i;
185
186	/* Ensure it's a SELF name, and in the ACTIVE state. */
187	if ((namerec->data.source != SELF_NAME) || !NAME_IS_ACTIVE(namerec)) {
188		DEBUG(0,("release_name: Cannot release name %s from subnet %s. Source was %d \n",
189			 nmb_namestr(&namerec->name), subrec->subnet_name, namerec->data.source));
190		return;
191	}
192
193	/* Set the name into the deregistering state. */
194	namerec->data.nb_flags |= NB_DEREG;
195
196	/* wins releases are a bit different */
197	if (subrec == unicast_subnet) {
198		wins_release_name(namerec, success_fn, fail_fn, userdata);
199		return;
200	}
201
202	/*
203	 * Go through and release the name for all known ip addresses.
204	 * Only call the success/fail function on the last one (it should
205	 * only be done once).
206	 */
207	for (i = 0; i < namerec->data.num_ips; i++) {
208		if (queue_release_name(subrec,
209				       release_name_response,
210				       release_name_timeout_response,
211				       (i == (namerec->data.num_ips - 1)) ? success_fn : NULL,
212				       (i == (namerec->data.num_ips - 1)) ? fail_fn : NULL,
213				       (i == (namerec->data.num_ips - 1)) ? userdata : NULL,
214				       &namerec->name,
215				       namerec->data.nb_flags,
216				       namerec->data.ip[i],
217				       subrec->bcast_ip) == NULL) {
218			DEBUG(0,("release_name: Failed to send packet trying to release name %s IP %s\n",
219				 nmb_namestr(&namerec->name), inet_ntoa(namerec->data.ip[i]) ));
220		}
221	}
222}
223