ACC SHELL

/**
 * File:
 *   cfg_policykit.scr
 * Summary:
 *   SCR Agent for reading/writing /etc/PolicyKit/privilege.d/*.privilege files
 *   using the ini-agent
 * Access:
 *   read/write
 * Authors:
 *   Ladislav Slezak <lslezak@suse.cz>
 * Example:
 *
 *   Read list of available files
 *   SCR::Dir(.etc.policykit.section)
 *
 *   Read list of sections in a file
 *   SCR::Dir(.etc.policykit.section."/etc/PolicyKit/privilege.d/hal-power-hibernate.privilege")
 *   (["Privilege"])
 *
 *   Read list of options in a section
 *   SCR::Dir(.etc.policykit.value."/etc/PolicyKit/privilege.d/hal-power-hibernate.privilege"."Privilege")
 *   (["RequiredPrivileges", "SufficientPrivileges", "Allow", "Deny", "CanObtain", "CanGrant", "ObtainRequireRoot"])
 *
 *   Read an option
 *   SCR::Read(.etc.policykit.value."/etc/PolicyKit/privilege.d/hal-power-hibernate.privilege"."Privilege"."RequiredPrivileges")
 *   ("desktop-console")
 *
 *
 *   Write an option
 *   SCR::Write(.etc.policykit.value."/etc/PolicyKit/privilege.d/hal-power-hibernate.privilege"."Privilege"."RequiredPrivileges", "")
 *   (true)
 *
 *
 *   Flush the changes
 *   SCR::Write(.etc.policykit, nil)
 *
 *
 *   Fore more information see the INI-agent documentation
 *
 * $Id: cfg_policykit.scr 57028 2009-04-29 10:58:09Z lslezak $
 */

.etc.policykit

`ag_ini(
    `IniAgent( ["/etc/PolicyKit/privilege.d/*.privilege"] , $[
	"options" : [ "no_nested_sections", "line_can_continue", "comments_last" ],
	"comments": [
	    "^[ \t]*$",		// empty line
	    "^[ \t]*#.*$",	// comment char
	],
	"sections" : [
	    $[
		"begin" : [ "^[ \t]*\\[[ \t]*(.*[^ \t])[ \t]*\\][ \t]*", "[%s]" ],
	    ]
	],
	"params" : [
	    $[
		"match" : [ "^[ \t]*([^=]*[^ \t=])[ \t]*=[ \t]*(.*[^ \t]|)[ \t]*$" , "%s=%s"],
	    ]
	]
    ]
  )
)