Skip to content
GitLab
Projects
Groups
Snippets
/
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Sign in
Toggle navigation
Menu
Open sidebar
TTCN-3 Libraries
LibIts
Commits
d704b5eb
Commit
d704b5eb
authored
Oct 26, 2018
by
garciay
Browse files
STF545: Remove useless files
parent
4f886d53
Changes
2
Hide whitespace changes
Inline
Side-by-side
ttcn/Pki/LibItsPki_Functions.ttcn
View file @
d704b5eb
...
...
@@ -67,7 +67,7 @@ module LibItsPki_Functions {
)
runs
on
ItsPki
/* TITAN TODO: system ItsPkiSystem */
{
map
(
self
:
pkiPort
,
system
:
pkiPort
);
map
(
self
:
acP
kiP
ort
,
system
:
acP
kiP
ort
);
map
(
self
:
acPort
,
system
:
acPort
);
f_connect4SelfOrClientSync
();
f_initialiseSecuredMode
(
p_certificateId
,
p_peerCertificateId
);
...
...
@@ -121,7 +121,7 @@ module LibItsPki_Functions {
*/
function
f_cfDown
()
runs
on
ItsPki
/* TITAN TODO: system ItsPkiSystem */
{
unmap
(
self
:
pkiPort
,
system
:
pkiPort
);
unmap
(
self
:
acP
kiP
ort
,
system
:
acP
kiP
ort
);
unmap
(
self
:
acPort
,
system
:
acPort
);
f_disconnect4SelfOrClientSync
();
f_uninitialiseSecuredMode
();
}
// End of function f_cfDown
...
...
@@ -192,13 +192,13 @@ module LibItsPki_Functions {
var
AcSetSecurityData
v_ac_set_security_data
;
v_ac_set_security_data
:=
{
PICS_TS_CERTIFICATE_ID
,
PICS_IUT_CERTIFICATE_ID
,
p_private_key
,
p_publicKeyCompressed
,
p_compressedMode
};
acP
kiP
ort
.
send
(
AcPkiPrimitive
:
{
acSetSecurityData
:=
v_ac_set_security_data
});
acPort
.
send
(
AcPkiPrimitive
:
{
acSetSecurityData
:=
v_ac_set_security_data
});
tc_ac
.
start
;
alt
{
[]
acP
kiP
ort
.
receive
(
AcPkiResponse
:
{
result
:=
true
})
{
[]
acPort
.
receive
(
AcPkiResponse
:
{
result
:=
true
})
{
tc_ac
.
stop
;
}
[]
acP
kiP
ort
.
receive
(
AcPkiResponse
:
{
result
:=
false
})
{
[]
acPort
.
receive
(
AcPkiResponse
:
{
result
:=
false
})
{
tc_ac
.
stop
;
log
(
"*** f_sendAcPkiPrimitive: ERROR: Received unexpected message ***"
);
f_selfOrClientSyncAndVerdict
(
"error"
,
e_error
);
...
...
ttcn/Pki/LibItsPki_TestSystem.ttcn
View file @
d704b5eb
...
...
@@ -49,14 +49,6 @@ module LibItsPki_TestSystem {
in
AcPkiResponse
;
}
// End of AdapterControlPort
/**
* @desc Adapter control port
*/
type
port
AdapterControlPkiPort
message
{
out
AcPkiPrimitive
;
in
AcPkiResponse
;
}
// End of AdapterControlPkiPort
/**
* @desc Upper Tester port
*/
...
...
@@ -78,7 +70,7 @@ module LibItsPki_TestSystem {
group
componentDefinitions
{
type
component
ItsPkiSystem
{
port
AdapterControlP
kiP
ort
acP
kiP
ort
;
port
AdapterControlPort
acPort
;
port
PkiPort
pkiPort
;
}
// End of component ItsPkiSystem
...
...
@@ -86,7 +78,6 @@ module LibItsPki_TestSystem {
}
// End of component ItsPkiHttpSystem
type
component
ItsPkiItssSystem
extends
ItsPkiSystem
{
port
AdapterControlPort
acPort
;
port
UpperTesterPort
utPort
;
port
GeoNetworkingPort
geoNetworkingPort
;
}
// End of component ItsPkiItssSystem
...
...
@@ -94,7 +85,7 @@ module LibItsPki_TestSystem {
}
// End of group componentDefinitions
type
component
ItsPki
extends
ItsSecurityBaseComponent
,
ItsBaseMtc
{
port
AdapterControlP
kiP
ort
acP
kiP
ort
;
port
AdapterControlPort
acPort
;
port
PkiPort
pkiPort
;
var
Certificate
vc_eaCertificate
;
/** Test Adapter EA certificate */
...
...
@@ -110,7 +101,6 @@ module LibItsPki_TestSystem {
}
// End of component ItsPki
type
component
ItsPkiItss
extends
ItsPki
{
port
AdapterControlPort
acPort
;
port
UpperTesterPort
utPort
;
port
GeoNetworkingPort
geoNetworkingPort
;
}
// End of component ItsPkiItss
...
...
Write
Preview
Supports
Markdown
0%
Try again
or
attach a new file
.
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment