1// SPDX-License-Identifier: GPL-2.0
 2#include "path.h"
 
 
 
 
 
 
 
 
 
 
 3#include "cache.h"
 4#include <linux/kernel.h>
 5#include <limits.h>
 6#include <stdio.h>
 7#include <string.h>
 8#include <sys/types.h>
 9#include <sys/stat.h>
10#include <dirent.h>
11#include <unistd.h>
 
 
 
 
 
 
 
 
 
 
12
13static char *cleanup_path(char *path)
14{
15	/* Clean it up */
16	if (!memcmp(path, "./", 2)) {
17		path += 2;
18		while (*path == '/')
19			path++;
20	}
21	return path;
22}
23
24char *mkpath(char *path_buf, size_t sz, const char *fmt, ...)
25{
26	va_list args;
27	unsigned len;
 
28
29	va_start(args, fmt);
30	len = vsnprintf(path_buf, sz, fmt, args);
31	va_end(args);
32	if (len >= sz)
33		strncpy(path_buf, "/bad-path/", sz);
34	return cleanup_path(path_buf);
35}
36
37int path__join(char *bf, size_t size, const char *path1, const char *path2)
38{
39	return scnprintf(bf, size, "%s%s%s", path1, path1[0] ? "/" : "", path2);
40}
41
42int path__join3(char *bf, size_t size, const char *path1, const char *path2, const char *path3)
43{
44	return scnprintf(bf, size, "%s%s%s%s%s", path1, path1[0] ? "/" : "",
45			 path2, path2[0] ? "/" : "", path3);
46}
47
48bool is_regular_file(const char *file)
49{
50	struct stat st;
51
52	if (stat(file, &st))
53		return false;
54
55	return S_ISREG(st.st_mode);
56}
57
58/* Helper function for filesystems that return a dent->d_type DT_UNKNOWN */
59bool is_directory(const char *base_path, const struct dirent *dent)
60{
61	char path[PATH_MAX];
62	struct stat st;
63
64	snprintf(path, sizeof(path), "%s/%s", base_path, dent->d_name);
65	if (stat(path, &st))
66		return false;
67
68	return S_ISDIR(st.st_mode);
69}
70
71bool is_executable_file(const char *base_path, const struct dirent *dent)
72{
73	char path[PATH_MAX];
74	struct stat st;
75
76	snprintf(path, sizeof(path), "%s/%s", base_path, dent->d_name);
77	if (stat(path, &st))
78		return false;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
79
80	return !S_ISDIR(st.st_mode) && (st.st_mode & S_IXUSR);
 
 
81}

  1/*
  2 * I'm tired of doing "vsnprintf()" etc just to open a
  3 * file, so here's a "return static buffer with printf"
  4 * interface for paths.
  5 *
  6 * It's obviously not thread-safe. Sue me. But it's quite
  7 * useful for doing things like
  8 *
  9 *   f = open(mkpath("%s/%s.perf", base, name), O_RDONLY);
 10 *
 11 * which is what it's designed for.
 12 */
 13#include "cache.h"
 14
 15static char bad_path[] = "/bad-path/";
 16/*
 17 * Two hacks:
 18 */
 19
 20static const char *get_perf_dir(void)
 21{
 22	return ".";
 23}
 24
 25static char *get_pathname(void)
 26{
 27	static char pathname_array[4][PATH_MAX];
 28	static int idx;
 29
 30	return pathname_array[3 & ++idx];
 31}
 32
 33static char *cleanup_path(char *path)
 34{
 35	/* Clean it up */
 36	if (!memcmp(path, "./", 2)) {
 37		path += 2;
 38		while (*path == '/')
 39			path++;
 40	}
 41	return path;
 42}
 43
 44char *mkpath(const char *fmt, ...)
 45{
 46	va_list args;
 47	unsigned len;
 48	char *pathname = get_pathname();
 49
 50	va_start(args, fmt);
 51	len = vsnprintf(pathname, PATH_MAX, fmt, args);
 52	va_end(args);
 53	if (len >= PATH_MAX)
 54		return bad_path;
 55	return cleanup_path(pathname);
 56}
 57
 58char *perf_path(const char *fmt, ...)
 59{
 60	const char *perf_dir = get_perf_dir();
 61	char *pathname = get_pathname();
 62	va_list args;
 63	unsigned len;
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 64
 65	len = strlen(perf_dir);
 66	if (len > PATH_MAX-100)
 67		return bad_path;
 68	memcpy(pathname, perf_dir, len);
 69	if (len && perf_dir[len-1] != '/')
 70		pathname[len++] = '/';
 71	va_start(args, fmt);
 72	len += vsnprintf(pathname + len, PATH_MAX - len, fmt, args);
 73	va_end(args);
 74	if (len >= PATH_MAX)
 75		return bad_path;
 76	return cleanup_path(pathname);
 77}
 78
 79/* strip arbitrary amount of directory separators at end of path */
 80static inline int chomp_trailing_dir_sep(const char *path, int len)
 81{
 82	while (len && is_dir_sep(path[len - 1]))
 83		len--;
 84	return len;
 85}
 86
 87/*
 88 * If path ends with suffix (complete path components), returns the
 89 * part before suffix (sans trailing directory separators).
 90 * Otherwise returns NULL.
 91 */
 92char *strip_path_suffix(const char *path, const char *suffix)
 93{
 94	int path_len = strlen(path), suffix_len = strlen(suffix);
 95
 96	while (suffix_len) {
 97		if (!path_len)
 98			return NULL;
 99
100		if (is_dir_sep(path[path_len - 1])) {
101			if (!is_dir_sep(suffix[suffix_len - 1]))
102				return NULL;
103			path_len = chomp_trailing_dir_sep(path, path_len);
104			suffix_len = chomp_trailing_dir_sep(suffix, suffix_len);
105		}
106		else if (path[--path_len] != suffix[--suffix_len])
107			return NULL;
108	}
109
110	if (path_len && !is_dir_sep(path[path_len - 1]))
111		return NULL;
112	return strndup(path, chomp_trailing_dir_sep(path, path_len));
113}