← Back to branch summary

~ubuntu-branches/ubuntu/maverick/gettext/maverick

« back to all changes in this revision

Viewing changes to gettext-tools/gnulib-lib/progname.c

  • Committer: Colin Watson
  • Date: 2010-08-01 21:36:08 UTC
  • mfrom: (2.1.10 sid)
  • Revision ID: cjwatson@canonical.com-20100801213608-yy7vkm8lpatep3ci
merge from Debian 0.18.1.1-1

Show diffs side-by-side

added added

removed removed

Lines of Context:
gettext-tools/gnulib-lib/progname.c
1
1
/* Program name management.
2
 
   Copyright (C) 2001-2003, 2005-2006 Free Software Foundation, Inc.
3
 
   Written by Bruno Haible <haible@clisp.cons.org>, 2001.
 
2
   Copyright (C) 2001-2003, 2005-2010 Free Software Foundation, Inc.
 
3
   Written by Bruno Haible <bruno@clisp.org>, 2001.
4
4
 
5
5
   This program is free software: you can redistribute it and/or modify
6
6
   it under the terms of the GNU General Public License as published by
22
22
#undef ENABLE_RELOCATABLE /* avoid defining set_program_name as a macro */
23
23
#include "progname.h"
24
24
 
 
25
#include <errno.h> /* get program_invocation_name declaration */
 
26
#include <stdio.h>
 
27
#include <stdlib.h>
25
28
#include <string.h>
26
29
 
27
30
 
29
32
   To be initialized by main().  */
30
33
const char *program_name = NULL;
31
34
 
32
 
/* Set program_name, based on argv[0].  */
 
35
/* Set program_name, based on argv[0].
 
36
   argv0 must be a string allocated with indefinite extent, and must not be
 
37
   modified after this call.  */
33
38
void
34
39
set_program_name (const char *argv0)
35
40
{
36
41
  /* libtool creates a temporary executable whose name is sometimes prefixed
37
42
     with "lt-" (depends on the platform).  It also makes argv[0] absolute.
 
43
     But the name of the temporary executable is a detail that should not be
 
44
     visible to the end user and to the test suite.
38
45
     Remove this "<dirname>/.libs/" or "<dirname>/.libs/lt-" prefix here.  */
39
46
  const char *slash;
40
47
  const char *base;
41
48
 
 
49
  /* Sanity check.  POSIX requires the invoking process to pass a non-NULL
 
50
     argv[0].  */
 
51
  if (argv0 == NULL)
 
52
    {
 
53
      /* It's a bug in the invoking program.  Help diagnosing it.  */
 
54
      fputs ("A NULL argv[0] was passed through an exec system call.\n",
 
55
             stderr);
 
56
      abort ();
 
57
    }
 
58
 
42
59
  slash = strrchr (argv0, '/');
43
60
  base = (slash != NULL ? slash + 1 : argv0);
44
 
  if (base - argv0 >= 7 && memcmp (base - 7, "/.libs/", 7) == 0)
45
 
    argv0 = base;
46
 
  if (strncmp (base, "lt-", 3) == 0)
47
 
    argv0 = base + 3;
 
61
  if (base - argv0 >= 7 && strncmp (base - 7, "/.libs/", 7) == 0)
 
62
    {
 
63
      argv0 = base;
 
64
      if (strncmp (base, "lt-", 3) == 0)
 
65
        {
 
66
          argv0 = base + 3;
 
67
          /* On glibc systems, remove the "lt-" prefix from the variable
 
68
             program_invocation_short_name.  */
 
69
#if HAVE_DECL_PROGRAM_INVOCATION_SHORT_NAME
 
70
          program_invocation_short_name = (char *) argv0;
 
71
#endif
 
72
        }
 
73
    }
 
74
 
 
75
  /* But don't strip off a leading <dirname>/ in general, because when the user
 
76
     runs
 
77
         /some/hidden/place/bin/cp foo foo
 
78
     he should get the error message
 
79
         /some/hidden/place/bin/cp: `foo' and `foo' are the same file
 
80
     not
 
81
         cp: `foo' and `foo' are the same file
 
82
   */
 
83
 
48
84
  program_name = argv0;
 
85
 
 
86
  /* On glibc systems, the error() function comes from libc and uses the
 
87
     variable program_invocation_name, not program_name.  So set this variable
 
88
     as well.  */
 
89
#if HAVE_DECL_PROGRAM_INVOCATION_NAME
 
90
  program_invocation_name = (char *) argv0;
 
91
#endif
49
92
}