toe_beans/v4/server/

ip_pool.rs

use super::Config;
use crate::v4::error::Result;
use ipnetwork::Ipv4Network;
use log::{debug, info, warn};
use mac_address::MacAddress;
use serde::{Deserialize, Serialize};
use std::fs::read_to_string;
use std::io::Write;
use std::os::unix::fs::OpenOptionsExt;
use std::path::PathBuf;
use std::time::{Duration, SystemTime};
use std::{
    collections::{HashMap, HashSet},
    fs::OpenOptions,
    net::Ipv4Addr,
};

#[derive(Deserialize, Serialize, Clone)]
enum LeaseStatus {
    Offered,
    Acked,
}

#[derive(Deserialize, Serialize, Clone)]
struct Lease {
    ip: Ipv4Addr,
    status: LeaseStatus,
    // TODO this time measurement is not monotonic.
    when: SystemTime,
}

impl Lease {
    fn is_expired(&self, lease_time: u32) -> Result<bool> {
        match self.when.elapsed() {
            Ok(elapsed) => Ok(elapsed >= Duration::from_secs(lease_time as u64)),
            Err(_) => Err("Problem getting elapsed system time"),
        }
    }
}

/// Used to manage the dynamic collection of IP addresses that the server leases.
// TODO Use a CIDR Trie for this?
#[derive(Deserialize, Serialize)]
pub struct IpPool {
    #[serde(skip)]
    available: HashSet<Ipv4Addr>,
    leased: HashMap<MacAddress, Lease>,
    /// The server will always assign these ip adddresses to these mac addresses.
    /// All static leases must be within the network_cidr range.
    static_leases: HashMap<MacAddress, Ipv4Addr>,
    /// Passed to IpPool from Config.network_cidr.
    network: Ipv4Network,
    /// Passed to IpPool from Config.lease_time, so IpPool can check for lease expiration.
    lease_time: u32,
    #[serde(skip)]
    /// Passed to IpPool from Config.path because they share a single directory.
    file_path: PathBuf,
}

impl IpPool {
    /// The file name that the IpPool is read from and written to.
    pub const FILE_NAME: &'static str = "toe-beans-leases.toml";

    /// Create a pool with the capacity of the configured network's size.
    pub fn new(config: &Config) -> Self {
        let network = config.network_cidr;
        let size = network.size() as usize;
        let mut available = HashSet::with_capacity(size);
        available.extend(network.iter());
        let leased = HashMap::with_capacity(size);
        let static_leases = HashMap::new();

        Self {
            file_path: config.path.clone(),
            available,
            leased,
            static_leases,
            network,
            lease_time: config.lease_time.as_server(),
        }
    }

    /// Restores the state of an IpPool from a toe-beans-leases.toml
    /// as long as the IpPool's network (range/capacity) has not changed.
    /// Static leases are verified to be within network range.
    ///
    /// This does not restore dhcp offers.
    pub fn restore(config: &Config) -> Result<Self> {
        let network = config.network_cidr;
        let read_result = read_to_string(config.path.join(Self::FILE_NAME));

        let mut ip_pool: IpPool = match read_result {
            Ok(toml_string) => {
                let toml_result = toml::from_str(&toml_string);
                match toml_result {
                    Ok(ip_pool) => ip_pool,
                    Err(_) => return Err("Problem parsing leases file"),
                }
            }
            Err(_) => {
                return Err("Problem reading leases file");
            }
        };

        if network != ip_pool.network {
            return Err(
                "The restored and configured IP address pool's network range/capacity do not match",
            );
        }

        ip_pool.static_leases.values().try_for_each(|static_ip| {
            if !network.contains(*static_ip) {
                return Err("The configured network range does not include the static ip");
            }

            Ok(())
        })?;

        ip_pool.available.extend(network.iter());

        // TODO remove restored "acked" from "available"

        info!("Restored IP address leases");
        Ok(ip_pool)
    }

    /// Use the toe-beans-leases.toml to restore past leases
    /// or return a new IpPool if that was not successful.
    pub fn restore_or_new(config: &Config) -> Self {
        IpPool::restore(config).unwrap_or_else(|_| IpPool::new(config))
    }

    /// Writes leases to persistent storage as toe-beans-leases.toml
    fn commit(&self) -> Result<()> {
        debug!("Writing {}", Self::FILE_NAME);

        let file_content = match toml::to_string_pretty(&self) {
            Ok(content) => content,
            Err(_) => return Err("Failed to generate toml data"),
        };

        let open_result = OpenOptions::new()
            .read(false)
            .write(true)
            .create(true)
            .truncate(true)
            .mode(0o644) // ensure that file permissions are set before creating file
            .open(self.file_path.join(Self::FILE_NAME));

        let mut file = match open_result {
            Ok(file) => file,
            Err(_) => return Err("Failed to open file for writing"),
        };

        match file.write_all(file_content.as_bytes()) {
            Ok(_) => Ok(()),
            Err(_) => Err("Failed to write to file"),
        }
    }

