po_hi_driver_sockets.c 17.4 KB
Newer Older
1
2
3
4
5
6
7
/*
 * This is a part of PolyORB-HI-C distribution, a minimal
 * middleware written for generated code from AADL models.
 * You should use it with the Ocarina toolsuite.
 *
 * For more informations, please visit http://ocarina.enst.fr
 *
8
 * Copyright (C) 2010, European Space Agency
9
10
11
 * Copyright (C) 2007-2008, GET-Telecom Paris.
 */

12
#include <deployment.h>
julien.delange's avatar
julien.delange committed
13
#include <marshallers.h>
14

julien.delange's avatar
julien.delange committed
15
16
#if (defined (__PO_HI_NEED_DRIVER_SOCKETS) || \
     defined (__PO_HI_NEED_DRIVER_RTEMS_NE2000_SOCKETS))
17

18
19
20
21
22
23
24
25
26
#include <po_hi_config.h>
#include <po_hi_task.h>
#include <po_hi_transport.h>
#include <po_hi_debug.h>
#include <po_hi_types.h>
#include <po_hi_messages.h>
#include <po_hi_returns.h>
#include <po_hi_main.h>
#include <po_hi_task.h>
27
#include <po_hi_gqueue.h>
28
#include <drivers/po_hi_driver_sockets.h>
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43

#include <activity.h>

#include <signal.h>
#include <string.h>
#include <unistd.h>
#include <netdb.h>
#include <sys/types.h>
#include <sys/select.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/time.h>

/*
44
 * This file (po_hi_sockets.c) provides function to handle
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
 * communication between nodes in PolyORB-HI-C.  We don't use a
 * protocol to send data. For each data sent, we send before the
 * entity number provided by the generated file deployment.h, then, we
 * send the message.  Each entity has a fixed size
 * (sizeof(__po_hi_entity_t)), and each message has a max fixed size
 * (see the __PO_HI_MESSAGES_MAX_SIZE macro).
 */

/* The following declarations avoid conflicts
 * with current generated code.
 */

#ifndef __PO_HI_NB_NODES
#define __PO_HI_NB_NODES 1
#endif

/*
 * We have two arrays of sockets. The first array (nodes) is used to
63
 * send data to other nodes. A special socket if nodes[__po_hi_mynode] : this
64
65
66
67
68
 * socket is used to listen others processes.  The second array
 * (rnodes), is used to store all socket that are created by the
 * listen socket. This array is used only by the receiver_task
 */

julien.delange's avatar
julien.delange committed
69
70
__po_hi_inetnode_t nodes[__PO_HI_NB_DEVICES];
__po_hi_inetnode_t rnodes[__PO_HI_NB_DEVICES];
julien.delange's avatar
julien.delange committed
71

72
__po_hi_device_id socket_device_id;
73

