(no commit message)
[oweals/gnunet.git] / src / transport / test_plugin_transport_http.c
1 /*
2      This file is part of GNUnet.
3      (C) 2010 Christian Grothoff (and other contributing authors)
4
5      GNUnet is free software; you can redistribute it and/or modify
6      it under the terms of the GNU General Public License as published
7      by the Free Software Foundation; either version 2, or (at your
8      option) any later version.
9
10      GNUnet is distributed in the hope that it will be useful, but
11      WITHOUT ANY WARRANTY; without even the implied warranty of
12      MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13      General Public License for more details.
14
15      You should have received a copy of the GNU General Public License
16      along with GNUnet; see the file COPYING.  If not, write to the
17      Free Software Foundation, Inc., 59 Temple Place - Suite 330,
18      Boston, MA 02111-1307, USA.
19 */
20 /**
21  * @file transport/test_plugin_transport_http.c
22  * @brief testcase for plugin_transport_http.c
23  * @author Matthias Wachs
24  */
25
26 #include "platform.h"
27 #include "gnunet_constants.h"
28 #include "gnunet_common.h"
29 #include "gnunet_getopt_lib.h"
30 #include "gnunet_hello_lib.h"
31 #include "gnunet_os_lib.h"
32 #include "gnunet_peerinfo_service.h"
33 #include "gnunet_plugin_lib.h"
34 #include "gnunet_protocols.h"
35 #include "gnunet_program_lib.h"
36 #include "gnunet_signatures.h"
37 #include "gnunet_service_lib.h"
38 #include "gnunet_crypto_lib.h"
39
40 #include "plugin_transport.h"
41 #include "gnunet_statistics_service.h"
42 #include "transport.h"
43 #include <curl/curl.h>
44
45 #define VERBOSE GNUNET_YES
46 #define DEBUG GNUNET_NO
47 #define DEBUG_CURL GNUNET_NO
48 #define HTTP_BUFFER_SIZE 2048
49
50 #define PLUGIN libgnunet_plugin_transport_template
51
52 /**
53  * How long until we give up on transmitting the message?
54  */
55 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 90)
56
57 /**
58  * How long until we give up on transmitting the message?
59  */
60 #define TEST_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 10)
61
62 /**
63  * How long between recieve and send?
64  */
65 #define WAIT_INTERVALL GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 1)
66
67
68
69 /**
70  *  Struct for plugin addresses
71  */
72 struct Plugin_Address
73 {
74   /**
75    * Next field for linked list
76    */
77   struct Plugin_Address * next;
78
79   /**
80    * buffer containing data to send
81    */
82   void * addr;
83
84   /**
85    * amount of data to sent
86    */
87   size_t addrlen;
88 };
89
90 /**
91  *  Message to send using http
92  */
93 struct HTTP_Message
94 {
95   /**
96    * buffer
97    */
98   unsigned char buf[HTTP_BUFFER_SIZE];
99
100   /**
101    * current position in buffer
102    */
103   size_t pos;
104
105   /**
106    * buffer size
107    */
108   size_t size;
109
110   /**
111    * data size
112    */
113   size_t len;
114 };
115
116
117 /**
118  *  Struct for plugin addresses
119  */
120 struct HTTP_Transfer
121 {
122   /**
123    * amount of bytes we recieved
124    */
125   size_t data_size;
126
127   /**
128    * buffer for http transfers
129    */
130   unsigned char buf[HTTP_BUFFER_SIZE];
131
132   /**
133    * buffer size this transfer
134    */
135   size_t size;
136
137   /**
138    * amount of bytes we recieved
139    */
140   size_t pos;
141
142   /**
143    * HTTP Header result for transfer
144    */
145   unsigned int http_result_code;
146
147   /**
148    * did the test fail?
149    */
150   unsigned int test_failed;
151
152   /**
153    * was this test already executed?
154    */
155   unsigned int test_executed;
156 };
157
158
159 /**
160  * Network format for IPv4 addresses.
161  */
162 struct IPv4HttpAddress
163 {
164   /**
165    * IPv4 address, in network byte order.
166    */
167   uint32_t ipv4_addr;
168
169   /**
170    * Port number, in network byte order.
171    */
172   uint16_t u_port;
173
174 };
175
176
177 /**
178  * Network format for IPv6 addresses.
179  */
180 struct IPv6HttpAddress
181 {
182   /**
183    * IPv6 address.
184    */
185   struct in6_addr ipv6_addr;
186
187   /**
188    * Port number, in network byte order.
189    */
190   uint16_t u6_port;
191
192 };
193
194
195 /**
196  * Our public key.
197  */
198 /* static struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded my_public_key; */
199
200 /**
201  * Our public key.
202  */
203 static struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded my_public_key;
204
205 /**
206  * Our identity.
207  */
208 static struct GNUNET_PeerIdentity my_identity;
209
210 /**
211  * Our private key.
212  */
213 static struct GNUNET_CRYPTO_RsaPrivateKey *my_private_key;
214
215 /**
216  * Peer's port
217  */
218 static long long unsigned int port;
219
220 /**
221  * Our scheduler.
222  */
223 struct GNUNET_SCHEDULER_Handle *sched;
224
225 /**
226  * Our statistics handle.
227  */
228 struct GNUNET_STATISTICS_Handle *stats;
229
230
231 /**
232  * Our configuration.
233  */
234 const struct GNUNET_CONFIGURATION_Handle *cfg;
235
236 /**
237  * Number of neighbours we'd like to have.
238  */
239 static uint32_t max_connect_per_transport;
240
241 /**
242  * Environment for this plugin.
243  */
244 static struct GNUNET_TRANSPORT_PluginEnvironment env;
245
246 /**
247  *handle for the api provided by this plugin
248  */
249 static struct GNUNET_TRANSPORT_PluginFunctions *api;
250
251 /**
252  * ID of the task controlling the testcase timeout
253  */
254 static GNUNET_SCHEDULER_TaskIdentifier ti_timeout;
255
256 static GNUNET_SCHEDULER_TaskIdentifier ti_send;
257
258 const struct GNUNET_PeerIdentity * p;
259
260 /**
261  * buffer for data to send
262  */
263 static struct HTTP_Message buffer_out;
264
265 /**
266  * buffer for data to recieve
267  */
268 static struct HTTP_Message buffer_in;
269
270
271 struct Plugin_Address * addr_head;
272
273 /**
274  * Did the test pass or fail?
275  */
276 static int fail_notify_address;
277 /**
278  * Did the test pass or fail?
279  */
280 static int fail_notify_address_count;
281
282 /**
283  * Did the test pass or fail?
284  */
285 static int fail_pretty_printer;
286
287 /**
288  * Did the test pass or fail?
289  */
290 static int fail_pretty_printer_count;
291
292 /**
293  * Did the test pass or fail?
294  */
295 static int fail_addr_to_str;
296
297 /**
298  * Test: connect to peer without peer identification
299  */
300 static struct HTTP_Transfer test_no_ident;
301
302 /**
303  * Test: connect to peer without peer identification
304  */
305 static struct HTTP_Transfer test_too_short_ident;
306
307 /**
308  * Test: connect to peer without peer identification
309  */
310 static struct HTTP_Transfer test_too_long_ident;
311
312 /**
313  * Test: connect to peer and send message bigger then content length
314  */
315 static struct HTTP_Transfer test_msg_too_big;
316
317 /**
318  * Test: connect to peer and send message bigger GNUNET_SERVER_MAX_MESSAGE_SIZE
319  */
320 //static struct HTTP_Transfer test_msg_bigger_max;
321
322 /**
323  * Test: connect to peer and send message smaller then content length
324  */
325 //static struct HTTP_Transfer test_msg_too_small;
326
327 /**
328  * Test: connect to peer with valid peer identification
329  */
330 static struct HTTP_Transfer test_valid_ident;
331
332 /**
333  * Did the test pass or fail?
334  */
335 static int fail;
336
337 /**
338  * Recieved message already returned to sender?
339  */
340 static int sent;
341
342 CURL *curl_handle;
343
344 /**
345  * cURL Multihandle
346  */
347 static CURLM *multi_handle;
348
349 /**
350  * The task sending data
351  */
352 static GNUNET_SCHEDULER_TaskIdentifier http_task_send;
353
354 /**
355  * Shutdown testcase
356  */
357 static void
358 shutdown_clean ()
359 {
360
361   /* Evaluate results  */
362   if ((fail_notify_address == GNUNET_NO) && (fail_pretty_printer == GNUNET_NO) && (fail_addr_to_str == GNUNET_NO) &&
363       (test_no_ident.test_failed == GNUNET_NO) && (test_too_short_ident.test_failed == GNUNET_NO) && (test_too_long_ident.test_failed == GNUNET_NO) &&
364       (test_valid_ident.test_failed == GNUNET_NO))
365   {
366     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Tests successful\n");
367     fail = 0;
368   }
369   else
370   {
371     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Tests failed\n");
372     fail = 1;
373   }
374
375   curl_multi_cleanup(multi_handle);
376
377   if (NULL != curl_handle)
378     curl_easy_cleanup (curl_handle);
379
380
381   if (ti_send != GNUNET_SCHEDULER_NO_TASK)
382   {
383     GNUNET_SCHEDULER_cancel(sched,ti_send);
384     ti_send = GNUNET_SCHEDULER_NO_TASK;
385   }
386
387   if (http_task_send != GNUNET_SCHEDULER_NO_TASK)
388   {
389     GNUNET_SCHEDULER_cancel(sched,http_task_send);
390     http_task_send = GNUNET_SCHEDULER_NO_TASK;
391   }
392
393   if (ti_timeout != GNUNET_SCHEDULER_NO_TASK)
394   {
395     GNUNET_SCHEDULER_cancel(sched,ti_timeout);
396     ti_timeout = GNUNET_SCHEDULER_NO_TASK;
397   }
398   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Unloading http plugin\n");
399   GNUNET_assert (NULL == GNUNET_PLUGIN_unload ("libgnunet_plugin_transport_http", api));
400
401   GNUNET_SCHEDULER_shutdown(sched);
402
403   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Exiting testcase\n");
404   exit(fail);
405   return;
406 }
407
408
409 #if 0
410 /**
411  * Continuation called after plugin send message
412  * @cls closure
413  * @target target
414  * @result GNUNET_OK or GNUNET_SYSERR
415  */
416 static void task_send_cont (void *cls,
417                             const struct GNUNET_PeerIdentity * target,
418                             int result)
419 {
420   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Message was sent!\n");
421   fail = GNUNET_NO;
422   shutdown_clean();
423 }
424 #endif
425
426 /**
427  * Task sending recieved message back to peer
428  * @cls closure
429  * @tc task context
430  */
431
432 static void
433 task_send (void *cls,
434             const struct GNUNET_SCHEDULER_TaskContext *tc)
435 {
436   ti_timeout = GNUNET_SCHEDULER_NO_TASK;
437   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
438     return;
439
440   if (GNUNET_YES==sent)
441     return;
442 /*
443   struct GNUNET_MessageHeader * msg = cls;
444   unsigned int len = ntohs(msg->size);
445   const char * msgc = (const char *) msg;
446
447   api->send(api->cls, p, msgc, len, 0, TIMEOUT, NULL,NULL, 0, GNUNET_NO, &task_send_cont, NULL);
448   */
449   sent = GNUNET_YES;
450 }
451
452
453 /**
454  * Recieves messages from plugin, in real world transport
455  */
456 static struct GNUNET_TIME_Relative
457 receive (void *cls,
458          const struct GNUNET_PeerIdentity * peer,
459          const struct GNUNET_MessageHeader * message,
460          uint32_t distance,
461          struct Session *session,
462          const char *sender_address,
463          uint16_t sender_address_len)
464 {
465   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Testcase recieved new message from peer `%s' with type %u and length %u\n",  GNUNET_i2s(peer),ntohs(message->type),ntohs(message->size));
466
467   /* take recieved message and send it back to peer */
468
469
470   p = peer;
471   void * c = (void *) message;
472   ti_send =GNUNET_SCHEDULER_add_delayed (sched, WAIT_INTERVALL, &task_send, c);
473
474   return GNUNET_TIME_UNIT_ZERO;
475 }
476
477 static size_t send_function (void *stream, size_t size, size_t nmemb, void *ptr)
478 {
479   unsigned int len;
480   struct HTTP_Transfer * test = (struct HTTP_Transfer *) ptr;
481
482   len = buffer_out.len;
483
484   if (test == &test_msg_too_big)
485   {
486     if (buffer_out.pos > len)
487       return 0;
488     if ( (2*len) < (size * nmemb))
489       memcpy(stream, buffer_out.buf,  2* len);
490     buffer_out.pos = 2* len;
491     return 2* len;
492   }
493
494   if (( buffer_out.pos == len) || (len > (size * nmemb)))
495     return 0;
496   memcpy(stream, buffer_out.buf, len);
497   buffer_out.pos = len;
498   return len;
499 }
500
501 static size_t recv_function (void *ptr, size_t size, size_t nmemb, void *ctx)
502 {
503
504   if (buffer_in.pos + size * nmemb > buffer_in.size)
505     return 0;                   /* overflow */
506
507   buffer_in.len = size * nmemb;
508   memcpy (&buffer_in.buf[buffer_in.pos], ptr, size * nmemb);
509   buffer_in.pos += size * nmemb;
510   buffer_in.len = buffer_in.pos;
511   buffer_in.buf[buffer_in.pos] = '\0';
512   return buffer_in.pos;
513 }
514
515 static size_t header_function( void *ptr, size_t size, size_t nmemb, void *stream)
516 {
517   struct HTTP_Transfer * res = (struct HTTP_Transfer *) stream;
518   char * tmp;
519   unsigned int len = size * nmemb;
520
521   tmp = GNUNET_malloc (  len+1 );
522   memcpy(tmp,ptr,len);
523   if (tmp[len-2] == 13)
524     tmp[len-2]= '\0';
525 #if DEBUG_CURL
526   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Header: `%s'\n",tmp);
527 #endif
528   if (0==strcmp (tmp,"HTTP/1.1 100 Continue"))
529   {
530     res->http_result_code=100;
531   }
532   if (0==strcmp (tmp,"HTTP/1.1 200 OK"))
533   {
534     res->http_result_code=200;
535   }
536   if (0==strcmp (tmp,"HTTP/1.1 400 Bad Request"))
537   {
538     res->http_result_code=400;
539   }
540   if (0==strcmp (tmp,"HTTP/1.1 404 Not Found"))
541   {
542     res->http_result_code=404;
543   }
544   if (0==strcmp (tmp,"HTTP/1.1 413 Request entity too large"))
545   {
546     res->http_result_code=413;
547   }
548
549   GNUNET_free (tmp);
550   return size * nmemb;
551 }
552
553 static size_t send_prepare( struct HTTP_Transfer * result);
554
555 static void run_connection_tests( void );
556
557 static void send_execute (void *cls,
558              const struct GNUNET_SCHEDULER_TaskContext *tc)
559 {
560   struct HTTP_Transfer *res;
561
562   int running;
563   struct CURLMsg *msg;
564   CURLMcode mret;
565
566   res = (struct HTTP_Transfer *) cls;
567   http_task_send = GNUNET_SCHEDULER_NO_TASK;
568   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
569     return;
570
571   do
572     {
573       running = 0;
574       mret = curl_multi_perform (multi_handle, &running);
575       if (running == 0)
576         {
577           do
578             {
579
580               msg = curl_multi_info_read (multi_handle, &running);
581               GNUNET_break (msg != NULL);
582               if (msg == NULL)
583                 break;
584               /* get session for affected curl handle */
585               //cs = find_session_by_curlhandle (msg->easy_handle);
586               //GNUNET_assert ( cs != NULL );
587               switch (msg->msg)
588                 {
589
590                 case CURLMSG_DONE:
591                   if ( (msg->data.result != CURLE_OK) &&
592                        (msg->data.result != CURLE_GOT_NOTHING) )
593                     {
594
595                     GNUNET_log(GNUNET_ERROR_TYPE_INFO,
596                                _("curl failed for `%s' at %s:%d: `%s'\n"),
597                                "curl_multi_perform",
598                                __FILE__,
599                                __LINE__,
600                                curl_easy_strerror (msg->data.result));
601                     /* sending msg failed*/
602                     }
603                   if (res == &test_no_ident)
604                   {
605                     if  ((res->http_result_code==404) && (buffer_in.len==208))
606                     {
607                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer without any peer identification: test passed\n"));
608                       res->test_failed = GNUNET_NO;
609                     }
610                     else
611                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer without any peer identification: test failed\n"));
612                   }
613                   if (res == &test_too_short_ident)
614                   {
615                     if  ((res->http_result_code==404) && (buffer_in.len==208))
616                     {
617                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with too short peer identification: test passed\n"));
618                       res->test_failed = GNUNET_NO;
619                     }
620                     else
621                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with too short peer identification: test failed\n"));
622                   }
623                   if (res == &test_too_long_ident)
624                   {
625                     if  ((res->http_result_code==404) && (buffer_in.len==208))
626                       {
627                         GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with too long peer identification: test passed\n"));
628                       res->test_failed = GNUNET_NO;
629                       }
630                     else
631                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with too long peer identification: test failed\n"));
632                   }
633                   if (res == &test_valid_ident)
634                   {
635                     if  ((res->http_result_code==400))
636                     {
637                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with valid peer identification: test passed\n"));
638                       res->test_failed = GNUNET_NO;
639                     }
640                     else
641                       GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with valid peer identification: test failed\n"));
642                   }
643                   curl_easy_cleanup(curl_handle);
644                   curl_handle=NULL;
645
646                   run_connection_tests();
647                   return;
648                 default:
649                   break;
650                 }
651
652             }
653           while ( (running > 0) );
654         }
655     }
656   while (mret == CURLM_CALL_MULTI_PERFORM);
657   send_prepare(cls);
658 }
659
660 /**
661  * Function setting up file descriptors and scheduling task to run
662  * @param ses session to send data to
663  * @return bytes sent to peer
664  */
665 static size_t send_prepare( struct HTTP_Transfer * result)
666 {
667   fd_set rs;
668   fd_set ws;
669   fd_set es;
670   int max;
671   struct GNUNET_NETWORK_FDSet *grs;
672   struct GNUNET_NETWORK_FDSet *gws;
673   long to;
674   CURLMcode mret;
675
676   max = -1;
677   FD_ZERO (&rs);
678   FD_ZERO (&ws);
679   FD_ZERO (&es);
680   mret = curl_multi_fdset (multi_handle, &rs, &ws, &es, &max);
681   if (mret != CURLM_OK)
682     {
683       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
684                   _("%s failed at %s:%d: `%s'\n"),
685                   "curl_multi_fdset", __FILE__, __LINE__,
686                   curl_multi_strerror (mret));
687       return -1;
688     }
689   mret = curl_multi_timeout (multi_handle, &to);
690   if (mret != CURLM_OK)
691     {
692       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
693                   _("%s failed at %s:%d: `%s'\n"),
694                   "curl_multi_timeout", __FILE__, __LINE__,
695                   curl_multi_strerror (mret));
696       return -1;
697     }
698
699   grs = GNUNET_NETWORK_fdset_create ();
700   gws = GNUNET_NETWORK_fdset_create ();
701   GNUNET_NETWORK_fdset_copy_native (grs, &rs, max + 1);
702   GNUNET_NETWORK_fdset_copy_native (gws, &ws, max + 1);
703   http_task_send = GNUNET_SCHEDULER_add_select (sched,
704                                    GNUNET_SCHEDULER_PRIORITY_DEFAULT,
705                                    GNUNET_SCHEDULER_NO_TASK,
706                                    GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 0),
707                                    grs,
708                                    gws,
709                                    &send_execute,
710                                    result);
711   GNUNET_NETWORK_fdset_destroy (gws);
712   GNUNET_NETWORK_fdset_destroy (grs);
713
714   /* FIXME: return bytes REALLY sent */
715   return 0;
716 }
717
718 /**
719  * function to send data to server
720  */
721 static int send_data( struct HTTP_Transfer * result, char * url)
722 {
723
724   curl_handle = curl_easy_init();
725   if( NULL == curl_handle)
726   {
727     printf("easy_init failed \n");
728     return GNUNET_SYSERR;
729   }
730 #if DEBUG_CURL
731   curl_easy_setopt(curl_handle, CURLOPT_VERBOSE, 1L);
732 #endif
733   curl_easy_setopt(curl_handle, CURLOPT_URL, url);
734   curl_easy_setopt(curl_handle, CURLOPT_PUT, 1L);
735   curl_easy_setopt (curl_handle, CURLOPT_HEADERFUNCTION, &header_function);
736   curl_easy_setopt (curl_handle, CURLOPT_WRITEHEADER, result);
737   curl_easy_setopt (curl_handle, CURLOPT_WRITEFUNCTION, &recv_function);
738   curl_easy_setopt (curl_handle, CURLOPT_WRITEDATA, result);
739   curl_easy_setopt (curl_handle, CURLOPT_READFUNCTION, &send_function);
740   curl_easy_setopt (curl_handle, CURLOPT_READDATA, result);
741   curl_easy_setopt(curl_handle, CURLOPT_INFILESIZE_LARGE, (curl_off_t) buffer_out.len);
742   curl_easy_setopt(curl_handle, CURLOPT_TIMEOUT, 30);
743   curl_easy_setopt(curl_handle, CURLOPT_CONNECTTIMEOUT, 20);
744
745   curl_multi_add_handle(multi_handle, curl_handle);
746
747   send_prepare(result);
748
749   return GNUNET_OK;
750 }
751
752
753 /**
754  * Plugin notifies transport (aka testcase) about its addresses
755  */
756 void
757 notify_address (void *cls,
758                 const char *name,
759                 const void *addr,
760                 uint16_t addrlen,
761                 struct GNUNET_TIME_Relative expires)
762 {
763   char address[INET6_ADDRSTRLEN];
764   unsigned int port;
765   struct Plugin_Address * pl_addr;
766   struct Plugin_Address * cur;
767
768   if (addrlen == (sizeof (struct IPv4HttpAddress)))
769     {
770       inet_ntop(AF_INET, (struct in_addr *) addr,address,INET_ADDRSTRLEN);
771       port = ntohs(((struct IPv4HttpAddress *) addr)->u_port);
772     }
773   else if (addrlen == (sizeof (struct IPv6HttpAddress)))
774     {
775       inet_ntop(AF_INET6, (struct in6_addr *) addr,address,INET6_ADDRSTRLEN);
776       port = ntohs(((struct IPv6HttpAddress *) addr)->u6_port);
777     }
778   else
779     {
780       GNUNET_break (0);
781       return;
782     }
783   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, 
784               _("Transport plugin notification for address: `%s':%u\n"),
785               address,
786               port);
787   pl_addr = GNUNET_malloc (sizeof (struct Plugin_Address) );
788   pl_addr->addrlen = addrlen;
789   pl_addr->addr = GNUNET_malloc(addrlen);
790   memcpy(pl_addr->addr,addr,addrlen);
791   pl_addr->next = NULL;
792
793   if ( NULL == addr_head)
794     {
795       addr_head = pl_addr;
796     }
797   else
798     {
799       cur = addr_head;
800       while (NULL != cur->next)
801         {
802           cur = cur->next;
803         }
804       cur->next = pl_addr;
805     }
806   fail_notify_address_count++;
807   fail_notify_address = GNUNET_NO;
808 }
809
810 /**
811  * Setup plugin environment
812  */
813 static void
814 setup_plugin_environment ()
815 {
816   env.cfg = cfg;
817   env.sched = sched;
818   env.stats = stats;
819   env.my_identity = &my_identity;
820   env.cls = &env;
821   env.receive = &receive;
822   env.notify_address = &notify_address;
823   env.max_connections = max_connect_per_transport;
824 }
825
826
827 /**
828  * Task shutting down testcase if it a timeout occurs
829  */
830 static void
831 task_timeout (void *cls,
832             const struct GNUNET_SCHEDULER_TaskContext *tc)
833 {
834   ti_timeout = GNUNET_SCHEDULER_NO_TASK;
835   if (0 != (tc->reason & GNUNET_SCHEDULER_REASON_SHUTDOWN))
836     return;
837
838   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Testcase timeout\n");
839   fail = GNUNET_YES;
840   shutdown_clean();
841   return;
842 }
843
844 static void pretty_printer_cb (void *cls,
845                                const char *address)
846 {
847   if (NULL==address)
848     return;
849   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,"Plugin returned pretty address: `%s'\n",address);
850   fail_pretty_printer_count++;
851 }
852
853 /**
854  * Runs every single test to test the plugin
855  */
856 static void run_connection_tests( void )
857 {
858   char * host_str;
859
860   /* resetting buffers */
861   buffer_in.size = HTTP_BUFFER_SIZE;
862   buffer_in.pos = 0;
863   buffer_in.len = 0;
864
865   buffer_out.size = HTTP_BUFFER_SIZE;
866   buffer_out.pos = 0;
867   buffer_out.len = 0;
868
869
870   if (test_no_ident.test_executed == GNUNET_NO)
871   {
872     /* Connecting to peer without identification */
873     host_str = GNUNET_malloc (strlen ("http://localhost:12389/")+1);
874     GNUNET_asprintf (&host_str, "http://localhost:%u/",port);
875     GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer without any peer identification.\n"));
876     test_no_ident.test_executed = GNUNET_YES;
877     send_data ( &test_no_ident, host_str);
878     GNUNET_free (host_str);
879
880     return;
881   }
882
883   if (test_too_short_ident.test_executed == GNUNET_NO)
884   {
885     char * ident = "AAAAAAAAAA";
886     /* Connecting to peer with too short identification */
887     host_str = GNUNET_malloc (strlen ("http://localhost:12389/") + strlen (ident));
888     GNUNET_asprintf (&host_str, "http://localhost:%u/%s",port,ident);
889     GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with too short peer identification.\n"));
890     test_too_short_ident.test_executed = GNUNET_YES;
891     send_data ( &test_too_short_ident, host_str);
892     GNUNET_free (host_str);
893
894     return;
895   }
896
897   if (test_too_long_ident.test_executed == GNUNET_NO)
898   {
899     char * ident = "AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA";
900
901     /* Connecting to peer with too long identification */
902     host_str = GNUNET_malloc (strlen ("http://localhost:12389/") + strlen (ident));
903     GNUNET_asprintf (&host_str, "http://localhost:%u/%s",port,ident);
904
905     GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with too long peer identification.\n"));
906     test_too_long_ident.test_executed = GNUNET_YES;
907     send_data ( &test_too_long_ident, host_str);
908     GNUNET_free (host_str);
909
910     return;
911   }
912   if (test_valid_ident.test_executed == GNUNET_NO)
913   {
914     struct GNUNET_CRYPTO_HashAsciiEncoded result;
915
916     GNUNET_CRYPTO_hash_to_enc(&my_identity.hashPubKey,&result);
917     host_str = GNUNET_malloc (strlen ("http://localhost:12389/") + strlen ((const char *) &result));
918     GNUNET_asprintf (&host_str, "http://localhost:%u/%s",port,(char *) &result);
919
920     GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with valid peer identification.\n"));
921     test_valid_ident.test_executed = GNUNET_YES;
922     send_data ( &test_valid_ident, host_str);
923     GNUNET_free (host_str);
924
925     return;
926   }
927 /*
928   if (test_msg_too_big.test_executed == GNUNET_NO)
929   {
930     struct GNUNET_CRYPTO_HashAsciiEncoded result;
931     unsigned int c;
932
933     GNUNET_CRYPTO_hash_to_enc(&my_identity.hashPubKey,&result);
934     host_str = GNUNET_malloc (strlen ("http://localhost:12389/") + strlen ((const char *) &result));
935     GNUNET_asprintf (&host_str, "http://localhost:%u/%s",port,(char *) &result);
936
937     buffer_out.len = 50;
938     c = 0;
939     for (c=0; c<100; c++)
940       buffer_out.buf[c] = 'A';
941
942     GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Connecting to peer with message bigger content length.\n"));
943     test_msg_too_big.test_executed = GNUNET_YES;
944     send_data ( &test_msg_too_big, host_str);
945     GNUNET_free (host_str);
946
947     return;
948   }
949 */
950   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,"No more tests to run\n");
951   shutdown_clean();
952 }
953
954
955 /**
956  * Runs the test.
957  *
958  * @param cls closure
959  * @param s scheduler to use
960  * @param c configuration to use
961  */
962 static void
963 run (void *cls,
964      struct GNUNET_SCHEDULER_Handle *s,
965      char *const *args,
966      const char *cfgfile, const struct GNUNET_CONFIGURATION_Handle *c)
967 {
968   char * libname;
969   sched = s;
970   cfg = c;
971   char *keyfile;
972   unsigned long long tneigh;
973   struct Plugin_Address * cur;
974   struct Plugin_Address * tmp;
975   const char * addr_str;
976
977   unsigned int count_str_addr;
978   unsigned int suggest_res;
979
980   fail_pretty_printer = GNUNET_YES;
981   fail_notify_address = GNUNET_YES;
982   fail_addr_to_str = GNUNET_YES;
983
984   addr_head = NULL;
985   count_str_addr = 0;
986   /* parse configuration */
987   if ((GNUNET_OK !=
988        GNUNET_CONFIGURATION_get_value_number (c,
989                                               "TRANSPORT",
990                                               "NEIGHBOUR_LIMIT",
991                                               &tneigh)) ||
992       (GNUNET_OK !=
993        GNUNET_CONFIGURATION_get_value_filename (c,
994                                                 "GNUNETD",
995                                                 "HOSTKEY", &keyfile)))
996     {
997       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
998                   _
999                   ("Transport service is lacking key configuration settings.  Exiting.\n"));
1000       GNUNET_SCHEDULER_shutdown (s);
1001       fail = 1;
1002       return;
1003     }
1004
1005   if ((GNUNET_OK !=
1006       GNUNET_CONFIGURATION_get_value_number (cfg,
1007                                              "transport-http",
1008                                              "PORT",
1009                                              &port)) ||
1010      (port > 65535) )
1011   {
1012     GNUNET_log_from (GNUNET_ERROR_TYPE_ERROR,
1013                      "http",
1014                      _
1015                      ("Require valid port number for transport plugin `%s' in configuration!\n"),
1016                      "transport-http");
1017   }
1018   max_connect_per_transport = (uint32_t) tneigh;
1019   my_private_key = GNUNET_CRYPTO_rsa_key_create_from_file (keyfile);
1020   GNUNET_free (keyfile);
1021   if (my_private_key == NULL)
1022     {
1023       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1024                   _("Transport service could not access hostkey.  Exiting.\n"));
1025       GNUNET_SCHEDULER_shutdown (s);
1026       fail = 1;
1027       return;
1028     }
1029   GNUNET_CRYPTO_rsa_key_get_public (my_private_key, &my_public_key);
1030   GNUNET_CRYPTO_hash (&my_public_key,
1031                       sizeof (my_public_key), &my_identity.hashPubKey);
1032
1033   /* load plugins... */
1034   setup_plugin_environment ();
1035   GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Loading HTTP transport plugin `%s'\n"),"libgnunet_plugin_transport_http");
1036   GNUNET_asprintf (&libname, "libgnunet_plugin_transport_http");
1037   api = GNUNET_PLUGIN_load (libname, &env);
1038   GNUNET_free (libname);
1039   if (api == NULL)
1040   {
1041     GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
1042                 _("Failed to load transport plugin for http\n"));
1043     fail = 1;
1044     return;
1045   }
1046
1047   ti_timeout = GNUNET_SCHEDULER_add_delayed (sched, TEST_TIMEOUT, &task_timeout, NULL);
1048
1049   /* testing plugin functionality */
1050   GNUNET_assert (0!=fail_notify_address_count);
1051   GNUNET_log (GNUNET_ERROR_TYPE_INFO, _("Transport plugin returned %u addresses to connect to\n"),  fail_notify_address_count);
1052
1053   /* testing pretty printer with all addresses obtained from the plugin*/
1054   while (addr_head != NULL)
1055   {
1056     cur = addr_head;
1057
1058     api->address_pretty_printer (NULL,"http",cur->addr,cur->addrlen,GNUNET_NO,TEST_TIMEOUT,&pretty_printer_cb,NULL);
1059     addr_str = api->address_to_string (NULL,cur->addr,cur->addrlen);
1060     suggest_res = api->check_address (NULL,cur->addr,cur->addrlen);
1061
1062     GNUNET_assert (GNUNET_OK == suggest_res);
1063     GNUNET_assert (NULL != addr_str);
1064     count_str_addr++;
1065
1066     tmp = addr_head->next;
1067     GNUNET_free (addr_head->addr);
1068     GNUNET_free (addr_head);
1069     GNUNET_free ((char *) addr_str);
1070     addr_head=tmp;
1071   }
1072
1073
1074   GNUNET_assert (fail_pretty_printer_count==fail_notify_address_count);
1075   GNUNET_assert (fail_pretty_printer_count==count_str_addr);
1076   fail_pretty_printer=GNUNET_NO;
1077   fail_addr_to_str=GNUNET_NO;
1078
1079   /* Suggesting addresses with wrong port*/
1080   struct IPv4HttpAddress failing_addr;
1081   failing_addr.ipv4_addr = INADDR_LOOPBACK;
1082   failing_addr.u_port = 0;
1083   suggest_res = api->check_address (NULL,&failing_addr,sizeof (struct IPv4HttpAddress));
1084   GNUNET_assert (GNUNET_SYSERR == suggest_res);
1085
1086   /* Suggesting addresses with wrong size*/
1087   failing_addr.ipv4_addr = INADDR_LOOPBACK;
1088   failing_addr.u_port = 0;
1089   suggest_res = api->check_address (NULL,&failing_addr,sizeof (struct IPv6HttpAddress));
1090   GNUNET_assert (GNUNET_SYSERR == suggest_res);
1091
1092   /* Suggesting addresses with wrong address*/
1093   failing_addr.ipv4_addr = 0;
1094   failing_addr.u_port = 12389;
1095   suggest_res = api->check_address (NULL,&failing_addr,sizeof (struct IPv4HttpAddress));
1096   GNUNET_assert (GNUNET_SYSERR == suggest_res);
1097
1098   /* test sending to client */
1099   multi_handle = curl_multi_init();
1100
1101   /* Setting up buffers */
1102   buffer_in.size = HTTP_BUFFER_SIZE;
1103   buffer_in.pos = 0;
1104   buffer_in.len = 0;
1105
1106   buffer_out.size = HTTP_BUFFER_SIZE;
1107   buffer_out.pos = 0;
1108   buffer_out.len = 0;
1109
1110   /* Setting up connection tests */
1111
1112   /* Test: connecting without a peer identification */
1113   test_no_ident.test_executed = GNUNET_NO;
1114   test_no_ident.test_failed = GNUNET_YES;
1115
1116   /* Test: connecting with too short peer identification */
1117   test_too_short_ident.test_executed = GNUNET_NO;
1118   test_too_short_ident.test_failed = GNUNET_YES;
1119
1120   /* Test: connecting with too long peer identification */
1121   test_too_long_ident.test_executed = GNUNET_NO;
1122   test_too_long_ident.test_failed = GNUNET_YES;
1123
1124   /* Test: connecting with valid identification */
1125   test_valid_ident.test_executed = GNUNET_NO;
1126   test_valid_ident.test_failed = GNUNET_YES;
1127
1128   /* Test: connecting with valid identification */
1129   test_msg_too_big.test_executed = GNUNET_NO;
1130   test_msg_too_big.test_failed = GNUNET_YES;
1131
1132   run_connection_tests();
1133
1134   /* testing finished */
1135
1136   return;
1137 }
1138
1139
1140 /**
1141  * The main function for the transport service.
1142  *
1143  * @param argc number of arguments from the command line
1144  * @param argv command line arguments
1145  * @return 0 ok, 1 on error
1146  */
1147 int
1148 main (int argc, char *const *argv)
1149 {
1150
1151   static struct GNUNET_GETOPT_CommandLineOption options[] = {
1152     GNUNET_GETOPT_OPTION_END
1153   };
1154   int ret;
1155   char *const argv_prog[] = {
1156     "test_plugin_transport_http",
1157     "-c",
1158     "test_plugin_transport_data_http.conf",
1159     "-L",
1160 #if VERBOSE
1161     "DEBUG",
1162 #else
1163     "WARNING",
1164 #endif
1165     NULL
1166   };
1167   GNUNET_log_setup ("test_plugin_transport_http",
1168 #if VERBOSE
1169                     "DEBUG",
1170 #else
1171                     "WARNING",
1172 #endif
1173                     NULL);
1174
1175   ret = (GNUNET_OK ==
1176          GNUNET_PROGRAM_run (5,
1177                              argv_prog,
1178                              "test_plugin_transport_http",
1179                              "testcase", options, &run, NULL)) ? GNUNET_NO : GNUNET_YES;
1180
1181     GNUNET_DISK_directory_remove ("/tmp/test_plugin_transport_http");
1182
1183   return fail;
1184 }
1185
1186 /* end of test_plugin_transport_http.c */