/* Disassemble from a buffer, for GNU.

    Copyright 1993, 1994, 1996, 1997, 1998, 1999, 2000, 2001, 2003, 2005

    Free Software Foundation, Inc.

 This program is free software; you can redistribute it and/or modify

 it under the terms of the GNU General Public License as published by

 the Free Software Foundation; either version 2 of the License, or

 (at your option) any later version.

 This program is distributed in the hope that it will be useful,

 but WITHOUT ANY WARRANTY; without even the implied warranty of

 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the

 GNU General Public License for more details.

 You should have received a copy of the GNU General Public License

 along with this program; if not, write to the Free Software

 Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */

 #include "x86dasm/sysdep.h"

 #include "x86dasm/dis-asm.h"

 #include <errno.h>

 #include "gettext.h"

 /* Get LENGTH bytes from info's buffer, at target address memaddr.

    Transfer them to myaddr.  */

 int

 buffer_read_memory (memaddr, myaddr, length, info)

      bfd_vma memaddr;

      bfd_byte *myaddr;

      unsigned int length;

      struct disassemble_info *info;

 {

   unsigned int opb = info->octets_per_byte;

   unsigned int end_addr_offset = length / opb;

   unsigned int max_addr_offset = info->buffer_length / opb; 

   unsigned int octets = (memaddr - info->buffer_vma) * opb;

   if (memaddr < info->buffer_vma

       || memaddr - info->buffer_vma + end_addr_offset > max_addr_offset)

     /* Out of bounds.  Use EIO because GDB uses it.  */

     return EIO;

   memcpy (myaddr, info->buffer + octets, length);

   return 0;

 }

 /* Print an error message.  We can assume that this is in response to

    an error return from buffer_read_memory.  */

 void

 perror_memory (status, memaddr, info)

      int status;

      bfd_vma memaddr;

      struct disassemble_info *info;

 {

   if (status != EIO)

     /* Can't happen.  */

     info->fprintf_func (info->stream, _("Unknown error %d\n"), status);

   else

     {

       char buf[30];

       /* Actually, address between memaddr and memaddr + len was

 	 out of bounds.  */

       sprintf_vma (buf, memaddr);

       info->fprintf_func (info->stream,

 			  _("Address 0x%s is out of bounds.\n"), buf);

     }

 }

 /* This could be in a separate file, to save miniscule amounts of space

    in statically linked executables.  */

 /* Just print the address is hex.  This is included for completeness even

    though both GDB and objdump provide their own (to print symbolic

    addresses).  */

 void

 generic_print_address (addr, info)

      bfd_vma addr;

      struct disassemble_info *info;

 {

   char buf[30];

   sprintf_vma (buf, addr);

   (*info->fprintf_func) (info->stream, "0x%s", buf);

 }

 #if 0

 /* Just concatenate the address as hex.  This is included for

    completeness even though both GDB and objdump provide their own (to

    print symbolic addresses).  */

 void generic_strcat_address PARAMS ((bfd_vma, char *, int));

 void

 generic_strcat_address (addr, buf, len)

      bfd_vma addr;

      char *buf;

      int len;

 {

   if (buf != (char *)NULL && len > 0)

     {

       char tmpBuf[30];

       sprintf_vma (tmpBuf, addr);

       if ((strlen (buf) + strlen (tmpBuf)) <= (unsigned int) len)

 	strcat (buf, tmpBuf);

       else

 	strncat (buf, tmpBuf, (len - strlen(buf)));

     }

   return;

 }

 #endif

 /* Just return true.  */

 int

 generic_symbol_at_address (addr, info)

      bfd_vma addr ATTRIBUTE_UNUSED;

      struct disassemble_info *info ATTRIBUTE_UNUSED;

 {

   return 1;

 }

 /* Just return TRUE.  */

 bfd_boolean

 generic_symbol_is_valid (asymbol * sym ATTRIBUTE_UNUSED,

 			 struct disassemble_info *info ATTRIBUTE_UNUSED)

 {

   return TRUE;

 }