src/bin/lttng-sessiond/agent.c

   1 /*
   2  * Copyright (C) 2013 - David Goulet <dgoulet@efficios.com>
   3  *
   4  * This program is free software; you can redistribute it and/or modify it
   5  * under the terms of the GNU General Public License, version 2 only, as
   6  * published by the Free Software Foundation.
   7  *
   8  * This program 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 General Public License for
  11  * more details.
  12  *
  13  * You should have received a copy of the GNU General Public License along with
  14  * this program; if not, write to the Free Software Foundation, Inc., 51
  15  * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
  16  */
  17
  18 #define _GNU_SOURCE
  19 #define _LGPL_SOURCE
  20 #include <assert.h>
  21 #include <urcu/uatomic.h>
  22
  23 #include <common/common.h>
  24 #include <common/sessiond-comm/agent.h>
  25
  26 #include <common/compat/endian.h>
  27
  28 #include "agent.h"
  29 #include "ust-app.h"
  30 #include "utils.h"
  31
  32 /*
  33  * Match function for the events hash table lookup by name.
  34  */
  35 static int ht_match_event_by_name(struct cds_lfht_node *node,
  36                 const void *_key)
  37 {
  38         struct agent_event *event;
  39         const struct agent_ht_key *key;
  40
  41         assert(node);
  42         assert(_key);
  43
  44         event = caa_container_of(node, struct agent_event, node.node);
  45         key = _key;
  46
  47         /* Match 1 elements of the key: name. */
  48
  49         /* Event name */
  50         if (strncmp(event->name, key->name, sizeof(event->name)) != 0) {
  51                 goto no_match;
  52         }
  53         /* Match. */
  54         return 1;
  55
  56 no_match:
  57         return 0;
  58 }
  59
  60 /*
  61  * Match function for the events hash table lookup by name and loglevel.
  62  */
  63 static int ht_match_event(struct cds_lfht_node *node,
  64                 const void *_key)
  65 {
  66         struct agent_event *event;
  67         const struct agent_ht_key *key;
  68
  69         assert(node);
  70         assert(_key);
  71
  72         event = caa_container_of(node, struct agent_event, node.node);
  73         key = _key;
  74
  75         /* Match 2 elements of the key: name and loglevel. */
  76
  77         /* Event name */
  78         if (strncmp(event->name, key->name, sizeof(event->name)) != 0) {
  79                 goto no_match;
  80         }
  81
  82         if (event->loglevel != key->loglevel) {
  83                 if (event->loglevel_type == LTTNG_EVENT_LOGLEVEL_ALL &&
  84                                 key->loglevel == 0 && event->loglevel == -1) {
  85                         goto match;
  86                 }
  87                 goto no_match;
  88         }
  89 match:
  90         return 1;
  91
  92 no_match:
  93         return 0;
  94 }
  95
  96 /*
  97  * Add unique agent event based on the event name and loglevel.
  98  */
  99 static void add_unique_agent_event(struct lttng_ht *ht,
 100                 struct agent_event *event)
 101 {
 102         struct cds_lfht_node *node_ptr;
 103         struct agent_ht_key key;
 104
 105         assert(ht);
 106         assert(ht->ht);
 107         assert(event);
 108
 109         key.name = event->name;
 110         key.loglevel = event->loglevel;
 111
 112         node_ptr = cds_lfht_add_unique(ht->ht,
 113                         ht->hash_fct(event->node.key, lttng_ht_seed),
 114                         ht_match_event, &key, &event->node.node);
 115         assert(node_ptr == &event->node.node);
 116 }
 117
 118 /*
 119  * URCU delayed agent event reclaim.
 120  */
 121 static void destroy_event_agent_rcu(struct rcu_head *head)
 122 {
 123         struct lttng_ht_node_str *node =
 124                 caa_container_of(head, struct lttng_ht_node_str, head);
 125         struct agent_event *event =
 126                 caa_container_of(node, struct agent_event, node);
 127
 128         free(event);
 129 }
 130
 131 /*
 132  * URCU delayed agent app reclaim.
 133  */
 134 static void destroy_app_agent_rcu(struct rcu_head *head)
 135 {
 136         struct lttng_ht_node_ulong *node =
 137                 caa_container_of(head, struct lttng_ht_node_ulong, head);
 138         struct agent_app *app =
 139                 caa_container_of(node, struct agent_app, node);
 140
 141         free(app);
 142 }
 143
 144 /*
 145  * Communication with the agent. Send the message header to the given socket in
 146  * big endian.
 147  *
 148  * Return 0 on success or else a negative errno message of sendmsg() op.
 149  */
 150 static int send_header(struct lttcomm_sock *sock, uint64_t data_size,
 151                 uint32_t cmd, uint32_t cmd_version)
 152 {
 153         int ret;
 154         ssize_t size;
 155         struct lttcomm_agent_hdr msg;
 156
 157         assert(sock);
 158
 159         memset(&msg, 0, sizeof(msg));
 160         msg.data_size = htobe64(data_size);
 161         msg.cmd = htobe32(cmd);
 162         msg.cmd_version = htobe32(cmd_version);
 163
 164         size = sock->ops->sendmsg(sock, &msg, sizeof(msg), 0);
 165         if (size < sizeof(msg)) {
 166                 ret = -errno;
 167                 goto error;
 168         }
 169         ret = 0;
 170
 171 error:
 172         return ret;
 173 }
 174
 175 /*
 176  * Communication call with the agent. Send the payload to the given socket. The
 177  * header MUST be sent prior to this call.
 178  *
 179  * Return 0 on success or else a negative errno value of sendmsg() op.
 180  */
 181 static int send_payload(struct lttcomm_sock *sock, void *data,
 182                 size_t size)
 183 {
 184         int ret;
 185         ssize_t len;
 186
 187         assert(sock);
 188         assert(data);
 189
 190         len = sock->ops->sendmsg(sock, data, size, 0);
 191         if (len < size) {
 192                 ret = -errno;
 193                 goto error;
 194         }
 195         ret = 0;
 196
 197 error:
 198         return ret;
 199 }
 200
 201 /*
 202  * Communication call with the agent. Receive reply from the agent using the
 203  * given socket.
 204  *
 205  * Return 0 on success or else a negative errno value from recvmsg() op.
 206  */
 207 static int recv_reply(struct lttcomm_sock *sock, void *buf, size_t size)
 208 {
 209         int ret;
 210         ssize_t len;
 211
 212         assert(sock);
 213         assert(buf);
 214
 215         len = sock->ops->recvmsg(sock, buf, size, 0);
 216         if (len < size) {
 217                 ret = -errno;
 218                 goto error;
 219         }
 220         ret = 0;
 221
 222 error:
 223         return ret;
 224 }
 225
 226 /*
 227  * Internal event listing for a given app. Populate events.
 228  *
 229  * Return number of element in the list or else a negative LTTNG_ERR* code.
 230  * On success, the caller is responsible for freeing the memory
 231  * allocated for "events".
 232  */
 233 static ssize_t list_events(struct agent_app *app, struct lttng_event **events)
 234 {
 235         int ret, i, len = 0, offset = 0;
 236         uint32_t nb_event;
 237         size_t data_size;
 238         struct lttng_event *tmp_events = NULL;
 239         struct lttcomm_agent_list_reply *reply = NULL;
 240         struct lttcomm_agent_list_reply_hdr reply_hdr;
 241
 242         assert(app);
 243         assert(app->sock);
 244         assert(events);
 245
 246         DBG2("Agent listing events for app pid: %d and socket %d", app->pid,
 247                         app->sock->fd);
 248
 249         ret = send_header(app->sock, 0, AGENT_CMD_LIST, 0);
 250         if (ret < 0) {
 251                 goto error_io;
 252         }
 253
 254         /* Get list header so we know how much we'll receive. */
 255         ret = recv_reply(app->sock, &reply_hdr, sizeof(reply_hdr));
 256         if (ret < 0) {
 257                 goto error_io;
 258         }
 259
 260         switch (be32toh(reply_hdr.ret_code)) {
 261         case AGENT_RET_CODE_SUCCESS:
 262                 data_size = be32toh(reply_hdr.data_size) + sizeof(*reply);
 263                 break;
 264         default:
 265                 ERR("Agent returned an unknown code: %" PRIu32,
 266                                 be32toh(reply_hdr.ret_code));
 267                 ret = LTTNG_ERR_FATAL;
 268                 goto error;
 269         }
 270
 271         reply = zmalloc(data_size);
 272         if (!reply) {
 273                 ret = LTTNG_ERR_NOMEM;
 274                 goto error;
 275         }
 276
 277         /* Get the list with the appropriate data size. */
 278         ret = recv_reply(app->sock, reply, data_size);
 279         if (ret < 0) {
 280                 goto error_io;
 281         }
 282
 283         nb_event = be32toh(reply->nb_event);
 284         tmp_events = zmalloc(sizeof(*tmp_events) * nb_event);
 285         if (!tmp_events) {
 286                 ret = LTTNG_ERR_NOMEM;
 287                 goto error;
 288         }
 289
 290         for (i = 0; i < nb_event; i++) {
 291                 offset += len;
 292                 strncpy(tmp_events[i].name, reply->payload + offset,
 293                                 sizeof(tmp_events[i].name));
 294                 tmp_events[i].pid = app->pid;
 295                 tmp_events[i].enabled = -1;
 296                 len = strlen(reply->payload + offset) + 1;
 297         }
 298
 299         *events = tmp_events;
 300
 301         free(reply);
 302         return nb_event;
 303
 304 error_io:
 305         ret = LTTNG_ERR_UST_LIST_FAIL;
 306 error:
 307         free(reply);
 308         free(tmp_events);
 309         return -ret;
 310
 311 }
 312
 313 /*
 314  * Internal enable agent event on a agent application. This function
 315  * communicates with the agent to enable a given event.
 316  *
 317  * Return LTTNG_OK on success or else a LTTNG_ERR* code.
 318  */
 319 static int enable_event(struct agent_app *app, struct agent_event *event)
 320 {
 321         int ret;
 322         uint64_t data_size;
 323         struct lttcomm_agent_enable msg;
 324         struct lttcomm_agent_generic_reply reply;
 325
 326         assert(app);
 327         assert(app->sock);
 328         assert(event);
 329
 330         DBG2("Agent enabling event %s for app pid: %d and socket %d", event->name,
 331                         app->pid, app->sock->fd);
 332
 333         data_size = sizeof(msg);
 334
 335         ret = send_header(app->sock, data_size, AGENT_CMD_ENABLE, 0);
 336         if (ret < 0) {
 337                 goto error_io;
 338         }
 339
 340         memset(&msg, 0, sizeof(msg));
 341         msg.loglevel = event->loglevel;
 342         msg.loglevel_type = event->loglevel_type;
 343         strncpy(msg.name, event->name, sizeof(msg.name));
 344         ret = send_payload(app->sock, &msg, sizeof(msg));
 345         if (ret < 0) {
 346                 goto error_io;
 347         }
 348
 349         ret = recv_reply(app->sock, &reply, sizeof(reply));
 350         if (ret < 0) {
 351                 goto error_io;
 352         }
 353
 354         switch (be32toh(reply.ret_code)) {
 355         case AGENT_RET_CODE_SUCCESS:
 356                 break;
 357         case AGENT_RET_CODE_UNKNOWN_NAME:
 358                 ret = LTTNG_ERR_UST_EVENT_NOT_FOUND;
 359                 goto error;
 360         default:
 361                 ERR("Agent returned an unknown code: %" PRIu32,
 362                                 be32toh(reply.ret_code));
 363                 ret = LTTNG_ERR_FATAL;
 364                 goto error;
 365         }
 366
 367         return LTTNG_OK;
 368
 369 error_io:
 370         ret = LTTNG_ERR_UST_ENABLE_FAIL;
 371 error:
 372         return ret;
 373 }
 374
 375 /*
 376  * Internal disable agent event call on a agent application. This function
 377  * communicates with the agent to disable a given event.
 378  *
 379  * Return LTTNG_OK on success or else a LTTNG_ERR* code.
 380  */
 381 static int disable_event(struct agent_app *app, struct agent_event *event)
 382 {
 383         int ret;
 384         uint64_t data_size;
 385         struct lttcomm_agent_disable msg;
 386         struct lttcomm_agent_generic_reply reply;
 387
 388         assert(app);
 389         assert(app->sock);
 390         assert(event);
 391
 392         DBG2("Agent disabling event %s for app pid: %d and socket %d", event->name,
 393                         app->pid, app->sock->fd);
 394
 395         data_size = sizeof(msg);
 396
 397         ret = send_header(app->sock, data_size, AGENT_CMD_DISABLE, 0);
 398         if (ret < 0) {
 399                 goto error_io;
 400         }
 401
 402         memset(&msg, 0, sizeof(msg));
 403         strncpy(msg.name, event->name, sizeof(msg.name));
 404         ret = send_payload(app->sock, &msg, sizeof(msg));
 405         if (ret < 0) {
 406                 goto error_io;
 407         }
 408
 409         ret = recv_reply(app->sock, &reply, sizeof(reply));
 410         if (ret < 0) {
 411                 goto error_io;
 412         }
 413
 414         switch (be32toh(reply.ret_code)) {
 415         case AGENT_RET_CODE_SUCCESS:
 416                 break;
 417         case AGENT_RET_CODE_UNKNOWN_NAME:
 418                 ret = LTTNG_ERR_UST_EVENT_NOT_FOUND;
 419                 goto error;
 420         default:
 421                 ERR("Agent returned an unknown code: %" PRIu32,
 422                                 be32toh(reply.ret_code));
 423                 ret = LTTNG_ERR_FATAL;
 424                 goto error;
 425         }
 426
 427         return LTTNG_OK;
 428
 429 error_io:
 430         ret = LTTNG_ERR_UST_DISABLE_FAIL;
 431 error:
 432         return ret;
 433 }
 434
 435 /*
 436  * Send back the registration DONE command to a given agent application.
 437  *
 438  * Return 0 on success or else a negative value.
 439  */
 440 int agent_send_registration_done(struct agent_app *app)
 441 {
 442         assert(app);
 443         assert(app->sock);
 444
 445         DBG("Agent sending registration done to app socket %d", app->sock->fd);
 446
 447         return send_header(app->sock, 0, AGENT_CMD_REG_DONE, 0);
 448 }
 449
 450 /*
 451  * Enable agent event on every agent applications registered with the session
 452  * daemon.
 453  *
 454  * Return LTTNG_OK on success or else a LTTNG_ERR* code.
 455  */
 456 int agent_enable_event(struct agent_event *event,
 457                 enum lttng_domain_type domain)
 458 {
 459         int ret;
 460         struct agent_app *app;
 461         struct lttng_ht_iter iter;
 462
 463         assert(event);
 464
 465         rcu_read_lock();
 466
 467         cds_lfht_for_each_entry(agent_apps_ht_by_sock->ht, &iter.iter, app,
 468                         node.node) {
 469                 if (app->domain != domain) {
 470                         continue;
 471                 }
 472
 473                 /* Enable event on agent application through TCP socket. */
 474                 ret = enable_event(app, event);
 475                 if (ret != LTTNG_OK) {
 476                         goto error;
 477                 }
 478         }
 479
 480         event->enabled = 1;
 481         ret = LTTNG_OK;
 482
 483 error:
 484         rcu_read_unlock();
 485         return ret;
 486 }
 487
 488 /*
 489  * Disable agent event on every agent applications registered with the session
 490  * daemon.
 491  *
 492  * Return LTTNG_OK on success or else a LTTNG_ERR* code.
 493  */
 494 int agent_disable_event(struct agent_event *event,
 495                 enum lttng_domain_type domain)
 496 {
 497         int ret = LTTNG_OK;
 498         struct agent_app *app;
 499         struct lttng_ht_iter iter;
 500
 501         assert(event);
 502         if (!event->enabled) {
 503                 goto end;
 504         }
 505
 506         rcu_read_lock();
 507
 508         cds_lfht_for_each_entry(agent_apps_ht_by_sock->ht, &iter.iter, app,
 509                         node.node) {
 510                 if (app->domain != domain) {
 511                         continue;
 512                 }
 513
 514                 /* Enable event on agent application through TCP socket. */
 515                 ret = disable_event(app, event);
 516                 if (ret != LTTNG_OK) {
 517                         goto error;
 518                 }
 519         }
 520
 521         event->enabled = 0;
 522
 523 error:
 524         rcu_read_unlock();
 525 end:
 526         return ret;
 527 }
 528
 529 /*
 530  * Ask every agent for the list of possible event. Events is allocated with the
 531  * events of every agent application.
 532  *
 533  * Return the number of events or else a negative value.
 534  */
 535 int agent_list_events(struct lttng_event **events,
 536                 enum lttng_domain_type domain)
 537 {
 538         int ret;
 539         size_t nbmem, count = 0;
 540         struct agent_app *app;
 541         struct lttng_event *tmp_events = NULL;
 542         struct lttng_ht_iter iter;
 543
 544         assert(events);
 545
 546         DBG2("Agent listing events for domain %d", domain);
 547
 548         nbmem = UST_APP_EVENT_LIST_SIZE;
 549         tmp_events = zmalloc(nbmem * sizeof(*tmp_events));
 550         if (!tmp_events) {
 551                 PERROR("zmalloc agent list events");
 552                 ret = -ENOMEM;
 553                 goto error;
 554         }
 555
 556         rcu_read_lock();
 557         cds_lfht_for_each_entry(agent_apps_ht_by_sock->ht, &iter.iter, app,
 558                         node.node) {
 559                 ssize_t nb_ev;
 560                 struct lttng_event *agent_events;
 561
 562                 /* Skip domain not asked by the list. */
 563                 if (app->domain != domain) {
 564                         continue;
 565                 }
 566
 567                 nb_ev = list_events(app, &agent_events);
 568                 if (nb_ev < 0) {
 569                         ret = nb_ev;
 570                         goto error_unlock;
 571                 }
 572
 573                 if (count + nb_ev > nbmem) {
 574                         /* In case the realloc fails, we free the memory */
 575                         struct lttng_event *new_tmp_events;
 576                         size_t new_nbmem;
 577
 578                         new_nbmem = max_t(size_t, count + nb_ev, nbmem << 1);
 579                         DBG2("Reallocating agent event list from %zu to %zu entries",
 580                                         nbmem, new_nbmem);
 581                         new_tmp_events = realloc(tmp_events,
 582                                 new_nbmem * sizeof(*new_tmp_events));
 583                         if (!new_tmp_events) {
 584                                 PERROR("realloc agent events");
 585                                 ret = -ENOMEM;
 586                                 free(agent_events);
 587                                 goto error_unlock;
 588                         }
 589                         /* Zero the new memory */
 590                         memset(new_tmp_events + nbmem, 0,
 591                                 (new_nbmem - nbmem) * sizeof(*new_tmp_events));
 592                         nbmem = new_nbmem;
 593                         tmp_events = new_tmp_events;
 594                 }
 595                 memcpy(tmp_events + count, agent_events,
 596                         nb_ev * sizeof(*tmp_events));
 597                 free(agent_events);
 598                 count += nb_ev;
 599         }
 600         rcu_read_unlock();
 601
 602         ret = count;
 603         *events = tmp_events;
 604         return ret;
 605
 606 error_unlock:
 607         rcu_read_unlock();
 608 error:
 609         free(tmp_events);
 610         return ret;
 611 }
 612
 613 /*
 614  * Create a agent app object using the given PID.
 615  *
 616  * Return newly allocated object or else NULL on error.
 617  */
 618 struct agent_app *agent_create_app(pid_t pid, enum lttng_domain_type domain,
 619                 struct lttcomm_sock *sock)
 620 {
 621         struct agent_app *app;
 622
 623         assert(sock);
 624
 625         app = zmalloc(sizeof(*app));
 626         if (!app) {
 627                 PERROR("zmalloc agent create");
 628                 goto error;
 629         }
 630
 631         app->pid = pid;
 632         app->domain = domain;
 633         app->sock = sock;
 634         lttng_ht_node_init_ulong(&app->node, (unsigned long) app->sock->fd);
 635
 636 error:
 637         return app;
 638 }
 639
 640 /*
 641  * Lookup agent app by socket in the global hash table.
 642  *
 643  * RCU read side lock MUST be acquired.
 644  *
 645  * Return object if found else NULL.
 646  */
 647 struct agent_app *agent_find_app_by_sock(int sock)
 648 {
 649         struct lttng_ht_node_ulong *node;
 650         struct lttng_ht_iter iter;
 651         struct agent_app *app;
 652
 653         assert(sock >= 0);
 654
 655         lttng_ht_lookup(agent_apps_ht_by_sock, (void *)((unsigned long) sock), &iter);
 656         node = lttng_ht_iter_get_node_ulong(&iter);
 657         if (node == NULL) {
 658                 goto error;
 659         }
 660         app = caa_container_of(node, struct agent_app, node);
 661
 662         DBG3("Agent app pid %d found by sock %d.", app->pid, sock);
 663         return app;
 664
 665 error:
 666         DBG3("Agent app NOT found by sock %d.", sock);
 667         return NULL;
 668 }
 669
 670 /*
 671  * Add agent application object to the global hash table.
 672  */
 673 void agent_add_app(struct agent_app *app)
 674 {
 675         assert(app);
 676
 677         DBG3("Agent adding app sock: %d and pid: %d to ht", app->sock->fd, app->pid);
 678
 679         rcu_read_lock();
 680         lttng_ht_add_unique_ulong(agent_apps_ht_by_sock, &app->node);
 681         rcu_read_unlock();
 682 }
 683
 684 /*
 685  * Delete agent application from the global hash table.
 686  *
 687  * rcu_read_lock() must be held by the caller.
 688  */
 689 void agent_delete_app(struct agent_app *app)
 690 {
 691         int ret;
 692         struct lttng_ht_iter iter;
 693
 694         assert(app);
 695
 696         DBG3("Agent deleting app pid: %d and sock: %d", app->pid, app->sock->fd);
 697
 698         iter.iter.node = &app->node.node;
 699         ret = lttng_ht_del(agent_apps_ht_by_sock, &iter);
 700         assert(!ret);
 701 }
 702
 703 /*
 704  * Destroy an agent application object by detaching it from its corresponding
 705  * UST app if one is connected by closing the socket. Finally, perform a
 706  * delayed memory reclaim.
 707  */
 708 void agent_destroy_app(struct agent_app *app)
 709 {
 710         assert(app);
 711
 712         if (app->sock) {
 713                 app->sock->ops->close(app->sock);
 714                 lttcomm_destroy_sock(app->sock);
 715         }
 716
 717         call_rcu(&app->node.head, destroy_app_agent_rcu);
 718 }
 719
 720 /*
 721  * Initialize an already allocated agent object.
 722  *
 723  * Return 0 on success or else a negative errno value.
 724  */
 725 int agent_init(struct agent *agt)
 726 {
 727         int ret;
 728
 729         assert(agt);
 730
 731         agt->events = lttng_ht_new(0, LTTNG_HT_TYPE_STRING);
 732         if (!agt->events) {
 733                 ret = -ENOMEM;
 734                 goto error;
 735         }
 736         lttng_ht_node_init_u64(&agt->node, agt->domain);
 737
 738         return 0;
 739
 740 error:
 741         return ret;
 742 }
 743
 744 /*
 745  * Add agent object to the given hash table.
 746  */
 747 void agent_add(struct agent *agt, struct lttng_ht *ht)
 748 {
 749         assert(agt);
 750         assert(ht);
 751
 752         DBG3("Agent adding from domain %d", agt->domain);
 753
 754         rcu_read_lock();
 755         lttng_ht_add_unique_u64(ht, &agt->node);
 756         rcu_read_unlock();
 757 }
 758
 759 /*
 760  * Create an agent object for the given domain.
 761  *
 762  * Return the allocated agent or NULL on error.
 763  */
 764 struct agent *agent_create(enum lttng_domain_type domain)
 765 {
 766         int ret;
 767         struct agent *agt;
 768
 769         agt = zmalloc(sizeof(*agt));
 770         if (!agt) {
 771                 goto error;
 772         }
 773         agt->domain = domain;
 774
 775         ret = agent_init(agt);
 776         if (ret < 0) {
 777                 free(agt);
 778                 agt = NULL;
 779                 goto error;
 780         }
 781
 782 error:
 783         return agt;
 784 }
 785
 786 /*
 787  * Create a newly allocated agent event data structure. If name is valid, it's
 788  * copied into the created event.
 789  *
 790  * Return a new object else NULL on error.
 791  */
 792 struct agent_event *agent_create_event(const char *name,
 793                 struct lttng_filter_bytecode *filter)
 794 {
 795         struct agent_event *event;
 796
 797         DBG3("Agent create new event with name %s", name);
 798
 799         event = zmalloc(sizeof(*event));
 800         if (!event) {
 801                 goto error;
 802         }
 803
 804         if (name) {
 805                 strncpy(event->name, name, sizeof(event->name));
 806                 event->name[sizeof(event->name) - 1] = '\0';
 807                 lttng_ht_node_init_str(&event->node, event->name);
 808         }
 809
 810         if (filter) {
 811                 event->filter = filter;
 812         }
 813
 814 error:
 815         return event;
 816 }
 817
 818 /*
 819  * Unique add of a agent event to an agent object.
 820  */
 821 void agent_add_event(struct agent_event *event, struct agent *agt)
 822 {
 823         assert(event);
 824         assert(agt);
 825         assert(agt->events);
 826
 827         DBG3("Agent adding event %s", event->name);
 828
 829         rcu_read_lock();
 830         add_unique_agent_event(agt->events, event);
 831         rcu_read_unlock();
 832         agt->being_used = 1;
 833 }
 834
 835 /*
 836  * Find a agent event in the given agent using name.
 837  *
 838  * RCU read side lock MUST be acquired.
 839  *
 840  * Return object if found else NULL.
 841  */
 842 struct agent_event *agent_find_event_by_name(const char *name,
 843                 struct agent *agt)
 844 {
 845         struct lttng_ht_node_str *node;
 846         struct lttng_ht_iter iter;
 847         struct lttng_ht *ht;
 848         struct agent_ht_key key;
 849
 850         assert(name);
 851         assert(agt);
 852         assert(agt->events);
 853
 854         ht = agt->events;
 855         key.name = name;
 856
 857         cds_lfht_lookup(ht->ht, ht->hash_fct((void *) name, lttng_ht_seed),
 858                         ht_match_event_by_name, &key, &iter.iter);
 859         node = lttng_ht_iter_get_node_str(&iter);
 860         if (node == NULL) {
 861                 goto error;
 862         }
 863
 864         DBG3("Agent event found %s by name.", name);
 865         return caa_container_of(node, struct agent_event, node);
 866
 867 error:
 868         DBG3("Agent NOT found by name %s.", name);
 869         return NULL;
 870 }
 871
 872 /*
 873  * Find a agent event in the given agent using name and loglevel.
 874  *
 875  * RCU read side lock MUST be acquired.
 876  *
 877  * Return object if found else NULL.
 878  */
 879 struct agent_event *agent_find_event(const char *name, int loglevel,
 880                 struct agent *agt)
 881 {
 882         struct lttng_ht_node_str *node;
 883         struct lttng_ht_iter iter;
 884         struct lttng_ht *ht;
 885         struct agent_ht_key key;
 886
 887         assert(name);
 888         assert(agt);
 889         assert(agt->events);
 890
 891         ht = agt->events;
 892         key.name = name;
 893         key.loglevel = loglevel;
 894
 895         cds_lfht_lookup(ht->ht, ht->hash_fct((void *) name, lttng_ht_seed),
 896                         ht_match_event, &key, &iter.iter);
 897         node = lttng_ht_iter_get_node_str(&iter);
 898         if (node == NULL) {
 899                 goto error;
 900         }
 901
 902         DBG3("Agent event found %s.", name);
 903         return caa_container_of(node, struct agent_event, node);
 904
 905 error:
 906         DBG3("Agent event NOT found %s.", name);
 907         return NULL;
 908 }
 909
 910 /*
 911  * Free given agent event. This event must not be globally visible at this
 912  * point (only expected to be used on failure just after event creation). After
 913  * this call, the pointer is not usable anymore.
 914  */
 915 void agent_destroy_event(struct agent_event *event)
 916 {
 917         assert(event);
 918
 919         free(event->filter);
 920         free(event);
 921 }
 922
 923 /*
 924  * Destroy an agent completely. Note that the given pointer is NOT freed
 925  * thus a reference to static or stack data can be passed to this function.
 926  */
 927 void agent_destroy(struct agent *agt)
 928 {
 929         struct lttng_ht_node_str *node;
 930         struct lttng_ht_iter iter;
 931
 932         assert(agt);
 933
 934         DBG3("Agent destroy");
 935
 936         /*
 937          * Just ignore if no events hash table exists. This is possible if for
 938          * instance an agent object was allocated but not initialized.
 939          */
 940         if (!agt->events) {
 941                 return;
 942         }
 943
 944         rcu_read_lock();
 945         cds_lfht_for_each_entry(agt->events->ht, &iter.iter, node, node) {
 946                 int ret;
 947                 struct agent_event *event;
 948
 949                 /*
 950                  * When destroying an event, we have to try to disable it on the agent
 951                  * side so the event stops generating data. The return value is not
 952                  * important since we have to continue anyway destroying the object.
 953                  */
 954                 event = caa_container_of(node, struct agent_event, node);
 955                 (void) agent_disable_event(event, agt->domain);
 956
 957                 ret = lttng_ht_del(agt->events, &iter);
 958                 assert(!ret);
 959                 call_rcu(&node->head, destroy_event_agent_rcu);
 960         }
 961         rcu_read_unlock();
 962
 963         ht_cleanup_push(agt->events);
 964 }
 965
 966 /*
 967  * Allocate agent_apps_ht_by_sock.
 968  */
 969 int agent_app_ht_alloc(void)
 970 {
 971         int ret = 0;
 972
 973         agent_apps_ht_by_sock = lttng_ht_new(0, LTTNG_HT_TYPE_ULONG);
 974         if (!agent_apps_ht_by_sock) {
 975                 ret = -1;
 976         }
 977
 978         return ret;
 979 }
 980
 981 /*
 982  * Destroy a agent application by socket.
 983  */
 984 void agent_destroy_app_by_sock(int sock)
 985 {
 986         struct agent_app *app;
 987
 988         assert(sock >= 0);
 989
 990         /*
 991          * Not finding an application is a very important error that should NEVER
 992          * happen. The hash table deletion is ONLY done through this call when the
 993          * main sessiond thread is torn down.
 994          */
 995         rcu_read_lock();
 996         app = agent_find_app_by_sock(sock);
 997         assert(app);
 998
 999         /* RCU read side lock is assumed to be held by this function. */
1000         agent_delete_app(app);
1001
1002         /* The application is freed in a RCU call but the socket is closed here. */
1003         agent_destroy_app(app);
1004         rcu_read_unlock();
1005 }
1006
1007 /*
1008  * Clean-up the agent app hash table and destroy it.
1009  */
1010 void agent_app_ht_clean(void)
1011 {
1012         struct lttng_ht_node_ulong *node;
1013         struct lttng_ht_iter iter;
1014
1015         if (!agent_apps_ht_by_sock) {
1016                 return;
1017         }
1018         rcu_read_lock();
1019         cds_lfht_for_each_entry(agent_apps_ht_by_sock->ht, &iter.iter, node, node) {
1020                 struct agent_app *app;
1021
1022                 app = caa_container_of(node, struct agent_app, node);
1023                 agent_destroy_app_by_sock(app->sock->fd);
1024         }
1025         rcu_read_unlock();
1026
1027         lttng_ht_destroy(agent_apps_ht_by_sock);
1028 }
1029
1030 /*
1031  * Update a agent application (given socket) using the given agent.
1032  *
1033  * Note that this function is most likely to be used with a tracing session
1034  * thus the caller should make sure to hold the appropriate lock(s).
1035  */
1036 void agent_update(struct agent *agt, int sock)
1037 {
1038         int ret;
1039         struct agent_app *app;
1040         struct agent_event *event;
1041         struct lttng_ht_iter iter;
1042
1043         assert(agt);
1044         assert(sock >= 0);
1045
1046         DBG("Agent updating app socket %d", sock);
1047
1048         rcu_read_lock();
1049         cds_lfht_for_each_entry(agt->events->ht, &iter.iter, event, node.node) {
1050                 /* Skip event if disabled. */
1051                 if (!event->enabled) {
1052                         continue;
1053                 }
1054
1055                 app = agent_find_app_by_sock(sock);
1056                 /*
1057                  * We are in the registration path thus if the application is gone,
1058                  * there is a serious code flow error.
1059                  */
1060                 assert(app);
1061
1062                 ret = enable_event(app, event);
1063                 if (ret != LTTNG_OK) {
1064                         DBG2("Agent update unable to enable event %s on app pid: %d sock %d",
1065                                         event->name, app->pid, app->sock->fd);
1066                         /* Let's try the others here and don't assume the app is dead. */
1067                         continue;
1068                 }
1069         }
1070         rcu_read_unlock();
1071 }