aboutsummaryrefslogtreecommitdiffstats
path: root/trace.c
diff options
context:
space:
mode:
authorThe Android Open Source Project <initial-contribution@android.com>2009-03-03 18:28:35 -0800
committerThe Android Open Source Project <initial-contribution@android.com>2009-03-03 18:28:35 -0800
commitf721e3ac031f892af46f255a47d7f54a91317b30 (patch)
tree4b825dc642cb6eb9a060e54bf8d69288fbee4904 /trace.c
parentbae1bc39312d5019bd9a5b8d840a529213a69a17 (diff)
downloadexternal_qemu-f721e3ac031f892af46f255a47d7f54a91317b30.zip
external_qemu-f721e3ac031f892af46f255a47d7f54a91317b30.tar.gz
external_qemu-f721e3ac031f892af46f255a47d7f54a91317b30.tar.bz2
auto import from //depot/cupcake/@135843
Diffstat (limited to 'trace.c')
-rw-r--r--trace.c1879
1 files changed, 0 insertions, 1879 deletions
diff --git a/trace.c b/trace.c
deleted file mode 100644
index a96f87f..0000000
--- a/trace.c
+++ /dev/null
@@ -1,1879 +0,0 @@
-/* Copyright (C) 2006-2007 The Android Open Source Project
-**
-** This software is licensed under the terms of the GNU General Public
-** License version 2, as published by the Free Software Foundation, and
-** may be copied, distributed, and modified under those terms.
-**
-** 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.
-*/
-
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <limits.h>
-#include <inttypes.h>
-#include <sys/stat.h>
-#include <sys/types.h>
-#include <errno.h>
-#include <sys/time.h>
-#include <time.h>
-#include "cpu.h"
-#include "exec-all.h"
-#include "trace.h"
-#include "varint.h"
-
-TraceBB trace_bb;
-TraceInsn trace_insn;
-TraceStatic trace_static;
-TraceAddr trace_load;
-TraceAddr trace_store;
-TraceExc trace_exc;
-TracePid trace_pid;
-TraceMethod trace_method;
-static TraceHeader header;
-
-const char *trace_filename;
-int tracing;
-int trace_cache_miss;
-int trace_all_addr;
-
-// The simulation time in cpu clock cycles
-uint64_t sim_time = 1;
-
-// The current process id
-int current_pid;
-
-// The start and end (wall-clock) time in microseconds
-uint64_t start_time, end_time;
-uint64_t elapsed_usecs;
-
-// For debugging output
-FILE *ftrace_debug;
-
-// The maximum number of bytes consumed by an InsnRec after compression.
-// This is very conservative but needed to ensure no buffer overflows.
-#define kMaxInsnCompressed 14
-
-// The maximum number of bytes consumed by an BBRec after compression.
-// This is very conservative but needed to ensure no buffer overflows.
-#define kMaxBBCompressed 32
-
-// The maximum number of bytes consumed by an AddrRec after compression.
-// This is very conservative but needed to ensure no buffer overflows.
-#define kMaxAddrCompressed 14
-
-// The maximum number of bytes consumed by a MethodRec after compression.
-// This is very conservative but needed to ensure no buffer overflows.
-#define kMaxMethodCompressed 18
-
-// The maximum number of bytes consumed by an exception record after
-// compression.
-#define kMaxExcCompressed 38
-
-// The maximum number of bytes consumed by a pid record for
-// kPidSwitch, or kPidExit after compression.
-#define kMaxPidCompressed 15
-
-// The maximum number of bytes consumed by a pid record for kPidFork,
-// or kPidClone after compression.
-#define kMaxPid2Compressed 20
-
-// The maximum number of bytes consumed by a pid record for kPidExecArgs
-// after compression, not counting the bytes for the args.
-#define kMaxExecArgsCompressed 15
-
-// The maximum number of bytes consumed by a pid record for kPidName
-// after compression, not counting the bytes for the name.
-#define kMaxNameCompressed 20
-
-// The maximum number of bytes consumed by a pid record for kPidMmap
-// after compression, not counting the bytes for the pathname.
-#define kMaxMmapCompressed 33
-
-// The maximum number of bytes consumed by a pid record for kPidMunmap,
-// after compression.
-#define kMaxMunmapCompressed 28
-
-// The maximum number of bytes consumed by a pid record for kPidSymbol
-// after compression, not counting the bytes for the symbol name.
-#define kMaxSymbolCompressed 24
-
-// The maximum number of bytes consumed by a pid record for kPidKthreadName
-// after compression, not counting the bytes for the name.
-#define kMaxKthreadNameCompressed 25
-
-void trace_cleanup();
-
-// Return current time in microseconds as a 64-bit integer.
-uint64 Now() {
- struct timeval tv;
-
- gettimeofday(&tv, NULL);
- uint64 val = tv.tv_sec;
- val = val * 1000000ull + tv.tv_usec;
- return val;
-}
-
-static void create_trace_dir(const char *dirname)
-{
- int err;
-
- err = path_mkdir(dirname, 0755);
- if (err != 0 && errno != EEXIST) {
- printf("err: %d\n", err);
- perror(dirname);
- exit(1);
- }
-}
-
-static char *create_trace_path(const char *filename, const char *ext)
-{
- char *fname;
- const char *base_start, *base_end;
- int ii, len, base_len, dir_len, path_len, qtrace_len;
-
- // Handle error cases
- if (filename == NULL || *filename == 0 || strcmp(filename, "/") == 0)
- return NULL;
-
- // Ignore a trailing slash, if any
- len = strlen(filename);
- if (filename[len - 1] == '/')
- len -= 1;
-
- // Find the basename. We don't use basename(3) because there are
- // different behaviors for GNU and Posix in the case where the
- // last character is a slash.
- base_start = base_end = &filename[len];
- for (ii = 0; ii < len; ++ii) {
- base_start -= 1;
- if (*base_start == '/') {
- base_start += 1;
- break;
- }
- }
- base_len = base_end - base_start;
- dir_len = len - base_len;
- qtrace_len = strlen("/qtrace");
-
- // Create space for the pathname: "/dir/basename/qtrace.ext"
- // The "ext" string already contains the dot, so just add a byte
- // for the terminating zero.
- path_len = dir_len + base_len + qtrace_len + strlen(ext) + 1;
- fname = malloc(path_len);
- if (dir_len > 0)
- strncpy(fname, filename, dir_len);
- fname[dir_len] = 0;
- strncat(fname, base_start, base_len);
- strcat(fname, "/qtrace");
- strcat(fname, ext);
- return fname;
-}
-
-void convert_secs_to_date_time(time_t secs, uint32_t *pdate, uint32_t *ptime)
-{
- struct tm *tm = localtime(&secs);
- uint32_t year = tm->tm_year + 1900;
- uint32_t thousands = year / 1000;
- year -= thousands * 1000;
- uint32_t hundreds = year / 100;
- year -= hundreds * 100;
- uint32_t tens = year / 10;
- year -= tens * 10;
- uint32_t ones = year;
- year = (thousands << 12) | (hundreds << 8) | (tens << 4) | ones;
-
- uint32_t mon = tm->tm_mon + 1;
- tens = mon / 10;
- ones = (mon - tens * 10);
- mon = (tens << 4) | ones;
-
- uint32_t day = tm->tm_mday;
- tens = day / 10;
- ones = (day - tens * 10);
- day = (tens << 4) | ones;
-
- *pdate = (year << 16) | (mon << 8) | day;
-
- uint32_t hour = tm->tm_hour;
- tens = hour / 10;
- ones = (hour - tens * 10);
- hour = (tens << 4) | ones;
-
- uint32_t min = tm->tm_min;
- tens = min / 10;
- ones = (min - tens * 10);
- min = (tens << 4) | ones;
-
- uint32_t sec = tm->tm_sec;
- tens = sec / 10;
- ones = (sec - tens * 10);
- sec = (tens << 4) | ones;
-
- *ptime = (hour << 16) | (min << 8) | sec;
-}
-
-void write_trace_header(TraceHeader *header)
-{
- TraceHeader swappedHeader;
-
- memcpy(&swappedHeader, header, sizeof(TraceHeader));
-
- convert32(swappedHeader.version);
- convert32(swappedHeader.start_sec);
- convert32(swappedHeader.start_usec);
- convert32(swappedHeader.pdate);
- convert32(swappedHeader.ptime);
- convert32(swappedHeader.num_used_pids);
- convert32(swappedHeader.first_unused_pid);
- convert64(swappedHeader.num_static_bb);
- convert64(swappedHeader.num_static_insn);
- convert64(swappedHeader.num_dynamic_bb);
- convert64(swappedHeader.num_dynamic_insn);
- convert64(swappedHeader.elapsed_usecs);
-
- fwrite(&swappedHeader, sizeof(TraceHeader), 1, trace_static.fstream);
-}
-
-void create_trace_bb(const char *filename)
-{
- char *fname = create_trace_path(filename, ".bb");
- trace_bb.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_bb.fstream = fstream;
- trace_bb.next = &trace_bb.buffer[0];
- trace_bb.flush_time = 0;
- trace_bb.compressed_ptr = trace_bb.compressed;
- trace_bb.high_water_ptr = &trace_bb.compressed[kCompressedSize] - kMaxBBCompressed;
- trace_bb.prev_bb_num = 0;
- trace_bb.prev_bb_time = 0;
- trace_bb.num_insns = 0;
- trace_bb.recnum = 0;
-}
-
-void create_trace_insn(const char *filename)
-{
- // Create the instruction time trace file
- char *fname = create_trace_path(filename, ".insn");
- trace_insn.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_insn.fstream = fstream;
- trace_insn.current = &trace_insn.dummy;
- trace_insn.dummy.time_diff = 0;
- trace_insn.dummy.repeat = 0;
- trace_insn.prev_time = 0;
- trace_insn.compressed_ptr = trace_insn.compressed;
- trace_insn.high_water_ptr = &trace_insn.compressed[kCompressedSize] - kMaxInsnCompressed;
-}
-
-void create_trace_static(const char *filename)
-{
- // Create the static basic block trace file
- char *fname = create_trace_path(filename, ".static");
- trace_static.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_static.fstream = fstream;
- trace_static.next_insn = 0;
- trace_static.bb_num = 1;
- trace_static.bb_addr = 0;
-
- // Write an empty header to reserve space for it in the file.
- // The header will be filled in later when post-processing the
- // trace file.
- memset(&header, 0, sizeof(TraceHeader));
-
- // Write out the version number so that tools can detect if the trace
- // file format is the same as what they expect.
- header.version = TRACE_VERSION;
-
- // Record the start time in the header now.
- struct timeval tv;
- struct timezone tz;
- gettimeofday(&tv, &tz);
- header.start_sec = tv.tv_sec;
- header.start_usec = tv.tv_usec;
- convert_secs_to_date_time(header.start_sec, &header.pdate, &header.ptime);
- write_trace_header(&header);
-
- // Write out the record for the unused basic block number 0.
- uint64_t zero = 0;
- fwrite(&zero, sizeof(uint64_t), 1, trace_static.fstream); // bb_num
- fwrite(&zero, sizeof(uint32_t), 1, trace_static.fstream); // bb_addr
- fwrite(&zero, sizeof(uint32_t), 1, trace_static.fstream); // num_insns
-}
-
-void create_trace_addr(const char *filename)
-{
- // The "qtrace.load" and "qtrace.store" files are optional
- trace_load.fstream = NULL;
- trace_store.fstream = NULL;
- if (trace_all_addr || trace_cache_miss) {
- // Create the "qtrace.load" file
- char *fname = create_trace_path(filename, ".load");
- trace_load.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_load.fstream = fstream;
- trace_load.next = &trace_load.buffer[0];
- trace_load.compressed_ptr = trace_load.compressed;
- trace_load.high_water_ptr = &trace_load.compressed[kCompressedSize] - kMaxAddrCompressed;
- trace_load.prev_addr = 0;
- trace_load.prev_time = 0;
-
- // Create the "qtrace.store" file
- fname = create_trace_path(filename, ".store");
- trace_store.filename = fname;
-
- fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_store.fstream = fstream;
- trace_store.next = &trace_store.buffer[0];
- trace_store.compressed_ptr = trace_store.compressed;
- trace_store.high_water_ptr = &trace_store.compressed[kCompressedSize] - kMaxAddrCompressed;
- trace_store.prev_addr = 0;
- trace_store.prev_time = 0;
- }
-}
-
-void create_trace_exc(const char *filename)
-{
- // Create the exception trace file
- char *fname = create_trace_path(filename, ".exc");
- trace_exc.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_exc.fstream = fstream;
- trace_exc.compressed_ptr = trace_exc.compressed;
- trace_exc.high_water_ptr = &trace_exc.compressed[kCompressedSize] - kMaxExcCompressed;
- trace_exc.prev_time = 0;
- trace_exc.prev_bb_recnum = 0;
-}
-
-void create_trace_pid(const char *filename)
-{
- // Create the pid trace file
- char *fname = create_trace_path(filename, ".pid");
- trace_pid.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_pid.fstream = fstream;
- trace_pid.compressed_ptr = trace_pid.compressed;
- trace_pid.prev_time = 0;
-}
-
-void create_trace_method(const char *filename)
-{
- // Create the method trace file
- char *fname = create_trace_path(filename, ".method");
- trace_method.filename = fname;
-
- FILE *fstream = fopen(fname, "wb");
- if (fstream == NULL) {
- perror(fname);
- exit(1);
- }
- trace_method.fstream = fstream;
- trace_method.compressed_ptr = trace_method.compressed;
- trace_method.prev_time = 0;
- trace_method.prev_addr = 0;
- trace_method.prev_pid = 0;
-}
-
-void trace_init(const char *filename)
-{
- // Create the trace files
- create_trace_dir(filename);
- create_trace_bb(filename);
- create_trace_insn(filename);
- create_trace_static(filename);
- create_trace_addr(filename);
- create_trace_exc(filename);
- create_trace_pid(filename);
- create_trace_method(filename);
-
-#if 0
- char *fname = create_trace_path(filename, ".debug");
- ftrace_debug = fopen(fname, "wb");
- if (ftrace_debug == NULL) {
- perror(fname);
- exit(1);
- }
-#else
- ftrace_debug = NULL;
-#endif
- atexit(trace_cleanup);
-
- // If tracing is on, then start timing the simulator
- if (tracing)
- start_time = Now();
-}
-
-/* the following array is used to deal with def-use register interlocks, which we
- * can compute statically (ignoring conditions), very fortunately.
- *
- * the idea is that interlock_base contains the number of cycles "executed" from
- * the start of a basic block. It is set to 0 in trace_bb_start, and incremented
- * in each call to get_insn_ticks_arm.
- *
- * interlocks[N] correspond to the value of interlock_base after which a register N
- * can be used by another operation, it is set each time an instruction writes to
- * the register in get_insn_ticks()
- */
-
-static int interlocks[16];
-static int interlock_base;
-
-static void
-_interlock_def(int reg, int delay)
-{
- if (reg >= 0)
- interlocks[reg] = interlock_base + delay;
-}
-
-static int
-_interlock_use(int reg)
-{
- int delay = 0;
-
- if (reg >= 0)
- {
- delay = interlocks[reg] - interlock_base;
- if (delay < 0)
- delay = 0;
- }
- return delay;
-}
-
-void trace_bb_start(uint32_t bb_addr)
-{
- int nn;
-
- trace_static.bb_addr = bb_addr;
- trace_static.is_thumb = 0;
-
- interlock_base = 0;
- for (nn = 0; nn < 16; nn++)
- interlocks[nn] = 0;
-}
-
-void trace_add_insn(uint32_t insn, int is_thumb)
-{
- trace_static.insns[trace_static.next_insn++] = insn;
- // This relies on the fact that a basic block does not contain a mix
- // of ARM and Thumb instructions. If that is not true, then many
- // software tools that read the trace will have to change.
- trace_static.is_thumb = is_thumb;
-}
-
-void trace_bb_end()
-{
- int ii, num_insns;
- uint32_t insn;
-
- uint64_t bb_num = hostToLE64(trace_static.bb_num);
- // If these are Thumb instructions, then encode that fact by setting
- // the low bit of the basic-block address to 1.
- uint32_t bb_addr = trace_static.bb_addr | trace_static.is_thumb;
- bb_addr = hostToLE32(bb_addr);
- num_insns = hostToLE32(trace_static.next_insn);
- fwrite(&bb_num, sizeof(bb_num), 1, trace_static.fstream);
- fwrite(&bb_addr, sizeof(bb_addr), 1, trace_static.fstream);
- fwrite(&num_insns, sizeof(num_insns), 1, trace_static.fstream);
- for (ii = 0; ii < trace_static.next_insn; ++ii) {
- insn = hostToLE32(trace_static.insns[ii]);
- fwrite(&insn, sizeof(insn), 1, trace_static.fstream);
- }
-
- trace_static.bb_num += 1;
- trace_static.next_insn = 0;
-}
-
-void trace_cleanup()
-{
- if (tracing) {
- end_time = Now();
- elapsed_usecs += end_time - start_time;
- }
- header.elapsed_usecs = elapsed_usecs;
- double elapsed_secs = elapsed_usecs / 1000000.0;
- double cycles_per_sec = 0;
- if (elapsed_secs != 0)
- cycles_per_sec = sim_time / elapsed_secs;
- char *suffix = "";
- if (cycles_per_sec >= 1000000) {
- cycles_per_sec /= 1000000.0;
- suffix = "M";
- } else if (cycles_per_sec > 1000) {
- cycles_per_sec /= 1000.0;
- suffix = "K";
- }
- printf("Elapsed seconds: %.2f, simulated cycles/sec: %.1f%s\n",
- elapsed_secs, cycles_per_sec, suffix);
- if (trace_bb.fstream) {
- BBRec *ptr;
- BBRec *next = trace_bb.next;
- char *comp_ptr = trace_bb.compressed_ptr;
- int64_t prev_bb_num = trace_bb.prev_bb_num;
- uint64_t prev_bb_time = trace_bb.prev_bb_time;
- for (ptr = trace_bb.buffer; ptr != next; ++ptr) {
- if (comp_ptr >= trace_bb.high_water_ptr) {
- uint32_t size = comp_ptr - trace_bb.compressed;
- fwrite(trace_bb.compressed, sizeof(char), size,
- trace_bb.fstream);
- comp_ptr = trace_bb.compressed;
- }
- int64_t bb_diff = ptr->bb_num - prev_bb_num;
- prev_bb_num = ptr->bb_num;
- uint64_t time_diff = ptr->start_time - prev_bb_time;
- prev_bb_time = ptr->start_time;
- comp_ptr = varint_encode_signed(bb_diff, comp_ptr);
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode(ptr->repeat, comp_ptr);
- if (ptr->repeat)
- comp_ptr = varint_encode(ptr->time_diff, comp_ptr);
- }
-
- // Add an extra record at the end containing the ending simulation
- // time and a basic block number of 0.
- uint64_t time_diff = sim_time - prev_bb_time;
- if (time_diff > 0) {
- int64_t bb_diff = -prev_bb_num;
- comp_ptr = varint_encode_signed(bb_diff, comp_ptr);
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode(0, comp_ptr);
- }
-
- uint32_t size = comp_ptr - trace_bb.compressed;
- if (size)
- fwrite(trace_bb.compressed, sizeof(char), size, trace_bb.fstream);
-
- // Terminate the file with three zeros so that we can detect
- // the end of file quickly.
- uint32_t zeros = 0;
- fwrite(&zeros, 3, 1, trace_bb.fstream);
- fclose(trace_bb.fstream);
- }
-
- if (trace_insn.fstream) {
- InsnRec *ptr;
- InsnRec *current = trace_insn.current + 1;
- char *comp_ptr = trace_insn.compressed_ptr;
- for (ptr = trace_insn.buffer; ptr != current; ++ptr) {
- if (comp_ptr >= trace_insn.high_water_ptr) {
- uint32_t size = comp_ptr - trace_insn.compressed;
- uint32_t rval = fwrite(trace_insn.compressed, sizeof(char),
- size, trace_insn.fstream);
- if (rval != size) {
- fprintf(stderr, "fwrite() failed\n");
- perror(trace_insn.filename);
- exit(1);
- }
- comp_ptr = trace_insn.compressed;
- }
- comp_ptr = varint_encode(ptr->time_diff, comp_ptr);
- comp_ptr = varint_encode(ptr->repeat, comp_ptr);
- }
-
- uint32_t size = comp_ptr - trace_insn.compressed;
- if (size) {
- uint32_t rval = fwrite(trace_insn.compressed, sizeof(char), size,
- trace_insn.fstream);
- if (rval != size) {
- fprintf(stderr, "fwrite() failed\n");
- perror(trace_insn.filename);
- exit(1);
- }
- }
- fclose(trace_insn.fstream);
- }
-
- if (trace_static.fstream) {
- fseek(trace_static.fstream, 0, SEEK_SET);
- write_trace_header(&header);
- fclose(trace_static.fstream);
- }
-
- if (trace_load.fstream) {
- AddrRec *ptr;
- char *comp_ptr = trace_load.compressed_ptr;
- AddrRec *next = trace_load.next;
- uint32_t prev_addr = trace_load.prev_addr;
- uint64_t prev_time = trace_load.prev_time;
- for (ptr = trace_load.buffer; ptr != next; ++ptr) {
- if (comp_ptr >= trace_load.high_water_ptr) {
- uint32_t size = comp_ptr - trace_load.compressed;
- fwrite(trace_load.compressed, sizeof(char), size,
- trace_load.fstream);
- comp_ptr = trace_load.compressed;
- }
-
- int addr_diff = ptr->addr - prev_addr;
- uint64_t time_diff = ptr->time - prev_time;
- prev_addr = ptr->addr;
- prev_time = ptr->time;
-
- comp_ptr = varint_encode_signed(addr_diff, comp_ptr);
- comp_ptr = varint_encode(time_diff, comp_ptr);
- }
-
- uint32_t size = comp_ptr - trace_load.compressed;
- if (size) {
- fwrite(trace_load.compressed, sizeof(char), size,
- trace_load.fstream);
- }
-
- // Terminate the file with two zeros so that we can detect
- // the end of file quickly.
- uint32_t zeros = 0;
- fwrite(&zeros, 2, 1, trace_load.fstream);
- fclose(trace_load.fstream);
- }
-
- if (trace_store.fstream) {
- AddrRec *ptr;
- char *comp_ptr = trace_store.compressed_ptr;
- AddrRec *next = trace_store.next;
- uint32_t prev_addr = trace_store.prev_addr;
- uint64_t prev_time = trace_store.prev_time;
- for (ptr = trace_store.buffer; ptr != next; ++ptr) {
- if (comp_ptr >= trace_store.high_water_ptr) {
- uint32_t size = comp_ptr - trace_store.compressed;
- fwrite(trace_store.compressed, sizeof(char), size,
- trace_store.fstream);
- comp_ptr = trace_store.compressed;
- }
-
- int addr_diff = ptr->addr - prev_addr;
- uint64_t time_diff = ptr->time - prev_time;
- prev_addr = ptr->addr;
- prev_time = ptr->time;
-
- comp_ptr = varint_encode_signed(addr_diff, comp_ptr);
- comp_ptr = varint_encode(time_diff, comp_ptr);
- }
-
- uint32_t size = comp_ptr - trace_store.compressed;
- if (size) {
- fwrite(trace_store.compressed, sizeof(char), size,
- trace_store.fstream);
- }
-
- // Terminate the file with two zeros so that we can detect
- // the end of file quickly.
- uint32_t zeros = 0;
- fwrite(&zeros, 2, 1, trace_store.fstream);
- fclose(trace_store.fstream);
- }
-
- if (trace_exc.fstream) {
- uint32_t size = trace_exc.compressed_ptr - trace_exc.compressed;
- if (size) {
- fwrite(trace_exc.compressed, sizeof(char), size,
- trace_exc.fstream);
- }
-
- // Terminate the file with 7 zeros so that we can detect
- // the end of file quickly.
- uint64_t zeros = 0;
- fwrite(&zeros, 7, 1, trace_exc.fstream);
- fclose(trace_exc.fstream);
- }
- if (trace_pid.fstream) {
- uint32_t size = trace_pid.compressed_ptr - trace_pid.compressed;
- if (size) {
- fwrite(trace_pid.compressed, sizeof(char), size,
- trace_pid.fstream);
- }
-
- // Terminate the file with 2 zeros so that we can detect
- // the end of file quickly.
- uint64_t zeros = 0;
- fwrite(&zeros, 2, 1, trace_pid.fstream);
- fclose(trace_pid.fstream);
- }
- if (trace_method.fstream) {
- uint32_t size = trace_method.compressed_ptr - trace_method.compressed;
- if (size) {
- fwrite(trace_method.compressed, sizeof(char), size,
- trace_method.fstream);
- }
-
- // Terminate the file with 2 zeros so that we can detect
- // the end of file quickly.
- uint64_t zeros = 0;
- fwrite(&zeros, 2, 1, trace_method.fstream);
- fclose(trace_method.fstream);
- }
- if (ftrace_debug)
- fclose(ftrace_debug);
-}
-
-// Define the number of clock ticks for some instructions. Add one to these
-// (in some cases) if there is an interlock. We currently do not check for
-// interlocks.
-#define TICKS_OTHER 1
-#define TICKS_SMULxy 1
-#define TICKS_SMLAWy 1
-#define TICKS_SMLALxy 2
-#define TICKS_MUL 2
-#define TICKS_MLA 2
-#define TICKS_MULS 4 // no interlock penalty
-#define TICKS_MLAS 4 // no interlock penalty
-#define TICKS_UMULL 3
-#define TICKS_UMLAL 3
-#define TICKS_SMULL 3
-#define TICKS_SMLAL 3
-#define TICKS_UMULLS 5 // no interlock penalty
-#define TICKS_UMLALS 5 // no interlock penalty
-#define TICKS_SMULLS 5 // no interlock penalty
-#define TICKS_SMLALS 5 // no interlock penalty
-
-// Compute the number of cycles that this instruction will take,
-// not including any I-cache or D-cache misses. This function
-// is called for each instruction in a basic block when that
-// block is being translated.
-int get_insn_ticks_arm(uint32_t insn)
-{
-#if 1
- int result = 1; /* by default, use 1 cycle */
-
- /* See Chapter 12 of the ARM920T Reference Manual for details about clock cycles */
-
- /* first check for invalid condition codes */
- if ((insn >> 28) == 0xf)
- {
- if ((insn >> 25) == 0x7d) { /* BLX */
- result = 3;
- goto Exit;
- }
- /* XXX: if we get there, we're either in an UNDEFINED instruction */
- /* or in co-processor related ones. For now, only return 1 cycle */
- goto Exit;
- }
-
- /* other cases */
- switch ((insn >> 25) & 7)
- {
- case 0:
- if ((insn & 0x00000090) == 0x00000090) /* Multiplies, extra load/store, Table 3-2 */
- {
- /* XXX: TODO: Add support for multiplier operand content penalties in the translator */
-
- if ((insn & 0x0fc000f0) == 0x00000090) /* 3-2: Multiply (accumulate) */
- {
- int Rm = (insn & 15);
- int Rs = (insn >> 8) & 15;
- int Rn = (insn >> 12) & 15;
-
- if ((insn & 0x00200000) != 0) { /* MLA */
- result += _interlock_use(Rn);
- } else { /* MLU */
- if (Rn != 0) /* UNDEFINED */
- goto Exit;
- }
- /* cycles=2+m, assume m=1, this should be adjusted at interpretation time */
- result += 2 + _interlock_use(Rm) + _interlock_use(Rs);
- }
- else if ((insn & 0x0f8000f0) == 0x00800090) /* 3-2: Multiply (accumulate) long */
- {
- int Rm = (insn & 15);
- int Rs = (insn >> 8) & 15;
- int RdLo = (insn >> 12) & 15;
- int RdHi = (insn >> 16) & 15;
-
- if ((insn & 0x00200000) != 0) { /* SMLAL & UMLAL */
- result += _interlock_use(RdLo) + _interlock_use(RdHi);
- }
- /* else SMLL and UMLL */
-
- /* cucles=3+m, assume m=1, this should be adjusted at interpretation time */
- result += 3 + _interlock_use(Rm) + _interlock_use(Rs);
- }
- else if ((insn & 0x0fd00ff0) == 0x01000090) /* 3-2: Swap/swap byte */
- {
- int Rm = (insn & 15);
- int Rd = (insn >> 8) & 15;
-
- result = 2 + _interlock_use(Rm);
- _interlock_def(Rd, result+1);
- }
- else if ((insn & 0x0e400ff0) == 0x00000090) /* 3-2: load/store halfword, reg offset */
- {
- int Rm = (insn & 15);
- int Rd = (insn >> 12) & 15;
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rn) + _interlock_use(Rm);
- if ((insn & 0x00100000) != 0) /* it's a load, there's a 2-cycle interlock */
- _interlock_def(Rd, result+2);
- }
- else if ((insn & 0x0e400ff0) == 0x00400090) /* 3-2: load/store halfword, imm offset */
- {
- int Rd = (insn >> 12) & 15;
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rn);
- if ((insn & 0x00100000) != 0) /* it's a load, there's a 2-cycle interlock */
- _interlock_def(Rd, result+2);
- }
- else if ((insn & 0x0e500fd0) == 0x000000d0) /* 3-2: load/store two words, reg offset */
- {
- /* XXX: TODO: Enhanced DSP instructions */
- }
- else if ((insn & 0x0e500fd0) == 0x001000d0) /* 3-2: load/store half/byte, reg offset */
- {
- int Rm = (insn & 15);
- int Rd = (insn >> 12) & 15;
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rn) + _interlock_use(Rm);
- if ((insn & 0x00100000) != 0) /* load, 2-cycle interlock */
- _interlock_def(Rd, result+2);
- }
- else if ((insn & 0x0e5000d0) == 0x004000d0) /* 3-2: load/store two words, imm offset */
- {
- /* XXX: TODO: Enhanced DSP instructions */
- }
- else if ((insn & 0x0e5000d0) == 0x005000d0) /* 3-2: load/store half/byte, imm offset */
- {
- int Rd = (insn >> 12) & 15;
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rn);
- if ((insn & 0x00100000) != 0) /* load, 2-cycle interlock */
- _interlock_def(Rd, result+2);
- }
- else
- {
- /* UNDEFINED */
- }
- }
- else if ((insn & 0x0f900000) == 0x01000000) /* Misc. instructions, table 3-3 */
- {
- switch ((insn >> 4) & 15)
- {
- case 0:
- if ((insn & 0x0fb0fff0) == 0x0120f000) /* move register to status register */
- {
- int Rm = (insn & 15);
- result += _interlock_use(Rm);
- }
- break;
-
- case 1:
- if ( ((insn & 0x0ffffff0) == 0x01200010) || /* branch/exchange */
- ((insn & 0x0fff0ff0) == 0x01600010) ) /* count leading zeroes */
- {
- int Rm = (insn & 15);
- result += _interlock_use(Rm);
- }
- break;
-
- case 3:
- if ((insn & 0x0ffffff0) == 0x01200030) /* link/exchange */
- {
- int Rm = (insn & 15);
- result += _interlock_use(Rm);
- }
- break;
-
- default:
- /* TODO: Enhanced DSP instructions */
- ;
- }
- }
- else /* Data processing */
- {
- int Rm = (insn & 15);
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rn) + _interlock_use(Rm);
- if ((insn & 0x10)) { /* register-controlled shift => 1 cycle penalty */
- int Rs = (insn >> 8) & 15;
- result += 1 + _interlock_use(Rs);
- }
- }
- break;
-
- case 1:
- if ((insn & 0x01900000) == 0x01900000)
- {
- /* either UNDEFINED or move immediate to CPSR */
- }
- else /* Data processing immediate */
- {
- int Rn = (insn >> 12) & 15;
- result += _interlock_use(Rn);
- }
- break;
-
- case 2: /* load/store immediate */
- {
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rn);
- if (insn & 0x00100000) { /* LDR */
- int Rd = (insn >> 12) & 15;
-
- if (Rd == 15) /* loading PC */
- result = 5;
- else
- _interlock_def(Rd,result+1);
- }
- }
- break;
-
- case 3:
- if ((insn & 0x10) == 0) /* load/store register offset */
- {
- int Rm = (insn & 15);
- int Rn = (insn >> 16) & 15;
-
- result += _interlock_use(Rm) + _interlock_use(Rn);
-
- if (insn & 0x00100000) { /* LDR */
- int Rd = (insn >> 12) & 15;
- if (Rd == 15)
- result = 5;
- else
- _interlock_def(Rd,result+1);
- }
- }
- /* else UNDEFINED */
- break;
-
- case 4: /* load/store multiple */
- {
- int Rn = (insn >> 16) & 15;
- uint32_t mask = (insn & 0xffff);
- int count;
-
- for (count = 0; mask; count++)
- mask &= (mask-1);
-
- result += _interlock_use(Rn);
-
- if (insn & 0x00100000) /* LDM */
- {
- int nn;
-
- if (insn & 0x8000) { /* loading PC */
- result = count+4;
- } else { /* not loading PC */
- result = (count < 2) ? 2 : count;
- }
- /* create defs, all registers locked until the end of the load */
- for (nn = 0; nn < 15; nn++)
- if ((insn & (1U << nn)) != 0)
- _interlock_def(nn,result);
- }
- else /* STM */
- result = (count < 2) ? 2 : count;
- }
- break;
-
- case 5: /* branch and branch+link */
- break;
-
- case 6: /* coprocessor load/store */
- {
- int Rn = (insn >> 16) & 15;
-
- if (insn & 0x00100000)
- result += _interlock_use(Rn);
-
- /* XXX: other things to do ? */
- }
- break;
-
- default: /* i.e. 7 */
- /* XXX: TODO: co-processor related things */
- ;
- }
-Exit:
- interlock_base += result;
- return result;
-#else /* old code - this seems to be completely buggy ?? */
- if ((insn & 0x0ff0f090) == 0x01600080) {
- return TICKS_SMULxy;
- } else if ((insn & 0x0ff00090) == 0x01200080) {
- return TICKS_SMLAWy;
- } else if ((insn & 0x0ff00090) == 0x01400080) {
- return TICKS_SMLALxy;
- } else if ((insn & 0x0f0000f0) == 0x00000090) {
- // multiply
- uint8_t bit23 = (insn >> 23) & 0x1;
- uint8_t bit22_U = (insn >> 22) & 0x1;
- uint8_t bit21_A = (insn >> 21) & 0x1;
- uint8_t bit20_S = (insn >> 20) & 0x1;
-
- if (bit23 == 0) {
- // 32-bit multiply
- if (bit22_U != 0) {
- // This is an unexpected bit pattern.
- return TICKS_OTHER;
- }
- if (bit21_A == 0) {
- if (bit20_S)
- return TICKS_MULS;
- return TICKS_MUL;
- }
- if (bit20_S)
- return TICKS_MLAS;
- return TICKS_MLA;
- }
- // 64-bit multiply
- if (bit22_U == 0) {
- // Unsigned multiply long
- if (bit21_A == 0) {
- if (bit20_S)
- return TICKS_UMULLS;
- return TICKS_UMULL;
- }
- if (bit20_S)
- return TICKS_UMLALS;
- return TICKS_UMLAL;
- }
- // Signed multiply long
- if (bit21_A == 0) {
- if (bit20_S)
- return TICKS_SMULLS;
- return TICKS_SMULL;
- }
- if (bit20_S)
- return TICKS_SMLALS;
- return TICKS_SMLAL;
- }
- return TICKS_OTHER;
-#endif
-}
-
-int get_insn_ticks_thumb(uint32_t insn)
-{
-#if 1
- int result = 1;
-
- switch ((insn >> 11) & 31)
- {
- case 0:
- case 1:
- case 2: /* Shift by immediate */
- {
- int Rm = (insn >> 3) & 7;
- result += _interlock_use(Rm);
- }
- break;
-
- case 3: /* Add/Substract */
- {
- int Rn = (insn >> 3) & 7;
- result += _interlock_use(Rn);
-
- if ((insn & 0x0400) == 0) { /* register value */
- int Rm = (insn >> 6) & 7;
- result += _interlock_use(Rm);
- }
- }
- break;
-
- case 4: /* move immediate */
- break;
-
- case 5:
- case 6:
- case 7: /* add/substract/compare immediate */
- {
- int Rd = (insn >> 8) & 7;
- result += _interlock_use(Rd);
- }
- break;
-
- case 8:
- {
- if ((insn & 0x0400) == 0) /* data processing register */
- {
- /* the registers can also be Rs and Rn in some cases */
- /* but they're always read anyway and located at the */
- /* same place, so we don't check the opcode */
- int Rm = (insn >> 3) & 7;
- int Rd = (insn >> 3) & 7;
-
- result += _interlock_use(Rm) + _interlock_use(Rd);
- }
- else switch ((insn >> 8) & 3)
- {
- case 0:
- case 1:
- case 2: /* special data processing */
- {
- int Rn = (insn & 7) | ((insn >> 4) & 0x8);
- int Rm = ((insn >> 3) & 15);
-
- result += _interlock_use(Rn) + _interlock_use(Rm);
- }
- break;
-
- case 3:
- if ((insn & 0xff07) == 0x4700) /* branch/exchange */
- {
- int Rm = (insn >> 3) & 15;
-
- result = 3 + _interlock_use(Rm);
- }
- /* else UNDEFINED */
- break;
- }
- }
- break;
-
- case 9: /* load from literal pool */
- {
- int Rd = (insn >> 8) & 7;
- _interlock_def(Rd,result+1);
- }
- break;
-
- case 10:
- case 11: /* load/store register offset */
- {
- int Rd = (insn & 7);
- int Rn = (insn >> 3) & 7;
- int Rm = (insn >> 6) & 7;
-
- result += _interlock_use(Rn) + _interlock_use(Rm);
-
- switch ((insn >> 9) & 7)
- {
- case 0: /* STR */
- case 1: /* STRH */
- case 2: /* STRB */
- result += _interlock_use(Rd);
- break;
-
- case 3: /* LDRSB */
- case 5: /* LDRH */
- case 6: /* LDRB */
- case 7: /* LDRSH */
- _interlock_def(Rd,result+2);
- break;
-
- case 4: /* LDR */
- _interlock_def(Rd,result+1);
- }
- }
- break;
-
- case 12: /* store word immediate offset */
- case 14: /* store byte immediate offset */
- {
- int Rd = (insn & 7);
- int Rn = (insn >> 3) & 7;
-
- result += _interlock_use(Rd) + _interlock_use(Rn);
- }
- break;
-
- case 13: /* load word immediate offset */
- {
- int Rd = (insn & 7);
- int Rn = (insn >> 3) & 7;
-
- result += _interlock_use(Rn);
- _interlock_def(Rd,result+1);
- }
- break;
-
- case 15: /* load byte immediate offset */
- {
- int Rd = (insn & 7);
- int Rn = (insn >> 3) & 7;
-
- result += _interlock_use(Rn);
- _interlock_def(Rd,result+2);
- }
- break;
-
- case 16: /* store halfword immediate offset */
- {
- int Rd = (insn & 7);
- int Rn = (insn >> 3) & 7;
-
- result += _interlock_use(Rn) + _interlock_use(Rd);
- }
- break;
-
- case 17: /* load halfword immediate offset */
- {
- int Rd = (insn & 7);
- int Rn = (insn >> 3) & 7;
-
- result += _interlock_use(Rn);
- _interlock_def(Rd,result+2);
- }
- break;
-
- case 18: /* store to stack */
- {
- int Rd = (insn >> 8) & 3;
- result += _interlock_use(Rd);
- }
- break;
-
- case 19: /* load from stack */
- {
- int Rd = (insn >> 8) & 3;
- _interlock_def(Rd,result+1);
- }
- break;
-
- case 20: /* add to PC */
- case 21: /* add to SP */
- {
- int Rd = (insn >> 8) & 3;
- result += _interlock_use(Rd);
- }
- break;
-
- case 22:
- case 23: /* misc. instructions, table 6-2 */
- {
- if ((insn & 0xff00) == 0xb000) /* adjust stack pointer */
- {
- result += _interlock_use(14);
- }
- else if ((insn & 0x0600) == 0x0400) /* push pop register list */
- {
- uint32_t mask = insn & 0x01ff;
- int count, nn;
-
- for (count = 0; mask; count++)
- mask &= (mask-1);
-
- result = (count < 2) ? 2 : count;
-
- if (insn & 0x0800) /* pop register list */
- {
- for (nn = 0; nn < 9; nn++)
- if (insn & (1 << nn))
- _interlock_def(nn, result);
- }
- else /* push register list */
- {
- for (nn = 0; nn < 9; nn++)
- if (insn & (1 << nn))
- result += _interlock_use(nn);
- }
- }
- /* else software breakpoint */
- }
- break;
-
- case 24: /* store multiple */
- {
- int Rd = (insn >> 8) & 7;
- uint32_t mask = insn & 255;
- int count, nn;
-
- for (count = 0; mask; count++)
- mask &= (mask-1);
-
- result = (count < 2) ? 2 : count;
- result += _interlock_use(Rd);
-
- for (nn = 0; nn < 8; nn++)
- if (insn & (1 << nn))
- result += _interlock_use(nn);
- }
- break;
-
- case 25: /* load multiple */
- {
- int Rd = (insn >> 8) & 7;
- uint32_t mask = insn & 255;
- int count, nn;
-
- for (count = 0; mask; count++)
- mask &= (mask-1);
-
- result = (count < 2) ? 2 : count;
- result += _interlock_use(Rd);
-
- for (nn = 0; nn < 8; nn++)
- if (insn & (1 << nn))
- _interlock_def(nn, result);
- }
- break;
-
- case 26:
- case 27: /* conditional branch / undefined / software interrupt */
- switch ((insn >> 8) & 15)
- {
- case 14: /* UNDEFINED */
- case 15: /* SWI */
- break;
-
- default: /* conditional branch */
- result = 3;
- }
- break;
-
- case 28: /* unconditional branch */
- result = 3;
- break;
-
- case 29: /* BLX suffix or undefined */
- if ((insn & 1) == 0)
- result = 3;
- break;
-
- case 30: /* BLX/BLX prefix */
- break;
-
- case 31: /* BL suffix */
- result = 3;
- break;
- }
- interlock_base += result;
- return result;
-#else /* old code */
- if ((insn & 0xfc00) == 0x4340) /* MUL */
- return TICKS_SMULxy;
-
- return TICKS_OTHER;
-#endif
-}
-
-// Adds an exception trace record.
-void trace_exception(uint32 target_pc)
-{
- if (trace_exc.fstream == NULL)
- return;
-
- // Sometimes we get an unexpected exception as the first record. If the
- // basic block number is zero, then we know it is bogus.
- if (trace_bb.current_bb_num == 0)
- return;
-
- uint32_t current_pc = trace_bb.current_bb_addr + 4 * (trace_bb.num_insns - 1);
-#if 0
- if (ftrace_debug) {
- fprintf(ftrace_debug, "t%llu exc pc: 0x%x bb_addr: 0x%x num_insns: %d current_pc: 0x%x bb_num %llu bb_start_time %llu\n",
- sim_time, target_pc, trace_bb.current_bb_addr,
- trace_bb.num_insns, current_pc, trace_bb.current_bb_num,
- trace_bb.current_bb_start_time);
- }
-#endif
- char *comp_ptr = trace_exc.compressed_ptr;
- if (comp_ptr >= trace_exc.high_water_ptr) {
- uint32_t size = comp_ptr - trace_exc.compressed;
- fwrite(trace_exc.compressed, sizeof(char), size, trace_exc.fstream);
- comp_ptr = trace_exc.compressed;
- }
- uint64_t time_diff = sim_time - trace_exc.prev_time;
- trace_exc.prev_time = sim_time;
- uint64_t bb_recnum_diff = trace_bb.recnum - trace_exc.prev_bb_recnum;
- trace_exc.prev_bb_recnum = trace_bb.recnum;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode(current_pc, comp_ptr);
- comp_ptr = varint_encode(bb_recnum_diff, comp_ptr);
- comp_ptr = varint_encode(target_pc, comp_ptr);
- comp_ptr = varint_encode(trace_bb.current_bb_num, comp_ptr);
- comp_ptr = varint_encode(trace_bb.current_bb_start_time, comp_ptr);
- comp_ptr = varint_encode(trace_bb.num_insns, comp_ptr);
- trace_exc.compressed_ptr = comp_ptr;
-}
-
-void trace_pid_1arg(int pid, int rec_type)
-{
- if (trace_pid.fstream == NULL)
- return;
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + kMaxPidCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(pid, comp_ptr);
- trace_pid.compressed_ptr = comp_ptr;
-}
-
-void trace_pid_2arg(int tgid, int pid, int rec_type)
-{
- if (trace_pid.fstream == NULL)
- return;
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + kMaxPid2Compressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(tgid, comp_ptr);
- comp_ptr = varint_encode(pid, comp_ptr);
- trace_pid.compressed_ptr = comp_ptr;
-}
-
-void trace_switch(int pid)
-{
-#if 0
- if (ftrace_debug && trace_pid.fstream)
- fprintf(ftrace_debug, "t%lld switch %d\n", sim_time, pid);
-#endif
- trace_pid_1arg(pid, kPidSwitch);
- current_pid = pid;
-}
-
-void trace_fork(int tgid, int pid)
-{
-#if 0
- if (ftrace_debug && trace_pid.fstream)
- fprintf(ftrace_debug, "t%lld fork %d\n", sim_time, pid);
-#endif
- trace_pid_2arg(tgid, pid, kPidFork);
-}
-
-void trace_clone(int tgid, int pid)
-{
-#if 0
- if (ftrace_debug && trace_pid.fstream)
- fprintf(ftrace_debug, "t%lld clone %d\n", sim_time, pid);
-#endif
- trace_pid_2arg(tgid, pid, kPidClone);
-}
-
-void trace_exit(int exitcode)
-{
-#if 0
- if (ftrace_debug && trace_pid.fstream)
- fprintf(ftrace_debug, "t%lld exit %d\n", sim_time, exitcode);
-#endif
- trace_pid_1arg(exitcode, kPidExit);
-}
-
-void trace_name(char *name)
-{
-#if 0
- if (ftrace_debug && trace_pid.fstream) {
- fprintf(ftrace_debug, "t%lld pid %d name %s\n",
- sim_time, current_pid, name);
- }
-#endif
- if (trace_pid.fstream == NULL)
- return;
- int len = strlen(name);
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + len + kMaxNameCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidName;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(current_pid, comp_ptr);
- comp_ptr = varint_encode(len, comp_ptr);
- strncpy(comp_ptr, name, len);
- comp_ptr += len;
- trace_pid.compressed_ptr = comp_ptr;
-}
-
-void trace_execve(const char *argv, int len)
-{
- int ii;
-
- if (trace_pid.fstream == NULL)
- return;
- // Count the number of args
- int alen = 0;
- int sum_len = 0;
- int argc = 0;
- const char *ptr = argv;
- while (sum_len < len) {
- argc += 1;
- alen = strlen(ptr);
- ptr += alen + 1;
- sum_len += alen + 1;
- }
-
-#if 0
- if (ftrace_debug) {
- fprintf(ftrace_debug, "t%lld argc: %d\n", sim_time, argc);
- alen = 0;
- ptr = argv;
- for (ii = 0; ii < argc; ++ii) {
- fprintf(ftrace_debug, " argv[%d]: %s\n", ii, ptr);
- alen = strlen(ptr);
- ptr += alen + 1;
- }
- }
-#endif
-
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + len + 5 * argc + kMaxExecArgsCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidExec;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(argc, comp_ptr);
-
- ptr = argv;
- for (ii = 0; ii < argc; ++ii) {
- alen = strlen(ptr);
- comp_ptr = varint_encode(alen, comp_ptr);
- strncpy(comp_ptr, ptr, alen);
- comp_ptr += alen;
- ptr += alen + 1;
- }
- trace_pid.compressed_ptr = comp_ptr;
-}
-
-void trace_mmap(unsigned long vstart, unsigned long vend,
- unsigned long offset, const char *path)
-{
- if (trace_pid.fstream == NULL)
- return;
-#if 0
- if (ftrace_debug)
- fprintf(ftrace_debug, "t%lld mmap %08lx - %08lx, offset %08lx '%s'\n",
- sim_time, vstart, vend, offset, path);
-#endif
- int len = strlen(path);
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + len + kMaxMmapCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidMmap;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(vstart, comp_ptr);
- comp_ptr = varint_encode(vend, comp_ptr);
- comp_ptr = varint_encode(offset, comp_ptr);
- comp_ptr = varint_encode(len, comp_ptr);
- strncpy(comp_ptr, path, len);
- trace_pid.compressed_ptr = comp_ptr + len;
-}
-
-void trace_munmap(unsigned long vstart, unsigned long vend)
-{
- if (trace_pid.fstream == NULL)
- return;
-#if 0
- if (ftrace_debug)
- fprintf(ftrace_debug, "t%lld munmap %08lx - %08lx\n",
- sim_time, vstart, vend);
-#endif
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + kMaxMunmapCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidMunmap;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(vstart, comp_ptr);
- comp_ptr = varint_encode(vend, comp_ptr);
- trace_pid.compressed_ptr = comp_ptr;
-}
-
-void trace_dynamic_symbol_add(unsigned long vaddr, const char *name)
-{
- if (trace_pid.fstream == NULL)
- return;
-#if 0
- if (ftrace_debug)
- fprintf(ftrace_debug, "t%lld sym %08lx '%s'\n", sim_time, vaddr, name);
-#endif
- int len = strlen(name);
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + len + kMaxSymbolCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidSymbolAdd;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(vaddr, comp_ptr);
- comp_ptr = varint_encode(len, comp_ptr);
- strncpy(comp_ptr, name, len);
- trace_pid.compressed_ptr = comp_ptr + len;
-}
-
-void trace_dynamic_symbol_remove(unsigned long vaddr)
-{
- if (trace_pid.fstream == NULL)
- return;
-#if 0
- if (ftrace_debug)
- fprintf(ftrace_debug, "t%lld remove %08lx\n", sim_time, vaddr);
-#endif
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + kMaxSymbolCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidSymbolRemove;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(vaddr, comp_ptr);
- trace_pid.compressed_ptr = comp_ptr;
-}
-
-void trace_init_name(int tgid, int pid, const char *name)
-{
- if (trace_pid.fstream == NULL)
- return;
-#if 0
- if (ftrace_debug)
- fprintf(ftrace_debug, "t%lld kthread %d %s\n", sim_time, pid, name);
-#endif
- int len = strlen(name);
- char *comp_ptr = trace_pid.compressed_ptr;
- char *max_end_ptr = comp_ptr + len + kMaxKthreadNameCompressed;
- if (max_end_ptr >= &trace_pid.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_pid.compressed;
- fwrite(trace_pid.compressed, sizeof(char), size, trace_pid.fstream);
- comp_ptr = trace_pid.compressed;
- }
- uint64_t time_diff = sim_time - trace_pid.prev_time;
- trace_pid.prev_time = sim_time;
- comp_ptr = varint_encode(time_diff, comp_ptr);
- int rec_type = kPidKthreadName;
- comp_ptr = varint_encode(rec_type, comp_ptr);
- comp_ptr = varint_encode(tgid, comp_ptr);
- comp_ptr = varint_encode(pid, comp_ptr);
- comp_ptr = varint_encode(len, comp_ptr);
- strncpy(comp_ptr, name, len);
- trace_pid.compressed_ptr = comp_ptr + len;
-}
-
-void trace_init_exec(unsigned long start, unsigned long end,
- unsigned long offset, const char *exe)
-{
-}
-
-// This function is called by the generated code to record the basic
-// block number.
-void trace_bb_helper(uint64_t bb_num, TranslationBlock *tb)
-{
- BBRec *bb_rec = tb->bb_rec;
- uint64_t prev_time = tb->prev_time;
- trace_bb.current_bb_addr = tb->pc;
- trace_bb.current_bb_num = bb_num;
- trace_bb.current_bb_start_time = sim_time;
- trace_bb.num_insns = 0;
- trace_bb.recnum += 1;
-
-#if 0
- if (ftrace_debug)
- fprintf(ftrace_debug, "t%lld %lld\n", sim_time, bb_num);
-#endif
- if (bb_rec && bb_rec->bb_num == bb_num && prev_time > trace_bb.flush_time) {
- uint64_t time_diff = sim_time - prev_time;
- if (bb_rec->repeat == 0) {
- bb_rec->repeat = 1;
- bb_rec->time_diff = time_diff;
- tb->prev_time = sim_time;
- return;
- } else if (time_diff == bb_rec->time_diff) {
- bb_rec->repeat += 1;
- tb->prev_time = sim_time;
- return;
- }
- }
-
- BBRec *next = trace_bb.next;
- if (next == &trace_bb.buffer[kMaxNumBasicBlocks]) {
- BBRec *ptr;
- char *comp_ptr = trace_bb.compressed_ptr;
- int64_t prev_bb_num = trace_bb.prev_bb_num;
- uint64_t prev_bb_time = trace_bb.prev_bb_time;
- for (ptr = trace_bb.buffer; ptr != next; ++ptr) {
- if (comp_ptr >= trace_bb.high_water_ptr) {
- uint32_t size = comp_ptr - trace_bb.compressed;
- fwrite(trace_bb.compressed, sizeof(char), size, trace_bb.fstream);
- comp_ptr = trace_bb.compressed;
- }
- int64_t bb_diff = ptr->bb_num - prev_bb_num;
- prev_bb_num = ptr->bb_num;
- uint64_t time_diff = ptr->start_time - prev_bb_time;
- prev_bb_time = ptr->start_time;
- comp_ptr = varint_encode_signed(bb_diff, comp_ptr);
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode(ptr->repeat, comp_ptr);
- if (ptr->repeat)
- comp_ptr = varint_encode(ptr->time_diff, comp_ptr);
- }
- trace_bb.compressed_ptr = comp_ptr;
- trace_bb.prev_bb_num = prev_bb_num;
- trace_bb.prev_bb_time = prev_bb_time;
-
- next = trace_bb.buffer;
- trace_bb.flush_time = sim_time;
- }
- tb->bb_rec = next;
- next->bb_num = bb_num;
- next->start_time = sim_time;
- next->time_diff = 0;
- next->repeat = 0;
- tb->prev_time = sim_time;
- next += 1;
- trace_bb.next = next;
-}
-
-// This function is called by the generated code to record the simulation
-// time at the start of each instruction.
-void trace_insn_helper()
-{
- InsnRec *current = trace_insn.current;
- uint64_t time_diff = sim_time - trace_insn.prev_time;
- trace_insn.prev_time = sim_time;
-
- // Keep track of the number of traced instructions so far in this
- // basic block in case we get an exception in the middle of the bb.
- trace_bb.num_insns += 1;
-
-#if 0
- if (ftrace_debug) {
- uint32_t current_pc = trace_bb.current_bb_addr + 4 * (trace_bb.num_insns - 1);
- fprintf(ftrace_debug, "%llu %x\n", sim_time, current_pc);
- }
-#endif
- if (time_diff == current->time_diff) {
- current->repeat += 1;
- if (current->repeat != 0)
- return;
-
- // The repeat count wrapped around, so back up one and create
- // a new record.
- current->repeat -= 1;
- }
- current += 1;
-
- if (current == &trace_insn.buffer[kInsnBufferSize]) {
- InsnRec *ptr;
- char *comp_ptr = trace_insn.compressed_ptr;
- for (ptr = trace_insn.buffer; ptr != current; ++ptr) {
- if (comp_ptr >= trace_insn.high_water_ptr) {
- uint32_t size = comp_ptr - trace_insn.compressed;
- uint32_t rval = fwrite(trace_insn.compressed, sizeof(char),
- size, trace_insn.fstream);
- if (rval != size) {
- fprintf(stderr, "fwrite() failed\n");
- perror(trace_insn.filename);
- exit(1);
- }
- comp_ptr = trace_insn.compressed;
- }
- comp_ptr = varint_encode(ptr->time_diff, comp_ptr);
- comp_ptr = varint_encode(ptr->repeat, comp_ptr);
- }
- trace_insn.compressed_ptr = comp_ptr;
- current = trace_insn.buffer;
- }
- current->time_diff = time_diff;
- current->repeat = 0;
- trace_insn.current = current;
-}
-
-// Adds an interpreted method trace record. Each trace record is a time
-// stamped entry or exit to a method in a language executed by a "virtual
-// machine". This allows profiling tools to show the method names instead
-// of the core virtual machine interpreter.
-void trace_interpreted_method(uint32_t addr, int call_type)
-{
- if (trace_method.fstream == NULL)
- return;
-#if 0
- fprintf(stderr, "trace_method time: %llu p%d 0x%x %d\n",
- sim_time, current_pid, addr, call_type);
-#endif
- char *comp_ptr = trace_method.compressed_ptr;
- char *max_end_ptr = comp_ptr + kMaxMethodCompressed;
- if (max_end_ptr >= &trace_method.compressed[kCompressedSize]) {
- uint32_t size = comp_ptr - trace_method.compressed;
- fwrite(trace_method.compressed, sizeof(char), size, trace_method.fstream);
- comp_ptr = trace_method.compressed;
- }
- uint64_t time_diff = sim_time - trace_method.prev_time;
- trace_method.prev_time = sim_time;
-
- int32_t addr_diff = addr - trace_method.prev_addr;
- trace_method.prev_addr = addr;
-
- int32_t pid_diff = current_pid - trace_method.prev_pid;
- trace_method.prev_pid = current_pid;
-
- comp_ptr = varint_encode(time_diff, comp_ptr);
- comp_ptr = varint_encode_signed(addr_diff, comp_ptr);
- comp_ptr = varint_encode_signed(pid_diff, comp_ptr);
- comp_ptr = varint_encode(call_type, comp_ptr);
- trace_method.compressed_ptr = comp_ptr;
-}