On Fri Jul 12, 2024 at 1:27 PM CEST, Lukas Wagner wrote:
> These just call the API implementation via the perl-rs bindings.
>
> Signed-off-by: Lukas Wagner <l.wag...@proxmox.com>
> ---
>  PVE/API2/Cluster/Notifications.pm | 263 +++++++++++++++++++++++++++++-
>  1 file changed, 262 insertions(+), 1 deletion(-)
>
> diff --git a/PVE/API2/Cluster/Notifications.pm 
> b/PVE/API2/Cluster/Notifications.pm
> index 10b611c9..eae2d436 100644
> --- a/PVE/API2/Cluster/Notifications.pm
> +++ b/PVE/API2/Cluster/Notifications.pm
> @@ -108,6 +108,7 @@ __PACKAGE__->register_method ({
>           { name => 'gotify' },
>           { name => 'sendmail' },
>           { name => 'smtp' },
> +         { name => 'webhook' },
>       ];
>  
>       return $result;
> @@ -144,7 +145,7 @@ __PACKAGE__->register_method ({
>               'type' => {
>                   description => 'Type of the target.',
>                   type  => 'string',
> -                 enum => [qw(sendmail gotify smtp)],
> +                 enum => [qw(sendmail gotify smtp webhook)],
>               },
>               'comment' => {
>                   description => 'Comment',
> @@ -1094,6 +1095,266 @@ __PACKAGE__->register_method ({
>      }
>  });
>  
> +my $webhook_properties = {
> +    name => {
> +     description => 'The name of the endpoint.',
> +     type => 'string',
> +     format => 'pve-configid',
> +    },
> +    url => {
> +     description => 'Server URL',
> +     type => 'string',
> +    },
> +    method => {
> +     description => 'HTTP method',
> +     type => 'string',
> +     enum => [qw(post put get)],
> +    },
> +    header => {
> +     description => 'HTTP headers to set. These have to be formatted as'
> +       . ' a property string in the format name=<name>,value=<base64 of 
> value>',
> +     type => 'array',
> +     items => {
> +         type => 'string',
> +     },
> +     optional => 1,
> +    },
> +    body => {
> +     description => 'HTTP body, base64 encoded',
> +     type => 'string',
> +     optional => 1,
> +    },
> +    secret => {
> +     description => 'Secrets to set. These have to be formatted as'
> +       . ' a property string in the format name=<name>,value=<base64 of 
> value>',
> +     type => 'array',
> +     items => {
> +         type => 'string',
> +     },
> +     optional => 1,
> +    },
> +    comment => {
> +     description => 'Comment',
> +     type => 'string',
> +     optional => 1,
> +    },
> +    disable => {
> +     description => 'Disable this target',
> +     type => 'boolean',
> +     optional => 1,
> +     default => 0,
> +    },
> +};
> +
> +__PACKAGE__->register_method ({
> +    name => 'get_webhook_endpoints',
> +    path => 'endpoints/webhook',
> +    method => 'GET',
> +    description => 'Returns a list of all webhook endpoints',
> +    protected => 1,
> +    permissions => {
> +     check => ['perm', '/mapping/notifications', ['Mapping.Modify']],
> +     check => ['perm', '/mapping/notifications', ['Mapping.Audit']],
> +    },
> +    parameters => {
> +     additionalProperties => 0,
> +     properties => {},
> +    },
> +    returns => {
> +     type => 'array',
> +     items => {
> +         type => 'object',
> +         properties => {
> +             %$webhook_properties,

Would prefer `$webhook_properties->%*` here (postfix dereferencing) -
even though not explicitly stated in our style guide, we use that kind
of syntax for calling subroutines behind a reference, e.g.
`$foo->($arg)` instead of `&$foo($arg)`.

> +             'origin' => {
> +                 description => 'Show if this entry was created by a user or 
> was built-in',
> +                 type  => 'string',
> +                 enum => [qw(user-created builtin modified-builtin)],
> +             },
> +         },
> +     },
> +     links => [ { rel => 'child', href => '{name}' } ],
> +    },
> +    code => sub {
> +     my $config = PVE::Notify::read_config();
> +     my $rpcenv = PVE::RPCEnvironment::get();
> +
> +     my $entities = eval {
> +         $config->get_webhook_endpoints();
> +     };
> +     raise_api_error($@) if $@;
> +
> +     return $entities;
> +    }
> +});
> +
> +__PACKAGE__->register_method ({
> +    name => 'get_webhook_endpoint',
> +    path => 'endpoints/webhook/{name}',
> +    method => 'GET',
> +    description => 'Return a specific webhook endpoint',
> +    protected => 1,
> +    permissions => {
> +     check => ['or',
> +         ['perm', '/mapping/notifications', ['Mapping.Modify']],
> +         ['perm', '/mapping/notifications', ['Mapping.Audit']],
> +     ],
> +    },
> +    parameters => {
> +     additionalProperties => 0,
> +     properties => {
> +         name => {
> +             type => 'string',
> +             format => 'pve-configid',
> +             description => 'Name of the endpoint.'
> +         },
> +     }
> +    },
> +    returns => {
> +     type => 'object',
> +     properties => {
> +         %$webhook_properties,

Same here :)

> +         digest => get_standard_option('pve-config-digest'),
> +     }
> +    },
> +    code => sub {
> +     my ($param) = @_;
> +     my $name = extract_param($param, 'name');
> +
> +     my $config = PVE::Notify::read_config();
> +     my $endpoint = eval {
> +         $config->get_webhook_endpoint($name)
> +     };
> +
> +     raise_api_error($@) if $@;
> +     $endpoint->{digest} = $config->digest();
> +
> +     return $endpoint;
> +    }
> +});
> +
> +__PACKAGE__->register_method ({
> +    name => 'create_webhook_endpoint',
> +    path => 'endpoints/webhook',
> +    protected => 1,
> +    method => 'POST',
> +    description => 'Create a new webhook endpoint',
> +    permissions => {
> +     check => ['perm', '/mapping/notifications', ['Mapping.Modify']],
> +    },
> +    parameters => {
> +     additionalProperties => 0,
> +     properties => $webhook_properties,
> +    },
> +    returns => { type => 'null' },
> +    code => sub {
> +     my ($param) = @_;
> +     eval {
> +         PVE::Notify::lock_config(sub {
> +             my $config = PVE::Notify::read_config();
> +
> +             $config->add_webhook_endpoint(
> +                 $param,
> +             );
> +
> +             PVE::Notify::write_config($config);
> +         });
> +     };
> +
> +     raise_api_error($@) if $@;
> +     return;
> +    }
> +});
> +
> +__PACKAGE__->register_method ({
> +    name => 'update_webhook_endpoint',
> +    path => 'endpoints/webhook/{name}',
> +    protected => 1,
> +    method => 'PUT',
> +    description => 'Update existing webhook endpoint',
> +    permissions => {
> +     check => ['perm', '/mapping/notifications', ['Mapping.Modify']],
> +    },
> +    parameters => {
> +     additionalProperties => 0,
> +     properties => {
> +         %{ make_properties_optional($webhook_properties) },
> +         delete => {
> +             type => 'array',
> +             items => {
> +                 type => 'string',
> +                 format => 'pve-configid',
> +             },
> +             optional => 1,
> +             description => 'A list of settings you want to delete.',
> +         },
> +         digest => get_standard_option('pve-config-digest'),
> +     }
> +    },
> +    returns => { type => 'null' },
> +    code => sub {
> +     my ($param) = @_;
> +
> +     my $name = extract_param($param, 'name');
> +     my $delete = extract_param($param, 'delete');
> +     my $digest = extract_param($param, 'digest');
> +
> +     eval {
> +         PVE::Notify::lock_config(sub {
> +             my $config = PVE::Notify::read_config();
> +
> +             $config->update_webhook_endpoint(
> +                 $name,
> +                 $param,                # Config updater
> +                 $delete,
> +                 $digest,
> +             );
> +
> +             PVE::Notify::write_config($config);
> +         });
> +     };
> +
> +     raise_api_error($@) if $@;
> +     return;
> +    }
> +});
> +
> +__PACKAGE__->register_method ({
> +    name => 'delete_webhook_endpoint',
> +    protected => 1,
> +    path => 'endpoints/webhook/{name}',
> +    method => 'DELETE',
> +    description => 'Remove webhook endpoint',
> +    permissions => {
> +     check => ['perm', '/mapping/notifications', ['Mapping.Modify']],
> +    },
> +    parameters => {
> +     additionalProperties => 0,
> +     properties => {
> +         name => {
> +             type => 'string',
> +             format => 'pve-configid',
> +         },
> +     }
> +    },
> +    returns => { type => 'null' },
> +    code => sub {
> +     my ($param) = @_;
> +     my $name = extract_param($param, 'name');
> +
> +     eval {
> +         PVE::Notify::lock_config(sub {
> +             my $config = PVE::Notify::read_config();
> +             $config->delete_webhook_endpoint($name);
> +             PVE::Notify::write_config($config);
> +         });
> +     };
> +
> +     raise_api_error($@) if $@;
> +     return;
> +    }
> +});
> +
>  my $matcher_properties = {
>      name => {
>       description => 'Name of the matcher.',



_______________________________________________
pve-devel mailing list
pve-devel@lists.proxmox.com
https://lists.proxmox.com/cgi-bin/mailman/listinfo/pve-devel

Reply via email to