dhcpclient.c

Go to the documentation of this file.

/*
 * dhcpclient.c DHCP test client.
 *
 * Version:     $Id: a892c213f2664bd091a593f3dec5d7fdf8ba035a $
 *
 *   This program is free software; you can redistribute it and/or modify
 *   it under the terms of the GNU General Public License as published by
 *   the Free Software Foundation; either version 2 of the License, or
 *   (at your option) any later version.
 *
 *   This program is distributed in the hope that it will be useful,
 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 *   GNU General Public License for more details.
 *
 *   You should have received a copy of the GNU General Public License
 *   along with this program; if not, write to the Free Software
 *   Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301, USA
 *
 * @copyright 2000,2006 The FreeRADIUS server project
 * @copyright 2000 Miquel van Smoorenburg (miquels@cistron.nl)
 * @copyright 2010 Alan DeKok (aland@freeradius.org)
 */
 
RCSID("$Id: a892c213f2664bd091a593f3dec5d7fdf8ba035a $")
 
#include <freeradius-devel/util/conf.h>
#include <freeradius-devel/util/syserror.h>
#include <freeradius-devel/util/atexit.h>
#include <freeradius-devel/util/pair_legacy.h>
#include <freeradius-devel/server/packet.h>
#include <freeradius-devel/dhcpv4/dhcpv4.h>
#include <freeradius-devel/util/pcap.h>
 
/*
 *      Logging macros
 */
#undef DEBUG
#define DEBUG(fmt, ...)         if (fr_debug_lvl > 0) fprintf(stdout, fmt "\n", ## __VA_ARGS__)
 
#define ERROR(fmt, ...)         fr_perror("dhcpclient: " fmt, ## __VA_ARGS__)
 
#include <ctype.h>
 
#ifdef HAVE_GETOPT_H
#  include <getopt.h>
#endif
 
#include <assert.h>
 
#include <net/if.h>
 
static int retries = 3;
static fr_time_delta_t  timeout;
 
static int sockfd;
#ifdef HAVE_LIBPCAP
static fr_pcap_t        *pcap;
#endif
 
static char *iface = NULL;
static int iface_ind = -1;
 
#ifdef HAVE_LINUX_IF_PACKET_H
static struct sockaddr_ll ll;   /* Socket address structure */
#endif
 
static bool raw_mode = false;
static bool reply_expected = true;
 
static char const *dhcpclient_version = RADIUSD_VERSION_BUILD("dhcpclient");
 
/* structure to keep track of offered IP addresses */
typedef struct {
        uint32_t server_addr;
        uint32_t offered_addr;
} dc_offer_t;
 
static fr_dict_t const *dict_freeradius;
static fr_dict_t const *dict_dhcpv4;
 
extern fr_dict_autoload_t dhcpclient_dict[];
fr_dict_autoload_t dhcpclient_dict[] = {
        { .out = &dict_freeradius, .proto = "freeradius" },
        { .out = &dict_dhcpv4, .proto = "dhcpv4" },
        { NULL }
};
 
static fr_dict_attr_t const *attr_packet_type;
static fr_dict_attr_t const *attr_dhcp_message_type;
static fr_dict_attr_t const *attr_dhcp_dhcp_server_identifier;
static fr_dict_attr_t const *attr_dhcp_your_ip_address;
 
extern fr_dict_attr_autoload_t dhcpclient_dict_attr[];
fr_dict_attr_autoload_t dhcpclient_dict_attr[] = {
        { .out = &attr_packet_type, .name = "Packet-Type", .type = FR_TYPE_UINT32, .dict = &dict_dhcpv4 },
        { .out = &attr_dhcp_message_type, .name = "Message-Type", .type = FR_TYPE_UINT8, .dict = &dict_dhcpv4},
        { .out = &attr_dhcp_dhcp_server_identifier, .name = "Server-Identifier", .type = FR_TYPE_IPV4_ADDR, .dict = &dict_dhcpv4 },
        { .out = &attr_dhcp_your_ip_address, .name = "Your-IP-Address", .type = FR_TYPE_IPV4_ADDR, .dict = &dict_dhcpv4 },
        { NULL }
};
 
