diff options
Diffstat (limited to 'binutils-2.25/ld/ldbuildid.c')
-rw-r--r-- | binutils-2.25/ld/ldbuildid.c | 158 |
1 files changed, 158 insertions, 0 deletions
diff --git a/binutils-2.25/ld/ldbuildid.c b/binutils-2.25/ld/ldbuildid.c new file mode 100644 index 0000000..0e1a9bf --- /dev/null +++ b/binutils-2.25/ld/ldbuildid.c @@ -0,0 +1,158 @@ +/* ldbuildid.c - Build Id support routines + Copyright 2013, 2014 Free Software Foundation, Inc. + + This file is part of the GNU Binutils. + + 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 3 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., 51 Franklin Street - Fifth Floor, Boston, + MA 02110-1301, USA. */ + +#include "sysdep.h" +#include "bfd.h" +#include "safe-ctype.h" +#include "md5.h" +#include "sha1.h" +#include "ldbuildid.h" + +#define streq(a,b) strcmp ((a), (b)) == 0 +#define strneq(a,b,n) strncmp ((a), (b), (n)) == 0 + +bfd_boolean +validate_build_id_style (const char *style) +{ + if ((streq (style, "md5")) || (streq (style, "sha1")) +#ifndef __MINGW32__ + || (streq (style, "uuid")) +#endif + || (strneq (style, "0x", 2))) + return TRUE; + + return FALSE; +} + +bfd_size_type +compute_build_id_size (const char *style) +{ + if (streq (style, "md5") || streq (style, "uuid")) + return 128 / 8; + + if (streq (style, "sha1")) + return 160 / 8; + + if (strneq (style, "0x", 2)) + { + bfd_size_type size = 0; + /* ID is in string form (hex). Count the bytes. */ + const char *id = style + 2; + + do + { + if (ISXDIGIT (id[0]) && ISXDIGIT (id[1])) + { + ++size; + id += 2; + } + else if (*id == '-' || *id == ':') + ++id; + else + { + size = 0; + break; + } + } while (*id != '\0'); + return size; + } + + return 0; +} + +static unsigned char +read_hex (const char xdigit) +{ + if (ISDIGIT (xdigit)) + return xdigit - '0'; + + if (ISUPPER (xdigit)) + return xdigit - 'A' + 0xa; + + if (ISLOWER (xdigit)) + return xdigit - 'a' + 0xa; + + abort (); + return 0; +} + +bfd_boolean +generate_build_id (bfd *abfd, + const char *style, + checksum_fn checksum_contents, + unsigned char *id_bits, + int size ATTRIBUTE_UNUSED) +{ + if (streq (style, "md5")) + { + struct md5_ctx ctx; + + md5_init_ctx (&ctx); + if (!(*checksum_contents) (abfd, (sum_fn) &md5_process_bytes, &ctx)) + return FALSE; + md5_finish_ctx (&ctx, id_bits); + } + else if (streq (style, "sha1")) + { + struct sha1_ctx ctx; + + sha1_init_ctx (&ctx); + if (!(*checksum_contents) (abfd, (sum_fn) &sha1_process_bytes, &ctx)) + return FALSE; + sha1_finish_ctx (&ctx, id_bits); + } +#ifndef __MINGW32__ + else if (streq (style, "uuid")) + { + int n; + int fd = open ("/dev/urandom", O_RDONLY); + + if (fd < 0) + return FALSE; + n = read (fd, id_bits, size); + close (fd); + if (n < size) + return FALSE; + } +#endif + else if (strneq (style, "0x", 2)) + { + /* ID is in string form (hex). Convert to bits. */ + const char *id = style + 2; + size_t n = 0; + + do + { + if (ISXDIGIT (id[0]) && ISXDIGIT (id[1])) + { + id_bits[n] = read_hex (*id++) << 4; + id_bits[n++] |= read_hex (*id++); + } + else if (*id == '-' || *id == ':') + ++id; + else + abort (); /* Should have been validated earlier. */ + } while (*id != '\0'); + } + else + abort (); /* Should have been validated earlier. */ + + return TRUE; +} |