Rev 4351 | Rev 4501 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed
Rev | Author | Line No. | Line |
---|---|---|---|
3846 | mejdrech | 1 | /* |
3912 | mejdrech | 2 | * Copyright (c) 2009 Lukas Mejdrech |
3846 | mejdrech | 3 | * All rights reserved. |
4 | * |
||
5 | * Redistribution and use in source and binary forms, with or without |
||
6 | * modification, are permitted provided that the following conditions |
||
7 | * are met: |
||
8 | * |
||
9 | * - Redistributions of source code must retain the above copyright |
||
10 | * notice, this list of conditions and the following disclaimer. |
||
11 | * - Redistributions in binary form must reproduce the above copyright |
||
12 | * notice, this list of conditions and the following disclaimer in the |
||
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 |
||
15 | * derived from this software without specific prior written permission. |
||
16 | * |
||
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 |
||
19 | * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |
||
20 | * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |
||
21 | * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |
||
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 |
||
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 |
||
26 | * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |
||
27 | */ |
||
28 | |||
29 | /** @addtogroup arp |
||
30 | * @{ |
||
31 | */ |
||
32 | |||
33 | /** @file |
||
3912 | mejdrech | 34 | * ARP module implementation. |
35 | * @see arp.h |
||
3846 | mejdrech | 36 | */ |
37 | |||
38 | #include <async.h> |
||
39 | #include <malloc.h> |
||
4192 | mejdrech | 40 | #include <mem.h> |
3991 | mejdrech | 41 | #include <rwlock.h> |
3846 | mejdrech | 42 | #include <stdio.h> |
4327 | mejdrech | 43 | #include <string.h> |
4307 | mejdrech | 44 | #include <task.h> |
3846 | mejdrech | 45 | |
46 | #include <ipc/ipc.h> |
||
47 | #include <ipc/services.h> |
||
48 | |||
3886 | mejdrech | 49 | #include "../../err.h" |
50 | #include "../../messages.h" |
||
51 | #include "../../modules.h" |
||
3846 | mejdrech | 52 | |
4243 | mejdrech | 53 | #include "../../include/byteorder.h" |
54 | #include "../../include/device.h" |
||
4307 | mejdrech | 55 | #include "../../include/arp_interface.h" |
56 | #include "../../include/nil_interface.h" |
||
3886 | mejdrech | 57 | #include "../../include/protocol_map.h" |
3846 | mejdrech | 58 | |
3886 | mejdrech | 59 | #include "../../structures/measured_strings.h" |
60 | #include "../../structures/packet/packet.h" |
||
3901 | mejdrech | 61 | #include "../../structures/packet/packet_client.h" |
3886 | mejdrech | 62 | |
4307 | mejdrech | 63 | #include "../il_messages.h" |
64 | |||
3846 | mejdrech | 65 | #include "arp.h" |
66 | #include "arp_header.h" |
||
67 | #include "arp_oc.h" |
||
68 | #include "arp_module.h" |
||
4307 | mejdrech | 69 | #include "arp_messages.h" |
3846 | mejdrech | 70 | |
3912 | mejdrech | 71 | /** ARP global data. |
72 | */ |
||
3846 | mejdrech | 73 | arp_globals_t arp_globals; |
74 | |||
4307 | mejdrech | 75 | /** Clears the whole cache. |
76 | * @returns EOK on success. |
||
77 | */ |
||
78 | int arp_clean_cache_req( int arp_phone ); |
||
79 | |||
80 | /** Clears the device specific data from the cache. |
||
4350 | mejdrech | 81 | * @param arp_phone The ARP module phone used for (semi)remote calls. Input parameter. |
4307 | mejdrech | 82 | * @param device_id The device identifier. Input parameter. |
83 | * @returns EOK on success. |
||
84 | * @returns ENOENT if the device is not found in the cache. |
||
85 | */ |
||
86 | int arp_clear_device_req( int arp_phone, device_id_t device_id ); |
||
87 | |||
3912 | mejdrech | 88 | /** Creates new protocol specific data. |
89 | * @param proto Protocol specific data. Output parameter. |
||
90 | * @param service Protocol module service. Input parameter. |
||
91 | * @param address Actual protocol device address. Input parameter. |
||
92 | * @returns EOK on success. |
||
93 | * @returns ENOMEM if there is not enough memory left. |
||
94 | */ |
||
95 | int arp_proto_create( arp_proto_ref * proto, services_t service, measured_string_ref address ); |
||
96 | |||
97 | /** Registers the device. |
||
98 | * Creates new device entry in the cache or updates the protocol address if the device with the device identifier and the driver service exists. |
||
99 | * @param device_id The device identifier. Input parameter. |
||
100 | * @param service The device driver service. Input parameter. |
||
101 | * @param protocol The protocol service. Input parameter. |
||
102 | * @param address The actual device protocol address. |
||
103 | * @returns EOK on success. |
||
104 | * @returns EEXIST if another device with the same device identifier and different driver service exists. |
||
105 | * @returns ENOMEM if there is not enough memory left. |
||
106 | * @returns Other error codes as defined for the measured_strings_return() function. |
||
107 | */ |
||
108 | int arp_device_message( device_id_t device_id, services_t service, services_t protocol, measured_string_ref address ); |
||
109 | |||
110 | /** Returns the hardware address for the given protocol address. |
||
111 | * Sends the ARP request packet if the hardware address is not found in the cache. |
||
112 | * @param device_id The device identifier. Input parameter. |
||
113 | * @param protocol The protocol service. Input parameter. |
||
114 | * @param target The target protocol address. Input parameter. |
||
115 | * @returns The hardware address of the target. |
||
116 | * @returns NULL if the target parameter is NULL. |
||
117 | * @returns NULL if the device is not found. |
||
118 | * @returns NULL if the device packet is too small to send a request. |
||
119 | * @returns NULL if the hardware address is not found in the cache. |
||
120 | */ |
||
121 | measured_string_ref arp_translate_message( device_id_t device_id, services_t protocol, measured_string_ref target ); |
||
122 | |||
123 | /** Processes the received ARP packet. |
||
124 | * Updates the source hardware address if the source entry exists or the packet is targeted to my protocol address. |
||
125 | * Responses to the ARP request if the packet is the ARP request and is targeted to my address. |
||
126 | * @param device_id The source device identifier. Input parameter. |
||
127 | * @param packet The received packet. Input/output parameter. |
||
4394 | mejdrech | 128 | * @returns EOK on success and the packet is no longer needed. |
129 | * @returns 1 on success and the packet has been reused. |
||
3912 | mejdrech | 130 | * @returns EINVAL if the packet is too small to carry the ARP packet. |
131 | * @returns EINVAL if the received address lengths differs from the registered values. |
||
132 | * @returns ENOENT if the device is not found in the cache. |
||
133 | * @returns ENOENT if the protocol for the device is not found in the cache. |
||
134 | * @returns ENOMEM if there is not enough memory left. |
||
135 | */ |
||
136 | int arp_receive_message( device_id_t device_id, packet_t packet ); |
||
137 | |||
138 | /** Clears the device specific data. |
||
139 | * @param device The device specific data. |
||
140 | */ |
||
141 | void clear_device( arp_device_ref device ); |
||
142 | |||
3846 | mejdrech | 143 | DEVICE_MAP_IMPLEMENT( arp_cache, arp_device_t ) |
144 | |||
145 | INT_MAP_IMPLEMENT( arp_protos, arp_proto_t ) |
||
146 | |||
147 | GENERIC_CHAR_MAP_IMPLEMENT( arp_addr, measured_string_t ) |
||
148 | |||
4307 | mejdrech | 149 | int arp_task_get_id( void ){ |
150 | return task_get_id(); |
||
151 | } |
||
152 | |||
153 | int arp_clear_device_req( int arp_phone, device_id_t device_id ){ |
||
4271 | mejdrech | 154 | arp_device_ref device; |
155 | |||
156 | rwlock_write_lock( & arp_globals.lock ); |
||
157 | device = arp_cache_find( & arp_globals.cache, device_id ); |
||
158 | if( ! device ){ |
||
159 | rwlock_write_unlock( & arp_globals.lock ); |
||
160 | return ENOENT; |
||
161 | } |
||
162 | clear_device( device ); |
||
4307 | mejdrech | 163 | printf( "Device %d cleared\n", device_id ); |
4271 | mejdrech | 164 | rwlock_write_unlock( & arp_globals.lock ); |
165 | return EOK; |
||
166 | } |
||
167 | |||
4307 | mejdrech | 168 | int arp_clean_cache_req( int arp_phone ){ |
4271 | mejdrech | 169 | int count; |
170 | arp_device_ref device; |
||
171 | |||
172 | rwlock_write_lock( & arp_globals.lock ); |
||
173 | for( count = arp_cache_count( & arp_globals.cache ) - 1; count >= 0; -- count ){ |
||
174 | device = arp_cache_get_index( & arp_globals.cache, count ); |
||
175 | if( device ){ |
||
176 | clear_device( device ); |
||
177 | if( device->addr_data ) free( device->addr_data ); |
||
178 | if( device->broadcast_data ) free( device->broadcast_data ); |
||
179 | } |
||
180 | } |
||
181 | arp_cache_clear( & arp_globals.cache ); |
||
182 | rwlock_write_unlock( & arp_globals.lock ); |
||
4307 | mejdrech | 183 | printf( "Cache cleaned\n" ); |
4271 | mejdrech | 184 | return EOK; |
185 | } |
||
186 | |||
4307 | mejdrech | 187 | int arp_device_req( int arp_phone, device_id_t device_id, services_t protocol, services_t netif, measured_string_ref address ){ |
4271 | mejdrech | 188 | ERROR_DECLARE; |
189 | |||
190 | measured_string_ref tmp; |
||
191 | |||
192 | tmp = measured_string_copy( address ); |
||
193 | if( ERROR_OCCURRED( arp_device_message( device_id, netif, protocol, tmp ))){ |
||
194 | free( tmp->value ); |
||
195 | free( tmp ); |
||
196 | } |
||
197 | return ERROR_CODE; |
||
198 | } |
||
199 | |||
4307 | mejdrech | 200 | int arp_translate_req( int arp_phone, device_id_t device_id, services_t protocol, measured_string_ref address, measured_string_ref * translation, char ** data ){ |
4271 | mejdrech | 201 | measured_string_ref tmp; |
202 | |||
203 | rwlock_read_lock( & arp_globals.lock ); |
||
204 | tmp = arp_translate_message( device_id, protocol, address ); |
||
205 | if( tmp ){ |
||
206 | * translation = measured_string_copy( tmp ); |
||
207 | rwlock_read_unlock( & arp_globals.lock ); |
||
208 | if( * translation ){ |
||
209 | * data = ( ** translation ).value; |
||
210 | return EOK; |
||
211 | }else{ |
||
212 | return ENOMEM; |
||
213 | } |
||
214 | }else{ |
||
215 | rwlock_read_unlock( & arp_globals.lock ); |
||
216 | return ENOENT; |
||
217 | } |
||
218 | } |
||
219 | |||
4351 | mejdrech | 220 | int arp_initialize( async_client_conn_t client_connection ){ |
3991 | mejdrech | 221 | ERROR_DECLARE; |
222 | |||
223 | rwlock_initialize( & arp_globals.lock ); |
||
224 | rwlock_write_lock( & arp_globals.lock ); |
||
4351 | mejdrech | 225 | arp_globals.client_connection = client_connection; |
3991 | mejdrech | 226 | ERROR_PROPAGATE( arp_cache_initialize( & arp_globals.cache )); |
227 | rwlock_write_unlock( & arp_globals.lock ); |
||
228 | return EOK; |
||
3846 | mejdrech | 229 | } |
230 | |||
231 | int arp_proto_create( arp_proto_ref * proto, services_t service, measured_string_ref address ){ |
||
232 | ERROR_DECLARE; |
||
233 | |||
234 | * proto = ( arp_proto_ref ) malloc( sizeof( arp_proto_t )); |
||
235 | if( !( * proto )) return ENOMEM; |
||
236 | ( ** proto ).service = service; |
||
237 | ( ** proto ).addr = address; |
||
238 | ( ** proto ).addr_data = address->value; |
||
3912 | mejdrech | 239 | if( ERROR_OCCURRED( arp_addr_initialize( &( ** proto).addresses ))){ |
3846 | mejdrech | 240 | free( * proto ); |
241 | return ERROR_CODE; |
||
242 | } |
||
243 | return EOK; |
||
244 | } |
||
245 | |||
246 | int arp_device_message( device_id_t device_id, services_t service, services_t protocol, measured_string_ref address ){ |
||
247 | ERROR_DECLARE; |
||
248 | |||
249 | arp_device_ref device; |
||
250 | arp_proto_ref proto; |
||
4192 | mejdrech | 251 | int index; |
3846 | mejdrech | 252 | |
3991 | mejdrech | 253 | rwlock_write_lock( & arp_globals.lock ); |
3846 | mejdrech | 254 | // an existing device? |
255 | device = arp_cache_find( & arp_globals.cache, device_id ); |
||
256 | if( device ){ |
||
3991 | mejdrech | 257 | if( device->service != service ){ |
4307 | mejdrech | 258 | printf( "Device %d already exists\n", device->device_id ); |
3991 | mejdrech | 259 | rwlock_write_unlock( & arp_globals.lock ); |
260 | return EEXIST; |
||
261 | } |
||
3846 | mejdrech | 262 | proto = arp_protos_find( & device->protos, protocol ); |
263 | if( proto ){ |
||
264 | free( proto->addr ); |
||
265 | free( proto->addr_data ); |
||
266 | proto->addr = address; |
||
267 | proto->addr_data = address->value; |
||
268 | }else{ |
||
3991 | mejdrech | 269 | if( ERROR_OCCURRED( arp_proto_create( & proto, protocol, address ))){ |
270 | rwlock_write_unlock( & arp_globals.lock ); |
||
271 | return ERROR_CODE; |
||
272 | } |
||
4192 | mejdrech | 273 | index = arp_protos_add( & device->protos, proto->service, proto ); |
274 | if( index < 0 ){ |
||
3991 | mejdrech | 275 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 276 | free( proto ); |
4261 | mejdrech | 277 | return index; |
3846 | mejdrech | 278 | } |
4332 | mejdrech | 279 | printf( "New protocol added:\n\tdevice id\t= %d\n\tproto\t= %d", device_id, protocol ); |
3846 | mejdrech | 280 | } |
281 | }else{ |
||
4243 | mejdrech | 282 | index = hardware_map( service ); |
4192 | mejdrech | 283 | if( ! index ) return ENOENT; |
3846 | mejdrech | 284 | // create a new device |
285 | device = ( arp_device_ref ) malloc( sizeof( arp_device_t )); |
||
3991 | mejdrech | 286 | if( ! device ){ |
287 | rwlock_write_unlock( & arp_globals.lock ); |
||
288 | return ENOMEM; |
||
289 | } |
||
4192 | mejdrech | 290 | device->hardware = index; |
3846 | mejdrech | 291 | device->device_id = device_id; |
3912 | mejdrech | 292 | if( ERROR_OCCURRED( arp_protos_initialize( & device->protos )) |
293 | || ERROR_OCCURRED( arp_proto_create( & proto, protocol, address ))){ |
||
3991 | mejdrech | 294 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 295 | free( device ); |
296 | return ERROR_CODE; |
||
297 | } |
||
4192 | mejdrech | 298 | index = arp_protos_add( & device->protos, proto->service, proto ); |
299 | if( index < 0 ){ |
||
3991 | mejdrech | 300 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 301 | arp_protos_destroy( & device->protos ); |
302 | free( device ); |
||
4192 | mejdrech | 303 | return index; |
3846 | mejdrech | 304 | } |
305 | device->service = service; |
||
306 | // bind the new one |
||
4351 | mejdrech | 307 | device->phone = bind_service( device->service, device->device_id, SERVICE_ARP, 0, arp_globals.client_connection ); |
4192 | mejdrech | 308 | if( device->phone < 0 ){ |
309 | rwlock_write_unlock( & arp_globals.lock ); |
||
310 | arp_protos_destroy( & device->protos ); |
||
311 | free( device ); |
||
312 | return EREFUSED; |
||
313 | } |
||
3846 | mejdrech | 314 | // get packet dimensions |
4261 | mejdrech | 315 | if( ERROR_OCCURRED( nil_packet_size_req( device->phone, device_id, & device->addr_len, & device->prefix, & device->content, & device->suffix ))){ |
3991 | mejdrech | 316 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 317 | arp_protos_destroy( & device->protos ); |
318 | free( device ); |
||
319 | return ERROR_CODE; |
||
320 | } |
||
321 | // get hardware address |
||
4261 | mejdrech | 322 | if( ERROR_OCCURRED( nil_get_addr( device->phone, device_id, & device->addr, & device->addr_data ))){ |
3991 | mejdrech | 323 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 324 | arp_protos_destroy( & device->protos ); |
325 | free( device ); |
||
326 | return ERROR_CODE; |
||
327 | } |
||
328 | // get broadcast address |
||
4261 | mejdrech | 329 | if( ERROR_OCCURRED( nil_get_broadcast_addr( device->phone, device_id, & device->broadcast_addr, & device->broadcast_data ))){ |
3991 | mejdrech | 330 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 331 | free( device->addr ); |
332 | free( device->addr_data ); |
||
333 | arp_protos_destroy( & device->protos ); |
||
334 | free( device ); |
||
335 | return ERROR_CODE; |
||
336 | } |
||
4261 | mejdrech | 337 | if( ERROR_OCCURRED( arp_cache_add( & arp_globals.cache, device->device_id, device ))){ |
3991 | mejdrech | 338 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 339 | free( device->addr ); |
340 | free( device->addr_data ); |
||
341 | free( device->broadcast_addr ); |
||
342 | free( device->broadcast_data ); |
||
343 | arp_protos_destroy( & device->protos ); |
||
344 | free( device ); |
||
345 | return ERROR_CODE; |
||
346 | } |
||
4332 | mejdrech | 347 | printf( "New device registered:\n\tid\t= %d\n\ttype\t= 0x%x\n\tservice\t= %d\n\tproto\t= %d\n", device->device_id, device->hardware, device->service, protocol ); |
3846 | mejdrech | 348 | } |
3991 | mejdrech | 349 | rwlock_write_unlock( & arp_globals.lock ); |
3846 | mejdrech | 350 | return EOK; |
351 | } |
||
352 | |||
353 | measured_string_ref arp_translate_message( device_id_t device_id, services_t protocol, measured_string_ref target ){ |
||
354 | arp_device_ref device; |
||
355 | arp_proto_ref proto; |
||
356 | measured_string_ref addr; |
||
357 | size_t length; |
||
358 | packet_t packet; |
||
359 | arp_header_ref header; |
||
360 | |||
361 | if( ! target ) return NULL; |
||
362 | device = arp_cache_find( & arp_globals.cache, device_id ); |
||
4243 | mejdrech | 363 | if( ! device ) return NULL; |
3846 | mejdrech | 364 | proto = arp_protos_find( & device->protos, protocol ); |
4243 | mejdrech | 365 | if(( ! proto ) || ( proto->addr->length != target->length )) return NULL; |
3846 | mejdrech | 366 | addr = arp_addr_find( & proto->addresses, target->value, target->length ); |
4243 | mejdrech | 367 | if( addr ) return addr; |
3846 | mejdrech | 368 | // ARP packet content size = header + ( address + translation ) * 2 |
369 | length = 8 + ( CONVERT_SIZE( char, uint8_t, proto->addr->length ) + CONVERT_SIZE( char, uint8_t, device->addr->length )) * 2; |
||
4243 | mejdrech | 370 | if( length > device->content ) return NULL; |
4307 | mejdrech | 371 | packet = packet_get_4( arp_globals.net_phone, device->addr_len, device->prefix, length, device->suffix ); |
4243 | mejdrech | 372 | if( ! packet ) return NULL; |
3912 | mejdrech | 373 | header = ( arp_header_ref ) packet_suffix( packet, length ); |
4394 | mejdrech | 374 | if( ! header ){ |
375 | pq_release( packet ); |
||
376 | return NULL; |
||
377 | } |
||
4243 | mejdrech | 378 | header->hardware = htons( device->hardware ); |
3846 | mejdrech | 379 | header->hardware_length = device->addr->length; |
4243 | mejdrech | 380 | header->protocol = htons( protocol_map( device->service, protocol )); |
3846 | mejdrech | 381 | header->protocol_length = proto->addr->length; |
4243 | mejdrech | 382 | header->operation = htons( ARPOP_REQUEST ); |
3846 | mejdrech | 383 | length = sizeof( arp_header_t ); |
384 | memcpy((( uint8_t * ) header ) + length, device->addr->value, device->addr->length ); |
||
385 | length += device->addr->length; |
||
386 | memcpy((( uint8_t * ) header ) + length, proto->addr->value, proto->addr->length ); |
||
387 | length += proto->addr->length; |
||
4192 | mejdrech | 388 | bzero((( uint8_t * ) header ) + length, device->addr->length ); |
3846 | mejdrech | 389 | length += device->addr->length; |
390 | memcpy((( uint8_t * ) header ) + length, target->value, target->length ); |
||
4394 | mejdrech | 391 | if( packet_set_addr( packet, ( uint8_t * ) device->addr->value, ( uint8_t * ) device->broadcast_addr->value, CONVERT_SIZE( char, uint8_t, device->addr->length )) != EOK ){ |
392 | pq_release( packet ); |
||
393 | return NULL; |
||
394 | } |
||
4261 | mejdrech | 395 | nil_send_msg( device->phone, device_id, packet, SERVICE_ARP ); |
3846 | mejdrech | 396 | return NULL; |
397 | } |
||
398 | |||
399 | int arp_receive_message( device_id_t device_id, packet_t packet ){ |
||
400 | ERROR_DECLARE; |
||
401 | |||
402 | size_t length; |
||
403 | arp_header_ref header; |
||
404 | arp_device_ref device; |
||
405 | arp_proto_ref proto; |
||
406 | measured_string_ref hw_source; |
||
3991 | mejdrech | 407 | uint8_t * src_hw; |
3912 | mejdrech | 408 | uint8_t * src_proto; |
409 | uint8_t * des_hw; |
||
410 | uint8_t * des_proto; |
||
3846 | mejdrech | 411 | |
412 | length = packet_get_data_length( packet ); |
||
413 | if( length <= sizeof( arp_header_t )) return EINVAL; |
||
414 | device = arp_cache_find( & arp_globals.cache, device_id ); |
||
4243 | mejdrech | 415 | if( ! device ) return ENOENT; |
3846 | mejdrech | 416 | header = ( arp_header_ref ) packet_get_data( packet ); |
4243 | mejdrech | 417 | if(( ntohs( header->hardware ) != device->hardware ) |
3991 | mejdrech | 418 | || ( length < sizeof( arp_header_t ) + ( header->hardware_length + header->protocol_length ) * 2 )){ |
419 | return EINVAL; |
||
420 | } |
||
4243 | mejdrech | 421 | proto = arp_protos_find( & device->protos, protocol_unmap( device->service, ntohs( header->protocol ))); |
422 | if( ! proto ) return ENOENT; |
||
3912 | mejdrech | 423 | src_hw = (( uint8_t * ) header ) + sizeof( arp_header_t ); |
3846 | mejdrech | 424 | src_proto = src_hw + header->hardware_length; |
425 | des_hw = src_proto + header->protocol_length; |
||
426 | des_proto = des_hw + header->hardware_length; |
||
3912 | mejdrech | 427 | hw_source = arp_addr_find( & proto->addresses, ( char * ) src_proto, CONVERT_SIZE( uint8_t, char, header->protocol_length )); |
3846 | mejdrech | 428 | // exists? |
429 | if( hw_source ){ |
||
3991 | mejdrech | 430 | if( hw_source->length != CONVERT_SIZE( uint8_t, char, header->hardware_length )){ |
431 | return EINVAL; |
||
432 | } |
||
3912 | mejdrech | 433 | memcpy( hw_source->value, src_hw, hw_source->length ); |
3846 | mejdrech | 434 | } |
435 | // is my protocol address? |
||
4332 | mejdrech | 436 | if( proto->addr->length != CONVERT_SIZE( uint8_t, char, header->protocol_length )){ |
3991 | mejdrech | 437 | return EINVAL; |
3846 | mejdrech | 438 | } |
4327 | mejdrech | 439 | if( ! str_lcmp( proto->addr->value, ( char * ) des_proto, proto->addr->length )){ |
3846 | mejdrech | 440 | // not already upadted? |
441 | if( ! hw_source ){ |
||
3912 | mejdrech | 442 | hw_source = measured_string_create_bulk(( char * ) src_hw, CONVERT_SIZE( uint8_t, char, header->hardware_length )); |
4243 | mejdrech | 443 | if( ! hw_source ) return ENOMEM; |
444 | ERROR_PROPAGATE( arp_addr_add( & proto->addresses, ( char * ) src_proto, CONVERT_SIZE( uint8_t, char, header->protocol_length ), hw_source )); |
||
3846 | mejdrech | 445 | } |
4243 | mejdrech | 446 | if( ntohs( header->operation ) == ARPOP_REQUEST ){ |
447 | header->operation = htons( ARPOP_REPLY ); |
||
3991 | mejdrech | 448 | memcpy( des_proto, src_proto, header->protocol_length ); |
3846 | mejdrech | 449 | memcpy( src_proto, proto->addr->value, header->protocol_length ); |
4332 | mejdrech | 450 | memcpy( src_hw, device->addr->value, device->addr_len ); |
3912 | mejdrech | 451 | memcpy( des_hw, hw_source->value, header->hardware_length ); |
4394 | mejdrech | 452 | ERROR_PROPAGATE( packet_set_addr( packet, src_hw, des_hw, header->hardware_length )); |
4261 | mejdrech | 453 | nil_send_msg( device->phone, device_id, packet, SERVICE_ARP ); |
4394 | mejdrech | 454 | return 1; |
3846 | mejdrech | 455 | } |
456 | } |
||
457 | return EOK; |
||
458 | } |
||
459 | |||
460 | void clear_device( arp_device_ref device ){ |
||
461 | int count; |
||
462 | arp_proto_ref proto; |
||
463 | |||
4192 | mejdrech | 464 | for( count = arp_protos_count( & device->protos ) - 1; count >= 0; -- count ){ |
3846 | mejdrech | 465 | proto = arp_protos_get_index( & device->protos, count ); |
4192 | mejdrech | 466 | if( proto ){ |
467 | if( proto->addr ) free( proto->addr ); |
||
468 | if( proto->addr_data ) free( proto->addr_data ); |
||
469 | arp_addr_destroy( & proto->addresses ); |
||
470 | } |
||
3846 | mejdrech | 471 | } |
472 | arp_protos_clear( & device->protos ); |
||
473 | } |
||
474 | |||
4307 | mejdrech | 475 | int arp_connect_module( services_t service ){ |
476 | return EOK; |
||
477 | } |
||
478 | |||
3846 | mejdrech | 479 | int arp_message( ipc_callid_t callid, ipc_call_t * call, ipc_call_t * answer, int * answer_count ){ |
480 | ERROR_DECLARE; |
||
481 | |||
482 | measured_string_ref address; |
||
483 | measured_string_ref translation; |
||
484 | char * data; |
||
4351 | mejdrech | 485 | packet_t packet; |
4394 | mejdrech | 486 | packet_t next; |
3846 | mejdrech | 487 | |
4307 | mejdrech | 488 | // printf( "message %d - %d\n", IPC_GET_METHOD( * call ), NET_ARP_FIRST ); |
3846 | mejdrech | 489 | * answer_count = 0; |
490 | switch( IPC_GET_METHOD( * call )){ |
||
491 | case IPC_M_PHONE_HUNGUP: |
||
492 | return EOK; |
||
493 | case NET_ARP_DEVICE: |
||
494 | ERROR_PROPAGATE( measured_strings_receive( & address, & data, 1 )); |
||
4307 | mejdrech | 495 | if( ERROR_OCCURRED( arp_device_message( IPC_GET_DEVICE( call ), IPC_GET_SERVICE( call ), ARP_GET_NETIF( call ), address ))){ |
3846 | mejdrech | 496 | free( address ); |
497 | free( data ); |
||
498 | } |
||
499 | return ERROR_CODE; |
||
500 | case NET_ARP_TRANSLATE: |
||
501 | ERROR_PROPAGATE( measured_strings_receive( & address, & data, 1 )); |
||
4243 | mejdrech | 502 | rwlock_read_lock( & arp_globals.lock ); |
4307 | mejdrech | 503 | translation = arp_translate_message( IPC_GET_DEVICE( call ), IPC_GET_SERVICE( call ), address ); |
3846 | mejdrech | 504 | free( address ); |
505 | free( data ); |
||
4243 | mejdrech | 506 | if( ! translation ){ |
507 | rwlock_read_unlock( & arp_globals.lock ); |
||
508 | return ENOENT; |
||
509 | } |
||
510 | ERROR_CODE = measured_strings_reply( translation, 1 ); |
||
511 | rwlock_read_unlock( & arp_globals.lock ); |
||
512 | return ERROR_CODE; |
||
3846 | mejdrech | 513 | case NET_ARP_CLEAR_DEVICE: |
4307 | mejdrech | 514 | return arp_clear_device_req( 0, IPC_GET_DEVICE( call )); |
3846 | mejdrech | 515 | case NET_ARP_CLEAN_CACHE: |
4307 | mejdrech | 516 | return arp_clean_cache_req( 0 ); |
4351 | mejdrech | 517 | case NET_IL_DEVICE_STATE: |
518 | // do nothing - keep the cache |
||
519 | return EOK; |
||
520 | case NET_IL_RECEIVED: |
||
521 | if( ! ERROR_OCCURRED( packet_translate( arp_globals.net_phone, & packet, IPC_GET_PACKET( call )))){ |
||
522 | rwlock_read_lock( & arp_globals.lock ); |
||
4394 | mejdrech | 523 | do{ |
524 | next = pq_next( packet ); |
||
525 | packet_detach( packet ); |
||
526 | ERROR_CODE = arp_receive_message( IPC_GET_DEVICE( call ), packet ); |
||
527 | if( ERROR_CODE != 1 ) pq_release( arp_globals.net_phone, packet_get_id( packet )); |
||
528 | packet = next; |
||
529 | }while( packet ); |
||
4351 | mejdrech | 530 | rwlock_read_unlock( & arp_globals.lock ); |
531 | } |
||
532 | return ERROR_CODE; |
||
3846 | mejdrech | 533 | } |
534 | return ENOTSUP; |
||
535 | } |
||
536 | |||
537 | /** @} |
||
538 | */ |