static fr_table_num_sorted_t const request_types[] = {
        { L("auto"),            0                       },
        { L("decline"),         FR_DHCP_DECLINE         },
        { L("discover"),        FR_DHCP_DISCOVER        },
        { L("inform"),          FR_DHCP_INFORM          },
        { L("lease_query"),     FR_DHCP_LEASE_QUERY     },
        { L("release"),         FR_DHCP_RELEASE         },
        { L("request"),         FR_DHCP_REQUEST         }
};
static size_t request_types_len = NUM_ELEMENTS(request_types);
 
static NEVER_RETURNS void usage(void)
{
        DEBUG("Usage: dhcpclient [options] server[:port] [<command>]");
        DEBUG("Send a DHCP request with provided RADIUS attrs and output response.");
 
        DEBUG("  <command>              One of: discover, request, decline, release, inform; or: auto.");
        DEBUG("  -d <directory>         Set the directory where the dictionaries are stored (defaults to " RADDBDIR ").");
        DEBUG("  -D <dictdir>           Set main dictionary directory (defaults to " DICTDIR ").");
        DEBUG("  -f <file>              Read packets from file, not stdin.");
        DEBUG("  -i <interface>         Use this interface to send/receive at packet level on a raw socket.");
        DEBUG("  -r <retries>           On timeout, retry sending the packet 'retries' times.\n");
        DEBUG("  -t <timeout>           Wait 'timeout' seconds for a reply (may be a floating point number).");
        DEBUG("  -v                     Show program version information.");
        DEBUG("  -x                     Debugging mode.");
 
        fr_exit(EXIT_SUCCESS);
}
 
 
/*
 *      Initialize the request.
 */
static int request_init(fr_packet_t **out, fr_pair_list_t *packet_vps, char const *filename)
{
        FILE                    *fp;
        fr_pair_t               *vp;
        bool                    filedone = false;
        fr_packet_t     *packet;
 
        /*
         *      Determine where to read the VP's from.
         */
        if (filename) {
                fp = fopen(filename, "r");
                if (!fp) {
                        ERROR("Error opening %s: %s", filename, fr_syserror(errno));
                        return -1;
                }
        } else {
                DEBUG("Reading packets from stdin\n");
                fp = stdin;
        }
 
        packet = fr_packet_alloc(NULL, false);
 
        /*
         *      Read the VP's.
         */
        if (fr_pair_list_afrom_file(packet, dict_dhcpv4, packet_vps, fp, &filedone) < 0) {
                fr_perror("dhcpclient");
                fr_packet_free(&packet);
                if (fp != stdin) fclose(fp);
                return -1;
        }
 
        /*
         *      Fix / set various options
         */
        for (vp = fr_pair_list_head(packet_vps);
             vp;
             vp = fr_pair_list_next(packet_vps, vp)) {
                /*
                 *      Allow to set packet type using Message-Type
                 */
                if (vp->da == attr_dhcp_message_type) {
                        packet->code = vp->vp_uint8;
 
                /*
                 *      Allow it to set the packet type in
                 *      the attributes read from the file.
                 *      (this takes precedence over the command argument.)
                 */
                } else if (vp->da == attr_packet_type) {
                        packet->code = vp->vp_uint32;
 
                } /* switch over the attribute */
 
        } /* loop over the VP's we read in */
 
        /*
         *      Fill in the packet header from attributes, and then
         *      re-realize the attributes.
         */
        fr_packet_pairs_to_packet(packet, packet_vps);
 
        if (fp != stdin) fclose(fp);
 
        /*
         *      And we're done.
         */
        *out = packet;
 
        return 0;
}
 
 
/*
 *      Loop waiting for DHCP replies until timer expires.
 *      Note that there may be more than one reply: multiple DHCP servers can respond to a broadcast discover.
 *      A real client would pick one of the proposed replies.
 *      We'll just return the first eligible reply, and display the others.
 */
