package SptTgtCfg; use strict; $| = 1; require 5.6.1; %SptTgtCfg::Max_Num_Can_Network_Interface = ( "GHS NECV850ESFX3" => 5, "GHS NECV850ESFE3 F3370A" => 1, "GHS NECV850ESFK3 F3384" => 5, "GHS NECV850ESFK3 F3385" => 5, ); %SptTgtCfg::Max_Num_Lin_Network_Interface =( "GHS NECV850ESFX3" => 8, "GHS NECV850ESFE3 F3370A" => 2, "GHS NECV850ESFE3 F3371" => 2, "GHS NECV850ESFK3 F3385" => 8, ); %SptTgtCfg::Max_Num_Of_Interest_Mask = ( CAN11 => 4, CAN29 => 4 ); $SptTgtCfg::Is_Lin_Supported = $TRUE; %SptTgtCfg::Controller_Lookup_Hash = ( FCAN => { Protocol => "CAN", }, UARTD => { Protocol => "LIN", }, ); sub ccheck_tgt_repeated_base_address { my ($base, $ni_name); my (%base_address); foreach $ni_name (@SptIm::Ni_Names) { $base = $SptTgtParser::Target_File_Contents_Hash{NetInterfaceDef} {$ni_name}{Base}; if (exists($base_address{$base})) { &SptUtils::ui_err(3, "Network interface <$ni_name> has same base " . "address as the base address of the other network interface."); next; } $base_address{$base} = $ni_name; next; } } # End of subroutine ccheck_tgt_repeated_base_address 1;