Commit bead14ea authored by David Hankins's avatar David Hankins
Browse files

- The server will now include multiple IA_NA's and multiple IAADDRs within

  them, if advertised by the client.  It still only seeks to allocate one
  new address. [ISC-Bugs #17254]
parent 8b1cb226
......@@ -63,6 +63,10 @@ suggested fixes to <dhcp-users@isc.org>.
see 'man dhcpd.conf' for more information on allow/deny 'after time' syntax.
Thanks to a patch from Christof Chen.
- The server will now include multiple IA_NA's and multiple IAADDRs within
them, if advertised by the client. It still only seeks to allocate one
new address.
Changes since 4.0.0b1
- Use different paths for PID and lease files when running in DHCPv4
......
......@@ -1177,8 +1177,7 @@ void parse_client_lease_declaration (cfile, lease, ipp, clientp)
case OPTION:
oc = (struct option_cache *)0;
if (parse_option_decl (&oc, cfile)) {
save_option (oc -> option -> universe,
lease -> options, oc);
save_option(oc->option->universe, lease->options, oc);
option_cache_dereference (&oc, MDL);
}
return;
......
......@@ -43,6 +43,10 @@ static int pretty_text(char **, char *, const unsigned char **,
const unsigned char *, int);
static int pretty_domain(char **, char *, const unsigned char **,
const unsigned char *);
static int prepare_option_buffer(struct universe *universe, struct buffer *bp,
unsigned char *buffer, unsigned length,
unsigned code, int terminatep,
struct option_cache **opp);
/* Parse all available options out of the specified packet. */
......@@ -950,28 +954,34 @@ store_options6(char *buf, int buflen,
continue;
}
memset(&ds, 0, sizeof(ds));
if (evaluate_option_cache(&ds, packet, NULL,
NULL, opt_state, NULL,
&global_scope, oc, MDL)) {
if ((ds.len + 4) <= (buflen - bufpos)) {
tmp = (unsigned char *)buf + bufpos;
/* option tag */
putUShort(tmp, required_opts[i]);
/* option length */
putUShort(tmp+2, ds.len);
/* option data */
memcpy(tmp+4, ds.data, ds.len);
/* update position */
bufpos += (4 + ds.len);
for (; oc != NULL ; oc = oc->next) {
if (evaluate_option_cache(&ds, packet, NULL,
NULL, opt_state,
NULL, &global_scope,
oc, MDL)) {
if ((ds.len + 4) <=
(buflen - bufpos)) {
tmp = (unsigned char *)buf;
tmp += bufpos;
/* option tag */
putUShort(tmp,
required_opts[i]);
/* option length */
putUShort(tmp+2, ds.len);
/* option data */
memcpy(tmp+4, ds.data, ds.len);
/* update position */
bufpos += (4 + ds.len);
} else {
log_debug("No space for "
"option %d",
required_opts[i]);
}
data_string_forget(&ds, MDL);
} else {
log_debug("No space for option %d",
required_opts[i]);
log_error("Error evaluating option %d",
required_opts[i]);
}
data_string_forget(&ds, MDL);
} else {
log_error("Error evaluating option %d",
required_opts[i]);
}
}
}
......@@ -1013,28 +1023,29 @@ store_options6(char *buf, int buflen,
* Not already added, find this option.
*/
oc = lookup_option(&dhcpv6_universe, opt_state, code);
if (oc == NULL) {
continue;
}
memset(&ds, 0, sizeof(ds));
if (evaluate_option_cache(&ds, packet, NULL, NULL, opt_state,
NULL, &global_scope, oc, MDL)) {
if ((ds.len + 4) <= (buflen - bufpos)) {
tmp = (unsigned char *)buf + bufpos;
/* option tag */
putUShort(tmp, code);
/* option length */
putUShort(tmp+2, ds.len);
/* option data */
memcpy(tmp+4, ds.data, ds.len);
/* update position */
bufpos += (4 + ds.len);
for (; oc != NULL ; oc = oc->next) {
if (evaluate_option_cache(&ds, packet, NULL, NULL,
opt_state, NULL,
&global_scope, oc, MDL)) {
if ((ds.len + 4) <= (buflen - bufpos)) {
tmp = (unsigned char *)buf + bufpos;
/* option tag */
putUShort(tmp, code);
/* option length */
putUShort(tmp+2, ds.len);
/* option data */
memcpy(tmp+4, ds.data, ds.len);
/* update position */
bufpos += (4 + ds.len);
} else {
log_debug("No space for option %d",
code);
}
data_string_forget(&ds, MDL);
} else {
log_debug("No space for option %d", code);
log_error("Error evaluating option %d", code);
}
data_string_forget(&ds, MDL);
} else {
log_error("Error evaluating option %d", code);
}
}
......@@ -2143,15 +2154,64 @@ struct option_cache *lookup_hashed_option (universe, options, code)
return (struct option_cache *)0;
}
int save_option_buffer (struct universe *universe,
struct option_state *options,
struct buffer *bp,
unsigned char *buffer, unsigned length,
unsigned code, int tp)
/* Save a specified buffer into an option cache. */
int
save_option_buffer(struct universe *universe, struct option_state *options,
struct buffer *bp, unsigned char *buffer, unsigned length,
unsigned code, int terminatep)
{
struct buffer *lbp = (struct buffer *)0;
struct option_cache *op = (struct option_cache *)0;
struct option_cache *op = NULL;
int status = 1;
status = prepare_option_buffer(universe, bp, buffer, length, code,
terminatep, &op);
if (status == 0)
goto cleanup;
save_option(universe, options, op);
cleanup:
if (op != NULL)
option_cache_dereference(&op, MDL);
return status;
}
/* Append a specified buffer onto the tail of an option cache. */
int
append_option_buffer(struct universe *universe, struct option_state *options,
struct buffer *bp, unsigned char *buffer, unsigned length,
unsigned code, int terminatep)
{
struct option_cache *op = NULL;
int status = 1;
status = prepare_option_buffer(universe, bp, buffer, length, code,
terminatep, &op);
if (status == 0)
goto cleanup;
also_save_option(universe, options, op);
cleanup:
if (op != NULL)
option_cache_dereference(&op, MDL);
return status;
}
/* Create/copy a buffer into a new option cache. */
static int
prepare_option_buffer(struct universe *universe, struct buffer *bp,
unsigned char *buffer, unsigned length, unsigned code,
int terminatep, struct option_cache **opp)
{
struct buffer *lbp = NULL;
struct option *option = NULL;
struct option_cache *op;
int status = 1;
/* Code sizes of 8, 16, and 32 bits are allowed. */
switch(universe->tag_size) {
......@@ -2199,26 +2259,28 @@ int save_option_buffer (struct universe *universe,
option->refcnt = 1;
}
if (!option_cache_allocate (&op, MDL)) {
if (!option_cache_allocate (opp, MDL)) {
log_error("No memory for option code %s.%s.",
universe->name, option->name);
option_dereference(&option, MDL);
return 0;
status = 0;
goto cleanup;
}
/* Pointer rather than double pointer makes for less parens. */
op = *opp;
option_reference(&op->option, option, MDL);
/* If we weren't passed a buffer in which the data are saved and
refcounted, allocate one now. */
if (!bp) {
if (!buffer_allocate (&lbp, length + tp, MDL)) {
if (!buffer_allocate (&lbp, length + terminatep, MDL)) {
log_error ("no memory for option buffer.");
option_cache_dereference (&op, MDL);
option_dereference(&option, MDL);
return 0;
status = 0;
goto cleanup;
}
memcpy (lbp -> data, buffer, length + tp);
memcpy (lbp -> data, buffer, length + terminatep);
bp = lbp;
buffer = &bp -> data [0]; /* Refer to saved buffer. */
}
......@@ -2231,7 +2293,7 @@ int save_option_buffer (struct universe *universe,
op -> data.data = buffer;
op -> data.len = length;
if (tp) {
if (terminatep) {
/* NUL terminate (we can get away with this because we (or
the caller!) allocated one more than the buffer size, and
because the byte following the end of an option is always
......@@ -2257,11 +2319,8 @@ int save_option_buffer (struct universe *universe,
}
}
/* Now store the option. */
save_option (universe, options, op);
/* And let go of our references. */
option_cache_dereference (&op, MDL);
cleanup:
option_dereference(&option, MDL);
return 1;
......@@ -2298,6 +2357,10 @@ collect_oro(struct option_cache *oc,
oro->len += 2;
}
/* build_server_oro() is presently unusued, but may be used at a future date
* with support for Reconfigure messages (as a hint to the client about new
* option value contents).
*/
void
build_server_oro(struct data_string *server_oro,
struct option_state *options,
......@@ -2362,20 +2425,31 @@ build_server_oro(struct data_string *server_oro,
}
}
void save_option (struct universe *universe,
struct option_state *options, struct option_cache *oc)
/* Wrapper function to put an option cache into an option state. */
void
save_option(struct universe *universe, struct option_state *options,
struct option_cache *oc)
{
if (universe -> save_func)
(*universe -> save_func) (universe, options, oc);
if (universe->save_func)
(*universe->save_func)(universe, options, oc, ISC_FALSE);
else
log_error ("can't store options in %s space.",
universe -> name);
log_error("can't store options in %s space.", universe->name);
}
void save_hashed_option (universe, options, oc)
struct universe *universe;
struct option_state *options;
struct option_cache *oc;
/* Wrapper function to append an option cache into an option state's list. */
void
also_save_option(struct universe *universe, struct option_state *options,
struct option_cache *oc)
{
if (universe->save_func)
(*universe->save_func)(universe, options, oc, ISC_TRUE);
else
log_error("can't store options in %s space.", universe->name);
}
void
save_hashed_option(struct universe *universe, struct option_state *options,
struct option_cache *oc, isc_boolean_t appendp)
{
int hashix;
pair bptr;
......@@ -2407,12 +2481,23 @@ void save_hashed_option (universe, options, oc)
break;
}
/* If we find one, dereference it and put the new one
in its place. */
/* Deal with collisions on the hash list. */
if (bptr) {
ocloc = (struct option_cache **)&bptr->car;
option_cache_dereference(ocloc, MDL);
/*
* If appendp is set, append it onto the tail of the
* ->next list. If it is not set, rotate it into
* position at the head of the list.
*/
if (appendp) {
do {
ocloc = &(*ocloc)->next;
} while (*ocloc != NULL);
} else {
option_cache_dereference(ocloc, MDL);
}
option_cache_reference(ocloc, oc, MDL);
return;
}
......@@ -3053,44 +3138,35 @@ int fqdn_option_space_encapsulate (result, packet, lease, client_state,
return status;
}
/* Shill to the DHCPv4 fqdn option cache any lookups in the fqdn6 universe.
*
* XXX: Is this necessary? There shouldn't be any lookups directly...
/*
* Trap invalid attempts to inspect FQND6 contents.
*/
struct option_cache *
lookup_fqdn6_option(struct universe *universe, struct option_state *options,
unsigned code)
{
log_fatal("Impossible condition at %s:%d.", MDL);
return fqdn_universe.lookup_func(&fqdn_universe, options, code);
return NULL;
}
/* Shill to the DHCPv4 fqdn option cache any direct saves to the fqdn6
* universe.
*
* XXX: Should this even be possible? Never excercised code?
/*
* Trap invalid attempts to save options directly to FQDN6 rather than FQDN.
*/
void
save_fqdn6_option(struct universe *universe, struct option_state *options,
struct option_cache *oc)
struct option_cache *oc, isc_boolean_t appendp)
{
log_fatal("Impossible condition at %s:%d.", MDL);
fqdn_universe.save_func(&fqdn_universe, options, oc);
}
/* Shill to the DHCPv4 fqdn option cache any attempts to remove entries.
*
* XXX: Again...should this even be possible?
/*
* Trap invalid attempts to delete an option out of the FQDN6 universe.
*/
void
delete_fqdn6_option(struct universe *universe, struct option_state *options,
int code)
{
log_fatal("Impossible condition at %s:%d.", MDL);
fqdn_universe.delete_func(&fqdn_universe, options, code);
}
/* Shill to the DHCPv4 fqdn option cache any attempts to traverse the
......@@ -3395,10 +3471,9 @@ void hashed_option_space_foreach (struct packet *packet, struct lease *lease,
}
}
void save_linked_option (universe, options, oc)
struct universe *universe;
struct option_state *options;
struct option_cache *oc;
void
save_linked_option(struct universe *universe, struct option_state *options,
struct option_cache *oc, isc_boolean_t appendp)
{
pair *tail;
struct option_chain_head *head;
......@@ -3422,7 +3497,13 @@ void save_linked_option (universe, options, oc)
ocloc = (struct option_cache **)&(*tail)->car;
if (oc->option->code == (*ocloc)->option->code) {
option_cache_dereference(ocloc, MDL);
if (appendp) {
do {
ocloc = &(*ocloc)->next;
} while (*ocloc != NULL);
} else {
option_cache_dereference(ocloc, MDL);
}
option_cache_reference(ocloc, oc, MDL);
return;
}
......
......@@ -1387,7 +1387,7 @@ lookup_fqdn6_option(struct universe *universe, struct option_state *options,
unsigned code);
void
save_fqdn6_option(struct universe *universe, struct option_state *options,
struct option_cache *oc);
struct option_cache *oc, isc_boolean_t appendp);
void
delete_fqdn6_option(struct universe *universe, struct option_state *options,
int code);
......@@ -1457,12 +1457,17 @@ struct option_cache *next_hashed_option(struct universe *,
int save_option_buffer (struct universe *, struct option_state *,
struct buffer *, unsigned char *, unsigned,
unsigned, int);
int append_option_buffer(struct universe *, struct option_state *,
struct buffer *, unsigned char *, unsigned,
unsigned, int);
void build_server_oro(struct data_string *, struct option_state *,
const char *, int);
void save_option PROTO ((struct universe *,
struct option_state *, struct option_cache *));
void save_hashed_option PROTO ((struct universe *,
struct option_state *, struct option_cache *));
void save_option(struct universe *, struct option_state *,
struct option_cache *);
void also_save_option(struct universe *, struct option_state *,
struct option_cache *);
void save_hashed_option(struct universe *, struct option_state *,
struct option_cache *, isc_boolean_t appendp);
void delete_option PROTO ((struct universe *, struct option_state *, int));
void delete_hashed_option PROTO ((struct universe *,
struct option_state *, int));
......@@ -1549,8 +1554,8 @@ int linked_option_get PROTO ((struct data_string *, struct universe *,
int linked_option_state_dereference PROTO ((struct universe *,
struct option_state *,
const char *, int));
void save_linked_option (struct universe *, struct option_state *,
struct option_cache *);
void save_linked_option(struct universe *, struct option_state *,
struct option_cache *, isc_boolean_t appendp);
void linked_option_space_foreach (struct packet *, struct lease *,
struct client_state *,
struct option_state *,
......
......@@ -304,7 +304,7 @@ struct universe {
struct option_state *,
unsigned);
void (*save_func) (struct universe *, struct option_state *,
struct option_cache *);
struct option_cache *, isc_boolean_t);
void (*foreach) (struct packet *,
struct lease *, struct client_state *,
struct option_state *, struct option_state *,
......
......@@ -756,7 +756,6 @@ start_reply(struct packet *packet,
struct dhcpv6_packet *reply)
{
struct option_cache *oc;
struct data_string server_oro;
const unsigned char *server_id_data;
int server_id_len;
......@@ -877,21 +876,6 @@ start_reply(struct packet *packet,
}
}
/*
* Set the ORO for the main packet.
*/
build_server_oro(&server_oro, *opt_state, MDL);
if (!save_option_buffer(&dhcpv6_universe, *opt_state,
server_oro.buffer,
(unsigned char *)server_oro.data,
server_oro.len, D6O_ORO, 0)) {
log_error("start_reply: error saving server ORO.");
data_string_forget(&server_oro, MDL);
option_state_dereference(opt_state, MDL);
return 0;
}
data_string_forget(&server_oro, MDL);
return 1;
}
......@@ -1160,6 +1144,7 @@ reply_process_ia(struct reply_state *reply, struct option_cache *ia) {
packet_ia = NULL;
memset(&ia_data, 0, sizeof(ia_data));
memset(&data, 0, sizeof(data));
/* Note that find_client_address() may set reply->lease. */
/* Make sure there is at least room for the header. */
if ((reply->cursor + IA_NA_OFFSET + 4) > sizeof(reply->buf)) {
......@@ -1434,11 +1419,10 @@ reply_process_ia(struct reply_state *reply, struct option_cache *ia) {
NULL, NULL,
reply->packet->options,
reply->opt_state,
&reply->lease->scope,
&tmp->scope,
oc, MDL)) {
ddns_updates(reply->packet, NULL, NULL,
reply->lease, NULL,
reply->opt_state);
tmp, NULL, reply->opt_state);
}
}
......@@ -1472,6 +1456,8 @@ reply_process_ia(struct reply_state *reply, struct option_cache *ia) {
ia_na_dereference(&reply->ia_na, MDL);
if (reply->old_ia != NULL)
ia_na_dereference(&reply->old_ia, MDL);
if (reply->lease != NULL)
iaaddr_dereference(&reply->lease, MDL);
if (reply->fixed.data != NULL)
data_string_forget(&reply->fixed, MDL);
......@@ -1523,9 +1509,7 @@ reply_process_addr(struct reply_state *reply, struct option_cache *addr) {
goto cleanup;
}
tmp_addr.len = 16;
memcpy(tmp_addr.iabuf, iaaddr.data, 16);
/* The first 16 bytes are the IPv6 address. */
pref_life = getULong(iaaddr.data + 16);
valid_life = getULong(iaaddr.data + 20);
......@@ -1541,11 +1525,16 @@ reply_process_addr(struct reply_state *reply, struct option_cache *addr) {
* Clients may choose to send :: as an address, with the idea to give
* hints about preferred-lifetime or valid-lifetime.
*/
tmp_addr.len = 16;
memset(tmp_addr.iabuf, 0, 16);
if (!memcmp(iaaddr.data, tmp_addr.iabuf, 16)) {
/* Status remains success; we just ignore this one. */
goto cleanup;
}
/* tmp_addr len remains 16 */
memcpy(tmp_addr.iabuf, iaaddr.data, 16);
/*
* Verify that this address is on the client's network.
*/
......@@ -1764,6 +1753,7 @@ address_is_owned(struct reply_state *reply, struct iaddr *addr) {
*/
static isc_result_t
reply_process_try_addr(struct reply_state *reply, struct iaddr *addr) {
isc_result_t status = ISC_R_FAILURE;
struct ipv6_pool *pool;
int i;
struct data_string data_addr;
......@@ -1778,14 +1768,16 @@ reply_process_try_addr(struct reply_state *reply, struct iaddr *addr) {
data_addr.data = addr->iabuf;
for (i = 0 ; (pool = reply->shared->ipv6_pools[i]) != NULL ; i++) {
if (try_client_v6_address(&reply->lease, pool, &data_addr) ==
ISC_R_SUCCESS)
status = try_client_v6_address(&reply->lease, pool,
&data_addr);
if (status == ISC_R_SUCCESS)
break;
}
/* Note that this is just pedantry. There is no allocation to free. */
data_string_forget(&data_addr, MDL);
return ISC_R_SUCCESS;
/* Return just the most recent status... */
return status;
}
/* Look around for an address to give the client. First, look through the
......@@ -1951,11 +1943,14 @@ reply_process_is_addressed(struct reply_state *reply,
reply->valid = reply->send_valid;
#if 0
/* XXX: Old 4.0.0 alpha code would change the host {} record
* XXX: uid upon lease assignment. I think this was an error;
* XXX: it doesn't make sense to me now in retrospect to change
* XXX: what is essentially configuration state with network
* XXX: supplied values.
/*
* XXX: Old 4.0.0 alpha code would change the host {} record
* XXX: uid upon lease assignment. This was intended to cover the
* XXX: case where a client first identifies itself using vendor
* XXX: options in a solicit, or request, but later neglects to include
* XXX: these options in a Renew or Rebind. It is not clear that this
* XXX: is required, and has some startling ramnifications (such as
* XXX: how to recover this dynamic host {} state across restarts).
*/
if (reply->host != NULL)
change_host_uid(host, reply->client_id->data,
......@@ -2021,9 +2016,9 @@ reply_process_send_addr(struct reply_state *reply, struct iaddr *addr) {
putULong(data.buffer->data + 16, reply->send_prefer);
putULong(data.buffer->data + 20, reply->send_valid);
if (!save_option_buffer(&dhcpv6_universe, reply->reply_ia,
data.buffer, data.buffer->data,
data.len, D6O_IAADDR, 0)) {
if (!append_option_buffer(&dhcpv6_universe, reply->reply_ia,
data.buffer, data.buffer->data,
data.len, D6O_IAADDR, 0)) {
log_error("reply_process_ia: unable to save IAADDR "
"option");