#if defined(HAVE_LINUX_IF_PACKET_H) || defined (HAVE_LIBPCAP)
static fr_packet_t *fr_dhcpv4_recv_raw_loop(int lsockfd,
#ifdef HAVE_LINUX_IF_PACKET_H
                                            struct sockaddr_ll *p_ll,
#endif
                                            fr_packet_t *request,
#ifndef HAVE_LINUX_IF_PACKET_H
                                            UNUSED
#endif
                                            fr_pair_list_t *request_list
                                            )
{
        fr_time_delta_t our_timeout;
        fr_packet_t     *found = NULL;
        fr_packet_t     *reply = NULL;
        fr_pair_list_t          reply_vps;
        int                     nb_reply = 0;
        int                     nb_offer = 0;
        dc_offer_t              *offer_list = NULL;
        fd_set                  read_fd;
        int                     retval;
        fr_dcursor_t            cursor;
 
        fr_pair_list_init(&reply_vps);
 
        our_timeout = timeout;
 
        /* Loop waiting for DHCP replies until timer expires */
        while (fr_time_delta_ispos(our_timeout)) {
                if ((!found) || (reply)) { // only debug at start and each time we get a valid DHCP reply on raw socket
                        DEBUG("Waiting for %s DHCP replies for: %.6f",
                              (nb_reply > 0) ? " additional ":" ", fr_time_delta_unwrap(our_timeout) / (double)NSEC);
                }
 
                reply = NULL;
                FD_ZERO(&read_fd);
                FD_SET(lsockfd, &read_fd);
                retval = select(lsockfd + 1, &read_fd, NULL, NULL, &fr_time_delta_to_timeval(our_timeout));
                if (retval < 0) {
                        fr_strerror_printf("Select on DHCP socket failed: %s", fr_syserror(errno));
                        return NULL;
                }
 
                if (retval > 0 && FD_ISSET(lsockfd, &read_fd)) {
                        /* There is something to read on our socket */
 
#ifdef HAVE_LINUX_IF_PACKET_H
                        reply = fr_dhcpv4_raw_packet_recv(lsockfd, p_ll, request, request_list);
#else
#  ifdef HAVE_LIBPCAP
                        reply = fr_dhcpv4_pcap_recv(pcap);
#  else
#    error Need <if/packet.h> or <pcap.h>
#  endif
#endif
                } else {
                        our_timeout = fr_time_delta_wrap(0);
                }
 
                if (reply) {
                        nb_reply ++;
 
                        if (fr_debug_lvl > 1) fr_dhcpv4_print_hex(stdout, reply->data, reply->data_len);
 
                        fr_pair_dcursor_init(&cursor, &reply_vps);
                        if (fr_dhcpv4_decode(reply, &reply_vps, reply->data, reply->data_len, &reply->code) < 0) {
                                ERROR("Failed decoding reply");
                                return NULL;
                        }
 
                        if (!found) found = reply;
 
                        if (reply->code == FR_DHCP_OFFER) {
                                fr_pair_t *vp1 = fr_pair_find_by_da(&reply_vps, NULL, attr_dhcp_dhcp_server_identifier);
                                fr_pair_t *vp2 = fr_pair_find_by_da(&reply_vps, NULL, attr_dhcp_your_ip_address);
 
                                if (vp1 && vp2) {
                                        nb_offer++;
                                        offer_list = talloc_realloc(request, offer_list, dc_offer_t, nb_offer);
                                        offer_list[nb_offer - 1].server_addr = vp1->vp_ipv4addr;
                                        offer_list[nb_offer - 1].offered_addr = vp2->vp_ipv4addr;
                                }
                        }
                }
        }
 
        if (0 == nb_reply) {
                DEBUG("No valid DHCP reply received");
                return NULL;
        }
 
        /* display offer(s) received */
        if (nb_offer > 0 ) {
                int i;
 
                DEBUG("Received %d DHCP Offer(s):", nb_offer);
                for (i = 0; i < nb_reply; i++) {
                        char server_addr_buf[INET6_ADDRSTRLEN];
                        char offered_addr_buf[INET6_ADDRSTRLEN];
 
                        DEBUG("IP address: %s offered by DHCP server: %s",
                              inet_ntop(AF_INET, &offer_list[i].offered_addr,
                                        offered_addr_buf, sizeof(offered_addr_buf)),
                              inet_ntop(AF_INET, &offer_list[i].server_addr,
                                        server_addr_buf, sizeof(server_addr_buf))
                        );
                }
        }
 
        return found;
}
#endif  /* <if/packet.h> or <pcap.h> */
 
