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
= userdata
;
634 case SD_DHCP_OPTION_IP_ADDRESS_LEASE_TIME
:
635 r
= lease_parse_u32(option
, len
, &lease
->lifetime
, 1);
637 log_debug_errno(r
, "Failed to parse lease time, ignoring: %m");
641 case SD_DHCP_OPTION_SERVER_IDENTIFIER
:
642 r
= lease_parse_be32(option
, len
, &lease
->server_address
);
644 log_debug_errno(r
, "Failed to parse server identifier, ignoring: %m");
648 case SD_DHCP_OPTION_SUBNET_MASK
:
649 r
= lease_parse_be32(option
, len
, &lease
->subnet_mask
);
651 log_debug_errno(r
, "Failed to parse subnet mask, ignoring: %m");
653 lease
->have_subnet_mask
= true;
656 case SD_DHCP_OPTION_BROADCAST
:
657 r
= lease_parse_be32(option
, len
, &lease
->broadcast
);
659 log_debug_errno(r
, "Failed to parse broadcast address, ignoring: %m");
661 lease
->have_broadcast
= true;
664 case SD_DHCP_OPTION_ROUTER
:
665 r
= lease_parse_in_addrs(option
, len
, &lease
->router
, &lease
->router_size
);
667 log_debug_errno(r
, "Failed to parse router addresses, ignoring: %m");
670 case SD_DHCP_OPTION_DOMAIN_NAME_SERVER
:
671 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_DNS
].addr
, &lease
->servers
[SD_DHCP_LEASE_DNS
].size
);
673 log_debug_errno(r
, "Failed to parse DNS server, ignoring: %m");
676 case SD_DHCP_OPTION_NTP_SERVER
:
677 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_NTP
].addr
, &lease
->servers
[SD_DHCP_LEASE_NTP
].size
);
679 log_debug_errno(r
, "Failed to parse NTP server, ignoring: %m");
682 case SD_DHCP_OPTION_SIP_SERVER
:
683 r
= lease_parse_sip_server(option
, len
, &lease
->servers
[SD_DHCP_LEASE_SIP
].addr
, &lease
->servers
[SD_DHCP_LEASE_SIP
].size
);
685 log_debug_errno(r
, "Failed to parse SIP server, ignoring: %m");
688 case SD_DHCP_OPTION_POP3_SERVER
:
689 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_POP3
].addr
, &lease
->servers
[SD_DHCP_LEASE_POP3
].size
);
691 log_debug_errno(r
, "Failed to parse POP3 server, ignoring: %m");
694 case SD_DHCP_OPTION_SMTP_SERVER
:
695 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_SMTP
].addr
, &lease
->servers
[SD_DHCP_LEASE_SMTP
].size
);
697 log_debug_errno(r
, "Failed to parse SMTP server, ignoring: %m");
700 case SD_DHCP_OPTION_LPR_SERVER
:
701 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_LPR
].addr
, &lease
->servers
[SD_DHCP_LEASE_LPR
].size
);
703 log_debug_errno(r
, "Failed to parse LPR server, ignoring: %m");
706 case SD_DHCP_OPTION_STATIC_ROUTE
:
707 r
= lease_parse_static_routes(lease
, option
, len
);
709 log_debug_errno(r
, "Failed to parse static routes, ignoring: %m");
712 case SD_DHCP_OPTION_MTU_INTERFACE
:
713 r
= lease_parse_u16(option
, len
, &lease
->mtu
, 68);
715 log_debug_errno(r
, "Failed to parse MTU, ignoring: %m");
716 if (lease
->mtu
< DHCP_DEFAULT_MIN_SIZE
) {
717 log_debug("MTU value of %" PRIu16
" too small. Using default MTU value of %d instead.", lease
->mtu
, DHCP_DEFAULT_MIN_SIZE
);
718 lease
->mtu
= DHCP_DEFAULT_MIN_SIZE
;
723 case SD_DHCP_OPTION_DOMAIN_NAME
:
724 r
= lease_parse_domain(option
, len
, &lease
->domainname
);
726 log_debug_errno(r
, "Failed to parse domain name, ignoring: %m");
732 case SD_DHCP_OPTION_DOMAIN_SEARCH
:
733 r
= dhcp_lease_parse_search_domains(option
, len
, &lease
->search_domains
);
735 log_debug_errno(r
, "Failed to parse Domain Search List, ignoring: %m");
738 case SD_DHCP_OPTION_HOST_NAME
:
739 r
= lease_parse_domain(option
, len
, &lease
->hostname
);
741 log_debug_errno(r
, "Failed to parse hostname, ignoring: %m");
747 case SD_DHCP_OPTION_ROOT_PATH
:
748 r
= lease_parse_string(option
, len
, &lease
->root_path
);
750 log_debug_errno(r
, "Failed to parse root path, ignoring: %m");
753 case SD_DHCP_OPTION_RENEWAL_TIME
:
754 r
= lease_parse_u32(option
, len
, &lease
->t1
, 1);
756 log_debug_errno(r
, "Failed to parse T1 time, ignoring: %m");
759 case SD_DHCP_OPTION_REBINDING_TIME
:
760 r
= lease_parse_u32(option
, len
, &lease
->t2
, 1);
762 log_debug_errno(r
, "Failed to parse T2 time, ignoring: %m");
765 case SD_DHCP_OPTION_CLASSLESS_STATIC_ROUTE
:
766 r
= lease_parse_classless_routes(lease
, option
, len
);
768 log_debug_errno(r
, "Failed to parse classless routes, ignoring: %m");
771 case SD_DHCP_OPTION_TZDB_TIMEZONE
: {
772 _cleanup_free_
char *tz
= NULL
;
774 r
= lease_parse_string(option
, len
, &tz
);
776 log_debug_errno(r
, "Failed to parse timezone option, ignoring: %m");
780 if (!timezone_is_valid(tz
, LOG_DEBUG
)) {
781 log_debug("Timezone is not valid, ignoring.");
785 free_and_replace(lease
->timezone
, tz
);
790 case SD_DHCP_OPTION_VENDOR_SPECIFIC
:
793 lease
->vendor_specific
= mfree(lease
->vendor_specific
);
797 p
= memdup(option
, len
);
801 free(lease
->vendor_specific
);
802 lease
->vendor_specific
= p
;
805 lease
->vendor_specific_len
= len
;
808 case SD_DHCP_OPTION_6RD
:
809 r
= lease_parse_6rd(lease
, option
, len
);
811 log_debug_errno(r
, "Failed to parse 6rd option, ignoring: %m");
814 case SD_DHCP_OPTION_PRIVATE_BASE
... SD_DHCP_OPTION_PRIVATE_LAST
:
815 r
= dhcp_lease_insert_private_option(lease
, code
, option
, len
);
822 log_debug("Ignoring option DHCP option %"PRIu8
" while parsing.", code
);
829 /* Parses compressed domain names. */
830 int dhcp_lease_parse_search_domains(const uint8_t *option
, size_t len
, char ***domains
) {
831 _cleanup_strv_free_
char **names
= NULL
;
832 size_t pos
= 0, cnt
= 0;
836 assert_return(option
&& len
> 0, -ENODATA
);
839 _cleanup_free_
char *name
= NULL
;
841 size_t jump_barrier
= pos
, next_chunk
= 0;
851 } else if (c
<= 63) {
855 label
= (const char*) (option
+ pos
);
860 if (!GREEDY_REALLOC(name
, n
+ !first
+ DNS_LABEL_ESCAPED_MAX
))
868 r
= dns_label_escape(label
, c
, name
+ n
, DNS_LABEL_ESCAPED_MAX
);
873 } else if (FLAGS_SET(c
, 0xc0)) {
883 ptr
= (uint16_t) (c
& ~0xc0) << 8 | (uint16_t) d
;
885 /* Jumps are limited to a "prior occurrence" (RFC-1035 4.1.4) */
886 if (ptr
>= jump_barrier
)
890 /* Save current location so we don't end up re-parsing what's parsed so far. */
899 if (!GREEDY_REALLOC(name
, n
+ 1))
903 r
= strv_extend(&names
, name
);
913 strv_free_and_replace(*domains
, names
);
918 int dhcp_lease_insert_private_option(sd_dhcp_lease
*lease
, uint8_t tag
, const void *data
, uint8_t len
) {
919 struct sd_dhcp_raw_option
*cur
, *option
;
923 LIST_FOREACH(options
, cur
, lease
->private_options
) {
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
, cur
, 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 sd_dhcp_raw_option
*option
;
965 struct in_addr address
;
966 const struct in_addr
*addresses
;
967 const void *client_id
, *data
;
968 size_t client_id_len
, data_len
;
969 char sbuf
[INET_ADDRSTRLEN
];
972 _cleanup_free_ sd_dhcp_route
**routes
= NULL
;
973 char **search_domains
;
974 uint32_t t1
, t2
, lifetime
;
980 r
= fopen_temporary(lease_file
, &f
, &temp_path
);
984 (void) fchmod(fileno(f
), 0644);
987 "# This is private data. Do not parse.\n");
989 r
= sd_dhcp_lease_get_address(lease
, &address
);
991 fprintf(f
, "ADDRESS=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
993 r
= sd_dhcp_lease_get_netmask(lease
, &address
);
995 fprintf(f
, "NETMASK=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
997 r
= sd_dhcp_lease_get_router(lease
, &addresses
);
1000 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1004 r
= sd_dhcp_lease_get_server_identifier(lease
, &address
);
1006 fprintf(f
, "SERVER_ADDRESS=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
1008 r
= sd_dhcp_lease_get_next_server(lease
, &address
);
1010 fprintf(f
, "NEXT_SERVER=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
1012 r
= sd_dhcp_lease_get_broadcast(lease
, &address
);
1014 fprintf(f
, "BROADCAST=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
1016 r
= sd_dhcp_lease_get_mtu(lease
, &mtu
);
1018 fprintf(f
, "MTU=%" PRIu16
"\n", mtu
);
1020 r
= sd_dhcp_lease_get_t1(lease
, &t1
);
1022 fprintf(f
, "T1=%" PRIu32
"\n", t1
);
1024 r
= sd_dhcp_lease_get_t2(lease
, &t2
);
1026 fprintf(f
, "T2=%" PRIu32
"\n", t2
);
1028 r
= sd_dhcp_lease_get_lifetime(lease
, &lifetime
);
1030 fprintf(f
, "LIFETIME=%" PRIu32
"\n", lifetime
);
1032 r
= sd_dhcp_lease_get_dns(lease
, &addresses
);
1035 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1039 r
= sd_dhcp_lease_get_ntp(lease
, &addresses
);
1042 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1046 r
= sd_dhcp_lease_get_sip(lease
, &addresses
);
1049 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1053 r
= sd_dhcp_lease_get_domainname(lease
, &string
);
1055 fprintf(f
, "DOMAINNAME=%s\n", string
);
1057 r
= sd_dhcp_lease_get_search_domains(lease
, &search_domains
);
1059 fputs("DOMAIN_SEARCH_LIST=", f
);
1060 fputstrv(f
, search_domains
, NULL
, NULL
);
1064 r
= sd_dhcp_lease_get_hostname(lease
, &string
);
1066 fprintf(f
, "HOSTNAME=%s\n", string
);
1068 r
= sd_dhcp_lease_get_root_path(lease
, &string
);
1070 fprintf(f
, "ROOT_PATH=%s\n", string
);
1072 r
= sd_dhcp_lease_get_static_routes(lease
, &routes
);
1074 serialize_dhcp_routes(f
, "STATIC_ROUTES", routes
, r
);
1076 routes
= mfree(routes
);
1077 r
= sd_dhcp_lease_get_classless_routes(lease
, &routes
);
1079 serialize_dhcp_routes(f
, "CLASSLESS_ROUTES", routes
, r
);
1081 r
= sd_dhcp_lease_get_timezone(lease
, &string
);
1083 fprintf(f
, "TIMEZONE=%s\n", string
);
1085 r
= sd_dhcp_lease_get_client_id(lease
, &client_id
, &client_id_len
);
1087 _cleanup_free_
char *client_id_hex
= NULL
;
1089 client_id_hex
= hexmem(client_id
, client_id_len
);
1092 fprintf(f
, "CLIENTID=%s\n", client_id_hex
);
1095 r
= sd_dhcp_lease_get_vendor_specific(lease
, &data
, &data_len
);
1097 _cleanup_free_
char *option_hex
= NULL
;
1099 option_hex
= hexmem(data
, data_len
);
1102 fprintf(f
, "VENDOR_SPECIFIC=%s\n", option_hex
);
1105 LIST_FOREACH(options
, option
, lease
->private_options
) {
1106 char key
[STRLEN("OPTION_000")+1];
1108 xsprintf(key
, "OPTION_%" PRIu8
, option
->tag
);
1109 r
= serialize_dhcp_option(f
, key
, option
->data
, option
->length
);
1114 r
= fflush_and_check(f
);
1118 r
= conservative_rename(temp_path
, lease_file
);
1122 temp_path
= mfree(temp_path
);
1127 static char **private_options_free(char **options
) {
1131 for (unsigned i
= 0; i
< SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
+ 1; i
++)
1134 return mfree(options
);
1137 DEFINE_TRIVIAL_CLEANUP_FUNC(char**, private_options_free
);
1139 int dhcp_lease_load(sd_dhcp_lease
**ret
, const char *lease_file
) {
1140 _cleanup_(sd_dhcp_lease_unrefp
) sd_dhcp_lease
*lease
= NULL
;
1145 *server_address
= NULL
,
1146 *next_server
= NULL
,
1155 *static_routes
= NULL
,
1156 *classless_routes
= NULL
,
1158 *client_id_hex
= NULL
,
1159 *vendor_specific_hex
= NULL
,
1163 _cleanup_(private_options_freep
) char **options
= NULL
;
1170 r
= dhcp_lease_new(&lease
);
1174 options
= new0(char*, SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
+ 1);
1178 r
= parse_env_file(NULL
, lease_file
,
1179 "ADDRESS", &address
,
1181 "NETMASK", &netmask
,
1182 "SERVER_ADDRESS", &server_address
,
1183 "NEXT_SERVER", &next_server
,
1184 "BROADCAST", &broadcast
,
1192 "DOMAINNAME", &lease
->domainname
,
1193 "HOSTNAME", &lease
->hostname
,
1194 "DOMAIN_SEARCH_LIST", &domains
,
1195 "ROOT_PATH", &lease
->root_path
,
1196 "STATIC_ROUTES", &static_routes
,
1197 "CLASSLESS_ROUTES", &classless_routes
,
1198 "CLIENTID", &client_id_hex
,
1199 "TIMEZONE", &lease
->timezone
,
1200 "VENDOR_SPECIFIC", &vendor_specific_hex
,
1201 "LIFETIME", &lifetime
,
1204 "OPTION_224", &options
[0],
1205 "OPTION_225", &options
[1],
1206 "OPTION_226", &options
[2],
1207 "OPTION_227", &options
[3],
1208 "OPTION_228", &options
[4],
1209 "OPTION_229", &options
[5],
1210 "OPTION_230", &options
[6],
1211 "OPTION_231", &options
[7],
1212 "OPTION_232", &options
[8],
1213 "OPTION_233", &options
[9],
1214 "OPTION_234", &options
[10],
1215 "OPTION_235", &options
[11],
1216 "OPTION_236", &options
[12],
1217 "OPTION_237", &options
[13],
1218 "OPTION_238", &options
[14],
1219 "OPTION_239", &options
[15],
1220 "OPTION_240", &options
[16],
1221 "OPTION_241", &options
[17],
1222 "OPTION_242", &options
[18],
1223 "OPTION_243", &options
[19],
1224 "OPTION_244", &options
[20],
1225 "OPTION_245", &options
[21],
1226 "OPTION_246", &options
[22],
1227 "OPTION_247", &options
[23],
1228 "OPTION_248", &options
[24],
1229 "OPTION_249", &options
[25],
1230 "OPTION_250", &options
[26],
1231 "OPTION_251", &options
[27],
1232 "OPTION_252", &options
[28],
1233 "OPTION_253", &options
[29],
1234 "OPTION_254", &options
[30]);
1239 r
= inet_pton(AF_INET
, address
, &lease
->address
);
1241 log_debug("Failed to parse address %s, ignoring.", address
);
1245 r
= deserialize_in_addrs(&lease
->router
, router
);
1247 log_debug_errno(r
, "Failed to deserialize router addresses %s, ignoring: %m", router
);
1249 lease
->router_size
= r
;
1253 r
= inet_pton(AF_INET
, netmask
, &lease
->subnet_mask
);
1255 log_debug("Failed to parse netmask %s, ignoring.", netmask
);
1257 lease
->have_subnet_mask
= true;
1260 if (server_address
) {
1261 r
= inet_pton(AF_INET
, server_address
, &lease
->server_address
);
1263 log_debug("Failed to parse server address %s, ignoring.", server_address
);
1267 r
= inet_pton(AF_INET
, next_server
, &lease
->next_server
);
1269 log_debug("Failed to parse next server %s, ignoring.", next_server
);
1273 r
= inet_pton(AF_INET
, broadcast
, &lease
->broadcast
);
1275 log_debug("Failed to parse broadcast address %s, ignoring.", broadcast
);
1277 lease
->have_broadcast
= true;
1281 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_DNS
].addr
, dns
);
1283 log_debug_errno(r
, "Failed to deserialize DNS servers %s, ignoring: %m", dns
);
1285 lease
->servers
[SD_DHCP_LEASE_DNS
].size
= r
;
1289 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_NTP
].addr
, ntp
);
1291 log_debug_errno(r
, "Failed to deserialize NTP servers %s, ignoring: %m", ntp
);
1293 lease
->servers
[SD_DHCP_LEASE_NTP
].size
= r
;
1297 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_SIP
].addr
, sip
);
1299 log_debug_errno(r
, "Failed to deserialize SIP servers %s, ignoring: %m", sip
);
1301 lease
->servers
[SD_DHCP_LEASE_SIP
].size
= r
;
1305 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_POP3
].addr
, pop3
);
1307 log_debug_errno(r
, "Failed to deserialize POP3 server %s, ignoring: %m", pop3
);
1309 lease
->servers
[SD_DHCP_LEASE_POP3
].size
= r
;
1313 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_SMTP
].addr
, smtp
);
1315 log_debug_errno(r
, "Failed to deserialize SMTP server %s, ignoring: %m", smtp
);
1317 lease
->servers
[SD_DHCP_LEASE_SMTP
].size
= r
;
1321 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_LPR
].addr
, lpr
);
1323 log_debug_errno(r
, "Failed to deserialize LPR server %s, ignoring: %m", lpr
);
1325 lease
->servers
[SD_DHCP_LEASE_LPR
].size
= r
;
1329 r
= safe_atou16(mtu
, &lease
->mtu
);
1331 log_debug_errno(r
, "Failed to parse MTU %s, ignoring: %m", mtu
);
1335 _cleanup_strv_free_
char **a
= NULL
;
1336 a
= strv_split(domains
, " ");
1340 if (!strv_isempty(a
))
1341 lease
->search_domains
= TAKE_PTR(a
);
1344 if (static_routes
) {
1345 r
= deserialize_dhcp_routes(
1346 &lease
->static_routes
,
1347 &lease
->n_static_routes
,
1350 log_debug_errno(r
, "Failed to parse DHCP static routes %s, ignoring: %m", static_routes
);
1353 if (classless_routes
) {
1354 r
= deserialize_dhcp_routes(
1355 &lease
->classless_routes
,
1356 &lease
->n_classless_routes
,
1359 log_debug_errno(r
, "Failed to parse DHCP classless routes %s, ignoring: %m", classless_routes
);
1363 r
= safe_atou32(lifetime
, &lease
->lifetime
);
1365 log_debug_errno(r
, "Failed to parse lifetime %s, ignoring: %m", lifetime
);
1369 r
= safe_atou32(t1
, &lease
->t1
);
1371 log_debug_errno(r
, "Failed to parse T1 %s, ignoring: %m", t1
);
1375 r
= safe_atou32(t2
, &lease
->t2
);
1377 log_debug_errno(r
, "Failed to parse T2 %s, ignoring: %m", t2
);
1380 if (client_id_hex
) {
1381 r
= unhexmem(client_id_hex
, SIZE_MAX
, &lease
->client_id
, &lease
->client_id_len
);
1383 log_debug_errno(r
, "Failed to parse client ID %s, ignoring: %m", client_id_hex
);
1386 if (vendor_specific_hex
) {
1387 r
= unhexmem(vendor_specific_hex
, SIZE_MAX
, &lease
->vendor_specific
, &lease
->vendor_specific_len
);
1389 log_debug_errno(r
, "Failed to parse vendor specific data %s, ignoring: %m", vendor_specific_hex
);
1392 for (i
= 0; i
<= SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
; i
++) {
1393 _cleanup_free_
void *data
= NULL
;
1399 r
= unhexmem(options
[i
], SIZE_MAX
, &data
, &len
);
1401 log_debug_errno(r
, "Failed to parse private DHCP option %s, ignoring: %m", options
[i
]);
1405 r
= dhcp_lease_insert_private_option(lease
, SD_DHCP_OPTION_PRIVATE_BASE
+ i
, data
, len
);
1410 *ret
= TAKE_PTR(lease
);
1415 int dhcp_lease_set_default_subnet_mask(sd_dhcp_lease
*lease
) {
1416 struct in_addr address
, mask
;
1421 if (lease
->address
== 0)
1424 address
.s_addr
= lease
->address
;
1426 /* fall back to the default subnet masks based on address class */
1427 r
= in4_addr_default_subnet_mask(&address
, &mask
);
1431 lease
->subnet_mask
= mask
.s_addr
;
1432 lease
->have_subnet_mask
= true;
1437 int sd_dhcp_lease_get_client_id(sd_dhcp_lease
*lease
, const void **client_id
, size_t *client_id_len
) {
1438 assert_return(lease
, -EINVAL
);
1439 assert_return(client_id
, -EINVAL
);
1440 assert_return(client_id_len
, -EINVAL
);
1442 if (!lease
->client_id
)
1445 *client_id
= lease
->client_id
;
1446 *client_id_len
= lease
->client_id_len
;
1451 int dhcp_lease_set_client_id(sd_dhcp_lease
*lease
, const void *client_id
, size_t client_id_len
) {
1452 assert_return(lease
, -EINVAL
);
1453 assert_return(client_id
|| client_id_len
<= 0, -EINVAL
);
1455 if (client_id_len
<= 0)
1456 lease
->client_id
= mfree(lease
->client_id
);
1460 p
= memdup(client_id
, client_id_len
);
1464 free(lease
->client_id
);
1465 lease
->client_id
= p
;
1466 lease
->client_id_len
= client_id_len
;
1472 int sd_dhcp_lease_get_timezone(sd_dhcp_lease
*lease
, const char **tz
) {
1473 assert_return(lease
, -EINVAL
);
1474 assert_return(tz
, -EINVAL
);
1476 if (!lease
->timezone
)
1479 *tz
= lease
->timezone
;
1483 int sd_dhcp_route_get_destination(sd_dhcp_route
*route
, struct in_addr
*destination
) {
1484 assert_return(route
, -EINVAL
);
1485 assert_return(destination
, -EINVAL
);
1487 *destination
= route
->dst_addr
;
1491 int sd_dhcp_route_get_destination_prefix_length(sd_dhcp_route
*route
, uint8_t *length
) {
1492 assert_return(route
, -EINVAL
);
1493 assert_return(length
, -EINVAL
);
1495 *length
= route
->dst_prefixlen
;
1499 int sd_dhcp_route_get_gateway(sd_dhcp_route
*route
, struct in_addr
*gateway
) {
1500 assert_return(route
, -EINVAL
);
1501 assert_return(gateway
, -EINVAL
);
1503 *gateway
= route
->gw_addr
;