|
Packit Service |
a2ae7a |
(*
|
|
Packit Service |
a2ae7a |
Module: Star
|
|
Packit Service |
a2ae7a |
Parses star's configuration file
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
Author: Cedric Bosdonnat <cbosdonnat@suse.com>
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
About: Reference
|
|
Packit Service |
a2ae7a |
This lens is based on star(1)
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
About: License
|
|
Packit Service |
a2ae7a |
This file is licensed under the LGPL v2+, like the rest of Augeas.
|
|
Packit Service |
a2ae7a |
*)
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
module Star =
|
|
Packit Service |
a2ae7a |
autoload xfm
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
let sto_to_tab = store Rx.no_spaces
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
let size = Build.key_value_line "STAR_FIFOSIZE" Sep.space_equal ( store /[0-9x*.a-z]+/ )
|
|
Packit Service |
a2ae7a |
let size_max = Build.key_value_line "STAR_FIFOSIZE_MAX" Sep.space_equal ( store /[0-9x*.a-z]+/ )
|
|
Packit Service |
a2ae7a |
let archive = Build.key_value_line ( "archive". /[0-7]/ ) Sep.equal
|
|
Packit Service |
a2ae7a |
( [ label "device" . sto_to_tab ] . Sep.tab .
|
|
Packit Service |
a2ae7a |
[ label "block" . sto_to_tab ] . Sep.tab .
|
|
Packit Service |
a2ae7a |
[ label "size" . sto_to_tab ] . ( Sep.tab .
|
|
Packit Service |
a2ae7a |
[ label "istape" . sto_to_tab ] )? )
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
let lns = ( size | size_max | archive | Util.comment | Util.empty )*
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
let filter = incl "/etc/default/star"
|
|
Packit Service |
a2ae7a |
|
|
Packit Service |
a2ae7a |
let xfm = transform lns filter
|