]>
Commit | Line | Data |
---|---|---|
f787edde | 1 | /* Find path of executable. |
688903eb | 2 | Copyright (C) 1998-2018 Free Software Foundation, Inc. |
f787edde UD |
3 | This file is part of the GNU C Library. |
4 | Contributed by Ulrich Drepper <drepper@cygnus.com>, 1998. | |
5 | ||
6 | The GNU C Library is free software; you can redistribute it and/or | |
41bdb6e2 AJ |
7 | modify it under the terms of the GNU Lesser General Public |
8 | License as published by the Free Software Foundation; either | |
9 | version 2.1 of the License, or (at your option) any later version. | |
f787edde UD |
10 | |
11 | The GNU C Library is distributed in the hope that it will be useful, | |
12 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
13 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU | |
41bdb6e2 | 14 | Lesser General Public License for more details. |
f787edde | 15 | |
41bdb6e2 | 16 | You should have received a copy of the GNU Lesser General Public |
59ba27a6 PE |
17 | License along with the GNU C Library; if not, see |
18 | <http://www.gnu.org/licenses/>. */ | |
f787edde | 19 | |
88794e30 | 20 | #include <assert.h> |
dc5efe83 UD |
21 | #include <stdlib.h> |
22 | #include <string.h> | |
23 | #include <unistd.h> | |
24 | #include <sys/param.h> | |
a42195db | 25 | #include <ldsodefs.h> |
ce6e047f | 26 | #include <sysdep.h> |
dc5efe83 UD |
27 | |
28 | #include <dl-dst.h> | |
29 | ||
f787edde UD |
30 | /* On Linux >= 2.1 systems which have the dcache implementation we can get |
31 | the path of the application from the /proc/self/exe symlink. Try this | |
32 | first and fall back on the generic method if necessary. */ | |
f787edde | 33 | |
dc5efe83 UD |
34 | const char * |
35 | _dl_get_origin (void) | |
f787edde UD |
36 | { |
37 | char linkval[PATH_MAX]; | |
9cf73ab0 | 38 | char *result; |
88794e30 | 39 | int len; |
9cf73ab0 | 40 | INTERNAL_SYSCALL_DECL (err); |
f787edde | 41 | |
9cf73ab0 UD |
42 | len = INTERNAL_SYSCALL (readlink, err, 3, "/proc/self/exe", linkval, |
43 | sizeof (linkval)); | |
44 | if (! INTERNAL_SYSCALL_ERROR_P (len, err) && len > 0 && linkval[0] != '[') | |
f787edde | 45 | { |
9cf73ab0 UD |
46 | /* We can use this value. */ |
47 | assert (linkval[0] == '/'); | |
48 | while (len > 1 && linkval[len - 1] != '/') | |
49 | --len; | |
50 | result = (char *) malloc (len + 1); | |
51 | if (result == NULL) | |
52 | result = (char *) -1; | |
53 | else if (len == 1) | |
54 | memcpy (result, "/", 2); | |
42fa1f67 | 55 | else |
9cf73ab0 | 56 | *((char *) __mempcpy (result, linkval, len - 1)) = '\0'; |
f787edde UD |
57 | } |
58 | else | |
59 | { | |
9cf73ab0 | 60 | result = (char *) -1; |
143e2b96 | 61 | /* We use the environment variable LD_ORIGIN_PATH. If it is set make |
f787edde | 62 | a copy and strip out trailing slashes. */ |
afdca0f2 | 63 | if (GLRO(dl_origin_path) != NULL) |
f787edde | 64 | { |
afdca0f2 | 65 | size_t len = strlen (GLRO(dl_origin_path)); |
88794e30 | 66 | result = (char *) malloc (len + 1); |
f787edde UD |
67 | if (result == NULL) |
68 | result = (char *) -1; | |
69 | else | |
70 | { | |
afdca0f2 | 71 | char *cp = __mempcpy (result, GLRO(dl_origin_path), len); |
143e2b96 | 72 | while (cp > result + 1 && cp[-1] == '/') |
f787edde UD |
73 | --cp; |
74 | *cp = '\0'; | |
75 | } | |
76 | } | |
77 | } | |
78 | ||
79 | return result; | |
80 | } |