#include <string.h>
#include <sys/mman.h>
#include <signal.h>
+#include <sys/stat.h>
+#include <fcntl.h>
+#include <stdlib.h>
+#include <sys/param.h>
+#include <linux/futex.h>
+#include <sys/time.h>
+
+#include <asm/timex.h> //for get_cycles()
#include "ltt-usertrace-fast.h"
kill(tmp->daemon_id, SIGUSR1);
}
+/* The cleanup should never be called from a signal handler */
static void ltt_usertrace_fast_cleanup(void *arg)
{
struct ltt_trace_info *tmp = thread_trace_info;
/* Reader (the disk dumper daemon) */
static pid_t traced_pid = 0;
+static pthread_t traced_thread = 0;
static int parent_exited = 0;
/* signal handling */
alarm(3);
}
+/* Do a buffer switch. Don't switch if buffer is completely empty */
+static void flush_buffer(struct ltt_buf *ltt_buf)
+{
+
+
+}
+
+static inline int ltt_buffer_get(struct ltt_buf *ltt_buf,
+ unsigned int *offset)
+{
+ unsigned int consumed_old, consumed_idx;
+ consumed_old = atomic_read(<t_buf->consumed);
+ consumed_idx = SUBBUF_INDEX(consumed_old, ltt_buf);
+
+ if(atomic_read(<t_buf->commit_count[consumed_idx])
+ != atomic_read(<t_buf->reserve_count[consumed_idx])) {
+ return -EAGAIN;
+ }
+ if((SUBBUF_TRUNC(atomic_read(<t_buf->offset), ltt_buf)
+ -SUBBUF_TRUNC(consumed_old, ltt_buf)) == 0) {
+ return -EAGAIN;
+ }
+
+ *offset = consumed_old;
+
+ return 0;
+}
+
+static inline int ltt_buffer_put(struct ltt_buf *ltt_buf,
+ unsigned int offset)
+{
+ unsigned int consumed_old, consumed_new;
+ int ret;
+
+ consumed_old = offset;
+ consumed_new = SUBBUF_ALIGN(consumed_old, ltt_buf);
+ if(atomic_cmpxchg(<t_buf->consumed, consumed_old, consumed_new)
+ != consumed_old) {
+ /* We have been pushed by the writer : the last buffer read _is_
+ * corrupted!
+ * It can also happen if this is a buffer we never got. */
+ return -EIO;
+ } else {
+ if(atomic_read(<t_buf->full) == 1) {
+ /* tell the client that buffer is now unfull */
+ ret = futex(<t_buf->full, FUTEX_WAKE, 1, NULL, NULL, 0);
+ if(ret != 1) {
+ printf("LTT warning : race condition : writer not waiting or too many writers\n");
+ }
+ atomic_set(<t_buf->full, 0);
+ }
+ }
+}
+
+/* In the writer :
+ *
+ * if(buffer full condition) {
+ * put myself in the wait queue
+ * ltt_buf->full = 1;
+ * schedule
+ * }
+ *{
+ if(buffer_is_full) {
+ atomic_set(<t_buf->full, 1);
+ ret = futex(<t_buf->full, 1, NULL, NULL, 0);
+ }
+}
+
+ */
+
+static int read_subbuffer(struct ltt_buf *ltt_buf, int fd)
+{
+ int err;
+ printf("LTT read buffer\n");
+
+
+ err = ltt_buffer_get(&shared_trace_info->channel.cpu, &consumed_old);
+ if(err != -EAGAIN && err != 0) {
+ printf("LTT Reserving sub buffer failed\n");
+ goto get_error;
+ }
+
+ err = TEMP_FAILURE_RETRY(write(fd,
+ ltt_buf->start
+ + (consumed_old & ((ltt_buf->alloc_size)-1)),
+ ltt_buf->subbuf_size));
+
+ if(err < 0) {
+ perror("Error in writing to file");
+ goto write_error;
+ }
+#if 0
+ err = fsync(pair->trace);
+ if(err < 0) {
+ ret = errno;
+ perror("Error in writing to file");
+ goto write_error;
+ }
+#endif //0
+write_error:
+ err = ltt_buffer_put(&shared_trace_info->channel.cpu, consumed_old);
+
+ if(err != 0) {
+ if(err == -EIO) {
+ perror("Reader has been pushed by the writer, last subbuffer corrupted.");
+ /* FIXME : we may delete the last written buffer if we wish. */
+ }
+ goto get_error;
+ }
+
+get_error:
+ return err;
+}
/* This function is called by ltt_rw_init which has signals blocked */
static void ltt_usertrace_fast_daemon(struct ltt_trace_info *shared_trace_info,
- sigset_t oldset, pid_t l_traced_pid)
+ sigset_t oldset, pid_t l_traced_pid, pthread_t l_traced_thread)
{
struct sigaction act;
int ret;
+ int fd_fac;
+ int fd_cpu;
+ char outfile_name[PATH_MAX];
+ char identifier_name[PATH_MAX];
+
traced_pid = l_traced_pid;
+ traced_thread = l_traced_thread;
printf("LTT ltt_usertrace_fast_daemon : init is %d, pid is %lu, traced_pid is %lu\n",
shared_trace_info->init, getpid(), traced_pid);
alarm(3);
+ /* Open output files */
+ umask(00000);
+ ret = mkdir(LTT_USERTRACE_ROOT, 0777);
+ if(ret < 0 && errno != EEXIST) {
+ perror("LTT Error in creating output (mkdir)");
+ exit(-1);
+ }
+ ret = chdir(LTT_USERTRACE_ROOT);
+ if(ret < 0) {
+ perror("LTT Error in creating output (chdir)");
+ exit(-1);
+ }
+ snprintf(identifier_name, PATH_MAX-1, "%lu.%lu.%llu",
+ traced_pid, traced_thread, get_cycles());
+ snprintf(outfile_name, PATH_MAX-1, "facilities-%s", identifier_name);
+ fd_fac = creat(outfile_name, 0644);
+
+ snprintf(outfile_name, PATH_MAX-1, "cpu-%s", identifier_name);
+ fd_cpu = creat(outfile_name, 0644);
+
+
while(1) {
pause();
if(traced_pid == 0) break; /* parent died */
if(parent_exited) break;
printf("LTT Doing a buffer switch read. pid is : %lu\n", getpid());
- //printf("Test parent. pid is : %lu, ppid is %lu\n", getpid(), getppid());
+
+ do {
+ ret = read_buffer(&shared_trace_info->channel.cpu, fd_cpu);
+ } while(ret == 0);
+
+ do {
+ ret = read_buffer(&shared_trace_info->channel.facilities, fd_fac);
+ } while(ret == 0);
}
/* Buffer force switch (flush) */
- //TODO
+ flush_buffer(&shared_trace_info->channel.cpu);
+ do {
+ ret = read_buffer(&shared_trace_info->channel.cpu, fd_cpu);
+ } while(ret == 0);
+
+
+ flush_buffer(&shared_trace_info->channel.facilities);
+ do {
+ ret = read_buffer(&shared_trace_info->channel.facilities, fd_fac);
+ } while(ret == 0);
+
+ close(fd_fac);
+ close(fd_cpu);
/* The parent thread is dead and we have finished with the buffer */
munmap(shared_trace_info, sizeof(*shared_trace_info));
int ret;
sigset_t set, oldset;
pid_t l_traced_pid = getpid();
+ pthread_t l_traced_thread = pthread_self();
/* parent : create the shared memory map */
shared_trace_info = mmap(0, sizeof(*thread_trace_info),
PROT_READ|PROT_WRITE, MAP_SHARED|MAP_ANONYMOUS, 0, 0);
memset(shared_trace_info, 0, sizeof(*shared_trace_info));
+ /* Tricky semaphore : is in a shared memory space, so it's ok for a fast
+ * mutex (futex). */
+ atomic_set(&shared_trace_info->channel.facilities.full, 0);
+ shared_trace_info->channel.facilities.alloc_size = LTT_BUF_SIZE_FACILITIES;
+ shared_trace_info->channel.facilities.subbuf_size = LTT_SUBBUF_SIZE_FACILITIES;
+ atomic_set(&shared_trace_info->channel.cpu.full, 0);
+ shared_trace_info->channel.cpu.alloc_size = LTT_BUF_SIZE_CPU;
+ shared_trace_info->channel.cpu.subbuf_size = LTT_SUBBUF_SIZE_CPU;
shared_trace_info->init = 1;
/* Disable signals */
} else if(pid == 0) {
/* Child */
role = LTT_ROLE_READER;
- ltt_usertrace_fast_daemon(shared_trace_info, oldset, l_traced_pid);
+ ltt_usertrace_fast_daemon(shared_trace_info, oldset, l_traced_pid,
+ l_traced_thread);
/* Should never return */
exit(-1);
} else if(pid < 0) {