Rev 4728 | Rev 4743 | Go to most recent revision | Only display areas with differences | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 4728 | Rev 4731 | ||
---|---|---|---|
1 | /* |
1 | /* |
2 | * Copyright (c) 2009 Lukas Mejdrech |
2 | * Copyright (c) 2009 Lukas Mejdrech |
3 | * All rights reserved. |
3 | * All rights reserved. |
4 | * |
4 | * |
5 | * Redistribution and use in source and binary forms, with or without |
5 | * Redistribution and use in source and binary forms, with or without |
6 | * modification, are permitted provided that the following conditions |
6 | * modification, are permitted provided that the following conditions |
7 | * are met: |
7 | * are met: |
8 | * |
8 | * |
9 | * - Redistributions of source code must retain the above copyright |
9 | * - Redistributions of source code must retain the above copyright |
10 | * notice, this list of conditions and the following disclaimer. |
10 | * notice, this list of conditions and the following disclaimer. |
11 | * - Redistributions in binary form must reproduce the above copyright |
11 | * - Redistributions in binary form must reproduce the above copyright |
12 | * notice, this list of conditions and the following disclaimer in the |
12 | * notice, this list of conditions and the following disclaimer in the |
13 | * documentation and/or other materials provided with the distribution. |
13 | * documentation and/or other materials provided with the distribution. |
14 | * - The name of the author may not be used to endorse or promote products |
14 | * - The name of the author may not be used to endorse or promote products |
15 | * derived from this software without specific prior written permission. |
15 | * derived from this software without specific prior written permission. |
16 | * |
16 | * |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
17 | * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
18 | * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
22 | * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
23 | * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
24 | * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
25 | * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
27 | */ |
27 | */ |
28 | 28 | ||
29 | /** @addtogroup eth |
29 | /** @addtogroup eth |
30 | * @{ |
30 | * @{ |
31 | */ |
31 | */ |
32 | 32 | ||
33 | /** @file |
33 | /** @file |
34 | * Ethernet module implementation. |
34 | * Ethernet module implementation. |
35 | * @see eth.h |
35 | * @see eth.h |
36 | */ |
36 | */ |
37 | 37 | ||
38 | #include <async.h> |
38 | #include <async.h> |
39 | #include <malloc.h> |
39 | #include <malloc.h> |
40 | #include <mem.h> |
40 | #include <mem.h> |
41 | #include <stdio.h> |
41 | #include <stdio.h> |
42 | #include <string.h> |
42 | #include <string.h> |
43 | 43 | ||
44 | #include <ipc/ipc.h> |
44 | #include <ipc/ipc.h> |
45 | #include <ipc/services.h> |
45 | #include <ipc/services.h> |
46 | 46 | ||
47 | #include "../../err.h" |
47 | #include "../../err.h" |
48 | #include "../../messages.h" |
48 | #include "../../messages.h" |
49 | #include "../../modules.h" |
49 | #include "../../modules.h" |
50 | 50 | ||
51 | #include "../../include/byteorder.h" |
51 | #include "../../include/byteorder.h" |
52 | #include "../../include/crc.h" |
52 | #include "../../include/crc.h" |
53 | #include "../../include/ethernet_lsap.h" |
53 | #include "../../include/ethernet_lsap.h" |
54 | #include "../../include/ethernet_protocols.h" |
54 | #include "../../include/ethernet_protocols.h" |
55 | #include "../../include/protocol_map.h" |
55 | #include "../../include/protocol_map.h" |
56 | #include "../../include/device.h" |
56 | #include "../../include/device.h" |
57 | #include "../../include/netif_interface.h" |
57 | #include "../../include/netif_interface.h" |
58 | #include "../../include/net_interface.h" |
58 | #include "../../include/net_interface.h" |
59 | #include "../../include/nil_interface.h" |
59 | #include "../../include/nil_interface.h" |
60 | #include "../../include/il_interface.h" |
60 | #include "../../include/il_interface.h" |
61 | 61 | ||
62 | #include "../../structures/measured_strings.h" |
62 | #include "../../structures/measured_strings.h" |
63 | #include "../../structures/packet/packet_client.h" |
63 | #include "../../structures/packet/packet_client.h" |
64 | 64 | ||
65 | #include "../nil_module.h" |
65 | #include "../nil_module.h" |
66 | 66 | ||
67 | #include "eth.h" |
67 | #include "eth.h" |
68 | #include "eth_header.h" |
68 | #include "eth_header.h" |
69 | 69 | ||
70 | /** Reserved packet prefix length. |
70 | /** Reserved packet prefix length. |
71 | */ |
71 | */ |
72 | #define ETH_PREFIX ( sizeof( eth_header_t ) + sizeof( eth_header_lsap_t ) + sizeof( eth_header_snap_t )) |
72 | #define ETH_PREFIX ( sizeof( eth_header_t ) + sizeof( eth_header_lsap_t ) + sizeof( eth_header_snap_t )) |
73 | 73 | ||
74 | /** Reserved packet suffix length. |
74 | /** Reserved packet suffix length. |
75 | */ |
75 | */ |
76 | #define ETH_SUFFIX sizeof( eth_fcs_t ) |
76 | #define ETH_SUFFIX sizeof( eth_fcs_t ) |
77 | 77 | ||
78 | /** Maximum packet content length. |
78 | /** Maximum packet content length. |
79 | */ |
79 | */ |
80 | #define ETH_MAX_CONTENT 1500 |
80 | #define ETH_MAX_CONTENT 1500u |
81 | 81 | ||
82 | /** Minimum packet content length. |
82 | /** Minimum packet content length. |
83 | */ |
83 | */ |
84 | #define ETH_MIN_CONTENT 46u |
84 | #define ETH_MIN_CONTENT 46u |
85 | 85 | ||
86 | /** Maximum tagged packet content length. |
86 | /** Maximum tagged packet content length. |
87 | */ |
87 | */ |
88 | #define ETH_MAX_TAGGED_CONTENT( flags ) ( ETH_MAX_CONTENT - (( IS_8023_2_LSAP( flags ) || IS_8023_2_SNAP( flags )) ? sizeof( eth_header_lsap_t ) : 0 ) - ( IS_8023_2_SNAP( flags ) ? sizeof( eth_header_snap_t ) : 0 )) |
88 | #define ETH_MAX_TAGGED_CONTENT( flags ) ( ETH_MAX_CONTENT - (( IS_8023_2_LSAP( flags ) || IS_8023_2_SNAP( flags )) ? sizeof( eth_header_lsap_t ) : 0 ) - ( IS_8023_2_SNAP( flags ) ? sizeof( eth_header_snap_t ) : 0 )) |
89 | 89 | ||
90 | /** Minimum tagged packet content length. |
90 | /** Minimum tagged packet content length. |
91 | */ |
91 | */ |
92 | #define ETH_MIN_TAGGED_CONTENT( flags ) ( ETH_MIN_CONTENT - (( IS_8023_2_LSAP( flags ) || IS_8023_2_SNAP( flags )) ? sizeof( eth_header_lsap_t ) : 0 ) - ( IS_8023_2_SNAP( flags ) ? sizeof( eth_header_snap_t ) : 0 )) |
92 | #define ETH_MIN_TAGGED_CONTENT( flags ) ( ETH_MIN_CONTENT - (( IS_8023_2_LSAP( flags ) || IS_8023_2_SNAP( flags )) ? sizeof( eth_header_lsap_t ) : 0 ) - ( IS_8023_2_SNAP( flags ) ? sizeof( eth_header_snap_t ) : 0 )) |
93 | 93 | ||
94 | /** Dummy flag shift value. |
94 | /** Dummy flag shift value. |
95 | */ |
95 | */ |
96 | #define ETH_DUMMY_SHIFT 0 |
96 | #define ETH_DUMMY_SHIFT 0 |
97 | 97 | ||
98 | /** Mode flag shift value. |
98 | /** Mode flag shift value. |
99 | */ |
99 | */ |
100 | #define ETH_MODE_SHIFT 1 |
100 | #define ETH_MODE_SHIFT 1 |
101 | 101 | ||
102 | /** Dummy device flag. |
102 | /** Dummy device flag. |
103 | * Preamble and FCS are mandatory part of the packets. |
103 | * Preamble and FCS are mandatory part of the packets. |
104 | */ |
104 | */ |
105 | #define ETH_DUMMY ( 1 << ETH_DUMMY_SHIFT ) |
105 | #define ETH_DUMMY ( 1 << ETH_DUMMY_SHIFT ) |
106 | 106 | ||
107 | /** Returns the dummy flag. |
107 | /** Returns the dummy flag. |
108 | * @see ETH_DUMMY |
108 | * @see ETH_DUMMY |
109 | */ |
109 | */ |
110 | #define IS_DUMMY( flags ) (( flags ) & ETH_DUMMY ) |
110 | #define IS_DUMMY( flags ) (( flags ) & ETH_DUMMY ) |
111 | 111 | ||
112 | /** Device mode flags. |
112 | /** Device mode flags. |
113 | * @see ETH_DIX |
113 | * @see ETH_DIX |
114 | * @see ETH_8023_2_LSAP |
114 | * @see ETH_8023_2_LSAP |
115 | * @see ETH_8023_2_SNAP |
115 | * @see ETH_8023_2_SNAP |
116 | */ |
116 | */ |
117 | #define ETH_MODE_MASK ( 3 << ETH_MODE_SHIFT ) |
117 | #define ETH_MODE_MASK ( 3 << ETH_MODE_SHIFT ) |
118 | 118 | ||
119 | /** DIX Ethernet mode flag. |
119 | /** DIX Ethernet mode flag. |
120 | */ |
120 | */ |
121 | #define ETH_DIX ( 1 << ETH_MODE_SHIFT ) |
121 | #define ETH_DIX ( 1 << ETH_MODE_SHIFT ) |
122 | 122 | ||
123 | /** Returns whether the DIX Ethernet mode flag is set. |
123 | /** Returns whether the DIX Ethernet mode flag is set. |
124 | * @param flags The ethernet flags. Input parameter. |
124 | * @param flags The ethernet flags. Input parameter. |
125 | * @see ETH_DIX |
125 | * @see ETH_DIX |
126 | */ |
126 | */ |
127 | #define IS_DIX( flags ) ((( flags ) & ETH_MODE_MASK ) == ETH_DIX ) |
127 | #define IS_DIX( flags ) ((( flags ) & ETH_MODE_MASK ) == ETH_DIX ) |
128 | 128 | ||
129 | /** 802.3 + 802.2 + LSAP mode flag. |
129 | /** 802.3 + 802.2 + LSAP mode flag. |
130 | */ |
130 | */ |
131 | #define ETH_8023_2_LSAP ( 2 << ETH_MODE_SHIFT ) |
131 | #define ETH_8023_2_LSAP ( 2 << ETH_MODE_SHIFT ) |
132 | 132 | ||
133 | /** Returns whether the 802.3 + 802.2 + LSAP mode flag is set. |
133 | /** Returns whether the 802.3 + 802.2 + LSAP mode flag is set. |
134 | * @param flags The ethernet flags. Input parameter. |
134 | * @param flags The ethernet flags. Input parameter. |
135 | * @see ETH_8023_2_LSAP |
135 | * @see ETH_8023_2_LSAP |
136 | */ |
136 | */ |
137 | #define IS_8023_2_LSAP( flags ) ((( flags ) & ETH_MODE_MASK ) == ETH_8023_2_LSAP ) |
137 | #define IS_8023_2_LSAP( flags ) ((( flags ) & ETH_MODE_MASK ) == ETH_8023_2_LSAP ) |
138 | 138 | ||
139 | /** 802.3 + 802.2 + LSAP + SNAP mode flag. |
139 | /** 802.3 + 802.2 + LSAP + SNAP mode flag. |
140 | */ |
140 | */ |
141 | #define ETH_8023_2_SNAP ( 3 << ETH_MODE_SHIFT ) |
141 | #define ETH_8023_2_SNAP ( 3 << ETH_MODE_SHIFT ) |
142 | 142 | ||
143 | /** Returns whether the 802.3 + 802.2 + LSAP + SNAP mode flag is set. |
143 | /** Returns whether the 802.3 + 802.2 + LSAP + SNAP mode flag is set. |
144 | * @param flags The ethernet flags. Input parameter. |
144 | * @param flags The ethernet flags. Input parameter. |
145 | * @see ETH_8023_2_SNAP |
145 | * @see ETH_8023_2_SNAP |
146 | */ |
146 | */ |
147 | #define IS_8023_2_SNAP( flags ) ((( flags ) & ETH_MODE_MASK ) == ETH_8023_2_SNAP ) |
147 | #define IS_8023_2_SNAP( flags ) ((( flags ) & ETH_MODE_MASK ) == ETH_8023_2_SNAP ) |
148 | 148 | ||
149 | /** Type definition of the ethernet address type. |
149 | /** Type definition of the ethernet address type. |
150 | * @see eth_addr_type |
150 | * @see eth_addr_type |
151 | */ |
151 | */ |
152 | typedef enum eth_addr_type eth_addr_type_t; |
152 | typedef enum eth_addr_type eth_addr_type_t; |
153 | 153 | ||
154 | /** Type definition of the ethernet address type pointer. |
154 | /** Type definition of the ethernet address type pointer. |
155 | * @see eth_addr_type |
155 | * @see eth_addr_type |
156 | */ |
156 | */ |
157 | typedef eth_addr_type_t * eth_addr_type_ref; |
157 | typedef eth_addr_type_t * eth_addr_type_ref; |
158 | 158 | ||
159 | /** Ethernet address type. |
159 | /** Ethernet address type. |
160 | */ |
160 | */ |
161 | enum eth_addr_type{ |
161 | enum eth_addr_type{ |
162 | /** Local address. |
162 | /** Local address. |
163 | */ |
163 | */ |
164 | ETH_LOCAL_ADDR, |
164 | ETH_LOCAL_ADDR, |
165 | /** Broadcast address. |
165 | /** Broadcast address. |
166 | */ |
166 | */ |
167 | ETH_BROADCAST_ADDR |
167 | ETH_BROADCAST_ADDR |
168 | }; |
168 | }; |
169 | 169 | ||
170 | /** Ethernet module global data. |
170 | /** Ethernet module global data. |
171 | */ |
171 | */ |
172 | eth_globals_t eth_globals; |
172 | eth_globals_t eth_globals; |
173 | 173 | ||
174 | /** @name Message processing functions |
174 | /** @name Message processing functions |
175 | */ |
175 | */ |
176 | /*@{*/ |
176 | /*@{*/ |
177 | 177 | ||
178 | /** Processes IPC messages from the registered device driver modules in an infinite loop. |
178 | /** Processes IPC messages from the registered device driver modules in an infinite loop. |
179 | * @param iid The message identifier. Input parameter. |
179 | * @param iid The message identifier. Input parameter. |
180 | * @param icall The message parameters. Input/output parameter. |
180 | * @param icall The message parameters. Input/output parameter. |
181 | */ |
181 | */ |
182 | void eth_receiver( ipc_callid_t iid, ipc_call_t * icall ); |
182 | void eth_receiver( ipc_callid_t iid, ipc_call_t * icall ); |
183 | 183 | ||
184 | /** Registers new device or updates the MTU of an existing one. |
184 | /** Registers new device or updates the MTU of an existing one. |
185 | * Determines the device local hardware address. |
185 | * Determines the device local hardware address. |
186 | * @param device_id The new device identifier. Input parameter. |
186 | * @param device_id The new device identifier. Input parameter. |
187 | * @param service The device driver service. Input parameter. |
187 | * @param service The device driver service. Input parameter. |
188 | * @param mtu The device maximum transmission unit. Input parameter. |
188 | * @param mtu The device maximum transmission unit. Input parameter. |
189 | * @returns EOK on success. |
189 | * @returns EOK on success. |
190 | * @returns EEXIST if the device with the different service exists. |
190 | * @returns EEXIST if the device with the different service exists. |
191 | * @returns ENOMEM if there is not enough memory left. |
191 | * @returns ENOMEM if there is not enough memory left. |
192 | * @returns Other error codes as defined for the net_get_device_conf_req() function. |
192 | * @returns Other error codes as defined for the net_get_device_conf_req() function. |
193 | * @returns Other error codes as defined for the netif_bind_service() function. |
193 | * @returns Other error codes as defined for the netif_bind_service() function. |
194 | * @returns Other error codes as defined for the netif_get_addr() function. |
194 | * @returns Other error codes as defined for the netif_get_addr() function. |
195 | */ |
195 | */ |
196 | int eth_device_message( device_id_t device_id, services_t service, size_t mtu ); |
196 | int eth_device_message( device_id_t device_id, services_t service, size_t mtu ); |
197 | 197 | ||
198 | /** Registers receiving module service. |
198 | /** Registers receiving module service. |
199 | * Passes received packets for this service. |
199 | * Passes received packets for this service. |
200 | * @param service The module service. Input parameter. |
200 | * @param service The module service. Input parameter. |
201 | * @param phone The service phone. Input parameter. |
201 | * @param phone The service phone. Input parameter. |
202 | * @returns EOK on success. |
202 | * @returns EOK on success. |
203 | * @returns ENOENT if the service is not known. |
203 | * @returns ENOENT if the service is not known. |
204 | * @returns ENOMEM if there is not enough memory left. |
204 | * @returns ENOMEM if there is not enough memory left. |
205 | */ |
205 | */ |
206 | int eth_register_message( services_t service, int phone ); |
206 | int eth_register_message( services_t service, int phone ); |
207 | 207 | ||
208 | /** Returns the device packet dimensions for sending. |
208 | /** Returns the device packet dimensions for sending. |
209 | * @param device_id The device identifier. Input parameter. |
209 | * @param device_id The device identifier. Input parameter. |
210 | * @param addr_len The minimum reserved address length. Output parameter. |
210 | * @param addr_len The minimum reserved address length. Output parameter. |
211 | * @param prefix The minimum reserved prefix size. Output parameter. |
211 | * @param prefix The minimum reserved prefix size. Output parameter. |
212 | * @param content The maximum content size. Output parameter. |
212 | * @param content The maximum content size. Output parameter. |
213 | * @param suffix The minimum reserved suffix size. Output parameter. |
213 | * @param suffix The minimum reserved suffix size. Output parameter. |
214 | * @returns EOK on success. |
214 | * @returns EOK on success. |
215 | * @returns EBADMEM if either one of the parameters is NULL. |
215 | * @returns EBADMEM if either one of the parameters is NULL. |
216 | * @returns ENOENT if there is no such device. |
216 | * @returns ENOENT if there is no such device. |
217 | */ |
217 | */ |
218 | int eth_packet_space_message( device_id_t device_id, size_t * addr_len, size_t * prefix, size_t * content, size_t * suffix ); |
218 | int eth_packet_space_message( device_id_t device_id, size_t * addr_len, size_t * prefix, size_t * content, size_t * suffix ); |
219 | 219 | ||
220 | /** Returns the device hardware address. |
220 | /** Returns the device hardware address. |
221 | * @param device_id The device identifier. Input parameter. |
221 | * @param device_id The device identifier. Input parameter. |
222 | * @param type Type of the desired address. Input parameter |
222 | * @param type Type of the desired address. Input parameter |
223 | * @param address The device hardware address. Output parameter. |
223 | * @param address The device hardware address. Output parameter. |
224 | * @returns EOK on success. |
224 | * @returns EOK on success. |
225 | * @returns EBADMEM if the address parameter is NULL. |
225 | * @returns EBADMEM if the address parameter is NULL. |
226 | * @returns ENOENT if there no such device. |
226 | * @returns ENOENT if there no such device. |
227 | */ |
227 | */ |
228 | int eth_addr_message( device_id_t device_id, eth_addr_type_t type, measured_string_ref * address ); |
228 | int eth_addr_message( device_id_t device_id, eth_addr_type_t type, measured_string_ref * address ); |
229 | 229 | ||
230 | /** Sends the packet queue. |
230 | /** Sends the packet queue. |
231 | * Sends only packet successfully processed by the eth_prepare_packet() function. |
231 | * Sends only packet successfully processed by the eth_prepare_packet() function. |
232 | * @param device_id The device identifier. Input parameter. |
232 | * @param device_id The device identifier. Input parameter. |
233 | * @param packet The packet queue. Input parameter. |
233 | * @param packet The packet queue. Input parameter. |
234 | * @param sender The sending module service. Input parameter. |
234 | * @param sender The sending module service. Input parameter. |
235 | * @returns EOK on success. |
235 | * @returns EOK on success. |
236 | * @returns ENOENT if there no such device. |
236 | * @returns ENOENT if there no such device. |
237 | * @returns EINVAL if the service parameter is not known. |
237 | * @returns EINVAL if the service parameter is not known. |
238 | */ |
238 | */ |
239 | int eth_send_message( device_id_t device_id, packet_t packet, services_t sender ); |
239 | int eth_send_message( device_id_t device_id, packet_t packet, services_t sender ); |
240 | 240 | ||
241 | /*@}*/ |
241 | /*@}*/ |
242 | 242 | ||
243 | /** Processes the received packet and chooses the target registered module. |
243 | /** Processes the received packet and chooses the target registered module. |
244 | * @param flags The device flags. Input parameter. |
244 | * @param flags The device flags. Input parameter. |
245 | * @param packet The packet. Input parameter. |
245 | * @param packet The packet. Input parameter. |
246 | * @returns The target registered module. |
246 | * @returns The target registered module. |
247 | * @returns NULL if the packet is not long enough. |
247 | * @returns NULL if the packet is not long enough. |
248 | * @returns NULL if the packet is too long. |
248 | * @returns NULL if the packet is too long. |
249 | * @returns NULL if the raw ethernet protocol is used. |
249 | * @returns NULL if the raw ethernet protocol is used. |
250 | * @returns NULL if the dummy device FCS checksum is invalid. |
250 | * @returns NULL if the dummy device FCS checksum is invalid. |
251 | * @returns NULL if the packet address length is not big enough. |
251 | * @returns NULL if the packet address length is not big enough. |
252 | */ |
252 | */ |
253 | eth_proto_ref eth_process_packet( int flags, packet_t packet ); |
253 | eth_proto_ref eth_process_packet( int flags, packet_t packet ); |
254 | 254 | ||
255 | /** Prepares the packet for sending. |
255 | /** Prepares the packet for sending. |
256 | * @param flags The device flags. Input parameter. |
256 | * @param flags The device flags. Input parameter. |
257 | * @param packet The packet. Input parameter. |
257 | * @param packet The packet. Input parameter. |
258 | * @param src_addr The source hardware address. Input parameter. |
258 | * @param src_addr The source hardware address. Input parameter. |
259 | * @param ethertype The ethernet protocol type. Input parameter. |
259 | * @param ethertype The ethernet protocol type. Input parameter. |
260 | * @param mtu The device maximum transmission unit. Input parameter. |
260 | * @param mtu The device maximum transmission unit. Input parameter. |
261 | * @returns EOK on success. |
261 | * @returns EOK on success. |
262 | * @returns EINVAL if the packet addresses length is not long enough. |
262 | * @returns EINVAL if the packet addresses length is not long enough. |
263 | * @returns EINVAL if the packet is bigger than the device MTU. |
263 | * @returns EINVAL if the packet is bigger than the device MTU. |
264 | * @returns ENOMEM if there is not enough memory in the packet. |
264 | * @returns ENOMEM if there is not enough memory in the packet. |
265 | */ |
265 | */ |
266 | int eth_prepare_packet( int flags, packet_t packet, uint8_t * src_addr, int ethertype, size_t mtu ); |
266 | int eth_prepare_packet( int flags, packet_t packet, uint8_t * src_addr, int ethertype, size_t mtu ); |
267 | 267 | ||
268 | DEVICE_MAP_IMPLEMENT( eth_devices, eth_device_t ) |
268 | DEVICE_MAP_IMPLEMENT( eth_devices, eth_device_t ) |
269 | 269 | ||
270 | INT_MAP_IMPLEMENT( eth_protos, eth_proto_t ) |
270 | INT_MAP_IMPLEMENT( eth_protos, eth_proto_t ) |
271 | 271 | ||
272 | int nil_device_state_msg( int nil_phone, device_id_t device_id, int state ){ |
272 | int nil_device_state_msg( int nil_phone, device_id_t device_id, int state ){ |
273 | int index; |
273 | int index; |
274 | eth_proto_ref proto; |
274 | eth_proto_ref proto; |
275 | 275 | ||
276 | //TODO clear device if off? |
- | |
277 | fibril_rwlock_read_lock( & eth_globals.protos_lock ); |
276 | fibril_rwlock_read_lock( & eth_globals.protos_lock ); |
278 | for( index = eth_protos_count( & eth_globals.protos ) - 1; index >= 0; -- index ){ |
277 | for( index = eth_protos_count( & eth_globals.protos ) - 1; index >= 0; -- index ){ |
279 | proto = eth_protos_get_index( & eth_globals.protos, index ); |
278 | proto = eth_protos_get_index( & eth_globals.protos, index ); |
280 | if( proto && proto->phone ) il_device_state_msg( proto->phone, device_id, state, proto->service ); |
279 | if( proto && proto->phone ) il_device_state_msg( proto->phone, device_id, state, proto->service ); |
281 | } |
280 | } |
282 | fibril_rwlock_read_unlock( & eth_globals.protos_lock ); |
281 | fibril_rwlock_read_unlock( & eth_globals.protos_lock ); |
283 | return EOK; |
282 | return EOK; |
284 | } |
283 | } |
285 | 284 | ||
286 | int nil_initialize( int net_phone ){ |
285 | int nil_initialize( int net_phone ){ |
287 | ERROR_DECLARE; |
286 | ERROR_DECLARE; |
288 | 287 | ||
289 | fibril_rwlock_initialize( & eth_globals.devices_lock ); |
288 | fibril_rwlock_initialize( & eth_globals.devices_lock ); |
290 | fibril_rwlock_initialize( & eth_globals.protos_lock ); |
289 | fibril_rwlock_initialize( & eth_globals.protos_lock ); |
291 | fibril_rwlock_write_lock( & eth_globals.devices_lock ); |
290 | fibril_rwlock_write_lock( & eth_globals.devices_lock ); |
292 | fibril_rwlock_write_lock( & eth_globals.protos_lock ); |
291 | fibril_rwlock_write_lock( & eth_globals.protos_lock ); |
293 | eth_globals.net_phone = net_phone; |
292 | eth_globals.net_phone = net_phone; |
294 | eth_globals.broadcast_addr = measured_string_create_bulk( "\xFF\xFF\xFF\xFF\xFF\xFF", CONVERT_SIZE( uint8_t, char, ETH_ADDR )); |
293 | eth_globals.broadcast_addr = measured_string_create_bulk( "\xFF\xFF\xFF\xFF\xFF\xFF", CONVERT_SIZE( uint8_t, char, ETH_ADDR )); |
295 | if( ! eth_globals.broadcast_addr ) return ENOMEM; |
294 | if( ! eth_globals.broadcast_addr ) return ENOMEM; |
296 | ERROR_PROPAGATE( eth_devices_initialize( & eth_globals.devices )); |
295 | ERROR_PROPAGATE( eth_devices_initialize( & eth_globals.devices )); |
297 | if( ERROR_OCCURRED( eth_protos_initialize( & eth_globals.protos ))){ |
296 | if( ERROR_OCCURRED( eth_protos_initialize( & eth_globals.protos ))){ |
298 | eth_devices_destroy( & eth_globals.devices ); |
297 | eth_devices_destroy( & eth_globals.devices ); |
299 | return ERROR_CODE; |
298 | return ERROR_CODE; |
300 | } |
299 | } |
301 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
300 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
302 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
301 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
303 | return EOK; |
302 | return EOK; |
304 | } |
303 | } |
305 | 304 | ||
306 | int eth_device_message( device_id_t device_id, services_t service, size_t mtu ){ |
305 | int eth_device_message( device_id_t device_id, services_t service, size_t mtu ){ |
307 | ERROR_DECLARE; |
306 | ERROR_DECLARE; |
308 | 307 | ||
309 | eth_device_ref device; |
308 | eth_device_ref device; |
310 | int index; |
309 | int index; |
311 | measured_string_t names[ 2 ] = {{ "ETH_MODE", 8 }, { "ETH_DUMMY", 9 }}; |
310 | measured_string_t names[ 2 ] = {{ "ETH_MODE", 8 }, { "ETH_DUMMY", 9 }}; |
312 | measured_string_ref configuration; |
311 | measured_string_ref configuration; |
313 | size_t count = sizeof( names ) / sizeof( measured_string_t ); |
312 | size_t count = sizeof( names ) / sizeof( measured_string_t ); |
314 | char * data; |
313 | char * data; |
315 | eth_proto_ref proto; |
314 | eth_proto_ref proto; |
316 | 315 | ||
317 | fibril_rwlock_write_lock( & eth_globals.devices_lock ); |
316 | fibril_rwlock_write_lock( & eth_globals.devices_lock ); |
318 | // an existing device? |
317 | // an existing device? |
319 | device = eth_devices_find( & eth_globals.devices, device_id ); |
318 | device = eth_devices_find( & eth_globals.devices, device_id ); |
320 | if( device ){ |
319 | if( device ){ |
321 | if( device->service != service ){ |
320 | if( device->service != service ){ |
322 | printf( "Device %d already exists\n", device->device_id ); |
321 | printf( "Device %d already exists\n", device->device_id ); |
323 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
322 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
324 | return EEXIST; |
323 | return EEXIST; |
325 | }else{ |
324 | }else{ |
326 | // update mtu |
325 | // update mtu |
327 | if(( mtu > 0 ) && ( mtu <= ETH_MAX_TAGGED_CONTENT( device->flags ))){ |
326 | if(( mtu > 0 ) && ( mtu <= ETH_MAX_TAGGED_CONTENT( device->flags ))){ |
328 | device->mtu = mtu; |
327 | device->mtu = mtu; |
329 | }else{ |
328 | }else{ |
330 | device->mtu = ETH_MAX_TAGGED_CONTENT( device->flags ); |
329 | device->mtu = ETH_MAX_TAGGED_CONTENT( device->flags ); |
331 | } |
330 | } |
332 | printf( "Device %d already exists:\tMTU\t= %d\n", device->device_id, device->mtu ); |
331 | printf( "Device %d already exists:\tMTU\t= %d\n", device->device_id, device->mtu ); |
333 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
332 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
334 | // notify all upper layer modules |
333 | // notify all upper layer modules |
335 | fibril_rwlock_read_lock( & eth_globals.protos_lock ); |
334 | fibril_rwlock_read_lock( & eth_globals.protos_lock ); |
336 | for( index = 0; index < eth_protos_count( & eth_globals.protos ); ++ index ){ |
335 | for( index = 0; index < eth_protos_count( & eth_globals.protos ); ++ index ){ |
337 | proto = eth_protos_get_index( & eth_globals.protos, index ); |
336 | proto = eth_protos_get_index( & eth_globals.protos, index ); |
338 | if ( proto->phone ){ |
337 | if ( proto->phone ){ |
339 | il_mtu_changed_msg( proto->phone, device->device_id, device->mtu, proto->service ); |
338 | il_mtu_changed_msg( proto->phone, device->device_id, device->mtu, proto->service ); |
340 | } |
339 | } |
341 | } |
340 | } |
342 | fibril_rwlock_read_unlock( & eth_globals.protos_lock ); |
341 | fibril_rwlock_read_unlock( & eth_globals.protos_lock ); |
343 | return EOK; |
342 | return EOK; |
344 | } |
343 | } |
345 | }else{ |
344 | }else{ |
346 | // create a new device |
345 | // create a new device |
347 | device = ( eth_device_ref ) malloc( sizeof( eth_device_t )); |
346 | device = ( eth_device_ref ) malloc( sizeof( eth_device_t )); |
348 | if( ! device ) return ENOMEM; |
347 | if( ! device ) return ENOMEM; |
349 | device->device_id = device_id; |
348 | device->device_id = device_id; |
350 | device->service = service; |
349 | device->service = service; |
351 | device->flags = 0; |
350 | device->flags = 0; |
352 | if(( mtu > 0 ) && ( mtu <= ETH_MAX_TAGGED_CONTENT( device->flags ))){ |
351 | if(( mtu > 0 ) && ( mtu <= ETH_MAX_TAGGED_CONTENT( device->flags ))){ |
353 | device->mtu = mtu; |
352 | device->mtu = mtu; |
354 | }else{ |
353 | }else{ |
355 | device->mtu = ETH_MAX_TAGGED_CONTENT( device->flags ); |
354 | device->mtu = ETH_MAX_TAGGED_CONTENT( device->flags ); |
356 | } |
355 | } |
357 | configuration = & names[ 0 ]; |
356 | configuration = & names[ 0 ]; |
358 | if( ERROR_OCCURRED( net_get_device_conf_req( eth_globals.net_phone, device->device_id, & configuration, count, & data ))){ |
357 | if( ERROR_OCCURRED( net_get_device_conf_req( eth_globals.net_phone, device->device_id, & configuration, count, & data ))){ |
359 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
358 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
360 | free( device ); |
359 | free( device ); |
361 | return ERROR_CODE; |
360 | return ERROR_CODE; |
362 | } |
361 | } |
363 | if( configuration ){ |
362 | if( configuration ){ |
364 | if( ! str_lcmp( configuration[ 0 ].value, "DIX", configuration[ 0 ].length )){ |
363 | if( ! str_lcmp( configuration[ 0 ].value, "DIX", configuration[ 0 ].length )){ |
365 | device->flags |= ETH_DIX; |
364 | device->flags |= ETH_DIX; |
366 | }else if( ! str_lcmp( configuration[ 0 ].value, "8023_2_LSAP", configuration[ 0 ].length )){ |
365 | }else if( ! str_lcmp( configuration[ 0 ].value, "8023_2_LSAP", configuration[ 0 ].length )){ |
367 | // TODO 8023_2_LSAP |
366 | // TODO 8023_2_LSAP |
368 | printf( "8023_2_LSAP is not supported (yet?), DIX used instead\n" ); |
367 | printf( "8023_2_LSAP is not supported (yet?), DIX used instead\n" ); |
369 | device->flags |= ETH_DIX; |
368 | device->flags |= ETH_DIX; |
370 | }else device->flags |= ETH_8023_2_SNAP; |
369 | }else device->flags |= ETH_8023_2_SNAP; |
371 | if(( configuration[ 1 ].value ) && ( configuration[ 1 ].value[ 0 ] == 'y' )){ |
370 | if(( configuration[ 1 ].value ) && ( configuration[ 1 ].value[ 0 ] == 'y' )){ |
372 | device->flags |= ETH_DUMMY; |
371 | device->flags |= ETH_DUMMY; |
373 | } |
372 | } |
374 | net_free_settings( configuration, data ); |
373 | net_free_settings( configuration, data ); |
375 | }else{ |
374 | }else{ |
376 | device->flags |= ETH_8023_2_SNAP; |
375 | device->flags |= ETH_8023_2_SNAP; |
377 | } |
376 | } |
378 | // bind the device driver |
377 | // bind the device driver |
379 | device->phone = netif_bind_service( device->service, device->device_id, SERVICE_ETHERNET, eth_receiver ); |
378 | device->phone = netif_bind_service( device->service, device->device_id, SERVICE_ETHERNET, eth_receiver ); |
380 | if( device->phone < 0 ){ |
379 | if( device->phone < 0 ){ |
381 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
380 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
382 | free( device ); |
381 | free( device ); |
383 | return device->phone; |
382 | return device->phone; |
384 | } |
383 | } |
385 | // get hardware address |
384 | // get hardware address |
386 | if( ERROR_OCCURRED( netif_get_addr( device->phone, device->device_id, & device->addr, & device->addr_data ))){ |
385 | if( ERROR_OCCURRED( netif_get_addr( device->phone, device->device_id, & device->addr, & device->addr_data ))){ |
387 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
386 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
388 | free( device ); |
387 | free( device ); |
389 | return ERROR_CODE; |
388 | return ERROR_CODE; |
390 | } |
389 | } |
391 | // add to the cache |
390 | // add to the cache |
392 | index = eth_devices_add( & eth_globals.devices, device->device_id, device ); |
391 | index = eth_devices_add( & eth_globals.devices, device->device_id, device ); |
393 | if( index < 0 ){ |
392 | if( index < 0 ){ |
394 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
393 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
395 | free( device->addr ); |
394 | free( device->addr ); |
396 | free( device->addr_data ); |
395 | free( device->addr_data ); |
397 | free( device ); |
396 | free( device ); |
398 | return index; |
397 | return index; |
399 | } |
398 | } |
400 | printf( "New device registered:\n\tid\t= %d\n\tservice\t= %d\n\tMTU\t= %d\n\taddress\t= %X:%X:%X:%X:%X:%X\n\tflags\t= 0x%x\n", device->device_id, device->service, device->mtu, device->addr_data[ 0 ], device->addr_data[ 1 ], device->addr_data[ 2 ], device->addr_data[ 3 ], device->addr_data[ 4 ], device->addr_data[ 5 ], device->flags ); |
399 | printf( "New device registered:\n\tid\t= %d\n\tservice\t= %d\n\tMTU\t= %d\n\taddress\t= %X:%X:%X:%X:%X:%X\n\tflags\t= 0x%x\n", device->device_id, device->service, device->mtu, device->addr_data[ 0 ], device->addr_data[ 1 ], device->addr_data[ 2 ], device->addr_data[ 3 ], device->addr_data[ 4 ], device->addr_data[ 5 ], device->flags ); |
401 | } |
400 | } |
402 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
401 | fibril_rwlock_write_unlock( & eth_globals.devices_lock ); |
403 | return EOK; |
402 | return EOK; |
404 | } |
403 | } |
405 | 404 | ||
406 | eth_proto_ref eth_process_packet( int flags, packet_t packet ){ |
405 | eth_proto_ref eth_process_packet( int flags, packet_t packet ){ |
407 | ERROR_DECLARE; |
406 | ERROR_DECLARE; |
408 | 407 | ||
409 | eth_header_ex_ref header; |
408 | eth_header_ex_ref header; |
410 | size_t length; |
409 | size_t length; |
411 | eth_type_t type; |
410 | eth_type_t type; |
412 | size_t prefix; |
411 | size_t prefix; |
413 | size_t suffix; |
412 | size_t suffix; |
414 | eth_fcs_ref fcs; |
413 | eth_fcs_ref fcs; |
415 | uint8_t * data; |
414 | uint8_t * data; |
416 | 415 | ||
417 | length = packet_get_data_length( packet ); |
416 | length = packet_get_data_length( packet ); |
418 | if( IS_DUMMY( flags )){ |
417 | if( IS_DUMMY( flags )){ |
419 | packet_trim( packet, sizeof( eth_preamble_t ), 0 ); |
418 | packet_trim( packet, sizeof( eth_preamble_t ), 0 ); |
420 | } |
419 | } |
421 | if( length < sizeof( eth_header_t ) + ETH_MIN_CONTENT + ( IS_DUMMY( flags ) ? ETH_SUFFIX : 0 )) return NULL; |
420 | if( length < sizeof( eth_header_t ) + ETH_MIN_CONTENT + ( IS_DUMMY( flags ) ? ETH_SUFFIX : 0 )) return NULL; |
422 | data = packet_get_data( packet ); |
421 | data = packet_get_data( packet ); |
423 | header = ( eth_header_ex_ref ) data; |
422 | header = ( eth_header_ex_ref ) data; |
424 | type = ntohs( header->header.ethertype ); |
423 | type = ntohs( header->header.ethertype ); |
425 | if( type >= ETH_MIN_PROTO ){ |
424 | if( type >= ETH_MIN_PROTO ){ |
426 | // DIX Ethernet |
425 | // DIX Ethernet |
427 | prefix = sizeof( eth_header_t ); |
426 | prefix = sizeof( eth_header_t ); |
428 | suffix = 0; |
427 | suffix = 0; |
429 | fcs = ( eth_fcs_ref ) data + length - sizeof( eth_fcs_t ); |
428 | fcs = ( eth_fcs_ref ) data + length - sizeof( eth_fcs_t ); |
430 | length -= sizeof( eth_fcs_t ); |
429 | length -= sizeof( eth_fcs_t ); |
431 | }else if( type <= ETH_MAX_CONTENT ){ |
430 | }else if( type <= ETH_MAX_CONTENT ){ |
432 | // translate "LSAP" values |
431 | // translate "LSAP" values |
433 | if(( header->lsap.dsap == ETH_LSAP_GLSAP ) && ( header->lsap.ssap == ETH_LSAP_GLSAP )){ |
432 | if(( header->lsap.dsap == ETH_LSAP_GLSAP ) && ( header->lsap.ssap == ETH_LSAP_GLSAP )){ |
434 | // raw packet |
433 | // raw packet |
435 | // discard |
434 | // discard |
436 | return NULL; |
435 | return NULL; |
437 | }else if(( header->lsap.dsap == ETH_LSAP_SNAP ) && ( header->lsap.ssap == ETH_LSAP_SNAP )){ |
436 | }else if(( header->lsap.dsap == ETH_LSAP_SNAP ) && ( header->lsap.ssap == ETH_LSAP_SNAP )){ |
438 | // IEEE 802.3 + 802.2 + LSAP + SNAP |
437 | // IEEE 802.3 + 802.2 + LSAP + SNAP |
439 | // organization code not supported |
438 | // organization code not supported |
440 | type = ntohs( header->snap.ethertype ); |
439 | type = ntohs( header->snap.ethertype ); |
441 | prefix = sizeof( eth_header_t ) + sizeof( eth_header_lsap_t ) + sizeof( eth_header_snap_t ); |
440 | prefix = sizeof( eth_header_t ) + sizeof( eth_header_lsap_t ) + sizeof( eth_header_snap_t ); |
442 | }else{ |
441 | }else{ |
443 | // IEEE 802.3 + 802.2 LSAP |
442 | // IEEE 802.3 + 802.2 LSAP |
444 | type = lsap_map( header->lsap.dsap ); |
443 | type = lsap_map( header->lsap.dsap ); |
445 | prefix = sizeof( eth_header_t ) + sizeof( eth_header_lsap_t); |
444 | prefix = sizeof( eth_header_t ) + sizeof( eth_header_lsap_t); |
446 | } |
445 | } |
447 | suffix = ( type < ETH_MIN_CONTENT ) ? ETH_MIN_CONTENT - type : 0u; |
446 | suffix = ( type < ETH_MIN_CONTENT ) ? ETH_MIN_CONTENT - type : 0u; |
448 | fcs = ( eth_fcs_ref ) data + prefix + type + suffix; |
447 | fcs = ( eth_fcs_ref ) data + prefix + type + suffix; |
449 | suffix += length - prefix - type; |
448 | suffix += length - prefix - type; |
450 | length = prefix + type + suffix; |
449 | length = prefix + type + suffix; |
451 | }else{ |
450 | }else{ |
452 | // invalid length/type, should not occurr |
451 | // invalid length/type, should not occurr |
453 | return NULL; |
452 | return NULL; |
454 | } |
453 | } |
455 | if( IS_DUMMY( flags )){ |
454 | if( IS_DUMMY( flags )){ |
456 | if(( ~ compute_crc32( ~ 0u, data, length * 8 )) != ntohl( * fcs )){ |
455 | if(( ~ compute_crc32( ~ 0u, data, length * 8 )) != ntohl( * fcs )){ |
457 | return NULL; |
456 | return NULL; |
458 | } |
457 | } |
459 | suffix += sizeof( eth_fcs_t ); |
458 | suffix += sizeof( eth_fcs_t ); |
460 | } |
459 | } |
461 | if( ERROR_OCCURRED( packet_set_addr( packet, header->header.source_address, header->header.destination_address, ETH_ADDR )) |
460 | if( ERROR_OCCURRED( packet_set_addr( packet, header->header.source_address, header->header.destination_address, ETH_ADDR )) |
462 | || ERROR_OCCURRED( packet_trim( packet, prefix, suffix ))){ |
461 | || ERROR_OCCURRED( packet_trim( packet, prefix, suffix ))){ |
463 | return NULL; |
462 | return NULL; |
464 | } |
463 | } |
465 | return eth_protos_find( & eth_globals.protos, type ); |
464 | return eth_protos_find( & eth_globals.protos, type ); |
466 | } |
465 | } |
467 | 466 | ||
468 | int nil_received_msg( int nil_phone, device_id_t device_id, packet_t packet, services_t target ){ |
467 | int nil_received_msg( int nil_phone, device_id_t device_id, packet_t packet, services_t target ){ |
469 | eth_proto_ref proto; |
468 | eth_proto_ref proto; |
470 | packet_t next; |
469 | packet_t next; |
471 | eth_device_ref device; |
470 | eth_device_ref device; |
472 | int flags; |
471 | int flags; |
473 | 472 | ||
474 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
473 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
475 | device = eth_devices_find( & eth_globals.devices, device_id ); |
474 | device = eth_devices_find( & eth_globals.devices, device_id ); |
476 | if( ! device ){ |
475 | if( ! device ){ |
477 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
476 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
478 | return ENOENT; |
477 | return ENOENT; |
479 | } |
478 | } |
480 | flags = device->flags; |
479 | flags = device->flags; |
481 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
480 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
482 | fibril_rwlock_read_lock( & eth_globals.protos_lock ); |
481 | fibril_rwlock_read_lock( & eth_globals.protos_lock ); |
483 | do{ |
482 | do{ |
484 | next = pq_detach( packet ); |
483 | next = pq_detach( packet ); |
485 | proto = eth_process_packet( flags, packet ); |
484 | proto = eth_process_packet( flags, packet ); |
486 | if( proto ){ |
485 | if( proto ){ |
487 | il_received_msg( proto->phone, device_id, packet, proto->service ); |
486 | il_received_msg( proto->phone, device_id, packet, proto->service ); |
488 | }else{ |
487 | }else{ |
489 | // drop invalid/unknown |
488 | // drop invalid/unknown |
490 | pq_release( eth_globals.net_phone, packet_get_id( packet )); |
489 | pq_release( eth_globals.net_phone, packet_get_id( packet )); |
491 | } |
490 | } |
492 | packet = next; |
491 | packet = next; |
493 | }while( packet ); |
492 | }while( packet ); |
494 | fibril_rwlock_read_unlock( & eth_globals.protos_lock ); |
493 | fibril_rwlock_read_unlock( & eth_globals.protos_lock ); |
495 | return EOK; |
494 | return EOK; |
496 | } |
495 | } |
497 | 496 | ||
498 | int eth_packet_space_message( device_id_t device_id, size_t * addr_len, size_t * prefix, size_t * content, size_t * suffix ){ |
497 | int eth_packet_space_message( device_id_t device_id, size_t * addr_len, size_t * prefix, size_t * content, size_t * suffix ){ |
499 | eth_device_ref device; |
498 | eth_device_ref device; |
500 | 499 | ||
501 | if( !( addr_len && prefix && content && suffix )) return EBADMEM; |
500 | if( !( addr_len && prefix && content && suffix )) return EBADMEM; |
502 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
501 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
503 | device = eth_devices_find( & eth_globals.devices, device_id ); |
502 | device = eth_devices_find( & eth_globals.devices, device_id ); |
504 | if( ! device ){ |
503 | if( ! device ){ |
505 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
504 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
506 | return ENOENT; |
505 | return ENOENT; |
507 | } |
506 | } |
508 | * content = device->mtu; |
507 | * content = device->mtu; |
509 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
508 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
510 | * addr_len = ETH_ADDR; |
509 | * addr_len = ETH_ADDR; |
511 | * prefix = ETH_PREFIX; |
510 | * prefix = ETH_PREFIX; |
512 | * suffix = ETH_MIN_CONTENT + ETH_SUFFIX; |
511 | * suffix = ETH_MIN_CONTENT + ETH_SUFFIX; |
513 | return EOK; |
512 | return EOK; |
514 | } |
513 | } |
515 | 514 | ||
516 | int eth_addr_message( device_id_t device_id, eth_addr_type_t type, measured_string_ref * address ){ |
515 | int eth_addr_message( device_id_t device_id, eth_addr_type_t type, measured_string_ref * address ){ |
517 | eth_device_ref device; |
516 | eth_device_ref device; |
518 | 517 | ||
519 | if( ! address ) return EBADMEM; |
518 | if( ! address ) return EBADMEM; |
520 | if( type == ETH_BROADCAST_ADDR ){ |
519 | if( type == ETH_BROADCAST_ADDR ){ |
521 | * address = eth_globals.broadcast_addr; |
520 | * address = eth_globals.broadcast_addr; |
522 | }else{ |
521 | }else{ |
523 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
522 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
524 | device = eth_devices_find( & eth_globals.devices, device_id ); |
523 | device = eth_devices_find( & eth_globals.devices, device_id ); |
525 | if( ! device ){ |
524 | if( ! device ){ |
526 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
525 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
527 | return ENOENT; |
526 | return ENOENT; |
528 | } |
527 | } |
529 | * address = device->addr; |
528 | * address = device->addr; |
530 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
529 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
531 | } |
530 | } |
532 | return ( * address ) ? EOK : ENOENT; |
531 | return ( * address ) ? EOK : ENOENT; |
533 | } |
532 | } |
534 | 533 | ||
535 | int eth_register_message( services_t service, int phone ){ |
534 | int eth_register_message( services_t service, int phone ){ |
536 | eth_proto_ref proto; |
535 | eth_proto_ref proto; |
537 | int protocol; |
536 | int protocol; |
538 | int index; |
537 | int index; |
539 | 538 | ||
540 | protocol = protocol_map( SERVICE_ETHERNET, service ); |
539 | protocol = protocol_map( SERVICE_ETHERNET, service ); |
541 | if( ! protocol ) return ENOENT; |
540 | if( ! protocol ) return ENOENT; |
542 | fibril_rwlock_write_lock( & eth_globals.protos_lock ); |
541 | fibril_rwlock_write_lock( & eth_globals.protos_lock ); |
543 | proto = eth_protos_find( & eth_globals.protos, protocol ); |
542 | proto = eth_protos_find( & eth_globals.protos, protocol ); |
544 | if( proto ){ |
543 | if( proto ){ |
545 | proto->phone = phone; |
544 | proto->phone = phone; |
546 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
545 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
547 | return EOK; |
546 | return EOK; |
548 | }else{ |
547 | }else{ |
549 | proto = ( eth_proto_ref ) malloc( sizeof( eth_proto_t )); |
548 | proto = ( eth_proto_ref ) malloc( sizeof( eth_proto_t )); |
550 | if( ! proto ){ |
549 | if( ! proto ){ |
551 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
550 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
552 | return ENOMEM; |
551 | return ENOMEM; |
553 | } |
552 | } |
554 | proto->service = service; |
553 | proto->service = service; |
555 | proto->protocol = protocol; |
554 | proto->protocol = protocol; |
556 | proto->phone = phone; |
555 | proto->phone = phone; |
557 | index = eth_protos_add( & eth_globals.protos, protocol, proto ); |
556 | index = eth_protos_add( & eth_globals.protos, protocol, proto ); |
558 | if( index < 0 ){ |
557 | if( index < 0 ){ |
559 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
558 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
560 | free( proto ); |
559 | free( proto ); |
561 | return index; |
560 | return index; |
562 | } |
561 | } |
563 | } |
562 | } |
564 | printf( "New protocol registered:\n\tprotocol\t= 0x%x\n\tservice\t= %d\n\tphone\t= %d\n", proto->protocol, proto->service, proto->phone ); |
563 | printf( "New protocol registered:\n\tprotocol\t= 0x%x\n\tservice\t= %d\n\tphone\t= %d\n", proto->protocol, proto->service, proto->phone ); |
565 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
564 | fibril_rwlock_write_unlock( & eth_globals.protos_lock ); |
566 | return EOK; |
565 | return EOK; |
567 | } |
566 | } |
568 | 567 | ||
569 | int eth_prepare_packet( int flags, packet_t packet, uint8_t * src_addr, int ethertype, size_t mtu ){ |
568 | int eth_prepare_packet( int flags, packet_t packet, uint8_t * src_addr, int ethertype, size_t mtu ){ |
570 | eth_header_ex_ref header; |
569 | eth_header_ex_ref header; |
571 | eth_header_ref header_dix; |
570 | eth_header_ref header_dix; |
572 | eth_fcs_ref fcs; |
571 | eth_fcs_ref fcs; |
573 | uint8_t * src; |
572 | uint8_t * src; |
574 | uint8_t * dest; |
573 | uint8_t * dest; |
575 | size_t length; |
574 | size_t length; |
576 | int i; |
575 | int i; |
577 | void * padding; |
576 | void * padding; |
578 | eth_preamble_ref preamble; |
577 | eth_preamble_ref preamble; |
579 | 578 | ||
580 | i = packet_get_addr( packet, & src, & dest ); |
579 | i = packet_get_addr( packet, & src, & dest ); |
581 | if( i < 0 ) return i; |
580 | if( i < 0 ) return i; |
582 | if( i != ETH_ADDR ) return EINVAL; |
581 | if( i != ETH_ADDR ) return EINVAL; |
583 | length = packet_get_data_length( packet ); |
582 | length = packet_get_data_length( packet ); |
584 | if( length > mtu ) return EINVAL; |
583 | if( length > mtu ) return EINVAL; |
585 | if( length < ETH_MIN_TAGGED_CONTENT( flags )){ |
584 | if( length < ETH_MIN_TAGGED_CONTENT( flags )){ |
586 | padding = packet_suffix( packet, ETH_MIN_TAGGED_CONTENT( flags ) - length ); |
585 | padding = packet_suffix( packet, ETH_MIN_TAGGED_CONTENT( flags ) - length ); |
587 | if( ! padding ) return ENOMEM; |
586 | if( ! padding ) return ENOMEM; |
588 | bzero( padding, ETH_MIN_TAGGED_CONTENT( flags ) - length ); |
587 | bzero( padding, ETH_MIN_TAGGED_CONTENT( flags ) - length ); |
589 | } |
588 | } |
590 | if( IS_DUMMY( flags )){ |
589 | if( IS_DUMMY( flags )){ |
591 | preamble = PACKET_PREFIX( packet, eth_preamble_t ); |
590 | preamble = PACKET_PREFIX( packet, eth_preamble_t ); |
592 | if( ! preamble ) return ENOMEM; |
591 | if( ! preamble ) return ENOMEM; |
593 | for( i = 0; i < 7; ++ i ) preamble->preamble[ i ] = ETH_PREAMBLE; |
592 | for( i = 0; i < 7; ++ i ) preamble->preamble[ i ] = ETH_PREAMBLE; |
594 | preamble->sfd = ETH_SFD; |
593 | preamble->sfd = ETH_SFD; |
595 | } |
594 | } |
596 | // TODO LSAP only device |
595 | // TODO LSAP only device |
597 | if( IS_DIX( flags ) || IS_8023_2_LSAP( flags )){ |
596 | if( IS_DIX( flags ) || IS_8023_2_LSAP( flags )){ |
598 | header_dix = PACKET_PREFIX( packet, eth_header_t ); |
597 | header_dix = PACKET_PREFIX( packet, eth_header_t ); |
599 | if( ! header_dix ) return ENOMEM; |
598 | if( ! header_dix ) return ENOMEM; |
600 | header_dix->ethertype = ( uint16_t ) ethertype; |
599 | header_dix->ethertype = ( uint16_t ) ethertype; |
601 | memcpy( header_dix->source_address, src_addr, ETH_ADDR ); |
600 | memcpy( header_dix->source_address, src_addr, ETH_ADDR ); |
602 | memcpy( header_dix->destination_address, dest, ETH_ADDR ); |
601 | memcpy( header_dix->destination_address, dest, ETH_ADDR ); |
603 | src = & header_dix->destination_address[ 0 ]; |
602 | src = & header_dix->destination_address[ 0 ]; |
604 | }else if( IS_8023_2_SNAP( flags )){ |
603 | }else if( IS_8023_2_SNAP( flags )){ |
605 | header = PACKET_PREFIX( packet, eth_header_ex_t ); |
604 | header = PACKET_PREFIX( packet, eth_header_ex_t ); |
606 | if( ! header ) return ENOMEM; |
605 | if( ! header ) return ENOMEM; |
607 | header->header.ethertype = htons( length + sizeof( eth_header_lsap_t ) + sizeof( eth_header_snap_t )); |
606 | header->header.ethertype = htons( length + sizeof( eth_header_lsap_t ) + sizeof( eth_header_snap_t )); |
608 | header->lsap.dsap = ( uint16_t ) ETH_LSAP_SNAP; |
607 | header->lsap.dsap = ( uint16_t ) ETH_LSAP_SNAP; |
609 | header->lsap.ssap = header->lsap.dsap; |
608 | header->lsap.ssap = header->lsap.dsap; |
610 | header->lsap.ctrl = 0; |
609 | header->lsap.ctrl = 0; |
611 | for( i = 0; i < 3; ++ i ) header->snap.protocol[ i ] = 0; |
610 | for( i = 0; i < 3; ++ i ) header->snap.protocol[ i ] = 0; |
612 | header->snap.ethertype = ( uint16_t ) ethertype; |
611 | header->snap.ethertype = ( uint16_t ) ethertype; |
613 | memcpy( header->header.source_address, src_addr, ETH_ADDR ); |
612 | memcpy( header->header.source_address, src_addr, ETH_ADDR ); |
614 | memcpy( header->header.destination_address, dest, ETH_ADDR ); |
613 | memcpy( header->header.destination_address, dest, ETH_ADDR ); |
615 | src = & header->header.destination_address[ 0 ]; |
614 | src = & header->header.destination_address[ 0 ]; |
616 | } |
615 | } |
617 | if( IS_DUMMY( flags )){ |
616 | if( IS_DUMMY( flags )){ |
618 | fcs = PACKET_SUFFIX( packet, eth_fcs_t ); |
617 | fcs = PACKET_SUFFIX( packet, eth_fcs_t ); |
619 | if( ! fcs ) return ENOMEM; |
618 | if( ! fcs ) return ENOMEM; |
620 | * fcs = htonl( ~ compute_crc32( ~ 0u, src, length * 8 )); |
619 | * fcs = htonl( ~ compute_crc32( ~ 0u, src, length * 8 )); |
621 | } |
620 | } |
622 | return EOK; |
621 | return EOK; |
623 | } |
622 | } |
624 | 623 | ||
625 | int eth_send_message( device_id_t device_id, packet_t packet, services_t sender ){ |
624 | int eth_send_message( device_id_t device_id, packet_t packet, services_t sender ){ |
626 | ERROR_DECLARE; |
625 | ERROR_DECLARE; |
627 | 626 | ||
628 | eth_device_ref device; |
627 | eth_device_ref device; |
629 | packet_t next; |
628 | packet_t next; |
630 | packet_t tmp; |
629 | packet_t tmp; |
631 | int ethertype; |
630 | int ethertype; |
632 | 631 | ||
633 | ethertype = htons( protocol_map( SERVICE_ETHERNET, sender )); |
632 | ethertype = htons( protocol_map( SERVICE_ETHERNET, sender )); |
634 | if( ! ethertype ){ |
633 | if( ! ethertype ){ |
635 | pq_release( eth_globals.net_phone, packet_get_id( packet )); |
634 | pq_release( eth_globals.net_phone, packet_get_id( packet )); |
636 | return EINVAL; |
635 | return EINVAL; |
637 | } |
636 | } |
638 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
637 | fibril_rwlock_read_lock( & eth_globals.devices_lock ); |
639 | device = eth_devices_find( & eth_globals.devices, device_id ); |
638 | device = eth_devices_find( & eth_globals.devices, device_id ); |
640 | if( ! device ){ |
639 | if( ! device ){ |
641 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
640 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
642 | return ENOENT; |
641 | return ENOENT; |
643 | } |
642 | } |
644 | // process packet queue |
643 | // process packet queue |
645 | next = packet; |
644 | next = packet; |
646 | do{ |
645 | do{ |
647 | if( ERROR_OCCURRED( eth_prepare_packet( device->flags, next, ( uint8_t * ) device->addr->value, ethertype, device->mtu ))){ |
646 | if( ERROR_OCCURRED( eth_prepare_packet( device->flags, next, ( uint8_t * ) device->addr->value, ethertype, device->mtu ))){ |
648 | // release invalid packet |
647 | // release invalid packet |
649 | tmp = pq_detach( next ); |
648 | tmp = pq_detach( next ); |
650 | if( next == packet ) packet = tmp; |
649 | if( next == packet ) packet = tmp; |
651 | pq_release( eth_globals.net_phone, packet_get_id( next )); |
650 | pq_release( eth_globals.net_phone, packet_get_id( next )); |
652 | next = tmp; |
651 | next = tmp; |
653 | }else{ |
652 | }else{ |
654 | next = pq_next( next ); |
653 | next = pq_next( next ); |
655 | } |
654 | } |
656 | }while( next ); |
655 | }while( next ); |
657 | // send packet queue |
656 | // send packet queue |
658 | if( packet ){ |
657 | if( packet ){ |
659 | netif_send_msg( device->phone, device_id, packet, SERVICE_ETHERNET ); |
658 | netif_send_msg( device->phone, device_id, packet, SERVICE_ETHERNET ); |
660 | } |
659 | } |
661 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
660 | fibril_rwlock_read_unlock( & eth_globals.devices_lock ); |
662 | return EOK; |
661 | return EOK; |
663 | } |
662 | } |
664 | 663 | ||
665 | int nil_message( ipc_callid_t callid, ipc_call_t * call, ipc_call_t * answer, int * answer_count ){ |
664 | int nil_message( ipc_callid_t callid, ipc_call_t * call, ipc_call_t * answer, int * answer_count ){ |
666 | ERROR_DECLARE; |
665 | ERROR_DECLARE; |
667 | 666 | ||
668 | measured_string_ref address; |
667 | measured_string_ref address; |
669 | packet_t packet; |
668 | packet_t packet; |
670 | 669 | ||
671 | // printf( "message %d - %d\n", IPC_GET_METHOD( * call ), NET_NIL_FIRST ); |
670 | // printf( "message %d - %d\n", IPC_GET_METHOD( * call ), NET_NIL_FIRST ); |
672 | * answer_count = 0; |
671 | * answer_count = 0; |
673 | switch( IPC_GET_METHOD( * call )){ |
672 | switch( IPC_GET_METHOD( * call )){ |
674 | case IPC_M_PHONE_HUNGUP: |
673 | case IPC_M_PHONE_HUNGUP: |
675 | return EOK; |
674 | return EOK; |
676 | case NET_NIL_DEVICE: |
675 | case NET_NIL_DEVICE: |
677 | return eth_device_message( IPC_GET_DEVICE( call ), IPC_GET_SERVICE( call ), IPC_GET_MTU( call )); |
676 | return eth_device_message( IPC_GET_DEVICE( call ), IPC_GET_SERVICE( call ), IPC_GET_MTU( call )); |
678 | case NET_NIL_SEND: |
677 | case NET_NIL_SEND: |
679 | ERROR_PROPAGATE( packet_translate( eth_globals.net_phone, & packet, IPC_GET_PACKET( call ))); |
678 | ERROR_PROPAGATE( packet_translate( eth_globals.net_phone, & packet, IPC_GET_PACKET( call ))); |
680 | return eth_send_message( IPC_GET_DEVICE( call ), packet, IPC_GET_SERVICE( call )); |
679 | return eth_send_message( IPC_GET_DEVICE( call ), packet, IPC_GET_SERVICE( call )); |
681 | case NET_NIL_PACKET_SPACE: |
680 | case NET_NIL_PACKET_SPACE: |
682 | ERROR_PROPAGATE( eth_packet_space_message( IPC_GET_DEVICE( call ), IPC_SET_ADDR( answer ), IPC_SET_PREFIX( answer ), IPC_SET_CONTENT( answer ), IPC_SET_SUFFIX( answer ))); |
681 | ERROR_PROPAGATE( eth_packet_space_message( IPC_GET_DEVICE( call ), IPC_SET_ADDR( answer ), IPC_SET_PREFIX( answer ), IPC_SET_CONTENT( answer ), IPC_SET_SUFFIX( answer ))); |
683 | * answer_count = 4; |
682 | * answer_count = 4; |
684 | return EOK; |
683 | return EOK; |
685 | case NET_NIL_ADDR: |
684 | case NET_NIL_ADDR: |
686 | ERROR_PROPAGATE( eth_addr_message( IPC_GET_DEVICE( call ), ETH_LOCAL_ADDR, & address )); |
685 | ERROR_PROPAGATE( eth_addr_message( IPC_GET_DEVICE( call ), ETH_LOCAL_ADDR, & address )); |
687 | return measured_strings_reply( address, 1 ); |
686 | return measured_strings_reply( address, 1 ); |
688 | case NET_NIL_BROADCAST_ADDR: |
687 | case NET_NIL_BROADCAST_ADDR: |
689 | ERROR_PROPAGATE( eth_addr_message( IPC_GET_DEVICE( call ), ETH_BROADCAST_ADDR, & address )); |
688 | ERROR_PROPAGATE( eth_addr_message( IPC_GET_DEVICE( call ), ETH_BROADCAST_ADDR, & address )); |
690 | return measured_strings_reply( address, 1 ); |
689 | return measured_strings_reply( address, 1 ); |
691 | case IPC_M_CONNECT_TO_ME: |
690 | case IPC_M_CONNECT_TO_ME: |
692 | return eth_register_message( NIL_GET_PROTO( call ), IPC_GET_PHONE( call )); |
691 | return eth_register_message( NIL_GET_PROTO( call ), IPC_GET_PHONE( call )); |
693 | } |
692 | } |
694 | return ENOTSUP; |
693 | return ENOTSUP; |
695 | } |
694 | } |
696 | 695 | ||
697 | void eth_receiver( ipc_callid_t iid, ipc_call_t * icall ){ |
696 | void eth_receiver( ipc_callid_t iid, ipc_call_t * icall ){ |
698 | ERROR_DECLARE; |
697 | ERROR_DECLARE; |
699 | 698 | ||
700 | packet_t packet; |
699 | packet_t packet; |
701 | 700 | ||
702 | while( true ){ |
701 | while( true ){ |
703 | // printf( "message %d - %d\n", IPC_GET_METHOD( * icall ), NET_NIL_FIRST ); |
702 | // printf( "message %d - %d\n", IPC_GET_METHOD( * icall ), NET_NIL_FIRST ); |
704 | switch( IPC_GET_METHOD( * icall )){ |
703 | switch( IPC_GET_METHOD( * icall )){ |
705 | case NET_NIL_DEVICE_STATE: |
704 | case NET_NIL_DEVICE_STATE: |
706 | nil_device_state_msg( 0, IPC_GET_DEVICE( icall ), IPC_GET_STATE( icall )); |
705 | nil_device_state_msg( 0, IPC_GET_DEVICE( icall ), IPC_GET_STATE( icall )); |
707 | ipc_answer_0( iid, EOK ); |
706 | ipc_answer_0( iid, EOK ); |
708 | break; |
707 | break; |
709 | case NET_NIL_RECEIVED: |
708 | case NET_NIL_RECEIVED: |
710 | if( ! ERROR_OCCURRED( packet_translate( eth_globals.net_phone, & packet, IPC_GET_PACKET( icall )))){ |
709 | if( ! ERROR_OCCURRED( packet_translate( eth_globals.net_phone, & packet, IPC_GET_PACKET( icall )))){ |
711 | ERROR_CODE = nil_received_msg( 0, IPC_GET_DEVICE( icall ), packet, 0 ); |
710 | ERROR_CODE = nil_received_msg( 0, IPC_GET_DEVICE( icall ), packet, 0 ); |
712 | } |
711 | } |
713 | ipc_answer_0( iid, ( ipcarg_t ) ERROR_CODE ); |
712 | ipc_answer_0( iid, ( ipcarg_t ) ERROR_CODE ); |
714 | break; |
713 | break; |
715 | default: |
714 | default: |
716 | ipc_answer_0( iid, ( ipcarg_t ) ENOTSUP ); |
715 | ipc_answer_0( iid, ( ipcarg_t ) ENOTSUP ); |
717 | } |
716 | } |
718 | iid = async_get_call( icall ); |
717 | iid = async_get_call( icall ); |
719 | } |
718 | } |
720 | } |
719 | } |
721 | 720 | ||
722 | /** @} |
721 | /** @} |
723 | */ |
722 | */ |
724 | 723 |