-fixing #2546
[oweals/gnunet.git] / src / arm / gnunet-arm.c
1 /*
2      This file is part of GNUnet.
3      (C) 2009 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 arm/gnunet-arm.c
23  * @brief arm for writing a tool
24  * @author Christian Grothoff
25  */
26 #include "platform.h"
27 #include "gnunet_arm_service.h"
28 #include "gnunet_constants.h"
29 #include "gnunet_util_lib.h"
30
31 /**
32  * Timeout for stopping services.  Long to give some services a real chance.
33  */
34 #define STOP_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 1)
35
36 /**
37  * Timeout for stopping ARM.  Extra-long since ARM needs to stop everyone else.
38  */
39 #define STOP_TIMEOUT_ARM GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_MINUTES, 2)
40
41 /**
42  * Timeout for starting services, very short because of the strange way start works
43  * (by checking if running before starting, so really this time is always waited on
44  * startup (annoying)).
45  */
46 #define START_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 1)
47
48 /**
49  * Timeout for listing all running services.
50  */
51 #define LIST_TIMEOUT GNUNET_TIME_relative_multiply (GNUNET_TIME_UNIT_SECONDS, 2)
52
53 /**
54  * Set if we are to shutdown all services (including ARM).
55  */
56 static int end;
57
58 /**
59  * Set if we are to start default services (including ARM).
60  */
61 static int start;
62
63 /**
64  * Set if we are to stop/start default services (including ARM).
65  */
66 static int restart;
67
68 /**
69  * Set if we should delete configuration and temp directory on exit.
70  */
71 static int delete;
72
73 /**
74  * Set if we should not print status messages.
75  */
76 static int quiet;
77
78 /**
79  * Set if we should print a list of currently running services.
80  */
81 static int list;
82
83 /**
84  * Set to the name of a service to start.
85  */
86 static char *init;
87
88 /**
89  * Set to the name of a service to kill.
90  */
91 static char *term;
92
93 /**
94  * Set to the name of the config file used.
95  */
96 static const char *config_file;
97
98 /**
99  * Set to the directory where runtime files are stored.
100  */
101 static char *dir;
102
103 /**
104  * Final status code.
105  */
106 static int ret;
107
108 /**
109  * Connection with ARM.
110  */
111 static struct GNUNET_ARM_Handle *h;
112
113 /**
114  * Our configuration.
115  */
116 static const struct GNUNET_CONFIGURATION_Handle *cfg;
117
118 /**
119  * Processing stage that we are in.  Simple counter.
120  */
121 static unsigned int phase;
122
123 /**
124  * User defined timestamp for completing operations.
125  */
126 static struct GNUNET_TIME_Relative timeout;
127
128
129 /**
130  * Do we want to give our stdout to gnunet-service-arm?
131  */
132 static unsigned int no_stdout = 0;
133
134 /**
135  * Do we want to give our stderr to gnunet-service-arm?
136  */
137 static unsigned int no_stderr = 0;
138
139 /**
140  * Main continuation-passing-style loop.  Runs the various
141  * jobs that we've been asked to do in order.
142  *
143  * @param cls closure, unused
144  * @param tc context, unused
145  */
146 static void
147 cps_loop (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc);
148
149
150 /**
151  * Callback invoked with the status of the last operation.  Reports to the
152  * user and then runs the next phase in the FSM.
153  *
154  * @param cls pointer to "const char*" identifying service that was manipulated
155  * @param result result of the operation
156  */
157 static void
158 confirm_cb (void *cls, 
159             enum GNUNET_ARM_ProcessStatus result)
160 {
161   const char *service = cls;
162
163   switch (result)
164   {
165   case GNUNET_ARM_PROCESS_UNKNOWN:
166     FPRINTF (stderr, _("Service `%s' is unknown to ARM.\n"), service);
167     ret = 1;
168     break;
169   case GNUNET_ARM_PROCESS_DOWN:
170     if (quiet != GNUNET_YES)
171       FPRINTF (stdout, _("Service `%s' has been stopped.\n"), service);
172     break;
173   case GNUNET_ARM_PROCESS_ALREADY_RUNNING:
174     FPRINTF (stderr, _("Service `%s' was already running.\n"), service);
175     ret = 1;
176     break;
177   case GNUNET_ARM_PROCESS_STARTING:
178     if (quiet != GNUNET_YES)
179       FPRINTF (stdout, _("Service `%s' has been started.\n"), service);
180     break;
181   case GNUNET_ARM_PROCESS_ALREADY_STOPPING:
182     FPRINTF (stderr, _("Service `%s' was already being stopped.\n"), service);
183     ret = 1;
184     break;
185   case GNUNET_ARM_PROCESS_ALREADY_DOWN:
186     FPRINTF (stderr, _("Service `%s' was already not running.\n"), service);
187     ret = 1;
188     break;
189   case GNUNET_ARM_PROCESS_SHUTDOWN:
190     FPRINTF (stderr, "%s", _("Request ignored as ARM is shutting down.\n"));
191     ret = 1;
192     break;
193   case GNUNET_ARM_PROCESS_COMMUNICATION_ERROR:
194     FPRINTF (stderr, "%s", _("Error communicating with ARM service.\n"));
195     ret = 1;
196     break;
197   case GNUNET_ARM_PROCESS_COMMUNICATION_TIMEOUT:
198     FPRINTF (stderr, "%s",  _("Timeout communicating with ARM service.\n"));
199     ret = 1;
200     break;
201   case GNUNET_ARM_PROCESS_FAILURE:
202     FPRINTF (stderr, "%s",  _("Operation failed.\n"));
203     ret = 1;
204     break;
205   default:
206     FPRINTF (stderr, "%s",  _("Unknown response code from ARM.\n"));
207     break;
208   }
209   GNUNET_SCHEDULER_add_continuation (&cps_loop, NULL,
210                                      GNUNET_SCHEDULER_REASON_PREREQ_DONE);
211 }
212
213 /**
214  * Callback invoked with the list of running services.  
215  * Reports to the user and then runs the next phase in the FSM.
216  *
217  * @param cls currently not used
218  * @param result result of the operation
219  * @param count number of running services
220  * @param list copy of the list of running services
221  */
222 static void
223 list_cb (void *cls, int result, unsigned int count, const char *const*list)
224 {
225   unsigned int i;
226
227   if ( (result != GNUNET_YES) || (NULL == list) )
228   {
229     FPRINTF (stderr, "%s", _("Error communicating with ARM. ARM not running?\n"));
230     return;
231   }
232   FPRINTF (stdout, "%s", _("Running services:\n"));
233   for (i=0; i<count; i++)
234     FPRINTF (stdout, "%s\n", list[i]);
235 }
236
237 /**
238  * Main function that will be run by the scheduler.
239  *
240  * @param cls closure
241  * @param args remaining command-line arguments
242  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
243  * @param c configuration
244  */
245 static void
246 run (void *cls, char *const *args, const char *cfgfile,
247      const struct GNUNET_CONFIGURATION_Handle *c)
248 {
249   cfg = c;
250   config_file = cfgfile;
251   if (GNUNET_CONFIGURATION_get_value_string
252       (cfg, "PATHS", "SERVICEHOME", &dir) != GNUNET_OK)
253     {
254       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
255                   _
256                   ("Fatal configuration error: `%s' option in section `%s' missing.\n"),
257                   "SERVICEHOME", "PATHS");
258       return;
259     }
260   h = GNUNET_ARM_connect (cfg, NULL);
261   if (h == NULL)
262     {
263       GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
264                   _("Fatal error initializing ARM API.\n"));
265       ret = 1;
266       return;
267     }
268   GNUNET_SCHEDULER_add_continuation (&cps_loop, NULL,
269                                      GNUNET_SCHEDULER_REASON_PREREQ_DONE);
270 }
271
272 /**
273  * Attempts to delete configuration file and SERVICEHOME
274  * on arm shutdown provided the end and delete options
275  * were specified when gnunet-arm was run.
276  */
277 static void
278 delete_files ()
279 {
280   GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
281               "Will attempt to remove configuration file %s and service directory %s\n",
282               config_file, dir);
283
284   if (UNLINK (config_file) != 0)
285     {
286       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
287                   _("Failed to remove configuration file %s\n"), config_file);
288     }
289
290   if (GNUNET_DISK_directory_remove (dir) != GNUNET_OK)
291     {
292       GNUNET_log (GNUNET_ERROR_TYPE_WARNING,
293                   _("Failed to remove servicehome directory %s\n"), dir);
294
295     }
296 }
297
298 /**
299  * Main continuation-passing-style loop.  Runs the various
300  * jobs that we've been asked to do in order.
301  *
302  * @param cls closure, unused
303  * @param tc context, unused
304  */
305 static void
306 cps_loop (void *cls, const struct GNUNET_SCHEDULER_TaskContext *tc)
307 {
308   while (1)
309     {
310       switch (phase++)
311         {
312         case 0:
313           if (term != NULL)
314             {
315               GNUNET_ARM_stop_service (h, term,
316                                        (0 ==
317                                         timeout.rel_value) ? STOP_TIMEOUT :
318                                        timeout, &confirm_cb, term);
319               return;
320             }
321           break;
322         case 1:
323           if ((end) || (restart))
324             {
325               GNUNET_ARM_stop_service (h, "arm",
326                                        (0 ==
327                                         timeout.rel_value) ? STOP_TIMEOUT_ARM
328                                        : timeout, &confirm_cb, "arm");
329               return;
330             }
331           break;
332         case 2:
333           if (start)
334             {
335               GNUNET_ARM_start_service (h, "arm",
336                                         (no_stdout ? 0 : GNUNET_OS_INHERIT_STD_OUT) |
337                                         (no_stderr ? 0 : GNUNET_OS_INHERIT_STD_ERR),
338                                         (0 ==
339                                          timeout.rel_value) ? START_TIMEOUT :
340                                         timeout, &confirm_cb, "arm");
341               return;
342             }
343           break;
344         case 3:
345           if (init != NULL)
346             {
347               GNUNET_ARM_start_service (h, init,
348                                         (no_stdout ? 0 : GNUNET_OS_INHERIT_STD_OUT) |
349                                         (no_stderr ? 0 : GNUNET_OS_INHERIT_STD_ERR),
350                                         (0 ==
351                                          timeout.rel_value) ? START_TIMEOUT :
352                                         timeout, &confirm_cb, init);
353               return;
354             }
355           break;
356         case 4:
357           if (restart)
358             {
359               GNUNET_ARM_disconnect (h);
360               phase = 0;
361               end = 0;
362               start = 1;
363               restart = 0;
364               h = GNUNET_ARM_connect (cfg, NULL);
365               if (NULL == h)
366                 {
367                   GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
368                               _("Fatal error initializing ARM API.\n"));
369                   ret = 1;
370                   return;
371                 }
372               GNUNET_SCHEDULER_add_now (&cps_loop, NULL);
373               return;
374             }
375           break;
376         case 5:
377           if (list) {
378               GNUNET_log (GNUNET_ERROR_TYPE_DEBUG,
379               "Going to list all running services controlled by ARM.\n");
380   
381               if (NULL == h) 
382               {
383                GNUNET_log (GNUNET_ERROR_TYPE_ERROR,
384                               _("Fatal error initializing ARM API.\n"));
385                return;
386               }
387               
388               GNUNET_ARM_list_running_services (h, 
389                                                 (0 == 
390                                                  timeout.rel_value) ? LIST_TIMEOUT : 
391                                                  timeout, &list_cb, NULL);
392             return;
393           }
394           /* Fall through */
395         default:                /* last phase */
396           GNUNET_ARM_disconnect (h);
397           if ((end == GNUNET_YES) && (delete == GNUNET_YES))
398             delete_files ();
399           return;
400         }
401     }
402 }
403
404
405 /**
406  * The main function to obtain arm from gnunetd.
407  *
408  * @param argc number of arguments from the command line
409  * @param argv command line arguments
410  * @return 0 ok, 1 on error
411  */
412 int
413 main (int argc, char *const *argv)
414 {
415   static const struct GNUNET_GETOPT_CommandLineOption options[] = {
416     {'e', "end", NULL, gettext_noop ("stop all GNUnet services"),
417      GNUNET_NO, &GNUNET_GETOPT_set_one, &end},
418     {'i', "init", "SERVICE", gettext_noop ("start a particular service"),
419      GNUNET_YES, &GNUNET_GETOPT_set_string, &init},
420     {'k', "kill", "SERVICE", gettext_noop ("stop a particular service"),
421      GNUNET_YES, &GNUNET_GETOPT_set_string, &term},
422     {'s', "start", NULL, gettext_noop ("start all GNUnet default services"),
423      GNUNET_NO, &GNUNET_GETOPT_set_one, &start},
424     {'r', "restart", NULL,
425      gettext_noop ("stop and start all GNUnet default services"),
426      GNUNET_NO, &GNUNET_GETOPT_set_one, &restart},
427     {'d', "delete", NULL,
428      gettext_noop ("delete config file and directory on exit"),
429      GNUNET_NO, &GNUNET_GETOPT_set_one, &delete},
430     {'q', "quiet", NULL, gettext_noop ("don't print status messages"),
431      GNUNET_NO, &GNUNET_GETOPT_set_one, &quiet},
432     {'T', "timeout", NULL,
433      gettext_noop ("timeout for completing current operation"),
434      GNUNET_YES, &GNUNET_GETOPT_set_relative_time, &timeout},
435     {'I', "info", NULL, gettext_noop ("List currently running services"),
436      GNUNET_NO, &GNUNET_GETOPT_set_one, &list},
437     {'O', "no-stdout", NULL, gettext_noop ("Don't let gnunet-service-arm inherit standard output"),
438      GNUNET_NO, &GNUNET_GETOPT_set_one, &no_stdout},
439     {'E', "no-stderr", NULL, gettext_noop ("Don't let gnunet-service-arm inherit standard error"),
440      GNUNET_NO, &GNUNET_GETOPT_set_one, &no_stderr},
441     GNUNET_GETOPT_OPTION_END
442   };
443
444   if (GNUNET_OK != GNUNET_STRINGS_get_utf8_args (argc, argv, &argc, &argv))
445     return 2;
446
447   if (GNUNET_OK ==
448       GNUNET_PROGRAM_run (argc, argv, "gnunet-arm",
449                           gettext_noop
450                           ("Control services and the Automated Restart Manager (ARM)"),
451                           options, &run, NULL))
452     {
453       return ret;
454     }
455
456   return 1;
457 }
458
459 /* end of gnunet-arm.c */