1 /* SPDX-License-Identifier: LGPL-2.1-or-later */
3 Copyright © 2013 Intel Corporation. All rights reserved.
10 #include <sys/types.h>
13 #include "sd-dhcp-lease.h"
15 #include "alloc-util.h"
16 #include "dhcp-lease-internal.h"
17 #include "dhcp-protocol.h"
18 #include "dns-domain.h"
23 #include "hexdecoct.h"
24 #include "hostname-util.h"
25 #include "in-addr-util.h"
26 #include "network-internal.h"
27 #include "parse-util.h"
28 #include "stdio-util.h"
29 #include "string-util.h"
31 #include "tmpfile-util.h"
32 #include "unaligned.h"
34 int sd_dhcp_lease_get_address(sd_dhcp_lease
*lease
, struct in_addr
*addr
) {
35 assert_return(lease
, -EINVAL
);
36 assert_return(addr
, -EINVAL
);
38 if (lease
->address
== 0)
41 addr
->s_addr
= lease
->address
;
45 int sd_dhcp_lease_get_broadcast(sd_dhcp_lease
*lease
, struct in_addr
*addr
) {
46 assert_return(lease
, -EINVAL
);
47 assert_return(addr
, -EINVAL
);
49 if (!lease
->have_broadcast
)
52 addr
->s_addr
= lease
->broadcast
;
56 int sd_dhcp_lease_get_lifetime(sd_dhcp_lease
*lease
, uint32_t *lifetime
) {
57 assert_return(lease
, -EINVAL
);
58 assert_return(lifetime
, -EINVAL
);
60 if (lease
->lifetime
<= 0)
63 *lifetime
= lease
->lifetime
;
67 int sd_dhcp_lease_get_t1(sd_dhcp_lease
*lease
, uint32_t *t1
) {
68 assert_return(lease
, -EINVAL
);
69 assert_return(t1
, -EINVAL
);
78 int sd_dhcp_lease_get_t2(sd_dhcp_lease
*lease
, uint32_t *t2
) {
79 assert_return(lease
, -EINVAL
);
80 assert_return(t2
, -EINVAL
);
89 int sd_dhcp_lease_get_mtu(sd_dhcp_lease
*lease
, uint16_t *mtu
) {
90 assert_return(lease
, -EINVAL
);
91 assert_return(mtu
, -EINVAL
);
100 int sd_dhcp_lease_get_servers(
101 sd_dhcp_lease
*lease
,
102 sd_dhcp_lease_server_type_t what
,
103 const struct in_addr
**addr
) {
105 assert_return(lease
, -EINVAL
);
106 assert_return(what
>= 0, -EINVAL
);
107 assert_return(what
< _SD_DHCP_LEASE_SERVER_TYPE_MAX
, -EINVAL
);
109 if (lease
->servers
[what
].size
<= 0)
113 *addr
= lease
->servers
[what
].addr
;
115 return (int) lease
->servers
[what
].size
;
118 int sd_dhcp_lease_get_dns(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
119 return sd_dhcp_lease_get_servers(lease
, SD_DHCP_LEASE_DNS
, addr
);
121 int sd_dhcp_lease_get_ntp(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
122 return sd_dhcp_lease_get_servers(lease
, SD_DHCP_LEASE_NTP
, addr
);
124 int sd_dhcp_lease_get_sip(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
125 return sd_dhcp_lease_get_servers(lease
, SD_DHCP_LEASE_SIP
, addr
);
127 int sd_dhcp_lease_get_pop3(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
128 return sd_dhcp_lease_get_servers(lease
, SD_DHCP_LEASE_POP3
, addr
);
130 int sd_dhcp_lease_get_smtp(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
131 return sd_dhcp_lease_get_servers(lease
, SD_DHCP_LEASE_SMTP
, addr
);
133 int sd_dhcp_lease_get_lpr(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
134 return sd_dhcp_lease_get_servers(lease
, SD_DHCP_LEASE_LPR
, addr
);
137 int sd_dhcp_lease_get_domainname(sd_dhcp_lease
*lease
, const char **domainname
) {
138 assert_return(lease
, -EINVAL
);
139 assert_return(domainname
, -EINVAL
);
141 if (!lease
->domainname
)
144 *domainname
= lease
->domainname
;
148 int sd_dhcp_lease_get_hostname(sd_dhcp_lease
*lease
, const char **hostname
) {
149 assert_return(lease
, -EINVAL
);
150 assert_return(hostname
, -EINVAL
);
152 if (!lease
->hostname
)
155 *hostname
= lease
->hostname
;
159 int sd_dhcp_lease_get_root_path(sd_dhcp_lease
*lease
, const char **root_path
) {
160 assert_return(lease
, -EINVAL
);
161 assert_return(root_path
, -EINVAL
);
163 if (!lease
->root_path
)
166 *root_path
= lease
->root_path
;
170 int sd_dhcp_lease_get_router(sd_dhcp_lease
*lease
, const struct in_addr
**addr
) {
171 assert_return(lease
, -EINVAL
);
172 assert_return(addr
, -EINVAL
);
174 if (lease
->router_size
<= 0)
177 *addr
= lease
->router
;
178 return (int) lease
->router_size
;
181 int sd_dhcp_lease_get_netmask(sd_dhcp_lease
*lease
, struct in_addr
*addr
) {
182 assert_return(lease
, -EINVAL
);
183 assert_return(addr
, -EINVAL
);
185 if (!lease
->have_subnet_mask
)
188 addr
->s_addr
= lease
->subnet_mask
;
192 int sd_dhcp_lease_get_server_identifier(sd_dhcp_lease
*lease
, struct in_addr
*addr
) {
193 assert_return(lease
, -EINVAL
);
194 assert_return(addr
, -EINVAL
);
196 if (lease
->server_address
== 0)
199 addr
->s_addr
= lease
->server_address
;
203 int sd_dhcp_lease_get_next_server(sd_dhcp_lease
*lease
, struct in_addr
*addr
) {
204 assert_return(lease
, -EINVAL
);
205 assert_return(addr
, -EINVAL
);
207 if (lease
->next_server
== 0)
210 addr
->s_addr
= lease
->next_server
;
215 * The returned routes array must be freed by the caller.
216 * Route objects have the same lifetime of the lease and must not be freed.
218 static int dhcp_lease_get_routes(sd_dhcp_route
*routes
, size_t n_routes
, sd_dhcp_route
***ret
) {
219 assert(routes
|| n_routes
== 0);
227 buf
= new(sd_dhcp_route
*, n_routes
);
231 for (size_t i
= 0; i
< n_routes
; i
++)
237 return (int) n_routes
;
240 int sd_dhcp_lease_get_static_routes(sd_dhcp_lease
*lease
, sd_dhcp_route
***ret
) {
241 assert_return(lease
, -EINVAL
);
243 return dhcp_lease_get_routes(lease
->static_routes
, lease
->n_static_routes
, ret
);
246 int sd_dhcp_lease_get_classless_routes(sd_dhcp_lease
*lease
, sd_dhcp_route
***ret
) {
247 assert_return(lease
, -EINVAL
);
249 return dhcp_lease_get_routes(lease
->classless_routes
, lease
->n_classless_routes
, ret
);
252 int sd_dhcp_lease_get_search_domains(sd_dhcp_lease
*lease
, char ***domains
) {
255 assert_return(lease
, -EINVAL
);
256 assert_return(domains
, -EINVAL
);
258 r
= strv_length(lease
->search_domains
);
260 *domains
= lease
->search_domains
;
267 int sd_dhcp_lease_get_6rd(
268 sd_dhcp_lease
*lease
,
269 uint8_t *ret_ipv4masklen
,
270 uint8_t *ret_prefixlen
,
271 struct in6_addr
*ret_prefix
,
272 const struct in_addr
**ret_br_addresses
,
273 size_t *ret_n_br_addresses
) {
275 assert_return(lease
, -EINVAL
);
277 if (lease
->sixrd_n_br_addresses
<= 0)
281 *ret_ipv4masklen
= lease
->sixrd_ipv4masklen
;
283 *ret_prefixlen
= lease
->sixrd_prefixlen
;
285 *ret_prefix
= lease
->sixrd_prefix
;
286 if (ret_br_addresses
)
287 *ret_br_addresses
= lease
->sixrd_br_addresses
;
288 if (ret_n_br_addresses
)
289 *ret_n_br_addresses
= lease
->sixrd_n_br_addresses
;
294 int sd_dhcp_lease_get_vendor_specific(sd_dhcp_lease
*lease
, const void **data
, size_t *data_len
) {
295 assert_return(lease
, -EINVAL
);
296 assert_return(data
, -EINVAL
);
297 assert_return(data_len
, -EINVAL
);
299 if (lease
->vendor_specific_len
<= 0)
302 *data
= lease
->vendor_specific
;
303 *data_len
= lease
->vendor_specific_len
;
307 static sd_dhcp_lease
*dhcp_lease_free(sd_dhcp_lease
*lease
) {
310 while (lease
->private_options
) {
311 struct sd_dhcp_raw_option
*option
= lease
->private_options
;
313 LIST_REMOVE(options
, lease
->private_options
, option
);
319 free(lease
->root_path
);
321 free(lease
->timezone
);
322 free(lease
->hostname
);
323 free(lease
->domainname
);
325 for (sd_dhcp_lease_server_type_t i
= 0; i
< _SD_DHCP_LEASE_SERVER_TYPE_MAX
; i
++)
326 free(lease
->servers
[i
].addr
);
328 free(lease
->static_routes
);
329 free(lease
->classless_routes
);
330 free(lease
->client_id
);
331 free(lease
->vendor_specific
);
332 strv_free(lease
->search_domains
);
333 free(lease
->sixrd_br_addresses
);
337 DEFINE_TRIVIAL_REF_UNREF_FUNC(sd_dhcp_lease
, sd_dhcp_lease
, dhcp_lease_free
);
339 static int lease_parse_u32(const uint8_t *option
, size_t len
, uint32_t *ret
, uint32_t min
) {
346 *ret
= unaligned_read_be32((be32_t
*) option
);
353 static int lease_parse_u16(const uint8_t *option
, size_t len
, uint16_t *ret
, uint16_t min
) {
360 *ret
= unaligned_read_be16((be16_t
*) option
);
367 static int lease_parse_be32(const uint8_t *option
, size_t len
, be32_t
*ret
) {
374 memcpy(ret
, option
, 4);
378 static int lease_parse_string(const uint8_t *option
, size_t len
, char **ret
) {
388 * One trailing NUL byte is OK, we don't mind. See:
389 * https://github.com/systemd/systemd/issues/1337
391 if (memchr(option
, 0, len
- 1))
394 string
= memdup_suffix0((const char *) option
, len
);
398 free_and_replace(*ret
, string
);
404 static int lease_parse_domain(const uint8_t *option
, size_t len
, char **ret
) {
405 _cleanup_free_
char *name
= NULL
, *normalized
= NULL
;
411 r
= lease_parse_string(option
, len
, &name
);
419 r
= dns_name_normalize(name
, 0, &normalized
);
423 if (is_localhost(normalized
))
426 if (dns_name_is_root(normalized
))
429 free_and_replace(*ret
, normalized
);
434 static int lease_parse_in_addrs(const uint8_t *option
, size_t len
, struct in_addr
**ret
, size_t *n_ret
) {
435 assert(option
|| len
== 0);
444 struct in_addr
*addresses
;
449 n_addresses
= len
/ 4;
451 addresses
= newdup(struct in_addr
, option
, n_addresses
);
457 *n_ret
= n_addresses
;
463 static int lease_parse_sip_server(const uint8_t *option
, size_t len
, struct in_addr
**ret
, size_t *n_ret
) {
464 assert(option
|| len
== 0);
471 /* The SIP record is like the other, regular server records, but prefixed with a single "encoding"
472 * byte that is either 0 or 1. We only support it to be 1 for now. Let's drop it and parse it like
473 * the other fields */
475 if (option
[0] != 1) { /* We only support IP address encoding for now */
481 return lease_parse_in_addrs(option
+ 1, len
- 1, ret
, n_ret
);
484 static int lease_parse_static_routes(sd_dhcp_lease
*lease
, const uint8_t *option
, size_t len
) {
488 assert(option
|| len
<= 0);
494 struct in_addr dst
, gw
;
497 assert_se(lease_parse_be32(option
, 4, &dst
.s_addr
) >= 0);
500 assert_se(lease_parse_be32(option
, 4, &gw
.s_addr
) >= 0);
505 r
= in4_addr_default_prefixlen(&dst
, &prefixlen
);
507 log_debug("sd-dhcp-lease: cannot determine class of received static route, ignoring.");
511 (void) in4_addr_mask(&dst
, prefixlen
);
513 if (!GREEDY_REALLOC(lease
->static_routes
, lease
->n_static_routes
+ 1))
516 lease
->static_routes
[lease
->n_static_routes
++] = (struct sd_dhcp_route
) {
519 .dst_prefixlen
= prefixlen
,
526 /* parses RFC3442 Classless Static Route Option */
527 static int lease_parse_classless_routes(sd_dhcp_lease
*lease
, const uint8_t *option
, size_t len
) {
529 assert(option
|| len
<= 0);
531 /* option format: (subnet-mask-width significant-subnet-octets gateway-ip) */
534 uint8_t prefixlen
, dst_octets
;
535 struct in_addr dst
= {}, gw
;
541 dst_octets
= DIV_ROUND_UP(prefixlen
, 8);
543 /* can't have more than 4 octets in IPv4 */
544 if (dst_octets
> 4 || len
< dst_octets
)
547 memcpy(&dst
, option
, dst_octets
);
548 option
+= dst_octets
;
554 assert_se(lease_parse_be32(option
, 4, &gw
.s_addr
) >= 0);
558 if (!GREEDY_REALLOC(lease
->classless_routes
, lease
->n_classless_routes
+ 1))
561 lease
->classless_routes
[lease
->n_classless_routes
++] = (struct sd_dhcp_route
) {
564 .dst_prefixlen
= prefixlen
,
571 static int lease_parse_6rd(sd_dhcp_lease
*lease
, const uint8_t *option
, size_t len
) {
572 uint8_t ipv4masklen
, prefixlen
;
573 struct in6_addr prefix
;
574 _cleanup_free_
struct in_addr
*br_addresses
= NULL
;
575 size_t n_br_addresses
;
580 /* See RFC 5969 Section 7.1.1 */
582 if (lease
->sixrd_n_br_addresses
> 0)
583 /* Multiple 6rd option?? */
586 /* option-length: The length of the DHCP option in octets (22 octets with one BR IPv4 address). */
587 if (len
< 2 + sizeof(struct in6_addr
) + sizeof(struct in_addr
) ||
588 (len
- 2 - sizeof(struct in6_addr
)) % sizeof(struct in_addr
) != 0)
591 /* IPv4MaskLen: The number of high-order bits that are identical across all CE IPv4 addresses
592 * within a given 6rd domain. This may be any value between 0 and 32. Any value
593 * greater than 32 is invalid. */
594 ipv4masklen
= option
[0];
595 if (ipv4masklen
> 32)
598 /* 6rdPrefixLen: The IPv6 prefix length of the SP's 6rd IPv6 prefix in number of bits. For the
599 * purpose of bounds checking by DHCP option processing, the sum of
600 * (32 - IPv4MaskLen) + 6rdPrefixLen MUST be less than or equal to 128. */
601 prefixlen
= option
[1];
602 if (32 - ipv4masklen
+ prefixlen
> 128)
605 /* 6rdPrefix: The service provider's 6rd IPv6 prefix represented as a 16-octet IPv6 address.
606 * The bits in the prefix after the 6rdPrefixlen number of bits are reserved and
607 * MUST be initialized to zero by the sender and ignored by the receiver. */
608 memcpy(&prefix
, option
+ 2, sizeof(struct in6_addr
));
609 (void) in6_addr_mask(&prefix
, prefixlen
);
611 /* 6rdBRIPv4Address: One or more IPv4 addresses of the 6rd Border Relay(s) for a given 6rd domain. */
612 n_br_addresses
= (len
- 2 - sizeof(struct in6_addr
)) / sizeof(struct in_addr
);
613 br_addresses
= newdup(struct in_addr
, option
+ 2 + sizeof(struct in6_addr
), n_br_addresses
);
617 lease
->sixrd_ipv4masklen
= ipv4masklen
;
618 lease
->sixrd_prefixlen
= prefixlen
;
619 lease
->sixrd_prefix
= prefix
;
620 lease
->sixrd_br_addresses
= TAKE_PTR(br_addresses
);
621 lease
->sixrd_n_br_addresses
= n_br_addresses
;
626 int dhcp_lease_parse_options(uint8_t code
, uint8_t len
, const void *option
, void *userdata
) {
627 sd_dhcp_lease
*lease
= ASSERT_PTR(userdata
);
632 case SD_DHCP_OPTION_IP_ADDRESS_LEASE_TIME
:
633 r
= lease_parse_u32(option
, len
, &lease
->lifetime
, 1);
635 log_debug_errno(r
, "Failed to parse lease time, ignoring: %m");
639 case SD_DHCP_OPTION_SERVER_IDENTIFIER
:
640 r
= lease_parse_be32(option
, len
, &lease
->server_address
);
642 log_debug_errno(r
, "Failed to parse server identifier, ignoring: %m");
646 case SD_DHCP_OPTION_SUBNET_MASK
:
647 r
= lease_parse_be32(option
, len
, &lease
->subnet_mask
);
649 log_debug_errno(r
, "Failed to parse subnet mask, ignoring: %m");
651 lease
->have_subnet_mask
= true;
654 case SD_DHCP_OPTION_BROADCAST
:
655 r
= lease_parse_be32(option
, len
, &lease
->broadcast
);
657 log_debug_errno(r
, "Failed to parse broadcast address, ignoring: %m");
659 lease
->have_broadcast
= true;
662 case SD_DHCP_OPTION_ROUTER
:
663 r
= lease_parse_in_addrs(option
, len
, &lease
->router
, &lease
->router_size
);
665 log_debug_errno(r
, "Failed to parse router addresses, ignoring: %m");
668 case SD_DHCP_OPTION_DOMAIN_NAME_SERVER
:
669 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_DNS
].addr
, &lease
->servers
[SD_DHCP_LEASE_DNS
].size
);
671 log_debug_errno(r
, "Failed to parse DNS server, ignoring: %m");
674 case SD_DHCP_OPTION_NTP_SERVER
:
675 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_NTP
].addr
, &lease
->servers
[SD_DHCP_LEASE_NTP
].size
);
677 log_debug_errno(r
, "Failed to parse NTP server, ignoring: %m");
680 case SD_DHCP_OPTION_SIP_SERVER
:
681 r
= lease_parse_sip_server(option
, len
, &lease
->servers
[SD_DHCP_LEASE_SIP
].addr
, &lease
->servers
[SD_DHCP_LEASE_SIP
].size
);
683 log_debug_errno(r
, "Failed to parse SIP server, ignoring: %m");
686 case SD_DHCP_OPTION_POP3_SERVER
:
687 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_POP3
].addr
, &lease
->servers
[SD_DHCP_LEASE_POP3
].size
);
689 log_debug_errno(r
, "Failed to parse POP3 server, ignoring: %m");
692 case SD_DHCP_OPTION_SMTP_SERVER
:
693 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_SMTP
].addr
, &lease
->servers
[SD_DHCP_LEASE_SMTP
].size
);
695 log_debug_errno(r
, "Failed to parse SMTP server, ignoring: %m");
698 case SD_DHCP_OPTION_LPR_SERVER
:
699 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_LPR
].addr
, &lease
->servers
[SD_DHCP_LEASE_LPR
].size
);
701 log_debug_errno(r
, "Failed to parse LPR server, ignoring: %m");
704 case SD_DHCP_OPTION_STATIC_ROUTE
:
705 r
= lease_parse_static_routes(lease
, option
, len
);
707 log_debug_errno(r
, "Failed to parse static routes, ignoring: %m");
710 case SD_DHCP_OPTION_MTU_INTERFACE
:
711 r
= lease_parse_u16(option
, len
, &lease
->mtu
, 68);
713 log_debug_errno(r
, "Failed to parse MTU, ignoring: %m");
714 if (lease
->mtu
< DHCP_MIN_PACKET_SIZE
) {
715 log_debug("MTU value of %" PRIu16
" too small. Using default MTU value of %d instead.", lease
->mtu
, DHCP_MIN_PACKET_SIZE
);
716 lease
->mtu
= DHCP_MIN_PACKET_SIZE
;
721 case SD_DHCP_OPTION_DOMAIN_NAME
:
722 r
= lease_parse_domain(option
, len
, &lease
->domainname
);
724 log_debug_errno(r
, "Failed to parse domain name, ignoring: %m");
730 case SD_DHCP_OPTION_DOMAIN_SEARCH
:
731 r
= dhcp_lease_parse_search_domains(option
, len
, &lease
->search_domains
);
733 log_debug_errno(r
, "Failed to parse Domain Search List, ignoring: %m");
736 case SD_DHCP_OPTION_HOST_NAME
:
737 r
= lease_parse_domain(option
, len
, &lease
->hostname
);
739 log_debug_errno(r
, "Failed to parse hostname, ignoring: %m");
745 case SD_DHCP_OPTION_ROOT_PATH
:
746 r
= lease_parse_string(option
, len
, &lease
->root_path
);
748 log_debug_errno(r
, "Failed to parse root path, ignoring: %m");
751 case SD_DHCP_OPTION_RENEWAL_TIME
:
752 r
= lease_parse_u32(option
, len
, &lease
->t1
, 1);
754 log_debug_errno(r
, "Failed to parse T1 time, ignoring: %m");
757 case SD_DHCP_OPTION_REBINDING_TIME
:
758 r
= lease_parse_u32(option
, len
, &lease
->t2
, 1);
760 log_debug_errno(r
, "Failed to parse T2 time, ignoring: %m");
763 case SD_DHCP_OPTION_CLASSLESS_STATIC_ROUTE
:
764 r
= lease_parse_classless_routes(lease
, option
, len
);
766 log_debug_errno(r
, "Failed to parse classless routes, ignoring: %m");
769 case SD_DHCP_OPTION_TZDB_TIMEZONE
: {
770 _cleanup_free_
char *tz
= NULL
;
772 r
= lease_parse_string(option
, len
, &tz
);
774 log_debug_errno(r
, "Failed to parse timezone option, ignoring: %m");
778 if (!timezone_is_valid(tz
, LOG_DEBUG
)) {
779 log_debug("Timezone is not valid, ignoring.");
783 free_and_replace(lease
->timezone
, tz
);
788 case SD_DHCP_OPTION_VENDOR_SPECIFIC
:
791 lease
->vendor_specific
= mfree(lease
->vendor_specific
);
795 p
= memdup(option
, len
);
799 free(lease
->vendor_specific
);
800 lease
->vendor_specific
= p
;
803 lease
->vendor_specific_len
= len
;
806 case SD_DHCP_OPTION_6RD
:
807 r
= lease_parse_6rd(lease
, option
, len
);
809 log_debug_errno(r
, "Failed to parse 6rd option, ignoring: %m");
812 case SD_DHCP_OPTION_PRIVATE_BASE
... SD_DHCP_OPTION_PRIVATE_LAST
:
813 r
= dhcp_lease_insert_private_option(lease
, code
, option
, len
);
820 log_debug("Ignoring DHCP option %"PRIu8
" while parsing.", code
);
827 /* Parses compressed domain names. */
828 int dhcp_lease_parse_search_domains(const uint8_t *option
, size_t len
, char ***domains
) {
829 _cleanup_strv_free_
char **names
= NULL
;
830 size_t pos
= 0, cnt
= 0;
834 assert_return(option
&& len
> 0, -ENODATA
);
837 _cleanup_free_
char *name
= NULL
;
839 size_t jump_barrier
= pos
, next_chunk
= 0;
849 } else if (c
<= 63) {
853 label
= (const char*) (option
+ pos
);
858 if (!GREEDY_REALLOC(name
, n
+ !first
+ DNS_LABEL_ESCAPED_MAX
))
866 r
= dns_label_escape(label
, c
, name
+ n
, DNS_LABEL_ESCAPED_MAX
);
871 } else if (FLAGS_SET(c
, 0xc0)) {
881 ptr
= (uint16_t) (c
& ~0xc0) << 8 | (uint16_t) d
;
883 /* Jumps are limited to a "prior occurrence" (RFC-1035 4.1.4) */
884 if (ptr
>= jump_barrier
)
888 /* Save current location so we don't end up re-parsing what's parsed so far. */
897 if (!GREEDY_REALLOC(name
, n
+ 1))
901 r
= strv_extend(&names
, name
);
911 strv_free_and_replace(*domains
, names
);
916 int dhcp_lease_insert_private_option(sd_dhcp_lease
*lease
, uint8_t tag
, const void *data
, uint8_t len
) {
917 struct sd_dhcp_raw_option
*option
, *before
= NULL
;
921 LIST_FOREACH(options
, cur
, lease
->private_options
) {
922 if (tag
< cur
->tag
) {
926 if (tag
== cur
->tag
) {
927 log_debug("Ignoring duplicate option, tagged %i.", tag
);
932 option
= new(struct sd_dhcp_raw_option
, 1);
937 option
->length
= len
;
938 option
->data
= memdup(data
, len
);
944 LIST_INSERT_BEFORE(options
, lease
->private_options
, before
, option
);
948 int dhcp_lease_new(sd_dhcp_lease
**ret
) {
949 sd_dhcp_lease
*lease
;
951 lease
= new0(sd_dhcp_lease
, 1);
961 int dhcp_lease_save(sd_dhcp_lease
*lease
, const char *lease_file
) {
962 _cleanup_(unlink_and_freep
) char *temp_path
= NULL
;
963 _cleanup_fclose_
FILE *f
= NULL
;
964 struct in_addr address
;
965 const struct in_addr
*addresses
;
966 const void *client_id
, *data
;
967 size_t client_id_len
, data_len
;
970 _cleanup_free_ sd_dhcp_route
**routes
= NULL
;
971 char **search_domains
;
972 uint32_t t1
, t2
, lifetime
;
978 r
= fopen_temporary(lease_file
, &f
, &temp_path
);
982 (void) fchmod(fileno(f
), 0644);
985 "# This is private data. Do not parse.\n");
987 r
= sd_dhcp_lease_get_address(lease
, &address
);
989 fprintf(f
, "ADDRESS=%s\n", IN4_ADDR_TO_STRING(&address
));
991 r
= sd_dhcp_lease_get_netmask(lease
, &address
);
993 fprintf(f
, "NETMASK=%s\n", IN4_ADDR_TO_STRING(&address
));
995 r
= sd_dhcp_lease_get_router(lease
, &addresses
);
998 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1002 r
= sd_dhcp_lease_get_server_identifier(lease
, &address
);
1004 fprintf(f
, "SERVER_ADDRESS=%s\n", IN4_ADDR_TO_STRING(&address
));
1006 r
= sd_dhcp_lease_get_next_server(lease
, &address
);
1008 fprintf(f
, "NEXT_SERVER=%s\n", IN4_ADDR_TO_STRING(&address
));
1010 r
= sd_dhcp_lease_get_broadcast(lease
, &address
);
1012 fprintf(f
, "BROADCAST=%s\n", IN4_ADDR_TO_STRING(&address
));
1014 r
= sd_dhcp_lease_get_mtu(lease
, &mtu
);
1016 fprintf(f
, "MTU=%" PRIu16
"\n", mtu
);
1018 r
= sd_dhcp_lease_get_t1(lease
, &t1
);
1020 fprintf(f
, "T1=%" PRIu32
"\n", t1
);
1022 r
= sd_dhcp_lease_get_t2(lease
, &t2
);
1024 fprintf(f
, "T2=%" PRIu32
"\n", t2
);
1026 r
= sd_dhcp_lease_get_lifetime(lease
, &lifetime
);
1028 fprintf(f
, "LIFETIME=%" PRIu32
"\n", lifetime
);
1030 r
= sd_dhcp_lease_get_dns(lease
, &addresses
);
1033 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1037 r
= sd_dhcp_lease_get_ntp(lease
, &addresses
);
1040 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1044 r
= sd_dhcp_lease_get_sip(lease
, &addresses
);
1047 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1051 r
= sd_dhcp_lease_get_domainname(lease
, &string
);
1053 fprintf(f
, "DOMAINNAME=%s\n", string
);
1055 r
= sd_dhcp_lease_get_search_domains(lease
, &search_domains
);
1057 fputs("DOMAIN_SEARCH_LIST=", f
);
1058 fputstrv(f
, search_domains
, NULL
, NULL
);
1062 r
= sd_dhcp_lease_get_hostname(lease
, &string
);
1064 fprintf(f
, "HOSTNAME=%s\n", string
);
1066 r
= sd_dhcp_lease_get_root_path(lease
, &string
);
1068 fprintf(f
, "ROOT_PATH=%s\n", string
);
1070 r
= sd_dhcp_lease_get_static_routes(lease
, &routes
);
1072 serialize_dhcp_routes(f
, "STATIC_ROUTES", routes
, r
);
1074 routes
= mfree(routes
);
1075 r
= sd_dhcp_lease_get_classless_routes(lease
, &routes
);
1077 serialize_dhcp_routes(f
, "CLASSLESS_ROUTES", routes
, r
);
1079 r
= sd_dhcp_lease_get_timezone(lease
, &string
);
1081 fprintf(f
, "TIMEZONE=%s\n", string
);
1083 r
= sd_dhcp_lease_get_client_id(lease
, &client_id
, &client_id_len
);
1085 _cleanup_free_
char *client_id_hex
= NULL
;
1087 client_id_hex
= hexmem(client_id
, client_id_len
);
1090 fprintf(f
, "CLIENTID=%s\n", client_id_hex
);
1093 r
= sd_dhcp_lease_get_vendor_specific(lease
, &data
, &data_len
);
1095 _cleanup_free_
char *option_hex
= NULL
;
1097 option_hex
= hexmem(data
, data_len
);
1100 fprintf(f
, "VENDOR_SPECIFIC=%s\n", option_hex
);
1103 LIST_FOREACH(options
, option
, lease
->private_options
) {
1104 char key
[STRLEN("OPTION_000")+1];
1106 xsprintf(key
, "OPTION_%" PRIu8
, option
->tag
);
1107 r
= serialize_dhcp_option(f
, key
, option
->data
, option
->length
);
1112 r
= fflush_and_check(f
);
1116 r
= conservative_rename(temp_path
, lease_file
);
1120 temp_path
= mfree(temp_path
);
1125 static char **private_options_free(char **options
) {
1129 for (unsigned i
= 0; i
< SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
+ 1; i
++)
1132 return mfree(options
);
1135 DEFINE_TRIVIAL_CLEANUP_FUNC(char**, private_options_free
);
1137 int dhcp_lease_load(sd_dhcp_lease
**ret
, const char *lease_file
) {
1138 _cleanup_(sd_dhcp_lease_unrefp
) sd_dhcp_lease
*lease
= NULL
;
1143 *server_address
= NULL
,
1144 *next_server
= NULL
,
1153 *static_routes
= NULL
,
1154 *classless_routes
= NULL
,
1156 *client_id_hex
= NULL
,
1157 *vendor_specific_hex
= NULL
,
1161 _cleanup_(private_options_freep
) char **options
= NULL
;
1168 r
= dhcp_lease_new(&lease
);
1172 options
= new0(char*, SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
+ 1);
1176 r
= parse_env_file(NULL
, lease_file
,
1177 "ADDRESS", &address
,
1179 "NETMASK", &netmask
,
1180 "SERVER_ADDRESS", &server_address
,
1181 "NEXT_SERVER", &next_server
,
1182 "BROADCAST", &broadcast
,
1190 "DOMAINNAME", &lease
->domainname
,
1191 "HOSTNAME", &lease
->hostname
,
1192 "DOMAIN_SEARCH_LIST", &domains
,
1193 "ROOT_PATH", &lease
->root_path
,
1194 "STATIC_ROUTES", &static_routes
,
1195 "CLASSLESS_ROUTES", &classless_routes
,
1196 "CLIENTID", &client_id_hex
,
1197 "TIMEZONE", &lease
->timezone
,
1198 "VENDOR_SPECIFIC", &vendor_specific_hex
,
1199 "LIFETIME", &lifetime
,
1202 "OPTION_224", &options
[0],
1203 "OPTION_225", &options
[1],
1204 "OPTION_226", &options
[2],
1205 "OPTION_227", &options
[3],
1206 "OPTION_228", &options
[4],
1207 "OPTION_229", &options
[5],
1208 "OPTION_230", &options
[6],
1209 "OPTION_231", &options
[7],
1210 "OPTION_232", &options
[8],
1211 "OPTION_233", &options
[9],
1212 "OPTION_234", &options
[10],
1213 "OPTION_235", &options
[11],
1214 "OPTION_236", &options
[12],
1215 "OPTION_237", &options
[13],
1216 "OPTION_238", &options
[14],
1217 "OPTION_239", &options
[15],
1218 "OPTION_240", &options
[16],
1219 "OPTION_241", &options
[17],
1220 "OPTION_242", &options
[18],
1221 "OPTION_243", &options
[19],
1222 "OPTION_244", &options
[20],
1223 "OPTION_245", &options
[21],
1224 "OPTION_246", &options
[22],
1225 "OPTION_247", &options
[23],
1226 "OPTION_248", &options
[24],
1227 "OPTION_249", &options
[25],
1228 "OPTION_250", &options
[26],
1229 "OPTION_251", &options
[27],
1230 "OPTION_252", &options
[28],
1231 "OPTION_253", &options
[29],
1232 "OPTION_254", &options
[30]);
1237 r
= inet_pton(AF_INET
, address
, &lease
->address
);
1239 log_debug("Failed to parse address %s, ignoring.", address
);
1243 r
= deserialize_in_addrs(&lease
->router
, router
);
1245 log_debug_errno(r
, "Failed to deserialize router addresses %s, ignoring: %m", router
);
1247 lease
->router_size
= r
;
1251 r
= inet_pton(AF_INET
, netmask
, &lease
->subnet_mask
);
1253 log_debug("Failed to parse netmask %s, ignoring.", netmask
);
1255 lease
->have_subnet_mask
= true;
1258 if (server_address
) {
1259 r
= inet_pton(AF_INET
, server_address
, &lease
->server_address
);
1261 log_debug("Failed to parse server address %s, ignoring.", server_address
);
1265 r
= inet_pton(AF_INET
, next_server
, &lease
->next_server
);
1267 log_debug("Failed to parse next server %s, ignoring.", next_server
);
1271 r
= inet_pton(AF_INET
, broadcast
, &lease
->broadcast
);
1273 log_debug("Failed to parse broadcast address %s, ignoring.", broadcast
);
1275 lease
->have_broadcast
= true;
1279 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_DNS
].addr
, dns
);
1281 log_debug_errno(r
, "Failed to deserialize DNS servers %s, ignoring: %m", dns
);
1283 lease
->servers
[SD_DHCP_LEASE_DNS
].size
= r
;
1287 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_NTP
].addr
, ntp
);
1289 log_debug_errno(r
, "Failed to deserialize NTP servers %s, ignoring: %m", ntp
);
1291 lease
->servers
[SD_DHCP_LEASE_NTP
].size
= r
;
1295 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_SIP
].addr
, sip
);
1297 log_debug_errno(r
, "Failed to deserialize SIP servers %s, ignoring: %m", sip
);
1299 lease
->servers
[SD_DHCP_LEASE_SIP
].size
= r
;
1303 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_POP3
].addr
, pop3
);
1305 log_debug_errno(r
, "Failed to deserialize POP3 server %s, ignoring: %m", pop3
);
1307 lease
->servers
[SD_DHCP_LEASE_POP3
].size
= r
;
1311 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_SMTP
].addr
, smtp
);
1313 log_debug_errno(r
, "Failed to deserialize SMTP server %s, ignoring: %m", smtp
);
1315 lease
->servers
[SD_DHCP_LEASE_SMTP
].size
= r
;
1319 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_LPR
].addr
, lpr
);
1321 log_debug_errno(r
, "Failed to deserialize LPR server %s, ignoring: %m", lpr
);
1323 lease
->servers
[SD_DHCP_LEASE_LPR
].size
= r
;
1327 r
= safe_atou16(mtu
, &lease
->mtu
);
1329 log_debug_errno(r
, "Failed to parse MTU %s, ignoring: %m", mtu
);
1333 _cleanup_strv_free_
char **a
= NULL
;
1334 a
= strv_split(domains
, " ");
1338 if (!strv_isempty(a
))
1339 lease
->search_domains
= TAKE_PTR(a
);
1342 if (static_routes
) {
1343 r
= deserialize_dhcp_routes(
1344 &lease
->static_routes
,
1345 &lease
->n_static_routes
,
1348 log_debug_errno(r
, "Failed to parse DHCP static routes %s, ignoring: %m", static_routes
);
1351 if (classless_routes
) {
1352 r
= deserialize_dhcp_routes(
1353 &lease
->classless_routes
,
1354 &lease
->n_classless_routes
,
1357 log_debug_errno(r
, "Failed to parse DHCP classless routes %s, ignoring: %m", classless_routes
);
1361 r
= safe_atou32(lifetime
, &lease
->lifetime
);
1363 log_debug_errno(r
, "Failed to parse lifetime %s, ignoring: %m", lifetime
);
1367 r
= safe_atou32(t1
, &lease
->t1
);
1369 log_debug_errno(r
, "Failed to parse T1 %s, ignoring: %m", t1
);
1373 r
= safe_atou32(t2
, &lease
->t2
);
1375 log_debug_errno(r
, "Failed to parse T2 %s, ignoring: %m", t2
);
1378 if (client_id_hex
) {
1379 r
= unhexmem(client_id_hex
, SIZE_MAX
, &lease
->client_id
, &lease
->client_id_len
);
1381 log_debug_errno(r
, "Failed to parse client ID %s, ignoring: %m", client_id_hex
);
1384 if (vendor_specific_hex
) {
1385 r
= unhexmem(vendor_specific_hex
, SIZE_MAX
, &lease
->vendor_specific
, &lease
->vendor_specific_len
);
1387 log_debug_errno(r
, "Failed to parse vendor specific data %s, ignoring: %m", vendor_specific_hex
);
1390 for (i
= 0; i
<= SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
; i
++) {
1391 _cleanup_free_
void *data
= NULL
;
1397 r
= unhexmem(options
[i
], SIZE_MAX
, &data
, &len
);
1399 log_debug_errno(r
, "Failed to parse private DHCP option %s, ignoring: %m", options
[i
]);
1403 r
= dhcp_lease_insert_private_option(lease
, SD_DHCP_OPTION_PRIVATE_BASE
+ i
, data
, len
);
1408 *ret
= TAKE_PTR(lease
);
1413 int dhcp_lease_set_default_subnet_mask(sd_dhcp_lease
*lease
) {
1414 struct in_addr address
, mask
;
1419 if (lease
->address
== 0)
1422 address
.s_addr
= lease
->address
;
1424 /* fall back to the default subnet masks based on address class */
1425 r
= in4_addr_default_subnet_mask(&address
, &mask
);
1429 lease
->subnet_mask
= mask
.s_addr
;
1430 lease
->have_subnet_mask
= true;
1435 int sd_dhcp_lease_get_client_id(sd_dhcp_lease
*lease
, const void **client_id
, size_t *client_id_len
) {
1436 assert_return(lease
, -EINVAL
);
1437 assert_return(client_id
, -EINVAL
);
1438 assert_return(client_id_len
, -EINVAL
);
1440 if (!lease
->client_id
)
1443 *client_id
= lease
->client_id
;
1444 *client_id_len
= lease
->client_id_len
;
1449 int dhcp_lease_set_client_id(sd_dhcp_lease
*lease
, const void *client_id
, size_t client_id_len
) {
1450 assert_return(lease
, -EINVAL
);
1451 assert_return(client_id
|| client_id_len
<= 0, -EINVAL
);
1453 if (client_id_len
<= 0)
1454 lease
->client_id
= mfree(lease
->client_id
);
1458 p
= memdup(client_id
, client_id_len
);
1462 free(lease
->client_id
);
1463 lease
->client_id
= p
;
1464 lease
->client_id_len
= client_id_len
;
1470 int sd_dhcp_lease_get_timezone(sd_dhcp_lease
*lease
, const char **tz
) {
1471 assert_return(lease
, -EINVAL
);
1472 assert_return(tz
, -EINVAL
);
1474 if (!lease
->timezone
)
1477 *tz
= lease
->timezone
;
1481 int sd_dhcp_route_get_destination(sd_dhcp_route
*route
, struct in_addr
*destination
) {
1482 assert_return(route
, -EINVAL
);
1483 assert_return(destination
, -EINVAL
);
1485 *destination
= route
->dst_addr
;
1489 int sd_dhcp_route_get_destination_prefix_length(sd_dhcp_route
*route
, uint8_t *length
) {
1490 assert_return(route
, -EINVAL
);
1491 assert_return(length
, -EINVAL
);
1493 *length
= route
->dst_prefixlen
;
1497 int sd_dhcp_route_get_gateway(sd_dhcp_route
*route
, struct in_addr
*gateway
) {
1498 assert_return(route
, -EINVAL
);
1499 assert_return(gateway
, -EINVAL
);
1501 *gateway
= route
->gw_addr
;