/* Sysroff object format dumper.
- Copyright 1994, 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2005, 2007, 2009
- Free Software Foundation, Inc.
+ Copyright (C) 1994-2022 Free Software Foundation, Inc.
This file is part of GNU Binutils.
static int addrsize = 4;
static FILE *file;
-static void dh (unsigned char *, int);
-static void itheader (char *, int);
-static void p (void);
-static void tabout (void);
-static void pbarray (barray *);
-static int getone (int);
-static int opt (int);
-static void must (int);
-static void tab (int, char *);
-static void dump_symbol_info (void);
static void derived_type (void);
-static void module (void);
-static void show_usage (FILE *, int);
-
-extern int main (int, char **);
static char *
getCHARS (unsigned char *ptr, int *idx, int size, int max)
int b = size;
if (b >= max)
- return "*undefined*";
+ return _("*undefined*");
if (b == 0)
{
+ /* PR 17512: file: 13caced2. */
+ if (oc >= max)
+ return _("*corrupt*");
/* Got to work out the length of the string from self. */
b = ptr[oc++];
(*idx) += 8;
}
+ if (oc + b > size)
+ {
+ /* PR 28564 */
+ return _("*corrupt*");
+ }
+
*idx += b * 8;
r = xcalloc (b + 1, 1);
memcpy (r, ptr + oc, b);
sum += ptr[i];
if ((sum & 0xff) != 0xff)
- printf ("SUM IS %x\n", sum);
+ printf (_("SUM IS %x\n"), sum);
if (dump)
dh (ptr, size);
}
static barray
-getBARRAY (unsigned char *ptr, int *idx, int dsize ATTRIBUTE_UNUSED,
- int max ATTRIBUTE_UNUSED)
+getBARRAY (unsigned char *ptr, int *idx, int dsize ATTRIBUTE_UNUSED, int max)
{
barray res;
int i;
int byte = *idx / 8;
- int size = ptr[byte++];
+ int size = 0;
+
+ if (byte < max)
+ size = ptr[byte++];
res.len = size;
res.data = (unsigned char *) xmalloc (size);
for (i = 0; i < size; i++)
- res.data[i] = ptr[byte++];
+ res.data[i] = byte < max ? ptr[byte++] : 0;
return res;
}
int byte = *idx / 8;
if (byte >= max)
- return 0;
+ {
+ /* PR 17512: file: id:000001,src:000002,op:flip1,pos:45. */
+ /* Prevent infinite loops re-reading beyond the end of the buffer. */
+ fatal (_("ICE: getINT: Out of buffer space"));
+ return 0;
+ }
if (size == -2)
size = addrsize;
n = (ptr[byte + 0] << 8) + ptr[byte + 1];
break;
case 4:
- n = (ptr[byte + 0] << 24) + (ptr[byte + 1] << 16) + (ptr[byte + 2] << 8) + (ptr[byte + 3]);
+ n = (((unsigned) ptr[byte + 0] << 24) + (ptr[byte + 1] << 16)
+ + (ptr[byte + 2] << 8) + (ptr[byte + 3]));
break;
default:
- abort ();
+ fatal (_("Unsupported read size: %d"), size);
}
*idx += size * 8;
break;
default:
- printf ("GOT A %x\n", c);
+ printf (_("GOT A %x\n"), c);
return 0;
break;
}
must (int x)
{
if (!getone (x))
- printf ("WANTED %x!!\n", x);
+ printf (_("WANTED %x!!\n"), x);
}
static void
static void
dump_symbol_info (void)
{
- tab (1, "SYMBOL INFO");
+ tab (1, _("SYMBOL INFO"));
while (opt (IT_dsy_CODE))
{
static void
derived_type (void)
{
- tab (1, "DERIVED TYPE");
+ tab (1, _("DERIVED TYPE"));
while (1)
{
int c = 0;
int l = 0;
- tab (1, "MODULE***\n");
+ tab (1, _("MODULE***\n"));
do
{
c = getc (file);
+ if (c == EOF)
+ break;
ungetc (c, file);
c &= 0x7f;
}
}
-char *program_name;
-
-static void
+ATTRIBUTE_NORETURN static void
show_usage (FILE *ffile, int status)
{
fprintf (ffile, _("Usage: %s [option(s)] in-file\n"), program_name);
{NULL, no_argument, 0, 0}
};
-#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
+#ifdef HAVE_LC_MESSAGES
setlocale (LC_MESSAGES, "");
#endif
-#if defined (HAVE_SETLOCALE)
setlocale (LC_CTYPE, "");
-#endif
bindtextdomain (PACKAGE, LOCALEDIR);
textdomain (PACKAGE);
program_name = av[0];
xmalloc_set_program_name (program_name);
+ bfd_set_error_program_name (program_name);
expandargv (&ac, &av);