+++ /dev/null
-/*
- * Copyright (c) 2011 David Goulet <david.goulet@polymtl.ca>
- *
- * This program is free software; you can redistribute it and/or modify
- * it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
- * (at your option) any later version.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- * GNU General Public License for more details.
- *
- * You should have received a copy of the GNU General Public License along
- * with this program; if not, write to the Free Software Foundation, Inc.,
- * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
- */
-
-#define _GNU_SOURCE
-#include <errno.h>
-#include <fcntl.h>
-#include <getopt.h>
-#include <grp.h>
-#include <limits.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <sys/stat.h>
-#include <sys/types.h>
-#include <sys/wait.h>
-#include <unistd.h>
-
-#include <lttng/lttng.h>
-
-#include "lttng.h"
-#include "lttngerr.h"
-
-/* Variables */
-static char *progname;
-static char *session_name;
-static char short_str_uuid[UUID_SHORT_STR_LEN];
-static char long_str_uuid[UUID_STR_LEN];
-static uuid_t current_uuid;
-
-/* Prototypes */
-static int process_client_opt(void);
-static int process_opt_list_apps(void);
-static int process_opt_list_sessions(void);
-static int process_opt_list_traces(void);
-static int process_opt_create_session(void);
-static int set_session_uuid(void);
-static void sighandler(int sig);
-static int set_signal_handler(void);
-static int validate_options(void);
-static char *get_cmdline_by_pid(pid_t pid);
-static void set_opt_session_info(void);
-static void shorten_uuid(char *long_u, char *short_u);
-
-/*
- * start_client
- *
- * Process client request from the command line
- * options. Every tracing action is done by the
- * liblttngctl API.
- */
-static int process_client_opt(void)
-{
- int ret;
-
- set_opt_session_info();
-
- if (opt_list_apps) {
- ret = process_opt_list_apps();
- if (ret < 0) {
- goto end;
- }
- }
-
- if (opt_list_session) {
- ret = process_opt_list_sessions();
- if (ret < 0) {
- goto end;
- }
- }
-
- if (opt_destroy_session) {
- ret = lttng_destroy_session(¤t_uuid);
- if (ret < 0) {
- goto end;
- }
- MSG("Session %s destroyed.", opt_session_uuid);
- }
-
- if (!opt_list_session && !opt_list_apps) {
- if (uuid_is_null(current_uuid)) {
- /* If no session uuid, create session */
- DBG("No session specified. Creating session.");
- ret = process_opt_create_session();
- if (ret < 0) {
- goto end;
- }
- }
-
- DBG("Set session uuid to %s", long_str_uuid);
- ret = set_session_uuid();
- if (ret < 0) {
- ERR("Session UUID %s not found", opt_session_uuid);
- goto error;
- }
- }
-
- if (opt_list_traces) {
- ret = process_opt_list_traces();
- if (ret < 0) {
- goto end;
- }
- }
-
- /*
- * Action on traces (kernel or/and userspace).
- */
- if (opt_trace_kernel) {
- ERR("Not implemented yet");
- goto end;
- }
-
- if (opt_trace_pid != 0) {
- if (opt_create_trace) {
- DBG("Create a userspace trace for pid %d", opt_trace_pid);
- ret = lttng_ust_create_trace(opt_trace_pid);
- if (ret < 0) {
- goto end;
- }
- MSG("Trace created successfully!\nUse --start to start tracing.");
- }
-
- if (opt_start_trace) {
- DBG("Start trace for pid %d", opt_trace_pid);
- ret = lttng_ust_start_trace(opt_trace_pid);
- if (ret < 0) {
- goto end;
- }
- MSG("Trace started successfully!");
- } else if (opt_stop_trace) {
- DBG("Stop trace for pid %d", opt_trace_pid);
- ret = lttng_ust_stop_trace(opt_trace_pid);
- if (ret < 0) {
- goto end;
- }
- MSG("Trace stopped successfully!");
- }
-
- }
-
- return 0;
-
-end:
- ERR("%s", lttng_get_readable_code(ret));
- return ret;
-
-error:
- return ret;
-}
-
-/*
- * set_opt_session_info
- *
- * Setup session_name, current_uuid, short_str_uuid and
- * long_str_uuid using the command line options.
- */
-static void set_opt_session_info(void)
-{
- int count, i, short_len;
- char *tok;
- struct lttng_session *sessions;
-
- if (opt_session_uuid != NULL) {
- short_len = sizeof(short_str_uuid) - 1;
- /* Shorten uuid */
- tok = strchr(opt_session_uuid, '.');
- if (strlen(tok + 1) == short_len) {
- memcpy(short_str_uuid, tok + 1, short_len);
- short_str_uuid[short_len] = '\0';
- }
-
- /* Get long real uuid_t from session daemon */
- count = lttng_list_sessions(&sessions);
- for (i = 0; i < count; i++) {
- uuid_unparse(sessions[i].uuid, long_str_uuid);
- if (strncmp(long_str_uuid, short_str_uuid, 8) == 0) {
- uuid_copy(current_uuid, sessions[i].uuid);
- break;
- }
- }
- }
-
- if (opt_session_name != NULL) {
- session_name = strndup(opt_session_name, NAME_MAX);
- }
-}
-
-/*
- * shorten_uuid
- *
- * Small function to shorten the 37 bytes long uuid_t
- * string representation to 8 characters.
- */
-static void shorten_uuid(char *long_u, char *short_u)
-{
- memcpy(short_u, long_u, 8);
- short_u[UUID_SHORT_STR_LEN - 1] = '\0';
-}
-
-/*
- * set_session_uuid
- *
- * Set current session uuid to the current flow of
- * command(s) using the already shorten uuid or
- * current full uuid.
- */
-static int set_session_uuid(void)
-{
- int ret, count, i;
- char str_uuid[37];
- struct lttng_session *sessions;
-
- if (!uuid_is_null(current_uuid)) {
- lttng_set_current_session_uuid(¤t_uuid);
- goto end;
- }
-
- count = lttng_list_sessions(&sessions);
- if (count < 0) {
- ret = count;
- goto error;
- }
-
- for (i = 0; i < count; i++) {
- uuid_unparse(sessions[i].uuid, str_uuid);
- if (strncmp(str_uuid, short_str_uuid, 8) == 0) {
- lttng_set_current_session_uuid(&sessions[i].uuid);
- break;
- }
- }
-
- free(sessions);
-
-end:
- return 0;
-
-error:
- return ret;
-}
-
-/*
- * process_opt_list_traces
- *
- * Get list of all traces for a specific session uuid.
- */
-static int process_opt_list_traces(void)
-{
- int ret, i;
- struct lttng_trace *traces;
-
- ret = lttng_list_traces(¤t_uuid, &traces);
- if (ret < 0) {
- goto error;
- }
-
- MSG("Userspace traces:");
- for (i = 0; i < ret; i++) {
- if (traces[i].type == USERSPACE) {
- MSG("\t%d) %s (pid: %d): %s",
- i, traces[i].name, traces[i].pid,
- get_cmdline_by_pid(traces[i].pid));
- } else {
- break;
- }
- }
-
- MSG("Kernel traces:");
- for (;i < ret; i++) {
- if (traces[i].type == KERNEL) {
- MSG("\t%d) %s", i, traces[i].name);
- }
- }
-
- free(traces);
-
-error:
- return ret;
-}
-
-/*
- * process_opt_create_session
- *
- * Create a new session using the name pass
- * to the command line.
- */
-static int process_opt_create_session(void)
-{
- int ret;
- uuid_t session_id;
- char str_uuid[37];
- char name[NAME_MAX];
- time_t rawtime;
- struct tm *timeinfo;
-
- /* Auto session creation */
- if (opt_create_session == 0) {
- time(&rawtime);
- timeinfo = localtime(&rawtime);
- strftime(name, sizeof(name), "%Y%m%d-%H%M%S", timeinfo);
- session_name = strndup(name, sizeof(name));
- }
-
- ret = lttng_create_session(session_name, &session_id);
- if (ret < 0) {
- goto error;
- }
-
- uuid_unparse(session_id, str_uuid);
- uuid_copy(current_uuid, session_id);
- shorten_uuid(str_uuid, short_str_uuid);
-
- MSG("Session UUID created: %s.%s", session_name, short_str_uuid);
-
-error:
- return ret;
-}
-
-/*
- * process_opt_list_sessions
- *
- * Get the list of available sessions from
- * the session daemon and print it to user.
- */
-static int process_opt_list_sessions(void)
-{
- int ret, count, i;
- char tmp_short_uuid[9];
- char str_uuid[37];
- struct lttng_session *sess;
-
- count = lttng_list_sessions(&sess);
- DBG("Session count %d", count);
- if (count < 0) {
- ret = count;
- goto error;
- }
-
- MSG("Available sessions (UUIDs):");
- for (i = 0; i < count; i++) {
- uuid_unparse(sess[i].uuid, str_uuid);
- shorten_uuid(str_uuid, tmp_short_uuid);
- MSG(" %d) %s.%s", i+1, sess[i].name, tmp_short_uuid);
- }
-
- free(sess);
- MSG("\nTo select a session, use -s, --session UUID.");
-
- return 0;
-
-error:
- return ret;
-}
-
-/*
- * process_opt_list_apps
- *
- * Get the UST traceable pid list and print
- * them to the user.
- */
-static int process_opt_list_apps(void)
-{
- int i, ret, count;
- pid_t *pids;
- char *cmdline;
-
- count = lttng_ust_list_apps(&pids);
- if (count < 0) {
- ret = count;
- goto error;
- }
-
- MSG("LTTng UST traceable application [name (pid)]:");
- for (i=0; i < count; i++) {
- cmdline = get_cmdline_by_pid(pids[i]);
- if (cmdline == NULL) {
- MSG("\t(not running) (%d)", pids[i]);
- continue;
- }
- MSG("\t%s (%d)", cmdline, pids[i]);
- free(cmdline);
- }
-
- /* Allocated by lttng_ust_list_apps() */
- free(pids);
-
- return 0;
-
-error:
- return ret;
-}
-
-/*
- * get_cmdline_by_pid
- *
- * Get command line from /proc for a specific pid.
- *
- * On success, return an allocated string pointer pointing to
- * the proc cmdline.
- * On error, return NULL.
- */
-static char *get_cmdline_by_pid(pid_t pid)
-{
- int ret;
- FILE *fp;
- char *cmdline = NULL;
- char path[24]; /* Can't go bigger than /proc/65535/cmdline */
-
- snprintf(path, sizeof(path), "/proc/%d/cmdline", pid);
- fp = fopen(path, "r");
- if (fp == NULL) {
- goto end;
- }
-
- /* Caller must free() *cmdline */
- cmdline = malloc(PATH_MAX);
- ret = fread(cmdline, 1, PATH_MAX, fp);
- fclose(fp);
-
-end:
- return cmdline;
-}
-
-/*
- * validate_options
- *
- * Make sure that all options passed to the command line
- * are compatible with each others.
- *
- * On error, return -1
- * On success, return 0
- */
-static int validate_options(void)
-{
- /* Conflicting command */
- if (opt_start_trace && opt_stop_trace) {
- ERR("Can't use --start and --stop together.");
- goto error;
- /* If no PID specified and trace_kernel is off */
- } else if ((opt_trace_pid == 0 && opt_trace_kernel == 0) &&
- (opt_create_trace || opt_start_trace || opt_stop_trace)) {
- ERR("Please specify a PID using -p, --pid PID.");
- goto error;
- } else if (opt_session_uuid && opt_create_session) {
- ERR("Please don't use -s and -c together. Useless action.");
- goto error;
- } else if (opt_list_traces && opt_session_uuid == NULL) {
- ERR("Can't use -t without -s, --session option.");
- goto error;
- }
-
- return 0;
-
-error:
- return -1;
-}
-
-/*
- * spawn_sessiond
- *
- * Spawn a session daemon by forking and execv.
- */
-static int spawn_sessiond(char *pathname)
-{
- int ret = 0;
- pid_t pid;
-
- MSG("Spawning session daemon");
- pid = fork();
- if (pid == 0) {
- /* Spawn session daemon and tell
- * it to signal us when ready.
- */
- ret = execlp(pathname, "ltt-sessiond", "--sig-parent", "--quiet", NULL);
- if (ret < 0) {
- if (errno == ENOENT) {
- ERR("No session daemon found. Use --sessiond-path.");
- } else {
- perror("execlp");
- }
- kill(getppid(), SIGTERM);
- exit(EXIT_FAILURE);
- }
- exit(EXIT_SUCCESS);
- } else if (pid > 0) {
- /* Wait for ltt-sessiond to start */
- pause();
- goto end;
- } else {
- perror("fork");
- ret = -1;
- goto end;
- }
-
-end:
- return ret;
-}
-
-/*
- * check_ltt_sessiond
- *
- * Check if the session daemon is available using
- * the liblttngctl API for the check. If not, try to
- * spawn a daemon.
- */
-static int check_ltt_sessiond(void)
-{
- int ret;
- char *pathname = NULL;
-
- ret = lttng_check_session_daemon();
- if (ret < 0) {
- /* Try command line option path */
- if (opt_sessiond_path != NULL) {
- ret = access(opt_sessiond_path, F_OK | X_OK);
- if (ret < 0) {
- ERR("No such file: %s", opt_sessiond_path);
- goto end;
- }
- pathname = opt_sessiond_path;
- } else {
- /* Try LTTNG_SESSIOND_PATH env variable */
- pathname = getenv(LTTNG_SESSIOND_PATH_ENV);
- if (pathname != NULL) {
- /* strdup here in order to make the free()
- * not fail later on.
- */
- pathname = strdup(pathname);
- }
- }
-
- /* Let's rock and roll */
- if (pathname == NULL) {
- ret = asprintf(&pathname, "ltt-sessiond");
- if (ret < 0) {
- goto end;
- }
- }
-
- ret = spawn_sessiond(pathname);
- free(pathname);
- if (ret < 0) {
- ERR("Problem occurs when starting %s", pathname);
- goto end;
- }
- }
-
-end:
- return ret;
-}
-
-/*
- * set_signal_handler
- *
- * Setup signal handler for SIGCHLD and SIGTERM.
- */
-static int set_signal_handler(void)
-{
- int ret = 0;
- struct sigaction sa;
- sigset_t sigset;
-
- if ((ret = sigemptyset(&sigset)) < 0) {
- perror("sigemptyset");
- goto end;
- }
-
- sa.sa_handler = sighandler;
- sa.sa_mask = sigset;
- sa.sa_flags = 0;
- if ((ret = sigaction(SIGCHLD, &sa, NULL)) < 0) {
- perror("sigaction");
- goto end;
- }
-
- if ((ret = sigaction(SIGTERM, &sa, NULL)) < 0) {
- perror("sigaction");
- goto end;
- }
-
-end:
- return ret;
-}
-
-/*
- * sighandler
- *
- * Signal handler for the daemon
- */
-static void sighandler(int sig)
-{
- switch (sig) {
- case SIGTERM:
- DBG("SIGTERM catched");
- clean_exit(EXIT_FAILURE);
- break;
- case SIGCHLD:
- /* Notify is done */
- DBG("SIGCHLD catched");
- break;
- default:
- DBG("Unknown signal %d catched", sig);
- break;
- }
-
- return;
-}
-
-/*
- * clean_exit
- */
-void clean_exit(int code)
-{
- DBG("Clean exit");
- if (session_name) {
- free(session_name);
- }
-
- exit(code);
-}
-
-/*
- * main
- */
-int main(int argc, char *argv[])
-{
- int ret;
-
- progname = argv[0] ? argv[0] : "lttng";
-
- /* For Mathieu Desnoyers aka Dr Tracing */
- if (strncmp(progname, "drtrace", 7) == 0) {
- MSG("%c[%d;%dmWelcome back Dr Tracing!%c[%dm\n\n", 27,1,33,27,0);
- }
-
- ret = parse_args(argc, (const char **) argv);
- if (ret < 0) {
- clean_exit(EXIT_FAILURE);
- }
-
- ret = validate_options();
- if (ret < 0) {
- return EXIT_FAILURE;
- }
-
- ret = set_signal_handler();
- if (ret < 0) {
- clean_exit(ret);
- }
-
- if (opt_tracing_group != NULL) {
- DBG("Set tracing group to '%s'", opt_tracing_group);
- lttng_set_tracing_group(opt_tracing_group);
- }
-
- /* If ask for kernel tracing, need root perms */
- if (opt_trace_kernel) {
- DBG("Kernel tracing activated");
- if (getuid() != 0) {
- ERR("%s must be setuid root", progname);
- clean_exit(-EPERM);
- }
- }
-
- /* Check if the lttng session daemon is running.
- * If no, a daemon will be spawned.
- */
- if (opt_no_sessiond == 0 && (check_ltt_sessiond() < 0)) {
- clean_exit(EXIT_FAILURE);
- }
-
- ret = process_client_opt();
- if (ret < 0) {
- clean_exit(ret);
- }
-
- clean_exit(0);
-
- return 0;
-}