static int send_with_socket(fr_packet_t **reply, fr_packet_t *request,
#ifndef HAVE_LINUX_IF_PACKET_H
                            UNUSED
#endif
                            fr_pair_list_t *request_list)
{
        int on = 1;
 
#ifdef HAVE_LINUX_IF_PACKET_H
        if (raw_mode) {
                sockfd = fr_dhcpv4_raw_socket_open(&ll, iface_ind);
                if (sockfd < 0) {
                        ERROR("Error opening socket");
                        return -1;
                }
        } else
#endif
        {
                sockfd = fr_socket_server_udp(&request->socket.inet.src_ipaddr, &request->socket.inet.src_port, NULL, false);
                if (sockfd < 0) {
                        ERROR("Error opening socket - %s", fr_strerror());
                        return -1;
                }
 
                if (fr_socket_bind(sockfd, NULL, &request->socket.inet.src_ipaddr, &request->socket.inet.src_port) < 0) {
                        ERROR("Error binding socket - %s", fr_strerror());
                        return -1;
                }
        }
 
 
        /*
         *      Set option 'receive timeout' on socket.
         *      Note: in case of a timeout, the error will be "Resource temporarily unavailable".
         */
        if (setsockopt(sockfd, SOL_SOCKET, SO_RCVTIMEO,
                       &fr_time_delta_to_timeval(timeout), sizeof(struct timeval)) == -1) {
                ERROR("Failed setting socket timeout: %s", fr_syserror(errno));
                return -1;
        }
 
        if (setsockopt(sockfd, SOL_SOCKET, SO_BROADCAST, &on, sizeof(on)) < 0) {
                ERROR("Can't set broadcast option: %s", fr_syserror(errno));
                return -1;
        }
        request->socket.fd = sockfd;
 
#ifdef HAVE_LINUX_IF_PACKET_H
        if (raw_mode) {
                if (fr_dhcpv4_raw_packet_send(sockfd, &ll, request, request_list) < 0) {
                        ERROR("Failed sending (fr_dhcpv4_raw_packet_send): %s", fr_syserror(errno));
                        return -1;
                }
                if (!reply_expected) return 0;
 
                *reply = fr_dhcpv4_recv_raw_loop(sockfd, &ll, request, request_list);
                if (!*reply) {
                        ERROR("Error receiving reply (fr_dhcpv4_recv_raw_loop)");
                        return -1;
                }
        } else
#endif
        {
                if (fr_dhcpv4_udp_packet_send(request) < 0) {
                        ERROR("Failed sending: %s", fr_syserror(errno));
                        return -1;
                }
                if (!reply_expected) return 0;
 
                *reply = fr_dhcpv4_udp_packet_recv(sockfd);
                if (!*reply) {
                        if (errno == EAGAIN) {
                                fr_strerror_clear(); /* clear error */
                                ERROR("Timed out waiting for reply");
                        } else {
                                ERROR("Error receiving reply");
                        }
                        return -1;
                }
        }
 
        return 0;
}
 
