tests/utils/testapp/gen-ust-events/gen-ust-events.c

   1 /*
   2  * Copyright (C) 2012 David Goulet <dgoulet@efficios.com>
   3  *
   4  * SPDX-License-Identifier: LGPL-2.1-only
   5  *
   6  */
   7
   8 #define _LGPL_SOURCE
   9 #include <getopt.h>
  10 #include <assert.h>
  11 #include <arpa/inet.h>
  12 #include <fcntl.h>
  13 #include <stdarg.h>
  14 #include <stdio.h>
  15 #include <stdlib.h>
  16 #include <string.h>
  17 #include <sys/mman.h>
  18 #include <sys/stat.h>
  19 #include <sys/types.h>
  20 #include <unistd.h>
  21 #include <stdbool.h>
  22 #include <signal.h>
  23 #include <poll.h>
  24 #include <errno.h>
  25 #include "utils.h"
  26 #include "signal-helper.h"
  27
  28 #define TRACEPOINT_DEFINE
  29 #include "tp.h"
  30
  31 static struct option long_options[] =
  32 {
  33         /* These options set a flag. */
  34         {"iter", required_argument, 0, 'i'},
  35         {"wait", required_argument, 0, 'w'},
  36         {"sync-after-first-event", required_argument, 0, 'a'},
  37         {"sync-before-last-event", required_argument, 0, 'b'},
  38         {"sync-before-last-event-touch", required_argument, 0, 'c'},
  39         {"sync-before-exit", required_argument, 0, 'd'},
  40         {"sync-before-exit-touch", required_argument, 0, 'e'},
  41         {0, 0, 0, 0}
  42 };
  43
  44 int main(int argc, char **argv)
  45 {
  46         unsigned int i, netint;
  47         int option_index;
  48         int option;
  49         long values[] = { 1, 2, 3 };
  50         char text[10] = "test";
  51         double dbl = 2.0;
  52         float flt = 2222.0;
  53         int nr_iter = 100, ret = 0, first_event_file_created = 0;
  54         useconds_t nr_usec = 0;
  55         char *after_first_event_file_path = NULL;
  56         char *before_last_event_file_path = NULL;
  57         /*
  58          * Touch a file to indicate that all events except one were
  59          * generated.
  60          */
  61         char *before_last_event_file_path_touch = NULL;
  62         /* Touch file when we are exiting */
  63         char *before_exit_file_path_touch = NULL;
  64         /* Wait on file before exiting */
  65         char *before_exit_file_path = NULL;
  66
  67         while ((option = getopt_long(argc, argv, "i:w:a:b:c:d:",
  68                         long_options, &option_index)) != -1) {
  69                 switch (option) {
  70                 case 'a':
  71                         after_first_event_file_path = strdup(optarg);
  72                         break;
  73                 case 'b':
  74                         before_last_event_file_path = strdup(optarg);
  75                         break;
  76                 case 'c':
  77                         before_last_event_file_path_touch = strdup(optarg);
  78                         break;
  79                 case 'd':
  80                         before_exit_file_path = strdup(optarg);
  81                         break;
  82                 case 'e':
  83                         before_exit_file_path_touch = strdup(optarg);
  84                         break;
  85                 case 'i':
  86                         nr_iter = atoi(optarg);
  87                         break;
  88                 case 'w':
  89                         nr_usec = atoi(optarg);
  90                         break;
  91                 case '?':
  92                         /* getopt_long already printed an error message. */
  93                 default:
  94                         ret = -1;
  95                         goto end;
  96                 }
  97         }
  98
  99         if (optind != argc) {
 100                 fprintf(stderr, "Error: takes long options only.\n");
 101
 102                 /*
 103                  * Aborting the test program for now because callers typically don't check
 104                  * the test program return value, and the transition from positional
 105                  * arguments to getopt causes hangs when caller scripts are not updated.
 106                  * An abort is easier to diagnose and fix. This is a temporary solution:
 107                  * we should eventually ensure that all scripts test and report the test
 108                  * app return values.
 109                  */
 110                 abort();
 111
 112                 ret = -1;
 113                 goto end;
 114         }
 115
 116
 117         if (set_signal_handler()) {
 118                 ret = -1;
 119                 goto end;
 120         }
 121
 122         for (i = 0; nr_iter < 0 || i < nr_iter; i++) {
 123                 if (nr_iter >= 0 && i == nr_iter - 1) {
 124                         if (before_last_event_file_path_touch) {
 125                                 ret = create_file(before_last_event_file_path_touch);
 126                                 if (ret != 0) {
 127                                         goto end;
 128                                 }
 129                         }
 130
 131                         /*
 132                          * Wait on synchronization before writing last
 133                          * event.
 134                          */
 135                         if (before_last_event_file_path) {
 136                                 ret = wait_on_file(before_last_event_file_path);
 137                                 if (ret != 0) {
 138                                         goto end;
 139                                 }
 140                         }
 141                 }
 142                 netint = htonl(i);
 143                 tracepoint(tp, tptest, i, netint, values, text,
 144                         strlen(text), dbl, flt);
 145
 146                 /*
 147                  * First loop we create the file if asked to indicate
 148                  * that at least one tracepoint has been hit.
 149                  */
 150                 if (after_first_event_file_path && first_event_file_created == 0) {
 151                         ret = create_file(after_first_event_file_path);
 152
 153                         if (ret != 0) {
 154                                 goto end;
 155                         } else {
 156                                 first_event_file_created = 1;
 157                         }
 158                 }
 159
 160                 if (nr_usec) {
 161                         if (usleep_safe(nr_usec)) {
 162                                 ret = -1;
 163                                 goto end;
 164                         }
 165                 }
 166                 if (should_quit) {
 167                         break;
 168                 }
 169         }
 170
 171         if (before_exit_file_path_touch) {
 172                 ret = create_file(before_exit_file_path_touch);
 173                 if (ret != 0) {
 174                         goto end;
 175                 }
 176         }
 177         if (before_exit_file_path) {
 178                 ret = wait_on_file(before_exit_file_path);
 179                 if (ret != 0) {
 180                         goto end;
 181                 }
 182         }
 183 end:
 184         free(after_first_event_file_path);
 185         free(before_last_event_file_path);
 186         free(before_last_event_file_path_touch);
 187         free(before_exit_file_path);
 188         free(before_exit_file_path_touch);
 189         exit(!ret ? EXIT_SUCCESS : EXIT_FAILURE);
 190 }