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         char escape[10] = "\\*";
  52         double dbl = 2.0;
  53         float flt = 2222.0;
  54         uint32_t net_values[] = { 1, 2, 3 };
  55         int nr_iter = 100, ret = 0, first_event_file_created = 0;
  56         useconds_t nr_usec = 0;
  57         char *after_first_event_file_path = NULL;
  58         char *before_last_event_file_path = NULL;
  59         /*
  60          * Touch a file to indicate that all events except one were
  61          * generated.
  62          */
  63         char *before_last_event_file_path_touch = NULL;
  64         /* Touch file when we are exiting */
  65         char *before_exit_file_path_touch = NULL;
  66         /* Wait on file before exiting */
  67         char *before_exit_file_path = NULL;
  68
  69         for (i = 0; i < 3; i++) {
  70                 net_values[i] = htonl(net_values[i]);
  71         }
  72
  73         while ((option = getopt_long(argc, argv, "i:w:a:b:c:d:",
  74                         long_options, &option_index)) != -1) {
  75                 switch (option) {
  76                 case 'a':
  77                         after_first_event_file_path = strdup(optarg);
  78                         break;
  79                 case 'b':
  80                         before_last_event_file_path = strdup(optarg);
  81                         break;
  82                 case 'c':
  83                         before_last_event_file_path_touch = strdup(optarg);
  84                         break;
  85                 case 'd':
  86                         before_exit_file_path = strdup(optarg);
  87                         break;
  88                 case 'e':
  89                         before_exit_file_path_touch = strdup(optarg);
  90                         break;
  91                 case 'i':
  92                         nr_iter = atoi(optarg);
  93                         break;
  94                 case 'w':
  95                         nr_usec = atoi(optarg);
  96                         break;
  97                 case '?':
  98                         /* getopt_long already printed an error message. */
  99                 default:
 100                         ret = -1;
 101                         goto end;
 102                 }
 103         }
 104
 105         if (optind != argc) {
 106                 fprintf(stderr, "Error: takes long options only.\n");
 107
 108                 /*
 109                  * Aborting the test program for now because callers typically don't check
 110                  * the test program return value, and the transition from positional
 111                  * arguments to getopt causes hangs when caller scripts are not updated.
 112                  * An abort is easier to diagnose and fix. This is a temporary solution:
 113                  * we should eventually ensure that all scripts test and report the test
 114                  * app return values.
 115                  */
 116                 abort();
 117
 118                 ret = -1;
 119                 goto end;
 120         }
 121
 122
 123         if (set_signal_handler()) {
 124                 ret = -1;
 125                 goto end;
 126         }
 127
 128         for (i = 0; nr_iter < 0 || i < nr_iter; i++) {
 129                 if (nr_iter >= 0 && i == nr_iter - 1) {
 130                         if (before_last_event_file_path_touch) {
 131                                 ret = create_file(before_last_event_file_path_touch);
 132                                 if (ret != 0) {
 133                                         goto end;
 134                                 }
 135                         }
 136
 137                         /*
 138                          * Wait on synchronization before writing last
 139                          * event.
 140                          */
 141                         if (before_last_event_file_path) {
 142                                 ret = wait_on_file(before_last_event_file_path);
 143                                 if (ret != 0) {
 144                                         goto end;
 145                                 }
 146                         }
 147                 }
 148                 netint = htonl(i);
 149                 tracepoint(tp, tptest, i, netint, values, text,
 150                         strlen(text), escape, net_values, dbl, flt);
 151
 152                 /*
 153                  * First loop we create the file if asked to indicate
 154                  * that at least one tracepoint has been hit.
 155                  */
 156                 if (after_first_event_file_path && first_event_file_created == 0) {
 157                         ret = create_file(after_first_event_file_path);
 158
 159                         if (ret != 0) {
 160                                 goto end;
 161                         } else {
 162                                 first_event_file_created = 1;
 163                         }
 164                 }
 165
 166                 if (nr_usec) {
 167                         if (usleep_safe(nr_usec)) {
 168                                 ret = -1;
 169                                 goto end;
 170                         }
 171                 }
 172                 if (should_quit) {
 173                         break;
 174                 }
 175         }
 176
 177         if (before_exit_file_path_touch) {
 178                 ret = create_file(before_exit_file_path_touch);
 179                 if (ret != 0) {
 180                         goto end;
 181                 }
 182         }
 183         if (before_exit_file_path) {
 184                 ret = wait_on_file(before_exit_file_path);
 185                 if (ret != 0) {
 186                         goto end;
 187                 }
 188         }
 189 end:
 190         free(after_first_event_file_path);
 191         free(before_last_event_file_path);
 192         free(before_last_event_file_path_touch);
 193         free(before_exit_file_path);
 194         free(before_exit_file_path_touch);
 195         exit(!ret ? EXIT_SUCCESS : EXIT_FAILURE);
 196 }