[lpar2rrd@xoruxibm stor2rrd]$ ls -l bin/compellent_apitest.pl
-rwxr-xr-x 1 lpar2rrd root 12981 Aug 16 16:46 bin/compellent_apitest.pl
[lpar2rrd@xoruxibm stor2rrd]$ ./bin/config_check.sh compellent01
=========================
STORAGE: compellent01: COMPELLENT
=========================
TCP connection to "10.10.1.10" on port "3033" is ok
/usr/bin/perl /home/lpar2rrd/stor2rrd/bin/compellent_apitest.pl "admin" XXXXX "10.10.1.10" "3033"
ERROR: Command https://10.10.1.10:3033/api/rest/StorageCenter/StorageCenter/GetList failed! :
JBoss Web/7.2.0.Final - JBWEB000064: Error report JBWEB000065: HTTP Status 400 - java.io.EOFException: No content to map to Object due to end of input
JBWEB000309: type JBWEB000067: Status report
JBWEB000068: message java.io.EOFException: No content to map to Object due to end of input
JBWEB000069: description JBWEB000120: The request sent by the client was syntactically incorrect.
JBoss Web/7.2.0.Final
:
URL: https://10.10.1.10:3033/api/rest/ApiConnection/Login
$VAR1 = \bless( {
'_content' => '{}',
'_uri' => bless( do{\(my $o = 'https://10.10.1.10:3033/api/rest/ApiConnection/Login')}, 'URI::https' ),
'_headers' => bless( {
'x-dell-api-version' => '2.0',
'content-type' => 'application/json; charset=utf-8',
'accept' => 'application/json',
'authorization' => 'Basic YWRtaW46UXdlcnR5MTIz',
'::std_case' => {
'x-dell-api-version' => 'X-Dell-Api-Version'
}
}, 'HTTP::Headers' ),
'_method' => 'POST'
}, 'HTTP::Request' );
test content
{}
$VAR1 = \bless( {
'_protocol' => 'HTTP/1.1',
'_content' => '{"hostName":"10.10.1.10","connected":true,"locale":"en_US","apiBuild":311,"commandLine":false,"useHttps":false,"provider":"EnterpriseManager","userName":"admin","source":"REST","sessionKey":1532326992905,"application":"","apiVersion":"2.2","userId":434226,"providerVersion":"15.3.1.300","minApiVersion":"0.1","webServicesPort":3033,"connectionKey":"","secureString":"","applicationVersion":"","instanceId":"0","objectType":"ApiConnection","instanceName":"ApiConnection"}',
'_rc' => '200',
'_headers' => bless( {
'connection' => 'close',
'client-response-num' => 1,
'set-cookie' => 'JSESSIONID=T+eFoz-UELvAvFU9YqRxazCq; Path=/api; Secure',
'date' => 'Thu, 16 Aug 2018 12:35:40 GMT',
'client-ssl-cert-issuer' => '/C=US/ST=Minnesota/L=Eden Prairie/O=Dell Inc/CN=vtrial.damain.loc',
'client-ssl-cipher' => 'ECDHE-RSA-AES128-SHA256',
'client-peer' => '10.10.1.10:3033',
'::std_case' => {
'client-response-num' => 'Client-Response-Num',
'set-cookie' => 'Set-Cookie',
'client-ssl-cert-issuer' => 'Client-SSL-Cert-Issuer',
'client-ssl-cipher' => 'Client-SSL-Cipher',
'client-peer' => 'Client-Peer',
'client-date' => 'Client-Date',
'client-ssl-warning' => 'Client-SSL-Warning',
'client-ssl-cert-subject' => 'Client-SSL-Cert-Subject',
'client-ssl-socket-class' => 'Client-SSL-Socket-Class'
},
'client-date' => 'Thu, 16 Aug 2018 12:35:40 GMT',
'client-ssl-warning' => 'Peer certificate not verified',
'content-type' => 'application/json',
'client-ssl-cert-subject' => '/C=US/ST=Minnesota/L=Eden Prairie/O=Dell Inc/CN=vtrial.damain.loc',
'server' => 'Apache-Coyote/1.1',
'client-ssl-socket-class' => 'IO::Socket::SSL'
}, 'HTTP::Headers' ),
'_msg' => 'OK',
'_request' => bless( {
'_content' => '{}',
'_uri' => bless( do{\(my $o = 'https://10.10.1.10:3033/api/rest/ApiConnection/Login')}, 'URI::https' ),
'_headers' => bless( {
'user-agent' => 'libwww-perl/6.05',
'x-dell-api-version' => '2.0',
'content-type' => 'application/json; charset=utf-8',
'accept' => 'application/json',
'authorization' => 'Basic YWRtaW46UXdlcnR5MTIz',
'::std_case' => {
'x-dell-api-version' => 'X-Dell-Api-Version',
'if-ssl-cert-subject' => 'If-SSL-Cert-Subject'
}
}, 'HTTP::Headers' ),
'_method' => 'POST',
'_uri_canonical' => ${$VAR1}->{'_request'}->{'_uri'}
}, 'HTTP::Request' )
}, 'HTTP::Response' );
Login to API succesfull!
URL: https://10.10.1.10:3033/api/rest/ApiConnection/Logout
$VAR1 = \bless( {
'_content' => '{}',
'_uri' => bless( do{\(my $o = 'https://10.10.1.10:3033/api/rest/ApiConnection/Logout')}, 'URI::https' ),
'_headers' => bless( {
'content-type' => 'application/json; charset=utf-8',
'x-dell-api-version' => '2.2',
'accept' => 'application/json',
'cookie' => 'JSESSIONID=T+eFoz-UELvAvFU9YqRxazCq; Path=/api; Secure',
'::std_case' => {
'x-dell-api-version' => 'X-Dell-Api-Version',
'cookie' => 'Cookie'
}
}, 'HTTP::Headers' ),
'_method' => 'POST'
}, 'HTTP::Request' );
{}
$VAR1 = \bless( {
'_protocol' => 'HTTP/1.1',
'_content' => '',
'_rc' => '204',
'_headers' => bless( {
'connection' => 'close',
'client-response-num' => 1,
'date' => 'Thu, 16 Aug 2018 12:35:40 GMT',
'client-ssl-cert-issuer' => '/C=US/ST=Minnesota/L=Eden Prairie/O=Dell Inc/CN=vtrial.damain.loc',
'client-ssl-cipher' => 'ECDHE-RSA-AES128-SHA256',
'client-peer' => '10.10.1.10:3033',
'::std_case' => {
'client-response-num' => 'Client-Response-Num',
'client-ssl-cert-issuer' => 'Client-SSL-Cert-Issuer',
'client-ssl-cipher' => 'Client-SSL-Cipher',
'client-peer' => 'Client-Peer',
'client-date' => 'Client-Date',
'client-ssl-warning' => 'Client-SSL-Warning',
ERROR: Instance Storage "compellent01" is not defined! :
ERROR: Storage cannot be accessed, check if user "admin" has allowed storage "compellent01" :
'client-ssl-cert-subject' => 'Client-SSL-Cert-Subject',
'client-ssl-socket-class' => 'Client-SSL-Socket-Class'
},
'client-date' => 'Thu, 16 Aug 2018 12:35:40 GMT',
'client-ssl-warning' => 'Peer certificate not verified',
'client-ssl-cert-subject' => '/C=US/ST=Minnesota/L=Eden Prairie/O=Dell Inc/CN=vtrial.damain.loc',
'server' => 'Apache-Coyote/1.1',
'client-ssl-socket-class' => 'IO::Socket::SSL'
}, 'HTTP::Headers' ),
'_msg' => 'No Content',
'_request' => bless( {
'_content' => '{}',
'_uri' => bless( do{\(my $o = 'https://10.10.1.10:3033/api/rest/ApiConnection/Logout')}, 'URI::https' ),
'_headers' => bless( {
'user-agent' => 'libwww-perl/6.05',
'content-type' => 'application/json; charset=utf-8',
'x-dell-api-version' => '2.2',
'accept' => 'application/json',
'cookie' => 'JSESSIONID=T+eFoz-UELvAvFU9YqRxazCq; Path=/api; Secure',
'::std_case' => {
'x-dell-api-version' => 'X-Dell-Api-Version',
'cookie' => 'Cookie',
'if-ssl-cert-subject' => 'If-SSL-Cert-Subject'
}
}, 'HTTP::Headers' ),
'_method' => 'POST',
'_uri_canonical' => ${$VAR1}->{'_request'}->{'_uri'}
}, 'HTTP::Request' )
}, 'HTTP::Response' );
connection failed!!
[lpar2rrd@xoruxibm stor2rrd]$