(version 1000)


(serializator "test_common"

    (procedure "exec"
        (arg "l_exec_cmd" (string))
    )

    (struct "LdActionExec" "exec"
        (field "executable" (f/string ["l_exec_cmd"]))
    )

    (procedure "grep"
        (arg "l_grep_cmd" (string))
    )

    (struct "LdGrep" "grep"
        (field "regex_str" (f/string ["l_grep_cmd"]))
    )

    (procedure "action-block"
        (proc "l_act" ["exec"] (proc-allow [collection]))
        (proc "l_grep" ["grep"] (proc-allow [optional]))
    )

    (procedure "action-unblock"
        (proc "l_act" ["exec"] (proc-allow [collection]))
        (proc "l_grep" ["grep"] (proc-allow [optional]))
    )

    (struct "LdActionBlock" ["action-block" "action-unblock"]
        (field "exec_pipeline" (f/vector (f/struct ["l_act"])))
        (field "grep_pipe" (f/optional (f/struct ["l_grep"])))
    )

    (rootprocedure
        (proc "l_root_block" ["action-block"] (proc-allow [optional]))
        (proc "l_root_unblock" ["action-unblock"] (proc-allow [optional]))
    )

    (rootstruct "LdAction"
        (field "action_block" (f/optional (f/struct ["l_root_block"])))
        (field "action_unblock" (f/optional (f/struct ["l_root_unblock"])))
    )

)