forked from loafle/openapi-generator-original
[JAVA] fix toUrlQueryString for BigDecimal (#15764)
* add MyImportTest.java * fix original issue * fix same issue for native library * remove MyImportTest * add test configs * generate samples (again?) * generate samples again * generate samples again, undo pom.xml mistake [amended to retrigger circliCi]
This commit is contained in:
martin-mfg
GitHub
@@ -48,6 +48,55 @@ sub new {
|
||||
}
|
||||
|
||||
|
||||
#
|
||||
# fake_big_decimal_map
|
||||
#
|
||||
#
|
||||
#
|
||||
{
|
||||
my $params = {
|
||||
};
|
||||
__PACKAGE__->method_documentation->{ 'fake_big_decimal_map' } = {
|
||||
summary => '',
|
||||
params => $params,
|
||||
returns => 'FakeBigDecimalMap200Response',
|
||||
};
|
||||
}
|
||||
# @return FakeBigDecimalMap200Response
|
||||
#
|
||||
sub fake_big_decimal_map {
|
||||
my ($self, %args) = @_;
|
||||
|
||||
# parse inputs
|
||||
my $_resource_path = '/fake/BigDecimalMap';
|
||||
|
||||
my $_method = 'GET';
|
||||
my $query_params = {};
|
||||
my $header_params = {};
|
||||
my $form_params = {};
|
||||
|
||||
# 'Accept' and 'Content-Type' header
|
||||
my $_header_accept = $self->{api_client}->select_header_accept('*/*');
|
||||
if ($_header_accept) {
|
||||
$header_params->{'Accept'} = $_header_accept;
|
||||
}
|
||||
$header_params->{'Content-Type'} = $self->{api_client}->select_header_content_type();
|
||||
|
||||
my $_body_data;
|
||||
# authentication setting, if any
|
||||
my $auth_settings = [qw()];
|
||||
|
||||
# make the API Call
|
||||
my $response = $self->{api_client}->call_api($_resource_path, $_method,
|
||||
$query_params, $form_params,
|
||||
$header_params, $_body_data, $auth_settings);
|
||||
if (!$response) {
|
||||
return;
|
||||
}
|
||||
my $_response_object = $self->{api_client}->deserialize('FakeBigDecimalMap200Response', $response);
|
||||
return $_response_object;
|
||||
}
|
||||
|
||||
#
|
||||
# fake_health_get
|
||||
#
|
||||
|
||||
@@ -0,0 +1,251 @@
|
||||
=begin comment
|
||||
|
||||
OpenAPI Petstore
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
The version of the OpenAPI document: 1.0.0
|
||||
|
||||
Generated by: https://openapi-generator.tech
|
||||
|
||||
=end comment
|
||||
|
||||
=cut
|
||||
|
||||
#
|
||||
# NOTE: This class is auto generated by OpenAPI Generator (https://openapi-generator.tech).
|
||||
# Do not edit the class manually.
|
||||
# Ref: https://openapi-generator.tech
|
||||
#
|
||||
package WWW::OpenAPIClient::Object::FakeBigDecimalMap200Response;
|
||||
|
||||
require 5.6.0;
|
||||
use strict;
|
||||
use warnings;
|
||||
use utf8;
|
||||
use JSON qw(decode_json);
|
||||
use Data::Dumper;
|
||||
use Module::Runtime qw(use_module);
|
||||
use Log::Any qw($log);
|
||||
use Date::Parse;
|
||||
use DateTime;
|
||||
|
||||
|
||||
use base ("Class::Accessor", "Class::Data::Inheritable");
|
||||
|
||||
#
|
||||
#
|
||||
#
|
||||
# NOTE: This class is auto generated by OpenAPI Generator (https://openapi-generator.tech). Do not edit the class manually.
|
||||
# REF: https://openapi-generator.tech
|
||||
#
|
||||
|
||||
=begin comment
|
||||
|
||||
OpenAPI Petstore
|
||||
|
||||
This spec is mainly for testing Petstore server and contains fake endpoints, models. Please do not use this for any other purpose. Special characters: \" \\
|
||||
|
||||
The version of the OpenAPI document: 1.0.0
|
||||
|
||||
Generated by: https://openapi-generator.tech
|
||||
|
||||
=end comment
|
||||
|
||||
=cut
|
||||
|
||||
#
|
||||
# NOTE: This class is auto generated by OpenAPI Generator (https://openapi-generator.tech).
|
||||
# Do not edit the class manually.
|
||||
# Ref: https://openapi-generator.tech
|
||||
#
|
||||
__PACKAGE__->mk_classdata('attribute_map' => {});
|
||||
__PACKAGE__->mk_classdata('openapi_types' => {});
|
||||
__PACKAGE__->mk_classdata('method_documentation' => {});
|
||||
__PACKAGE__->mk_classdata('class_documentation' => {});
|
||||
|
||||
# new plain object
|
||||
sub new {
|
||||
my ($class, %args) = @_;
|
||||
|
||||
my $self = bless {}, $class;
|
||||
|
||||
$self->init(%args);
|
||||
|
||||
return $self;
|
||||
}
|
||||
|
||||
# initialize the object
|
||||
sub init
|
||||
{
|
||||
my ($self, %args) = @_;
|
||||
|
||||
foreach my $attribute (keys %{$self->attribute_map}) {
|
||||
my $args_key = $self->attribute_map->{$attribute};
|
||||
$self->$attribute( $args{ $args_key } );
|
||||
}
|
||||
}
|
||||
|
||||
# return perl hash
|
||||
sub to_hash {
|
||||
my $self = shift;
|
||||
my $_hash = decode_json(JSON->new->convert_blessed->encode($self));
|
||||
|
||||
return $_hash;
|
||||
}
|
||||
|
||||
# used by JSON for serialization
|
||||
sub TO_JSON {
|
||||
my $self = shift;
|
||||
my $_data = {};
|
||||
foreach my $_key (keys %{$self->attribute_map}) {
|
||||
if (defined $self->{$_key}) {
|
||||
my $_json_attribute = $self->attribute_map->{$_key};
|
||||
my $_type = $self->openapi_types->{$_key};
|
||||
my $_value = $self->{$_key};
|
||||
if ($_type =~ /^array\[(.+)\]$/i) { # array
|
||||
my $_subclass = $1;
|
||||
$_data->{$_json_attribute} = [ map { $self->_to_json_primitives($_subclass, $_) } @$_value ];
|
||||
} elsif ($_type =~ /^hash\[string,(.+)\]$/i) { # hash
|
||||
my $_subclass = $1;
|
||||
my %_hash = ();
|
||||
while (my($_key, $_element) = each %{$_value}) {
|
||||
$_hash{$_key} = $self->_to_json_primitives($_subclass, $_element);
|
||||
}
|
||||
$_data->{$_json_attribute} = \%_hash;
|
||||
} elsif ( grep( /^$_type$/, ('int', 'double', 'string', 'boolean', 'DATE', 'DATE_TIME'))) {
|
||||
$_data->{$_json_attribute} = $self->_to_json_primitives($_type, $_value);
|
||||
} else {
|
||||
$_data->{$_json_attribute} = $_value;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
return $_data;
|
||||
}
|
||||
|
||||
# to_json non-array data
|
||||
sub _to_json_primitives {
|
||||
my ($self, $type, $data) = @_;
|
||||
if ( grep( /^$type$/, ('int', 'double'))) {
|
||||
# https://metacpan.org/pod/JSON#simple-scalars
|
||||
# numify it, ensuring it will be dumped as a number
|
||||
return undef unless defined $data;
|
||||
return $data + 0;
|
||||
} elsif ($type eq 'string') {
|
||||
# https://metacpan.org/pod/JSON#simple-scalars
|
||||
# stringified
|
||||
return undef unless defined $data;
|
||||
return $data . q();
|
||||
} elsif ($type eq 'boolean') {
|
||||
# https://metacpan.org/pod/JSON#JSON::true,-JSON::false,-JSON::null
|
||||
return $data ? \1 : \0;
|
||||
} elsif ($type eq 'DATE') {
|
||||
return undef unless defined $data;
|
||||
if (ref($data) eq 'DateTime') {
|
||||
# https://metacpan.org/pod/DateTime#$dt-%3Eymd($optional_separator),-$dt-%3Emdy(...),-$dt-%3Edmy(...)
|
||||
return $data->ymd;
|
||||
}
|
||||
return $data .q();
|
||||
} elsif ($type eq 'DATE_TIME') {
|
||||
return undef unless defined $data;
|
||||
# the date-time notation as defined by RFC 3339, section 5.6, for example, 2017-07-21T17:32:28Z
|
||||
if (ref($data) eq 'DateTime') {
|
||||
# https://metacpan.org/pod/DateTime#$dt-%3Erfc3339
|
||||
return $data->rfc3339;
|
||||
}
|
||||
return $data .q();
|
||||
} else { # hash (model), In this case, the TO_JSON of the $data object is executed
|
||||
return $data;
|
||||
}
|
||||
}
|
||||
|
||||
# from Perl hashref
|
||||
sub from_hash {
|
||||
my ($self, $hash) = @_;
|
||||
|
||||
# loop through attributes and use openapi_types to deserialize the data
|
||||
while ( my ($_key, $_type) = each %{$self->openapi_types} ) {
|
||||
my $_json_attribute = $self->attribute_map->{$_key};
|
||||
if ($_type =~ /^array\[(.+)\]$/i) { # array
|
||||
my $_subclass = $1;
|
||||
my @_array = ();
|
||||
foreach my $_element (@{$hash->{$_json_attribute}}) {
|
||||
push @_array, $self->_deserialize($_subclass, $_element);
|
||||
}
|
||||
$self->{$_key} = \@_array;
|
||||
} elsif ($_type =~ /^hash\[string,(.+)\]$/i) { # hash
|
||||
my $_subclass = $1;
|
||||
my %_hash = ();
|
||||
while (my($_key, $_element) = each %{$hash->{$_json_attribute}}) {
|
||||
$_hash{$_key} = $self->_deserialize($_subclass, $_element);
|
||||
}
|
||||
$self->{$_key} = \%_hash;
|
||||
} elsif (exists $hash->{$_json_attribute}) { #hash(model), primitive, datetime
|
||||
$self->{$_key} = $self->_deserialize($_type, $hash->{$_json_attribute});
|
||||
} else {
|
||||
$log->debugf("Warning: %s (%s) does not exist in input hash\n", $_key, $_json_attribute);
|
||||
}
|
||||
}
|
||||
|
||||
return $self;
|
||||
}
|
||||
|
||||
# deserialize non-array data
|
||||
sub _deserialize {
|
||||
my ($self, $type, $data) = @_;
|
||||
$log->debugf("deserializing %s with %s",Dumper($data), $type);
|
||||
|
||||
if (grep( /^$type$/ , ('DATE_TIME', 'DATE'))) {
|
||||
return DateTime->from_epoch(epoch => str2time($data));
|
||||
} elsif ( grep( /^$type$/, ('int', 'double'))) {
|
||||
return undef unless defined $data;
|
||||
return $data + 0;
|
||||
} elsif ($type eq 'string') {
|
||||
return undef unless defined $data;
|
||||
return $data . q();
|
||||
} elsif ($type eq 'boolean') {
|
||||
return !!$data;
|
||||
} else { # hash(model)
|
||||
my $_instance = eval "WWW::OpenAPIClient::Object::$type->new()";
|
||||
return $_instance->from_hash($data);
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
__PACKAGE__->class_documentation({description => '',
|
||||
class => 'FakeBigDecimalMap200Response',
|
||||
required => [], # TODO
|
||||
} );
|
||||
|
||||
__PACKAGE__->method_documentation({
|
||||
'some_id' => {
|
||||
datatype => 'double',
|
||||
base_name => 'someId',
|
||||
description => '',
|
||||
format => '',
|
||||
read_only => '',
|
||||
},
|
||||
'some_map' => {
|
||||
datatype => 'HASH[string,double]',
|
||||
base_name => 'someMap',
|
||||
description => '',
|
||||
format => '',
|
||||
read_only => '',
|
||||
},
|
||||
});
|
||||
|
||||
__PACKAGE__->openapi_types( {
|
||||
'some_id' => 'double',
|
||||
'some_map' => 'HASH[string,double]'
|
||||
} );
|
||||
|
||||
__PACKAGE__->attribute_map( {
|
||||
'some_id' => 'someId',
|
||||
'some_map' => 'someMap'
|
||||
} );
|
||||
|
||||
__PACKAGE__->mk_accessors(keys %{__PACKAGE__->attribute_map});
|
||||
|
||||
|
||||
1;
|
||||
Reference in New Issue
Block a user