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