74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
int __po_hi_driver_sockets_send (__po_hi_task_id task_id,
                                 __po_hi_port_t port)
{
   int                     len;
   int                     size_to_write;
   int                     optval = 0;
   socklen_t               optlen = 0;
   __po_hi_device_id       associated_device;
   __po_hi_local_port_t    local_port;
   __po_hi_request_t*      request;
   __po_hi_port_t          destination_port;
   __po_hi_msg_t           msg;

   local_port = __po_hi_get_local_port_from_global_port (port);

   request = __po_hi_gqueue_get_most_recent_value (task_id, local_port);

   destination_port     = __po_hi_gqueue_get_destination (task_id, local_port, 0);

   associated_device = __po_hi_get_device_from_port (destination_port);

95
96
97
98
99
100
   if (request->port == -1)
   {

#ifdef __PO_HI_DEBUG
      __DEBUGMSG (" [DRIVER SOCKETS] No data to write on port %d\n", port);
#endif
101
      return __PO_HI_ERROR_TRANSPORT_SEND;
102
103
   }

104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
   if (nodes[associated_device].socket == -1 )
   {
#ifdef __PO_HI_DEBUG
      __DEBUGMSG (" [DRIVER SOCKETS] Invalid socket for port-id %d, device-id %d\n", destination_port, associated_device);
#endif
      return __PO_HI_ERROR_TRANSPORT_SEND;		
   }

   /*
    * After sending the entity identifier, we send the message which
    * contains the request.
    */

   size_to_write = __PO_HI_MESSAGES_MAX_SIZE;

   if (getsockopt (nodes[associated_device].socket, SOL_SOCKET, SO_ERROR, &optval, &optlen) == -1)
   {
      __DEBUGMSG (" [error getsockopt() in file %s, line%d ]\n", __FILE__, __LINE__);
      close (nodes[associated_device].socket);
      nodes[associated_device].socket = -1;
      return __PO_HI_ERROR_TRANSPORT_SEND;		
   }

   if (optval != 0)
   {
      __DEBUGMSG (" [error getsockopt() return code in file %s, line%d ]\n", __FILE__, __LINE__);
      close (nodes[associated_device].socket);
      nodes[associated_device].socket = -1;
      return __PO_HI_ERROR_TRANSPORT_SEND;		
   }

   /* Ignore SIGPIPE to be able to recover from errors instead of crashing the node */

   if (signal (SIGPIPE, SIG_IGN) == SIG_ERR)
   {
      __DEBUGMSG (" [error signal() return code in file %s, line%d ]\n", __FILE__, __LINE__);
      close (nodes[associated_device].socket);
      nodes[associated_device].socket = -1;
      return __PO_HI_ERROR_TRANSPORT_SEND;
   }
   request->port = destination_port;
   __po_hi_msg_reallocate (&msg);
   __po_hi_marshall_request (request, &msg);

#ifdef __PO_HI_DEBUG
   __po_hi_messages_debug (&msg);
#endif

   len = write (nodes[associated_device].socket, &(msg.content), size_to_write);

   if (len != size_to_write)
   {
      __DEBUGMSG (" [error write() length in file %s, line%d ]\n", __FILE__, __LINE__);
      close (nodes[associated_device].socket);
      nodes[associated_device].socket = -1;
      return __PO_HI_ERROR_TRANSPORT_SEND;		
   }

   return __PO_HI_SUCCESS;
}


