test_LibItsDenm_TypesAndValues.ttcn 2.37 KB
Newer Older
filatov's avatar
filatov committed
1
2
module test_LibItsDenm_TypesAndValues /*language "TTCN-3:2009 Advanced Parameterization"*/ {
    
3
4
5
    // LibIts
    import from CAM_PDU_Descriptions language "ASN.1:1997"all;
    import from DENM_PDU_Descriptions language "ASN.1:1997" all;
filatov's avatar
filatov committed
6
    
7
8
9
10
    // LibItsCommon
    import from LibItsCommon_TypesAndValues all;
    
    // AtsCam
filatov's avatar
filatov committed
11
12
13
14
15
16
17
    import from LibItsDenm_TestSystem all;
    import from LibItsDenm_Templates all;
    import from LibItsDenm_TypesAndValues all;
    
    import from LibItsDenm_Functions all;
    import from LibItsCommon_Functions all;

18
19
20
    import from test_CommonCodec all;
    
    group LibItsDenm_testCases {
filatov's avatar
filatov committed
21
        
22
23
24
25
        group testUtEvent {
                
            testcase tc_UtDenmInitialize() runs on TCType system TCType {
                test_PDU<UtInitialize>(m_denmInitialize, false);
filatov's avatar
filatov committed
26
            }
27
28
29
30
31
32
33
34
35
36
37
            
            testcase tc_eventSituation() runs on TCType system TCType {
                var template (value) SituationContainer v_situation := m_situation(c_causeVehicleBreakdown, c_subCauseCode_Unavailable);
                
                test_PDU<UtDenmTrigger>(
                    m_utTriggerEvent(
                        v_situation, 
                        m_denmLocation_zeroDelta
                    ), 
                    false
                );
filatov's avatar
filatov committed
38
            }
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
            
        } // End of group testUtEvent
        
        group testDenmPrimitiveMessages {
            
            testcase tc_DenmReq() runs on TCType system TCType {
                var template (value) SituationContainer v_situation := m_situation(c_causeVehicleBreakdown, c_subCauseCode_Unavailable);
                
                test_PDU<DenmReq>(
                    m_denmReq(
                         m_denmPdu(
                            m_denm(
                                m_denmMgmtCon(
                                    m_tsActionId
                                ),
                                v_situation,
                                m_denmLocation_zeroDelta
                            )
                        )
                    ),
                    true,
                    oct2bit('01010001B207C0000D903800000000006072000000188593E91B2B9BDF918C000400400061A80000B6000037FFFDFFFF63390100'O)
                );
filatov's avatar
filatov committed
62
            }
63
64
65
66
            
        } // End of group testDenmPrimitiveMessages
        
    } // End of group LibItsDenm_testCases 
filatov's avatar
filatov committed
67
}