annotate packages/devs/can/loop/current/src/loop_can.c @ 2377:1ca46bebd705

* AT91SAM7 CAN driver package created * cdl/can_at91sam7.cdl * include/can_at91sam7.inl * src/can_at91sam7.c
author asl
date Mon, 26 Mar 2007 10:38:04 +0000
parents f929becf4af2
children 9486e0f8136d
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 // loop_can.c
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
4 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
5 // Loopback CAN device driver
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
6 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
7 //==========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
8 //####ECOSGPLCOPYRIGHTBEGIN####
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
9 // -------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
10 // This file is part of eCos, the Embedded Configurable Operating System.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
11 // Copyright (C) 1998, 1999, 2000, 2001, 2002 Red Hat, Inc.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
12 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
13 // eCos is free software; you can redistribute it and/or modify it under
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
14 // the terms of the GNU General Public License as published by the Free
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
15 // Software Foundation; either version 2 or (at your option) any later version.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
16 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
17 // eCos is distributed in the hope that it will be useful, but WITHOUT ANY
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
18 // WARRANTY; without even the implied warranty of MERCHANTABILITY or
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
19 // FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
20 // for more details.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
21 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
22 // You should have received a copy of the GNU General Public License along
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
23 // with eCos; if not, write to the Free Software Foundation, Inc.,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
24 // 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
25 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
26 // As a special exception, if other files instantiate templates or use macros
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
27 // or inline functions from this file, or you compile this file and link it
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
28 // with other works to produce a work based on this file, this file does not
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
29 // by itself cause the resulting work to be covered by the GNU General Public
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
30 // License. However the source code for this file must still be made available
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
31 // in accordance with section (3) of the GNU General Public License.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
32 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
33 // This exception does not invalidate any other reasons why a work based on
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
34 // this file might be covered by the GNU General Public License.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
35 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
36 // Alternative licenses for eCos may be arranged by contacting Red Hat, Inc.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
37 // at http://sources.redhat.com/ecos/ecos-license/
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
38 // -------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
39 //####ECOSGPLCOPYRIGHTEND####
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
40 //==========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
41 //#####DESCRIPTIONBEGIN####
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
42 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
43 // Author(s): Uwe Kindler
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
44 // Contributors: Uwe Kindler
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
45 // Date: 2005-07-10
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
46 // Purpose: Loopback CAN device driver
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
47 // Description: This device driver implements a pair of CAN lines that are
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
48 // connected back-to-back. Data output to one will appear as
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
49 // input on the other. This process in part driven by an alarm
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
50 // object which provides a degree of separation between the two
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
51 // channels.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
52 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
53 //####DESCRIPTIONEND####
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
54 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
55 //==========================================================================
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
56
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
57 #include <pkgconf/hal.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
58 #include <pkgconf/io_can.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
59 #include <pkgconf/io_can_loop.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
60 #include <cyg/hal/hal_io.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
61
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/devtab.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
64 #include <cyg/io/can.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
65 #include <cyg/hal/hal_intr.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
66 #include <cyg/kernel/kapi.h>
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
67
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
68 #ifdef CYGPKG_IO_CAN_LOOP
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
69
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
70 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
71
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
72 extern void diag_printf(const char *fmt, ...);
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 // Forward definitions
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
76
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
77 static bool loop_can_init(struct cyg_devtab_entry *devtab_entry);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
78 static bool loop_can_putmsg(can_channel *priv, cyg_can_message *pmsg, void *pdata);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
79 static Cyg_ErrNo loop_can_lookup(struct cyg_devtab_entry **tab,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
80 struct cyg_devtab_entry *sub_tab,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
81 const char *name);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
82 static bool loop_can_getevent(can_channel *priv, cyg_can_event *pevent, void *pdata);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
83 static Cyg_ErrNo loop_can_set_config(can_channel *chan, cyg_uint32 key,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
84 const void *xbuf, cyg_uint32 *len);
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
85 static Cyg_ErrNo loop_can_get_config(can_channel *chan, cyg_uint32 key,
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
86 const void* buf, cyg_uint32* len);
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
87 static void loop_can_start_xmit(can_channel *chan);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
88 static void loop_can_stop_xmit(can_channel *chan);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
89
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
90 static void alarm_handler(cyg_handle_t alarm, cyg_addrword_t 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 // Alarm object for feeding data back into CAN channels
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
95
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
96 static cyg_alarm alarm_obj;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
97
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
98 static cyg_handle_t alarm_handle;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
99
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
100 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
101 // Transfer FIFOs
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
102
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
103 #define FIFO_SIZE 16
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
104
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
105 struct fifo
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
106 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
107 cyg_bool tx_enable;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
108 volatile int head;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
109 volatile int tail;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
110 volatile int num;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
111 volatile cyg_can_event buf[FIFO_SIZE+1];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
112 };
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
113
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
114 static struct fifo fifo0 = { false, 0, 0, 0 }; // from CAN0 to CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
115 static struct fifo fifo1 = { false, 0, 0, 0 }; // from CAN1 to CAN0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
116
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
117 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
118
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
119 #define BUFSIZE 128
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
120
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
121 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
122 // Info for each serial device controlled
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
123
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
124 typedef struct loop_can_info {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
125 struct fifo *write_fifo;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
126 struct fifo *read_fifo;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
127 } loop_can_info;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
128
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
129 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
130 // Callback functions exported by this driver
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
131 CAN_LOWLEVEL_FUNS(loop_can_lowlevel_funs,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
132 loop_can_putmsg,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
133 loop_can_getevent,
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
134 loop_can_get_config,
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
135 loop_can_set_config,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
136 loop_can_start_xmit,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
137 loop_can_stop_xmit
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
138 );
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
139
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
140 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
141 // Hardware info for each serial line
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
142
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
143 #ifdef CYGPKG_IO_CAN_LOOP_CAN0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
144 static loop_can_info loop_can_info0 = {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
145 &fifo0,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
146 &fifo1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
147 };
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
148
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
149 static cyg_can_message loop_can_txbuf0[CYGNUM_DEVS_CAN_LOOP_CAN0_QUEUESIZE_TX];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
150 static cyg_can_event loop_can_rxbuf0[CYGNUM_DEVS_CAN_LOOP_CAN0_QUEUESIZE_RX];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
151 #endif // CYGPKG_IO_SERIAL_LOOP_SERIAL0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
152
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
153 #ifdef CYGPKG_IO_CAN_LOOP_CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
154 static loop_can_info loop_can_info1 = {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
155 &fifo1,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
156 &fifo0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
157 };
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
158
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
159 static cyg_can_message loop_can_txbuf1[CYGNUM_DEVS_CAN_LOOP_CAN1_QUEUESIZE_TX];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
160 static cyg_can_event loop_can_rxbuf1[CYGNUM_DEVS_CAN_LOOP_CAN1_QUEUESIZE_RX];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
161 #endif // CYGPKG_IO_SERIAL_LOOP_SERIAL1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
162
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 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
166 // Channel descriptions:
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
167 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
168 #ifdef CYGPKG_IO_CAN_LOOP_CAN0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
169 CAN_CHANNEL_USING_INTERRUPTS(loop_can0_chan,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
170 loop_can_lowlevel_funs,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
171 loop_can_info0,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
172 CYG_CAN_BAUD_RATE(CYGNUM_DEVS_CAN_LOOP_CAN0_KBAUD),
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
173 loop_can_txbuf0, CYGNUM_DEVS_CAN_LOOP_CAN0_QUEUESIZE_TX,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
174 loop_can_rxbuf0, CYGNUM_DEVS_CAN_LOOP_CAN0_QUEUESIZE_RX
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
175 );
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
176 #endif // CYGPKG_IO_CAN_LOOP_CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
177
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
178 #ifdef CYGPKG_IO_CAN_LOOP_CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
179 CAN_CHANNEL_USING_INTERRUPTS(loop_can1_chan,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
180 loop_can_lowlevel_funs,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
181 loop_can_info1,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
182 CYG_CAN_BAUD_RATE(CYGNUM_DEVS_CAN_LOOP_CAN1_KBAUD),
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
183 loop_can_txbuf1, CYGNUM_DEVS_CAN_LOOP_CAN1_QUEUESIZE_TX,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
184 loop_can_rxbuf1, CYGNUM_DEVS_CAN_LOOP_CAN1_QUEUESIZE_RX
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
185 );
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
186 #endif // CYGPKG_IO_CAN_LOOP_CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
187
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
188
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
189
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
190 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
191 // And finally, the device table entries:
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
192 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
193 #ifdef CYGPKG_IO_CAN_LOOP_CAN0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
194 DEVTAB_ENTRY(loop_can_io0,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
195 CYGDAT_DEVS_CAN_LOOP_CAN0_NAME,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
196 0, // Does not depend on a lower level interface
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
197 &cyg_io_can_devio,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
198 loop_can_init,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
199 loop_can_lookup, // CAN driver may need initializing
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
200 &loop_can0_chan
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
201 );
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
202 #endif // CYGPKG_IO_CAN_LOOP_CAN0
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
203
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
204 #ifdef CYGPKG_IO_CAN_LOOP_CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
205 DEVTAB_ENTRY(loop_can_io1,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
206 CYGDAT_DEVS_CAN_LOOP_CAN1_NAME,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
207 0, // Does not depend on a lower level interface
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
208 &cyg_io_can_devio,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
209 loop_can_init,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
210 loop_can_lookup, // CAN driver may need initializing
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
211 &loop_can1_chan
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
212 );
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
213 #endif // CYGPKG_IO_CAN_LOOP_CAN1
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
214
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
215 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
216
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
217 static bool
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
218 loop_can_config_channel(can_channel *chan, cyg_can_info_t *new_config, bool init)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
219 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
220 if (new_config != &chan->config) {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
221 chan->config = *new_config;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
222 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
223 return true;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
224 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
225
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
226 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
227 // Function to initialize the device. Called at bootstrap time.
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
228
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
229 bool loop_can_init(struct cyg_devtab_entry *tab)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
230 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
231 can_channel *chan = (can_channel *)tab->priv;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
232
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
233 (chan->callbacks->can_init)(chan);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
234
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
235 // Set up alarm for feeding data back into channels
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
236
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
237 cyg_alarm_create( cyg_real_time_clock(),
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
238 alarm_handler,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
239 0,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
240 &alarm_handle,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
241 &alarm_obj);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
242
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
243 cyg_alarm_initialize( alarm_handle, 1, 1 );
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
244
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
245 loop_can_config_channel(chan, &chan->config, true);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
246
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
247 return true;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
248 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
249
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
250 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
251 // This routine is called when the device is "looked" up (i.e. attached)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
252
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
253 static Cyg_ErrNo
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
254 loop_can_lookup(struct cyg_devtab_entry **tab,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
255 struct cyg_devtab_entry *sub_tab,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
256 const char *name)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
257 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
258 can_channel *chan = (can_channel *)(*tab)->priv;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
259 (chan->callbacks->can_init)(chan);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
260 return ENOERR;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
261 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
262
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
263 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
264 // Return 'true' if message is sent to device
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
265
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
266 bool
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
267 loop_can_putmsg(can_channel *chan, cyg_can_message *pmsg, void *pdata)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
268 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
269 loop_can_info *loop_chan = (loop_can_info *)chan->dev_priv;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
270
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
271 struct fifo *fwr = loop_chan->write_fifo;
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
272 #ifdef CYGOPT_IO_CAN_TX_EVENT_SUPPORT
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
273 struct fifo *frd = loop_chan->read_fifo;
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
274 #endif
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
275
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
276 if( fwr->num == FIFO_SIZE )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
277 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
278 return false;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
279 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
280
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
281 fwr->buf[fwr->tail].msg = *pmsg;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
282 fwr->buf[fwr->tail].flags = CYGNUM_CAN_EVENT_RX;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
283 fwr->num++;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
284 fwr->tail = (fwr->tail + 1) % FIFO_SIZE;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
285
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
286 #ifdef CYGOPT_IO_CAN_TX_EVENT_SUPPORT
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
287 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
288 // if TX events are supported we insert a TX event into read fifo
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
289 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
290 if( frd->num < FIFO_SIZE )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
291 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
292 frd->buf[frd->tail].msg = *pmsg;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
293 frd->buf[frd->tail].flags = CYGNUM_CAN_EVENT_TX;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
294 frd->num++;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
295 frd->tail = (frd->tail + 1) % FIFO_SIZE;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
296 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
297 #endif
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
298
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
299 return true;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
300 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
301
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
302 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
303
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
304 bool loop_can_getevent(can_channel *chan, cyg_can_event *pevent, void *pdata)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
305 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
306 loop_can_info *loop_chan = (loop_can_info *)chan->dev_priv;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
307
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
308 struct fifo *frd = loop_chan->read_fifo;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
309
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
310 while( frd->num == 0 )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
311 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
312 continue;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
313 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
314
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
315 *pevent = frd->buf[frd->head];
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
316
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
317
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
318 #ifdef CYGOPT_IO_CAN_SUPPORT_TIMESTAMP
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
319 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
320 // if timestamps are supported then we store a actual timestamp into
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
321 // CAN event
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
322 //
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
323 pevent->timestamp = cyg_current_time();
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
324 #endif // CYGOPT_IO_CAN_SUPPORT_TIMESTAMP
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
325
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
326 frd->num--;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
327 frd->head = (frd->head + 1) % FIFO_SIZE;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
328
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
329 return true;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
330 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
331
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
332 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
333
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
334 static Cyg_ErrNo
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
335 loop_can_set_config(can_channel *chan, cyg_uint32 key,
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
336 const void *xbuf, cyg_uint32 *len)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
337 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
338 return ENOERR;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
339 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
340
2377
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
341 //-------------------------------------------------------------------------
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
342 // Query device configuration
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
343
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
344 static Cyg_ErrNo
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
345 loop_can_get_config(can_channel *chan, cyg_uint32 key,
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
346 const void* buf, cyg_uint32* len)
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
347 {
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
348 return ENOERR;
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
349 }
1ca46bebd705 * AT91SAM7 CAN driver package created
asl
parents: 2059
diff changeset
350
2059
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
351
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
352 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
353 // Enable the transmitter on the device
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
354
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
355 static void
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
356 loop_can_start_xmit(can_channel *chan)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
357 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
358 loop_can_info *loop_chan = (loop_can_info *)chan->dev_priv;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
359
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
360 loop_chan->write_fifo->tx_enable = true;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
361
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
362 (chan->callbacks->xmt_msg)(chan, 0);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
363 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
364
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
365 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
366 // Disable the transmitter on the device
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
367
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
368 static void
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
369 loop_can_stop_xmit(can_channel *chan)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
370 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
371 loop_can_info *loop_chan = (loop_can_info *)chan->dev_priv;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
372
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
373 loop_chan->write_fifo->tx_enable = false;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
374 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
375
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
376 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
377
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
378 static void alarm_handler(cyg_handle_t alarm, cyg_addrword_t data)
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
379 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
380 can_channel *chan0 = &loop_can0_chan;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
381 can_channel *chan1 = &loop_can1_chan;
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
382
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
383
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
384 while(fifo0.num )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
385 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
386 (chan1->callbacks->rcv_event)(chan1, 0);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
387
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
388 if(fifo0.tx_enable )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
389 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
390 (chan0->callbacks->xmt_msg)(chan0, 0);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
391 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
392 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
393
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
394 while(fifo1.num )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
395 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
396 (chan0->callbacks->rcv_event)(chan0, 0);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
397
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
398 if(fifo1.tx_enable )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
399 {
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
400 (chan1->callbacks->xmt_msg)(chan1, 0);
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
401 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
402 } // while( fifo1.num )
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
403 }
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
404
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
405
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
406 #endif // CYGPKG_IO_CAN_LOOP
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
407
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
408 //-------------------------------------------------------------------------
f929becf4af2 CAN driver, from Uwe Kindler
gthomas
parents:
diff changeset
409 // EOF loop_can.c