{pkgs, config, ...}:

let
  inherit (pkgs.lib) mkOption mkIf;

  inherit (pkgs) ifplugd;

  # The ifplugd action script, which is called whenever the link
  # status changes (i.e., a cable is plugged in or unplugged).  We do
  # nothing when a cable is unplugged.  When a cable is plugged in, we
  # restart dhclient, which will hopefully give us a new IP address
  # if appropriate.
  plugScript = pkgs.writeScript "ifplugd.action"
    ''
      #! ${pkgs.stdenv.shell}
      if test "$2" = up; then
        initctl stop dhclient
        sleep 1
        initctl start dhclient
      fi
    '';

in 

{

  ###### interface

  options = {
  
    networking.interfaceMonitor.enable = mkOption {
      default = false;
      description = "
        If <literal>true</literal>, monitor Ethernet interfaces for
        cables being plugged in or unplugged.  When this occurs, the
        <command>dhclient</command> service is restarted to
        automatically obtain a new IP address.  This is useful for
        roaming users (laptops).
      ";
    };

    networking.interfaceMonitor.beep = mkOption {
      default = false;
      description = "
        If <literal>true</literal>, beep when an Ethernet cable is
        plugged in or unplugged.
      ";
    };
    
  };


  ###### implementation

  config = mkIf config.networking.interfaceMonitor.enable {

    jobs = pkgs.lib.singleton {
      name = "ifplugd";

      job = ''
        description "Network interface connectivity monitor"

        start on network-interfaces/started
        stop on network-interfaces/stop

        respawn ${ifplugd}/sbin/ifplugd --no-daemon --no-startup --no-shutdown \
            ${if config.networking.interfaceMonitor.beep then "" else "--no-beep"} \
            --run ${plugScript}
      '';
    };

    environment.systemPackages = [ifplugd];
      
  };

}