view release on metacpan or  search on metacpan

lib/Google/Cloud/Networkservices/V1/NetworkservicesClient.pm  view on Meta::CPAN

use Moo;
use Google::gRPC::Client;
use Google::Cloud::REST::Client;
use Google::Auth;
use Carp qw(croak);

use Protobuf;
use Google::Api::Common;
use Google::Cloud::Networkservices::V1::AgentGateway;
use Google::Cloud::Networkservices::V1::GrpcRoute;
use Google::Cloud::Networkservices::V1::TlsRoute;
use Google::Cloud::Networkservices::V1::Extensibility;
use Google::Cloud::Networkservices::V1::ServiceLbPolicy;
use Google::Cloud::Networkservices::V1::RouteView;
use Google::Cloud::Networkservices::V1::HttpRoute;
use Google::Cloud::Networkservices::V1::ServiceBinding;
use Google::Cloud::Networkservices::V1::TcpRoute;
use Google::Cloud::Networkservices::V1::Common;
use Google::Cloud::Networkservices::V1::Mesh;
use Google::Cloud::Networkservices::V1::Dep;
use Google::Cloud::Networkservices::V1::Gateway;
use Google::Cloud::Networkservices::V1::EndpointPolicy;
use Google::Cloud::Networkservices::V1::Networkservices;

our $VERSION = '0.02';

has credentials => ( is => 'ro', required => 0 );
has transport   => ( is => 'rw' );

sub BUILD {
    my ($self) = @_;

    # Resolve credentials: use passed credentials object if it implements get_token, or default to ADC
    my $auth = $self->credentials;
    if (!$auth || !eval { $auth->can('get_token') }) {
        $auth = Google::Auth->default();
    }
    my $token = $auth->get_token();

    my $target = 'localhost:50051';
    my $t = $self->transport || 'grpc';

    if (ref($t) && eval { $t->can('call') }) {
        # Already a transport object
    } elsif (lc($t) eq 'rest') {
        my $client = Google::Cloud::REST::Client->new(
            target     => $target,
            auth_token => $token,
        );
        $self->transport($client);
    } else {
        # Default high-performance HTTP/2 gRPC client
        my $client = Google::gRPC::Client->new(
            target     => $target,
            auth_token => $token,
        );
        $self->transport($client);
    }
}

sub list_endpoint_policies {
    my ($self, %params) = @_;

    my $request_class = 'Google::Cloud::Networkservices::V1::EndpointPolicy::ListEndpointPoliciesRequest';
    my $request = eval { $request_class->new(\%params) } || eval { $request_class->new(%params) } || ($request_class->can('encode') ? $request_class->encode(\%params) : \%params);

    my $response_class = 'Google::Cloud::Networkservices::V1::EndpointPolicy::ListEndpointPoliciesResponse';
    my $response = $self->transport->call({
        service        => 'google.cloud.networkservices.v1.NetworkServices',
        method         => 'ListEndpointPolicies',
        request        => $request,
        response_class => $response_class,
    });

    return $response;
}
1; # End of Google::Cloud::Networkservices::V1::NetworkservicesClient

__END__

=head1 NAME

Google::Cloud::Networkservices::V1::NetworkservicesClient - Client library for Google Cloud Services

=head1 SYNOPSIS

    use Google::Cloud::Networkservices::V1::NetworkservicesClient;
    use Google::Auth;

    my $auth = Google::Auth->default();

    # 1. High-performance gRPC Transport (Default)
    my $grpc_client = Google::Cloud::Networkservices::V1::NetworkservicesClient->new(
        credentials => $auth,
        transport   => 'grpc', # Optional: 'grpc' is default
    );

    # 2. HTTP/REST Transport
    my $rest_client = Google::Cloud::Networkservices::V1::NetworkservicesClient->new(
        credentials => $auth,
        transport   => 'rest',
    );

    # Execute service methods
    my $res = $grpc_client->some_method( %params );

=head1 DESCRIPTION

C<Google::Cloud::Networkservices::V1::NetworkservicesClient> is an auto-generated client library for Google Cloud Services.

It provides a unified client interface supporting both high-performance HTTP/2 gRPC and HTTP/REST transports, with automatic Google Cloud Application Default Credentials (ADC) resolution and typed Protocol Buffers message handling.

=head1 SOURCE

Generated from the following Protocol Buffers schemas:

=over 4

=item * C<google/cloud/networkservices/v1/http_route.proto>

=item * C<google/cloud/networkservices/v1/tcp_route.proto>

=item * C<google/cloud/networkservices/v1/common.proto>

=item * C<google/cloud/networkservices/v1/mesh.proto>

=item * C<google/cloud/networkservices/v1/network_services.proto>

=item * C<google/cloud/networkservices/v1/service_binding.proto>

=item * C<google/cloud/networkservices/v1/tls_route.proto>

=item * C<google/cloud/networkservices/v1/dep.proto>

=item * C<google/cloud/networkservices/v1/route_view.proto>

=item * C<google/cloud/networkservices/v1/service_lb_policy.proto>

=item * C<google/cloud/networkservices/v1/endpoint_policy.proto>

=item * C<google/cloud/networkservices/v1/gateway.proto>

=item * C<google/cloud/networkservices/v1/grpc_route.proto>

=item * C<google/cloud/networkservices/v1/extensibility.proto>

=item * C<google/cloud/networkservices/v1/agent_gateway.proto>



=back

=head1 CONSTRUCTOR

=head2 new

    my $client = Google::Cloud::Networkservices::V1::NetworkservicesClient->new(
        credentials => $auth,   # Optional: Google::Auth object (defaults to ADC)
        transport   => 'grpc', # Optional: 'grpc' (default) or 'rest'
    );

=head1 ATTRIBUTES

=head2 credentials

Returns or accepts the L<Google::Auth> credentials object.

=head2 transport

Returns or accepts the active transport object (L<Google::gRPC::Client> or L<Google::Cloud::REST::Client>).

=head1 METHODS

=head2 METHODS

The following RPC methods are available in this client:

=over 4

=item * B<list_endpoint_policies>

Calls the RPC method C<ListEndpointPolicies> on the service. Takes a hash of parameters representing the request.

=back



=head1 LICENSE AND COPYRIGHT

Copyright (C) 2026 Google LLC

This program is released under the Apache 2.0 license.

=cut