4603
|
1 /* Program name management. |
|
2 Copyright (C) 2001-2003 Free Software Foundation, Inc. |
|
3 Written by Bruno Haible <haible@clisp.cons.org>, 2001. |
|
4 |
|
5 This program is free software; you can redistribute it and/or modify |
|
6 it under the terms of the GNU General Public License as published by |
|
7 the Free Software Foundation; either version 2, or (at your option) |
|
8 any later version. |
|
9 |
|
10 This program is distributed in the hope that it will be useful, |
|
11 but WITHOUT ANY WARRANTY; without even the implied warranty of |
|
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
|
13 GNU General Public License for more details. |
|
14 |
|
15 You should have received a copy of the GNU General Public License |
|
16 along with this program; if not, write to the Free Software Foundation, |
|
17 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ |
|
18 |
|
19 |
|
20 #ifdef HAVE_CONFIG_H |
|
21 # include "config.h" |
|
22 #endif |
|
23 |
|
24 /* Specification. */ |
|
25 #include "progname.h" |
|
26 |
|
27 #include <string.h> |
|
28 |
|
29 #undef set_program_name |
|
30 |
|
31 |
|
32 /* String containing name the program is called with. |
|
33 To be initialized by main(). */ |
|
34 const char *program_name; |
|
35 |
|
36 /* Set program_name, based on argv[0]. */ |
|
37 void |
|
38 set_program_name (const char *argv0) |
|
39 { |
|
40 /* libtool creates a temporary executable whose name is sometimes prefixed |
|
41 with "lt-" (depends on the platform). It also makes argv[0] absolute. |
|
42 Remove this "<dirname>/.libs/" or "<dirname>/.libs/lt-" prefix here. */ |
|
43 const char *slash; |
|
44 const char *base; |
|
45 |
|
46 slash = strrchr (argv0, '/'); |
|
47 base = (slash != NULL ? slash + 1 : argv0); |
|
48 if (base - argv0 >= 7 && memcmp (base - 7, "/.libs/", 7) == 0) |
|
49 argv0 = base; |
|
50 if (strncmp (base, "lt-", 3) == 0) |
|
51 argv0 = base + 3; |
|
52 program_name = argv0; |
|
53 } |