#ifdef HAVE_LIBPCAP
static int send_with_pcap(fr_packet_t **reply, fr_packet_t *request, fr_pair_list_t *request_list)
{
        char ip[16];
        char pcap_filter[255];
 
        pcap = fr_pcap_init(NULL, iface, PCAP_INTERFACE_IN_OUT);
        if (!pcap) {
                ERROR("Failed creating pcap");
                return -1;
        }
 
        if (fr_pcap_open(pcap) < 0) {
                ERROR("Failed opening interface");
                talloc_free(pcap);
                return -1;
        }
 
        fr_inet_ntoh(&request->socket.inet.src_ipaddr, ip, sizeof(ip));
        snprintf(pcap_filter, sizeof(pcap_filter), "udp and dst port %d", request->socket.inet.src_port);
 
        if (fr_pcap_apply_filter(pcap, pcap_filter) < 0) {
                ERROR("Failing setting filter");
                talloc_free(pcap);
                return -1;
        }
 
        if (fr_dhcpv4_pcap_send(pcap, eth_bcast, request) < 0) {
                ERROR("Failed sending request");
                talloc_free(pcap);
                return -1;
        }
 
        if (!reply_expected) return 0;
 
        *reply = fr_dhcpv4_recv_raw_loop(pcap->fd,
#ifdef HAVE_LINUX_IF_PACKET_H
                                      &ll,
#endif
                                      request, request_list);
 
        if (!*reply) {
                ERROR("Error receiving reply");
                talloc_free(pcap);
                return -1;
        }
 
        talloc_free(pcap);
        return 0;
}
#endif  /* HAVE_LIBPCAP */
 
static void dhcp_packet_debug(fr_packet_t *packet, fr_pair_list_t *list, bool received)
{
        char            buffer[2048];
 
        char            src_ipaddr[INET6_ADDRSTRLEN];
        char            dst_ipaddr[INET6_ADDRSTRLEN];
#if defined(WITH_IFINDEX_NAME_RESOLUTION)
        char            if_name[IFNAMSIZ];
#endif
        fr_pair_t       *vp;
 
        if (!packet) return;
 
        /*
         *      Client-specific debugging re-prints the input
         *      packet into the client log.
         *
         *      This really belongs in a utility library
         */
        printf("%s %s Id %08x from %s%s%s:%i to %s%s%s:%i "
#ifdef WITH_IFINDEX_NAME_RESOLUTION
               "%s%s%s"
#endif
               "length %zu\n",
               received ? "Received" : "Sending",
               dhcp_message_types[packet->code],
               packet->id,
               packet->socket.inet.src_ipaddr.af == AF_INET6 ? "[" : "",
               inet_ntop(packet->socket.inet.src_ipaddr.af,
                         &packet->socket.inet.src_ipaddr.addr,
                         src_ipaddr, sizeof(src_ipaddr)),
               packet->socket.inet.src_ipaddr.af == AF_INET6 ? "]" : "",
               packet->socket.inet.src_port,
               packet->socket.inet.dst_ipaddr.af == AF_INET6 ? "[" : "",
               inet_ntop(packet->socket.inet.dst_ipaddr.af,
                         &packet->socket.inet.dst_ipaddr.addr,
                         dst_ipaddr, sizeof(dst_ipaddr)),
               packet->socket.inet.dst_ipaddr.af == AF_INET6 ? "]" : "",
               packet->socket.inet.dst_port,
#ifdef WITH_IFINDEX_NAME_RESOLUTION
               packet->socket.inet.ifindex ? "via " : "",
               packet->socket.inet.ifindex ? fr_ifname_from_ifindex(if_name, packet->socket.inet.ifindex) : "",
               packet->socket.inet.ifindex ? " " : "",
#endif
               packet->data_len);
 
        for (vp = fr_pair_list_head(list);
             vp;
             vp = fr_pair_list_next(list, vp)) {
                PAIR_VERIFY(vp);
 
                (void) fr_pair_print(&FR_SBUFF_OUT(buffer, sizeof(buffer)), NULL, vp);
                printf("\t%s\n", buffer);
        }
}
 
