1
0
mirror of git://git.suckless.org/sbase synced 2024-12-23 07:25:07 +00:00
sbase/pathchk.c
Mattias Andrée b445614f70 Add pathchk(1)
New command, including man page.
UTF-8 compatible and should be POSIX-compliant.

Signed-off-by: Mattias Andrée <maandree@kth.se>
2016-02-11 10:01:58 +00:00

124 lines
2.7 KiB
C

/* See LICENSE file for copyright and license details. */
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <limits.h>
#include <stdint.h>
#include <errno.h>
#include <sys/stat.h>
#include "util.h"
#include "arg.h"
#define PORTABLE_CHARACTER_SET "0123456789._-qwertyuiopasdfghjklzxcvbnmQWERTYUIOPASDFGHJKLZXCVBNM"
/* If your system supports more other characters, but not all non-NUL characters, define SYSTEM_CHARACTER_SET. */
#ifndef PATH_MAX
# define PATH_MAX SIZE_MAX
#endif
#ifndef NAME_MAX
# define NAME_MAX SIZE_MAX
#endif
static int most = 0;
static int extra = 0;
static void
usage(void)
{
fprintf(stderr, "usage: %s [-pP] filename...\n", argv0);
exit(1);
}
static int
pathchk(char *filename)
{
char *invalid, *invalid_end, *p, *q;
const char *character_set;
size_t len, maxlen;
struct stat _attr;
/* Empty? */
if (extra && !*filename) {
fprintf(stderr, "%s: empty filename\n", argv0);
return 1;
}
/* Leading hyphen? */
if (extra && ((*filename == '-') || strstr(filename, "/-"))) {
fprintf(stderr, "%s: %s: leading '-' in component of filename\n", argv0, filename);
return 1;
}
/* Nonportable character? */
#ifdef SYSTEM_CHARACTER_SET
character_set = "/"SYSTEM_CHARACTER_SET;
#else
character_set = 0;
#endif
if (most)
character_set = "/"PORTABLE_CHARACTER_SET;
if (character_set && *(invalid = filename + strspn(filename, character_set))) {
for (invalid_end = invalid + 1; *invalid_end & 0x80; invalid_end++);
fprintf(stderr, "%s: %s: ", argv0, filename);
*invalid_end = 0;
fprintf(stderr, "nonportable character '%s'\n", invalid);
return 1;
}
/* Symlink error? Non-searchable directory? */
if (lstat(filename, &_attr) && errno != ENOENT) {
/* lstat rather than stat, so that if filename is a bad symlink, but
* all parents are OK, no error will be detected. */
fprintf(stderr, "%s: %s: %s\n", argv0, filename, strerror(errno));
return 1;
}
/* Too long pathname? */
maxlen = most ? _POSIX_PATH_MAX : PATH_MAX;
if (strlen(filename) >= maxlen) {
fprintf(stderr, "%s: %s: is longer than %zu bytes\n",
argv0, filename, maxlen);
return 1;
}
/* Too long component? */
maxlen = most ? _POSIX_NAME_MAX : NAME_MAX;
for (p = filename; p; p = q) {
q = strchr(p, '/');
len = q ? (size_t)(q++ - p) : strlen(p);
if (len > maxlen) {
fprintf(stderr, "%s: %s: includes component longer than %zu bytes\n",
argv0, filename, maxlen);
return 1;
}
}
return 0;
}
int
main(int argc, char *argv[])
{
int ret = 0;
ARGBEGIN {
case 'p':
most = 1;
break;
case 'P':
extra = 1;
break;
default:
usage();
} ARGEND;
if (!argc)
usage();
for (; argc--; argv++)
ret |= pathchk(*argv);
return ret;
}