julien.delange's avatar
julien.delange committed
166
void* __po_hi_sockets_poller (void)
167
{
168
   __DEBUGMSG ("Poller launched, device-id=%d\n", socket_device_id);
julien.delange's avatar
julien.delange committed
169
170
171
172
173
174
175
   socklen_t          socklen = sizeof (struct sockaddr);
   /* See ACCEPT (2) for details on initial value of socklen */

   __po_hi_uint32_t   len;
   int                sock;
   int                max_socket;
   fd_set             selector;
julien.delange's avatar
julien.delange committed
176
   struct sockaddr_in sa;
177
   __po_hi_device_id  dev;
julien.delange's avatar
julien.delange committed
178
179
   __po_hi_node_t     dev_init;
   __po_hi_request_t  received_request;
julien.delange's avatar
julien.delange committed
180
   __po_hi_msg_t      msg;
181
   int                established = 0; 
julien.delange's avatar
julien.delange committed
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198

   max_socket = 0; /* Used to compute the max socket number, useful for listen() call */

   /*
    * We initialize each node socket with -1 value.  This value means
    * that the socket is not active.
    */
   for (dev = 0 ; dev < __PO_HI_NB_DEVICES ; dev++)
   {
      rnodes[dev].socket = -1;
   }

   /*
    * Create a socket for each node that will communicate with us.
    */
   for (dev = 0; dev < __PO_HI_NB_DEVICES ; dev++)
   {
julien.delange's avatar
julien.delange committed
199
      if (dev != socket_device_id)
julien.delange's avatar
julien.delange committed
200
      {
201
         __DEBUGMSG ("[DRIVER SOCKETS] Poller waits for connection with device %d\n", dev);
julien.delange's avatar
julien.delange committed
202

203
         /*
204
         __PO_HI_SET_SOCKET_TIMEOUT(nodes[socket_device_id].socket,5);
205
         */
206
207
208
209

         established = 0;

         while (established == 0)
julien.delange's avatar
julien.delange committed
210
         {
211
212
213
214
215
216
217
218
219
220
221
222
223
            sock = accept (nodes[socket_device_id].socket, (struct sockaddr*) &sa, &socklen);

            __PO_HI_SET_SOCKET_TIMEOUT(sock,10);

            if (read (sock, &dev_init, sizeof (__po_hi_device_id)) != sizeof (__po_hi_device_id))
            {
               established = 0;
               __DEBUGMSG ("[DRIVER SOCKETS] Cannot read device-id for device %d, socket=%d\n", dev, sock);
            }
            else
            {
               established = 1;
            }
julien.delange's avatar
julien.delange committed
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
         }
         __DEBUGMSG ("[DRIVER SOCKETS] read device-id %d from socket=%d\n", dev_init, sock);
         rnodes[dev].socket = sock;
         if (sock > max_socket )
         {
            max_socket = sock;
         }	  
      }
   }
   __DEBUGMSG ("[DRIVER SOCKETS] Poller initialization finished\n");
   __po_hi_wait_initialization ();

   /*
    * Then, listen and receive data on the socket, identify the node
    * which send the data and put it in its message queue
    */
   while (1)
   {
      FD_ZERO( &selector );
      for (dev = 0; dev < __PO_HI_NB_DEVICES ; dev++)
      {
         if ( (dev != socket_device_id ) && ( rnodes[dev].socket != -1 ) )
         {
            FD_SET( rnodes[dev].socket , &selector );
         }
      }

      if (select (max_socket + 1, &selector, NULL, NULL, NULL) == -1 )
      {
#ifdef __PO_HI_DEBUG
254
         __DEBUGMSG ("[DRIVER SOCKETS] Error on select for node %d\n", __po_hi_mynode);
julien.delange's avatar
julien.delange committed
255
256
257
258
#endif 
      }
#ifdef __PO_HI_DEBUG
      __DEBUGMSG ("[DRIVER SOCKETS] Receive message\n");
259
#endif
julien.delange's avatar
julien.delange committed
260
261
262

      for (dev = 0; dev < __PO_HI_NB_DEVICES ; dev++)
      {
263
         __DEBUGMSG ("[DRIVER SOCKETS] Try to watch if it comes from device %d (socket=%d)\n", dev, rnodes[dev].socket);
julien.delange's avatar
julien.delange committed
264
265
266
267
268
         if ( (rnodes[dev].socket != -1 ) && FD_ISSET(rnodes[dev].socket, &selector))
         {
            __DEBUGMSG ("[DRIVER SOCKETS] Receive message from dev %d\n", dev);
            memset (msg.content, '\0', __PO_HI_MESSAGES_MAX_SIZE);
            len = recv (rnodes[dev].socket, msg.content, __PO_HI_MESSAGES_MAX_SIZE, MSG_WAITALL);
269
            msg.length = len;
julien.delange's avatar
julien.delange committed
270
271
            __DEBUGMSG ("[DRIVER SOCKETS] Message received len=%d\n",(int)len);

272
273
274
275
276
#ifdef __PO_HI_DEBUG
   __po_hi_messages_debug (&msg);
#endif


julien.delange's avatar
julien.delange committed
277
278
            if (len == 0)
            {
279
280

               __DEBUGMSG ("[DRIVER SOCKETS] Zero size from device %d\n",dev);
julien.delange's avatar
julien.delange committed
281
282
283
284
285
286
               rnodes[dev].socket = -1;
               continue;
            }

            __po_hi_unmarshall_request (&received_request, &msg);

287

julien.delange's avatar
julien.delange committed
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
            __po_hi_main_deliver (&received_request);
         }
      }
   }  
   return NULL;
}


/*
 * Old receiver code that is based on PolyORB-HI-C for AADLv1
 * Would be considered as deprecated.
 */
