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 int sd_dhcp_lease_get_routes(sd_dhcp_lease
*lease
, sd_dhcp_route
***routes
) {
222 assert_return(lease
, -EINVAL
);
223 assert_return(routes
, -EINVAL
);
225 if (lease
->static_route_size
<= 0)
228 ret
= new(sd_dhcp_route
*, lease
->static_route_size
);
232 for (i
= 0; i
< lease
->static_route_size
; i
++)
233 ret
[i
] = &lease
->static_route
[i
];
236 return (int) lease
->static_route_size
;
239 int sd_dhcp_lease_get_search_domains(sd_dhcp_lease
*lease
, char ***domains
) {
242 assert_return(lease
, -EINVAL
);
243 assert_return(domains
, -EINVAL
);
245 r
= strv_length(lease
->search_domains
);
247 *domains
= lease
->search_domains
;
254 int sd_dhcp_lease_get_6rd(
255 sd_dhcp_lease
*lease
,
256 uint8_t *ret_ipv4masklen
,
257 uint8_t *ret_prefixlen
,
258 struct in6_addr
*ret_prefix
,
259 const struct in_addr
**ret_br_addresses
,
260 size_t *ret_n_br_addresses
) {
262 assert_return(lease
, -EINVAL
);
264 if (lease
->sixrd_n_br_addresses
<= 0)
268 *ret_ipv4masklen
= lease
->sixrd_ipv4masklen
;
270 *ret_prefixlen
= lease
->sixrd_prefixlen
;
272 *ret_prefix
= lease
->sixrd_prefix
;
273 if (ret_br_addresses
)
274 *ret_br_addresses
= lease
->sixrd_br_addresses
;
275 if (ret_n_br_addresses
)
276 *ret_n_br_addresses
= lease
->sixrd_n_br_addresses
;
281 int sd_dhcp_lease_get_vendor_specific(sd_dhcp_lease
*lease
, const void **data
, size_t *data_len
) {
282 assert_return(lease
, -EINVAL
);
283 assert_return(data
, -EINVAL
);
284 assert_return(data_len
, -EINVAL
);
286 if (lease
->vendor_specific_len
<= 0)
289 *data
= lease
->vendor_specific
;
290 *data_len
= lease
->vendor_specific_len
;
294 static sd_dhcp_lease
*dhcp_lease_free(sd_dhcp_lease
*lease
) {
297 while (lease
->private_options
) {
298 struct sd_dhcp_raw_option
*option
= lease
->private_options
;
300 LIST_REMOVE(options
, lease
->private_options
, option
);
306 free(lease
->root_path
);
308 free(lease
->timezone
);
309 free(lease
->hostname
);
310 free(lease
->domainname
);
312 for (sd_dhcp_lease_server_type_t i
= 0; i
< _SD_DHCP_LEASE_SERVER_TYPE_MAX
; i
++)
313 free(lease
->servers
[i
].addr
);
315 free(lease
->static_route
);
316 free(lease
->client_id
);
317 free(lease
->vendor_specific
);
318 strv_free(lease
->search_domains
);
319 free(lease
->sixrd_br_addresses
);
323 DEFINE_TRIVIAL_REF_UNREF_FUNC(sd_dhcp_lease
, sd_dhcp_lease
, dhcp_lease_free
);
325 static int lease_parse_u32(const uint8_t *option
, size_t len
, uint32_t *ret
, uint32_t min
) {
332 *ret
= unaligned_read_be32((be32_t
*) option
);
339 static int lease_parse_u16(const uint8_t *option
, size_t len
, uint16_t *ret
, uint16_t min
) {
346 *ret
= unaligned_read_be16((be16_t
*) option
);
353 static int lease_parse_be32(const uint8_t *option
, size_t len
, be32_t
*ret
) {
360 memcpy(ret
, option
, 4);
364 static int lease_parse_string(const uint8_t *option
, size_t len
, char **ret
) {
374 * One trailing NUL byte is OK, we don't mind. See:
375 * https://github.com/systemd/systemd/issues/1337
377 if (memchr(option
, 0, len
- 1))
380 string
= memdup_suffix0((const char *) option
, len
);
384 free_and_replace(*ret
, string
);
390 static int lease_parse_domain(const uint8_t *option
, size_t len
, char **ret
) {
391 _cleanup_free_
char *name
= NULL
, *normalized
= NULL
;
397 r
= lease_parse_string(option
, len
, &name
);
405 r
= dns_name_normalize(name
, 0, &normalized
);
409 if (is_localhost(normalized
))
412 if (dns_name_is_root(normalized
))
415 free_and_replace(*ret
, normalized
);
420 static int lease_parse_in_addrs(const uint8_t *option
, size_t len
, struct in_addr
**ret
, size_t *n_ret
) {
421 assert(option
|| len
== 0);
430 struct in_addr
*addresses
;
435 n_addresses
= len
/ 4;
437 addresses
= newdup(struct in_addr
, option
, n_addresses
);
443 *n_ret
= n_addresses
;
449 static int lease_parse_sip_server(const uint8_t *option
, size_t len
, struct in_addr
**ret
, size_t *n_ret
) {
450 assert(option
|| len
== 0);
457 /* The SIP record is like the other, regular server records, but prefixed with a single "encoding"
458 * byte that is either 0 or 1. We only support it to be 1 for now. Let's drop it and parse it like
459 * the other fields */
461 if (option
[0] != 1) { /* We only support IP address encoding for now */
467 return lease_parse_in_addrs(option
+ 1, len
- 1, ret
, n_ret
);
470 static int lease_parse_routes(
471 const uint8_t *option
,
473 struct sd_dhcp_route
**routes
,
474 size_t *routes_size
) {
478 assert(option
|| len
<= 0);
486 struct in_addr dst
, gw
;
489 assert_se(lease_parse_be32(option
, 4, &dst
.s_addr
) >= 0);
492 assert_se(lease_parse_be32(option
, 4, &gw
.s_addr
) >= 0);
497 r
= in4_addr_default_prefixlen(&dst
, &prefixlen
);
501 (void) in4_addr_mask(&dst
, prefixlen
);
503 if (!GREEDY_REALLOC(*routes
, *routes_size
+ 1))
506 (*routes
)[*routes_size
] = (struct sd_dhcp_route
) {
509 .dst_prefixlen
= prefixlen
,
510 .option
= SD_DHCP_OPTION_STATIC_ROUTE
,
519 /* parses RFC3442 Classless Static Route Option */
520 static int lease_parse_classless_routes(
521 const uint8_t *option
, size_t len
,
522 struct sd_dhcp_route
**routes
, size_t *routes_size
) {
524 assert(option
|| len
<= 0);
531 /* option format: (subnet-mask-width significant-subnet-octets gateway-ip)* */
535 struct sd_dhcp_route
*route
;
537 if (!GREEDY_REALLOC(*routes
, *routes_size
+ 1))
540 route
= *routes
+ *routes_size
;
541 route
->option
= SD_DHCP_OPTION_CLASSLESS_STATIC_ROUTE
;
543 dst_octets
= (*option
== 0 ? 0 : ((*option
- 1) / 8) + 1);
544 route
->dst_prefixlen
= *option
;
548 /* can't have more than 4 octets in IPv4 */
549 if (dst_octets
> 4 || len
< dst_octets
)
552 route
->dst_addr
.s_addr
= 0;
553 memcpy(&route
->dst_addr
.s_addr
, option
, dst_octets
);
554 option
+= dst_octets
;
560 assert_se(lease_parse_be32(option
, 4, &route
->gw_addr
.s_addr
) >= 0);
570 static int lease_parse_6rd(sd_dhcp_lease
*lease
, const uint8_t *option
, size_t len
) {
571 uint8_t ipv4masklen
, prefixlen
;
572 struct in6_addr prefix
;
573 _cleanup_free_
struct in_addr
*br_addresses
= NULL
;
574 size_t n_br_addresses
;
579 /* See RFC 5969 Section 7.1.1 */
581 if (lease
->sixrd_n_br_addresses
> 0)
582 /* Multiple 6rd option?? */
585 /* option-length: The length of the DHCP option in octets (22 octets with one BR IPv4 address). */
586 if (len
< 2 + sizeof(struct in6_addr
) + sizeof(struct in_addr
) ||
587 (len
- 2 - sizeof(struct in6_addr
)) % sizeof(struct in_addr
) != 0)
590 /* IPv4MaskLen: The number of high-order bits that are identical across all CE IPv4 addresses
591 * within a given 6rd domain. This may be any value between 0 and 32. Any value
592 * greater than 32 is invalid. */
593 ipv4masklen
= option
[0];
594 if (ipv4masklen
> 32)
597 /* 6rdPrefixLen: The IPv6 prefix length of the SP's 6rd IPv6 prefix in number of bits. For the
598 * purpose of bounds checking by DHCP option processing, the sum of
599 * (32 - IPv4MaskLen) + 6rdPrefixLen MUST be less than or equal to 128. */
600 prefixlen
= option
[1];
601 if (32 - ipv4masklen
+ prefixlen
> 128)
604 /* 6rdPrefix: The service provider's 6rd IPv6 prefix represented as a 16-octet IPv6 address.
605 * The bits in the prefix after the 6rdPrefixlen number of bits are reserved and
606 * MUST be initialized to zero by the sender and ignored by the receiver. */
607 memcpy(&prefix
, option
+ 2, sizeof(struct in6_addr
));
608 (void) in6_addr_mask(&prefix
, prefixlen
);
610 /* 6rdBRIPv4Address: One or more IPv4 addresses of the 6rd Border Relay(s) for a given 6rd domain. */
611 n_br_addresses
= (len
- 2 - sizeof(struct in6_addr
)) / sizeof(struct in_addr
);
612 br_addresses
= newdup(struct in_addr
, option
+ 2 + sizeof(struct in6_addr
), n_br_addresses
);
616 lease
->sixrd_ipv4masklen
= ipv4masklen
;
617 lease
->sixrd_prefixlen
= prefixlen
;
618 lease
->sixrd_prefix
= prefix
;
619 lease
->sixrd_br_addresses
= TAKE_PTR(br_addresses
);
620 lease
->sixrd_n_br_addresses
= n_br_addresses
;
625 int dhcp_lease_parse_options(uint8_t code
, uint8_t len
, const void *option
, void *userdata
) {
626 sd_dhcp_lease
*lease
= userdata
;
633 case SD_DHCP_OPTION_IP_ADDRESS_LEASE_TIME
:
634 r
= lease_parse_u32(option
, len
, &lease
->lifetime
, 1);
636 log_debug_errno(r
, "Failed to parse lease time, ignoring: %m");
640 case SD_DHCP_OPTION_SERVER_IDENTIFIER
:
641 r
= lease_parse_be32(option
, len
, &lease
->server_address
);
643 log_debug_errno(r
, "Failed to parse server identifier, ignoring: %m");
647 case SD_DHCP_OPTION_SUBNET_MASK
:
648 r
= lease_parse_be32(option
, len
, &lease
->subnet_mask
);
650 log_debug_errno(r
, "Failed to parse subnet mask, ignoring: %m");
652 lease
->have_subnet_mask
= true;
655 case SD_DHCP_OPTION_BROADCAST
:
656 r
= lease_parse_be32(option
, len
, &lease
->broadcast
);
658 log_debug_errno(r
, "Failed to parse broadcast address, ignoring: %m");
660 lease
->have_broadcast
= true;
663 case SD_DHCP_OPTION_ROUTER
:
664 r
= lease_parse_in_addrs(option
, len
, &lease
->router
, &lease
->router_size
);
666 log_debug_errno(r
, "Failed to parse router addresses, ignoring: %m");
669 case SD_DHCP_OPTION_DOMAIN_NAME_SERVER
:
670 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_DNS
].addr
, &lease
->servers
[SD_DHCP_LEASE_DNS
].size
);
672 log_debug_errno(r
, "Failed to parse DNS server, ignoring: %m");
675 case SD_DHCP_OPTION_NTP_SERVER
:
676 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_NTP
].addr
, &lease
->servers
[SD_DHCP_LEASE_NTP
].size
);
678 log_debug_errno(r
, "Failed to parse NTP server, ignoring: %m");
681 case SD_DHCP_OPTION_SIP_SERVER
:
682 r
= lease_parse_sip_server(option
, len
, &lease
->servers
[SD_DHCP_LEASE_SIP
].addr
, &lease
->servers
[SD_DHCP_LEASE_SIP
].size
);
684 log_debug_errno(r
, "Failed to parse SIP server, ignoring: %m");
687 case SD_DHCP_OPTION_POP3_SERVER
:
688 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_POP3
].addr
, &lease
->servers
[SD_DHCP_LEASE_POP3
].size
);
690 log_debug_errno(r
, "Failed to parse POP3 server, ignoring: %m");
693 case SD_DHCP_OPTION_SMTP_SERVER
:
694 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_SMTP
].addr
, &lease
->servers
[SD_DHCP_LEASE_SMTP
].size
);
696 log_debug_errno(r
, "Failed to parse SMTP server, ignoring: %m");
699 case SD_DHCP_OPTION_LPR_SERVER
:
700 r
= lease_parse_in_addrs(option
, len
, &lease
->servers
[SD_DHCP_LEASE_LPR
].addr
, &lease
->servers
[SD_DHCP_LEASE_LPR
].size
);
702 log_debug_errno(r
, "Failed to parse LPR server, ignoring: %m");
705 case SD_DHCP_OPTION_STATIC_ROUTE
:
706 r
= lease_parse_routes(option
, len
, &lease
->static_route
, &lease
->static_route_size
);
708 log_debug_errno(r
, "Failed to parse static routes, ignoring: %m");
711 case SD_DHCP_OPTION_INTERFACE_MTU
:
712 r
= lease_parse_u16(option
, len
, &lease
->mtu
, 68);
714 log_debug_errno(r
, "Failed to parse MTU, ignoring: %m");
715 if (lease
->mtu
< DHCP_DEFAULT_MIN_SIZE
) {
716 log_debug("MTU value of %" PRIu16
" too small. Using default MTU value of %d instead.", lease
->mtu
, DHCP_DEFAULT_MIN_SIZE
);
717 lease
->mtu
= DHCP_DEFAULT_MIN_SIZE
;
722 case SD_DHCP_OPTION_DOMAIN_NAME
:
723 r
= lease_parse_domain(option
, len
, &lease
->domainname
);
725 log_debug_errno(r
, "Failed to parse domain name, ignoring: %m");
731 case SD_DHCP_OPTION_DOMAIN_SEARCH_LIST
:
732 r
= dhcp_lease_parse_search_domains(option
, len
, &lease
->search_domains
);
734 log_debug_errno(r
, "Failed to parse Domain Search List, ignoring: %m");
737 case SD_DHCP_OPTION_HOST_NAME
:
738 r
= lease_parse_domain(option
, len
, &lease
->hostname
);
740 log_debug_errno(r
, "Failed to parse hostname, ignoring: %m");
746 case SD_DHCP_OPTION_ROOT_PATH
:
747 r
= lease_parse_string(option
, len
, &lease
->root_path
);
749 log_debug_errno(r
, "Failed to parse root path, ignoring: %m");
752 case SD_DHCP_OPTION_RENEWAL_T1_TIME
:
753 r
= lease_parse_u32(option
, len
, &lease
->t1
, 1);
755 log_debug_errno(r
, "Failed to parse T1 time, ignoring: %m");
758 case SD_DHCP_OPTION_REBINDING_T2_TIME
:
759 r
= lease_parse_u32(option
, len
, &lease
->t2
, 1);
761 log_debug_errno(r
, "Failed to parse T2 time, ignoring: %m");
764 case SD_DHCP_OPTION_CLASSLESS_STATIC_ROUTE
:
765 r
= lease_parse_classless_routes(
767 &lease
->static_route
,
768 &lease
->static_route_size
);
770 log_debug_errno(r
, "Failed to parse classless routes, ignoring: %m");
773 case SD_DHCP_OPTION_NEW_TZDB_TIMEZONE
: {
774 _cleanup_free_
char *tz
= NULL
;
776 r
= lease_parse_string(option
, len
, &tz
);
778 log_debug_errno(r
, "Failed to parse timezone option, ignoring: %m");
782 if (!timezone_is_valid(tz
, LOG_DEBUG
)) {
783 log_debug("Timezone is not valid, ignoring.");
787 free_and_replace(lease
->timezone
, tz
);
792 case SD_DHCP_OPTION_VENDOR_SPECIFIC
:
795 lease
->vendor_specific
= mfree(lease
->vendor_specific
);
799 p
= memdup(option
, len
);
803 free(lease
->vendor_specific
);
804 lease
->vendor_specific
= p
;
807 lease
->vendor_specific_len
= len
;
810 case SD_DHCP_OPTION_6RD
:
811 r
= lease_parse_6rd(lease
, option
, len
);
813 log_debug_errno(r
, "Failed to parse 6rd option, ignoring: %m");
816 case SD_DHCP_OPTION_PRIVATE_BASE
... SD_DHCP_OPTION_PRIVATE_LAST
:
817 r
= dhcp_lease_insert_private_option(lease
, code
, option
, len
);
824 log_debug("Ignoring option DHCP option %"PRIu8
" while parsing.", code
);
831 /* Parses compressed domain names. */
832 int dhcp_lease_parse_search_domains(const uint8_t *option
, size_t len
, char ***domains
) {
833 _cleanup_strv_free_
char **names
= NULL
;
834 size_t pos
= 0, cnt
= 0;
838 assert_return(option
&& len
> 0, -ENODATA
);
841 _cleanup_free_
char *name
= NULL
;
843 size_t jump_barrier
= pos
, next_chunk
= 0;
853 } else if (c
<= 63) {
857 label
= (const char*) (option
+ pos
);
862 if (!GREEDY_REALLOC(name
, n
+ !first
+ DNS_LABEL_ESCAPED_MAX
))
870 r
= dns_label_escape(label
, c
, name
+ n
, DNS_LABEL_ESCAPED_MAX
);
875 } else if (FLAGS_SET(c
, 0xc0)) {
885 ptr
= (uint16_t) (c
& ~0xc0) << 8 | (uint16_t) d
;
887 /* Jumps are limited to a "prior occurrence" (RFC-1035 4.1.4) */
888 if (ptr
>= jump_barrier
)
892 /* Save current location so we don't end up re-parsing what's parsed so far. */
901 if (!GREEDY_REALLOC(name
, n
+ 1))
905 r
= strv_extend(&names
, name
);
915 strv_free_and_replace(*domains
, names
);
920 int dhcp_lease_insert_private_option(sd_dhcp_lease
*lease
, uint8_t tag
, const void *data
, uint8_t len
) {
921 struct sd_dhcp_raw_option
*cur
, *option
;
925 LIST_FOREACH(options
, cur
, lease
->private_options
) {
928 if (tag
== cur
->tag
) {
929 log_debug("Ignoring duplicate option, tagged %i.", tag
);
934 option
= new(struct sd_dhcp_raw_option
, 1);
939 option
->length
= len
;
940 option
->data
= memdup(data
, len
);
946 LIST_INSERT_BEFORE(options
, lease
->private_options
, cur
, option
);
950 int dhcp_lease_new(sd_dhcp_lease
**ret
) {
951 sd_dhcp_lease
*lease
;
953 lease
= new0(sd_dhcp_lease
, 1);
963 int dhcp_lease_save(sd_dhcp_lease
*lease
, const char *lease_file
) {
964 _cleanup_(unlink_and_freep
) char *temp_path
= NULL
;
965 _cleanup_fclose_
FILE *f
= NULL
;
966 struct sd_dhcp_raw_option
*option
;
967 struct in_addr address
;
968 const struct in_addr
*addresses
;
969 const void *client_id
, *data
;
970 size_t client_id_len
, data_len
;
971 char sbuf
[INET_ADDRSTRLEN
];
974 _cleanup_free_ sd_dhcp_route
**routes
= NULL
;
975 char **search_domains
= NULL
;
976 uint32_t t1
, t2
, lifetime
;
982 r
= fopen_temporary(lease_file
, &f
, &temp_path
);
986 (void) fchmod(fileno(f
), 0644);
989 "# This is private data. Do not parse.\n");
991 r
= sd_dhcp_lease_get_address(lease
, &address
);
993 fprintf(f
, "ADDRESS=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
995 r
= sd_dhcp_lease_get_netmask(lease
, &address
);
997 fprintf(f
, "NETMASK=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
999 r
= sd_dhcp_lease_get_router(lease
, &addresses
);
1001 fputs("ROUTER=", f
);
1002 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1006 r
= sd_dhcp_lease_get_server_identifier(lease
, &address
);
1008 fprintf(f
, "SERVER_ADDRESS=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
1010 r
= sd_dhcp_lease_get_next_server(lease
, &address
);
1012 fprintf(f
, "NEXT_SERVER=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
1014 r
= sd_dhcp_lease_get_broadcast(lease
, &address
);
1016 fprintf(f
, "BROADCAST=%s\n", inet_ntop(AF_INET
, &address
, sbuf
, sizeof(sbuf
)));
1018 r
= sd_dhcp_lease_get_mtu(lease
, &mtu
);
1020 fprintf(f
, "MTU=%" PRIu16
"\n", mtu
);
1022 r
= sd_dhcp_lease_get_t1(lease
, &t1
);
1024 fprintf(f
, "T1=%" PRIu32
"\n", t1
);
1026 r
= sd_dhcp_lease_get_t2(lease
, &t2
);
1028 fprintf(f
, "T2=%" PRIu32
"\n", t2
);
1030 r
= sd_dhcp_lease_get_lifetime(lease
, &lifetime
);
1032 fprintf(f
, "LIFETIME=%" PRIu32
"\n", lifetime
);
1034 r
= sd_dhcp_lease_get_dns(lease
, &addresses
);
1037 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1041 r
= sd_dhcp_lease_get_ntp(lease
, &addresses
);
1044 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1048 r
= sd_dhcp_lease_get_sip(lease
, &addresses
);
1051 serialize_in_addrs(f
, addresses
, r
, false, NULL
);
1055 r
= sd_dhcp_lease_get_domainname(lease
, &string
);
1057 fprintf(f
, "DOMAINNAME=%s\n", string
);
1059 r
= sd_dhcp_lease_get_search_domains(lease
, &search_domains
);
1061 fputs("DOMAIN_SEARCH_LIST=", f
);
1062 fputstrv(f
, search_domains
, NULL
, NULL
);
1066 r
= sd_dhcp_lease_get_hostname(lease
, &string
);
1068 fprintf(f
, "HOSTNAME=%s\n", string
);
1070 r
= sd_dhcp_lease_get_root_path(lease
, &string
);
1072 fprintf(f
, "ROOT_PATH=%s\n", string
);
1074 r
= sd_dhcp_lease_get_routes(lease
, &routes
);
1076 serialize_dhcp_routes(f
, "ROUTES", routes
, r
);
1078 r
= sd_dhcp_lease_get_timezone(lease
, &string
);
1080 fprintf(f
, "TIMEZONE=%s\n", string
);
1082 r
= sd_dhcp_lease_get_client_id(lease
, &client_id
, &client_id_len
);
1084 _cleanup_free_
char *client_id_hex
= NULL
;
1086 client_id_hex
= hexmem(client_id
, client_id_len
);
1089 fprintf(f
, "CLIENTID=%s\n", client_id_hex
);
1092 r
= sd_dhcp_lease_get_vendor_specific(lease
, &data
, &data_len
);
1094 _cleanup_free_
char *option_hex
= NULL
;
1096 option_hex
= hexmem(data
, data_len
);
1099 fprintf(f
, "VENDOR_SPECIFIC=%s\n", option_hex
);
1102 LIST_FOREACH(options
, option
, lease
->private_options
) {
1103 char key
[STRLEN("OPTION_000")+1];
1105 xsprintf(key
, "OPTION_%" PRIu8
, option
->tag
);
1106 r
= serialize_dhcp_option(f
, key
, option
->data
, option
->length
);
1111 r
= fflush_and_check(f
);
1115 r
= conservative_rename(temp_path
, lease_file
);
1119 temp_path
= mfree(temp_path
);
1124 static char **private_options_free(char **options
) {
1128 for (unsigned i
= 0; i
< SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
+ 1; i
++)
1131 return mfree(options
);
1134 DEFINE_TRIVIAL_CLEANUP_FUNC(char**, private_options_free
);
1136 int dhcp_lease_load(sd_dhcp_lease
**ret
, const char *lease_file
) {
1137 _cleanup_(sd_dhcp_lease_unrefp
) sd_dhcp_lease
*lease
= NULL
;
1142 *server_address
= NULL
,
1143 *next_server
= NULL
,
1154 *client_id_hex
= NULL
,
1155 *vendor_specific_hex
= NULL
,
1159 _cleanup_(private_options_freep
) char **options
= NULL
;
1166 r
= dhcp_lease_new(&lease
);
1170 options
= new0(char*, SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
+ 1);
1174 r
= parse_env_file(NULL
, lease_file
,
1175 "ADDRESS", &address
,
1177 "NETMASK", &netmask
,
1178 "SERVER_ADDRESS", &server_address
,
1179 "NEXT_SERVER", &next_server
,
1180 "BROADCAST", &broadcast
,
1188 "DOMAINNAME", &lease
->domainname
,
1189 "HOSTNAME", &lease
->hostname
,
1190 "DOMAIN_SEARCH_LIST", &domains
,
1191 "ROOT_PATH", &lease
->root_path
,
1193 "CLIENTID", &client_id_hex
,
1194 "TIMEZONE", &lease
->timezone
,
1195 "VENDOR_SPECIFIC", &vendor_specific_hex
,
1196 "LIFETIME", &lifetime
,
1199 "OPTION_224", &options
[0],
1200 "OPTION_225", &options
[1],
1201 "OPTION_226", &options
[2],
1202 "OPTION_227", &options
[3],
1203 "OPTION_228", &options
[4],
1204 "OPTION_229", &options
[5],
1205 "OPTION_230", &options
[6],
1206 "OPTION_231", &options
[7],
1207 "OPTION_232", &options
[8],
1208 "OPTION_233", &options
[9],
1209 "OPTION_234", &options
[10],
1210 "OPTION_235", &options
[11],
1211 "OPTION_236", &options
[12],
1212 "OPTION_237", &options
[13],
1213 "OPTION_238", &options
[14],
1214 "OPTION_239", &options
[15],
1215 "OPTION_240", &options
[16],
1216 "OPTION_241", &options
[17],
1217 "OPTION_242", &options
[18],
1218 "OPTION_243", &options
[19],
1219 "OPTION_244", &options
[20],
1220 "OPTION_245", &options
[21],
1221 "OPTION_246", &options
[22],
1222 "OPTION_247", &options
[23],
1223 "OPTION_248", &options
[24],
1224 "OPTION_249", &options
[25],
1225 "OPTION_250", &options
[26],
1226 "OPTION_251", &options
[27],
1227 "OPTION_252", &options
[28],
1228 "OPTION_253", &options
[29],
1229 "OPTION_254", &options
[30]);
1234 r
= inet_pton(AF_INET
, address
, &lease
->address
);
1236 log_debug("Failed to parse address %s, ignoring.", address
);
1240 r
= deserialize_in_addrs(&lease
->router
, router
);
1242 log_debug_errno(r
, "Failed to deserialize router addresses %s, ignoring: %m", router
);
1244 lease
->router_size
= r
;
1248 r
= inet_pton(AF_INET
, netmask
, &lease
->subnet_mask
);
1250 log_debug("Failed to parse netmask %s, ignoring.", netmask
);
1252 lease
->have_subnet_mask
= true;
1255 if (server_address
) {
1256 r
= inet_pton(AF_INET
, server_address
, &lease
->server_address
);
1258 log_debug("Failed to parse server address %s, ignoring.", server_address
);
1262 r
= inet_pton(AF_INET
, next_server
, &lease
->next_server
);
1264 log_debug("Failed to parse next server %s, ignoring.", next_server
);
1268 r
= inet_pton(AF_INET
, broadcast
, &lease
->broadcast
);
1270 log_debug("Failed to parse broadcast address %s, ignoring.", broadcast
);
1272 lease
->have_broadcast
= true;
1276 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_DNS
].addr
, dns
);
1278 log_debug_errno(r
, "Failed to deserialize DNS servers %s, ignoring: %m", dns
);
1280 lease
->servers
[SD_DHCP_LEASE_DNS
].size
= r
;
1284 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_NTP
].addr
, ntp
);
1286 log_debug_errno(r
, "Failed to deserialize NTP servers %s, ignoring: %m", ntp
);
1288 lease
->servers
[SD_DHCP_LEASE_NTP
].size
= r
;
1292 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_SIP
].addr
, sip
);
1294 log_debug_errno(r
, "Failed to deserialize SIP servers %s, ignoring: %m", sip
);
1296 lease
->servers
[SD_DHCP_LEASE_SIP
].size
= r
;
1300 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_POP3
].addr
, pop3
);
1302 log_debug_errno(r
, "Failed to deserialize POP3 server %s, ignoring: %m", pop3
);
1304 lease
->servers
[SD_DHCP_LEASE_POP3
].size
= r
;
1308 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_SMTP
].addr
, smtp
);
1310 log_debug_errno(r
, "Failed to deserialize SMTP server %s, ignoring: %m", smtp
);
1312 lease
->servers
[SD_DHCP_LEASE_SMTP
].size
= r
;
1316 r
= deserialize_in_addrs(&lease
->servers
[SD_DHCP_LEASE_LPR
].addr
, lpr
);
1318 log_debug_errno(r
, "Failed to deserialize LPR server %s, ignoring: %m", lpr
);
1320 lease
->servers
[SD_DHCP_LEASE_LPR
].size
= r
;
1324 r
= safe_atou16(mtu
, &lease
->mtu
);
1326 log_debug_errno(r
, "Failed to parse MTU %s, ignoring: %m", mtu
);
1330 _cleanup_strv_free_
char **a
= NULL
;
1331 a
= strv_split(domains
, " ");
1335 if (!strv_isempty(a
))
1336 lease
->search_domains
= TAKE_PTR(a
);
1340 r
= deserialize_dhcp_routes(
1341 &lease
->static_route
,
1342 &lease
->static_route_size
,
1345 log_debug_errno(r
, "Failed to parse DHCP routes %s, ignoring: %m", routes
);
1349 r
= safe_atou32(lifetime
, &lease
->lifetime
);
1351 log_debug_errno(r
, "Failed to parse lifetime %s, ignoring: %m", lifetime
);
1355 r
= safe_atou32(t1
, &lease
->t1
);
1357 log_debug_errno(r
, "Failed to parse T1 %s, ignoring: %m", t1
);
1361 r
= safe_atou32(t2
, &lease
->t2
);
1363 log_debug_errno(r
, "Failed to parse T2 %s, ignoring: %m", t2
);
1366 if (client_id_hex
) {
1367 r
= unhexmem(client_id_hex
, SIZE_MAX
, &lease
->client_id
, &lease
->client_id_len
);
1369 log_debug_errno(r
, "Failed to parse client ID %s, ignoring: %m", client_id_hex
);
1372 if (vendor_specific_hex
) {
1373 r
= unhexmem(vendor_specific_hex
, SIZE_MAX
, &lease
->vendor_specific
, &lease
->vendor_specific_len
);
1375 log_debug_errno(r
, "Failed to parse vendor specific data %s, ignoring: %m", vendor_specific_hex
);
1378 for (i
= 0; i
<= SD_DHCP_OPTION_PRIVATE_LAST
- SD_DHCP_OPTION_PRIVATE_BASE
; i
++) {
1379 _cleanup_free_
void *data
= NULL
;
1385 r
= unhexmem(options
[i
], SIZE_MAX
, &data
, &len
);
1387 log_debug_errno(r
, "Failed to parse private DHCP option %s, ignoring: %m", options
[i
]);
1391 r
= dhcp_lease_insert_private_option(lease
, SD_DHCP_OPTION_PRIVATE_BASE
+ i
, data
, len
);
1396 *ret
= TAKE_PTR(lease
);
1401 int dhcp_lease_set_default_subnet_mask(sd_dhcp_lease
*lease
) {
1402 struct in_addr address
, mask
;
1407 if (lease
->address
== 0)
1410 address
.s_addr
= lease
->address
;
1412 /* fall back to the default subnet masks based on address class */
1413 r
= in4_addr_default_subnet_mask(&address
, &mask
);
1417 lease
->subnet_mask
= mask
.s_addr
;
1418 lease
->have_subnet_mask
= true;
1423 int sd_dhcp_lease_get_client_id(sd_dhcp_lease
*lease
, const void **client_id
, size_t *client_id_len
) {
1424 assert_return(lease
, -EINVAL
);
1425 assert_return(client_id
, -EINVAL
);
1426 assert_return(client_id_len
, -EINVAL
);
1428 if (!lease
->client_id
)
1431 *client_id
= lease
->client_id
;
1432 *client_id_len
= lease
->client_id_len
;
1437 int dhcp_lease_set_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
|| client_id_len
<= 0, -EINVAL
);
1441 if (client_id_len
<= 0)
1442 lease
->client_id
= mfree(lease
->client_id
);
1446 p
= memdup(client_id
, client_id_len
);
1450 free(lease
->client_id
);
1451 lease
->client_id
= p
;
1452 lease
->client_id_len
= client_id_len
;
1458 int sd_dhcp_lease_get_timezone(sd_dhcp_lease
*lease
, const char **tz
) {
1459 assert_return(lease
, -EINVAL
);
1460 assert_return(tz
, -EINVAL
);
1462 if (!lease
->timezone
)
1465 *tz
= lease
->timezone
;
1469 int sd_dhcp_route_get_destination(sd_dhcp_route
*route
, struct in_addr
*destination
) {
1470 assert_return(route
, -EINVAL
);
1471 assert_return(destination
, -EINVAL
);
1473 *destination
= route
->dst_addr
;
1477 int sd_dhcp_route_get_destination_prefix_length(sd_dhcp_route
*route
, uint8_t *length
) {
1478 assert_return(route
, -EINVAL
);
1479 assert_return(length
, -EINVAL
);
1481 *length
= route
->dst_prefixlen
;
1485 int sd_dhcp_route_get_gateway(sd_dhcp_route
*route
, struct in_addr
*gateway
) {
1486 assert_return(route
, -EINVAL
);
1487 assert_return(gateway
, -EINVAL
);
1489 *gateway
= route
->gw_addr
;
1493 int sd_dhcp_route_get_option(sd_dhcp_route
*route
) {
1494 assert_return(route
, -EINVAL
);
1496 return route
->option
;