Tell core that we want to have this packet delivered
[oweals/gnunet.git] / src / peerinfo-tool / gnunet-peerinfo.c
1 /*
2      This file is part of GNUnet.
3      (C) 2001, 2002, 2003, 2004, 2006, 2009, 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 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 peerinfo-tool/gnunet-peerinfo.c
23  * @brief Print information about other known peers.
24  * @author Christian Grothoff
25  */
26 #include "platform.h"
27 #include "gnunet_crypto_lib.h"
28 #include "gnunet_configuration_lib.h"
29 #include "gnunet_getopt_lib.h"
30 #include "gnunet_peerinfo_service.h"
31 #include "gnunet_transport_service.h"
32 #include "gnunet_program_lib.h"
33
34 static int no_resolve;
35
36 static int be_quiet;
37
38 static int get_self;
39
40 static struct GNUNET_PEERINFO_Handle *peerinfo;
41
42 static const struct GNUNET_CONFIGURATION_Handle *cfg;
43
44 struct PrintContext
45 {
46   struct GNUNET_PeerIdentity peer;
47   char **address_list;
48   unsigned int num_addresses;
49   uint32_t off;
50 };
51
52
53 static void
54 dump_pc (struct PrintContext *pc)
55 {
56   struct GNUNET_CRYPTO_HashAsciiEncoded enc;
57   unsigned int i;
58
59   GNUNET_CRYPTO_hash_to_enc (&pc->peer.hashPubKey, &enc);
60   printf (_("Peer `%s'\n"), 
61           (const char *) &enc);
62   for (i=0;i<pc->num_addresses;i++)
63     {
64       printf ("\t%s\n",
65               pc->address_list[i]);
66       GNUNET_free (pc->address_list[i]);
67     }
68   printf ("\n");
69   GNUNET_array_grow (pc->address_list,
70                      pc->num_addresses,
71                      0);
72   GNUNET_free (pc);
73 }
74
75
76 /**
77  * Function to call with a human-readable format of an address
78  *
79  * @param cls closure
80  * @param address NULL on error, otherwise 0-terminated printable UTF-8 string
81  */
82 static void
83 process_resolved_address (void *cls,
84                           const char *address)
85 {
86   struct PrintContext *pc = cls;
87
88   if (address == NULL)
89     {
90       pc->off--;
91       if (pc->off == 0)
92         dump_pc (pc);
93       return;
94     }
95   GNUNET_array_append (pc->address_list,
96                        pc->num_addresses,
97                        GNUNET_strdup (address));
98 }
99
100
101 /**
102  * Iterator callback to go over all addresses.
103  *
104  * @param cls closure
105  * @param tname name of the transport
106  * @param expiration expiration time
107  * @param addr the address
108  * @param addrlen length of the address
109  * @return GNUNET_OK to keep the address and continue
110  */
111 static int
112 count_address (void *cls,
113                const char *tname,
114                struct GNUNET_TIME_Absolute expiration,
115                const void *addr, uint16_t addrlen)
116 {
117   struct PrintContext *pc = cls;
118   pc->off++;
119   return GNUNET_OK;
120 }
121
122
123 /**
124  * Iterator callback to go over all addresses.
125  *
126  * @param cls closure
127  * @param tname name of the transport
128  * @param expiration expiration time
129  * @param addr the address
130  * @param addrlen length of the address
131  * @return GNUNET_OK to keep the address and continue
132  */
133 static int
134 print_address (void *cls,
135                const char *tname,
136                struct GNUNET_TIME_Absolute expiration,
137                const void *addr, uint16_t addrlen)
138 {
139   struct PrintContext *pc = cls;
140   GNUNET_TRANSPORT_address_lookup (cfg,
141                                    addr,
142                                    addrlen,
143                                    no_resolve,
144                                    tname,
145                                    GNUNET_TIME_UNIT_SECONDS,
146                                    &process_resolved_address,
147                                    pc);
148   return GNUNET_OK;
149 }
150
151
152 /**
153  * Print information about the peer.
154  * Currently prints the GNUNET_PeerIdentity and the IP.
155  * Could of course do more (e.g. resolve via DNS).
156  */
157 static void
158 print_peer_info (void *cls,
159                  const struct GNUNET_PeerIdentity *peer,
160                  const struct GNUNET_HELLO_Message *hello)
161 {
162   struct GNUNET_CRYPTO_HashAsciiEncoded enc;
163   struct PrintContext *pc;
164
165   if (peer == NULL)    
166     {
167       GNUNET_PEERINFO_disconnect (peerinfo);
168       fprintf (stderr,
169                _("Error in communication with PEERINFO service\n"));
170       return;    
171     }
172   if (be_quiet)
173     {
174       GNUNET_CRYPTO_hash_to_enc (&peer->hashPubKey, &enc);
175       printf ("%s\n", (const char *) &enc);
176       return;
177     }
178   pc = GNUNET_malloc (sizeof (struct PrintContext));
179   pc->peer = *peer;  
180   GNUNET_HELLO_iterate_addresses (hello, GNUNET_NO, &count_address, pc);
181   if (0 == pc->off)
182     {
183       dump_pc (pc);
184       return;
185     }
186   GNUNET_HELLO_iterate_addresses (hello, GNUNET_NO, &print_address, pc);
187 }
188
189
190 /**
191  * Main function that will be run by the scheduler.
192  *
193  * @param cls closure
194  * @param args remaining command-line arguments
195  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
196  * @param c configuration
197  */
198 static void
199 run (void *cls,
200      char *const *args,
201      const char *cfgfile, 
202      const struct GNUNET_CONFIGURATION_Handle *c)
203 {
204   struct GNUNET_CRYPTO_RsaPrivateKey *priv;
205   struct GNUNET_CRYPTO_RsaPublicKeyBinaryEncoded pub;
206   struct GNUNET_PeerIdentity pid;
207   struct GNUNET_CRYPTO_HashAsciiEncoded enc;
208   char *fn;
209
210   cfg = c;
211   if (args[0] != NULL)
212     {
213       fprintf (stderr,
214                _("Invalid command line argument `%s'\n"),
215                args[0]);
216       return;    
217     }
218   if (get_self != GNUNET_YES)
219     {
220       peerinfo = GNUNET_PEERINFO_connect (cfg);
221       if (peerinfo == NULL)
222         {
223           fprintf (stderr,
224                    _("Could not access PEERINFO service.  Exiting.\n"));
225           return;
226         }
227       (void) GNUNET_PEERINFO_iterate (peerinfo,
228                                       NULL,
229                                       GNUNET_TIME_relative_multiply
230                                       (GNUNET_TIME_UNIT_SECONDS, 2),
231                                       &print_peer_info, NULL);
232     }
233   else
234     {
235       if (GNUNET_OK !=
236           GNUNET_CONFIGURATION_get_value_filename (cfg,
237                                                    "GNUNETD",
238                                                    "HOSTKEY", &fn))
239         {
240           fprintf (stderr, 
241                    _("Could not find option `%s:%s' in configuration.\n"), 
242                    "GNUNETD",
243                    "HOSTKEYFILE");
244           return;
245         }
246       priv = GNUNET_CRYPTO_rsa_key_create_from_file (fn);
247       if (priv == NULL)
248         {
249           fprintf (stderr, _("Loading hostkey from `%s' failed.\n"), fn);
250           GNUNET_free (fn);
251           return;
252         }
253       GNUNET_free (fn);
254       GNUNET_CRYPTO_rsa_key_get_public (priv, &pub);
255       GNUNET_CRYPTO_rsa_key_free (priv);
256       GNUNET_CRYPTO_hash (&pub, sizeof (pub), &pid.hashPubKey);
257       GNUNET_CRYPTO_hash_to_enc (&pid.hashPubKey, &enc);
258       if (be_quiet)
259         printf ("%s\n", (char *) &enc);
260       else
261         printf (_("I am peer `%s'.\n"), (const char *) &enc);
262     }
263 }
264
265
266 /**
267  * The main function to obtain peer information.
268  *
269  * @param argc number of arguments from the command line
270  * @param argv command line arguments
271  * @return 0 ok, 1 on error
272  */
273 int
274 main (int argc, char *const *argv)
275 {
276   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
277     {'n', "numeric", NULL,
278      gettext_noop ("don't resolve host names"),
279      0, &GNUNET_GETOPT_set_one, &no_resolve},
280     {'q', "quiet", NULL,
281      gettext_noop ("output only the identity strings"),
282      0, &GNUNET_GETOPT_set_one, &be_quiet},
283     {'s', "self", NULL,
284      gettext_noop ("output our own identity only"),
285      0, &GNUNET_GETOPT_set_one, &get_self},
286     GNUNET_GETOPT_OPTION_END
287   };
288   return (GNUNET_OK ==
289           GNUNET_PROGRAM_run (argc,
290                               argv,
291                               "gnunet-peerinfo",
292                               gettext_noop ("Print information about peers."),
293                               options, &run, NULL)) ? 0 : 1;
294 }
295
296 /* end of gnunet-peerinfo.c */