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>
48 ELFTC_VCSID("$Id: strings.c 3174 2015-03-27 17:13:41Z emaste $");
66 ENCODING_16BIT_LITTLE,
71 #define PRINTABLE(c) \
72 ((c) >= 0 && (c) <= 255 && \
73 ((c) == '\t' || isprint((c)) || \
74 (encoding == ENCODING_8BIT && (c) > 127)))
77 static int encoding_size, entire_file, min_len, show_filename, show_loc;
78 static enum encoding_style encoding;
79 static enum radix_style radix;
81 static struct option strings_longopts[] = {
82 { "all", no_argument, NULL, 'a'},
83 { "bytes", required_argument, NULL, 'n'},
84 { "encoding", required_argument, NULL, 'e'},
85 { "help", no_argument, NULL, 'h'},
86 { "print-file-name", no_argument, NULL, 'f'},
87 { "radix", required_argument, NULL, 't'},
88 { "version", no_argument, NULL, 'v'},
92 long getcharacter(void);
93 int handle_file(const char *);
94 int handle_elf(const char *, int);
95 int handle_binary(const char *, int);
96 int find_strings(const char *, off_t, off_t);
97 void show_version(void);
101 * strings(1) extracts text(contiguous printable characters)
102 * from elf and binary files.
105 main(int argc, char **argv)
112 if (elf_version(EV_CURRENT) == EV_NONE)
113 errx(EXIT_FAILURE, "ELF library initialization failed: %s",
116 while ((ch = getopt_long(argc, argv, "1234567890ae:fhn:ot:Vv",
117 strings_longopts, NULL)) != -1)
123 if (*optarg == 's') {
124 encoding = ENCODING_7BIT;
125 } else if (*optarg == 'S') {
126 encoding = ENCODING_8BIT;
127 } else if (*optarg == 'b') {
128 encoding = ENCODING_16BIT_BIG;
130 } else if (*optarg == 'B') {
131 encoding = ENCODING_32BIT_BIG;
133 } else if (*optarg == 'l') {
134 encoding = ENCODING_16BIT_LITTLE;
136 } else if (*optarg == 'L') {
137 encoding = ENCODING_32BIT_LITTLE;
147 min_len = (int)strtoimax(optarg, (char**)NULL, 10);
156 radix = RADIX_DECIMAL;
157 else if (*optarg == 'o')
159 else if (*optarg == 'x')
194 rc = handle_file("{standard input}");
196 rc = handle_file(*argv);
203 handle_file(const char *name)
208 return (RETURN_NOINPUT);
209 if (strcmp("{standard input}", name) != 0) {
210 if (freopen(name, "rb", stdin) == NULL) {
211 warnx("'%s': %s", name, strerror(errno));
212 return (RETURN_NOINPUT);
215 return (find_strings(name, (off_t)0, (off_t)0));
220 return (RETURN_NOINPUT);
221 rt = handle_elf(name, fd);
226 * Files not understood by handle_elf, will be passed off here and will
227 * treated as a binary file. This would include text file, core dumps ...
230 handle_binary(const char *name, int fd)
234 memset(&buf, 0, sizeof(struct stat));
235 (void) lseek(fd, (off_t)0, SEEK_SET);
236 if (!fstat(fd, &buf))
237 return (find_strings(name, (off_t)0, buf.st_size));
238 return (RETURN_SOFTWARE);
242 * Will analyse a file to see if it ELF, other files including ar(1),
243 * core dumps are passed off and treated as flat binary files. Unlike
244 * GNU size in FreeBSD this routine will not treat ELF object from
245 * different archs as flat binary files(has to overridden using -a).
248 handle_elf(const char *name, int fd)
257 /* If entire file is choosen, treat it as a binary file */
259 return (handle_binary(name, fd));
261 (void) lseek(fd, (off_t)0, SEEK_SET);
262 elf = elf_begin(fd, ELF_C_READ, NULL);
263 if (elf_kind(elf) != ELF_K_ELF) {
265 return (handle_binary(name, fd));
268 if (gelf_getehdr(elf, &elfhdr) == NULL) {
270 warnx("%s: ELF file could not be processed", name);
271 return (RETURN_SOFTWARE);
274 if (elfhdr.e_shnum == 0 && elfhdr.e_type == ET_CORE) {
276 return (handle_binary(name, fd));
279 while ((scn = elf_nextscn(elf, scn)) != NULL) {
280 if (gelf_getshdr(scn, &shdr) == NULL)
282 if (shdr.sh_type != SHT_NOBITS &&
283 (shdr.sh_flags & SHF_ALLOC) != 0) {
284 rc = find_strings(name, shdr.sh_offset,
294 * Retrieves a character from input stream based on the encoding
305 for(i = 0; i < encoding_size; i++) {
317 case ENCODING_16BIT_BIG:
318 rt = (buf[0] << 8) | buf[1];
320 case ENCODING_16BIT_LITTLE:
321 rt = buf[0] | (buf[1] << 8);
323 case ENCODING_32BIT_BIG:
324 rt = ((long) buf[0] << 24) | ((long) buf[1] << 16) |
325 ((long) buf[2] << 8) | buf[3];
327 case ENCODING_32BIT_LITTLE:
328 rt = buf[0] | ((long) buf[1] << 8) | ((long) buf[2] << 16) |
329 ((long) buf[3] << 24);
336 * Input stream stdin is read until the end of file is reached or until
337 * the section size is reached in case of ELF files. Contiguous
338 * characters of >= min_size(default 4) will be displayed.
341 find_strings(const char *name, off_t offset, off_t size)
343 off_t cur_off, start_off;
348 if ((obuf = (char*)calloc(1, min_len + 1)) == NULL) {
349 (void) fprintf(stderr, "Unable to allocate memory: %s\n",
351 return (RETURN_SOFTWARE);
354 (void) fseeko(stdin, offset, SEEK_SET);
358 if ((offset + size) && (cur_off >= offset + size))
361 memset(obuf, 0, min_len+1);
362 for(i = 0; i < min_len; i++) {
364 if (c == EOF && feof(stdin))
369 cur_off += encoding_size;
371 if (encoding == ENCODING_8BIT &&
375 cur_off += encoding_size;
378 cur_off += encoding_size;
383 if (i >= min_len && ((cur_off <= offset + size) ||
386 printf ("%s: ", name);
390 (void) printf("%7ju ",
391 (uintmax_t)start_off);
394 (void) printf("%7jx ",
395 (uintmax_t)start_off);
398 (void) printf("%7jo ",
399 (uintmax_t)start_off);
406 if ((offset + size) &&
407 (cur_off >= offset + size))
410 cur_off += encoding_size;
411 if (encoding == ENCODING_8BIT &&
416 if (!PRINTABLE(c) || c == EOF)
428 #define USAGE_MESSAGE "\
429 Usage: %s [options] [file...]\n\
430 Print contiguous sequences of printable characters.\n\n\
432 -a | --all Scan the entire file for strings.\n\
433 -e ENC | --encoding=ENC Select the character encoding to use.\n\
434 -f | --print-file-name Print the file name before each string.\n\
435 -h | --help Print a help message and exit.\n\
436 -n N | --bytes=N | -N Print sequences with 'N' or more characters.\n\
437 -o Print offsets in octal.\n\
438 -t R | --radix=R Print offsets using the radix named by 'R'.\n\
439 -v | --version Print a version identifier and exit.\n"
444 (void) fprintf(stderr, USAGE_MESSAGE, ELFTC_GETPROGNAME());
451 (void) printf("%s (%s)\n", ELFTC_GETPROGNAME(), elftc_version());