void* __po_hi_sockets_receiver_task (void)
{
   socklen_t          socklen = sizeof (struct sockaddr);
   /* See ACCEPT (2) for details on initial value of socklen */

   __po_hi_uint32_t   len;
   int                sock;
   int                max_socket;
   fd_set             selector;
   __po_hi_msg_t      msg;
julien.delange's avatar
julien.delange committed
310
311
312
313
314
   __po_hi_node_t     node;
   __po_hi_node_t     node_init;
   __po_hi_request_t  received_request;
   struct sockaddr_in sa;

315

julien.delange's avatar
julien.delange committed
316
317
318
319
320
321
322
323
   max_socket = 0; /* Used to compute the max socket number, useful for listen() call */

   /*
    * We initialize each node socket with -1 value.  This value means
    * that the socket is not active.
    */
   for (node = 0 ; node < __PO_HI_NB_NODES ; node++)
   {
324
      rnodes[node].socket = -1;
julien.delange's avatar
julien.delange committed
325
326
327
328
329
330
331
   }

   /*
    * Create a socket for each node that will communicate with us.
    */
   for (node = 0; node < __PO_HI_NB_NODES ; node++)
   {
332
      if (node != __po_hi_mynode )
julien.delange's avatar
julien.delange committed
333
      {
334
         sock = accept (nodes[__po_hi_mynode].socket, (struct sockaddr*) &sa, &socklen);
335
336
337
338
         if (sock == -1)
         {
            __DEBUGMSG ("accept() failed, return=%d\n", sock);
         }
julien.delange's avatar
julien.delange committed
339
340
341
342
343
344

         if (read (sock, &node_init, sizeof (__po_hi_node_t)) != sizeof (__po_hi_node_t))
         {
            __DEBUGMSG ("Cannot read node-id for socket %d\n", sock);
            continue;
         }
345

julien.delange's avatar
julien.delange committed
346
347
348
349
350
351
352
         rnodes[node].socket = sock;
         if (sock > max_socket )
         {
            max_socket = sock;
         }	  
      }
   }
353
#ifdef __PO_HI_DEBUG
julien.delange's avatar
julien.delange committed
354
   __DEBUGMSG ("Receiver initialization finished\n");
355
#endif
julien.delange's avatar
julien.delange committed
356
357
358
359
360
361
362
   __po_hi_wait_initialization ();

   /*
    * Then, listen and receive data on the socket, identify the node
    * which send the data and put it in its message queue
    */
   while (1)
363
   {
julien.delange's avatar
julien.delange committed
364
365
366
      FD_ZERO( &selector );
      for (node = 0; node < __PO_HI_NB_NODES ; node++)
      {
367
         if ( (node != __po_hi_mynode ) && ( rnodes[node].socket != -1 ) )
julien.delange's avatar
julien.delange committed
368
369
370
371
372
373
374
         {
            FD_SET( rnodes[node].socket , &selector );
         }
      }

      if (select (max_socket + 1, &selector, NULL, NULL, NULL) == -1 )
      {
375
#ifdef __PO_HI_DEBUG
376
         __DEBUGMSG ("Error on select for node %d\n", __po_hi_mynode);
377
#endif 
julien.delange's avatar
julien.delange committed
378
      }
379
#ifdef __PO_HI_DEBUG
julien.delange's avatar
julien.delange committed
380
      __DEBUGMSG ("Receive message\n");
381
#endif
julien.delange's avatar
julien.delange committed
382
383
384

      for (node = 0; node < __PO_HI_NB_NODES ; node++)
      {
385
         if ( (rnodes[node].socket != -1 ) && FD_ISSET(rnodes[node].socket, &selector))
julien.delange's avatar
julien.delange committed
386
         {
387
#ifdef __PO_HI_DEBUG
julien.delange's avatar
julien.delange committed
388
            __DEBUGMSG ("Receive message from node %d\n", node);
389
#endif
julien.delange's avatar
julien.delange committed
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405

            __DEBUGMSG ("Using raw protocol stack\n");
            len = recv (rnodes[node].socket, &(msg.content), __PO_HI_MESSAGES_MAX_SIZE, MSG_WAITALL);
            msg.length = len;
            if (len != __PO_HI_MESSAGES_MAX_SIZE )
            {
               __DEBUGMSG ("ERROR, %u %d", (unsigned int) len, __PO_HI_MESSAGES_MAX_SIZE);
               close (rnodes[node].socket);
               rnodes[node].socket = -1;
               continue;
            }
            __DEBUGMSG ("Message delivered");

            __po_hi_unmarshall_request (&received_request, &msg);

            __po_hi_main_deliver (&received_request);
julien.delange's avatar
julien.delange committed
406

julien.delange's avatar
julien.delange committed
407
408
409
            __po_hi_msg_reallocate(&msg);        /* re-initialize the message */
         }
      }
410
   }  
julien.delange's avatar
julien.delange committed
411
   return NULL;
412
413
}

