From patchwork Sat Nov 1 21:47:19 2014 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Jan Kratochvil X-Patchwork-Id: 3551 Received: (qmail 31456 invoked by alias); 1 Nov 2014 21:47:23 -0000 Mailing-List: contact gdb-patches-help@sourceware.org; run by ezmlm Precedence: bulk List-Id: List-Unsubscribe: List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sourceware.org Delivered-To: mailing list gdb-patches@sourceware.org Received: (qmail 31416 invoked by uid 89); 1 Nov 2014 21:47:23 -0000 Authentication-Results: sourceware.org; auth=none X-Virus-Found: No X-Spam-SWARE-Status: No, score=-4.3 required=5.0 tests=AWL, BAYES_00, RP_MATCHES_RCVD, SPF_HELO_PASS, SPF_PASS autolearn=ham version=3.3.2 X-HELO: mx1.redhat.com Received: from mx1.redhat.com (HELO mx1.redhat.com) (209.132.183.28) by sourceware.org (qpsmtpd/0.93/v0.84-503-g423c35a) with (AES256-GCM-SHA384 encrypted) ESMTPS; Sat, 01 Nov 2014 21:47:22 +0000 Received: from int-mx10.intmail.prod.int.phx2.redhat.com (int-mx10.intmail.prod.int.phx2.redhat.com [10.5.11.23]) by mx1.redhat.com (8.14.4/8.14.4) with ESMTP id sA1LlLnr004098 (version=TLSv1/SSLv3 cipher=DHE-RSA-AES256-GCM-SHA384 bits=256 verify=FAIL) for ; Sat, 1 Nov 2014 17:47:21 -0400 Received: from host1.jankratochvil.net (ovpn-116-27.ams2.redhat.com [10.36.116.27]) by int-mx10.intmail.prod.int.phx2.redhat.com (8.14.4/8.14.4) with ESMTP id sA1LlJWb022461 for ; Sat, 1 Nov 2014 17:47:20 -0400 Subject: [PATCH v3 12/14] add linux_infcall_mmap From: Jan Kratochvil To: gdb-patches@sourceware.org Date: Sat, 01 Nov 2014 22:47:19 +0100 Message-ID: <20141101214719.13230.96367.stgit@host1.jankratochvil.net> In-Reply-To: <20141101214552.13230.45564.stgit@host1.jankratochvil.net> References: <20141101214552.13230.45564.stgit@host1.jankratochvil.net> User-Agent: StGit/0.17.1-dirty MIME-Version: 1.0 X-IsSubscribed: yes This implements the new gdbarch "infcall_mmap" method for Linux. 2014-10-07 Jan Kratochvil * linux-tdep.c (linux_infcall_mmap): New function. (linux_init_abi): Add it to gdbarch. --- gdb/ChangeLog | 5 +++++ gdb/linux-tdep.c | 46 ++++++++++++++++++++++++++++++++++++++++++++++ 2 files changed, 51 insertions(+) diff --git a/gdb/ChangeLog b/gdb/ChangeLog index 329e42b..52b048e 100644 --- a/gdb/ChangeLog +++ b/gdb/ChangeLog @@ -1,5 +1,10 @@ 2014-10-07 Jan Kratochvil + * linux-tdep.c (linux_infcall_mmap): New function. + (linux_init_abi): Add it to gdbarch. + +2014-10-07 Jan Kratochvil + * dwarf2loc.h (dwarf2_reg_to_regnum_or_error): Declare. * dwarf2loc.c (dwarf2_reg_to_regnum_or_error): Rename from translate_register. Now public. diff --git a/gdb/linux-tdep.c b/gdb/linux-tdep.c index ffc3e87..e93ba61 100644 --- a/gdb/linux-tdep.c +++ b/gdb/linux-tdep.c @@ -33,6 +33,9 @@ #include "arch-utils.h" #include "gdb_obstack.h" #include "observer.h" +#include "objfiles.h" +#include "infcall.h" +#include #include @@ -1921,6 +1924,48 @@ linux_vsyscall_range (struct gdbarch *gdbarch, struct mem_range *range) return 1; } +/* See gdbarch.sh 'infcall_mmap'. */ + +static CORE_ADDR +linux_infcall_mmap (CORE_ADDR size, unsigned prot) +{ + struct objfile *objf; + /* Do there still exist any Linux systems without "mmap64"? + "mmap" uses 64-bit off_t on x86_64 and 32-bit off_t on i386 and x32. */ + struct value *mmap_val = find_function_in_inferior ("mmap64", &objf); + struct value *addr_val; + struct gdbarch *gdbarch = get_objfile_arch (objf); + CORE_ADDR retval; + enum + { + ARG_ADDR, ARG_LENGTH, ARG_PROT, ARG_FLAGS, ARG_FD, ARG_OFFSET, ARG_MAX + }; + struct value *arg[ARG_MAX]; + + arg[ARG_ADDR] = value_from_pointer (builtin_type (gdbarch)->builtin_data_ptr, + 0); + /* Assuming sizeof (unsigned long) == sizeof (size_t). */ + arg[ARG_LENGTH] = value_from_ulongest + (builtin_type (gdbarch)->builtin_unsigned_long, size); + gdb_assert ((prot & ~7) == 0); + arg[ARG_PROT] = value_from_longest (builtin_type (gdbarch)->builtin_int, + 0 + | ((prot & 4) != 0 ? PROT_READ : 0) + | ((prot & 2) != 0 ? PROT_WRITE : 0) + | ((prot & 1) != 0 ? PROT_EXEC : 0)); + arg[ARG_FLAGS] = value_from_longest (builtin_type (gdbarch)->builtin_int, + MAP_PRIVATE | MAP_ANONYMOUS); + arg[ARG_FD] = value_from_longest (builtin_type (gdbarch)->builtin_int, -1); + arg[ARG_OFFSET] = value_from_longest (builtin_type (gdbarch)->builtin_int64, + 0); + addr_val = call_function_by_hand (mmap_val, ARG_MAX, arg); + retval = value_as_address (addr_val); + if (retval == (CORE_ADDR) -1) + error (_("Failed inferior mmap call for %s bytes, errno is changed."), + pulongest (size)); + return retval; +} + /* To be called from the various GDB_OSABI_LINUX handlers for the various GNU/Linux architectures and machine types. */ @@ -1939,6 +1984,7 @@ linux_init_abi (struct gdbarch_info info, struct gdbarch *gdbarch) set_gdbarch_gdb_signal_to_target (gdbarch, linux_gdb_signal_to_target); set_gdbarch_vsyscall_range (gdbarch, linux_vsyscall_range); + set_gdbarch_infcall_mmap (gdbarch, linux_infcall_mmap); } /* Provide a prototype to silence -Wmissing-prototypes. */