-my $rules_modify_permissions = sub {
- my ($rule_env) = @_;
-
- if ($rule_env eq 'host') {
- return {
- check => ['perm', '/nodes/{node}', [ 'Sys.Modify' ]],
- };
- } elsif ($rule_env eq 'cluster' || $rule_env eq 'group') {
- return {
- check => ['perm', '/', [ 'Sys.Modify' ]],
- };
- } elsif ($rule_env eq 'vm' || $rule_env eq 'ct') {
- return {
- check => ['perm', '/vms/{vmid}', [ 'VM.Config.Network' ]],
- }
- }
-
- return undef;
-};
-
-my $rules_audit_permissions = sub {
- my ($rule_env) = @_;
-
- if ($rule_env eq 'host') {
- return {
- check => ['perm', '/nodes/{node}', [ 'Sys.Audit' ]],
- };
- } elsif ($rule_env eq 'cluster' || $rule_env eq 'group') {
- return {
- check => ['perm', '/', [ 'Sys.Audit' ]],
- };
- } elsif ($rule_env eq 'vm' || $rule_env eq 'ct') {
- return {
- check => ['perm', '/vms/{vmid}', [ 'VM.Audit' ]],
- }
- }
-
- return undef;
-};
-