src/backends.c

   1 #include "common.h"
   2
   3 #define BACKEND_SOURCE_DATA_AS_COLLECTED 0x00000001
   4 #define BACKEND_SOURCE_DATA_AVERAGE      0x00000002
   5 #define BACKEND_SOURCE_DATA_SUM          0x00000004
   6
   7 int connect_to_socket4(const char *ip, int port) {
   8     int sock;
   9
  10     debug(D_LISTENER, "IPv4 connecting to ip '%s' port %d", ip, port);
  11
  12     sock = socket(AF_INET, SOCK_STREAM, 0);
  13     if(sock < 0) {
  14         error("IPv4 socket() on ip '%s' port %d failed.", ip, port);
  15         return -1;
  16     }
  17
  18     struct sockaddr_in name;
  19     memset(&name, 0, sizeof(struct sockaddr_in));
  20     name.sin_family = AF_INET;
  21     name.sin_port = htons(port);
  22
  23     int ret = inet_pton(AF_INET, ip, (void *)&name.sin_addr.s_addr);
  24     if(ret != 1) {
  25         error("Failed to convert '%s' to a valid IPv4 address.", ip);
  26         close(sock);
  27         return -1;
  28     }
  29
  30     if(connect(sock, (struct sockaddr *) &name, sizeof(name)) < 0) {
  31         close(sock);
  32         error("IPv4 failed to connect to '%s', port %d", ip, port);
  33         return -1;
  34     }
  35
  36     debug(D_LISTENER, "Connected to IPv4 ip '%s' port %d", ip, port);
  37     return sock;
  38 }
  39
  40 int connect_to_socket6(const char *ip, int port) {
  41     int sock = -1;
  42     int ipv6only = 1;
  43
  44     debug(D_LISTENER, "IPv6 connecting to ip '%s' port %d", ip, port);
  45
  46     sock = socket(AF_INET6, SOCK_STREAM, 0);
  47     if (sock < 0) {
  48         error("IPv6 socket() on ip '%s' port %d failed.", ip, port);
  49         return -1;
  50     }
  51
  52     /* IPv6 only */
  53     if(setsockopt(sock, IPPROTO_IPV6, IPV6_V6ONLY, (void*)&ipv6only, sizeof(ipv6only)) != 0)
  54         error("Cannot set IPV6_V6ONLY on ip '%s' port's %d.", ip, port);
  55
  56     struct sockaddr_in6 name;
  57     memset(&name, 0, sizeof(struct sockaddr_in6));
  58     name.sin6_family = AF_INET6;
  59     name.sin6_port = htons ((uint16_t) port);
  60
  61     int ret = inet_pton(AF_INET6, ip, (void *)&name.sin6_addr.s6_addr);
  62     if(ret != 1) {
  63         error("Failed to convert IP '%s' to a valid IPv6 address.", ip);
  64         close(sock);
  65         return -1;
  66     }
  67
  68     name.sin6_scope_id = 0;
  69
  70     if(connect(sock, (struct sockaddr *)&name, sizeof(name)) < 0) {
  71         close(sock);
  72         error("IPv6 failed to connect to '%s', port %d", ip, port);
  73         return -1;
  74     }
  75
  76     debug(D_LISTENER, "Connected to IPv6 ip '%s' port %d", ip, port);
  77     return sock;
  78 }
  79
  80
  81 static inline int connect_to_one(const char *definition, int default_port) {
  82     struct addrinfo hints;
  83     struct addrinfo *result = NULL, *rp = NULL;
  84
  85     char buffer[strlen(definition) + 1];
  86     strcpy(buffer, definition);
  87
  88     char buffer2[10 + 1];
  89     snprintfz(buffer2, 10, "%d", default_port);
  90
  91     char *ip = buffer, *port = buffer2;
  92
  93     char *e = ip;
  94     if(*e == '[') {
  95         e = ++ip;
  96         while(*e && *e != ']') e++;
  97         if(*e == ']') {
  98             *e = '\0';
  99             e++;
 100         }
 101     }
 102     else {
 103         while(*e && *e != ':') e++;
 104     }
 105
 106     if(*e == ':') {
 107         port = e + 1;
 108         *e = '\0';
 109     }
 110
 111     if(!*ip)
 112         return -1;
 113
 114     if(!*port)
 115         port = buffer2;
 116
 117     memset(&hints, 0, sizeof(struct addrinfo));
 118     hints.ai_family = AF_UNSPEC;    /* Allow IPv4 or IPv6 */
 119     hints.ai_socktype = SOCK_DGRAM; /* Datagram socket */
 120     hints.ai_flags = AI_PASSIVE;    /* For wildcard IP address */
 121     hints.ai_protocol = 0;          /* Any protocol */
 122     hints.ai_canonname = NULL;
 123     hints.ai_addr = NULL;
 124     hints.ai_next = NULL;
 125
 126     int r = getaddrinfo(ip, port, &hints, &result);
 127     if (r != 0) {
 128         error("Cannot resolve host '%s', port '%s': %s\n", ip, port, gai_strerror(r));
 129         return -1;
 130     }
 131
 132     int fd = -1;
 133     for (rp = result; rp != NULL && fd == -1; rp = rp->ai_next) {
 134         char rip[INET_ADDRSTRLEN + INET6_ADDRSTRLEN] = "INVALID";
 135         int rport;
 136
 137         switch (rp->ai_addr->sa_family) {
 138             case AF_INET: {
 139                 struct sockaddr_in *sin = (struct sockaddr_in *) rp->ai_addr;
 140                 inet_ntop(AF_INET, &sin->sin_addr, rip, INET_ADDRSTRLEN);
 141                 rport = ntohs(sin->sin_port);
 142                 fd = connect_to_socket4(rip, rport);
 143                 break;
 144             }
 145
 146             case AF_INET6: {
 147                 struct sockaddr_in6 *sin6 = (struct sockaddr_in6 *) rp->ai_addr;
 148                 inet_ntop(AF_INET6, &sin6->sin6_addr, rip, INET6_ADDRSTRLEN);
 149                 rport = ntohs(sin6->sin6_port);
 150                 fd = connect_to_socket6(rip, rport);
 151                 break;
 152             }
 153         }
 154     }
 155
 156     freeaddrinfo(result);
 157
 158     return fd;
 159 }
 160
 161 static inline calculated_number backend_duration_average(RRDSET *st, RRDDIM *rd, time_t after, time_t before, uint32_t options) {
 162     time_t first_t = rrdset_first_entry_t(st);
 163     time_t last_t = rrdset_last_entry_t(st);
 164
 165     if(unlikely(before - after < st->update_every && after != after - after % st->update_every))
 166         // when st->update_every is bigger than the frequency we send data to backend
 167         // skip the iterations that are not aligned to the database
 168         return NAN;
 169
 170     // align the time-frame
 171     // for 'after' also skip the first value by adding st->update_every
 172     after  = after  - after  % st->update_every + st->update_every;
 173     before = before - before % st->update_every;
 174
 175     if(unlikely(after < first_t))
 176         after = first_t;
 177
 178     if(unlikely(after > before))
 179         // this can happen when the st->update_every > before - after
 180         before = after;
 181
 182     if(unlikely(before > last_t))
 183         before = last_t;
 184
 185     size_t counter = 0;
 186     calculated_number sum = 0;
 187
 188     long    start_at_slot = rrdset_time2slot(st, before),
 189             stop_at_slot  = rrdset_time2slot(st, after),
 190             slot, stop_now = 0;
 191
 192     for(slot = start_at_slot; !stop_now ; slot--) {
 193         if(unlikely(slot < 0)) slot = st->entries - 1;
 194         if(unlikely(slot == stop_at_slot)) stop_now = 1;
 195
 196         storage_number n = rd->values[slot];
 197         if(unlikely(!does_storage_number_exist(n))) continue;
 198
 199         calculated_number value = unpack_storage_number(n);
 200         sum += value;
 201         counter++;
 202     }
 203
 204     if(unlikely(!counter))
 205         return NAN;
 206
 207     if(unlikely(options & BACKEND_SOURCE_DATA_SUM))
 208         return sum;
 209
 210     return sum / (calculated_number)counter;
 211 }
 212
 213 static inline void format_dimension_collected_graphite_plaintext(BUFFER *b, const char *prefix, RRDHOST *host, const char *hostname, RRDSET *st, RRDDIM *rd, time_t after, time_t before, uint32_t options) {
 214     (void)host;
 215     (void)after;
 216     (void)before;
 217     (void)options;
 218     buffer_sprintf(b, "%s.%s.%s.%s " COLLECTED_NUMBER_FORMAT " %u\n", prefix, hostname, st->id, rd->id, rd->last_collected_value, (uint32_t)rd->last_collected_time.tv_sec);
 219 }
 220
 221 static inline void format_dimension_stored_graphite_plaintext(BUFFER *b, const char *prefix, RRDHOST *host, const char *hostname, RRDSET *st, RRDDIM *rd, time_t after, time_t before, uint32_t options) {
 222     (void)host;
 223     calculated_number value = backend_duration_average(st, rd, after, before, options);
 224     if(!isnan(value))
 225         buffer_sprintf(b, "%s.%s.%s.%s " CALCULATED_NUMBER_FORMAT " %u\n", prefix, hostname, st->id, rd->id, value, (uint32_t)before);
 226 }
 227
 228 static inline void format_dimension_collected_opentsdb_telnet(BUFFER *b, const char *prefix, RRDHOST *host, const char *hostname, RRDSET *st, RRDDIM *rd, time_t after, time_t before, uint32_t options) {
 229     (void)host;
 230     (void)after;
 231     (void)before;
 232     (void)options;
 233     buffer_sprintf(b, "put %s.%s.%s %u " COLLECTED_NUMBER_FORMAT " host=%s\n", prefix, st->id, rd->id, (uint32_t)rd->last_collected_time.tv_sec, rd->last_collected_value, hostname);
 234 }
 235
 236 static inline void format_dimension_stored_opentsdb_telnet(BUFFER *b, const char *prefix, RRDHOST *host, const char *hostname, RRDSET *st, RRDDIM *rd, time_t after, time_t before, uint32_t options) {
 237     (void)host;
 238     calculated_number value = backend_duration_average(st, rd, after, before, options);
 239     if(!isnan(value))
 240         buffer_sprintf(b, "put %s.%s.%s %u " CALCULATED_NUMBER_FORMAT " host=%s\n", prefix, st->id, rd->id, (uint32_t)before, value, hostname);
 241 }
 242
 243 void *backends_main(void *ptr) {
 244     (void)ptr;
 245
 246     BUFFER *b = buffer_create(1);
 247     void (*formatter)(BUFFER *b, const char *prefix, RRDHOST *host, const char *hostname, RRDSET *st, RRDDIM *rd, time_t after, time_t before, uint32_t options);
 248
 249     info("BACKEND thread created with task id %d", gettid());
 250
 251     if(pthread_setcanceltype(PTHREAD_CANCEL_DEFERRED, NULL) != 0)
 252         error("Cannot set pthread cancel type to DEFERRED.");
 253
 254     if(pthread_setcancelstate(PTHREAD_CANCEL_ENABLE, NULL) != 0)
 255         error("Cannot set pthread cancel state to ENABLE.");
 256
 257     int default_port = 0;
 258     int sock = -1;
 259     uint32_t options = BACKEND_SOURCE_DATA_AVERAGE;
 260     int enabled = config_get_boolean("backend", "enable", 0);
 261     const char *source = config_get("backend", "data source", "average");
 262     const char *type = config_get("backend", "type", "graphite");
 263     const char *destination = config_get("backend", "destination", "localhost");
 264     const char *prefix = config_get("backend", "prefix", "netdata");
 265     const char *hostname = config_get("backend", "hostname", localhost.hostname);
 266     int frequency = (int)config_get_number("backend", "update every", 10);
 267     int buffer_on_failures = (int)config_get_number("backend", "buffer on failures", 10);
 268
 269     if(!enabled || frequency < 1)
 270         goto cleanup;
 271
 272     if(!strcmp(source, "as collected")) {
 273         options = BACKEND_SOURCE_DATA_AS_COLLECTED;
 274     }
 275     else if(!strcmp(source, "average")) {
 276         options = BACKEND_SOURCE_DATA_AVERAGE;
 277     }
 278     else if(!strcmp(source, "sum") || !strcmp(source, "volume")) {
 279         options = BACKEND_SOURCE_DATA_SUM;
 280     }
 281     else {
 282         error("Invalid data source method '%s' for backend given. Disabling backed.", source);
 283         goto cleanup;
 284     }
 285
 286     if(!strcmp(type, "graphite") || !strcmp(type, "graphite:plaintext")) {
 287         default_port = 2003;
 288         if(options == BACKEND_SOURCE_DATA_AS_COLLECTED)
 289             formatter = format_dimension_collected_graphite_plaintext;
 290         else
 291             formatter = format_dimension_stored_graphite_plaintext;
 292     }
 293     else if(!strcmp(type, "opentsdb") || !strcmp(type, "opentsdb:telnet")) {
 294         default_port = 4242;
 295         if(options == BACKEND_SOURCE_DATA_AS_COLLECTED)
 296             formatter = format_dimension_collected_opentsdb_telnet;
 297         else
 298             formatter = format_dimension_stored_opentsdb_telnet;
 299     }
 300     else {
 301         error("Unknown backend type '%s'", type);
 302         goto cleanup;
 303     }
 304
 305     unsigned long long step_ut = frequency * 1000000ULL;
 306     unsigned long long random_ut = time_usec() % (step_ut / 2);
 307     time_t before = (time_t)((time_usec() - step_ut) / 10000000ULL);
 308     time_t after = before;
 309     int failures = 0;
 310
 311     info("BACKEND configured ('%s' on '%s' sending '%s' data, every %d seconds, as host '%s', with prefix '%s')", type, destination, source, frequency, hostname, prefix);
 312
 313     for(;;) {
 314         unsigned long long now_ut = time_usec();
 315         unsigned long long next_ut = now_ut - (now_ut % step_ut) + step_ut;
 316         before = (time_t)(next_ut / 1000000ULL);
 317
 318         // add a little delay (1/4 of the step) plus some randomness
 319         next_ut += (step_ut / 4) + random_ut;
 320
 321         while(now_ut < next_ut) {
 322             sleep_usec(next_ut - now_ut);
 323             now_ut = time_usec();
 324         }
 325
 326         RRDSET *st;
 327         int pthreadoldcancelstate;
 328
 329         if(unlikely(pthread_setcancelstate(PTHREAD_CANCEL_DISABLE, &pthreadoldcancelstate) != 0))
 330             error("Cannot set pthread cancel state to DISABLE.");
 331
 332         rrdhost_rdlock(&localhost);
 333         for(st = localhost.rrdset_root; st ;st = st->next) {
 334             pthread_rwlock_rdlock(&st->rwlock);
 335
 336             RRDDIM *rd;
 337             for(rd = st->dimensions; rd ;rd = rd->next) {
 338                 if(rd->last_collected_time.tv_sec >= after)
 339                     formatter(b, prefix, &localhost, hostname, st, rd, after, before, options);
 340             }
 341
 342             pthread_rwlock_unlock(&st->rwlock);
 343         }
 344         rrdhost_unlock(&localhost);
 345
 346         if(unlikely(pthread_setcancelstate(pthreadoldcancelstate, NULL) != 0))
 347             error("Cannot set pthread cancel state to RESTORE (%d).", pthreadoldcancelstate);
 348
 349         if(unlikely(netdata_exit)) break;
 350
 351         // fprintf(stderr, "\nBACKEND BEGIN:\n%s\nBACKEND END\n", buffer_tostring(b)); // FIXME
 352         //fprintf(stderr, "after = %lu, before = %lu\n", after, before);
 353
 354         if(unlikely(sock == -1)) {
 355             const char *s = destination;
 356             while(*s) {
 357                 const char *e = s;
 358
 359                 // skip separators, moving both s(tart) and e(nd)
 360                 while(isspace(*e) || *e == ',') s = ++e;
 361
 362                 // move e(nd) to the first separator
 363                 while(*e && !isspace(*e) && *e != ',') e++;
 364
 365                 // is there anything?
 366                 if(!*s || s == e) break;
 367
 368                 char buf[e - s + 1];
 369                 strncpyz(buf, s, e - s);
 370                 sock = connect_to_one(buf, default_port);
 371                 if(sock != -1) break;
 372                 s = e;
 373             }
 374         }
 375
 376         if(unlikely(netdata_exit)) break;
 377
 378         if(likely(sock != -1)) {
 379             size_t len = buffer_strlen(b);
 380             ssize_t written = write(sock, buffer_tostring(b), len);
 381             if(written != -1 && (size_t)written == len) {
 382                 failures = 0;
 383                 buffer_flush(b);
 384             }
 385             else {
 386                 failures++;
 387                 error("Failed to write data to database backend '%s'. Willing to write %zu bytes, wrote %zd bytes. Will re-connect.", destination, len, written);
 388                 close(sock);
 389                 sock = -1;
 390             }
 391
 392             after = before;
 393         }
 394         else {
 395             failures++;
 396             error("Failed to update database backend '%s'", destination);
 397         }
 398
 399         if(failures > buffer_on_failures) {
 400             error("Reached %d backend failures. Flushing buffers to protect this host - this results in data loss on back-end server '%s'", failures, destination);
 401             buffer_flush(b);
 402             failures = 0;
 403         }
 404
 405         if(unlikely(netdata_exit)) break;
 406     }
 407
 408 cleanup:
 409     if(sock != -1)
 410         close(sock);
 411
 412     info("BACKEND thread exiting");
 413
 414     pthread_exit(NULL);
 415     return NULL;
 416 }