src/monkey/gnunet-monkey.c

   1 /**[txh]********************************************************************
   2
   3   Copyright (c) 2004 by Salvador E. Tropea.
   4   Covered by the GPL license.
   5
   6   Comment:
   7   X11 example/test of the libmigdb.
   8   Run it from an X11 terminal (xterm, Eterm, etc.).
   9
  10 ***************************************************************************/
  11
  12 #include <stdio.h>
  13 #include <unistd.h> //usleep
  14 #include <libesmtp.h>
  15 #include "gdbmi.h"
  16 #include "platform.h"
  17 #include "gnunet_common.h"
  18 #include "gnunet_getopt_lib.h"
  19 #include "gnunet_program_lib.h"
  20
  21 extern void sendMail (const char *messageContents);
  22 static const char* mode;
  23 static const char* dumpFileName;
  24 static const char* binaryName;
  25 static int ret = 0;
  26
  27 void cb_console(const char *str, void *data)
  28 {
  29  printf("CONSOLE> %s\n",str);
  30 }
  31
  32 /* Note that unlike what's documented in gdb docs it isn't usable. */
  33 void cb_target(const char *str, void *data)
  34 {
  35  printf("TARGET> %s\n",str);
  36 }
  37
  38 void cb_log(const char *str, void *data)
  39 {
  40  printf("LOG> %s\n",str);
  41 }
  42
  43 void cb_to(const char *str, void *data)
  44 {
  45  printf(">> %s",str);
  46 }
  47
  48 void cb_from(const char *str, void *data)
  49 {
  50  printf("<< %s\n",str);
  51 }
  52
  53 static int async_c=0;
  54
  55 void cb_async(mi_output *o, void *data)
  56 {
  57  printf("ASYNC\n");
  58  async_c++;
  59 }
  60
  61
  62 static void dumpText(const char* message)
  63 {
  64         FILE* file = fopen(dumpFileName, "w");
  65         GNUNET_assert(NULL != file);
  66         fprintf(file,"%s", message);
  67         fclose(file);
  68 }
  69
  70
  71 void send_bug_mail(mi_stop* sr, mi_frames* f)
  72 {
  73         char *message;
  74         GNUNET_asprintf(&message,
  75                         "Bug detected in file:%s\nfunction:%s\nline:%d\nreason:%s\nreceived signal:%s\n%s\n",
  76                         f->file, f->func, f->line, mi_reason_enum_to_str(sr->reason), sr->signal_name, sr->signal_meaning);
  77         if (strcasecmp(mode, "mail") == 0)
  78                 sendMail(message);
  79         else
  80                 dumpText(message);
  81
  82         GNUNET_free (message);
  83 }
  84
  85
  86 int wait_for_stop(mi_h *h)
  87 {
  88  int res=1;
  89  mi_stop *sr;
  90  mi_frames *f;
  91
  92  while (!mi_get_response(h))
  93     usleep(1000);
  94  /* The end of the async. */
  95  sr=mi_res_stop(h);
  96  if (sr)
  97    {
  98     f = gmi_stack_info_frame(h);
  99     send_bug_mail(sr, f);
 100     mi_free_stop(sr);
 101     res = 0;
 102    }
 103  else
 104    {
 105     printf("Error while waiting\n");
 106     printf("mi_error: %d\nmi_error_from_gdb: %s\n",mi_error,mi_error_from_gdb);
 107     res=0;
 108    }
 109  return res;
 110 }
 111
 112
 113
 114 /**
 115  * Main function that will be run by the scheduler.
 116  *
 117  * @param cls closure
 118  * @param args remaining command-line arguments
 119  * @param cfgfile name of the configuration file used (for saving, can be NULL!)
 120  * @param c configuration
 121  */
 122 static void
 123 run (void *cls,
 124      char *const *args,
 125      const char *cfgfile,
 126      const struct GNUNET_CONFIGURATION_Handle *c)
 127 {
 128         mi_aux_term *xterm_tty=NULL;
 129
 130         /* This is like a file-handle for fopen.
 131             Here we have all the state of gdb "connection". */
 132          mi_h *h;
 133
 134          /* Connect to gdb child. */
 135          h=mi_connect_local();
 136          if (!h)
 137            {
 138             printf("Connect failed\n");
 139             ret = 1;
 140             return;
 141            }
 142          printf("Connected to gdb!\n");
 143
 144          /* Set all callbacks. */
 145          mi_set_console_cb(h,cb_console,NULL);
 146          mi_set_target_cb(h,cb_target,NULL);
 147          mi_set_log_cb(h,cb_log,NULL);
 148          mi_set_async_cb(h,cb_async,NULL);
 149          mi_set_to_gdb_cb(h,cb_to,NULL);
 150          mi_set_from_gdb_cb(h,cb_from,NULL);
 151
 152          /* Set the name of the child and the command line aguments. */
 153          if (!gmi_set_exec(h, binaryName, NULL))
 154            {
 155             printf("Error setting exec y args\n");
 156             mi_disconnect(h);
 157             ret = 1;
 158             return;
 159            }
 160
 161          /* Tell gdb to attach the child to a terminal. */
 162          if (!gmi_target_terminal(h, ttyname(STDIN_FILENO)))
 163            {
 164             printf("Error selecting target terminal\n");
 165             mi_disconnect(h);
 166             ret = 1;
 167             return;
 168            }
 169
 170          /* Run the program. */
 171          if (!gmi_exec_run(h))
 172            {
 173             printf("Error in run!\n");
 174             mi_disconnect(h);
 175             ret = 1;
 176             return;
 177            }
 178          /* Here we should be stopped when the program crashes */
 179          if (!wait_for_stop(h))
 180            {
 181             mi_disconnect(h);
 182             ret = 1;
 183             return;
 184            }
 185
 186          /* Continue execution. */
 187          if (!gmi_exec_continue(h))
 188            {
 189             printf("Error in continue!\n");
 190             mi_disconnect(h);
 191             ret = 1;
 192             return;
 193            }
 194          /* Here we should be terminated. */
 195          if (!wait_for_stop(h))
 196            {
 197             mi_disconnect(h);
 198             ret = 1;
 199             return;
 200            }
 201
 202          /* Exit from gdb. */
 203          gmi_gdb_exit(h);
 204          /* Close the connection. */
 205          mi_disconnect(h);
 206          /* Wait 5 seconds and close the auxiliar terminal. */
 207          printf("Waiting 5 seconds\n");
 208          sleep(5);
 209          gmi_end_aux_term(xterm_tty);
 210 }
 211
 212
 213 int main(int argc, char *argv[])
 214 {
 215         /*
 216          * FIXME:
 217          * Command should accept email address to which monkey sends the debugging report.
 218          * The email address can also be read from the configuration file.
 219          */
 220  static const struct GNUNET_GETOPT_CommandLineOption options[] = {
 221      {'m', "mode", NULL, gettext_noop ("monkey's mode of operation: options are \"text\" or \"email\""),
 222       GNUNET_YES, &GNUNET_GETOPT_set_string, &mode},
 223      {'b', "binary", NULL, gettext_noop ("binary for program to debug with monkey"),
 224       GNUNET_YES, &GNUNET_GETOPT_set_string, &binaryName},
 225      {'o', "output", NULL, gettext_noop ("path to file to dump monkey's output in case of working in text mode"),
 226       GNUNET_YES, &GNUNET_GETOPT_set_string, &dumpFileName},
 227       GNUNET_GETOPT_OPTION_END
 228    };
 229
 230  if (argc < 2) {
 231          printf("%s", "Monkey should take arguments: Use --help to get a list of options.\n");
 232          return 1;
 233  }
 234
 235  if (GNUNET_OK == GNUNET_PROGRAM_run (argc,
 236                        argv,
 237                        "gnunet-monkey",
 238                        gettext_noop
 239                        ("Automatically debug a service"),
 240                        options, &run, NULL))
 241      {
 242        return ret;
 243      }
 244
 245      return 1;
 246 }