From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from firstgate.proxmox.com (firstgate.proxmox.com [212.224.123.68]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits)) (No client certificate requested) by lists.proxmox.com (Postfix) with ESMTPS id 537C49627 for ; Thu, 3 Aug 2023 14:18:03 +0200 (CEST) Received: from firstgate.proxmox.com (localhost [127.0.0.1]) by firstgate.proxmox.com (Proxmox) with ESMTP id 2B7952625 for ; Thu, 3 Aug 2023 14:17:33 +0200 (CEST) Received: from proxmox-new.maurer-it.com (proxmox-new.maurer-it.com [94.136.29.106]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange X25519 server-signature RSA-PSS (2048 bits)) (No client certificate requested) by firstgate.proxmox.com (Proxmox) with ESMTPS for ; Thu, 3 Aug 2023 14:17:32 +0200 (CEST) Received: from proxmox-new.maurer-it.com (localhost.localdomain [127.0.0.1]) by proxmox-new.maurer-it.com (Proxmox) with ESMTP id 3186F425C9 for ; Thu, 3 Aug 2023 14:17:32 +0200 (CEST) From: Lukas Wagner To: pve-devel@lists.proxmox.com Date: Thu, 3 Aug 2023 14:16:56 +0200 Message-Id: <20230803121719.519207-8-l.wagner@proxmox.com> X-Mailer: git-send-email 2.39.2 In-Reply-To: <20230803121719.519207-1-l.wagner@proxmox.com> References: <20230803121719.519207-1-l.wagner@proxmox.com> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-SPAM-LEVEL: Spam detection results: 0 AWL -0.053 Adjusted score from AWL reputation of From: address BAYES_00 -1.9 Bayes spam probability is 0 to 1% DMARC_MISSING 0.1 Missing DMARC policy KAM_DMARC_STATUS 0.01 Test Rule for DKIM or SPF Failure with Strict Alignment SPF_HELO_NONE 0.001 SPF: HELO does not publish an SPF Record SPF_PASS -0.001 SPF: sender matches SPF record T_SCC_BODY_TEXT_LINE -0.01 - Subject: [pve-devel] [PATCH v6 pve-manager 07/30] api: prepare api handler module for notification config X-BeenThere: pve-devel@lists.proxmox.com X-Mailman-Version: 2.1.29 Precedence: list List-Id: Proxmox VE development discussion List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , X-List-Received-Date: Thu, 03 Aug 2023 12:18:03 -0000 This commit adds a new Perl module, PVE::API2::Cluster::Notification. The module will contain all API handlers for the new notification subsystem. Signed-off-by: Lukas Wagner --- PVE/API2/Cluster.pm | 7 +++ PVE/API2/Cluster/Makefile | 1 + PVE/API2/Cluster/Notifications.pm | 71 +++++++++++++++++++++++++++++++ 3 files changed, 79 insertions(+) create mode 100644 PVE/API2/Cluster/Notifications.pm diff --git a/PVE/API2/Cluster.pm b/PVE/API2/Cluster.pm index 3daf6ae5..2e4cd9cc 100644 --- a/PVE/API2/Cluster.pm +++ b/PVE/API2/Cluster.pm @@ -29,6 +29,7 @@ use PVE::API2::Cluster::Ceph; use PVE::API2::Cluster::Mapping; use PVE::API2::Cluster::Jobs; use PVE::API2::Cluster::MetricServer; +use PVE::API2::Cluster::Notifications; use PVE::API2::ClusterConfig; use PVE::API2::Firewall::Cluster; use PVE::API2::HAConfig; @@ -52,6 +53,11 @@ __PACKAGE__->register_method ({ path => 'metrics', }); +__PACKAGE__->register_method ({ + subclass => "PVE::API2::Cluster::Notifications", + path => 'notifications', +}); + __PACKAGE__->register_method ({ subclass => "PVE::API2::ClusterConfig", path => 'config', @@ -149,6 +155,7 @@ __PACKAGE__->register_method ({ { name => 'log' }, { name => 'mapping' }, { name => 'metrics' }, + { name => 'notifications' }, { name => 'nextid' }, { name => 'options' }, { name => 'replication' }, diff --git a/PVE/API2/Cluster/Makefile b/PVE/API2/Cluster/Makefile index 0c52a241..b109e5cb 100644 --- a/PVE/API2/Cluster/Makefile +++ b/PVE/API2/Cluster/Makefile @@ -8,6 +8,7 @@ PERLSOURCE= \ BackupInfo.pm \ MetricServer.pm \ Mapping.pm \ + Notifications.pm \ Jobs.pm \ Ceph.pm diff --git a/PVE/API2/Cluster/Notifications.pm b/PVE/API2/Cluster/Notifications.pm new file mode 100644 index 00000000..1efebbc1 --- /dev/null +++ b/PVE/API2/Cluster/Notifications.pm @@ -0,0 +1,71 @@ +package PVE::API2::Cluster::Notifications; + +use warnings; +use strict; + +use Storable qw(dclone); +use JSON; + +use PVE::Tools qw(extract_param); +use PVE::JSONSchema qw(get_standard_option); +use PVE::RESTHandler; +use PVE::Notify; + +use base qw(PVE::RESTHandler); + +sub make_properties_optional { + my ($properties) = @_; + $properties = dclone($properties); + + for my $key (keys %$properties) { + $properties->{$key}->{optional} = 1 if $key ne 'name'; + } + + return $properties; +} + +sub raise_api_error { + my ($api_error) = @_; + + if (!(ref($api_error) eq 'HASH' && $api_error->{message} && $api_error->{code})) { + die $api_error; + } + + my $msg = "$api_error->{message}\n"; + my $exc = PVE::Exception->new($msg, code => $api_error->{code}); + + my (undef, $filename, $line) = caller; + + $exc->{filename} = $filename; + $exc->{line} = $line; + + die $exc; +} + +__PACKAGE__->register_method ({ + name => 'index', + path => '', + method => 'GET', + description => 'Index for notification-related API endpoints.', + permissions => { user => 'all' }, + parameters => { + additionalProperties => 0, + properties => {}, + }, + returns => { + type => 'array', + items => { + type => 'object', + properties => {}, + }, + links => [ { rel => 'child', href => '{name}' } ], + }, + code => sub { + my $result = [ + ]; + + return $result; + } +}); + +1; -- 2.39.2