2 * Copyright (c) 2007 S.Sam Arun Raj
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
14 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
15 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
16 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
17 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
18 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
19 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
20 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
21 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
22 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
23 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28 #include <sys/types.h>
49 ELFTC_VCSID("$Id: strings.c 3498 2016-10-26 19:25:13Z emaste $");
61 ENCODING_16BIT_LITTLE,
66 #define PRINTABLE(c) \
67 ((c) >= 0 && (c) <= 255 && \
68 ((c) == '\t' || isprint((c)) || \
69 (encoding == ENCODING_8BIT && (c) > 127)))
71 static int encoding_size, entire_file, show_filename, show_loc;
72 static enum encoding_style encoding;
73 static enum radix_style radix;
74 static intmax_t min_len;
76 static struct option strings_longopts[] = {
77 { "all", no_argument, NULL, 'a'},
78 { "bytes", required_argument, NULL, 'n'},
79 { "encoding", required_argument, NULL, 'e'},
80 { "help", no_argument, NULL, 'h'},
81 { "print-file-name", no_argument, NULL, 'f'},
82 { "radix", required_argument, NULL, 't'},
83 { "version", no_argument, NULL, 'v'},
87 long getcharacter(void);
88 int handle_file(const char *);
89 int handle_elf(const char *, int);
90 int handle_binary(const char *, int);
91 int find_strings(const char *, off_t, off_t);
92 void show_version(void);
96 * strings(1) extracts text(contiguous printable characters)
97 * from elf and binary files.
100 main(int argc, char **argv)
107 if (elf_version(EV_CURRENT) == EV_NONE)
108 errx(EXIT_FAILURE, "ELF library initialization failed: %s",
111 while ((ch = getopt_long(argc, argv, "1234567890ae:fhn:ot:Vv",
112 strings_longopts, NULL)) != -1)
118 if (*optarg == 's') {
119 encoding = ENCODING_7BIT;
120 } else if (*optarg == 'S') {
121 encoding = ENCODING_8BIT;
122 } else if (*optarg == 'b') {
123 encoding = ENCODING_16BIT_BIG;
125 } else if (*optarg == 'B') {
126 encoding = ENCODING_32BIT_BIG;
128 } else if (*optarg == 'l') {
129 encoding = ENCODING_16BIT_LITTLE;
131 } else if (*optarg == 'L') {
132 encoding = ENCODING_32BIT_LITTLE;
142 min_len = strtoimax(optarg, (char**)NULL, 10);
144 errx(EX_USAGE, "option -n should specify a "
145 "positive decimal integer.");
154 radix = RADIX_DECIMAL;
155 else if (*optarg == 'o')
157 else if (*optarg == 'x')
192 rc = handle_file("{standard input}");
194 if (handle_file(*argv) != 0)
202 handle_file(const char *name)
208 if (strcmp("{standard input}", name) != 0) {
209 if (freopen(name, "rb", stdin) == NULL) {
210 warnx("'%s': %s", name, strerror(errno));
214 return (find_strings(name, (off_t)0, (off_t)0));
220 rt = handle_elf(name, fd);
225 * Files not understood by handle_elf, will be passed off here and will
226 * treated as a binary file. This would include text file, core dumps ...
229 handle_binary(const char *name, int fd)
233 memset(&buf, 0, sizeof(struct stat));
234 (void) lseek(fd, (off_t)0, SEEK_SET);
235 if (!fstat(fd, &buf))
236 return (find_strings(name, (off_t)0, buf.st_size));
241 * Will analyse a file to see if it ELF, other files including ar(1),
242 * core dumps are passed off and treated as flat binary files. Unlike
243 * GNU size in FreeBSD this routine will not treat ELF object from
244 * different archs as flat binary files(has to overridden using -a).
247 handle_elf(const char *name, int fd)
256 /* If entire file is chosen, treat it as a binary file */
258 return (handle_binary(name, fd));
260 (void) lseek(fd, (off_t)0, SEEK_SET);
261 elf = elf_begin(fd, ELF_C_READ, NULL);
262 if (elf_kind(elf) != ELF_K_ELF) {
264 return (handle_binary(name, fd));
267 if (gelf_getehdr(elf, &elfhdr) == NULL) {
269 warnx("%s: ELF file could not be processed", name);
273 if (elfhdr.e_shnum == 0 && elfhdr.e_type == ET_CORE) {
275 return (handle_binary(name, fd));
278 while ((scn = elf_nextscn(elf, scn)) != NULL) {
279 if (gelf_getshdr(scn, &shdr) == NULL)
281 if (shdr.sh_type != SHT_NOBITS &&
282 (shdr.sh_flags & SHF_ALLOC) != 0) {
283 rc = find_strings(name, shdr.sh_offset,
293 * Retrieves a character from input stream based on the encoding
304 for(i = 0; i < encoding_size; i++) {
316 case ENCODING_16BIT_BIG:
317 rt = (buf[0] << 8) | buf[1];
319 case ENCODING_16BIT_LITTLE:
320 rt = buf[0] | (buf[1] << 8);
322 case ENCODING_32BIT_BIG:
323 rt = ((long) buf[0] << 24) | ((long) buf[1] << 16) |
324 ((long) buf[2] << 8) | buf[3];
326 case ENCODING_32BIT_LITTLE:
327 rt = buf[0] | ((long) buf[1] << 8) | ((long) buf[2] << 16) |
328 ((long) buf[3] << 24);
335 * Input stream stdin is read until the end of file is reached or until
336 * the section size is reached in case of ELF files. Contiguous
337 * characters of >= min_size(default 4) will be displayed.
340 find_strings(const char *name, off_t offset, off_t size)
342 off_t cur_off, start_off;
347 if ((obuf = (char*)calloc(1, min_len + 1)) == NULL) {
348 (void) fprintf(stderr, "Unable to allocate memory: %s\n",
353 (void) fseeko(stdin, offset, SEEK_SET);
357 if ((offset + size) && (cur_off >= offset + size))
360 memset(obuf, 0, min_len+1);
361 for(i = 0; i < min_len; i++) {
363 if (c == EOF && feof(stdin))
368 cur_off += encoding_size;
370 if (encoding == ENCODING_8BIT &&
374 cur_off += encoding_size;
377 cur_off += encoding_size;
382 if (i >= min_len && ((cur_off <= offset + size) ||
385 printf ("%s: ", name);
389 (void) printf("%7ju ",
390 (uintmax_t)start_off);
393 (void) printf("%7jx ",
394 (uintmax_t)start_off);
397 (void) printf("%7jo ",
398 (uintmax_t)start_off);
405 if ((offset + size) &&
406 (cur_off >= offset + size))
409 cur_off += encoding_size;
410 if (encoding == ENCODING_8BIT &&
415 if (!PRINTABLE(c) || c == EOF)
427 #define USAGE_MESSAGE "\
428 Usage: %s [options] [file...]\n\
429 Print contiguous sequences of printable characters.\n\n\
431 -a | --all Scan the entire file for strings.\n\
432 -e ENC | --encoding=ENC Select the character encoding to use.\n\
433 -f | --print-file-name Print the file name before each string.\n\
434 -h | --help Print a help message and exit.\n\
435 -n N | --bytes=N | -N Print sequences with 'N' or more characters.\n\
436 -o Print offsets in octal.\n\
437 -t R | --radix=R Print offsets using the radix named by 'R'.\n\
438 -v | --version Print a version identifier and exit.\n"
443 (void) fprintf(stderr, USAGE_MESSAGE, ELFTC_GETPROGNAME());
450 (void) printf("%s (%s)\n", ELFTC_GETPROGNAME(), elftc_version());