]> git.kernelconcepts.de Git - karo-tx-redboot.git/blob - packages/devs/can/loop/v2_0/tests/can_txevent.c
Initial revision
[karo-tx-redboot.git] / packages / devs / can / loop / v2_0 / tests / can_txevent.c
1 //==========================================================================
2 //
3 //        can_txevent.c
4 //
5 //        Test CAN device driver timeouts
6 //
7 //==========================================================================
8 //####ECOSGPLCOPYRIGHTBEGIN####
9 // -------------------------------------------
10 // This file is part of eCos, the Embedded Configurable Operating System.
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
12 //
13 // eCos is free software; you can redistribute it and/or modify it under
14 // the terms of the GNU General Public License as published by the Free
15 // Software Foundation; either version 2 or (at your option) any later version.
16 //
17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
19 // FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
20 // for more details.
21 //
22 // You should have received a copy of the GNU General Public License along
23 // with eCos; if not, write to the Free Software Foundation, Inc.,
24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
25 //
26 // As a special exception, if other files instantiate templates or use macros
27 // or inline functions from this file, or you compile this file and link it
28 // with other works to produce a work based on this file, this file does not
29 // by itself cause the resulting work to be covered by the GNU General Public
30 // License. However the source code for this file must still be made available
31 // in accordance with section (3) of the GNU General Public License.
32 //
33 // This exception does not invalidate any other reasons why a work based on
34 // this file might be covered by the GNU General Public License.
35 //
36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
37 // at http://sources.redhat.com/ecos/ecos-license/
38 // -------------------------------------------
39 //####ECOSGPLCOPYRIGHTEND####
40 //==========================================================================
41 //#####DESCRIPTIONBEGIN####
42 //
43 // Author(s):     Uwe Kindler
44 // Contributors:  Uwe Kindler
45 // Date:          2005-08-07
46 // Description:   Timeout test of CAN device driver
47 //####DESCRIPTIONEND####
48
49
50 //===========================================================================
51 //                                INCLUDES
52 //===========================================================================
53 #include <pkgconf/system.h>
54
55 #include <cyg/infra/testcase.h>         // test macros
56 #include <cyg/infra/cyg_ass.h>          // assertion macros
57 #include <cyg/infra/diag.h>
58
59 // Package requirements
60 #if defined(CYGPKG_IO_CAN) && defined(CYGPKG_KERNEL)
61
62 #include <pkgconf/kernel.h>
63 #include <cyg/io/io.h>
64 #include <cyg/io/canio.h>
65
66 // Package option requirements
67 #if defined(CYGFUN_KERNEL_API_C)
68
69 #include <cyg/hal/hal_arch.h>           // CYGNUM_HAL_STACK_SIZE_TYPICAL
70 #include <cyg/kernel/kapi.h>
71
72 // tx event support required
73 #if defined(CYGOPT_IO_CAN_TX_EVENT_SUPPORT)
74
75
76 //===========================================================================
77 //                               DATA TYPES
78 //===========================================================================
79 typedef struct st_thread_data
80 {
81     cyg_thread   obj;
82     long         stack[CYGNUM_HAL_STACK_SIZE_TYPICAL];
83     cyg_handle_t hdl;
84 } thread_data_t;
85
86
87 //===========================================================================
88 //                              LOCAL DATA
89 //===========================================================================
90 cyg_thread_entry_t can0_thread;
91 thread_data_t      can0_thread_data;
92
93
94 //===========================================================================
95 //                          LOCAL FUNCTIONS
96 //===========================================================================
97 #include "can_test_aux.inl" // include CAN test auxiliary functions
98
99
100 //===========================================================================
101 //                             WRITER THREAD 
102 //===========================================================================
103 void can0_thread(cyg_addrword_t data)
104 {
105     cyg_io_handle_t    hCAN0;
106     cyg_uint32         len;
107     cyg_can_buf_info_t buf_info;
108     cyg_uint16         i;
109     cyg_can_event      rx_event;
110     cyg_can_message    tx_msg =
111     {
112         0x000,                                               // CAN identifier
113         {0x00, 0xf1, 0xf2, 0xf3, 0xf4, 0xf5, 0xf6, 0xf7},    // 8 data bytes
114         CYGNUM_CAN_ID_STD,                                   // standard frame
115         CYGNUM_CAN_FRAME_DATA,                               // data frame
116         4,                                                   // data length code
117     };
118    
119     
120     if (ENOERR != cyg_io_lookup("/dev/can0", &hCAN0)) 
121     {
122         CYG_TEST_FAIL_FINISH("Error opening /dev/can0");
123     }
124     
125     //
126     // first we read the buffer info
127     //
128     len = sizeof(buf_info);
129     if (ENOERR != cyg_io_get_config(hCAN0, CYG_IO_GET_CONFIG_CAN_BUFFER_INFO ,&buf_info, &len))
130     {
131         CYG_TEST_FAIL_FINISH("Error reading config of /dev/can0");
132     }
133     
134     //
135     // check if buffer is really empty
136     //
137     if (buf_info.rx_count != 0)
138     {
139         CYG_TEST_FAIL_FINISH("Receive buffer of /dev/can0 is not empty.");
140     }
141     
142     //
143     // now send messages - because TX events are supported each transmitted CAN message
144     // will cause a TX event that is filled into receive queue
145     //
146     diag_printf("Sending %d CAN messages to /dev/can0 \n", buf_info.rx_bufsize);
147     for (i = 0; i < buf_info.rx_bufsize; ++i)
148     {
149         tx_msg.id = i;
150         tx_msg.data[0] = i;
151         len = sizeof(tx_msg);
152         
153         if (ENOERR != cyg_io_write(hCAN0, &tx_msg, &len))
154         {
155             CYG_TEST_FAIL_FINISH("Error writing to /dev/can0");
156         }
157         else
158         {
159             print_can_msg(&tx_msg, "");
160         }
161     }
162     
163     //
164     // now we read the buffer info - we expect a completely filled recieve queue
165     //
166     len = sizeof(buf_info);
167     if (ENOERR != cyg_io_get_config(hCAN0, CYG_IO_GET_CONFIG_CAN_BUFFER_INFO ,&buf_info, &len))
168     {
169         CYG_TEST_FAIL_FINISH("Error reading config of /dev/can0");
170     }
171     
172     //
173     // if receive queue is not completely filled, then we have an error here
174     //
175     if (buf_info.rx_bufsize != buf_info.rx_count)
176     {
177         diag_printf("RX bufsize: %d    events in RX buffer: %d\n", buf_info.rx_bufsize, buf_info.rx_count);
178         CYG_TEST_FAIL_FINISH("Receive queue of /dev/can0 not completely filled.");
179     }
180     
181     //
182     // now we read the receive queue
183     //
184     diag_printf("Receiving %d TX events from /dev/can0 \n", buf_info.rx_count);
185     for (i = 0; i < buf_info.rx_count; ++i)
186     {
187         len = sizeof(rx_event);
188         
189         if (ENOERR != cyg_io_read(hCAN0, &rx_event, &len))
190         {
191             CYG_TEST_FAIL_FINISH("Error reading from /dev/can0");
192         }
193         
194         //
195         // we expect only a set TX flag because no other events may arrive for the
196         // loopback driver
197         //
198         if (!(rx_event.flags & CYGNUM_CAN_EVENT_TX) || (rx_event.flags & !CYGNUM_CAN_EVENT_TX))
199         {
200             CYG_TEST_FAIL_FINISH("Unexpected receive event flags.");
201         }
202         
203         //
204         // Now check if TX events contain valid data - we know that the ID and the first
205         // data byte contain the message number
206         //
207         if ((rx_event.msg.id != i) || (rx_event.msg.data[0] != i))
208         {
209             CYG_TEST_FAIL_FINISH("Received invalid data in TX event");
210         }
211         else
212         {
213             print_can_msg(&rx_event.msg, "");
214         }     
215     } // for (i = 0; i < buf_info.rx_count; ++i)
216            
217     CYG_TEST_PASS_FINISH("can_txevent test OK");                     
218 }
219
220
221
222 void
223 cyg_start(void)
224 {
225     CYG_TEST_INIT();
226     
227     //
228     // create the thread which access the CAN device driver
229     //
230     cyg_thread_create(4, can0_thread, 
231                         (cyg_addrword_t) 0,
232                                 "can0_thread", 
233                                 (void *) can0_thread_data.stack, 
234                                 1024 * sizeof(long),
235                                 &can0_thread_data.hdl, 
236                                 &can0_thread_data.obj);
237                                 
238     cyg_thread_resume(can0_thread_data.hdl);
239     
240     cyg_scheduler_start();
241 }
242
243 #else // CYGOPT_IO_CAN_TX_EVENT_SUPPORT
244 #define N_A_MSG "TX event support required for IO/CAN"
245 #endif
246
247 #else // CYGFUN_KERNEL_API_C
248 #define N_A_MSG "Needs kernel C API"
249 #endif
250
251 #else // CYGPKG_IO_CAN && CYGPKG_KERNEL
252 #define N_A_MSG "Needs IO/CAN and Kernel"
253 #endif
254
255 #ifdef N_A_MSG
256 void
257 cyg_start( void )
258 {
259     CYG_TEST_INIT();
260     CYG_TEST_NA( N_A_MSG);
261 }
262 #endif // N_A_MSG
263
264 // EOF serial4.c