GNUnet  0.11.x
gnunet-service-scalarproduct-ecc_alice.c
Go to the documentation of this file.
1 /*
2  This file is part of GNUnet.
3  Copyright (C) 2013-2017 GNUnet e.V.
4 
5  GNUnet is free software: you can redistribute it and/or modify it
6  under the terms of the GNU Affero General Public License as published
7  by the Free Software Foundation, either version 3 of the License,
8  or (at your 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  Affero General Public License for more details.
14 
15  You should have received a copy of the GNU Affero General Public License
16  along with this program. If not, see <http://www.gnu.org/licenses/>.
17 
18  SPDX-License-Identifier: AGPL3.0-or-later
19  */
26 #include "platform.h"
27 #include <limits.h>
28 #include <gcrypt.h>
29 #include "gnunet_util_lib.h"
30 #include "gnunet_core_service.h"
31 #include "gnunet_cadet_service.h"
32 #include "gnunet_applications.h"
33 #include "gnunet_protocols.h"
35 #include "gnunet_set_service.h"
36 #include "scalarproduct.h"
38 
39 #define LOG(kind, ...) \
40  GNUNET_log_from (kind, "scalarproduct-alice", __VA_ARGS__)
41 
47 #define MAX_RESULT (1024 * 1024)
48 
55 #define MAX_RAM (1024)
56 
60 struct MpiElement
61 {
67  const struct GNUNET_HashCode *key;
68 
72  gcry_mpi_t value;
73 };
74 
75 
81 {
86 
91 
96 
101 
106 
112 
118 
124 
129 
134 
139 
143  gcry_mpi_t product;
144 
149  uint32_t total;
150 
157 
163 
171 
177 };
178 
179 
183 static const struct GNUNET_CONFIGURATION_Handle *cfg;
184 
189 
193 static gcry_mpi_t my_privkey;
194 
198 static gcry_mpi_t my_privkey_inv;
199 
204 
205 
214 static int
215 free_element_cb (void *cls, const struct GNUNET_HashCode *key, void *value)
216 {
218 
219  GNUNET_free (e);
220  return GNUNET_OK;
221 }
222 
223 
229 static void
231 {
232  unsigned int i;
233 
234  if (GNUNET_YES == s->in_destroy)
235  return;
236  s->in_destroy = GNUNET_YES;
237  if (NULL != s->client)
238  {
239  struct GNUNET_SERVICE_Client *c = s->client;
240 
241  s->client = NULL;
243  }
244  if (NULL != s->channel)
245  {
247  s->channel = NULL;
248  }
249  if (NULL != s->intersected_elements)
250  {
253  s);
255  s->intersected_elements = NULL;
256  }
257  if (NULL != s->intersection_listen)
258  {
260  s->intersection_listen = NULL;
261  }
262  if (NULL != s->intersection_op)
263  {
264  LOG (GNUNET_ERROR_TYPE_DEBUG, "Set intersection, op still ongoing!\n");
266  s->intersection_op = NULL;
267  }
268  if (NULL != s->intersection_set)
269  {
271  s->intersection_set = NULL;
272  }
273  if (NULL != s->sorted_elements)
274  {
275  for (i = 0; i < s->used_element_count; i++)
276  gcry_mpi_release (s->sorted_elements[i].value);
278  s->sorted_elements = NULL;
279  }
280  if (NULL != s->product)
281  {
282  gcry_mpi_release (s->product);
283  s->product = NULL;
284  }
285  GNUNET_free (s);
286 }
287 
288 
295 static void
297 {
298  struct ClientResponseMessage *msg;
299  struct GNUNET_MQ_Envelope *e;
300 
301  if (NULL == session->client_mq)
302  return; /* no client left to be notified */
303  GNUNET_log (
305  "Sending session-end notification with status %d to client for session %s\n",
306  session->status,
307  GNUNET_h2s (&session->session_id));
309  msg->product_length = htonl (0);
310  msg->status = htonl (session->status);
311  GNUNET_MQ_send (session->client_mq, e);
312 }
313 
314 
321 static void
323 {
324  struct ClientResponseMessage *msg;
325  struct GNUNET_MQ_Envelope *e;
326  unsigned char *product_exported = NULL;
327  size_t product_length = 0;
328  int32_t range;
329  gcry_error_t rc;
330  int sign;
331  gcry_mpi_t value;
332 
333  if (NULL == s->product)
334  {
335  GNUNET_break (0);
337  return;
338  }
339  value = gcry_mpi_new (0);
340  sign = gcry_mpi_cmp_ui (s->product, 0);
341  if (0 > sign)
342  {
343  range = -1;
344  gcry_mpi_sub (value, value, s->product);
345  }
346  else if (0 < sign)
347  {
348  range = 1;
349  gcry_mpi_add (value, value, s->product);
350  }
351  else
352  {
353  /* result is exactly zero */
354  range = 0;
355  }
356  gcry_mpi_release (s->product);
357  s->product = NULL;
358 
359  if ((0 != range) && (0 != (rc = gcry_mpi_aprint (GCRYMPI_FMT_STD,
360  &product_exported,
361  &product_length,
362  value))))
363  {
364  LOG_GCRY (GNUNET_ERROR_TYPE_ERROR, "gcry_mpi_scan", rc);
366  return;
367  }
368  gcry_mpi_release (value);
369  e = GNUNET_MQ_msg_extra (msg,
370  product_length,
373  msg->range = htonl (range);
374  msg->product_length = htonl (product_length);
375  if (NULL != product_exported)
376  {
377  GNUNET_memcpy (&msg[1], product_exported, product_length);
378  GNUNET_free (product_exported);
379  }
380  GNUNET_MQ_send (s->client_mq, e);
382  "Sent result to client, session %s has ended!\n",
383  GNUNET_h2s (&s->session_id));
384 }
385 
386 
396 static void
397 cb_channel_destruction (void *cls, const struct GNUNET_CADET_Channel *channel)
398 {
399  struct AliceServiceSession *s = cls;
400 
402  "Peer disconnected, terminating session %s with peer %s\n",
403  GNUNET_h2s (&s->session_id),
404  GNUNET_i2s (&s->peer));
405  s->channel = NULL;
407  {
408  /* We didn't get an answer yet, fail with error */
411  }
412 }
413 
414 
423 static gcry_mpi_t
425  gcry_mpi_point_t prod_g_i_b_i,
426  gcry_mpi_point_t prod_h_i_b_i)
427 {
428  gcry_mpi_point_t g_i_b_i_a_inv;
429  gcry_mpi_point_t g_ai_bi;
430  int ai_bi;
431  gcry_mpi_t ret;
432 
433  g_i_b_i_a_inv =
434  GNUNET_CRYPTO_ecc_pmul_mpi (edc, prod_g_i_b_i, my_privkey_inv);
435  g_ai_bi = GNUNET_CRYPTO_ecc_add (edc, g_i_b_i_a_inv, prod_h_i_b_i);
436  gcry_mpi_point_release (g_i_b_i_a_inv);
437  ai_bi = GNUNET_CRYPTO_ecc_dlog (edc, g_ai_bi);
438  gcry_mpi_point_release (g_ai_bi);
439  if (INT_MAX == ai_bi)
440  {
441  /* result too big */
443  "Scalar product result out of range\n");
444  return NULL;
445  }
446  ret = gcry_mpi_new (0);
447  if (ai_bi > 0)
448  {
449  gcry_mpi_set_ui (ret, ai_bi);
450  }
451  else
452  {
453  gcry_mpi_set_ui (ret, -ai_bi);
454  gcry_mpi_neg (ret, ret);
455  }
456  return ret;
457 }
458 
459 
467 static void
469  const struct EccBobCryptodataMessage *msg)
470 {
471  struct AliceServiceSession *s = cls;
472  gcry_mpi_point_t prod_g_i_b_i;
473  gcry_mpi_point_t prod_h_i_b_i;
474  uint32_t contained;
475 
476  contained = ntohl (msg->contained_element_count);
477  if (2 != contained)
478  {
479  GNUNET_break_op (0);
481  return;
482  }
483  if (NULL == s->sorted_elements)
484  {
485  /* we're not ready yet, how can Bob be? */
486  GNUNET_break_op (0);
488  return;
489  }
491  {
492  /* we're not ready yet, how can Bob be? */
493  GNUNET_break_op (0);
495  return;
496  }
497 
499  "Received %u crypto values from Bob\n",
500  (unsigned int) contained);
502  prod_g_i_b_i = GNUNET_CRYPTO_ecc_bin_to_point (edc, &msg->prod_g_i_b_i);
503  prod_h_i_b_i = GNUNET_CRYPTO_ecc_bin_to_point (edc, &msg->prod_h_i_b_i);
504  s->product = compute_scalar_product (s, prod_g_i_b_i, prod_h_i_b_i);
505  gcry_mpi_point_release (prod_g_i_b_i);
506  gcry_mpi_point_release (prod_h_i_b_i);
508 }
509 
510 
519 static int
520 copy_element_cb (void *cls, const struct GNUNET_HashCode *key, void *value)
521 {
522  struct AliceServiceSession *s = cls;
524  gcry_mpi_t mval;
525  int64_t val;
526 
527  mval = gcry_mpi_new (0);
528  val = (int64_t) GNUNET_ntohll (e->value);
529  if (0 > val)
530  gcry_mpi_sub_ui (mval, mval, -val);
531  else
532  gcry_mpi_add_ui (mval, mval, val);
535  s->used_element_count++;
536  return GNUNET_OK;
537 }
538 
539 
547 static int
548 element_cmp (const void *a, const void *b)
549 {
550  const struct MpiElement *ma = a;
551  const struct MpiElement *mb = b;
552 
553  return GNUNET_CRYPTO_hash_cmp (ma->key, mb->key);
554 }
555 
556 
561 #define ELEMENT_CAPACITY \
562  ((GNUNET_CONSTANTS_MAX_CADET_MESSAGE_SIZE - 1 \
563  - sizeof(struct EccAliceCryptodataMessage)) \
564  / sizeof(struct GNUNET_CRYPTO_EccPoint))
565 
566 
573 static void
575 {
577  struct GNUNET_MQ_Envelope *e;
579  gcry_mpi_t r_ia;
580  gcry_mpi_t r_ia_ai;
581  unsigned int i;
582  unsigned int off;
583  unsigned int todo_count;
584 
587  struct MpiElement);
588  s->used_element_count = 0;
591  s);
593  "Finished intersection, %d items remain\n",
594  s->used_element_count);
595  qsort (s->sorted_elements,
597  sizeof(struct MpiElement),
598  &element_cmp);
599  off = 0;
600  while (off < s->used_element_count)
601  {
602  todo_count = s->used_element_count - off;
603  if (todo_count > ELEMENT_CAPACITY)
604  todo_count = ELEMENT_CAPACITY;
606  "Sending %u/%u crypto values to Bob\n",
607  (unsigned int) todo_count,
608  (unsigned int) s->used_element_count);
609 
610  e =
611  GNUNET_MQ_msg_extra (msg,
612  todo_count * 2
613  * sizeof(struct GNUNET_CRYPTO_EccPoint),
615  msg->contained_element_count = htonl (todo_count);
616  payload = (struct GNUNET_CRYPTO_EccPoint *) &msg[1];
617  r_ia = gcry_mpi_new (0);
618  r_ia_ai = gcry_mpi_new (0);
619  for (i = off; i < off + todo_count; i++)
620  {
621  gcry_mpi_t r_i;
622  gcry_mpi_point_t g_i;
623  gcry_mpi_point_t h_i;
624 
625  r_i = GNUNET_CRYPTO_ecc_random_mod_n (edc);
626  g_i = GNUNET_CRYPTO_ecc_dexp_mpi (edc, r_i);
627  /* r_ia = r_i * a */
628  gcry_mpi_mul (r_ia, r_i, my_privkey);
629  gcry_mpi_release (r_i);
630  /* r_ia_ai = r_ia + a_i */
631  gcry_mpi_add (r_ia_ai, r_ia, s->sorted_elements[i].value);
632  h_i = GNUNET_CRYPTO_ecc_dexp_mpi (edc, r_ia_ai);
633  GNUNET_CRYPTO_ecc_point_to_bin (edc, g_i, &payload[(i - off) * 2]);
634  GNUNET_CRYPTO_ecc_point_to_bin (edc, h_i, &payload[(i - off) * 2 + 1]);
635  gcry_mpi_point_release (g_i);
636  gcry_mpi_point_release (h_i);
637  }
638  gcry_mpi_release (r_ia);
639  gcry_mpi_release (r_ia_ai);
640  off += todo_count;
641  GNUNET_MQ_send (s->cadet_mq, e);
642  }
643 }
644 
645 
656 static void
658  const struct GNUNET_SET_Element *element,
659  uint64_t current_size,
661 {
662  struct AliceServiceSession *s = cls;
663  struct GNUNET_SCALARPRODUCT_Element *se;
664 
665  switch (status)
666  {
668  /* this element has been removed from the set */
670  element->data);
671  GNUNET_assert (NULL != se);
673  "Intersection removed element with key %s and value %lld\n",
674  GNUNET_h2s (&se->key),
675  (long long) GNUNET_ntohll (se->value));
676  GNUNET_assert (
677  GNUNET_YES ==
679  element->data,
680  se));
681  GNUNET_free (se);
682  return;
683 
685  s->intersection_op = NULL;
686  if (NULL != s->intersection_set)
687  {
689  s->intersection_set = NULL;
690  }
692  return;
693 
695  /* unexpected for intersection */
696  GNUNET_break (0);
697  return;
698 
700  /* unhandled status code */
701  LOG (GNUNET_ERROR_TYPE_DEBUG, "Set intersection failed!\n");
702  if (NULL != s->intersection_listen)
703  {
705  s->intersection_listen = NULL;
706  }
707  s->intersection_op = NULL;
708  if (NULL != s->intersection_set)
709  {
711  s->intersection_set = NULL;
712  }
715  return;
716 
717  default:
718  GNUNET_break (0);
719  return;
720  }
721 }
722 
723 
739 static void
741  const struct GNUNET_PeerIdentity *other_peer,
742  const struct GNUNET_MessageHeader *context_msg,
743  struct GNUNET_SET_Request *request)
744 {
745  struct AliceServiceSession *s = cls;
746 
748  "Received intersection request from %s!\n",
749  GNUNET_i2s (other_peer));
750  if (0 != GNUNET_memcmp (other_peer, &s->peer))
751  {
752  GNUNET_break_op (0);
753  return;
754  }
755  s->intersection_op = GNUNET_SET_accept (request,
757  (struct GNUNET_SET_Option[]){ { 0 } },
759  s);
760  if (NULL == s->intersection_op)
761  {
762  GNUNET_break (0);
765  return;
766  }
768  {
769  GNUNET_break (0);
772  return;
773  }
774 }
775 
776 
782 static void
784 {
785  struct GNUNET_MQ_MessageHandler cadet_handlers[] =
786  { GNUNET_MQ_hd_fixed_size (bobs_cryptodata_message,
789  s),
792  struct GNUNET_MQ_Envelope *e;
793  struct GNUNET_HashCode set_sid;
794 
796  sizeof(struct GNUNET_HashCode),
797  &set_sid);
799  "Creating new channel for session with key %s.\n",
800  GNUNET_h2s (&s->session_id));
801  s->channel = GNUNET_CADET_channel_create (my_cadet,
802  s,
803  &s->peer,
804  &s->session_id,
805  NULL,
807  cadet_handlers);
808  if (NULL == s->channel)
809  {
812  return;
813  }
817  &set_sid,
819  s);
820  if (NULL == s->intersection_listen)
821  {
824  s->channel = NULL;
826  return;
827  }
828 
829  e =
830  GNUNET_MQ_msg (msg,
833  msg->session_id = s->session_id;
834  GNUNET_MQ_send (s->cadet_mq, e);
835 }
836 
837 
846 static int
848  void *cls,
850 {
851  struct AliceServiceSession *s = cls;
852  uint32_t contained_count;
853  uint16_t msize;
854 
855  msize = ntohs (msg->header.size);
856  contained_count = ntohl (msg->element_count_contained);
857  if ((msize !=
859  + contained_count * sizeof(struct GNUNET_SCALARPRODUCT_Element))) ||
860  (0 == contained_count) ||
862  (s->total < s->client_received_element_count + contained_count))
863  {
864  GNUNET_break_op (0);
865  return GNUNET_SYSERR;
866  }
867  return GNUNET_OK;
868 }
869 
870 
878 static void
880  void *cls,
882 {
883  struct AliceServiceSession *s = cls;
884  uint32_t contained_count;
885  const struct GNUNET_SCALARPRODUCT_Element *elements;
886  struct GNUNET_SET_Element set_elem;
887  struct GNUNET_SCALARPRODUCT_Element *elem;
888 
889  contained_count = ntohl (msg->element_count_contained);
890  s->client_received_element_count += contained_count;
891  elements = (const struct GNUNET_SCALARPRODUCT_Element *) &msg[1];
892  for (uint32_t i = 0; i < contained_count; i++)
893  {
895  GNUNET_memcpy (elem,
896  &elements[i],
897  sizeof(struct GNUNET_SCALARPRODUCT_Element));
900  &elem->key,
901  elem,
903  {
904  GNUNET_break (0);
905  GNUNET_free (elem);
906  continue;
907  }
908  set_elem.data = &elem->key;
909  set_elem.size = sizeof(elem->key);
910  set_elem.element_type = 0;
911  GNUNET_SET_add_element (s->intersection_set, &set_elem, NULL, NULL);
912  s->used_element_count++;
913  }
916  {
917  /* more to come */
919  "Received client multipart data, waiting for more!\n");
920  return;
921  }
922  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Launching computation\n");
924 }
925 
926 
935 static int
937  const struct AliceComputationMessage *msg)
938 {
939  struct AliceServiceSession *s = cls;
940  uint16_t msize;
941  uint32_t total_count;
942  uint32_t contained_count;
943 
944  if (NULL != s->intersected_elements)
945  {
946  /* only one concurrent session per client connection allowed,
947  simplifies logic a lot... */
948  GNUNET_break (0);
949  return GNUNET_SYSERR;
950  }
951  msize = ntohs (msg->header.size);
952  total_count = ntohl (msg->element_count_total);
953  contained_count = ntohl (msg->element_count_contained);
954  if ((0 == total_count) || (0 == contained_count) ||
955  (msize !=
956  (sizeof(struct AliceComputationMessage)
957  + contained_count * sizeof(struct GNUNET_SCALARPRODUCT_Element))))
958  {
959  GNUNET_break_op (0);
960  return GNUNET_SYSERR;
961  }
962  return GNUNET_OK;
963 }
964 
965 
973 static void
975  const struct AliceComputationMessage *msg)
976 {
977  struct AliceServiceSession *s = cls;
978  uint32_t contained_count;
979  uint32_t total_count;
980  const struct GNUNET_SCALARPRODUCT_Element *elements;
981  struct GNUNET_SET_Element set_elem;
982  struct GNUNET_SCALARPRODUCT_Element *elem;
983 
984  total_count = ntohl (msg->element_count_total);
985  contained_count = ntohl (msg->element_count_contained);
986  s->peer = msg->peer;
988  s->total = total_count;
989  s->client_received_element_count = contained_count;
990  s->session_id = msg->session_key;
991  elements = (const struct GNUNET_SCALARPRODUCT_Element *) &msg[1];
994  s->intersection_set =
996  for (uint32_t i = 0; i < contained_count; i++)
997  {
998  if (0 == GNUNET_ntohll (elements[i].value))
999  continue;
1000  elem = GNUNET_new (struct GNUNET_SCALARPRODUCT_Element);
1001  GNUNET_memcpy (elem,
1002  &elements[i],
1003  sizeof(struct GNUNET_SCALARPRODUCT_Element));
1006  &elem->key,
1007  elem,
1009  {
1010  /* element with same key encountered twice! */
1011  GNUNET_break (0);
1012  GNUNET_free (elem);
1013  continue;
1014  }
1015  set_elem.data = &elem->key;
1016  set_elem.size = sizeof(elem->key);
1017  set_elem.element_type = 0;
1018  GNUNET_SET_add_element (s->intersection_set, &set_elem, NULL, NULL);
1019  s->used_element_count++;
1020  }
1022  if (s->total != s->client_received_element_count)
1023  {
1024  /* wait for multipart msg */
1026  "Received partial client request, waiting for more!\n");
1027  return;
1028  }
1029  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Launching computation\n");
1031 }
1032 
1033 
1040 static void
1041 shutdown_task (void *cls)
1042 {
1043  GNUNET_log (GNUNET_ERROR_TYPE_DEBUG, "Shutting down, initiating cleanup.\n");
1044  // FIXME: we have to cut our connections to CADET first!
1045  if (NULL != my_cadet)
1046  {
1047  GNUNET_CADET_disconnect (my_cadet);
1048  my_cadet = NULL;
1049  }
1050  if (NULL != edc)
1051  {
1053  edc = NULL;
1054  }
1055 }
1056 
1057 
1068 static void *
1070  struct GNUNET_SERVICE_Client *client,
1071  struct GNUNET_MQ_Handle *mq)
1072 {
1073  struct AliceServiceSession *s;
1074 
1075  s = GNUNET_new (struct AliceServiceSession);
1076  s->client = client;
1077  s->client_mq = mq;
1078  return s;
1079 }
1080 
1081 
1092 static void
1094  struct GNUNET_SERVICE_Client *client,
1095  void *app_cls)
1096 {
1097  struct AliceServiceSession *s = app_cls;
1098 
1100  "Client %p disconnected from us.\n",
1101  client);
1102  s->client = NULL;
1103  s->client_mq = NULL;
1105 }
1106 
1107 
1115 static void
1116 run (void *cls,
1117  const struct GNUNET_CONFIGURATION_Handle *c,
1119 {
1120  cfg = c;
1122  /* Select a random 'a' value for Alice */
1124  my_cadet = GNUNET_CADET_connect (cfg);
1125  if (NULL == my_cadet)
1126  {
1127  GNUNET_log (GNUNET_ERROR_TYPE_ERROR, _ ("Connect to CADET failed\n"));
1129  return;
1130  }
1132 }
1133 
1134 
1139  "scalarproduct-alice",
1141  &run,
1144  NULL,
1145  GNUNET_MQ_hd_var_size (alice_client_message,
1147  struct AliceComputationMessage,
1148  NULL),
1150  alice_client_message_multipart,
1153  NULL),
1155 
1156 
1157 /* end of gnunet-service-scalarproduct-ecc_alice.c */
uint32_t contained_element_count
How many elements we appended to this message? In NBO.
GNUNET_SERVICE_MAIN("scalarproduct-alice", GNUNET_SERVICE_OPTION_NONE, &run, &client_connect_cb, &client_disconnect_cb, NULL, GNUNET_MQ_hd_var_size(alice_client_message, GNUNET_MESSAGE_TYPE_SCALARPRODUCT_CLIENT_TO_ALICE, struct AliceComputationMessage, NULL), GNUNET_MQ_hd_var_size(alice_client_message_multipart, GNUNET_MESSAGE_TYPE_SCALARPRODUCT_CLIENT_MULTIPART_ALICE, struct ComputationBobCryptodataMultipartMessage, NULL), GNUNET_MQ_handler_end())
Define "main" method using service macro.
A scalarproduct session which tracks a request form the client to our final response.
struct GNUNET_CRYPTO_EccPoint prod_g_i_b_i
The product of the g_i^{b_i} values.
Message type passed from service client to finalize a session as requester or responder.
struct GNUNET_HashCode session_id
The transaction/session key used to identify a session.
int in_destroy
Flag to prevent recursive calls to destroy_service_session() from doing harm.
void GNUNET_CADET_disconnect(struct GNUNET_CADET_Handle *handle)
Disconnect from the cadet service.
Definition: cadet_api.c:841
Vector of ECC-encrypted values sent by Alice to Bob (after set intersection).
struct GNUNET_SET_ListenHandle * GNUNET_SET_listen(const struct GNUNET_CONFIGURATION_Handle *cfg, enum GNUNET_SET_OperationType op_type, const struct GNUNET_HashCode *app_id, GNUNET_SET_ListenCallback listen_cb, void *listen_cls)
Wait for set operation requests for the given application ID.
Definition: set_api.c:1017
static struct GNUNET_SERVICE_Handle * service
Handle to our service instance.
Point on a curve (always for Curve25519) encoded in a format suitable for network transmission (ECDH)...
gcry_mpi_point_t GNUNET_CRYPTO_ecc_bin_to_point(struct GNUNET_CRYPTO_EccDlogContext *edc, const struct GNUNET_CRYPTO_EccPoint *bin)
Convert binary representation of a point to computational representation.
struct GNUNET_MessageHeader * msg
Definition: 005.c:2
void GNUNET_CRYPTO_ecc_rnd_mpi(struct GNUNET_CRYPTO_EccDlogContext *edc, gcry_mpi_t *r, gcry_mpi_t *r_inv)
Obtain a random scalar for point multiplication on the curve and its multiplicative inverse...
static struct GNUNET_VPN_RedirectionRequest * request
Opaque redirection request handle.
Definition: gnunet-vpn.c:41
struct GNUNET_CADET_Channel * channel
channel-handle associated with our cadet handle
#define GNUNET_MESSAGE_TYPE_SCALARPRODUCT_CLIENT_MULTIPART_ALICE
Client -> Alice multipart.
struct GNUNET_MQ_Handle * cadet_mq
The message queue for CADET.
unsigned int GNUNET_CONTAINER_multihashmap_size(const struct GNUNET_CONTAINER_MultiHashMap *map)
Get the number of key-value pairs in the map.
int GNUNET_SET_add_element(struct GNUNET_SET_Handle *set, const struct GNUNET_SET_Element *element, GNUNET_SET_Continuation cont, void *cont_cls)
Add an element to the given set.
Definition: set_api.c:687
Handle for a set operation request from another peer.
Definition: set_api.c:115
static void handle_alice_client_message(void *cls, const struct AliceComputationMessage *msg)
Handler for Alice&#39;s client request message.
Opaque handle to the service.
Definition: cadet_api.c:38
Handle to a service.
Definition: service.c:116
gcry_mpi_t GNUNET_CRYPTO_ecc_random_mod_n(struct GNUNET_CRYPTO_EccDlogContext *edc)
Generate a random value mod n.
scalarproduct service P2P messages
static const struct GNUNET_CONFIGURATION_Handle * cfg
GNUnet configuration handle.
const struct GNUNET_HashCode * key
Key used to identify matching pairs of values to multiply.
Operation is still active (never returned, used internally).
struct GNUNET_SCHEDULER_Task * GNUNET_SCHEDULER_add_shutdown(GNUNET_SCHEDULER_TaskCallback task, void *task_cls)
Schedule a new task to be run on shutdown, that is when a CTRL-C signal is received, or when GNUNET_SCHEDULER_shutdown() is being invoked.
Definition: scheduler.c:1300
struct GNUNET_HashCode key
Key used to identify matching pairs of values to multiply.
Element stored in a set.
static int copy_element_cb(void *cls, const struct GNUNET_HashCode *key, void *value)
Iterator to copy over messages from the hash map into an array for sorting.
struct GNUNET_SET_Handle * GNUNET_SET_create(const struct GNUNET_CONFIGURATION_Handle *cfg, enum GNUNET_SET_OperationType op)
Create an empty set, supporting the specified operation.
Definition: set_api.c:657
#define GNUNET_MESSAGE_TYPE_SCALARPRODUCT_ECC_ALICE_CRYPTODATA
Alice -> Bob ECC crypto data.
#define GNUNET_assert(cond)
Use this for fatal errors that cannot be handled.
int32_t range
Workaround for libgcrypt: -1 if negative, 0 if zero, else 1.
#define LOG_GCRY(level, cmd, rc)
Log an error message at log-level &#39;level&#39; that indicates a failure of the command &#39;cmd&#39; with the mess...
Definition: scalarproduct.h:35
void GNUNET_MQ_env_set_options(struct GNUNET_MQ_Envelope *env, enum GNUNET_MQ_PriorityPreferences pp)
Set application-specific options for this envelope.
Definition: mq.c:1005
struct GNUNET_MessageHeader header
GNUNET message header with type GNUNET_MESSAGE_TYPE_SCALARPRODUCT_CLIENT_TO_ALICE.
Definition: scalarproduct.h:51
static void send_alices_cryptodata_message(struct AliceServiceSession *s)
Send the cryptographic data from Alice to Bob.
#define GNUNET_memcpy(dst, src, n)
Call memcpy() but check for n being 0 first.
#define GNUNET_MQ_hd_fixed_size(name, code, str, ctx)
static struct GNUNET_CADET_Handle * my_cadet
Handle to the CADET service.
static int ret
Return value of the commandline.
Definition: gnunet-abd.c:81
#define GNUNET_MQ_msg(mvar, type)
Allocate a GNUNET_MQ_Envelope.
Definition: gnunet_mq_lib.h:67
static struct Experiment * e
static struct GNUNET_HashCode session_id
Opaque handle to a channel.
Definition: cadet_api.c:80
const char * GNUNET_h2s(const struct GNUNET_HashCode *hc)
Convert a hash value to a string (for printing debug messages).
#define GNUNET_OK
Named constants for return values.
Definition: gnunet_common.h:75
static void shutdown_task(void *cls)
Task run during shutdown.
#define GNUNET_new(type)
Allocate a struct or union of the given type.
enum GNUNET_SCALARPRODUCT_ResponseStatus status
State of this session.
struct GNUNET_CRYPTO_EccDlogContext * GNUNET_CRYPTO_ecc_dlog_prepare(unsigned int max, unsigned int mem)
Do pre-calculation for ECC discrete logarithm for small factors.
gcry_mpi_t value
a_i value, not disclosed to Bob.
uint16_t size
The length of the struct (in bytes, including the length field itself), in big-endian format...
void GNUNET_CRYPTO_ecc_point_to_bin(struct GNUNET_CRYPTO_EccDlogContext *edc, gcry_mpi_point_t point, struct GNUNET_CRYPTO_EccPoint *bin)
Convert point value to binary representation.
void GNUNET_SCHEDULER_shutdown(void)
Request the shutdown of a scheduler.
Definition: scheduler.c:526
Success, all elements have been sent (and received).
Internal representation of the hash map.
#define GNUNET_break(cond)
Use this for internal assertion violations that are not fatal (can be handled) but should not occur...
static void handle_bobs_cryptodata_message(void *cls, const struct EccBobCryptodataMessage *msg)
Handle a response we got from another service we wanted to calculate a scalarproduct with...
uint32_t total
How many elements we were supplied with from the client (total count before intersection).
Message type passed from client to service to initiate a request or responder role.
Definition: scalarproduct.h:45
struct GNUNET_HashCode session_key
the transaction/session key used to identify a session
Definition: scalarproduct.h:71
const void * data
Actual data of the element.
struct GNUNET_CADET_Handle * GNUNET_CADET_connect(const struct GNUNET_CONFIGURATION_Handle *cfg)
Connect to the MQ-based cadet service.
Definition: cadet_api.c:976
struct GNUNET_SET_OperationHandle * intersection_op
Set of elements for which will conduction an intersection.
void * GNUNET_CONTAINER_multihashmap_get(const struct GNUNET_CONTAINER_MultiHashMap *map, const struct GNUNET_HashCode *key)
Given a key find a value in the map matching the key.
#define _(String)
GNU gettext support macro.
Definition: platform.h:181
Handle to a client that is connected to a service.
Definition: service.c:250
void GNUNET_SET_destroy(struct GNUNET_SET_Handle *set)
Destroy the set handle, and free all associated resources.
Definition: set_api.c:772
static void transmit_client_response(struct AliceServiceSession *s)
Prepare the final (positive) response we will send to Alice&#39;s client.
#define INT_MAX
uint32_t status
Status information about the outcome of this session, An enum GNUNET_SCALARPRODUCT_ResponseStatus (in...
#define GNUNET_MQ_msg_extra(mvar, esize, type)
Allocate an envelope, with extra space allocated after the space needed by the message struct...
Definition: gnunet_mq_lib.h:52
static struct GNUNET_CRYPTO_EccDlogContext * edc
Context for DLOG operations on a curve.
struct MpiElement * sorted_elements
a(Alice), sorted array by key of length used_element_count.
The other peer refused to to the operation with us, or something went wrong.
Success, all elements have been returned (but the other peer might still be receiving some from us...
struct GNUNET_PeerIdentity peer
the identity of a remote peer we want to communicate with
Definition: scalarproduct.h:76
Scalar Product API Message Types.
#define GNUNET_MQ_hd_var_size(name, code, str, ctx)
#define GNUNET_break_op(cond)
Use this for assertion violations caused by other peers (i.e.
void GNUNET_CRYPTO_hash(const void *block, size_t size, struct GNUNET_HashCode *ret)
Compute hash of a given block.
Definition: crypto_hash.c:48
Everything went ok, we are transmitting an element of the result (in set, or to be removed from set...
void GNUNET_CONTAINER_multihashmap_destroy(struct GNUNET_CONTAINER_MultiHashMap *map)
Destroy a hash map.
GNUNET_SET_Status
Status for the result callback.
uint32_t element_count_total
how many elements the vector in payload contains
Definition: scalarproduct.h:56
uint16_t status
See PRISM_STATUS_*-constants.
gcry_mpi_point_t GNUNET_CRYPTO_ecc_add(struct GNUNET_CRYPTO_EccDlogContext *edc, gcry_mpi_point_t a, gcry_mpi_point_t b)
Add two points on the elliptic curve.
#define GNUNET_new_array(n, type)
Allocate a size n array with structs or unions of the given type.
int GNUNET_CONTAINER_multihashmap_remove(struct GNUNET_CONTAINER_MultiHashMap *map, const struct GNUNET_HashCode *key, const void *value)
Remove the given key-value pair from the map.
struct GNUNET_CRYPTO_EccPoint prod_h_i_b_i
The product of the h_i^{b_i} values.
uint32_t contained_element_count
How many elements this individual message delivers (in NBO), always TWO.
static void run(void *cls, const struct GNUNET_CONFIGURATION_Handle *c, struct GNUNET_SERVICE_Handle *service)
Initialization of the program and message handlers.
static void cb_intersection_request_alice(void *cls, const struct GNUNET_PeerIdentity *other_peer, const struct GNUNET_MessageHeader *context_msg, struct GNUNET_SET_Request *request)
Called when another peer wants to do a set operation with the local peer.
A 512-bit hashcode.
void GNUNET_SERVICE_client_drop(struct GNUNET_SERVICE_Client *c)
Ask the server to disconnect from the given client.
Definition: service.c:2324
Message handler for a specific message type.
static void cb_channel_destruction(void *cls, const struct GNUNET_CADET_Channel *channel)
Function called whenever a channel is destroyed.
Opaque handle to a set.
Definition: set_api.c:49
struct GNUNET_PeerIdentity peer
Alice or Bob&#39;s peerID.
struct GNUNET_HashCode session_id
(hopefully) unique transaction ID
There must only be one value per key; storing a value should fail if a value under the same key alrea...
#define GNUNET_MESSAGE_TYPE_SCALARPRODUCT_CLIENT_TO_ALICE
Client -> Alice.
struct GNUNET_TESTBED_Peer * peer
The peer associated with this model.
Message type passed from responding service Bob to responding service Alice to complete a request and...
#define GNUNET_SYSERR
Definition: gnunet_common.h:76
static void cb_intersection_element_removed(void *cls, const struct GNUNET_SET_Element *element, uint64_t current_size, enum GNUNET_SET_Status status)
Callback for set operation results.
static int free_element_cb(void *cls, const struct GNUNET_HashCode *key, void *value)
Iterator called to free elements.
#define MAX_RESULT
Maximum allowed result value for the scalarproduct computation.
An encrypted element key-value pair.
static int check_alice_client_message_multipart(void *cls, const struct ComputationBobCryptodataMultipartMessage *msg)
We&#39;re receiving additional set data.
void GNUNET_CRYPTO_ecc_dlog_release(struct GNUNET_CRYPTO_EccDlogContext *dlc)
Release precalculated values.
Message type passed from requesting service Alice to responding service Bob to initiate a request and...
static void client_disconnect_cb(void *cls, struct GNUNET_SERVICE_Client *client, void *app_cls)
A client disconnected.
void GNUNET_SET_listen_cancel(struct GNUNET_SET_ListenHandle *lh)
Cancel the given listen operation.
Definition: set_api.c:1051
static gcry_mpi_t my_privkey
Alice&#39;s private key (&#39;a&#39;).
uint32_t product_length
0 if no product attached
#define GNUNET_MESSAGE_TYPE_SCALARPRODUCT_ECC_SESSION_INITIALIZATION
Alice -> Bob ECC session initialization.
Option for set operations.
int64_t value
Value to multiply in scalar product, in NBO.
int GNUNET_CONTAINER_multihashmap_put(struct GNUNET_CONTAINER_MultiHashMap *map, const struct GNUNET_HashCode *key, void *value, enum GNUNET_CONTAINER_MultiHashMapOption opt)
Store a key-value pair in the map.
static unsigned long long payload
How much data are we currently storing in the database?
gcry_mpi_point_t GNUNET_CRYPTO_ecc_dexp_mpi(struct GNUNET_CRYPTO_EccDlogContext *edc, gcry_mpi_t val)
Multiply the generator g of the elliptic curve by val to obtain the point on the curve representing v...
uint32_t used_element_count
How many elements actually are used for the scalar product.
#define GNUNET_memcmp(a, b)
Compare memory in a and b, where both must be of the same pointer type.
struct GNUNET_CONTAINER_MultiHashMap * intersected_elements
all non-0-value&#39;d elements transmitted to us.
gcry_mpi_t product
The computed scalar.
Handle to an operation.
Definition: set_api.c:135
Handle to a message queue.
Definition: mq.c:85
static int check_alice_client_message(void *cls, const struct AliceComputationMessage *msg)
Handler for Alice&#39;s client request message.
The identity of the host (wraps the signing key of the peer).
int GNUNET_SET_commit(struct GNUNET_SET_OperationHandle *oh, struct GNUNET_SET_Handle *set)
Commit a set to be used with a set operation.
Definition: set_api.c:1128
void GNUNET_CADET_receive_done(struct GNUNET_CADET_Channel *channel)
Send an ack on the channel to confirm the processing of a message.
Definition: cadet_api.c:954
struct GNUNET_CADET_Channel * GNUNET_CADET_channel_create(struct GNUNET_CADET_Handle *h, void *channel_cls, const struct GNUNET_PeerIdentity *destination, const struct GNUNET_HashCode *port, GNUNET_CADET_WindowSizeEventHandler window_changes, GNUNET_CADET_DisconnectEventHandler disconnects, const struct GNUNET_MQ_MessageHandler *handlers)
Create a new channel towards a remote peer.
Definition: cadet_api.c:1068
struct GNUNET_MessageHeader header
GNUNET message header.
#define GNUNET_MESSAGE_TYPE_SCALARPRODUCT_ECC_BOB_CRYPTODATA
Bob -> Alice ECC crypto data.
configuration data
Definition: configuration.c:85
int GNUNET_CRYPTO_hash_cmp(const struct GNUNET_HashCode *h1, const struct GNUNET_HashCode *h2)
Compare function for HashCodes, producing a total ordering of all hashcodes.
Definition: crypto_hash.c:294
static gcry_mpi_t compute_scalar_product(struct AliceServiceSession *session, gcry_mpi_point_t prod_g_i_b_i, gcry_mpi_point_t prod_h_i_b_i)
Compute our scalar product, done by Alice.
uint16_t size
Number of bytes in the buffer pointed to by data.
struct GNUNET_MQ_Handle * mq
Definition: 003.c:5
#define GNUNET_log(kind,...)
#define ELEMENT_CAPACITY
Maximum number of elements we can put into a single cryptodata message.
uint32_t element_count_contained
contained elements the vector in payload contains
Definition: scalarproduct.h:61
Opaque handle to a listen operation.
Definition: set_api.c:186
Client gets only elements that have been removed from the set.
struct GNUNET_CONTAINER_MultiHashMap * GNUNET_CONTAINER_multihashmap_create(unsigned int len, int do_not_copy_keys)
Create a multi hash map.
uint32_t element_count_contained
contained elements the vector in payload contains
void GNUNET_SET_operation_cancel(struct GNUNET_SET_OperationHandle *oh)
Cancel the given set operation.
Definition: set_api.c:516
multipart messages following struct ComputationMessage
Header for all communications.
Internal structure used to cache pre-calculated values for DLOG calculation.
#define GNUNET_YES
Definition: gnunet_common.h:77
struct GNUNET_SET_Handle * intersection_set
Set of elements for which will conduction an intersection.
void GNUNET_MQ_send(struct GNUNET_MQ_Handle *mq, struct GNUNET_MQ_Envelope *ev)
Send a message with the given message queue.
Definition: mq.c:353
static gcry_mpi_t my_privkey_inv
Inverse of Alice&#39;s private key (&#39;a_inv&#39;).
struct GNUNET_SERVICE_Client * client
The client this request is related to.
static void client_request_complete_alice(struct AliceServiceSession *s)
Our client has finished sending us its multipart message.
Set intersection, only return elements that are in both sets.
GNUNET_SCALARPRODUCT_ResponseStatus
Result status values for the computation.
static void handle_alice_client_message_multipart(void *cls, const struct ComputationBobCryptodataMultipartMessage *msg)
We&#39;re receiving additional set data.
struct GNUNET_MQ_Handle * client_mq
The message queue for the client.
struct GNUNET_SET_ListenHandle * intersection_listen
Handle to Alice&#39;s Intersection operation listening for Bob.
Highest priority, control traffic (i.e.
#define LOG(kind,...)
int GNUNET_CRYPTO_ecc_dlog(struct GNUNET_CRYPTO_EccDlogContext *edc, gcry_mpi_point_t input)
Calculate ECC discrete logarithm for small factors.
int GNUNET_CONTAINER_multihashmap_iterate(struct GNUNET_CONTAINER_MultiHashMap *map, GNUNET_CONTAINER_MulitHashMapIteratorCallback it, void *it_cls)
Iterate over all entries in the map.
struct GNUNET_CRYPTO_PaillierCiphertext s
Bob&#39;s "s".
#define MAX_RAM
How many values should DLOG store in memory (determines baseline RAM consumption, roughly 100 bytes t...
uint32_t client_received_element_count
Already transferred elements from client to us.
void GNUNET_CADET_channel_destroy(struct GNUNET_CADET_Channel *channel)
Destroy an existing channel.
Definition: cadet_api.c:903
gcry_mpi_point_t GNUNET_CRYPTO_ecc_pmul_mpi(struct GNUNET_CRYPTO_EccDlogContext *edc, gcry_mpi_point_t p, gcry_mpi_t val)
Multiply the point p on the elliptic curve by val.
const char * GNUNET_i2s(const struct GNUNET_PeerIdentity *pid)
Convert a peer identity to a string (for printing debug messages).
void GNUNET_SERVICE_client_continue(struct GNUNET_SERVICE_Client *c)
Continue receiving further messages from the given client.
Definition: service.c:2243
#define GNUNET_MQ_handler_end()
End-marker for the handlers array.
static void destroy_service_session(struct AliceServiceSession *s)
Destroy session state, we are done with it.
static void prepare_client_end_notification(struct AliceServiceSession *session)
Notify the client that the session has failed.
An element key-value pair for scalarproduct.
uint64_t GNUNET_ntohll(uint64_t n)
Convert unsigned 64-bit integer to host byte order.
Definition: common_endian.c:48
static int element_cmp(const void *a, const void *b)
Compare two struct MpiValues by key for sorting.
#define GNUNET_MESSAGE_TYPE_SCALARPRODUCT_RESULT
Alice/Bob -> Client Result.
#define GNUNET_free(ptr)
Wrapper around free.
uint16_t element_type
Application-specific element type.
struct GNUNET_SET_OperationHandle * GNUNET_SET_accept(struct GNUNET_SET_Request *request, enum GNUNET_SET_ResultMode result_mode, struct GNUNET_SET_Option options[], GNUNET_SET_ResultIterator result_cb, void *result_cls)
Accept a request we got via GNUNET_SET_listen().
Definition: set_api.c:1085
struct GNUNET_MQ_Handle * GNUNET_CADET_get_mq(const struct GNUNET_CADET_Channel *channel)
Obtain the message queue for a connected peer.
Definition: cadet_api.c:1119
static void * client_connect_cb(void *cls, struct GNUNET_SERVICE_Client *client, struct GNUNET_MQ_Handle *mq)
A client connected.