From ea03559a9d4730f89105b6f5e674a0aaefc74b3b Mon Sep 17 00:00:00 2001 From: Roland McGrath Date: Wed, 27 Sep 1995 06:49:48 +0000 Subject: [PATCH] Wed Sep 27 00:27:25 1995 Roland McGrath * config.make.in (AS): New variable; set to `$(CC) -c'. * posix/unistd.h [__USE_BSD]: Declare profil. * elf/dl-load.c (_dl_map_object_from_fd): New function, broken out of _dl_map_object. (_dl_map_object): Call it. * elf/link.h (_dl_map_object_from_fd): Declare it. --- ChangeLog | 11 ++++++++ config.make.in | 1 + elf/dl-load.c | 83 +++++++++++++++++++++++++++++++++------------------------- elf/link.h | 6 +++++ posix/unistd.h | 9 +++++++ 5 files changed, 75 insertions(+), 35 deletions(-) diff --git a/ChangeLog b/ChangeLog index bd0651b..2865f35 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,14 @@ +Wed Sep 27 00:27:25 1995 Roland McGrath + + * config.make.in (AS): New variable; set to `$(CC) -c'. + + * posix/unistd.h [__USE_BSD]: Declare profil. + + * elf/dl-load.c (_dl_map_object_from_fd): New function, broken out + of _dl_map_object. + (_dl_map_object): Call it. + * elf/link.h (_dl_map_object_from_fd): Declare it. + Tue Sep 26 16:50:17 1995 Roland McGrath * locale/libintl.h: Rewritten by Ulrich Drepper for use with GNU diff --git a/config.make.in b/config.make.in index 652f10e..69d4fcb 100644 --- a/config.make.in +++ b/config.make.in @@ -29,6 +29,7 @@ build-omitfp = @omitfp@ CC = @CC@ AR = @AR@ RANLIB = @RANLIB@ +AS = $(CC) -c # Installation tools. INSTALL = @INSTALL@ diff --git a/elf/dl-load.c b/elf/dl-load.c index 6cacd3e..7319602 100644 --- a/elf/dl-load.c +++ b/elf/dl-load.c @@ -108,40 +108,8 @@ _dl_map_object (struct link_map *loader, const char *name, Elf32_Addr *entry_point) { int fd; - struct link_map *l = NULL; char *realname; - const size_t pagesize = getpagesize (); - void *file_mapping = NULL; - size_t mapping_size = 0; - - void lose (int code, const char *msg) - { - (void) close (fd); - if (file_mapping) - munmap (file_mapping, mapping_size); - _dl_signal_error (code, l ? l->l_name : name, msg); - } - - /* Make sure LOCATION is mapped in. */ - void *map (off_t location, size_t size) - { - if ((off_t) mapping_size <= location + (off_t) size) - { - void *result; - if (file_mapping) - munmap (file_mapping, mapping_size); - mapping_size = (location + size + 1 + pagesize - 1); - mapping_size &= ~(pagesize - 1); - result = mmap (file_mapping, mapping_size, PROT_READ, - MAP_COPY|MAP_FILE, fd, 0); - if (result == (void *) -1) - lose (errno, "cannot map file data"); - file_mapping = result; - } - return file_mapping + location; - } - - const Elf32_Ehdr *header; + struct link_map *l; /* Look for this name among those already loaded. */ for (l = _dl_loaded; l; l = l->l_next) @@ -182,7 +150,52 @@ _dl_map_object (struct link_map *loader, const char *name, } if (fd == -1) - lose (errno, "cannot open shared object file"); + _dl_signal_error (errno, name, "cannot open shared object file"); + + return _dl_map_object_from_fd (name, fd, realname, entry_point); +} + + +/* Map in the shared object NAME, actually located in REALNAME, and already + opened on FD. */ + +struct link_map * +_dl_map_object_from_fd (const char *name, int fd, char *realname, + Elf32_Addr *entry_point) +{ + struct link_map *l = NULL; + const size_t pagesize = getpagesize (); + void *file_mapping = NULL; + size_t mapping_size = 0; + + void lose (int code, const char *msg) + { + (void) close (fd); + if (file_mapping) + munmap (file_mapping, mapping_size); + _dl_signal_error (code, l ? l->l_name : name, msg); + } + + /* Make sure LOCATION is mapped in. */ + void *map (off_t location, size_t size) + { + if ((off_t) mapping_size <= location + (off_t) size) + { + void *result; + if (file_mapping) + munmap (file_mapping, mapping_size); + mapping_size = (location + size + 1 + pagesize - 1); + mapping_size &= ~(pagesize - 1); + result = mmap (file_mapping, mapping_size, PROT_READ, + MAP_COPY|MAP_FILE, fd, 0); + if (result == (void *) -1) + lose (errno, "cannot map file data"); + file_mapping = result; + } + return file_mapping + location; + } + + const Elf32_Ehdr *header; /* Look again to see if the real name matched another already loaded. */ for (l = _dl_loaded; l; l = l->l_next) @@ -191,11 +204,11 @@ _dl_map_object (struct link_map *loader, const char *name, /* The object is already loaded. Just bump its reference count and return it. */ close (fd); + free (realname); ++l->l_opencount; return l; } - /* Map in the first page to read the header. */ header = map (0, sizeof *header); diff --git a/elf/link.h b/elf/link.h index 6f44a0c..aacb3f1 100644 --- a/elf/link.h +++ b/elf/link.h @@ -164,6 +164,12 @@ extern struct link_map *_dl_map_object (struct link_map *loader, const char *name, Elf32_Addr *entry_point); +/* Similar, but file found at REALNAME and opened on FD. + REALNAME must malloc'd storage and is used in internal data structures. */ +extern struct link_map *_dl_map_object_from_fd (const char *name, + int fd, char *realname, + Elf32_Addr *entry_point); + /* Cache the locations of MAP's hash table. */ extern void _dl_setup_hash (struct link_map *map); diff --git a/posix/unistd.h b/posix/unistd.h index eda44c9..846653c 100644 --- a/posix/unistd.h +++ b/posix/unistd.h @@ -568,6 +568,15 @@ extern int vhangup __P ((void)); extern int revoke __P ((const char *__file)); +/* Enable statistical profiling, writing samples of the PC into at most + SIZE bytes of SAMPLE_BUFFER; every processor clock tick while profiling + is enabled, the system examines the user PC and increments + SAMPLE_BUFFER[((PC - OFFSET) / 2) * SCALE / 65536]. If SCALE is zero, + disable profiling. Returns zero on success, -1 on error. */ +extern int profil __P ((unsigned short int *__sample_buffer, size_t __size, + size_t __offset, unsigned int __scale)); + + /* Turn accounting on if NAME is an existing file. The system will then write a record for each process as it terminates, to this file. If NAME is NULL, turn accounting off. This call is restricted to the super-user. */ -- 2.7.4