Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in
Toggle navigation
C
CTU CAN FD IP Core
Project overview
Project overview
Details
Activity
Releases
Repository
Repository
Files
Commits
Branches
Tags
Contributors
Graph
Compare
Issues
16
Issues
16
List
Boards
Labels
Service Desk
Milestones
Merge Requests
0
Merge Requests
0
CI / CD
CI / CD
Pipelines
Jobs
Schedules
Operations
Operations
Incidents
Environments
Packages & Registries
Packages & Registries
Container Registry
Analytics
Analytics
CI / CD
Repository
Value Stream
Wiki
Wiki
Snippets
Snippets
Members
Members
Collapse sidebar
Close sidebar
Activity
Graph
Create a new issue
Jobs
Commits
Issue Boards
Open sidebar
canbus
CTU CAN FD IP Core
Commits
5d543e32
Commit
5d543e32
authored
Mar 17, 2019
by
Ille, Ondrej, Ing.
1
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
test: Remove suspend transmission test.
parent
760601bd
Pipeline
#6771
failed with stage
in 42 seconds
Changes
3
Pipelines
1
Hide whitespace changes
Inline
Side-by-side
Showing
3 changed files
with
0 additions
and
254 deletions
+0
-254
test/feature/suspend_transmission_feature_tb.vhd
test/feature/suspend_transmission_feature_tb.vhd
+0
-252
test/tests_fast.yml
test/tests_fast.yml
+0
-1
test/tests_nightly.yml
test/tests_nightly.yml
+0
-1
No files found.
test/feature/suspend_transmission_feature_tb.vhd
deleted
100644 → 0
View file @
760601bd
--------------------------------------------------------------------------------
--
-- CTU CAN FD IP Core
-- Copyright (C) 2015-2018
--
-- Authors:
-- Ondrej Ille <ondrej.ille@gmail.com>
-- Martin Jerabek <martin.jerabek01@gmail.com>
--
-- Project advisors:
-- Jiri Novak <jnovak@fel.cvut.cz>
-- Pavel Pisa <pisa@cmp.felk.cvut.cz>
--
-- Department of Measurement (http://meas.fel.cvut.cz/)
-- Faculty of Electrical Engineering (http://www.fel.cvut.cz)
-- Czech Technical University (http://www.cvut.cz/)
--
-- Permission is hereby granted, free of charge, to any person obtaining a copy
-- of this VHDL component and associated documentation files (the "Component"),
-- to deal in the Component without restriction, including without limitation
-- the rights to use, copy, modify, merge, publish, distribute, sublicense,
-- and/or sell copies of the Component, and to permit persons to whom the
-- Component is furnished to do so, subject to the following conditions:
--
-- The above copyright notice and this permission notice shall be included in
-- all copies or substantial portions of the Component.
--
-- THE COMPONENT IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
-- IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
-- FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
-- AUTHORS OR COPYRIGHTHOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
-- LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
-- FROM, OUT OF OR IN CONNECTION WITH THE COMPONENT OR THE USE OR OTHER DEALINGS
-- IN THE COMPONENT.
--
-- The CAN protocol is developed by Robert Bosch GmbH and protected by patents.
-- Anybody who wants to implement this IP core on silicon has to obtain a CAN
-- protocol license from Bosch.
--
--------------------------------------------------------------------------------
--------------------------------------------------------------------------------
-- Purpose:
-- Test of Suspend transmission field of Interframe space.
--
-- Test sequence:
-- 1. Set Node 1 to be error passive by configuring TX Error counter
-- to be 128. Set Node 2 to be error active by configuring both
-- Error counters to be 0.
-- 2. Read out error state of both nodes. Check that Node 1 is error
-- passive, and Node 2 is error active.
-- Loop (Forever):
-- 3. Set Error counter to 150 to force erro passive again!
-- 4. Insert frame to two TXT Buffers of Node 1. Insert frame to Node 2.
-- 5. Wait until Node 1 starts transmission.
-- 6. Insert frame to Node 2.
-- 7. Wait until frame is transmitted by Node 1 (end of EOF).
-- 8. Wait for 2 Bit times, to compensate for Intermission field! see
-- further explanation!
-- 9. Wait for N Bit times (suspend field).
-- 10. Give command to Node 2 to start Transmission.
-- 11. Check that Node 1 did become receiver, not transmitter although
-- it has frame for transmission available. It can become transmi-
-- tter only if we waited more than 7 bits (length of Suspend)!
-- Break out of loop in this case and check that N=8!
--
-- Just found out that Gedit supports insertion of emojis. Lets see how
-- this is gonna work... 🙄🤔😳🤤🙄🙄
--
--------------------------------------------------------------------------------
-- Revision History:
-- 2.9.2018 Created file
--------------------------------------------------------------------------------
context
work
.
ctu_can_synth_context
;
context
work
.
ctu_can_test_context
;
use
lib
.
pkg_feature_exec_dispath
.
all
;
package
suspend_transmission_feature
is
procedure
suspend_transmission_feature_exec
(
variable
o
:
out
feature_outputs_t
;
signal
so
:
out
feature_signal_outputs_t
;
signal
rand_ctr
:
inout
natural
range
0
to
RAND_POOL_SIZE
;
signal
iout
:
in
instance_outputs_arr_t
;
signal
mem_bus
:
inout
mem_bus_arr_t
;
signal
bus_level
:
in
std_logic
);
end
package
;
package
body
suspend_transmission_feature
is
procedure
suspend_transmission_feature_exec
(
variable
o
:
out
feature_outputs_t
;
signal
so
:
out
feature_signal_outputs_t
;
signal
rand_ctr
:
inout
natural
range
0
to
RAND_POOL_SIZE
;
signal
iout
:
in
instance_outputs_arr_t
;
signal
mem_bus
:
inout
mem_bus_arr_t
;
signal
bus_level
:
in
std_logic
)
is
variable
ID_1
:
natural
:
=
1
;
variable
ID_2
:
natural
:
=
2
;
variable
CAN_frame
:
SW_CAN_frame_type
;
variable
frame_sent
:
boolean
:
=
false
;
variable
mode
:
SW_mode
:
=
(
false
,
false
,
false
,
false
,
true
,
false
,
false
,
false
,
false
,
false
);
variable
rx_state
:
SW_RX_Buffer_info
;
variable
error_ctrs
:
SW_error_counters
:
=
(
0
,
0
,
0
,
0
);
variable
fault_state
:
SW_fault_state
:
=
fc_error_active
;
variable
n
:
integer
:
=
0
;
variable
status
:
SW_status
;
begin
o
.
outcome
:
=
true
;
------------------------------------------------------------------------
-- Force Node 1 to error passive and Check it
------------------------------------------------------------------------
error_ctrs
.
rx_counter
:
=
150
;
set_error_counters
(
error_ctrs
,
ID_1
,
mem_bus
(
1
));
wait
for
30
ns
;
get_fault_state
(
fault_state
,
ID_1
,
mem_bus
(
1
));
check
(
fault_state
=
fc_error_passive
,
"Node 1 not Error passive!"
);
------------------------------------------------------------------------
-- Force Node 2 to error Active and Check it!
------------------------------------------------------------------------
error_ctrs
.
rx_counter
:
=
0
;
set_error_counters
(
error_ctrs
,
ID_2
,
mem_bus
(
2
));
wait
for
30
ns
;
get_fault_state
(
fault_state
,
ID_2
,
mem_bus
(
2
));
check
(
fault_state
=
fc_error_active
,
"Node 2 not Error Active!"
);
------------------------------------------------------------------------
-- Generate frame, hardcode ID to 514, Identifier type to BASE
------------------------------------------------------------------------
CAN_generate_frame
(
rand_ctr
,
CAN_frame
);
CAN_frame
.
ident_type
:
=
BASE
;
CAN_frame
.
identifier
:
=
514
;
while
(
true
)
loop
--------------------------------------------------------------------
-- Reset Error counters to 150 again.
--------------------------------------------------------------------
error_ctrs
.
rx_counter
:
=
150
;
set_error_counters
(
error_ctrs
,
ID_1
,
mem_bus
(
1
));
--------------------------------------------------------------------
-- Send two frames from Node 1. First will start transmission.
-- Then Add the same frame to Node 2.
--------------------------------------------------------------------
CAN_send_frame
(
CAN_frame
,
1
,
ID_1
,
mem_bus
(
1
),
frame_sent
);
CAN_send_frame
(
CAN_frame
,
2
,
ID_1
,
mem_bus
(
1
),
frame_sent
);
info
(
"Inserted 2 frames to Node 1"
);
wait
for
500
ns
;
CAN_insert_TX_frame
(
CAN_frame
,
1
,
ID_2
,
mem_bus
(
2
));
info
(
"Inserted 1 frame to Node 2"
);
--------------------------------------------------------------------
-- Wait until the end of EOF field
--------------------------------------------------------------------
while
(
protocol_type
'VAL
(
to_integer
(
unsigned
(
iout
(
1
)
.
stat_bus
(
STAT_PC_STATE_HIGH
downto
STAT_PC_STATE_LOW
))))
/=
eof
)
loop
wait
until
rising_edge
(
mem_bus
(
1
)
.
clk_sys
);
end
loop
;
while
(
protocol_type
'VAL
(
to_integer
(
unsigned
(
iout
(
1
)
.
stat_bus
(
STAT_PC_STATE_HIGH
downto
STAT_PC_STATE_LOW
))))
=
eof
)
loop
wait
until
rising_edge
(
mem_bus
(
1
)
.
clk_sys
);
end
loop
;
info
(
"End of EOF field"
);
wait
for
40
ns
;
--------------------------------------------------------------------
-- Wait for N + 2 Bit times. 3 is length of intermission. Thus if
-- we wait 2 bit times, we insert the frame in the last bit of
-- Intermission and Node 2 will start transmission right after
-- the end of Intermission.
-- If we wait for 3 bit times, we mark the frame as valid during
-- first bit of Idle, and start frame one bit after the end of
-- intermission.
-- Thisway when N equals to number of bits we waited after the
-- end of intermission.
--------------------------------------------------------------------
CAN_wait_n_bits
(
n
+
2
,
true
,
ID_1
,
mem_bus
(
1
));
info
(
"Waited "
&
integer
'image
(
n
)
&
" bits"
);
-- Give command to the frame in Node 2 for transmission!
send_TXT_buf_cmd
(
buf_set_ready
,
1
,
ID_2
,
mem_bus
(
2
));
-- Wait until frame transmission starts on Node 1!
while
(
protocol_type
'VAL
(
to_integer
(
unsigned
(
iout
(
1
)
.
stat_bus
(
STAT_PC_STATE_HIGH
downto
STAT_PC_STATE_LOW
))))
/=
sof
)
loop
wait
until
rising_edge
(
mem_bus
(
1
)
.
clk_sys
);
end
loop
;
info
(
"Frame started"
);
wait
for
40
ns
;
-- Check Operational State of Node 1!
get_controller_status
(
status
,
ID_1
,
mem_bus
(
1
));
check
(
status
.
transmitter
or
status
.
receiver
,
"Unit Not Transmitter NOR Receiver"
);
if
(
status
.
receiver
)
then
if
(
n
<
8
)
then
info
(
"Unit turned receiver on bit: "
&
integer
'image
(
n
));
end
if
;
check
(
n
<
8
,
"Unit turned receiver after 8 bit Suspend"
);
elsif
(
status
.
transmitter
)
then
check
(
n
>=
8
,
"Suspend transmission shorter than 8 bits!"
);
if
(
n
>=
8
)
then
info
(
"Suspend transmission equal to 8 bits!"
);
exit
;
end
if
;
end
if
;
n
:
=
n
+
1
;
-- Wait until unit frame is finished (Now should be by Node 2)!
CAN_wait_bus_idle
(
ID_1
,
mem_bus
(
1
));
-- Node 1 still has one frame for transmission (the one which was
-- suspended)
CAN_wait_frame_sent
(
ID_1
,
mem_bus
(
1
));
end
loop
;
------------------------------------------------------------------------
-- Now wait until Node 1 transmitts frame which lost the arbitration
-- so that we leave test environmnet withou pending frames in TXT
-- Buffers.
------------------------------------------------------------------------
CAN_wait_bus_idle
(
ID_1
,
mem_bus
(
1
));
info
(
"Last frame was sent!"
);
end
procedure
;
end
package
body
;
\ No newline at end of file
test/tests_fast.yml
View file @
5d543e32
...
...
@@ -64,7 +64,6 @@ feature:
rtr_pref
:
data_length_code
:
bus_start
:
suspend_transmission
:
data_overrun_clear
:
iterations
:
1
txtb_state
:
...
...
test/tests_nightly.yml
View file @
5d543e32
...
...
@@ -93,7 +93,6 @@ feature:
rtr_pref
:
data_length_code
:
bus_start
:
suspend_transmission
:
data_overrun_clear
:
iterations
:
1
txtb_state
:
...
...
Martin Jeřábek
@jerabma7
mentioned in issue
#253 (closed)
·
Mar 22, 2019
mentioned in issue
#253 (closed)
mentioned in issue #253
Toggle commit list
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a 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