    /// Takes an available IP address, marks it as offered, and returns it.
    ///
    /// Returns one of:
    /// - The previously offered address, if one has been offered.
    /// - The requested address:
    ///   - If one was requested,
    ///   - _and_ it is in the pool's range,
    ///   - _and_ it is available,
    ///   - _and_ there is not a static lease
    /// - Otherwise any available address (unless none are available).
    pub fn offer(&mut self, owner: MacAddress, requested_ip: Option<Ipv4Addr>) -> Result<Ipv4Addr> {
        if let Some(lease) = self.leased.get(&owner) {
            match lease.status {
                LeaseStatus::Offered => {
                    warn!(
                        "{} will be offered an IP address that it has already been offered",
                        owner
                    );
                    return Ok(lease.ip);
                }
                LeaseStatus::Acked => {
                    if !lease.is_expired(self.lease_time)? {
                        return Err("This device has already been leased a non-expired IP address");
                    }
                }
            }
        }

        if let Some(requested_ip) = requested_ip {
            let ip_in_pool = self.network.contains(requested_ip);
            let not_available = !self.available.contains(&requested_ip);
            let has_static_lease = self.static_leases.contains_key(&owner);

            if !ip_in_pool {
                debug!("Requested IP Address is not in network range");
            } else if not_available {
                debug!("Requested IP Address is not available");
            } else if has_static_lease {
                debug!("Requested IP Address ignored because owner has static lease");
            } else {
                self.available.remove(&requested_ip);
                self.leased.insert(
                    owner,
                    Lease {
                        ip: requested_ip,
                        status: LeaseStatus::Offered,
                        when: SystemTime::now(),
                    },
                );
                return Ok(requested_ip);
            }
        }

        // else give an available ip address below...
        let ip = self.find_available_ip(&owner)?;
        self.leased.insert(
            owner,
            Lease {
                ip,
                status: LeaseStatus::Offered,
                when: SystemTime::now(),
            },
        );
        Ok(ip)
    }

    /// Takes a chaddr's offered ip address and marks it as reserved
    /// then commits it to persistent storage and returns the address.
    ///
    /// Currently only one IP is allowed per chaddr.
    pub fn ack(&mut self, owner: MacAddress) -> Result<Ipv4Addr> {
        let maybe_leased = self.leased.get_mut(&owner);
        let ip = match maybe_leased {
            Some(leased) => {
                match leased.status {
                    LeaseStatus::Offered => {
                        leased.status = LeaseStatus::Acked;
                        leased.when = SystemTime::now();
                        leased.ip
                    }
                    LeaseStatus::Acked => {
                        if !leased.is_expired(self.lease_time)? {
                            return Err(
                                "This device has already been leased a non-expired IP address",
                            );
                        }

                        // TODO should leased.when be refreshed here?

                        leased.ip
                    }
                }
            }
            None => {
                // nothing was offered, but this might be a rapid commit
                let ip = self.find_available_ip(&owner)?;
                self.leased.insert(
                    owner,
                    Lease {
                        ip,
                        status: LeaseStatus::Acked,
                        when: SystemTime::now(),
                    },
                );
                ip
            }
        };

        #[cfg(not(feature = "benchmark"))]
        self.commit()?;

        Ok(ip)
    }

    /// Resets the time of an offered or acked lease. Used in the lease renew/rebind process.
    pub fn extend(&mut self, owner: MacAddress) -> Result<()> {
        match self.leased.get_mut(&owner) {
            Some(lease) => {
                lease.when = SystemTime::now();
                Ok(())
            }
            None => Err("No IP address lease found with that owner"),
        }
    }

    /// Makes an ip address that was offered or acked available again.
    pub fn release(&mut self, owner: MacAddress) -> Result<()> {
        let maybe_leased = self.leased.remove(&owner);

        match maybe_leased {
            Some(lease) => {
                self.available.insert(lease.ip);
                Ok(())
            }
            None => Err("No IP address lease found with that owner"),
        }
    }

    /// Returns a static ip address or gets the next available address.
    /// If there are no more available addresses, then it will:
    /// 1. Search for offered addresses older than 1 minute
    /// 2. Search for acked addresses that have expired.
    fn find_available_ip(&mut self, owner: &MacAddress) -> Result<Ipv4Addr> {
        if let Some(ip) = self.static_leases.get(owner) {
            return match self.available.take(ip) {
                Some(ip) => Ok(ip),
                None => Err("A static lease was found but is not available"),
            };
        }

        if let Some(any) = self.available.iter().next().cloned() {
            debug!("Chose available IP address {any}");
            // UNWRAP is okay because we've found this element above
            return Ok(self.available.take(&any).unwrap());
        }

        // Offers only valid for about 5 minutes
        let offer_timeout: u32 = 300;

        let maybe_expired_lease = self
            .leased
            .clone() // TODO slow
            .into_iter() // TODO slow
            .find(|(_owner, lease)| match lease.status {
                // "Because the servers have not committed any network address assignments"
                // "on the basis of a DHCPOFFER, server are free to reuse offered network addresses in response to subsequent requests."
                // "Servers SHOULD NOT reuse offered addresses and may use an implementation-specific timeout mechanism to decide when to reuse an offered address."
                LeaseStatus::Offered => lease.is_expired(offer_timeout).unwrap_or(false),
                LeaseStatus::Acked => lease.is_expired(self.lease_time).unwrap_or(false),
            });

        if let Some(expired_lease) = maybe_expired_lease {
            debug!("Reusing expired lease's IP address");
            // UNWRAP is okay because we've found this element above
            return Ok(self.leased.remove(&expired_lease.0).unwrap().ip);
        }

        Err("No more IP addresses available")
    }

    /// Checks whether the passed IP address is available in the pool.
    pub fn is_available(&self, ip: &Ipv4Addr) -> bool {
        self.available.contains(ip)
    }

    /// Checks if the passed IP address matches the committed, leased IP address,
    /// and that the lease is not expired.
    pub fn verify_lease(&self, owner: MacAddress, ip: &Ipv4Addr) -> Result<()> {
        let maybe_leased = self.leased.get(&owner);

        match maybe_leased {
            Some(lease) => {
                if let LeaseStatus::Offered = lease.status {
                    return Err("Lease not acked");
                }

                if &lease.ip != ip {
                    return Err("Client's notion of ip address is wrong");
                }

                if lease.is_expired(self.lease_time)? {
                    return Err("Lease has expired");
                }

                Ok(())
            }
            None => Err("No IP address lease found with that owner"),
        }
    }
}