xref: /dflybsd-src/contrib/binutils-2.34/opcodes/dis-buf.c (revision b52ef7118d1621abed722c5bbbd542210290ecef)
1*fae548d3Szrj /* Disassemble from a buffer, for GNU.
2*fae548d3Szrj    Copyright (C) 1993-2020 Free Software Foundation, Inc.
3*fae548d3Szrj 
4*fae548d3Szrj    This file is part of the GNU opcodes library.
5*fae548d3Szrj 
6*fae548d3Szrj    This library is free software; you can redistribute it and/or modify
7*fae548d3Szrj    it under the terms of the GNU General Public License as published by
8*fae548d3Szrj    the Free Software Foundation; either version 3, or (at your option)
9*fae548d3Szrj    any later version.
10*fae548d3Szrj 
11*fae548d3Szrj    It is distributed in the hope that it will be useful, but WITHOUT
12*fae548d3Szrj    ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
13*fae548d3Szrj    or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public
14*fae548d3Szrj    License for more details.
15*fae548d3Szrj 
16*fae548d3Szrj    You should have received a copy of the GNU General Public License
17*fae548d3Szrj    along with this program; if not, write to the Free Software
18*fae548d3Szrj    Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston,
19*fae548d3Szrj    MA 02110-1301, USA.  */
20*fae548d3Szrj 
21*fae548d3Szrj #include "sysdep.h"
22*fae548d3Szrj #include "dis-asm.h"
23*fae548d3Szrj #include <errno.h>
24*fae548d3Szrj #include "opintl.h"
25*fae548d3Szrj 
26*fae548d3Szrj /* Get LENGTH bytes from info's buffer, at target address memaddr.
27*fae548d3Szrj    Transfer them to myaddr.  */
28*fae548d3Szrj int
buffer_read_memory(bfd_vma memaddr,bfd_byte * myaddr,unsigned int length,struct disassemble_info * info)29*fae548d3Szrj buffer_read_memory (bfd_vma memaddr,
30*fae548d3Szrj 		    bfd_byte *myaddr,
31*fae548d3Szrj 		    unsigned int length,
32*fae548d3Szrj 		    struct disassemble_info *info)
33*fae548d3Szrj {
34*fae548d3Szrj   unsigned int opb = info->octets_per_byte;
35*fae548d3Szrj   size_t end_addr_offset = length / opb;
36*fae548d3Szrj   size_t max_addr_offset = info->buffer_length / opb;
37*fae548d3Szrj   size_t octets = (memaddr - info->buffer_vma) * opb;
38*fae548d3Szrj 
39*fae548d3Szrj   if (memaddr < info->buffer_vma
40*fae548d3Szrj       || memaddr - info->buffer_vma > max_addr_offset
41*fae548d3Szrj       || memaddr - info->buffer_vma + end_addr_offset > max_addr_offset
42*fae548d3Szrj       || (info->stop_vma && (memaddr >= info->stop_vma
43*fae548d3Szrj 			     || memaddr + end_addr_offset > info->stop_vma)))
44*fae548d3Szrj     /* Out of bounds.  Use EIO because GDB uses it.  */
45*fae548d3Szrj     return EIO;
46*fae548d3Szrj   memcpy (myaddr, info->buffer + octets, length);
47*fae548d3Szrj 
48*fae548d3Szrj   return 0;
49*fae548d3Szrj }
50*fae548d3Szrj 
51*fae548d3Szrj /* Print an error message.  We can assume that this is in response to
52*fae548d3Szrj    an error return from buffer_read_memory.  */
53*fae548d3Szrj 
54*fae548d3Szrj void
perror_memory(int status,bfd_vma memaddr,struct disassemble_info * info)55*fae548d3Szrj perror_memory (int status,
56*fae548d3Szrj 	       bfd_vma memaddr,
57*fae548d3Szrj 	       struct disassemble_info *info)
58*fae548d3Szrj {
59*fae548d3Szrj   if (status != EIO)
60*fae548d3Szrj     /* Can't happen.  */
61*fae548d3Szrj     info->fprintf_func (info->stream, _("Unknown error %d\n"), status);
62*fae548d3Szrj   else
63*fae548d3Szrj     {
64*fae548d3Szrj       char buf[30];
65*fae548d3Szrj 
66*fae548d3Szrj       /* Actually, address between memaddr and memaddr + len was
67*fae548d3Szrj 	 out of bounds.  */
68*fae548d3Szrj       sprintf_vma (buf, memaddr);
69*fae548d3Szrj       info->fprintf_func (info->stream,
70*fae548d3Szrj 			  _("Address 0x%s is out of bounds.\n"), buf);
71*fae548d3Szrj     }
72*fae548d3Szrj }
73*fae548d3Szrj 
74*fae548d3Szrj /* This could be in a separate file, to save miniscule amounts of space
75*fae548d3Szrj    in statically linked executables.  */
76*fae548d3Szrj 
77*fae548d3Szrj /* Just print the address is hex.  This is included for completeness even
78*fae548d3Szrj    though both GDB and objdump provide their own (to print symbolic
79*fae548d3Szrj    addresses).  */
80*fae548d3Szrj 
81*fae548d3Szrj void
generic_print_address(bfd_vma addr,struct disassemble_info * info)82*fae548d3Szrj generic_print_address (bfd_vma addr, struct disassemble_info *info)
83*fae548d3Szrj {
84*fae548d3Szrj   char buf[30];
85*fae548d3Szrj 
86*fae548d3Szrj   sprintf_vma (buf, addr);
87*fae548d3Szrj   (*info->fprintf_func) (info->stream, "0x%s", buf);
88*fae548d3Szrj }
89*fae548d3Szrj 
90*fae548d3Szrj /* Just return true.  */
91*fae548d3Szrj 
92*fae548d3Szrj int
generic_symbol_at_address(bfd_vma addr ATTRIBUTE_UNUSED,struct disassemble_info * info ATTRIBUTE_UNUSED)93*fae548d3Szrj generic_symbol_at_address (bfd_vma addr ATTRIBUTE_UNUSED,
94*fae548d3Szrj 			   struct disassemble_info *info ATTRIBUTE_UNUSED)
95*fae548d3Szrj {
96*fae548d3Szrj   return 1;
97*fae548d3Szrj }
98*fae548d3Szrj 
99*fae548d3Szrj /* Just return TRUE.  */
100*fae548d3Szrj 
101*fae548d3Szrj bfd_boolean
generic_symbol_is_valid(asymbol * sym ATTRIBUTE_UNUSED,struct disassemble_info * info ATTRIBUTE_UNUSED)102*fae548d3Szrj generic_symbol_is_valid (asymbol * sym ATTRIBUTE_UNUSED,
103*fae548d3Szrj 			 struct disassemble_info *info ATTRIBUTE_UNUSED)
104*fae548d3Szrj {
105*fae548d3Szrj   return TRUE;
106*fae548d3Szrj }
107