summaryrefslogtreecommitdiffstats
path: root/kwin/tools/xreply
diff options
context:
space:
mode:
authorTimothy Pearson <kb9vqf@pearsoncomputing.net>2011-11-07 21:50:33 -0600
committerTimothy Pearson <kb9vqf@pearsoncomputing.net>2011-11-07 21:50:33 -0600
commit0b6057404f65218182ab27a9483a21065ef61fca (patch)
treeb8b06dfa2deb965bebfbe131a772124e3e693a96 /kwin/tools/xreply
parent43d99cc2477266cb9072e179137f0e8485370b3d (diff)
downloadtdebase-0b6057404f65218182ab27a9483a21065ef61fca.tar.gz
tdebase-0b6057404f65218182ab27a9483a21065ef61fca.zip
Rename kwin to twin (Part 2 of 2)
Diffstat (limited to 'kwin/tools/xreply')
-rw-r--r--kwin/tools/xreply/Makefile2
-rw-r--r--kwin/tools/xreply/xreply.c197
2 files changed, 0 insertions, 199 deletions
diff --git a/kwin/tools/xreply/Makefile b/kwin/tools/xreply/Makefile
deleted file mode 100644
index af06929d5..000000000
--- a/kwin/tools/xreply/Makefile
+++ /dev/null
@@ -1,2 +0,0 @@
-all:
- gcc -O2 -Wall -shared -fPIC -o libxreply.so xreply.c
diff --git a/kwin/tools/xreply/xreply.c b/kwin/tools/xreply/xreply.c
deleted file mode 100644
index ecdf6ebc3..000000000
--- a/kwin/tools/xreply/xreply.c
+++ /dev/null
@@ -1,197 +0,0 @@
-/*
-
- LD_PRELOAD library that gives statistic on number of roundtrips in an application.
-
- $XREPLY_BACKTRACE defines whether and how backtraces will be printed for every
- roundtrip. If not set, only total number of roundtrips is printed after the process
- exits. If set to a number, backtrace for every roundtrip will be printed, and the
- backtraces will be as deep as the given number. If set to C<number> (e.g. C10),
- the backtraces will be "compressed" - every backtrace will be printed only once
- after the process exits, together with number of times it occured.
-
-*/
-
-#define _GNU_SOURCE
-#include <dlfcn.h>
-#include <stdlib.h>
-#include <stdio.h>
-#include <unistd.h>
-#include <fcntl.h>
-#include <execinfo.h>
-#include <assert.h>
-#include <X11/Xlibint.h>
-
-/* Since these symbols are weak, the apps can provide their own, and therefore
- e.g. temporarily suspend counting of roundtrips. At least theoretically,
- I haven't really tried it.
-*/
-__attribute((weak)) long ___xreply_reply_count = 0;
-__attribute((weak)) int ___xreply_reply_enabled = 1;
-
-#define MAX_BACKTRACES 1024
-
-extern long ___xreply_reply_count;
-extern int ___xreply_reply_enabled;
-
-typedef Status (*xreply_ptr_t)(Display*,xReply*,int,Bool);
-
-static xreply_ptr_t xreply_ptr = NULL;
-static int xreply_backtrace_set = 0;
-static int xreply_backtrace_type = 0;
-
-struct xreply_struct
- {
- char* key;
- char* text;
- int count;
- };
-static struct xreply_struct backtraces[ MAX_BACKTRACES ];
-static int backtraces_size = 0;
-
-static int xreply_compare( const void* left, const void* right )
- {
- int left_count = ((struct xreply_struct*)left)->count;
- int right_count = ((struct xreply_struct*)right)->count;
- return right_count - left_count;
- }
-
-static void xreply_print(void)
- {
- char tmp[ 1024 ];
- int fd;
- fd = open( "/proc/self/cmdline", O_RDONLY );
- if( fd >= 0 )
- {
- read( fd, tmp, 1024 );
- tmp[ 1023 ] = '\0';
- close( fd );
- }
- fprintf( stderr, "XREPLY (%d : %s): %ld\n", getpid(), tmp, ___xreply_reply_count );
- if( xreply_backtrace_type < 0 )
- {
- int i;
- qsort( backtraces, backtraces_size, sizeof( struct xreply_struct ), xreply_compare );
- for( i = 0;
- i < backtraces_size;
- ++i )
- fprintf( stderr, "%d:%s\n\n", backtraces[ i ].count, backtraces[ i ].text );
- }
- }
-
-static void xreply_backtrace()
- {
- void* trace[256];
- int n = backtrace(trace, 256);
- char** strings = backtrace_symbols (trace, n);
-
- if( xreply_backtrace_type > 0 )
- {
- fprintf( stderr, "%ld [\n", ___xreply_reply_count );
- if( n > xreply_backtrace_type )
- n = xreply_backtrace_type;
- int i;
- for( i = 0;
- i < n;
- ++i )
- fprintf( stderr, "%d: %s\n", i, strings[ i ] );
- fprintf( stderr, "]\n" );
- }
- else
- {
- char stack[ 256 * 20 ];
- int pos = 0;
- int i;
- stack[ 0 ] = '\0';
- if( n > -xreply_backtrace_type )
- n = -xreply_backtrace_type;
- for( i = 0;
- i < n;
- ++i )
- {
- const char* start = strrchr( strings[ i ], '[' );
- if( start == NULL )
- assert( !"No [ in address." );
- long addr;
- if( sscanf( start + 1, "0x%lx", &addr ) != 1 )
- assert( !"Failed to parse address." );
- if( sizeof( void* ) == 4 )
- {
- sprintf( stack + pos, "0x%8lx", addr );
- pos += 10;
- }
- else if( sizeof( void* ) == 8 )
- {
- sprintf( stack + pos, "0x%16lx", addr );
- pos += 18;
- }
- else
- assert( !"Unknown sizeof( void* )." );
- }
- for( i = 0;
- i < backtraces_size;
- ++i )
- if( strcmp( backtraces[ i ].key, stack ) == 0 )
- {
- ++backtraces[ i ].count;
- break;
- }
- if( i == backtraces_size )
- {
- int stack_text_size = 10;
- char* stack_text;
- char* stack_text_pos;
- for( i = 0;
- i < n;
- ++i )
- stack_text_size += strlen( strings[ i ] ) + 5;
- stack_text = stack_text_pos = malloc( stack_text_size );
- for( i = 0;
- i < n;
- ++i )
- {
- stack_text_pos = stpcpy( stack_text_pos, "\n" );
- stack_text_pos = stpcpy( stack_text_pos, strings[ i ] );
- }
- backtraces[ backtraces_size ].key = strdup( stack );
- backtraces[ backtraces_size ].text = stack_text;
- backtraces[ backtraces_size ].count = 1;
- ++backtraces_size;
- if( backtraces_size >= MAX_BACKTRACES )
- assert( !"MAX_BACKTRACES reached." );
- }
- }
- free (strings);
- }
-
-Status
-_XReply (dpy, rep, extra, discard)
- register Display *dpy;
- register xReply *rep;
- int extra; /* number of 32-bit words expected after the reply */
- Bool discard; /* should I discard data following "extra" words? */
- {
- if( ___xreply_reply_enabled )
- ++___xreply_reply_count;
- if( xreply_backtrace_set == 0 )
- {
- if( getenv( "XREPLY_BACKTRACE" ) != NULL )
- { // C<number> - compress backtraces, saved as negative value in xreply_backtrace_type
- if( getenv( "XREPLY_BACKTRACE" )[ 0 ] == 'C' )
- xreply_backtrace_type = -atoi( getenv( "XREPLY_BACKTRACE" ) + 1 );
- else // <number> - print the backtrace every time
- xreply_backtrace_type = atoi( getenv( "XREPLY_BACKTRACE" ));
- }
- else
- xreply_backtrace_type = 0;
- }
- if( xreply_backtrace_type != 0 )
- xreply_backtrace();
- if( xreply_ptr == NULL )
- {
- xreply_ptr = (xreply_ptr_t)dlsym( RTLD_NEXT, "_XReply" );
- if( xreply_ptr == NULL )
- assert( !"dlsym() failed." );
- atexit( xreply_print );
- }
- return xreply_ptr( dpy, rep, extra, discard );
- }