1335 lines
41 KiB
C
1335 lines
41 KiB
C
/* SPDX-License-Identifier: LGPL-2.1+ */
|
|
/***
|
|
This file is part of systemd.
|
|
|
|
Copyright (C) 2013 Intel Corporation. All rights reserved.
|
|
Copyright (C) 2014 Tom Gundersen
|
|
|
|
systemd is free software; you can redistribute it and/or modify it
|
|
under the terms of the GNU Lesser General Public License as published by
|
|
the Free Software Foundation; either version 2.1 of the License, or
|
|
(at your option) any later version.
|
|
|
|
systemd is distributed in the hope that it will be useful, but
|
|
WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
|
|
Lesser General Public License for more details.
|
|
|
|
You should have received a copy of the GNU Lesser General Public License
|
|
along with systemd; If not, see <http://www.gnu.org/licenses/>.
|
|
***/
|
|
|
|
#include <arpa/inet.h>
|
|
#include <errno.h>
|
|
#include <stdio.h>
|
|
#include <stdio_ext.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
|
|
#include "sd-dhcp-lease.h"
|
|
|
|
#include "alloc-util.h"
|
|
#include "dhcp-lease-internal.h"
|
|
#include "dhcp-protocol.h"
|
|
#include "dns-domain.h"
|
|
#include "fd-util.h"
|
|
#include "fileio.h"
|
|
#include "hexdecoct.h"
|
|
#include "hostname-util.h"
|
|
#include "in-addr-util.h"
|
|
#include "network-internal.h"
|
|
#include "parse-util.h"
|
|
#include "stdio-util.h"
|
|
#include "string-util.h"
|
|
#include "unaligned.h"
|
|
|
|
int sd_dhcp_lease_get_address(sd_dhcp_lease *lease, struct in_addr *addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (lease->address == 0)
|
|
return -ENODATA;
|
|
|
|
addr->s_addr = lease->address;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_broadcast(sd_dhcp_lease *lease, struct in_addr *addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (!lease->have_broadcast)
|
|
return -ENODATA;
|
|
|
|
addr->s_addr = lease->broadcast;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_lifetime(sd_dhcp_lease *lease, uint32_t *lifetime) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(lifetime, -EINVAL);
|
|
|
|
if (lease->lifetime <= 0)
|
|
return -ENODATA;
|
|
|
|
*lifetime = lease->lifetime;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_t1(sd_dhcp_lease *lease, uint32_t *t1) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(t1, -EINVAL);
|
|
|
|
if (lease->t1 <= 0)
|
|
return -ENODATA;
|
|
|
|
*t1 = lease->t1;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_t2(sd_dhcp_lease *lease, uint32_t *t2) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(t2, -EINVAL);
|
|
|
|
if (lease->t2 <= 0)
|
|
return -ENODATA;
|
|
|
|
*t2 = lease->t2;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_mtu(sd_dhcp_lease *lease, uint16_t *mtu) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(mtu, -EINVAL);
|
|
|
|
if (lease->mtu <= 0)
|
|
return -ENODATA;
|
|
|
|
*mtu = lease->mtu;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_dns(sd_dhcp_lease *lease, const struct in_addr **addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (lease->dns_size <= 0)
|
|
return -ENODATA;
|
|
|
|
*addr = lease->dns;
|
|
return (int) lease->dns_size;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_ntp(sd_dhcp_lease *lease, const struct in_addr **addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (lease->ntp_size <= 0)
|
|
return -ENODATA;
|
|
|
|
*addr = lease->ntp;
|
|
return (int) lease->ntp_size;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_domainname(sd_dhcp_lease *lease, const char **domainname) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(domainname, -EINVAL);
|
|
|
|
if (!lease->domainname)
|
|
return -ENODATA;
|
|
|
|
*domainname = lease->domainname;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_hostname(sd_dhcp_lease *lease, const char **hostname) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(hostname, -EINVAL);
|
|
|
|
if (!lease->hostname)
|
|
return -ENODATA;
|
|
|
|
*hostname = lease->hostname;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_root_path(sd_dhcp_lease *lease, const char **root_path) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(root_path, -EINVAL);
|
|
|
|
if (!lease->root_path)
|
|
return -ENODATA;
|
|
|
|
*root_path = lease->root_path;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_router(sd_dhcp_lease *lease, struct in_addr *addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (lease->router == 0)
|
|
return -ENODATA;
|
|
|
|
addr->s_addr = lease->router;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_netmask(sd_dhcp_lease *lease, struct in_addr *addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (!lease->have_subnet_mask)
|
|
return -ENODATA;
|
|
|
|
addr->s_addr = lease->subnet_mask;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_server_identifier(sd_dhcp_lease *lease, struct in_addr *addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (lease->server_address == 0)
|
|
return -ENODATA;
|
|
|
|
addr->s_addr = lease->server_address;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_next_server(sd_dhcp_lease *lease, struct in_addr *addr) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(addr, -EINVAL);
|
|
|
|
if (lease->next_server == 0)
|
|
return -ENODATA;
|
|
|
|
addr->s_addr = lease->next_server;
|
|
return 0;
|
|
}
|
|
|
|
/*
|
|
* The returned routes array must be freed by the caller.
|
|
* Route objects have the same lifetime of the lease and must not be freed.
|
|
*/
|
|
int sd_dhcp_lease_get_routes(sd_dhcp_lease *lease, sd_dhcp_route ***routes) {
|
|
sd_dhcp_route **ret;
|
|
unsigned i;
|
|
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(routes, -EINVAL);
|
|
|
|
if (lease->static_route_size <= 0)
|
|
return -ENODATA;
|
|
|
|
ret = new(sd_dhcp_route *, lease->static_route_size);
|
|
if (!ret)
|
|
return -ENOMEM;
|
|
|
|
for (i = 0; i < lease->static_route_size; i++)
|
|
ret[i] = &lease->static_route[i];
|
|
|
|
*routes = ret;
|
|
return (int) lease->static_route_size;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_search_domains(sd_dhcp_lease *lease, char ***domains) {
|
|
unsigned r;
|
|
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(domains, -EINVAL);
|
|
|
|
r = strv_length(lease->search_domains);
|
|
if (r > 0) {
|
|
*domains = lease->search_domains;
|
|
return (int) r;
|
|
}
|
|
|
|
return -ENODATA;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_vendor_specific(sd_dhcp_lease *lease, const void **data, size_t *data_len) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(data, -EINVAL);
|
|
assert_return(data_len, -EINVAL);
|
|
|
|
if (lease->vendor_specific_len <= 0)
|
|
return -ENODATA;
|
|
|
|
*data = lease->vendor_specific;
|
|
*data_len = lease->vendor_specific_len;
|
|
return 0;
|
|
}
|
|
|
|
sd_dhcp_lease *sd_dhcp_lease_ref(sd_dhcp_lease *lease) {
|
|
|
|
if (!lease)
|
|
return NULL;
|
|
|
|
assert(lease->n_ref >= 1);
|
|
lease->n_ref++;
|
|
|
|
return lease;
|
|
}
|
|
|
|
sd_dhcp_lease *sd_dhcp_lease_unref(sd_dhcp_lease *lease) {
|
|
|
|
if (!lease)
|
|
return NULL;
|
|
|
|
assert(lease->n_ref >= 1);
|
|
lease->n_ref--;
|
|
|
|
if (lease->n_ref > 0)
|
|
return NULL;
|
|
|
|
while (lease->private_options) {
|
|
struct sd_dhcp_raw_option *option = lease->private_options;
|
|
|
|
LIST_REMOVE(options, lease->private_options, option);
|
|
|
|
free(option->data);
|
|
free(option);
|
|
}
|
|
|
|
free(lease->hostname);
|
|
free(lease->domainname);
|
|
free(lease->dns);
|
|
free(lease->ntp);
|
|
free(lease->static_route);
|
|
free(lease->client_id);
|
|
free(lease->vendor_specific);
|
|
strv_free(lease->search_domains);
|
|
return mfree(lease);
|
|
}
|
|
|
|
static int lease_parse_u32(const uint8_t *option, size_t len, uint32_t *ret, uint32_t min) {
|
|
assert(option);
|
|
assert(ret);
|
|
|
|
if (len != 4)
|
|
return -EINVAL;
|
|
|
|
*ret = unaligned_read_be32((be32_t*) option);
|
|
if (*ret < min)
|
|
*ret = min;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int lease_parse_u16(const uint8_t *option, size_t len, uint16_t *ret, uint16_t min) {
|
|
assert(option);
|
|
assert(ret);
|
|
|
|
if (len != 2)
|
|
return -EINVAL;
|
|
|
|
*ret = unaligned_read_be16((be16_t*) option);
|
|
if (*ret < min)
|
|
*ret = min;
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int lease_parse_be32(const uint8_t *option, size_t len, be32_t *ret) {
|
|
assert(option);
|
|
assert(ret);
|
|
|
|
if (len != 4)
|
|
return -EINVAL;
|
|
|
|
memcpy(ret, option, 4);
|
|
return 0;
|
|
}
|
|
|
|
static int lease_parse_string(const uint8_t *option, size_t len, char **ret) {
|
|
assert(option);
|
|
assert(ret);
|
|
|
|
if (len <= 0)
|
|
*ret = mfree(*ret);
|
|
else {
|
|
char *string;
|
|
|
|
/*
|
|
* One trailing NUL byte is OK, we don't mind. See:
|
|
* https://github.com/systemd/systemd/issues/1337
|
|
*/
|
|
if (memchr(option, 0, len - 1))
|
|
return -EINVAL;
|
|
|
|
string = strndup((const char *) option, len);
|
|
if (!string)
|
|
return -ENOMEM;
|
|
|
|
free(*ret);
|
|
*ret = string;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int lease_parse_domain(const uint8_t *option, size_t len, char **ret) {
|
|
_cleanup_free_ char *name = NULL, *normalized = NULL;
|
|
int r;
|
|
|
|
assert(option);
|
|
assert(ret);
|
|
|
|
r = lease_parse_string(option, len, &name);
|
|
if (r < 0)
|
|
return r;
|
|
if (!name) {
|
|
*ret = mfree(*ret);
|
|
return 0;
|
|
}
|
|
|
|
r = dns_name_normalize(name, &normalized);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
if (is_localhost(normalized))
|
|
return -EINVAL;
|
|
|
|
if (dns_name_is_root(normalized))
|
|
return -EINVAL;
|
|
|
|
free_and_replace(*ret, normalized);
|
|
|
|
return 0;
|
|
}
|
|
|
|
static void filter_bogus_addresses(struct in_addr *addresses, size_t *n) {
|
|
size_t i, j;
|
|
|
|
/* Silently filter DNS/NTP servers supplied to us that do not make outside of the local scope. */
|
|
|
|
for (i = 0, j = 0; i < *n; i ++) {
|
|
|
|
if (in4_addr_is_null(addresses+i) ||
|
|
in4_addr_is_localhost(addresses+i))
|
|
continue;
|
|
|
|
addresses[j++] = addresses[i];
|
|
}
|
|
|
|
*n = j;
|
|
}
|
|
|
|
static int lease_parse_in_addrs(const uint8_t *option, size_t len, struct in_addr **ret, size_t *n_ret) {
|
|
assert(option);
|
|
assert(ret);
|
|
assert(n_ret);
|
|
|
|
if (len <= 0) {
|
|
*ret = mfree(*ret);
|
|
*n_ret = 0;
|
|
} else {
|
|
size_t n_addresses;
|
|
struct in_addr *addresses;
|
|
|
|
if (len % 4 != 0)
|
|
return -EINVAL;
|
|
|
|
n_addresses = len / 4;
|
|
|
|
addresses = newdup(struct in_addr, option, n_addresses);
|
|
if (!addresses)
|
|
return -ENOMEM;
|
|
|
|
filter_bogus_addresses(addresses, &n_addresses);
|
|
|
|
free(*ret);
|
|
*ret = addresses;
|
|
*n_ret = n_addresses;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
static int lease_parse_routes(
|
|
const uint8_t *option, size_t len,
|
|
struct sd_dhcp_route **routes, size_t *routes_size, size_t *routes_allocated) {
|
|
|
|
struct in_addr addr;
|
|
|
|
assert(option || len <= 0);
|
|
assert(routes);
|
|
assert(routes_size);
|
|
assert(routes_allocated);
|
|
|
|
if (len <= 0)
|
|
return 0;
|
|
|
|
if (len % 8 != 0)
|
|
return -EINVAL;
|
|
|
|
if (!GREEDY_REALLOC(*routes, *routes_allocated, *routes_size + (len / 8)))
|
|
return -ENOMEM;
|
|
|
|
while (len >= 8) {
|
|
struct sd_dhcp_route *route = *routes + *routes_size;
|
|
int r;
|
|
|
|
route->option = SD_DHCP_OPTION_STATIC_ROUTE;
|
|
r = in4_addr_default_prefixlen((struct in_addr*) option, &route->dst_prefixlen);
|
|
if (r < 0) {
|
|
log_debug("Failed to determine destination prefix length from class based IP, ignoring");
|
|
continue;
|
|
}
|
|
|
|
assert_se(lease_parse_be32(option, 4, &addr.s_addr) >= 0);
|
|
route->dst_addr = inet_makeaddr(inet_netof(addr), 0);
|
|
option += 4;
|
|
|
|
assert_se(lease_parse_be32(option, 4, &route->gw_addr.s_addr) >= 0);
|
|
option += 4;
|
|
|
|
len -= 8;
|
|
(*routes_size)++;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* parses RFC3442 Classless Static Route Option */
|
|
static int lease_parse_classless_routes(
|
|
const uint8_t *option, size_t len,
|
|
struct sd_dhcp_route **routes, size_t *routes_size, size_t *routes_allocated) {
|
|
|
|
assert(option || len <= 0);
|
|
assert(routes);
|
|
assert(routes_size);
|
|
assert(routes_allocated);
|
|
|
|
if (len <= 0)
|
|
return 0;
|
|
|
|
/* option format: (subnet-mask-width significant-subnet-octets gateway-ip)* */
|
|
|
|
while (len > 0) {
|
|
uint8_t dst_octets;
|
|
struct sd_dhcp_route *route;
|
|
|
|
if (!GREEDY_REALLOC(*routes, *routes_allocated, *routes_size + 1))
|
|
return -ENOMEM;
|
|
|
|
route = *routes + *routes_size;
|
|
route->option = SD_DHCP_OPTION_CLASSLESS_STATIC_ROUTE;
|
|
|
|
dst_octets = (*option == 0 ? 0 : ((*option - 1) / 8) + 1);
|
|
route->dst_prefixlen = *option;
|
|
option++;
|
|
len--;
|
|
|
|
/* can't have more than 4 octets in IPv4 */
|
|
if (dst_octets > 4 || len < dst_octets)
|
|
return -EINVAL;
|
|
|
|
route->dst_addr.s_addr = 0;
|
|
memcpy(&route->dst_addr.s_addr, option, dst_octets);
|
|
option += dst_octets;
|
|
len -= dst_octets;
|
|
|
|
if (len < 4)
|
|
return -EINVAL;
|
|
|
|
assert_se(lease_parse_be32(option, 4, &route->gw_addr.s_addr) >= 0);
|
|
option += 4;
|
|
len -= 4;
|
|
|
|
(*routes_size)++;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int dhcp_lease_parse_options(uint8_t code, uint8_t len, const void *option, void *userdata) {
|
|
sd_dhcp_lease *lease = userdata;
|
|
int r;
|
|
|
|
assert(lease);
|
|
|
|
switch(code) {
|
|
|
|
case SD_DHCP_OPTION_IP_ADDRESS_LEASE_TIME:
|
|
r = lease_parse_u32(option, len, &lease->lifetime, 1);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse lease time, ignoring: %m");
|
|
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_SERVER_IDENTIFIER:
|
|
r = lease_parse_be32(option, len, &lease->server_address);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse server identifier, ignoring: %m");
|
|
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_SUBNET_MASK:
|
|
r = lease_parse_be32(option, len, &lease->subnet_mask);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse subnet mask, ignoring: %m");
|
|
else
|
|
lease->have_subnet_mask = true;
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_BROADCAST:
|
|
r = lease_parse_be32(option, len, &lease->broadcast);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse broadcast address, ignoring: %m");
|
|
else
|
|
lease->have_broadcast = true;
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_ROUTER:
|
|
if (len >= 4) {
|
|
r = lease_parse_be32(option, 4, &lease->router);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse router address, ignoring: %m");
|
|
}
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_DOMAIN_NAME_SERVER:
|
|
r = lease_parse_in_addrs(option, len, &lease->dns, &lease->dns_size);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse DNS server, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_NTP_SERVER:
|
|
r = lease_parse_in_addrs(option, len, &lease->ntp, &lease->ntp_size);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse NTP server, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_STATIC_ROUTE:
|
|
r = lease_parse_routes(option, len, &lease->static_route, &lease->static_route_size, &lease->static_route_allocated);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse static routes, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_INTERFACE_MTU:
|
|
r = lease_parse_u16(option, len, &lease->mtu, 68);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse MTU, ignoring: %m");
|
|
if (lease->mtu < DHCP_DEFAULT_MIN_SIZE) {
|
|
log_debug("MTU value of %" PRIu16 " too small. Using default MTU value of %d instead.", lease->mtu, DHCP_DEFAULT_MIN_SIZE);
|
|
lease->mtu = DHCP_DEFAULT_MIN_SIZE;
|
|
}
|
|
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_DOMAIN_NAME:
|
|
r = lease_parse_domain(option, len, &lease->domainname);
|
|
if (r < 0) {
|
|
log_debug_errno(r, "Failed to parse domain name, ignoring: %m");
|
|
return 0;
|
|
}
|
|
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_DOMAIN_SEARCH_LIST:
|
|
r = dhcp_lease_parse_search_domains(option, len, &lease->search_domains);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse Domain Search List, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_HOST_NAME:
|
|
r = lease_parse_domain(option, len, &lease->hostname);
|
|
if (r < 0) {
|
|
log_debug_errno(r, "Failed to parse host name, ignoring: %m");
|
|
return 0;
|
|
}
|
|
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_ROOT_PATH:
|
|
r = lease_parse_string(option, len, &lease->root_path);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse root path, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_RENEWAL_T1_TIME:
|
|
r = lease_parse_u32(option, len, &lease->t1, 1);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse T1 time, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_REBINDING_T2_TIME:
|
|
r = lease_parse_u32(option, len, &lease->t2, 1);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse T2 time, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_CLASSLESS_STATIC_ROUTE:
|
|
r = lease_parse_classless_routes(
|
|
option, len,
|
|
&lease->static_route,
|
|
&lease->static_route_size,
|
|
&lease->static_route_allocated);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse classless routes, ignoring: %m");
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_NEW_TZDB_TIMEZONE: {
|
|
_cleanup_free_ char *tz = NULL;
|
|
|
|
r = lease_parse_string(option, len, &tz);
|
|
if (r < 0) {
|
|
log_debug_errno(r, "Failed to parse timezone option, ignoring: %m");
|
|
return 0;
|
|
}
|
|
|
|
if (!timezone_is_valid(tz)) {
|
|
log_debug_errno(r, "Timezone is not valid, ignoring: %m");
|
|
return 0;
|
|
}
|
|
|
|
free_and_replace(lease->timezone, tz);
|
|
|
|
break;
|
|
}
|
|
|
|
case SD_DHCP_OPTION_VENDOR_SPECIFIC:
|
|
|
|
if (len <= 0)
|
|
lease->vendor_specific = mfree(lease->vendor_specific);
|
|
else {
|
|
void *p;
|
|
|
|
p = memdup(option, len);
|
|
if (!p)
|
|
return -ENOMEM;
|
|
|
|
free(lease->vendor_specific);
|
|
lease->vendor_specific = p;
|
|
}
|
|
|
|
lease->vendor_specific_len = len;
|
|
break;
|
|
|
|
case SD_DHCP_OPTION_PRIVATE_BASE ... SD_DHCP_OPTION_PRIVATE_LAST:
|
|
r = dhcp_lease_insert_private_option(lease, code, option, len);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
break;
|
|
|
|
default:
|
|
log_debug("Ignoring option DHCP option %"PRIu8" while parsing.", code);
|
|
break;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
/* Parses compressed domain names. */
|
|
int dhcp_lease_parse_search_domains(const uint8_t *option, size_t len, char ***domains) {
|
|
_cleanup_strv_free_ char **names = NULL;
|
|
size_t pos = 0, cnt = 0;
|
|
int r;
|
|
|
|
assert(domains);
|
|
assert_return(option && len > 0, -ENODATA);
|
|
|
|
while (pos < len) {
|
|
_cleanup_free_ char *name = NULL;
|
|
size_t n = 0, allocated = 0;
|
|
size_t jump_barrier = pos, next_chunk = 0;
|
|
bool first = true;
|
|
|
|
for (;;) {
|
|
uint8_t c;
|
|
c = option[pos++];
|
|
|
|
if (c == 0) {
|
|
/* End of name */
|
|
break;
|
|
} else if (c <= 63) {
|
|
const char *label;
|
|
|
|
/* Literal label */
|
|
label = (const char*) (option + pos);
|
|
pos += c;
|
|
if (pos >= len)
|
|
return -EBADMSG;
|
|
|
|
if (!GREEDY_REALLOC(name, allocated, n + !first + DNS_LABEL_ESCAPED_MAX))
|
|
return -ENOMEM;
|
|
|
|
if (first)
|
|
first = false;
|
|
else
|
|
name[n++] = '.';
|
|
|
|
r = dns_label_escape(label, c, name + n, DNS_LABEL_ESCAPED_MAX);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
n += r;
|
|
} else if ((c & 0xc0) == 0xc0) {
|
|
/* Pointer */
|
|
|
|
uint8_t d;
|
|
uint16_t ptr;
|
|
|
|
if (pos >= len)
|
|
return -EBADMSG;
|
|
|
|
d = option[pos++];
|
|
ptr = (uint16_t) (c & ~0xc0) << 8 | (uint16_t) d;
|
|
|
|
/* Jumps are limited to a "prior occurrence" (RFC-1035 4.1.4) */
|
|
if (ptr >= jump_barrier)
|
|
return -EBADMSG;
|
|
jump_barrier = ptr;
|
|
|
|
/* Save current location so we don't end up re-parsing what's parsed so far. */
|
|
if (next_chunk == 0)
|
|
next_chunk = pos;
|
|
|
|
pos = ptr;
|
|
} else
|
|
return -EBADMSG;
|
|
}
|
|
|
|
if (!GREEDY_REALLOC(name, allocated, n + 1))
|
|
return -ENOMEM;
|
|
name[n] = 0;
|
|
|
|
r = strv_extend(&names, name);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
cnt++;
|
|
|
|
if (next_chunk != 0)
|
|
pos = next_chunk;
|
|
}
|
|
|
|
*domains = TAKE_PTR(names);
|
|
|
|
return cnt;
|
|
}
|
|
|
|
int dhcp_lease_insert_private_option(sd_dhcp_lease *lease, uint8_t tag, const void *data, uint8_t len) {
|
|
struct sd_dhcp_raw_option *cur, *option;
|
|
|
|
assert(lease);
|
|
|
|
LIST_FOREACH(options, cur, lease->private_options) {
|
|
if (tag < cur->tag)
|
|
break;
|
|
if (tag == cur->tag) {
|
|
log_debug("Ignoring duplicate option, tagged %i.", tag);
|
|
return 0;
|
|
}
|
|
}
|
|
|
|
option = new(struct sd_dhcp_raw_option, 1);
|
|
if (!option)
|
|
return -ENOMEM;
|
|
|
|
option->tag = tag;
|
|
option->length = len;
|
|
option->data = memdup(data, len);
|
|
if (!option->data) {
|
|
free(option);
|
|
return -ENOMEM;
|
|
}
|
|
|
|
LIST_INSERT_BEFORE(options, lease->private_options, cur, option);
|
|
return 0;
|
|
}
|
|
|
|
int dhcp_lease_new(sd_dhcp_lease **ret) {
|
|
sd_dhcp_lease *lease;
|
|
|
|
lease = new0(sd_dhcp_lease, 1);
|
|
if (!lease)
|
|
return -ENOMEM;
|
|
|
|
lease->router = INADDR_ANY;
|
|
lease->n_ref = 1;
|
|
|
|
*ret = lease;
|
|
return 0;
|
|
}
|
|
|
|
int dhcp_lease_save(sd_dhcp_lease *lease, const char *lease_file) {
|
|
_cleanup_free_ char *temp_path = NULL;
|
|
_cleanup_fclose_ FILE *f = NULL;
|
|
struct sd_dhcp_raw_option *option;
|
|
struct in_addr address;
|
|
const struct in_addr *addresses;
|
|
const void *client_id, *data;
|
|
size_t client_id_len, data_len;
|
|
const char *string;
|
|
uint16_t mtu;
|
|
_cleanup_free_ sd_dhcp_route **routes = NULL;
|
|
char **search_domains = NULL;
|
|
uint32_t t1, t2, lifetime;
|
|
int r;
|
|
|
|
assert(lease);
|
|
assert(lease_file);
|
|
|
|
r = fopen_temporary(lease_file, &f, &temp_path);
|
|
if (r < 0)
|
|
goto fail;
|
|
|
|
(void) __fsetlocking(f, FSETLOCKING_BYCALLER);
|
|
(void) fchmod(fileno(f), 0644);
|
|
|
|
fprintf(f,
|
|
"# This is private data. Do not parse.\n");
|
|
|
|
r = sd_dhcp_lease_get_address(lease, &address);
|
|
if (r >= 0)
|
|
fprintf(f, "ADDRESS=%s\n", inet_ntoa(address));
|
|
|
|
r = sd_dhcp_lease_get_netmask(lease, &address);
|
|
if (r >= 0)
|
|
fprintf(f, "NETMASK=%s\n", inet_ntoa(address));
|
|
|
|
r = sd_dhcp_lease_get_router(lease, &address);
|
|
if (r >= 0)
|
|
fprintf(f, "ROUTER=%s\n", inet_ntoa(address));
|
|
|
|
r = sd_dhcp_lease_get_server_identifier(lease, &address);
|
|
if (r >= 0)
|
|
fprintf(f, "SERVER_ADDRESS=%s\n", inet_ntoa(address));
|
|
|
|
r = sd_dhcp_lease_get_next_server(lease, &address);
|
|
if (r >= 0)
|
|
fprintf(f, "NEXT_SERVER=%s\n", inet_ntoa(address));
|
|
|
|
r = sd_dhcp_lease_get_broadcast(lease, &address);
|
|
if (r >= 0)
|
|
fprintf(f, "BROADCAST=%s\n", inet_ntoa(address));
|
|
|
|
r = sd_dhcp_lease_get_mtu(lease, &mtu);
|
|
if (r >= 0)
|
|
fprintf(f, "MTU=%" PRIu16 "\n", mtu);
|
|
|
|
r = sd_dhcp_lease_get_t1(lease, &t1);
|
|
if (r >= 0)
|
|
fprintf(f, "T1=%" PRIu32 "\n", t1);
|
|
|
|
r = sd_dhcp_lease_get_t2(lease, &t2);
|
|
if (r >= 0)
|
|
fprintf(f, "T2=%" PRIu32 "\n", t2);
|
|
|
|
r = sd_dhcp_lease_get_lifetime(lease, &lifetime);
|
|
if (r >= 0)
|
|
fprintf(f, "LIFETIME=%" PRIu32 "\n", lifetime);
|
|
|
|
r = sd_dhcp_lease_get_dns(lease, &addresses);
|
|
if (r > 0) {
|
|
fputs("DNS=", f);
|
|
serialize_in_addrs(f, addresses, r);
|
|
fputs("\n", f);
|
|
}
|
|
|
|
r = sd_dhcp_lease_get_ntp(lease, &addresses);
|
|
if (r > 0) {
|
|
fputs("NTP=", f);
|
|
serialize_in_addrs(f, addresses, r);
|
|
fputs("\n", f);
|
|
}
|
|
|
|
r = sd_dhcp_lease_get_domainname(lease, &string);
|
|
if (r >= 0)
|
|
fprintf(f, "DOMAINNAME=%s\n", string);
|
|
|
|
r = sd_dhcp_lease_get_search_domains(lease, &search_domains);
|
|
if (r > 0) {
|
|
fputs("DOMAIN_SEARCH_LIST=", f);
|
|
fputstrv(f, search_domains, NULL, NULL);
|
|
fputs("\n", f);
|
|
}
|
|
|
|
r = sd_dhcp_lease_get_hostname(lease, &string);
|
|
if (r >= 0)
|
|
fprintf(f, "HOSTNAME=%s\n", string);
|
|
|
|
r = sd_dhcp_lease_get_root_path(lease, &string);
|
|
if (r >= 0)
|
|
fprintf(f, "ROOT_PATH=%s\n", string);
|
|
|
|
r = sd_dhcp_lease_get_routes(lease, &routes);
|
|
if (r > 0)
|
|
serialize_dhcp_routes(f, "ROUTES", routes, r);
|
|
|
|
r = sd_dhcp_lease_get_timezone(lease, &string);
|
|
if (r >= 0)
|
|
fprintf(f, "TIMEZONE=%s\n", string);
|
|
|
|
r = sd_dhcp_lease_get_client_id(lease, &client_id, &client_id_len);
|
|
if (r >= 0) {
|
|
_cleanup_free_ char *client_id_hex = NULL;
|
|
|
|
client_id_hex = hexmem(client_id, client_id_len);
|
|
if (!client_id_hex) {
|
|
r = -ENOMEM;
|
|
goto fail;
|
|
}
|
|
fprintf(f, "CLIENTID=%s\n", client_id_hex);
|
|
}
|
|
|
|
r = sd_dhcp_lease_get_vendor_specific(lease, &data, &data_len);
|
|
if (r >= 0) {
|
|
_cleanup_free_ char *option_hex = NULL;
|
|
|
|
option_hex = hexmem(data, data_len);
|
|
if (!option_hex) {
|
|
r = -ENOMEM;
|
|
goto fail;
|
|
}
|
|
fprintf(f, "VENDOR_SPECIFIC=%s\n", option_hex);
|
|
}
|
|
|
|
LIST_FOREACH(options, option, lease->private_options) {
|
|
char key[STRLEN("OPTION_000")+1];
|
|
|
|
xsprintf(key, "OPTION_%" PRIu8, option->tag);
|
|
r = serialize_dhcp_option(f, key, option->data, option->length);
|
|
if (r < 0)
|
|
goto fail;
|
|
}
|
|
|
|
r = fflush_and_check(f);
|
|
if (r < 0)
|
|
goto fail;
|
|
|
|
if (rename(temp_path, lease_file) < 0) {
|
|
r = -errno;
|
|
goto fail;
|
|
}
|
|
|
|
return 0;
|
|
|
|
fail:
|
|
if (temp_path)
|
|
(void) unlink(temp_path);
|
|
|
|
return log_error_errno(r, "Failed to save lease data %s: %m", lease_file);
|
|
}
|
|
|
|
int dhcp_lease_load(sd_dhcp_lease **ret, const char *lease_file) {
|
|
|
|
_cleanup_(sd_dhcp_lease_unrefp) sd_dhcp_lease *lease = NULL;
|
|
_cleanup_free_ char
|
|
*address = NULL,
|
|
*router = NULL,
|
|
*netmask = NULL,
|
|
*server_address = NULL,
|
|
*next_server = NULL,
|
|
*broadcast = NULL,
|
|
*dns = NULL,
|
|
*ntp = NULL,
|
|
*mtu = NULL,
|
|
*routes = NULL,
|
|
*domains = NULL,
|
|
*client_id_hex = NULL,
|
|
*vendor_specific_hex = NULL,
|
|
*lifetime = NULL,
|
|
*t1 = NULL,
|
|
*t2 = NULL,
|
|
*options[SD_DHCP_OPTION_PRIVATE_LAST - SD_DHCP_OPTION_PRIVATE_BASE + 1] = {};
|
|
|
|
int r, i;
|
|
|
|
assert(lease_file);
|
|
assert(ret);
|
|
|
|
r = dhcp_lease_new(&lease);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
r = parse_env_file(lease_file, NEWLINE,
|
|
"ADDRESS", &address,
|
|
"ROUTER", &router,
|
|
"NETMASK", &netmask,
|
|
"SERVER_IDENTIFIER", &server_address,
|
|
"NEXT_SERVER", &next_server,
|
|
"BROADCAST", &broadcast,
|
|
"DNS", &dns,
|
|
"NTP", &ntp,
|
|
"MTU", &mtu,
|
|
"DOMAINNAME", &lease->domainname,
|
|
"HOSTNAME", &lease->hostname,
|
|
"DOMAIN_SEARCH_LIST", &domains,
|
|
"ROOT_PATH", &lease->root_path,
|
|
"ROUTES", &routes,
|
|
"CLIENTID", &client_id_hex,
|
|
"TIMEZONE", &lease->timezone,
|
|
"VENDOR_SPECIFIC", &vendor_specific_hex,
|
|
"LIFETIME", &lifetime,
|
|
"T1", &t1,
|
|
"T2", &t2,
|
|
"OPTION_224", &options[0],
|
|
"OPTION_225", &options[1],
|
|
"OPTION_226", &options[2],
|
|
"OPTION_227", &options[3],
|
|
"OPTION_228", &options[4],
|
|
"OPTION_229", &options[5],
|
|
"OPTION_230", &options[6],
|
|
"OPTION_231", &options[7],
|
|
"OPTION_232", &options[8],
|
|
"OPTION_233", &options[9],
|
|
"OPTION_234", &options[10],
|
|
"OPTION_235", &options[11],
|
|
"OPTION_236", &options[12],
|
|
"OPTION_237", &options[13],
|
|
"OPTION_238", &options[14],
|
|
"OPTION_239", &options[15],
|
|
"OPTION_240", &options[16],
|
|
"OPTION_241", &options[17],
|
|
"OPTION_242", &options[18],
|
|
"OPTION_243", &options[19],
|
|
"OPTION_244", &options[20],
|
|
"OPTION_245", &options[21],
|
|
"OPTION_246", &options[22],
|
|
"OPTION_247", &options[23],
|
|
"OPTION_248", &options[24],
|
|
"OPTION_249", &options[25],
|
|
"OPTION_250", &options[26],
|
|
"OPTION_251", &options[27],
|
|
"OPTION_252", &options[28],
|
|
"OPTION_253", &options[29],
|
|
"OPTION_254", &options[30],
|
|
NULL);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
if (address) {
|
|
r = inet_pton(AF_INET, address, &lease->address);
|
|
if (r <= 0)
|
|
log_debug("Failed to parse address %s, ignoring.", address);
|
|
}
|
|
|
|
if (router) {
|
|
r = inet_pton(AF_INET, router, &lease->router);
|
|
if (r <= 0)
|
|
log_debug("Failed to parse router %s, ignoring.", router);
|
|
}
|
|
|
|
if (netmask) {
|
|
r = inet_pton(AF_INET, netmask, &lease->subnet_mask);
|
|
if (r <= 0)
|
|
log_debug("Failed to parse netmask %s, ignoring.", netmask);
|
|
else
|
|
lease->have_subnet_mask = true;
|
|
}
|
|
|
|
if (server_address) {
|
|
r = inet_pton(AF_INET, server_address, &lease->server_address);
|
|
if (r <= 0)
|
|
log_debug("Failed to parse server address %s, ignoring.", server_address);
|
|
}
|
|
|
|
if (next_server) {
|
|
r = inet_pton(AF_INET, next_server, &lease->next_server);
|
|
if (r <= 0)
|
|
log_debug("Failed to parse next server %s, ignoring.", next_server);
|
|
}
|
|
|
|
if (broadcast) {
|
|
r = inet_pton(AF_INET, broadcast, &lease->broadcast);
|
|
if (r <= 0)
|
|
log_debug("Failed to parse broadcast address %s, ignoring.", broadcast);
|
|
else
|
|
lease->have_broadcast = true;
|
|
}
|
|
|
|
if (dns) {
|
|
r = deserialize_in_addrs(&lease->dns, dns);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to deserialize DNS servers %s, ignoring: %m", dns);
|
|
else
|
|
lease->dns_size = r;
|
|
}
|
|
|
|
if (ntp) {
|
|
r = deserialize_in_addrs(&lease->ntp, ntp);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to deserialize NTP servers %s, ignoring: %m", ntp);
|
|
else
|
|
lease->ntp_size = r;
|
|
}
|
|
|
|
if (mtu) {
|
|
r = safe_atou16(mtu, &lease->mtu);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse MTU %s, ignoring: %m", mtu);
|
|
}
|
|
|
|
if (domains) {
|
|
_cleanup_strv_free_ char **a = NULL;
|
|
a = strv_split(domains, " ");
|
|
if (!a)
|
|
return -ENOMEM;
|
|
|
|
if (!strv_isempty(a)) {
|
|
lease->search_domains = a;
|
|
a = NULL;
|
|
}
|
|
}
|
|
|
|
if (routes) {
|
|
r = deserialize_dhcp_routes(
|
|
&lease->static_route,
|
|
&lease->static_route_size,
|
|
&lease->static_route_allocated,
|
|
routes);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse DHCP routes %s, ignoring: %m", routes);
|
|
}
|
|
|
|
if (lifetime) {
|
|
r = safe_atou32(lifetime, &lease->lifetime);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse lifetime %s, ignoring: %m", lifetime);
|
|
}
|
|
|
|
if (t1) {
|
|
r = safe_atou32(t1, &lease->t1);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse T1 %s, ignoring: %m", t1);
|
|
}
|
|
|
|
if (t2) {
|
|
r = safe_atou32(t2, &lease->t2);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse T2 %s, ignoring: %m", t2);
|
|
}
|
|
|
|
if (client_id_hex) {
|
|
r = deserialize_dhcp_option(&lease->client_id, &lease->client_id_len, client_id_hex);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse client ID %s, ignoring: %m", client_id_hex);
|
|
}
|
|
|
|
if (vendor_specific_hex) {
|
|
r = deserialize_dhcp_option(&lease->vendor_specific, &lease->vendor_specific_len, vendor_specific_hex);
|
|
if (r < 0)
|
|
log_debug_errno(r, "Failed to parse vendor specific data %s, ignoring: %m", vendor_specific_hex);
|
|
}
|
|
|
|
for (i = 0; i <= SD_DHCP_OPTION_PRIVATE_LAST - SD_DHCP_OPTION_PRIVATE_BASE; i++) {
|
|
_cleanup_free_ void *data = NULL;
|
|
size_t len;
|
|
|
|
if (!options[i])
|
|
continue;
|
|
|
|
r = deserialize_dhcp_option(&data, &len, options[i]);
|
|
if (r < 0) {
|
|
log_debug_errno(r, "Failed to parse private DHCP option %s, ignoring: %m", options[i]);
|
|
continue;
|
|
}
|
|
|
|
r = dhcp_lease_insert_private_option(lease, SD_DHCP_OPTION_PRIVATE_BASE + i, data, len);
|
|
if (r < 0)
|
|
return r;
|
|
}
|
|
|
|
*ret = lease;
|
|
lease = NULL;
|
|
|
|
return 0;
|
|
}
|
|
|
|
int dhcp_lease_set_default_subnet_mask(sd_dhcp_lease *lease) {
|
|
struct in_addr address, mask;
|
|
int r;
|
|
|
|
assert(lease);
|
|
|
|
if (lease->address == 0)
|
|
return -ENODATA;
|
|
|
|
address.s_addr = lease->address;
|
|
|
|
/* fall back to the default subnet masks based on address class */
|
|
r = in4_addr_default_subnet_mask(&address, &mask);
|
|
if (r < 0)
|
|
return r;
|
|
|
|
lease->subnet_mask = mask.s_addr;
|
|
lease->have_subnet_mask = true;
|
|
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_client_id(sd_dhcp_lease *lease, const void **client_id, size_t *client_id_len) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(client_id, -EINVAL);
|
|
assert_return(client_id_len, -EINVAL);
|
|
|
|
if (!lease->client_id)
|
|
return -ENODATA;
|
|
|
|
*client_id = lease->client_id;
|
|
*client_id_len = lease->client_id_len;
|
|
|
|
return 0;
|
|
}
|
|
|
|
int dhcp_lease_set_client_id(sd_dhcp_lease *lease, const void *client_id, size_t client_id_len) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(client_id || client_id_len <= 0, -EINVAL);
|
|
|
|
if (client_id_len <= 0)
|
|
lease->client_id = mfree(lease->client_id);
|
|
else {
|
|
void *p;
|
|
|
|
p = memdup(client_id, client_id_len);
|
|
if (!p)
|
|
return -ENOMEM;
|
|
|
|
free(lease->client_id);
|
|
lease->client_id = p;
|
|
lease->client_id_len = client_id_len;
|
|
}
|
|
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_lease_get_timezone(sd_dhcp_lease *lease, const char **tz) {
|
|
assert_return(lease, -EINVAL);
|
|
assert_return(tz, -EINVAL);
|
|
|
|
if (!lease->timezone)
|
|
return -ENODATA;
|
|
|
|
*tz = lease->timezone;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_route_get_destination(sd_dhcp_route *route, struct in_addr *destination) {
|
|
assert_return(route, -EINVAL);
|
|
assert_return(destination, -EINVAL);
|
|
|
|
*destination = route->dst_addr;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_route_get_destination_prefix_length(sd_dhcp_route *route, uint8_t *length) {
|
|
assert_return(route, -EINVAL);
|
|
assert_return(length, -EINVAL);
|
|
|
|
*length = route->dst_prefixlen;
|
|
return 0;
|
|
}
|
|
|
|
int sd_dhcp_route_get_gateway(sd_dhcp_route *route, struct in_addr *gateway) {
|
|
assert_return(route, -EINVAL);
|
|
assert_return(gateway, -EINVAL);
|
|
|
|
*gateway = route->gw_addr;
|
|
return 0;
|
|
}
|