process inbound type map messages:
[oweals/gnunet.git] / src / core / gnunet-service-core_typemap.c
1 /*
2      This file is part of GNUnet.
3      (C) 2011 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 core/gnunet-service-core_typemap.c
23  * @brief management of map that specifies which message types this peer supports
24  * @author Christian Grothoff
25  */
26 #include "platform.h"
27 #include "gnunet_util_lib.h"
28 #include "gnunet_transport_service.h"
29 #include "gnunet-service-core.h"
30 #include "gnunet-service-core_sessions.h"
31 #include "gnunet-service-core_typemap.h"
32 #include <zlib.h>
33
34
35 /**
36  * A type map describing which messages a given neighbour is able
37  * to process.
38  */
39 struct GSC_TypeMap 
40 {
41   uint32_t bits[(UINT16_MAX + 1) / 32];
42 };
43
44 /**
45  * Bitmap of message types this peer is able to handle.
46  */
47 static struct GSC_TypeMap my_type_map;
48
49 /**
50  * Counters for message types this peer is able to handle.
51  */
52 static uint8_t map_counters[UINT16_MAX + 1];
53
54
55 /**
56  * Compute a type map message for this peer.
57  *
58  * @return this peers current type map message.
59  */
60 struct GNUNET_MessageHeader *
61 GSC_TYPEMAP_compute_type_map_message ()
62 {
63   char *tmp;
64   uLongf dlen;
65   struct GNUNET_MessageHeader *hdr;
66
67 #ifdef compressBound
68   dlen = compressBound (sizeof (my_type_map));
69 #else
70   dlen = sizeof (my_type_map) + (sizeof (my_type_map) / 100) + 20;
71   /* documentation says 100.1% oldSize + 12 bytes, but we
72    * should be able to overshoot by more to be safe */
73 #endif
74   hdr = GNUNET_malloc (dlen + sizeof (struct GNUNET_MessageHeader));
75   tmp = (char *) &hdr[1];
76   if ((Z_OK !=
77        compress2 ((Bytef *) tmp, &dlen, (const Bytef *) &my_type_map,
78                   sizeof (my_type_map), 9)) || (dlen >= sizeof (my_type_map)))
79   {
80     dlen = sizeof (my_type_map);
81     memcpy (tmp, &my_type_map, sizeof (my_type_map));
82     hdr->type = htons (GNUNET_MESSAGE_TYPE_CORE_BINARY_TYPE_MAP);
83   }
84   else
85   {
86     hdr->type = htons (GNUNET_MESSAGE_TYPE_CORE_COMPRESSED_TYPE_MAP);
87   }
88   hdr->size = htons ((uint16_t) dlen + sizeof (struct GNUNET_MessageHeader));
89   return hdr;
90 }
91
92
93 /**
94  * Extract a type map from a TYPE_MAP message.
95  *
96  * @param msg a type map message
97  * @return NULL on error
98  */
99 struct GSC_TypeMap *
100 GSC_TYPEMAP_get_from_message (const struct GNUNET_MessageHeader *msg)
101 {
102   struct GSC_TypeMap *ret;
103   uint16_t size;
104   uLongf dlen;
105
106   size = ntohs (msg->size);
107   switch (msg->type)
108   {
109   case GNUNET_MESSAGE_TYPE_CORE_BINARY_TYPE_MAP:
110     if (size != sizeof (struct GSC_TypeMap))
111     {
112       GNUNET_break_op (0);
113       return NULL;
114     }
115     ret = GNUNET_malloc (sizeof (struct GSC_TypeMap));
116     memcpy (ret, &msg[1], sizeof (struct GSC_TypeMap));
117     return ret;
118   case GNUNET_MESSAGE_TYPE_CORE_COMPRESSED_TYPE_MAP:
119     ret = GNUNET_malloc (sizeof (struct GSC_TypeMap));
120     dlen = sizeof (struct GSC_TypeMap);
121     if ( (Z_OK !=
122           uncompress ((Bytef*) ret, &dlen,
123                       (const Bytef*) &msg[1], (uLong) size)) ||
124          (dlen != sizeof (struct GSC_TypeMap) ) )
125     {
126       GNUNET_break_op (0);
127       GNUNET_free (ret);
128       return NULL;
129     }
130     return ret;
131   default:
132     GNUNET_break (0);
133     return NULL;
134   }
135 }
136
137
138 /**
139  * Send my type map to all connected peers (it got changed).
140  */
141 static void
142 broadcast_my_type_map ()
143 {
144   struct GNUNET_MessageHeader *hdr;
145
146   hdr = GSC_TYPEMAP_compute_type_map_message ();
147   GSC_SESSIONS_broadcast (hdr);
148   GNUNET_free (hdr);
149 }
150
151
152 /**
153  * Add a set of types to our type map.
154  */
155 void
156 GSC_TYPEMAP_add (const uint16_t *types,
157                  unsigned int tlen)
158 {
159   unsigned int i;
160   int changed;
161
162   changed = GNUNET_NO;
163   for (i=0;i<tlen;i++)
164   {
165     if (0 == map_counters[types[i]]++)
166     {
167       my_type_map.bits[types[i] / 32] |= (1 << (types[i] % 32));
168       changed = GNUNET_YES;
169     }
170   }
171   if (GNUNET_YES == changed)
172     broadcast_my_type_map ();
173 }
174
175
176 /**
177  * Remove a set of types from our type map.
178  */
179 void
180 GSC_TYPEMAP_remove (const uint16_t *types,
181                     unsigned int tlen)
182 {
183   unsigned int i;
184   int changed;
185
186   changed = GNUNET_NO;
187   for (i=0;i<tlen;i++)
188   {
189     if (0 == --map_counters[types[i]])
190     {
191       my_type_map.bits[types[i] / 32] &= ~(1 << (types[i] % 32));
192       changed = GNUNET_YES;
193     }
194   }
195   if (GNUNET_YES == changed)
196     broadcast_my_type_map ();
197 }
198
199
200 /**
201  * Test if any of the types from the types array is in the
202  * given type map.
203  *
204  * @param map map to test
205  * @param types array of types
206  * @param tcnt number of entries in types
207  * @return GNUNET_YES if a type is in the map, GNUNET_NO if not
208  */ 
209 int
210 GSC_TYPEMAP_test_match (const struct GSC_TypeMap *tmap,
211                         const uint16_t *types,
212                         unsigned int tcnt)
213 {  
214   unsigned int i;
215
216   for (i=0;i<tcnt;i++) 
217     if (0 != (tmap->bits[types[i] / 32] & (1 << (types[i] % 32))))
218       return GNUNET_YES;
219   return GNUNET_NO;
220 }
221
222
223 /**
224  * Add additional types to a given typemap.
225  *
226  * @param map map to extend (not changed)
227  * @param types array of types to add
228  * @param tcnt number of entries in types
229  * @return updated type map (fresh copy)
230  */ 
231 struct GSC_TypeMap *
232 GSC_TYPEMAP_extend (const struct GSC_TypeMap *tmap,
233                     const uint16_t *types,
234                     unsigned int tcnt)
235 {
236   struct GSC_TypeMap *ret;
237   unsigned int i;
238
239   ret = GNUNET_malloc (sizeof (struct GSC_TypeMap));
240   if (NULL != tmap)
241     memcpy (ret, tmap, sizeof (struct GSC_TypeMap));
242   for (i=0;i<tcnt;i++)
243     ret->bits[types[i] / 32] |= (1 << (types[i] % 32));
244   return ret;
245 }
246
247
248 /**
249  * Free the given type map.
250  *
251  * @param map a type map
252  */
253 void
254 GSC_TYPEMAP_destroy (struct GSC_TypeMap *tmap)
255 {
256   GNUNET_free (tmap);
257 }
258
259
260 /**
261  * Initialize typemap subsystem.
262  */
263 void
264 GSC_TYPEMAP_init ()
265 {
266   /* nothing to do */
267 }
268
269
270 /**
271  * Shutdown typemap subsystem.
272  */
273 void
274 GSC_TYPEMAP_done ()
275 {
276   /* nothing to do */
277 }
278
279 /* end of gnunet-service-core_typemap.c */