OpenCoverage

dirname-lgpl.c

Absolute File Name:/home/opencoverage/opencoverage/guest-scripts/coreutils/src/gnulib/lib/dirname-lgpl.c
Source codeSwitch to Preprocessed file
LineSourceCount
1/* dirname.c -- return all but the last element in a file name-
2-
3 Copyright (C) 1990, 1998, 2000-2001, 2003-2006, 2009-2018 Free Software-
4 Foundation, Inc.-
5-
6 This program is free software: you can redistribute it and/or modify-
7 it under the terms of the GNU General Public License as published by-
8 the Free Software Foundation; either version 3 of the License, or-
9 (at your option) any later version.-
10-
11 This program 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-
14 GNU General Public License for more details.-
15-
16 You should have received a copy of the GNU General Public License-
17 along with this program. If not, see <https://www.gnu.org/licenses/>. */-
18-
19#include <config.h>-
20-
21#include "dirname.h"-
22-
23#include <stdlib.h>-
24#include <string.h>-
25-
26/* Return the length of the prefix of FILE that will be used by-
27 dir_name. If FILE is in the working directory, this returns zero-
28 even though 'dir_name (FILE)' will return ".". Works properly even-
29 if there are trailing slashes (by effectively ignoring them). */-
30-
31size_t-
32dir_len (char const *file)-
33{-
34 size_t prefix_length = FILE_SYSTEM_PREFIX_LEN (file);-
35 size_t length;-
36-
37 /* Advance prefix_length beyond important leading slashes. */-
38 prefix_length += (prefix_length != 0
prefix_length != 0Description
TRUEnever evaluated
FALSEevaluated 205 times by 9 tests
Evaluated by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • shred
  • stdbuf
  • tail
  • vdir
0-205
39 ? (FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE-
40 && ISSLASH (file[prefix_length]))
dead code: ((file[prefix_length]) == '/')
-
41 : (ISSLASH (file[0])
((file[0]) == '/')Description
TRUEevaluated 17 times by 3 tests
Evaluated by:
  • dirname
  • mv
  • stdbuf
FALSEevaluated 188 times by 8 tests
Evaluated by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • shred
  • tail
  • vdir
17-188
42 ? ((DOUBLE_SLASH_IS_DISTINCT_ROOT-
43 && ISSLASH (file[1]) && ! ISSLASH (file[2])
dead code: ((file[1]) == '/')
dead code: ! ((file[2]) == '/')
-
44 ? 2 : 1))
dead code: 2
-
45 : 0));-
46-
47 /* Strip the basename and any redundant slashes before it. */-
48 for (length = last_component (file) - file;-
49 prefix_length < length; length--)
prefix_length < lengthDescription
TRUEevaluated 157 times by 7 tests
Evaluated by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • stdbuf
  • tail
FALSEevaluated 131 times by 8 tests
Evaluated by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • shred
  • tail
  • vdir
131-157
50 if (! ISSLASH (file[length - 1]))
! ((file[length - 1]) == '/')Description
TRUEevaluated 74 times by 7 tests
Evaluated by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • stdbuf
  • tail
FALSEevaluated 83 times by 7 tests
Evaluated by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • stdbuf
  • tail
74-83
51 break;
executed 74 times by 7 tests: break;
Executed by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • stdbuf
  • tail
74
52 return length;
executed 205 times by 9 tests: return length;
Executed by:
  • cp
  • dirname
  • ln
  • ls
  • mv
  • shred
  • stdbuf
  • tail
  • vdir
205
53}-
54-
55-
56/* In general, we can't use the builtin 'dirname' function if available,-
57 since it has different meanings in different environments.-
58 In some environments the builtin 'dirname' modifies its argument.-
59-
60 Return the leading directories part of FILE, allocated with malloc.-
61 Works properly even if there are trailing slashes (by effectively-
62 ignoring them). Return NULL on failure.-
63-
64 If lstat (FILE) would succeed, then { chdir (dir_name (FILE));-
65 lstat (base_name (FILE)); } will access the same file. Likewise,-
66 if the sequence { chdir (dir_name (FILE));-
67 rename (base_name (FILE), "foo"); } succeeds, you have renamed FILE-
68 to "foo" in the same directory FILE was in. */-
69-
70char *-
71mdir_name (char const *file)-
72{-
73 size_t length = dir_len (file);-
74 bool append_dot = (length == 0
length == 0Description
TRUEevaluated 39 times by 4 tests
Evaluated by:
  • cp
  • ln
  • mv
  • shred
FALSEevaluated 44 times by 4 tests
Evaluated by:
  • cp
  • ln
  • mv
  • stdbuf
39-44
75 || (FILE_SYSTEM_DRIVE_PREFIX_CAN_BE_RELATIVE-
76 && length == FILE_SYSTEM_PREFIX_LEN (file)
dead code: length == 0
-
77 && file[2] != '\0' && ! ISSLASH (file[2])));
dead code: file[2] != '\0'
dead code: ! ((file[2]) == '/')
-
78 char *dir = malloc (length + append_dot + 1);-
79 if (!dir)
!dirDescription
TRUEnever evaluated
FALSEevaluated 83 times by 5 tests
Evaluated by:
  • cp
  • ln
  • mv
  • shred
  • stdbuf
0-83
80 return NULL;
never executed: return ((void *)0) ;
0
81 memcpy (dir, file, length);-
82 if (append_dot)
append_dotDescription
TRUEevaluated 39 times by 4 tests
Evaluated by:
  • cp
  • ln
  • mv
  • shred
FALSEevaluated 44 times by 4 tests
Evaluated by:
  • cp
  • ln
  • mv
  • stdbuf
39-44
83 dir[length++] = '.';
executed 39 times by 4 tests: dir[length++] = '.';
Executed by:
  • cp
  • ln
  • mv
  • shred
39
84 dir[length] = '\0';-
85 return dir;
executed 83 times by 5 tests: return dir;
Executed by:
  • cp
  • ln
  • mv
  • shred
  • stdbuf
83
86}-
Source codeSwitch to Preprocessed file

Generated by Squish Coco 4.1.2