Replace FSF snail mail address with URLs.
[platform/upstream/glibc.git] / misc / init-misc.c
1 /* Define and initialize `__progname' et. al.
2    Copyright (C) 1994,1995,1996,1997,1998,2002 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4
5    The GNU C Library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    The GNU C Library 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 GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with the GNU C Library; if not, see
17    <http://www.gnu.org/licenses/>.  */
18
19 #include <string.h>
20 #include <libc-internal.h>
21
22 char *__progname_full = (char *) "";
23 char *__progname = (char *) "";
24 weak_alias (__progname_full, program_invocation_name)
25 weak_alias (__progname, program_invocation_short_name)
26
27
28 void
29 __init_misc (int argc, char **argv, char **envp)
30 {
31   if (argv && argv[0])
32     {
33       char *p = strrchr (argv[0], '/');
34       if (p == NULL)
35         __progname = argv[0];
36       else
37         __progname = p + 1;
38       __progname_full = argv[0];
39     }
40 }