2986fdf6af9d0cf329900b6878e4b4f56fd6ebdc
[oweals/gnunet.git] / src / psyc / test_psyc.c
1 /*
2  * This file is part of GNUnet
3  * (C) 2013 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 3, 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 /**
22  * @file psyc/test_psyc.c
23  * @brief Test for the PSYC service.
24  * @author Gabor X Toth
25  * @author Christian Grothoff
26  */
27
28 #include "platform.h"
29 #include "gnunet_crypto_lib.h"
30 #include "gnunet_common.h"
31 #include "gnunet_util_lib.h"
32 #include "gnunet_testing_lib.h"
33 #include "gnunet_env_lib.h"
34 #include "gnunet_psyc_service.h"
35
36 #define TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 10)
37
38 #define DEBUG_SERVICE 1
39
40
41 /**
42  * Return value from 'main'.
43  */
44 static int res;
45
46 static const struct GNUNET_CONFIGURATION_Handle *cfg;
47
48 /**
49  * Handle for task for timeout termination.
50  */
51 static GNUNET_SCHEDULER_TaskIdentifier end_badly_task;
52
53 static struct GNUNET_PSYC_Master *mst;
54 static struct GNUNET_PSYC_Slave *slv;
55 static struct GNUNET_PSYC_Channel *ch;
56
57 static struct GNUNET_CRYPTO_EddsaPrivateKey *channel_key;
58 static struct GNUNET_CRYPTO_EddsaPrivateKey *slave_key;
59
60 static struct GNUNET_CRYPTO_EddsaPublicKey channel_pub_key;
61 static struct GNUNET_CRYPTO_EddsaPublicKey slave_pub_key;
62
63 struct GNUNET_PSYC_MasterTransmitHandle *mth;
64
65 /**
66  * Clean up all resources used.
67  */
68 static void
69 cleanup ()
70 {
71   if (mst != NULL)
72   {
73     GNUNET_PSYC_master_stop (mst);
74     mst = NULL;
75   }
76   GNUNET_SCHEDULER_shutdown ();
77 }
78
79
80 /**
81  * Terminate the testcase (failure).
82  *
83  * @param cls NULL
84  * @param tc scheduler context
85  */
86 static void
87 end_badly (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
88 {
89   res = 1;
90   cleanup ();
91 }
92
93
94 /**
95  * Terminate the testcase (success).
96  *
97  * @param cls NULL
98  * @param tc scheduler context
99  */
100 static void
101 end_normally (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
102 {
103   res = 0;
104   cleanup ();
105 }
106
107
108 /**
109  * Finish the testcase (successfully).
110  */
111 static void
112 end ()
113 {
114   if (end_badly_task != GNUNET_SCHEDULER_NO_TASK)
115   {
116     GNUNET_SCHEDULER_cancel (end_badly_task);
117     end_badly_task = GNUNET_SCHEDULER_NO_TASK;
118   }
119   GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_UNIT_MILLISECONDS,
120                                 &end_normally, NULL);
121 }
122
123
124 static int
125 method (void *cls, const struct GNUNET_CRYPTO_EddsaPublicKey *slave_key,
126         uint64_t message_id, const char *name,
127         size_t modifier_count, const struct GNUNET_ENV_Modifier *modifiers,
128         uint64_t data_offset, const void *data, size_t data_size,
129         enum GNUNET_PSYC_MessageFlags flags)
130 {
131   GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
132               "Method: %s, modifiers: %lu, flags: %u\n%.*s\n",
133               name, modifier_count, flags, data_size, data);
134   return GNUNET_OK;
135 }
136
137
138 static int
139 join (void *cls, const struct GNUNET_CRYPTO_EddsaPublicKey *slave_key,
140       const char *method_name,
141       size_t variable_count, const struct GNUNET_ENV_Modifier *variables,
142       const void *data, size_t data_size, struct GNUNET_PSYC_JoinHandle *jh)
143 {
144   return GNUNET_OK;
145 }
146
147
148 struct TransmitClosure
149 {
150   struct GNUNET_PSYC_MasterTransmitHandle *handle;
151   uint8_t n;
152   uint8_t paused;
153   uint8_t fragment_count;
154   char *fragments[16];
155   uint16_t fragment_sizes[16];
156 };
157
158
159 static void
160 transmit_resume (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
161 {
162   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Transmission resumed.\n");
163   struct TransmitClosure *tmit = cls;
164   tmit->paused = GNUNET_NO;
165   GNUNET_PSYC_master_transmit_resume (tmit->handle);
166 }
167
168
169 static int
170 transmit_notify (void *cls, size_t *data_size, void *data)
171 {
172   struct TransmitClosure *tmit = cls;
173   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
174               "Transmit notify: %lu bytes available, "
175               "processing fragment %u/%u.\n",
176               *data_size, tmit->n + 1, tmit->fragment_count);
177   GNUNET_assert (tmit->fragment_sizes[tmit->n] <= *data_size);
178
179   if (GNUNET_YES == tmit->paused && tmit->n == tmit->fragment_count - 1)
180   {
181     /* Send last fragment later. */
182     GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Transmission paused.\n");
183     tmit->paused = GNUNET_YES;
184     GNUNET_SCHEDULER_add_delayed (GNUNET_TIME_relative_multiply
185                                   (GNUNET_TIME_UNIT_SECONDS, 3),
186                                   &transmit_resume, tmit);
187     *data_size = 0;
188     return GNUNET_NO;
189   }
190
191   GNUNET_assert (tmit->fragment_sizes[tmit->n] <= *data_size);
192   *data_size = tmit->fragment_sizes[tmit->n];
193   memcpy (data, tmit->fragments[tmit->n], *data_size);
194
195   return ++tmit->n < tmit->fragment_count ? GNUNET_NO : GNUNET_YES;
196 }
197
198 void
199 master_started (void *cls, uint64_t max_message_id)
200 {
201   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
202               "Master started: %lu\n", max_message_id);
203
204   struct GNUNET_ENV_Environment *env = GNUNET_ENV_environment_create ();
205   GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
206                                   "_foo", "bar baz", 7);
207   GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
208                                   "_foo_bar", "foo bar baz", 11);
209
210   struct TransmitClosure *tmit = GNUNET_new (struct TransmitClosure);
211   tmit->fragment_count = 3;
212   tmit->fragments[0] = "foo";
213   tmit->fragment_sizes[0] = 4;
214   tmit->fragments[1] = "foo bar";
215   tmit->fragment_sizes[1] = 7;
216   tmit->fragments[2] = "foo bar baz";
217   tmit->fragment_sizes[2] = 11;
218   tmit->handle
219     = GNUNET_PSYC_master_transmit (mst, "_test", env, transmit_notify, tmit,
220                                    GNUNET_PSYC_MASTER_TRANSMIT_INC_GROUP_GEN);
221 }
222
223
224 void
225 slave_joined (void *cls, uint64_t max_message_id)
226 {
227   GNUNET_log (GNUNET_ERROR_TYPE_WARNING, "Slave joined: %lu\n", max_message_id);
228 }
229
230
231 /**
232  * Main function of the test, run from scheduler.
233  *
234  * @param cls NULL
235  * @param cfg configuration we use (also to connect to PSYC service)
236  * @param peer handle to access more of the peer (not used)
237  */
238 static void
239 #if DEBUG_SERVICE
240 run (void *cls, char *const *args, const char *cfgfile,
241      const struct GNUNET_CONFIGURATION_Handle *c)
242 #else
243 run (void *cls,
244      const struct GNUNET_CONFIGURATION_Handle *c,
245      struct GNUNET_TESTING_Peer *peer)
246 #endif
247 {
248   cfg = c;
249   end_badly_task = GNUNET_SCHEDULER_add_delayed (TIMEOUT, &end_badly, NULL);
250
251   channel_key = GNUNET_CRYPTO_eddsa_key_create ();
252   slave_key = GNUNET_CRYPTO_eddsa_key_create ();
253
254   GNUNET_CRYPTO_eddsa_key_get_public (channel_key, &channel_pub_key);
255   GNUNET_CRYPTO_eddsa_key_get_public (slave_key, &slave_pub_key);
256
257   mst = GNUNET_PSYC_master_start (cfg, channel_key,
258                                   GNUNET_PSYC_CHANNEL_PRIVATE,
259                                   &method, &join, &master_started, NULL);
260   return;
261   struct GNUNET_PeerIdentity origin;
262   struct GNUNET_PeerIdentity relays[16];
263   struct GNUNET_ENV_Environment *env = GNUNET_ENV_environment_create ();
264   GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
265                                   "_foo", "bar baz", 7);
266   GNUNET_ENV_environment_add_mod (env, GNUNET_ENV_OP_ASSIGN,
267                                   "_foo_bar", "foo bar baz", 11);
268   slv = GNUNET_PSYC_slave_join (cfg, &channel_pub_key, slave_key, &origin,
269                                 16, relays, &method, &join, &slave_joined,
270                                 NULL, "_request_join", env, "some data", 9);
271   GNUNET_ENV_environment_destroy (env);
272 }
273
274
275 int
276 main (int argc, char *argv[])
277 {
278   res = 1;
279 #if DEBUG_SERVICE
280   const struct GNUNET_GETOPT_CommandLineOption opts[] = {
281     GNUNET_GETOPT_OPTION_END
282   };
283   if (GNUNET_OK != GNUNET_PROGRAM_run (argc, argv, "test-psyc",
284                                        "test-psyc [options]",
285                                        opts, &run, NULL))
286     return 1;
287 #else
288   if (0 != GNUNET_TESTING_service_run ("test-psyc", "psyc",
289                                        "test_psyc.conf", &run, NULL))
290     return 1;
291 #endif
292   return res;
293 }
294
295 /* end of test_psyc.c */