Home | History | Annotate | Download | only in ltrace
      1 /*
      2  * This file is part of ltrace.
      3  * Copyright (C) 2012 Petr Machata, Red Hat Inc.
      4  * Copyright (C) 2003,2008,2009 Juan Cespedes
      5  * Copyright (C) 2006 Ian Wienand
      6  *
      7  * This program is free software; you can redistribute it and/or
      8  * modify it under the terms of the GNU General Public License as
      9  * published by the Free Software Foundation; either version 2 of the
     10  * License, or (at your option) any later version.
     11  *
     12  * This program is distributed in the hope that it will be useful, but
     13  * WITHOUT ANY WARRANTY; without even the implied warranty of
     14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
     15  * General Public License for more details.
     16  *
     17  * You should have received a copy of the GNU General Public License
     18  * along with this program; if not, write to the Free Software
     19  * Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA
     20  * 02110-1301 USA
     21  */
     22 
     23 #include <stdio.h>
     24 #include <stdarg.h>
     25 
     26 #include "common.h"
     27 #include "backend.h"
     28 
     29 void
     30 debug_(int level, const char *file, int line, const char *fmt, ...) {
     31 	char buf[1024];
     32 	va_list args;
     33 
     34 	if (!(options.debug & level)) {
     35 		return;
     36 	}
     37 	va_start(args, fmt);
     38 	vsnprintf(buf, 1024, fmt, args);
     39 	va_end(args);
     40 
     41 	output_line(NULL, "DEBUG: %s:%d: %s", file, line, buf);
     42 	fflush(options.output);
     43 }
     44 
     45 static int
     46 xwritedump(long *ptr, arch_addr_t addr, size_t count)
     47 {
     48 	size_t i;
     49 	for (i = 0; i < count; ++i) {
     50 		if (fprintf(stderr, "%p->%0*lx\n",
     51 			    addr, 2 * (int)sizeof(long), ptr[i]) < 0)
     52 			return -1;
     53 		addr += sizeof(long);
     54 	}
     55 
     56 	return 0;
     57 }
     58 
     59 int
     60 xinfdump(struct process *proc, arch_addr_t addr, size_t length)
     61 {
     62 	unsigned char buf[length];
     63 	size_t got = umovebytes(proc, addr, buf, length);
     64 	if (got == (size_t)-1)
     65 		return -1;
     66 	return xwritedump((long *)buf, addr, got / sizeof(long));
     67 }
     68