/* strings -- print the strings of printable characters in files
- Copyright (C) 1993 Free Software Foundation, Inc.
+ Copyright 1993, 1994, 1995, 1996, 1997, 1998, 1999, 2000
+ 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
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., 675 Mass Ave, Cambridge, MA 02139, USA. */
+ Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA
+ 02111-1307, USA. */
\f
/* Usage: strings [options] file...
-o Like -to. (Some other implementations have -o like -to,
others like -td. We chose one arbitrarily.)
+ --target=BFDNAME
+ Specify a non-default object file format.
+
--help
-h Print the usage message on the standard output.
Written by Richard Stallman <rms@gnu.ai.mit.edu>
and David MacKenzie <djm@gnu.ai.mit.edu>. */
+#include "bfd.h"
#include <stdio.h>
#include <getopt.h>
#include <ctype.h>
#include <errno.h>
-#include "bfd.h"
#include "bucomm.h"
+#include "libiberty.h"
+
+/* Some platforms need to put stdin into binary mode, to read
+ binary files. */
+#ifdef HAVE_SETMODE
+#ifndef O_BINARY
+#ifdef _O_BINARY
+#define O_BINARY _O_BINARY
+#define setmode _setmode
+#else
+#define O_BINARY 0
+#endif
+#endif
+#if O_BINARY
+#include <io.h>
+#define SET_BINARY(f) do { if (!isatty(f)) setmode(f,O_BINARY); } while (0)
+#endif
+#endif
-#ifdef isascii
-#define isgraphic(c) (isascii (c) && isprint (c))
+/* Not all printable characters have ASCII codes (depending upon the
+ LOCALE set) but on some older systems it is not safe to test isprint
+ without first testing isascii... */
+#if defined isascii && !defined HAVE_LOCALE_H
+#define isgraphic(c) (isascii (c) && (isprint (c) || (c) == '\t'))
#else
-#define isgraphic(c) (isprint (c))
+#define isgraphic(c) (isprint (c) || (c) == '\t')
#endif
#ifndef errno
#endif
/* The BFD section flags that identify an initialized data section. */
-#define DATA_FLAGS (SEC_ALLOC | SEC_LOAD | SEC_DATA | SEC_HAS_CONTENTS)
+#define DATA_FLAGS (SEC_ALLOC | SEC_LOAD | SEC_HAS_CONTENTS)
/* Radix for printing addresses (must be 8, 10 or 16). */
static int address_radix;
/* true if we found an initialized data section in the current file. */
static boolean got_a_section;
-/* Opened to /dev/null for reading from a BFD.
- This is a kludge to avoid rewriting print_strings;
- the way we call print_strings now, it actually only needs
- to read from either a memory buffer or a stream, never both
- for a given file. */
-static FILE *devnull;
-
-extern char *program_version;
+/* The BFD object file format. */
+static char *target;
static struct option long_options[] =
{
{"print-file-name", no_argument, NULL, 'f'},
{"bytes", required_argument, NULL, 'n'},
{"radix", required_argument, NULL, 't'},
+ {"target", required_argument, NULL, 'T'},
{"help", no_argument, NULL, 'h'},
{"version", no_argument, NULL, 'v'},
{NULL, 0, NULL, 0}
};
+static void strings_a_section PARAMS ((bfd *, asection *, PTR));
+static boolean strings_object_file PARAMS ((const char *));
static boolean strings_file PARAMS ((char *file));
static int integer_arg PARAMS ((char *s));
-static void print_strings PARAMS ((char *filename, FILE *stream,
+static void print_strings PARAMS ((const char *filename, FILE *stream,
file_ptr address, int stop_point,
int magiccount, char *magic));
static void usage PARAMS ((FILE *stream, int status));
\f
-void
+int
main (argc, argv)
int argc;
char **argv;
int exit_status = 0;
boolean files_given = false;
+#if defined (HAVE_SETLOCALE) && defined (HAVE_LC_MESSAGES)
+ setlocale (LC_ALL, "");
+#endif
+ bindtextdomain (PACKAGE, LOCALEDIR);
+ textdomain (PACKAGE);
+
program_name = argv[0];
+ xmalloc_set_program_name (program_name);
string_min = -1;
print_addresses = false;
print_filenames = false;
datasection_only = true;
+ target = NULL;
while ((optc = getopt_long (argc, argv, "afn:ot:v0123456789",
long_options, (int *) 0)) != EOF)
string_min = integer_arg (optarg);
if (string_min < 1)
{
- fprintf (stderr, "%s: invalid number %s\n",
- program_name, optarg);
- exit (1);
+ fatal (_("invalid number %s"), optarg);
}
break;
}
break;
+ case 'T':
+ target = optarg;
+ break;
+
case 'v':
- printf ("GNU %s version %s\n", program_name, program_version);
- exit (0);
+ print_version ("strings");
+ break;
case '?':
usage (stderr, 1);
default:
if (string_min < 0)
- string_min = optc;
+ string_min = optc - '0';
else
string_min = string_min * 10 + optc - '0';
break;
string_min = 4;
bfd_init ();
- devnull = fopen ("/dev/null", "r");
- if (devnull == NULL)
+ set_default_bfd_target ();
+
+ if (optind >= argc)
{
- fprintf (stderr, "%s: ", program_name);
- perror ("/dev/null");
- exit (1);
+ datasection_only = false;
+#ifdef SET_BINARY
+ SET_BINARY (fileno (stdin));
+#endif
+ print_strings ("{standard input}", stdin, 0, 0, 0, (char *) NULL);
+ files_given = true;
}
-
- for (; optind < argc; ++optind)
+ else
{
- if (!strcmp (argv[optind], "-"))
- datasection_only = false;
- else
+ for (; optind < argc; ++optind)
{
- files_given = true;
- exit_status |= (strings_file (argv[optind]) == false);
+ if (strcmp (argv[optind], "-") == 0)
+ datasection_only = false;
+ else
+ {
+ files_given = true;
+ exit_status |= (strings_file (argv[optind]) == false);
+ }
}
}
if (files_given == false)
usage (stderr, 1);
- exit (exit_status);
+ return (exit_status);
}
\f
/* Scan section SECT of the file ABFD, whose printable name is FILE.
set `got_a_section' and print the strings in it. */
static void
-strings_a_section (abfd, sect, file)
+strings_a_section (abfd, sect, filearg)
bfd *abfd;
asection *sect;
- PTR file;
+ PTR filearg;
{
+ const char *file = (const char *) filearg;
+
if ((sect->flags & DATA_FLAGS) == DATA_FLAGS)
{
bfd_size_type sz = bfd_get_section_size_before_reloc (sect);
if (bfd_get_section_contents (abfd, sect, mem, (file_ptr) 0, sz))
{
got_a_section = true;
- print_strings (file, devnull, sect->filepos, 0, sz, mem);
+ print_strings (file, (FILE *) NULL, sect->filepos, 0, sz, mem);
}
free (mem);
}
/* Scan all of the sections in FILE, and print the strings
in the initialized data section(s).
+
Return true if successful,
false if not (such as if FILE is not an object file). */
static boolean
strings_object_file (file)
- char *file;
+ const char *file;
{
- bfd *abfd = bfd_openr (file, NULL);
+ bfd *abfd = bfd_openr (file, target);
if (abfd == NULL)
{
- if (bfd_error != system_call_error)
- {
- /* Out of memory, or an invalid target is specified by the
- GNUTARGET environment variable. */
- fprintf (stderr, "%s: ", program_name);
- bfd_perror (file);
- }
+ /* Treat the file as a non-object file. */
return false;
}
- /* For some reason, without this call, the BFD has no sections.
- This call is only for the side effect of reading in the sections. */
- bfd_check_format (abfd, bfd_object);
+ /* This call is mainly for its side effect of reading in the sections.
+ We follow the traditional behavior of `strings' in that we don't
+ complain if we don't recognize a file to be an object file. */
+ if (bfd_check_format (abfd, bfd_object) == false)
+ {
+ bfd_close (abfd);
+ return false;
+ }
got_a_section = false;
- bfd_map_over_sections (abfd, strings_a_section, file);
+ bfd_map_over_sections (abfd, strings_a_section, (PTR) file);
if (!bfd_close (abfd))
{
- fprintf (stderr, "%s: ", program_name);
- bfd_perror (file);
+ bfd_nonfatal (file);
return false;
}
{
FILE *stream;
- stream = fopen (file, "r");
+ stream = fopen (file, "rb");
+ /* Not all systems permit "rb", so try "r" if it failed. */
+ if (stream == NULL)
+ stream = fopen (file, "r");
if (stream == NULL)
{
fprintf (stderr, "%s: ", program_name);
is at address ADDRESS in the file.
Stop reading at address STOP_POINT in the file, if nonzero.
- Optionally the caller can supply a buffer of characters
+ If STREAM is NULL, do not read from it.
+ The caller can supply a buffer of characters
to be processed before the data in STREAM.
MAGIC is the address of the buffer and
MAGICCOUNT is how many characters are in it.
static void
print_strings (filename, stream, address, stop_point, magiccount, magic)
- char *filename;
+ const char *filename;
FILE *stream;
file_ptr address;
int stop_point;
int magiccount;
char *magic;
{
- int bufsize = 100;
- char *buf = (char *) xmalloc (bufsize);
+ char *buf = (char *) xmalloc (string_min + 1);
while (1)
{
+ file_ptr start;
int i;
int c;
tryline:
if (stop_point && address >= stop_point)
break;
+ start = address;
for (i = 0; i < string_min; i++)
{
if (magiccount)
}
else
{
+ if (stream == NULL)
+ return;
c = getc (stream);
- if (c < 0)
+ if (c == EOF)
return;
}
address++;
buf[i] = c;
}
- /* We found a run of `string_min' graphic characters.
- Now see if it is terminated with a NUL byte or a newline. */
- while (1)
- {
- if (i == bufsize)
- {
- bufsize *= 2;
- buf = (char *) xrealloc (buf, bufsize);
- }
- if (magiccount)
- {
- magiccount--;
- c = *magic++;
- }
- else
- {
- c = getc (stream);
- if (c < 0)
- return;
- }
- address++;
- if (c == '\0' || c == '\n')
- break; /* It is; print this string. */
- if (!isgraphic (c))
- goto tryline; /* It isn't; give up on this string. */
- buf[i++] = c; /* The string continues; store it all. */
- }
+ /* We found a run of `string_min' graphic characters. Print up
+ to the next non-graphic character. */
- /* If we get here, the string is all graphics and properly terminated,
- so print it. It is all in `buf' and `i' is its length. */
- buf[i] = '\0';
if (print_filenames)
printf ("%s: ", filename);
if (print_addresses)
switch (address_radix)
{
case 8:
- printf ("%7lo ", address - i - 1);
+ printf ("%7lo ", (unsigned long) start);
break;
case 10:
- printf ("%7ld ", address - i - 1);
+ printf ("%7ld ", (long) start);
break;
case 16:
- printf ("%7lx ", address - i - 1);
+ printf ("%7lx ", (unsigned long) start);
break;
}
- for (i = 0; (c = buf[i]) != '\0'; i++)
- switch (c)
- {
- case '\n':
- printf ("\\n");
- break;
- case '\t':
- printf ("\\t");
- break;
- case '\f':
- printf ("\\f");
- break;
- case '\b':
- printf ("\\b");
- break;
- case '\r':
- printf ("\\r");
+ buf[i] = '\0';
+ fputs (buf, stdout);
+
+ while (1)
+ {
+ if (magiccount)
+ {
+ magiccount--;
+ c = *magic++;
+ }
+ else
+ {
+ if (stream == NULL)
+ break;
+ c = getc (stream);
+ if (c == EOF)
+ break;
+ }
+ address++;
+ if (! isgraphic (c))
break;
- default:
- putchar (c);
- }
+ putchar (c);
+ }
+
putchar ('\n');
}
}
if (*p)
{
- fprintf (stderr, "%s: invalid integer argument %s\n", program_name, s);
- exit (1);
+ fatal (_("invalid integer argument %s"), s);
}
return value;
}
FILE *stream;
int status;
{
- fprintf (stream, "\
+ fprintf (stream, _("\
Usage: %s [-afov] [-n min-len] [-min-len] [-t {o,x,d}] [-]\n\
[--all] [--print-file-name] [--bytes=min-len] [--radix={o,x,d}]\n\
- [--help] [--version] file...\n",
+ [--target=bfdname] [--help] [--version] file...\n"),
program_name);
+ list_supported_targets (program_name, stream);
+ if (status == 0)
+ fprintf (stream, _("Report bugs to %s\n"), REPORT_BUGS_TO);
exit (status);
}