(* Extended dhclient module for Augeas
	Author: nathanielc@qualtrics.com
	
	This module reuses the distributed Dhclient module
	and adds the ability to use the option modifiers.
	
	Also adds the /etc/dhclient*.conf to the filter of valid files

*)

module Extdhclient =
	autoload xfm

(***************************************************************************
*                           OPTION MODIFING STATEMENTS
****************************************************************************)

	let stmt_opt_mod_re   = "default" | "supersede" | "append" | "prepend"

	let stmt_opt_mod    = [ key stmt_opt_mod_re 
							. Dhclient.sep_spc
							. [ key Dhclient.word . Dhclient.sep_spc . Dhclient.sto_to_spc ]
							. Dhclient.sep_scl
							. Dhclient.comment_or_eol ]
						
	
	let statement =  (Dhclient.statement | stmt_opt_mod)
	
	let lns = (Dhclient.empty | Dhclient.comment | statement) *

	let filter = Dhclient.filter . incl "/etc/dhclient*.conf"

	let xfm = transform lns filter