yast/yast-yast2

/**
 * File:        cfg_firewall2.scr
 * Summary:     Agent for reading/writing /etc/sysconfig/SuSEfirewall2
 * Author:      Lukas Ocilka <lukas.ocilka@suse.cz>
 * Access:      read / write
 *
 * Example:
 *   Dir(.sysconfig.SuSEfirewall2)
 *   (["FW_ROUTE", ...])
 **
 *   Read(.sysconfig.SuSEfirewall2.FW_ROUTE)
 *   ("yes")
 **
 *   Write(.sysconfig.SuSEfirewall2.FW_ROUTE, "no")
 *   (true)
 **
 *   // Don't forget to write nil to sync the settings!
 *   Write(.sysconfig.SuSEfirewall2, nil)
 *
 * $Id$
 *
 * Read/Sets the values defined in /etc/sysconfig/SuSEfirewall2
 * in an easy manner.
 */
.sysconfig.SuSEfirewall2

`ag_ini(
    `IniAgent (
    "/etc/sysconfig/SuSEfirewall2",
    $[
        // do not join_multiline, "\n" are replaced with " " later
        "options" : [ "line_can_continue", "global_values", "comments_last", "flat", ],
        "comments": [ "^[ \t]*#.*$", "#.*", "^[ \t]*$", ],
        "params" : [
        // single quotes
        $[
            "match" : [ "^[ \t]*([a-zA-Z0-9_]+)=\"([^\"]*)\"", "%s=\"%s\"" ],
            "multiline" : [ "^[ \t]*([^=]+)[ \t]*=[ \t]*\"([^\"]*)", "([^\"]*)\"" ],
        ],
        // double (common) quotes
        $[
            "match" : [ "^[ \t]*([a-zA-Z0-9_]+)='([^']*)'", "%s='%s'" ],
            "multiline" : [ "^[ \t]*([^=]+)[ \t]*=[ \t]*'([^']*)", "([^']*)'" ],
        ],
        // without any quotes
        $[
            "match" : [ "^[ \t]*([a-zA-Z0-9_]+)=([^ \t\"']*)[ \t]*$", "%s=\"%s\"" ],
        ],
        ],
    ]
    )
)