New command, including man page. UTF-8 compatible and should be POSIX-compliant. Signed-off-by: Mattias Andrée <maandree@kth.se>
124 lines
2.7 KiB
C
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;
|
|
}
|