julien.delange's avatar
julien.delange committed
414
void __po_hi_driver_sockets_init (__po_hi_device_id id)
415
{
julien.delange's avatar
julien.delange committed
416
417
418
419
   int                i;
   int                ret;
   int                reuse;
   char               *tmp;
420
   __po_hi_uint16_t   dev;
julien.delange's avatar
julien.delange committed
421
   __po_hi_time_t     mytime;
422
   struct sockaddr_in sa;
julien.delange's avatar
julien.delange committed
423
   struct hostent*    hostinfo;
424
425


426
427
428
429
   __po_hi_c_ip_conf_t* ipconf;
   char ip_addr[16];
   int ip_port;
   int node;
julien.delange's avatar
julien.delange committed
430

431
   socket_device_id = id;
julien.delange's avatar
julien.delange committed
432

433
   for (node = 0 ; node < __PO_HI_NB_DEVICES ; node++)
434
   {
julien.delange's avatar
julien.delange committed
435
      nodes[node].socket = -1;
436
437
   }

438
439
440
441
442
   ipconf = (__po_hi_c_ip_conf_t*)__po_hi_get_device_configuration (id);
   ip_port = (int)ipconf->port;

   __DEBUGMSG ("My configuration, addr=%s, port=%lld\n", ipconf->address, ipconf->port );

443
   /*
julien.delange's avatar
julien.delange committed
444
445
446
    * If the current node port has a port number, then it has to
    * listen to other nodes. So, we create a socket, bind it and
    * listen to other nodes.
447
    */
448
   if (ip_port != 0)
449
   {
450
      nodes[id].socket = socket (AF_INET, SOCK_STREAM, 0);
julien.delange's avatar
julien.delange committed
451

452
      if (nodes[id].socket == -1 )
453
      {
julien.delange's avatar
julien.delange committed
454
#ifdef __PO_HI_DEBUG
455
         __DEBUGMSG ("Cannot create socket for device %d\n", id);
julien.delange's avatar
julien.delange committed
456
457
458
#endif
         return;
      }
459

julien.delange's avatar
julien.delange committed
460
      reuse = 1;
461
      setsockopt (nodes[id].socket, SOL_SOCKET, SO_REUSEADDR, &reuse, sizeof (reuse));
julien.delange's avatar
julien.delange committed
462
463
464

      sa.sin_addr.s_addr = htonl (INADDR_ANY);   /* We listen on all adresses */
      sa.sin_family = AF_INET;                   
465
      sa.sin_port = htons (ip_port);   /* Port provided by the generated code */
julien.delange's avatar
julien.delange committed
466

467
      if( bind( nodes[id].socket , ( struct sockaddr * ) &sa , sizeof( struct sockaddr_in ) ) < 0 )
julien.delange's avatar
julien.delange committed
468
469
      {
#ifdef __PO_HI_DEBUG
470
         __DEBUGMSG ("Unable to bind socket and port on socket %d\n", nodes[id].socket);
julien.delange's avatar
julien.delange committed
471
472
473
#endif
      }

474
      if( listen( nodes[id].socket , __PO_HI_NB_ENTITIES ) < 0 )
julien.delange's avatar
julien.delange committed
475
476
      {
#ifdef __PO_HI_DEBUG
477
         __DEBUGMSG ("Cannot listen on socket %d\n", nodes[id].socket);
julien.delange's avatar
julien.delange committed
478
#endif
479
      }
julien.delange's avatar
julien.delange committed
480
481
482
483
484
485
486
487
488
489

      /* 
       * Create the thread which receive all data from other
       * nodes. This thread will execute the function
       * __po_hi_receiver_task
       */

      __po_hi_initialize_add_task ();

      __po_hi_create_generic_task 
490
         (-1, 0,__PO_HI_MAX_PRIORITY, 0, __po_hi_sockets_poller);
491
492
493
   }

   /*
julien.delange's avatar
julien.delange committed
494
495
    * For each node in the sytem that may communicate with the current
    * node we create a socket. This socket will be used to send data.
496
    */
497
   for (dev = 0 ; dev < __PO_HI_NB_DEVICES ; dev++ )
498
   {
499
      if (dev == id)
500
      {
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
         continue;
      }

      __DEBUGMSG ("[DRIVER SOCKETS] Will initialize connection with device %d\n", dev);

      memset (ip_addr, '\0', 16);
      ip_port = 0;

      ipconf = (__po_hi_c_ip_conf_t*) __po_hi_get_device_configuration (dev);
      ip_port = (int)ipconf->port;

      __DEBUGMSG ("[DRIVER SOCKETS] Configuration for device %d, addr=%s, port=%d\n", dev, ipconf->address, ip_port);

      if (ip_port == 0)
      {
         __DEBUGMSG ("[DRIVER SOCKETS] Invalid remote port\n");
         continue;
      }

      while (1)
      {
         nodes[dev].socket = socket (AF_INET, SOCK_STREAM, 0);

         if (nodes[dev].socket == -1 )
525
         {
526
527
528
            __DEBUGMSG ("[DRIVER SOCKETS] Socket for dev %d is not created\n", dev);
            return;
         }
529

530
         __DEBUGMSG ("[DRIVER SOCKETS] Socket for dev %d created, value=%d\n", dev, nodes[dev].socket);
julien.delange's avatar
julien.delange committed
531

532
         hostinfo = gethostbyname ((char*)ipconf->address);
julien.delange's avatar
julien.delange committed
533

534
535
536
537
         if (hostinfo == NULL )
         {
            __DEBUGMSG ("[DRIVER SOCKETS] Error while getting host informations for device %d\n", dev);
         }
538

539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
         sa.sin_port = htons (ip_port);
         sa.sin_family = AF_INET;

         /* The following lines are used to copy the
          * hostinfo->h_length to the sa.sin_addr member. Most
          * of program use the memcpy to do that, but the
          * RT-POSIX profile we use forbid the use of this
          * function.  We use a loop instead to perform the
          * copy.  So, these lines replace the code :
          *
          * memcpy( (char*) &( sa.sin_addr ) , (char*)hostinfo->h_addr , hostinfo->h_length );
          */

         tmp = (char*) &(sa.sin_addr);
         for (i=0 ; i<hostinfo->h_length ; i++)
         {
            tmp[i] = hostinfo->h_addr[i];
         }
557

558
559
560
561
562
         /*
          * We try to connect on the remote host. We try every
          * second to connect on.
         __PO_HI_SET_SOCKET_TIMEOUT(nodes[dev].socket,5);
          */
563

564
565
566
         ret = connect (nodes[dev].socket, 
                        (struct sockaddr*) &sa ,
                        sizeof (struct sockaddr_in));
julien.delange's avatar
julien.delange committed
567

568
569
         if (ret == 0)
         {
julien.delange's avatar
julien.delange committed
570

571
572
            __DEBUGMSG ("[DRIVER SOCKETS] Send my id (%d)\n", id);
            if (write (nodes[dev].socket, &id, sizeof (__po_hi_device_id)) != sizeof (__po_hi_device_id))
julien.delange's avatar
julien.delange committed
573
            {
574
               __DEBUGMSG ("[DRIVER SOCKETS] Device %d cannot send his id\n", id);
julien.delange's avatar
julien.delange committed
575
            }
576
577
578
579
580
581
582
            __DEBUGMSG ("[DRIVER SOCKETS] Connection established with device %d, socket=%d\n", dev, nodes[dev].socket);
            break;
         }
         else
         {
            __DEBUGMSG ("connect() failed, return=%d\n", ret);
         }
julien.delange's avatar
julien.delange committed
583

584
585
586
         if (close (nodes[dev].socket))
         {
            __DEBUGMSG ("[DRIVER SOCKETS] Cannot close socket %d\n", nodes[dev].socket);
587
         }
julien.delange's avatar
julien.delange committed
588

589
590
591
592
         /*
          * We wait 500ms each time we try to connect on the
          * remote host
          */
593

594
595
596
597
598
         __po_hi_get_time (&mytime);
         __DEBUGMSG ("[DRIVER SOCKETS] Cannot connect on device %d, wait 500ms\n", dev);
         __po_hi_delay_until (__po_hi_add_times (mytime, __po_hi_milliseconds (500)));
      }
   }
599

600
}
601

602
603
#endif