int main(int argc, char **argv)
{
 
        static uint16_t         server_port = 0;
        static int              packet_code = 0;
        static fr_ipaddr_t      server_ipaddr;
        static fr_ipaddr_t      client_ipaddr;
 
        int                     c;
        char const              *raddb_dir = RADDBDIR;
        char const              *dict_dir = DICTDIR;
        char const              *filename = NULL;
 
        fr_packet_t     *packet = NULL;
        fr_pair_list_t          packet_vps;
        fr_packet_t     *reply = NULL;
        fr_pair_list_t          reply_vps;
 
        int                     ret;
 
        fr_pair_list_init(&packet_vps);
        fr_pair_list_init(&reply_vps);
 
        /*
         *      Must be called first, so the handler is called last
         */
        fr_atexit_global_setup();
 
        fr_debug_lvl = 1;
 
        while ((c = getopt(argc, argv, "d:D:f:hr:t:vxi:")) != -1) switch(c) {
                case 'D':
                        dict_dir = optarg;
                        break;
 
                case 'd':
                        raddb_dir = optarg;
                        break;
 
                case 'f':
                        filename = optarg;
                        break;
 
                case 'i':
                        iface = optarg;
                        break;
 
                case 'r':
                        if (!isdigit((uint8_t) *optarg)) usage();
                        retries = atoi(optarg);
                        if ((retries == 0) || (retries > 1000)) usage();
                        break;
 
                case 't':
                        if (fr_time_delta_from_str(&timeout, optarg, strlen(optarg), FR_TIME_RES_SEC) < 0) usage();
                        break;
 
                case 'v':
                        DEBUG("%s", dhcpclient_version);
                        fr_exit(EXIT_SUCCESS);
 
                case 'x':
                        fr_debug_lvl++;
                        break;
 
                case 'h':
                default:
                        usage();
        }
        argc -= (optind - 1);
        argv += (optind - 1);
 
        if (argc < 2) usage();
 
        if (!fr_dict_global_ctx_init(NULL, true, dict_dir)) {
                fr_perror("dhcpclient");
                fr_exit(EXIT_FAILURE);
        }
 
        if (fr_dict_autoload(dhcpclient_dict) < 0) {
                fr_perror("dhcpclient");
                fr_exit(EXIT_FAILURE);
        }
 
        if (fr_dict_attr_autoload(dhcpclient_dict_attr) < 0) {
                fr_perror("dhcpclient");
                fr_exit(EXIT_FAILURE);
        }
 
        if (fr_dict_read(fr_dict_unconst(dict_freeradius), raddb_dir, FR_DICTIONARY_FILE) == -1) {
                fr_perror("dhcpclient");
                fr_exit(EXIT_FAILURE);
        }
 
        packet_global_init();
 
        fr_strerror_clear();    /* Clear the error buffer */
 
        /*
         *      Initialise the DHCPv4 library
         */
        if (fr_dhcpv4_global_init() < 0) {
                fr_perror("dhcpclient");
                fr_exit(EXIT_FAILURE);
        }
 
        /*
         *      Resolve hostname.
         */
        server_ipaddr.af = AF_INET;
        if (strcmp(argv[1], "-") != 0) {
                if (fr_inet_pton_port(&server_ipaddr, &server_port, argv[1],
                                      strlen(argv[1]), AF_UNSPEC, true, true) < 0) {
                        fr_perror("dhcpclient");
                        fr_exit(EXIT_FAILURE);
                }
                client_ipaddr.af = server_ipaddr.af;
        }
 
        /*
         *      See what kind of request we want to send.
         */
        if (argc >= 3) {
                if (!isdigit((uint8_t) argv[2][0])) {
                        packet_code = fr_table_value_by_str(request_types, argv[2], -2);
                        if (packet_code == -2) {
                                ERROR("Unknown packet type: %s", argv[2]);
                                usage();
                        }
                } else {
                        packet_code = atoi(argv[2]);
                }
        }
        if (!server_port) server_port = 67;
 
        /*
         *      set "raw mode" if an interface is specified and if destination
         *      IP address is the broadcast address.
         */
        if (iface) {
                iface_ind = if_nametoindex(iface);
                if (iface_ind <= 0) {
                        ERROR("Unknown interface: %s", iface);
                        fr_exit(EXIT_FAILURE);
                }
 
                if (server_ipaddr.addr.v4.s_addr == 0xFFFFFFFF) {
                        ERROR("Using interface: %s (index: %d) in raw packet mode", iface, iface_ind);
                        raw_mode = true;
                }
        }
 
        if ((request_init(&packet, &packet_vps, filename) < 0) || fr_pair_list_empty(&packet_vps)) {
                ERROR("Nothing to send");
                fr_exit(EXIT_FAILURE);
        }
 
        /*
         *      Set defaults if they weren't specified via pairs
         */
        if (packet->socket.inet.src_port == 0) packet->socket.inet.src_port = server_port + 1;
        if (packet->socket.inet.dst_port == 0) packet->socket.inet.dst_port = server_port;
        if (packet->socket.inet.src_ipaddr.af == AF_UNSPEC) packet->socket.inet.src_ipaddr = client_ipaddr;
        if (packet->socket.inet.dst_ipaddr.af == AF_UNSPEC) packet->socket.inet.dst_ipaddr = server_ipaddr;
        if (!packet->code) packet->code = packet_code;
 
        /*
         *      Sanity check.
         */
        if (!packet->code) {
                ERROR("Command was %s, and request did not contain Message-Type nor Packet-Type",
                      (argc >= 3) ? "'auto'" : "unspecified");
                fr_exit(EXIT_FAILURE);
        }
 
        /*
         *      These kind of packets do not get a reply, so don't wait for one.
         */
        if ((packet->code == FR_DHCP_RELEASE) || (packet->code == FR_DHCP_DECLINE)) {
                reply_expected = false;
        }
 
        /*
         *      Encode the packet
         */
        if (fr_dhcpv4_packet_encode(packet, &packet_vps) < 0) {
                ERROR("Failed encoding packet");
                fr_exit(EXIT_FAILURE);
        }
 
        /*
         *      Decode the request to produce fr_pair_t's from the headers.
         */
        if (fr_debug_lvl) {
                if (fr_debug_lvl > 1) fr_dhcpv4_print_hex(stdout, packet->data, packet->data_len);
 
                (void) fr_dhcpv4_decode(packet, &reply_vps, packet->data, packet->data_len, &packet->code);
                dhcp_packet_debug(packet, &reply_vps, false);
                fr_pair_list_free(&reply_vps);
        }
 
#ifdef HAVE_LIBPCAP
        if (raw_mode) {
                ret = send_with_pcap(&reply, packet, &packet_vps);
        } else
#endif
        {
                ret = send_with_socket(&reply, packet, &packet_vps);
        }
 
        if (reply) {
                if (fr_dhcpv4_decode(reply, &reply_vps, reply->data, reply->data_len, &reply->code) < 0) {
                        ERROR("Failed decoding packet");
                        ret = -1;
                }
                dhcp_packet_debug(reply, &reply_vps, true);
        }
 
        fr_dhcpv4_global_free();
 
        packet_global_free();
 
        if (fr_dict_autofree(dhcpclient_dict) < 0) {
                fr_perror("dhcpclient");
                ret = -1;
        }
 
        /*
         *      Ensure our atexit handlers run before any other
         *      atexit handlers registered by third party libraries.
         */
        fr_atexit_global_trigger_all();
 
        return ret < 0 ? EXIT_FAILURE : EXIT_SUCCESS;
}