annotate packages/devs/can/loop/current/tests/can_overrun1.c @ 3292:7f8e529b4d82 default tip

Fix FREESCALE_EDMA_NBYTES_MLOFFYES_MLOFF() so it works with negative offsets.
author vae
date Wed, 29 Apr 2015 23:31:48 +0000
parents 74dbf4c3f2e1
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
1 //==========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
2 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
3 // can_overrun1.c
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
4 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
5 // Test CAN device drivers
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
6 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
7 //==========================================================================
2729
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
8 // ####ECOSGPLCOPYRIGHTBEGIN####
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
9 // -------------------------------------------
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
10 // This file is part of eCos, the Embedded Configurable Operating System.
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Free Software Foundation, Inc.
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
12 //
2729
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
13 // eCos is free software; you can redistribute it and/or modify it under
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
14 // the terms of the GNU General Public License as published by the Free
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
15 // Software Foundation; either version 2 or (at your option) any later
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
16 // version.
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
17 //
2729
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
18 // eCos is distributed in the hope that it will be useful, but WITHOUT
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
19 // ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
20 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
21 // for more details.
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
22 //
2729
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
23 // You should have received a copy of the GNU General Public License
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
24 // along with eCos; if not, write to the Free Software Foundation, Inc.,
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
25 // 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
26 //
2729
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
27 // As a special exception, if other files instantiate templates or use
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
28 // macros or inline functions from this file, or you compile this file
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
29 // and link it with other works to produce a work based on this file,
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
30 // this file does not by itself cause the resulting work to be covered by
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
31 // the GNU General Public License. However the source code for this file
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
32 // must still be made available in accordance with section (3) of the GNU
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
33 // General Public License v2.
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
34 //
2729
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
35 // This exception does not invalidate any other reasons why a work based
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
36 // on this file might be covered by the GNU General Public License.
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
37 // -------------------------------------------
74dbf4c3f2e1 Update all copyright banners to reflect FSF ownership; fix and improve licence text.
jlarmour
parents: 2424
diff changeset
38 // ####ECOSGPLCOPYRIGHTEND####
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
39 //==========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
40 //#####DESCRIPTIONBEGIN####
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
41 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
42 // Author(s): Uwe Kindler
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
43 // Contributors: Uwe Kindler
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
44 // Date: 2005-08-07
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
45 // Description: Simple read/write test of CAN driver
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
46 //####DESCRIPTIONEND####
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
47
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
48
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
49 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
50 // INCLUDES
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
51 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
52 #include <pkgconf/system.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
53
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
54 #include <cyg/infra/testcase.h> // test macros
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
55 #include <cyg/infra/cyg_ass.h> // assertion macros
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
56 #include <cyg/infra/diag.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
57
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
58 // Package requirements
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
59 #if defined(CYGPKG_IO_CAN) && defined(CYGPKG_KERNEL)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
60
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
61 #include <pkgconf/kernel.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
62 #include <cyg/io/io.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
63 #include <cyg/io/canio.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
64
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
65 // Package option requirements
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
66 #if defined(CYGFUN_KERNEL_API_C)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
67
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
68 #include <cyg/hal/hal_arch.h> // CYGNUM_HAL_STACK_SIZE_TYPICAL
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
69 #include <cyg/kernel/kapi.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
70
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
71 // tx event support required
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
72 #if defined(CYGOPT_IO_CAN_TX_EVENT_SUPPORT)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
73
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
74
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
75 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
76 // DATA TYPES
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
77 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
78 typedef struct st_thread_data
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
79 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
80 cyg_thread obj;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
81 long stack[CYGNUM_HAL_STACK_SIZE_TYPICAL];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
82 cyg_handle_t hdl;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
83 } thread_data_t;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
84
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
85
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
86 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
87 // LOCAL DATA
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
88 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
89 cyg_thread_entry_t can0_thread;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
90 thread_data_t can0_thread_data;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
91
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
92
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
93 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
94 // LOCAL FUNCTIONS
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
95 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
96 #include "can_test_aux.inl" // include CAN test auxiliary functions
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
97
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
98
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
99 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
100 // WRITER THREAD
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
101 //===========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
102 void can0_thread(cyg_addrword_t data)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
103 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
104 cyg_io_handle_t hCAN0;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
105 cyg_uint8 i;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
106 cyg_uint32 len;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
107 cyg_can_buf_info_t buf_info;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
108 cyg_can_event rx_event;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
109 cyg_can_message tx_msg =
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
110 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
111 0x000, // CAN identifier
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
112 data :
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
113 {
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
114 {0x00, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7 }// 8 data bytes
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
115 },
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
116 CYGNUM_CAN_ID_STD, // standard frame
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
117 CYGNUM_CAN_FRAME_DATA, // data frame
2424
4c366bd69cd5 * tests/can_overrun1.c (can0_thread): Fix the length of the data
asl
parents: 2377
diff changeset
118 1, // data length code
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
119 };
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
120
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
121 if (ENOERR != cyg_io_lookup("/dev/can0", &hCAN0))
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
122 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
123 CYG_TEST_FAIL_FINISH("Error opening /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
124 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
125
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
126 len = sizeof(buf_info);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
127 if (ENOERR != cyg_io_get_config(hCAN0, CYG_IO_GET_CONFIG_CAN_BUFFER_INFO ,&buf_info, &len))
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
128 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
129 CYG_TEST_FAIL_FINISH("Error reading config of /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
130 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
131
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
132 if (buf_info.rx_count > 0)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
133 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
134 CYG_TEST_FAIL_FINISH("Empty RX buffer expected for /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
135 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
136
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
137 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
138 // now we send exactly one CAN message more than it is space in left in buffer
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
139 // Because each TX message will cause a TX event in receive queue we should
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
140 // get a RX queue overrun
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
141 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
142 diag_printf("Sending %d CAN messages to /dev/can0\n", buf_info.rx_bufsize + 1);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
143 for (i = 0; i <= buf_info.rx_bufsize; ++i)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
144 {
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
145 CYG_CAN_MSG_SET_STD_ID(tx_msg, 0x000 + i);
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
146 CYG_CAN_MSG_SET_DATA(tx_msg, 0, i);
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
147 len = sizeof(tx_msg);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
148
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
149 if (ENOERR != cyg_io_write(hCAN0, &tx_msg, &len))
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
150 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
151 CYG_TEST_FAIL_FINISH("Error writing to /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
152 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
153 else
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
154 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
155 print_can_msg(&tx_msg, "");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
156 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
157 }
2424
4c366bd69cd5 * tests/can_overrun1.c (can0_thread): Fix the length of the data
asl
parents: 2377
diff changeset
158
4c366bd69cd5 * tests/can_overrun1.c (can0_thread): Fix the length of the data
asl
parents: 2377
diff changeset
159 //
4c366bd69cd5 * tests/can_overrun1.c (can0_thread): Fix the length of the data
asl
parents: 2377
diff changeset
160 // Give the loop back driver time to process all those messages.
4c366bd69cd5 * tests/can_overrun1.c (can0_thread): Fix the length of the data
asl
parents: 2377
diff changeset
161 //
4c366bd69cd5 * tests/can_overrun1.c (can0_thread): Fix the length of the data
asl
parents: 2377
diff changeset
162 cyg_thread_delay(10);
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
163
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
164 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
165 // now check if receive queue is completely filled - that means number of rx events should
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
166 // be equal to RX queue size
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
167 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
168 if (ENOERR != cyg_io_get_config(hCAN0, CYG_IO_GET_CONFIG_CAN_BUFFER_INFO ,&buf_info, &len))
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
169 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
170 CYG_TEST_FAIL_FINISH("Error reading config of /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
171 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
172
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
173 if (buf_info.rx_bufsize != buf_info.rx_count)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
174 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
175 CYG_TEST_FAIL_FINISH("Number of events in /dev/can0 RX queue differs from queue size");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
176 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
177
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
178 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
179 // Now read all events from receive queue - if everything is o.k. than the oldest
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
180 // event should be overwritten by the latest sent message and the last event in
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
181 // queue should indicate a RX overrun
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
182 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
183 diag_printf("\nReceiving %d CAN messages from /dev/can0\n", buf_info.rx_bufsize);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
184 for (i = 0; i < buf_info.rx_bufsize; ++i)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
185 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
186 len = sizeof(rx_event);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
187
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
188 if (ENOERR != cyg_io_read(hCAN0, &rx_event, &len))
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
189 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
190 CYG_TEST_FAIL_FINISH("Error reading from /dev/can1");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
191 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
192 else
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
193 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
194 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
195 // if we received a valid TX event then we can print the message
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
196 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
197 if (rx_event.flags & CYGNUM_CAN_EVENT_TX)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
198 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
199 print_can_msg(&rx_event.msg, "");
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
200 if (rx_event.msg.data.bytes[0] != (i + 1))
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
201 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
202 CYG_TEST_FAIL_FINISH("Received /dev/can0 TX event contains invalid data");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
203 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
204 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
205 else
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
206 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
207 CYG_TEST_FAIL_FINISH("Unexpected CAN event for /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
208 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
209
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
210 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
211 // now check if any other flag is set
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
212 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
213 if (rx_event.flags & CYGNUM_CAN_EVENT_OVERRUN_RX)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
214 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
215 diag_printf("RX queue overrun successfully indicated for /dev/can0\n");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
216 if (i < (buf_info.rx_bufsize - 1))
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
217 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
218 CYG_TEST_FAIL_FINISH("RX queue overrun occured too early /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
219 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
220 else
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
221 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
222 CYG_TEST_PASS_FINISH("can_overrun1 test OK");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
223 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
224 } // if (rx_event.flags & CYGNUM_CAN_EVENT_OVERRUN_RX)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
225 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
226 } // for (i = 0; i < buf_info.rx_bufsize; ++i)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
227
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
228 CYG_TEST_FAIL_FINISH("RX overrun expected but not received for /dev/can0");
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
229 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
230
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
231
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
232
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
233 void
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
234 cyg_start(void)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
235 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
236 CYG_TEST_INIT();
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
237
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
238 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
239 // create the two threads which access the CAN device driver
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
240 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
241 cyg_thread_create(4, can0_thread,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
242 (cyg_addrword_t) 0,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
243 "can0_thread",
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
244 (void *) can0_thread_data.stack,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
245 1024 * sizeof(long),
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
246 &can0_thread_data.hdl,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
247 &can0_thread_data.obj);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
248
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
249 cyg_thread_resume(can0_thread_data.hdl);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
250
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
251 cyg_scheduler_start();
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
252 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
253
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
254 #else // CYGOPT_IO_CAN_TX_EVENT_SUPPORT
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
255 #define N_A_MSG "TX event support required for IO/CAN"
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
256 #endif
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
257
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
258 #else // CYGFUN_KERNEL_API_C
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
259 #define N_A_MSG "Needs kernel C API"
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
260 #endif
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
261
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
262 #else // CYGPKG_IO_CAN && CYGPKG_KERNEL
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
263 #define N_A_MSG "Needs IO/CAN and Kernel"
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
264 #endif
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
265
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
266 #ifdef N_A_MSG
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
267 void
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
268 cyg_start( void )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
269 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
270 CYG_TEST_INIT();
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
271 CYG_TEST_NA( N_A_MSG);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
272 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
273 #endif // N_A_MSG
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
274
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
275 // EOF serial4.c