1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
|
# SPDX-License-Identifier: BSD-3-Clause
#
# Copyright 2020 Raritan Inc. All rights reserved.
#
# This file was generated by IdlC from ServerSSLCert.idl.
use strict;
package Raritan::RPC::cert::ServerSSLCert_2_0_0::CommonAttributes;
sub encode {
my ($in) = @_;
my $encoded = {};
$encoded->{'country'} = "$in->{'country'}";
$encoded->{'stateOrProvince'} = "$in->{'stateOrProvince'}";
$encoded->{'locality'} = "$in->{'locality'}";
$encoded->{'organization'} = "$in->{'organization'}";
$encoded->{'organizationalUnit'} = "$in->{'organizationalUnit'}";
$encoded->{'commonName'} = "$in->{'commonName'}";
$encoded->{'emailAddress'} = "$in->{'emailAddress'}";
return $encoded;
}
sub decode {
my ($agent, $in) = @_;
my $decoded = {};
$decoded->{'country'} = $in->{'country'};
$decoded->{'stateOrProvince'} = $in->{'stateOrProvince'};
$decoded->{'locality'} = $in->{'locality'};
$decoded->{'organization'} = $in->{'organization'};
$decoded->{'organizationalUnit'} = $in->{'organizationalUnit'};
$decoded->{'commonName'} = $in->{'commonName'};
$decoded->{'emailAddress'} = $in->{'emailAddress'};
return $decoded;
}
1;
|
