api: add locking helpers

[pve-firewall.git] / src / PVE / API2 / Firewall / IPSet.pm

diff --git a/src/PVE/API2/Firewall/IPSet.pm b/src/PVE/API2/Firewall/IPSet.pm
index e59a6f24eacaaa4af26efcdbc2b6ba77150171fa..72e7524b603ebb9a4b2ff6cef01ff78080b65722 100644 (file)
--- a/src/PVE/API2/Firewall/IPSet.pm
+++ b/src/PVE/API2/Firewall/IPSet.pm
@@ -25,6 +25,12 @@ my $api_properties = {
     },
 };
 
     },
 };
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    die "implement this in subclass";
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -353,6 +359,12 @@ sub rule_env {
     return 'cluster';
 }
 
     return 'cluster';
 }
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    PVE::Firewall::lock_clusterfw_conf(10, $code, $param);
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -390,6 +402,12 @@ __PACKAGE__->additional_parameters({
     vmid => get_standard_option('pve-vmid'),
 });
 
     vmid => get_standard_option('pve-vmid'),
 });
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    PVE::Firewall::lock_vmfw_conf($param->{vmid}, 10, $code, $param);
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -428,6 +446,12 @@ __PACKAGE__->additional_parameters({
     vmid => get_standard_option('pve-vmid'),
 });
 
     vmid => get_standard_option('pve-vmid'),
 });
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    PVE::Firewall::lock_vmfw_conf($param->{vmid}, 10, $code, $param);
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -457,6 +481,12 @@ use PVE::Firewall;
 
 use base qw(PVE::RESTHandler);
 
 
 use base qw(PVE::RESTHandler);
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    die "implement this in subclass";
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -638,6 +668,12 @@ sub rule_env {
     return 'cluster';
 }
 
     return 'cluster';
 }
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    PVE::Firewall::lock_clusterfw_conf(10, $code, $param);
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -680,6 +716,12 @@ sub rule_env {
     return 'vm';
 }
 
     return 'vm';
 }
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    PVE::Firewall::lock_vmfw_conf($param->{vmid}, 10, $code, $param);
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;
 


@@ -723,6 +765,12 @@ sub rule_env {
     return 'ct';
 }
 
     return 'ct';
 }
 

+sub lock_config {
+    my ($class, $param, $code) = @_;
+
+    PVE::Firewall::lock_vmfw_conf($param->{vmid}, 10, $code, $param);
+}
+

 sub load_config {
     my ($class, $param) = @_;
 
 sub load_config {
     my ($class, $param) = @_;