Mercurial > hg > octave-kai > gnulib-hg

annotate lib/same.c @ 5135:46d5c1c09035

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(same_name): Return bool, not int. (errno): Don't declare; we assume C89 or better now.
author Paul Eggert <eggert@cs.ucla.edu>
date Fri, 06 Aug 2004 06:19:08 +0000
parents de285d9e7c4d
children b3d5c90efc81
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
2092
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
1 /* Determine whether two file names refer to the same file.
5135
46d5c1c09035 (same_name): Return bool, not int.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4910
diff changeset
2
46d5c1c09035 (same_name): Return bool, not int.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4910
diff changeset
3 Copyright (C) 1997, 1998, 1999, 2000, 2002, 2003, 2004 Free
46d5c1c09035 (same_name): Return bool, not int.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4910
diff changeset
4 Software Foundation, Inc.
2092
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
5
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
6 This program is free software; you can redistribute it and/or modify
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
7 it under the terms of the GNU General Public License as published by
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
8 the Free Software Foundation; either version 2, or (at your option)
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
9 any later version.
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
10
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
11 This program is distributed in the hope that it will be useful,
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
14 GNU General Public License for more details.
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
15
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
16 You should have received a copy of the GNU General Public License
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
17 along with this program; if not, write to the Free Software Foundation,
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
18 Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
19
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
20 /* written by Jim Meyering */
0cf0dc1ce656 add copyright/no-warranty comment
Jim Meyering <jim@meyering.net>
parents: 1857
diff changeset
21
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
22 #if HAVE_CONFIG_H
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
23 # include <config.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
24 #endif
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
25
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
26 #include <stdbool.h>
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
27 #include <stdio.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
28 #ifdef HAVE_UNISTD_H
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
29 # include <unistd.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
30 #endif
4674
092d9a2797a7 Remove K&R cruft.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4367
diff changeset
31 #include <stdlib.h>
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
32 #include <sys/types.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
33 #include <sys/stat.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
34 #include <ctype.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
35 #include <errno.h>
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
36
4674
092d9a2797a7 Remove K&R cruft.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4367
diff changeset
37 #include <string.h>
2671
db2d95fa362f Include <string.h> or <strings.h>, as appropriate, for declaration of strcmp.
Jim Meyering <jim@meyering.net>
parents: 2293
diff changeset
38
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
39 #include <limits.h>
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
40 #ifndef _POSIX_NAME_MAX
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
41 # define _POSIX_NAME_MAX 14
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
42 #endif
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
43
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
44 #include "same.h"
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
45 #include "dirname.h"
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
46 #include "error.h"
2809
53d24b96c7f1 (same_name): Invoke xalloc_die instead of printing our own message.
Jim Meyering <jim@meyering.net>
parents: 2671
diff changeset
47 #include "xalloc.h"
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
48
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
49 #define MIN(a, b) ((a) < (b) ? (a) : (b))
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
50
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
51 #define SAME_INODE(Stat_buf_1, Stat_buf_2) \
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
52 ((Stat_buf_1).st_ino == (Stat_buf_2).st_ino \
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
53 && (Stat_buf_1).st_dev == (Stat_buf_2).st_dev)
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
54
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
55 /* Return nonzero if SOURCE and DEST point to the same name in the same
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
56 directory. */
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
57
5135
46d5c1c09035 (same_name): Return bool, not int.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4910
diff changeset
58 bool
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
59 same_name (const char *source, const char *dest)
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
60 {
4367
14fb4216a9b3 Merge from coreutils.
Jim Meyering <jim@meyering.net>
parents: 4181
diff changeset
61 /* Compare the basenames. */
14fb4216a9b3 Merge from coreutils.
Jim Meyering <jim@meyering.net>
parents: 4181
diff changeset
62 char const *source_basename = base_name (source);
14fb4216a9b3 Merge from coreutils.
Jim Meyering <jim@meyering.net>
parents: 4181
diff changeset
63 char const *dest_basename = base_name (dest);
14fb4216a9b3 Merge from coreutils.
Jim Meyering <jim@meyering.net>
parents: 4181
diff changeset
64 size_t source_baselen = base_len (source_basename);
14fb4216a9b3 Merge from coreutils.
Jim Meyering <jim@meyering.net>
parents: 4181
diff changeset
65 size_t dest_baselen = base_len (dest_basename);
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
66 bool identical_basenames =
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
67 (source_baselen == dest_baselen
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
68 && memcmp (source_basename, dest_basename, dest_baselen) == 0);
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
69 bool compare_dirs = identical_basenames;
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
70 bool same = false;
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
71
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
72 #if ! _POSIX_NO_TRUNC && HAVE_PATHCONF && defined _PC_NAME_MAX
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
73 /* This implementation silently truncates pathname components. If
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
74 the base names might be truncated, check whether the truncated
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
75 base names are the same, while checking the directories. */
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
76 size_t slen_max = HAVE_LONG_FILE_NAMES ? 255 : _POSIX_NAME_MAX;
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
77 size_t min_baselen = MIN (source_baselen, dest_baselen);
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
78 if (slen_max <= min_baselen
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
79 && memcmp (source_basename, dest_basename, slen_max) == 0)
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
80 compare_dirs = true;
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
81 #endif
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
82
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
83 if (compare_dirs)
4179
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
84 {
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
85 struct stat source_dir_stats;
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
86 struct stat dest_dir_stats;
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
87 char *source_dirname, *dest_dirname;
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
88
4181
5c87af30c731 *** empty log message ***
Jim Meyering <jim@meyering.net>
parents: 4179
diff changeset
89 /* Compare the parent directories (via the device and inode numbers). */
4179
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
90 source_dirname = dir_name (source);
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
91 dest_dirname = dir_name (dest);
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
92
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
93 if (stat (source_dirname, &source_dir_stats))
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
94 {
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
95 /* Shouldn't happen. */
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
96 error (1, errno, "%s", source_dirname);
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
97 }
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
98
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
99 if (stat (dest_dirname, &dest_dir_stats))
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
100 {
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
101 /* Shouldn't happen. */
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
102 error (1, errno, "%s", dest_dirname);
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
103 }
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
104
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
105 same = SAME_INODE (source_dir_stats, dest_dir_stats);
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
106
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
107 #if ! _POSIX_NO_TRUNC && HAVE_PATHCONF && defined _PC_NAME_MAX
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
108 if (same && ! identical_basenames)
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
109 {
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
110 long name_max = (errno = 0, pathconf (dest_dirname, _PC_NAME_MAX));
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
111 if (name_max < 0)
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
112 {
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
113 if (errno)
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
114 {
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
115 /* Shouldn't happen. */
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
116 error (1, errno, "%s", dest_dirname);
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
117 }
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
118 same = false;
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
119 }
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
120 else
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
121 same = (name_max <= min_baselen
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
122 && memcmp (source_basename, dest_basename, name_max) == 0);
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
123 }
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
124 #endif
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
125
4179
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
126 free (source_dirname);
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
127 free (dest_dirname);
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
128 }
7dd6887fa0db Optimization: Avoid unnecessary stat() calls.
Bruno Haible <bruno@clisp.org>
parents: 3966
diff changeset
129
4910
de285d9e7c4d Merge from coreutils.
Paul Eggert <eggert@cs.ucla.edu>
parents: 4674
diff changeset
130 return same;
1857
f47e2d0bff02 New file (function extracted from ln.c).
Jim Meyering <jim@meyering.net>
parents:
diff changeset
131 }