2 * I'm tired of doing "vsnprintf()" etc just to open a
3 * file, so here's a "return static buffer with printf"
6 * It's obviously not thread-safe. Sue me. But it's quite
7 * useful for doing things like
9 * f = open(mkpath("%s/%s.perf", base, name), O_RDONLY);
11 * which is what it's designed for.
15 static char bad_path[] = "/bad-path/";
20 static const char *get_perf_dir(void)
25 size_t strlcpy(char *dest, const char *src, size_t size)
27 size_t ret = strlen(src);
30 size_t len = (ret >= size) ? size - 1 : ret;
31 memcpy(dest, src, len);
38 static char *get_pathname(void)
40 static char pathname_array[4][PATH_MAX];
43 return pathname_array[3 & ++idx];
46 static char *cleanup_path(char *path)
49 if (!memcmp(path, "./", 2)) {
57 static char *perf_vsnpath(char *buf, size_t n, const char *fmt, va_list args)
59 const char *perf_dir = get_perf_dir();
62 len = strlen(perf_dir);
65 memcpy(buf, perf_dir, len);
66 if (len && !is_dir_sep(perf_dir[len-1]))
68 len += vsnprintf(buf + len, n - len, fmt, args);
71 return cleanup_path(buf);
73 strlcpy(buf, bad_path, n);
77 char *perf_pathdup(const char *fmt, ...)
82 (void)perf_vsnpath(path, sizeof(path), fmt, args);
87 char *mkpath(const char *fmt, ...)
91 char *pathname = get_pathname();
94 len = vsnprintf(pathname, PATH_MAX, fmt, args);
98 return cleanup_path(pathname);
101 char *perf_path(const char *fmt, ...)
103 const char *perf_dir = get_perf_dir();
104 char *pathname = get_pathname();
108 len = strlen(perf_dir);
109 if (len > PATH_MAX-100)
111 memcpy(pathname, perf_dir, len);
112 if (len && perf_dir[len-1] != '/')
113 pathname[len++] = '/';
115 len += vsnprintf(pathname + len, PATH_MAX - len, fmt, args);
119 return cleanup_path(pathname);
122 /* strip arbitrary amount of directory separators at end of path */
123 static inline int chomp_trailing_dir_sep(const char *path, int len)
125 while (len && is_dir_sep(path[len - 1]))
131 * If path ends with suffix (complete path components), returns the
132 * part before suffix (sans trailing directory separators).
133 * Otherwise returns NULL.
135 char *strip_path_suffix(const char *path, const char *suffix)
137 int path_len = strlen(path), suffix_len = strlen(suffix);
143 if (is_dir_sep(path[path_len - 1])) {
144 if (!is_dir_sep(suffix[suffix_len - 1]))
146 path_len = chomp_trailing_dir_sep(path, path_len);
147 suffix_len = chomp_trailing_dir_sep(suffix, suffix_len);
149 else if (path[--path_len] != suffix[--suffix_len])
153 if (path_len && !is_dir_sep(path[path_len - 1]))
155 return strndup(path, chomp_trailing_dir_sep(path, path_len));