| /* Copyright (c) 2000-2019 Ericsson Telecom AB AB |
| * All rights reserved. This program and the accompanying materials |
| * are made available under the terms of the Eclipse Public License v1.0 |
| * which accompanies this distribution, and is available at |
| * http://www.eclipse.org/legal/epl-v10.html |
| * |
| * Contributors: |
| * Michael Josenhans |
| ******************************************************************************/ |
| // |
| // File: Isobustest_plain_socketcan.ttcn |
| // Description: Encoder / Decoder for Isobus message frames |
| // |
| // Revision R1A |
| |
| module Isobustest_test_encoder{ |
| |
| import from Isobus all |
| import from IsobusVT_Templates all |
| import from J1939 all |
| |
| //component declarations |
| type component MTC_CT |
| { |
| } |
| |
| testcase tc_encdec() runs on MTC_CT |
| { |
| template J1939_messageWithPGN t_address_claimed := {pgn := '00EEFF'O, |
| pdu := {addressClaimedOrCannotClaimSourceAddress := { name := { |
| identityNumber := 514, |
| manufacturerCode := 368, |
| ecuInstance := 3, |
| functionInstance := 5, |
| function_ := 3, |
| reserved := 0, |
| vehicleSystem := 101, |
| vehicleSystemInstance := 1, |
| industryGroup := 3, |
| arbitraryAddresssBit := 0 |
| }}}} |
| |
| log(f_encode_J1939_message(valueof(t_address_claimed))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_address_claimed)))) |
| log("--------------------------------------------") |
| |
| template J1939_messageWithPGN t_requestForAddressClaimed := {pgn := '00EA00'O, |
| pdu := {requestForAddressClaimed := {pgn := 123}}} |
| |
| log(f_encode_J1939_message(valueof(t_requestForAddressClaimed))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_requestForAddressClaimed)))) |
| log("--------------------------------------------") |
| |
| // template CAN_frame_j1939 t_CAN_frame_j1939_3 := { can_j1939 := { prio := 0, res := '0'B, dp := '0'B, pf := '00'O, ps := 'FD'O, sa := 'C0'O }, can_pdu := { cannotClaimSourceAddress := { name := { |
| // arbitraryAddresssBitValue := 0, |
| // industryGroupValue := 3, |
| // vehicleSystemInstanceValue := 1, |
| // vehicleSystemValue := 101, |
| // reservedValue := 0, |
| // functionValue := 3, |
| // functionInstanceValue := 5, |
| // ecuInstanceValue := 3, |
| // manufacturerCodeValue := 368, |
| // identityNumberValue := 514 } }}} |
| // log(f_encode_CAN_frame_j1939(valueof(t_CAN_frame_j1939_3))) |
| // log("--------------------------------------------") |
| // log(f_decode_CAN_frame_j1939(f_encode_CAN_frame_j1939(valueof(t_CAN_frame_j1939_3)))) |
| // log("--------------------------------------------") |
| |
| template J1939_messageWithPGN t_commandedAddress := {pgn := '00FED8'O, |
| pdu := { commandedAddress := { |
| name := { |
| identityNumber := 514, |
| manufacturerCode := 368, |
| ecuInstance := 3, |
| functionInstance := 5, |
| function_ := 3, |
| reserved := 0, |
| vehicleSystem := 101, |
| vehicleSystemInstance := 1, |
| industryGroup := 3, |
| arbitraryAddresssBit := 0 }, |
| newSourceAddress:='AA'O |
| } } } |
| |
| log(f_encode_J1939_message(valueof(t_commandedAddress))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_commandedAddress)))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_encdec_vtStatusReq() runs on MTC_CT |
| { |
| template J1939_messageWithPGN t_commandedAddress := {pgn := '00E600'O, |
| pdu := {vt2ecu := {vtStatusInd := |
| { vtfunction := 254, |
| sourceAddressOfActiveWorkingSetMaster := '11'O, |
| objectIDOfTheVisibleDataAlarmMaskOfTheActiveWorkingSet := '2233'O, |
| objectIDOfTheVisibleSoftKeyMaskOfTheActiveWorkingSet := '4455'O, |
| vtBusyCodes := vtIsBusyExecutingACommand, |
| vtFunctionCode := '66'O}}}} |
| log(f_encode_J1939_message(valueof(t_commandedAddress))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_commandedAddress)))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_encdec_getMemoryReq() runs on MTC_CT |
| { |
| template J1939_messageWithPGN t_commandedAddress := {pgn := '00E700'O, |
| pdu := {ecu2vt := {getMemoryReq := |
| { vtfunction := 192, |
| reserved2 := 'FF'O, |
| memoryRequired := 1234567}}}} |
| log(f_encode_J1939_message(valueof(t_commandedAddress))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_commandedAddress)))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_encdec_getMemoryReq_with_template() runs on MTC_CT // using a template |
| { |
| template J1939_messageWithPGN t_getMemoryReq := t_GetMemoryReq(1234567) |
| log(f_encode_J1939_message(valueof(t_getMemoryReq))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_getMemoryReq)))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_encdec_workingSetMaintenanceReq() runs on MTC_CT // using a template |
| { |
| template J1939_messageWithPGN t_workingSetMaintenanceReq := t_WorkingSetMaintenanceInd( |
| true, |
| compliantWithVTVersion4) |
| log(f_encode_J1939_message(valueof(t_workingSetMaintenanceReq))) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(f_encode_J1939_message(valueof(t_workingSetMaintenanceReq)))) |
| log("--------------------------------------------") |
| } |
| |
| |
| //testcase tc_dec_largemessage() runs on MTC_CT |
| //{ |
| // |
| // var octetstring j1939_pdu |
| // //j1939_pdu := '18EAFFFE00EE00'O |
| // //j1939_pdu := '18EEFFF83102032E003D0080'O |
| // //j1939_pdu := '18EEFFF73102032E008200A0'O |
| // //j1939_pdu := '18EAF8F8EBFE00'O |
| // j1939_pdu := '18ECF8F810160004FFEBFE00'O |
| // |
| // // j1939_pdu := '00E726F8B3DA590B0066696C6520736572766572'O |
| // // j1939_pdu := '03FE00F8FE2A66696C65207365727665722A3139373136392A2D2A'O |
| // // j1939_pdu := '03FE00F82A66696C65207365727665722A3139373136392A2D2A'O |
| // // j1939_pdu := '03FE00262A6661726D20646973706C61792A3139373136392A2D2A'O |
| // // j1939_pdu := '03FE00F72A7461736B20636F6E74726F6C6C65722A3139373136392A2D2A'O |
| // // j1939_pdu := '03FE00FD2A6661726D20646973706C61792A3139373136392A2D2A'O |
| // // j1939_pdu := '01FD00F82D2A3139373136392A2D2A2D2A6E696E67757065782A2D2A'O |
| // // j1939_pdu := '01FD00262D2A3139373136392A2D2A2D2A6E696E67757065782A2D2A'O |
| // // j1939_pdu := '01FD00F72D2A3139373136392A2D2A2D2A6E696E67757065782A2D2A'O |
| // // j1939_pdu := '01FD00262D2A3139373136392A2D2A2D2A6E696E67757065782A2D2A'O |
| // // j1939_pdu := '01FD00FD2D2A3139373136392A2D2A2D2A6E696E67757065782A2D2A'O |
| // // j1939_pdu := '02FE00FD016661726D20646973706C617920312E33372E31362E3733352A'O |
| // // j1939_pdu := '02FE0026026661726D20646973706C617920312E33372E31362E3733352A69736F627573206C69627261727920312E32362E332E3932382A'O |
| // // j1939_pdu := '02FE00F8096E696E67757065782066696C6520736572766572207573657220696E74657266616365204E5820322E322E342E3237302A746F6F6C206C69627261727920322E34322E382E3834302A6C6F67206C69627261727920322E302E31312E3136342A636F6E66696775726174696F6E206C69627261727920312E31322E322E3139332A43414E20627573206861726477617265206C69627261727920312E31392E352E3139382A7365637572697479206C69627261727920312E31312E302E3332312A69736F627573206C69627261727920312E32362E332E3932382A69736F62757320636F6D6D6F6E206C69627261727920322E31322E302E3139332A66696C652073657276657220312E342E352E3235382A'O |
| // // j1939_pdu := '9CFE0DF8FE01FFFFFFFFFFFFFF'O |
| // |
| // log(j1939_pdu) |
| // log("--------------------------------------------") |
| // log(f_decode_CAN_frame_j1939(j1939_pdu)) |
| // log("--------------------------------------------") |
| //} |
| |
| testcase tc_dec_message1() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'fefeffffffff00ff'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message2() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'ff0104ffffffffff'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message3() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'c7ffffffffffffff'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message4() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'c7ff02cde001e001'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message5() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'c2ffffffffffffff'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message6() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'c200ffff7d48400c'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message7() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'C3FFFFFFFFFFFFFF'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message8() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'C3FFFFFFFF7F7FFF'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message9() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'C0FF00000000FFFF'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message10() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'C00400FFFFFFFFFF'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message11() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'DFFFFFFFFFFFFFFF'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message12() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'E00130303034333030'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message13() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e700'O |
| j1939_pdu := 'D130303034333030'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message14() runs on MTC_CT |
| { |
| |
| var J1939_PGN j1939_pgn |
| var octetstring j1939_pdu |
| |
| |
| j1939_pgn := '00e600'O |
| j1939_pdu := 'D1FFFFFFFF00FFFF'O |
| |
| log(j1939_pgn, j1939_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn & j1939_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message15() runs on MTC_CT |
| { |
| |
| var octetstring j1939_pgn_and_pdu |
| |
| |
| j1939_pgn_and_pdu := '00E600E00130303032303036'O |
| |
| log(j1939_pgn_and_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn_and_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message16() runs on MTC_CT |
| { |
| |
| var octetstring j1939_pgn_and_pdu |
| |
| |
| j1939_pgn_and_pdu := '00E700D130303032303036'O |
| |
| log(j1939_pgn_and_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn_and_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_message17() runs on MTC_CT |
| { |
| |
| var octetstring j1939_pgn_and_pdu |
| |
| |
| j1939_pgn_and_pdu := '00E60009D00701FFFF01FF'O |
| j1939_pgn_and_pdu := '00E70009D00701FFFF01FF'O |
| j1939_pgn_and_pdu := '00E600FEF8D007FFFF00FF'O |
| j1939_pgn_and_pdu := '00E600B3FFFFDA5900FFFF'O |
| j1939_pgn_and_pdu := '00E700A82BD3FFBC0B0000'O |
| j1939_pgn_and_pdu := '00E600A82BD300BC0B0000'O |
| j1939_pgn_and_pdu := '00E700A82CD3FFBB0B0000'O |
| j1939_pgn_and_pdu := '00E600A82CD300BB0B0000'O |
| j1939_pgn_and_pdu := '00E700A82DD3FFBB0B0000'O |
| j1939_pgn_and_pdu := '00E600A82DD300BB0B0000'O |
| j1939_pgn_and_pdu := '00E600D1FFFFFFFF00FFFF'O |
| j1939_pgn_and_pdu := '00E700B3DA590B0066696C6520736572766572'O |
| j1939_pgn_and_pdu := '00E60009D00701FFFF00FF'O |
| j1939_pgn_and_pdu := '00E70009D00701FFFF00FF'O |
| j1939_pgn_and_pdu := '00E700B302D72B00746F756368206F72207072657373206B657920746F206D6F766520686572652066726F6D20565420233100'O |
| j1939_pgn_and_pdu := '00E600B3FFFF02D700FFFF'O |
| j1939_pgn_and_pdu := '00E700B3B42D08006E696E6775706578'O |
| j1939_pgn_and_pdu := '00E600B3FFFFB42D00FFFF'O |
| j1939_pgn_and_pdu := '00E700A875D6FFC4DA0000'O |
| j1939_pgn_and_pdu := '00E600A875D600C4DA0000'O |
| //.. |
| j1939_pgn_and_pdu := '00E700AD0000ED03FFFFFF'O |
| j1939_pgn_and_pdu := '00E600ADED0300FFFFFFFF'O |
| |
| log(j1939_pgn_and_pdu) |
| log("--------------------------------------------") |
| log(f_decode_J1939_message(j1939_pgn_and_pdu)) |
| log("--------------------------------------------") |
| } |
| |
| |
| |
| |
| function f_reverse_j1939_name_withoutencoding(in J1939_NAME p_j1939_name) |
| //runs on PTC_isobus_CT |
| return J1939_NAME{ |
| var J1939_NAME v_j1939_name_reverse := |
| |
| p_j1939_name[7]& p_j1939_name[6]& p_j1939_name[5]& |
| p_j1939_name[4]& p_j1939_name[3]& p_j1939_name[2]& |
| p_j1939_name[1]& p_j1939_name[0]; |
| return v_j1939_name_reverse |
| } |
| |
| // f_reverse_j1939_name() has the same behaviour as f_reverse_j1939_name_withoutencoding() |
| |
| function f_reverse_j1939_name(in J1939_NAME p_j1939_name) |
| //runs on PTC_isobus_CT |
| return J1939_NAME{ |
| var J1939_NAME v_j1939_name_reverse := f_encode_J1939_name(p_j1939_name) |
| |
| return v_j1939_name_reverse |
| } |
| |
| testcase tc_dec_name_1() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E003D0080'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name(f_decode_J1939_name(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_2() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E008200A0'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name(f_decode_J1939_name(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_3() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E001D0080'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name(f_decode_J1939_name(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_4() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E008100A0'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name(f_decode_J1939_name(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_5() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E00800AA1'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name(f_decode_J1939_name(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_6() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E193D0B93'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name(f_decode_J1939_name(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_record_1() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E003D0080'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(f_decode_J1939_name_record(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_record_2() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E008200A0'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(f_decode_J1939_name_record(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_record_3() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E001D0080'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(f_decode_J1939_name_record(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_record_4() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E008100A0'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(f_decode_J1939_name_record(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_record_5() runs on MTC_CT |
| { |
| |
| var J1939_NAME j1939_name_reverse, j1939_name |
| |
| j1939_name_reverse := '3102032E00800AA1'O |
| |
| j1939_name := f_reverse_j1939_name(j1939_name_reverse) |
| |
| log("j1939 name reverse:-------------------------") |
| log(j1939_name_reverse) |
| log("j1939 name----------------------------------") |
| log(j1939_name) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(j1939_name)) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(f_decode_J1939_name_record(j1939_name))) |
| log("--------------------------------------------") |
| } |
| |
| testcase tc_dec_name_record_encode_1() runs on MTC_CT |
| { |
| |
| var J1939_NAME_RECORD j1939_name_record := { |
| arbitraryAddresssBit := 1, |
| industryGroup := 2, |
| vehicleSystemInstance := 0, |
| vehicleSystem := 0, |
| reserved := 0, |
| function_ := 129, |
| functionInstance := 0, |
| ecuInstance := 0, |
| manufacturerCode := 368, |
| identityNumber := 999 |
| } |
| |
| log("j1939 name_record --------------------------") |
| log(j1939_name_record) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(j1939_name_record)) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(f_encode_J1939_name_record(j1939_name_record))) |
| log("--------------------------------------------") |
| } |
| // result NAME = A00081002E0003E7 |
| |
| testcase tc_dec_name_record_encode_2() runs on MTC_CT |
| { |
| |
| var J1939_NAME_RECORD j1939_name_record := { |
| arbitraryAddresssBit := 1, |
| industryGroup := 2, |
| vehicleSystemInstance := 0, |
| vehicleSystem := 0, |
| reserved := 0, |
| function_ := 128, |
| functionInstance := 0, |
| ecuInstance := 0, |
| manufacturerCode := 368, |
| identityNumber := 998 |
| } |
| |
| log("j1939 name_record --------------------------") |
| log(j1939_name_record) |
| log("--------------------------------------------") |
| log(f_encode_J1939_name_record(j1939_name_record)) |
| log("--------------------------------------------") |
| log(f_decode_J1939_name_record(f_encode_J1939_name_record(j1939_name_record))) |
| log("--------------------------------------------") |
| } |
| |
| // result NAME = A00080002E0003E6 |
| |
| } with { encode "RAW" } |
| |