URL
https://opencores.org/ocsvn/openrisc_2011-10-31/openrisc_2011-10-31/trunk
Subversion Repositories openrisc_2011-10-31
[/] [openrisc/] [trunk/] [gnu-src/] [gdb-7.2/] [gdb/] [testsuite/] [gdb.trace/] [tfile.c] - Rev 524
Go to most recent revision | Compare with Previous | Blame | View Log
/* This program does two things; it generates valid trace files, and it can also be traced so as to test trace file creation from GDB. */ #include <stdio.h> #include <string.h> #include <fcntl.h> #include <sys/stat.h> char spbuf[200]; char trbuf[1000]; char *trptr; char *tfsizeptr; int testglob = 31415; int testglob2 = 271828; const int constglob = 10000; int start_trace_file (char *filename) { int fd; fd = open (filename, O_WRONLY|O_CREAT|O_APPEND, S_IRUSR|S_IWUSR|S_IRGRP|S_IROTH); if (fd < 0) return fd; /* Write a file header, with a high-bit-set char to indicate a binary file, plus a hint as what this file is, and a version number in case of future needs. */ write (fd, "\x7fTRACE0\n", 8); return fd; } void finish_trace_file (int fd) { close (fd); } void add_memory_block (char *addr, int size) { short short_x; long long ll_x; *((char *) trptr) = 'M'; trptr += 1; ll_x = (long) addr; memcpy (trptr, &ll_x, sizeof (long long)); trptr += sizeof (long long); short_x = size; memcpy (trptr, &short_x, 2); trptr += 2; memcpy (trptr, addr, size); trptr += size; } void write_basic_trace_file (void) { int fd, int_x; short short_x; fd = start_trace_file ("basic.tf"); /* The next part of the file consists of newline-separated lines defining status, tracepoints, etc. The section is terminated by an empty line. */ /* Dump the size of the R (register) blocks in traceframes. */ snprintf (spbuf, sizeof spbuf, "R %x\n", 500 /* FIXME get from arch */); write (fd, spbuf, strlen (spbuf)); /* Dump trace status, in the general form of the qTstatus reply. */ snprintf (spbuf, sizeof spbuf, "status 0;tstop:0;tframes:1;tcreated:1;tfree:100;tsize:1000\n"); write (fd, spbuf, strlen (spbuf)); /* Dump tracepoint definitions, in syntax similar to that used for reconnection uploads. */ /* FIXME need a portable way to print function address in hex */ snprintf (spbuf, sizeof spbuf, "tp T1:%lx:E:0:0\n", (long) &write_basic_trace_file); write (fd, spbuf, strlen (spbuf)); /* (Note that we would only need actions defined if we wanted to test tdump.) */ /* Empty line marks the end of the definition section. */ write (fd, "\n", 1); /* Make up a simulated trace buffer. */ /* (Encapsulate better if we're going to do lots of this; note that buffer endianness is the target program's enddianness.) */ trptr = trbuf; short_x = 1; memcpy (trptr, &short_x, 2); trptr += 2; tfsizeptr = trptr; trptr += 4; add_memory_block (&testglob, sizeof (testglob)); /* Divide a variable between two separate memory blocks. */ add_memory_block (&testglob2, 1); add_memory_block (((char*) &testglob2) + 1, sizeof (testglob2) - 1); /* Go back and patch in the frame size. */ int_x = trptr - tfsizeptr - sizeof (int); memcpy (tfsizeptr, &int_x, 4); /* Write end of tracebuffer marker. */ memset (trptr, 0, 6); trptr += 6; write (fd, trbuf, trptr - trbuf); finish_trace_file (fd); } /* Convert number NIB to a hex digit. */ static int tohex (int nib) { if (nib < 10) return '0' + nib; else return 'a' + nib - 10; } int bin2hex (const char *bin, char *hex, int count) { int i; for (i = 0; i < count; i++) { *hex++ = tohex ((*bin >> 4) & 0xf); *hex++ = tohex (*bin++ & 0xf); } *hex = 0; return i; } void write_error_trace_file (void) { int fd; const char made_up[] = "made-up error"; int len = sizeof (made_up) - 1; char *hex = alloca (len * 2 + 1); fd = start_trace_file ("error.tf"); /* The next part of the file consists of newline-separated lines defining status, tracepoints, etc. The section is terminated by an empty line. */ /* Dump the size of the R (register) blocks in traceframes. */ snprintf (spbuf, sizeof spbuf, "R %x\n", 500 /* FIXME get from arch */); write (fd, spbuf, strlen (spbuf)); bin2hex (made_up, hex, len); /* Dump trace status, in the general form of the qTstatus reply. */ snprintf (spbuf, sizeof spbuf, "status 0;" "terror:%s:1;" "tframes:0;tcreated:0;tfree:100;tsize:1000\n", hex); write (fd, spbuf, strlen (spbuf)); /* Dump tracepoint definitions, in syntax similar to that used for reconnection uploads. */ /* FIXME need a portable way to print function address in hex */ snprintf (spbuf, sizeof spbuf, "tp T1:%lx:E:0:0\n", (long) &write_basic_trace_file); write (fd, spbuf, strlen (spbuf)); /* (Note that we would only need actions defined if we wanted to test tdump.) */ /* Empty line marks the end of the definition section. */ write (fd, "\n", 1); trptr = trbuf; /* Write end of tracebuffer marker. */ memset (trptr, 0, 6); trptr += 6; write (fd, trbuf, trptr - trbuf); finish_trace_file (fd); } void done_making_trace_files (void) { } int main (int argc, char **argv, char **envp) { write_basic_trace_file (); write_error_trace_file (); done_making_trace_files (); return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log