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

   1 /*
   2  * Copyright (C) - 2012 David Goulet <dgoulet@efficios.com>
   3  *
   4  * This library is free software; you can redistribute it and/or modify it
   5  * under the terms of the GNU Lesser General Public License as published by the
   6  * Free Software Foundation; version 2.1 of the License.
   7  *
   8  * This library is distributed in the hope that it will be useful, but WITHOUT
   9  * ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or
  10  * FITNESS FOR A PARTICULAR PURPOSE.  See the GNU Lesser General Public License
  11  * for more details.
  12  *
  13  * You should have received a copy of the GNU Lesser General Public License
  14  * along with this library; if not, write to the Free Software Foundation,
  15  * Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301 USA
  16  */
  17
  18 #define _LGPL_SOURCE
  19 #include <getopt.h>
  20 #include <assert.h>
  21 #include <arpa/inet.h>
  22 #include <fcntl.h>
  23 #include <stdarg.h>
  24 #include <stdio.h>
  25 #include <stdlib.h>
  26 #include <string.h>
  27 #include <sys/mman.h>
  28 #include <sys/stat.h>
  29 #include <sys/types.h>
  30 #include <unistd.h>
  31 #include <stdbool.h>
  32 #include <signal.h>
  33 #include <poll.h>
  34 #include <errno.h>
  35 #include "utils.h"
  36 #include "signal-helper.h"
  37
  38 #define TRACEPOINT_DEFINE
  39 #include "tp.h"
  40
  41 static
  42 int create_file(const char *path)
  43 {
  44         int ret;
  45
  46         if (!path) {
  47                 return -1;
  48         }
  49
  50         ret = creat(path, S_IRWXU);
  51         if (ret < 0) {
  52                 perror("creat");
  53                 return -1;
  54         }
  55
  56         ret = close(ret);
  57         if (ret < 0) {
  58                 perror("close");
  59                 return -1;
  60         }
  61
  62         return 0;
  63 }
  64
  65 static
  66 int wait_on_file(const char *path)
  67 {
  68         int ret;
  69         struct stat buf;
  70
  71         if (!path) {
  72                 return -1;
  73         }
  74
  75         for (;;) {
  76                 ret = stat(path, &buf);
  77                 if (ret == -1 && errno == ENOENT) {
  78                         ret = poll(NULL, 0, 10);        /* 10 ms delay */
  79                         /* Should return 0 everytime */
  80                         if (ret) {
  81                                 if (ret < 0) {
  82                                         perror("perror");
  83                                 } else {
  84                                         fprintf(stderr,
  85                                                 "poll return value is larger than zero\n");
  86                                 }
  87                                 return -1;
  88                         }
  89                         continue;                       /* retry */
  90                 }
  91                 if (ret) {
  92                         perror("stat");
  93                         return -1;
  94                 }
  95                 break;  /* found */
  96         }
  97
  98         return 0;
  99 }
 100
 101 static struct option long_options[] =
 102 {
 103         /* These options set a flag. */
 104         {"iter", required_argument, 0, 'i'},
 105         {"wait", required_argument, 0, 'w'},
 106         {"sync-after-first-event", required_argument, 0, 'a'},
 107         {"sync-before-last-event", required_argument, 0, 'b'},
 108         {"sync-before-last-event-touch", required_argument, 0, 'c'},
 109         {0, 0, 0, 0}
 110 };
 111
 112 int main(int argc, char **argv)
 113 {
 114         unsigned int i, netint;
 115         int option_index;
 116         char option_char;
 117         long values[] = { 1, 2, 3 };
 118         char text[10] = "test";
 119         double dbl = 2.0;
 120         float flt = 2222.0;
 121         int nr_iter = 100, ret = 0, first_event_file_created = 0;
 122         useconds_t nr_usec = 0;
 123         char *after_first_event_file_path = NULL;
 124         char *before_last_event_file_path = NULL;
 125         /*
 126          * Touch a file to indicate that all events except one were
 127          * generated.
 128          */
 129         char *before_last_event_file_path_touch = NULL;
 130
 131         while((option_char = getopt_long(argc, argv, "i:w:a:b:c:d:", long_options, &option_index)) != -1) {
 132                 switch (option_char) {
 133                 case 'a':
 134                         after_first_event_file_path = strdup(optarg);
 135                         break;
 136                 case 'b':
 137                         before_last_event_file_path = strdup(optarg);
 138                         break;
 139                 case 'c':
 140                         before_last_event_file_path_touch = strdup(optarg);
 141                         break;
 142                 case 'i':
 143                         nr_iter = atoi(optarg);
 144                         break;
 145                 case 'w':
 146                         nr_usec = atoi(optarg);
 147                         break;
 148                 case '?':
 149                         /* getopt_long already printed an error message. */
 150                         break;
 151                 default:
 152                         ret = -1;
 153                         goto end;
 154                 }
 155         }
 156
 157         if (optind != argc) {
 158                 fprintf(stderr, "Error: takes long options only.");
 159                 ret = -1;
 160                 goto end;
 161         }
 162
 163
 164         if (set_signal_handler()) {
 165                 ret = -1;
 166                 goto end;
 167         }
 168
 169         for (i = 0; nr_iter < 0 || i < nr_iter; i++) {
 170                 if (nr_iter >= 0 && i == nr_iter - 1) {
 171                         /*
 172                          * Wait on synchronization before writing last
 173                          * event.
 174                          */
 175                         if (before_last_event_file_path_touch) {
 176                                 ret = create_file(before_last_event_file_path_touch);
 177                                 if (ret != 0) {
 178                                         goto end;
 179                                 }
 180                         }
 181                         if (before_last_event_file_path) {
 182                                 ret = wait_on_file(before_last_event_file_path);
 183                                 if (ret != 0) {
 184                                         goto end;
 185                                 }
 186                         }
 187                 }
 188                 netint = htonl(i);
 189                 tracepoint(tp, tptest, i, netint, values, text,
 190                         strlen(text), dbl, flt);
 191
 192                 /*
 193                  * First loop we create the file if asked to indicate
 194                  * that at least one tracepoint has been hit.
 195                  */
 196                 if (after_first_event_file_path && first_event_file_created == 0) {
 197                         ret = create_file(after_first_event_file_path);
 198
 199                         if (ret != 0) {
 200                                 goto end;
 201                         } else {
 202                                 first_event_file_created = 1;
 203                         }
 204                 }
 205
 206                 if (nr_usec) {
 207                         if (usleep_safe(nr_usec)) {
 208                                 ret = -1;
 209                                 goto end;
 210                         }
 211                 }
 212                 if (should_quit) {
 213                         break;
 214                 }
 215         }
 216
 217 end:
 218         free(after_first_event_file_path);
 219         free(before_last_event_file_path);
 220         free(before_last_event_file_path_touch);
 221         exit(!ret ? EXIT_SUCCESS : EXIT_FAILURE);
 222 }