Author: jmb Date: Mon Oct 12 09:52:35 2009 New Revision: 9623 URL: http://source.netsurf-browser.org?rev=9623&view=rev Log: First cut at a call tracing library Added: trunk/tools/trace/ trunk/tools/trace/Makefile trunk/tools/trace/build/ (with props) trunk/tools/trace/src/ trunk/tools/trace/src/Makefile trunk/tools/trace/src/shim.s trunk/tools/trace/src/trace.c Added: trunk/tools/trace/Makefile URL: http://source.netsurf-browser.org/trunk/tools/trace/Makefile?rev=9623&... ============================================================================== --- trunk/tools/trace/Makefile (added) +++ trunk/tools/trace/Makefile Mon Oct 12 09:52:35 2009 @@ -1,0 +1,29 @@ +# Component settings +COMPONENT := trace +COMPONENT_VERSION := 0.0.1 +# Default to a static library +COMPONENT_TYPE ?= lib-static + +# Setup the tooling +include build/makefiles/Makefile.tools + +# Toolchain flags +WARNFLAGS := -Wall -Wundef -Wpointer-arith -Wcast-align \ + -Wwrite-strings -Wstrict-prototypes -Wmissing-prototypes \ + -Wmissing-declarations -Wnested-externs -Werror -pedantic +ifneq ($(GCCVER),2) + WARNFLAGS := $(WARNFLAGS) -Wextra +endif +CFLAGS := -D_BSD_SOURCE -I$(CURDIR)/include/ \ + -I$(CURDIR)/src $(WARNFLAGS) $(CFLAGS) +ifneq ($(GCCVER),2) + CFLAGS := $(CFLAGS) -std=c99 +else + # __inline__ is a GCCism + CFLAGS := $(CFLAGS) -Dinline="__inline__" +endif + +include build/makefiles/Makefile.top + +# Extra installation rules +INSTALL_ITEMS := $(INSTALL_ITEMS) /lib:$(OUTPUT) Propchange: trunk/tools/trace/build/ ------------------------------------------------------------------------------ --- svn:externals (added) +++ svn:externals Mon Oct 12 09:52:35 2009 @@ -1,0 +1,1 @@ +makefiles svn://svn.netsurf-browser.org/trunk/tools/buildsystem/makefiles Added: trunk/tools/trace/src/Makefile URL: http://source.netsurf-browser.org/trunk/tools/trace/src/Makefile?rev=9623... ============================================================================== --- trunk/tools/trace/src/Makefile (added) +++ trunk/tools/trace/src/Makefile Mon Oct 12 09:52:35 2009 @@ -1,0 +1,4 @@ +# Sources +DIR_SOURCES := shim.s trace.s + +include build/makefiles/Makefile.subdir Added: trunk/tools/trace/src/shim.s URL: http://source.netsurf-browser.org/trunk/tools/trace/src/shim.s?rev=9623&a... ============================================================================== --- trunk/tools/trace/src/shim.s (added) +++ trunk/tools/trace/src/shim.s Mon Oct 12 09:52:35 2009 @@ -1,0 +1,26 @@ +#if !defined(__aof__) + .section ".text" + + .global image__ro__base + .global image__ro__limit + +image__ro__base: + .word Image$$RO$$Base +image__ro__limit: + .word Image$$RO$$Limit +#else + AREA |ARM$$Code|, CODE, READONLY + + IMPORT |Image$$RO$$Base| + IMPORT |Image$$RO$$Limit| + + EXPORT image__ro__base + EXPORT image__ro__limit + +image__ro__base + DCD |Image$$RO$$Base| +image__ro__limit + DCD |Image$$RO$$Limit| + + END +#endif Added: trunk/tools/trace/src/trace.c URL: http://source.netsurf-browser.org/trunk/tools/trace/src/trace.c?rev=9623&... ============================================================================== --- trunk/tools/trace/src/trace.c (added) +++ trunk/tools/trace/src/trace.c Mon Oct 12 09:52:35 2009 @@ -1,0 +1,55 @@ +#include <stdint.h> +#include <stdio.h> + +extern uint32_t image__ro__base; +extern uint32_t image__ro__limit; + +static uint32_t depth; + +static void print_function_name(uint32_t fn_address) +{ + uint32_t *offaddr = ((uint32_t *) address) - 1; + uint32_t offset = *offaddr; + + if ((offset >> 24) == 0xff) { + fprintf(stderr, "%s\n", (const char *) (offaddr - + ((offset & ~0xff000000) / 4))); + } else { + fprintf(stderr, "(unknown)\n"); + } +} + +void __cyg_profile_enter(uint32_t fn_address, uint32_t call_site) +{ + uint32_t i = depth; + + /* Ignore if address is out of bounds */ + if (fn_address < image__ro__base || image__ro__limit < fn_address) + return; + + while (i-- > 0) + fputc(' ', stderr); + + fprintf(stderr, "Entering "); + print_function_name(fn_address); + + depth++; +} + +void __cyg_profile_exit(uint32_t fn_address, uint32_t call_site) +{ + uint32_t i = depth; + + /* Ignore if address is out of bounds */ + if (fn_address < image__ro__base || image__ro__limit < fn_address) + return; + + while (i-- > 0) + fputc(' ', stderr); + + fprintf(stderr, "Leaving "); + print_function_name(fn_address); + + depth--; +} +