556 lines
13 KiB
C
556 lines
13 KiB
C
/* $NetBSD: getcwd.c,v 1.5 1999/07/11 09:54:41 sommerfeld Exp $ */
|
|
|
|
/*-
|
|
* Copyright (c) 1999 The NetBSD Foundation, Inc.
|
|
* All rights reserved.
|
|
*
|
|
* This code is derived from software contributed to The NetBSD Foundation
|
|
* by Bill Sommerfeld.
|
|
*
|
|
* Redistribution and use in source and binary forms, with or without
|
|
* modification, are permitted provided that the following conditions
|
|
* are met:
|
|
* 1. Redistributions of source code must retain the above copyright
|
|
* notice, this list of conditions and the following disclaimer.
|
|
* 2. Redistributions in binary form must reproduce the above copyright
|
|
* notice, this list of conditions and the following disclaimer in the
|
|
* documentation and/or other materials provided with the distribution.
|
|
* 3. All advertising materials mentioning features or use of this software
|
|
* must display the following acknowledgement:
|
|
* This product includes software developed by the NetBSD
|
|
* Foundation, Inc. and its contributors.
|
|
* 4. Neither the name of The NetBSD Foundation nor the names of its
|
|
* contributors may be used to endorse or promote products derived
|
|
* from this software without specific prior written permission.
|
|
*
|
|
* THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
|
|
* ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
|
|
* TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
|
|
* PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
|
|
* BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
|
|
* CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
|
|
* SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
|
|
* INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
|
|
* CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
|
|
* ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
|
|
* POSSIBILITY OF SUCH DAMAGE.
|
|
*/
|
|
|
|
/*
|
|
* test SYS___getcwd.
|
|
*/
|
|
|
|
#include <assert.h>
|
|
#include <err.h>
|
|
#include <errno.h>
|
|
#include <pwd.h>
|
|
#include <stdio.h>
|
|
#include <stdlib.h>
|
|
#include <string.h>
|
|
#include <time.h>
|
|
#include <unistd.h>
|
|
|
|
#include <sys/param.h> /* for MAXPATHLEN */
|
|
#include <sys/types.h>
|
|
#include <sys/stat.h>
|
|
#include <sys/wait.h>
|
|
|
|
#include "getcwd.h"
|
|
|
|
int main __P((int, char *[]));
|
|
|
|
static void check1 __P((char *dir, char *buf, char *calltext,
|
|
int actual, int expected, int experr));
|
|
|
|
static void time_old_getcwd __P((void));
|
|
static void time_kern_getcwd __P((void));
|
|
static void time_func __P((char *name,
|
|
void (*func)(void)));
|
|
|
|
static void test_speed __P((void));
|
|
static void test___getcwd __P((void));
|
|
static void test___getcwd_perms __P((void));
|
|
static void test___getcwd_chroot __P((void));
|
|
|
|
static void stress_test_getcwd __P((void));
|
|
static void usage __P((char *progname));
|
|
|
|
/* libc-private interface */
|
|
int __getcwd __P((char *, size_t));
|
|
|
|
/*
|
|
* test cases:
|
|
* NULL pointer
|
|
* broken pointer
|
|
* zero-length buffer
|
|
* negative length
|
|
* one-character buffer
|
|
* two-character buffer
|
|
* full-length buffer
|
|
* large (uncacheable) name in path.
|
|
* deleted directory
|
|
* after rename of parent.
|
|
* permission failure.
|
|
* good pointer near end of address space
|
|
* really huge length
|
|
* really large (multi-block) directories
|
|
* chroot interactions:
|
|
* chroot, at / inside the directory.
|
|
* chroot, at some other inside directory.
|
|
*/
|
|
|
|
/*
|
|
* test cases not yet done:
|
|
* -o union mount
|
|
* chroot interactions:
|
|
* chroot to mounted directory.
|
|
* (i.e., proc a: chroot /foo; sleep;
|
|
* proc b: mount blort /foo)
|
|
* concurrent with force-unmounting of filesystem.
|
|
*/
|
|
|
|
#define bigname "Funkelhausersteinweitz.SIPBADMIN.a" /* don't ask */
|
|
#define littlename "getcwdtest"
|
|
#define othername "testgetcwd"
|
|
|
|
static int verbose = 0;
|
|
static int test = 1;
|
|
static int fail = 0;
|
|
static int pass = 0;
|
|
static int sleepflag = 0;
|
|
|
|
static uid_t altid = -1;
|
|
|
|
static void
|
|
check1 (dir, buf, calltext, actual, expected, experr)
|
|
char *dir;
|
|
char *buf;
|
|
char *calltext;
|
|
int actual, expected, experr;
|
|
{
|
|
int ntest = test++;
|
|
if (actual != expected) {
|
|
fprintf(stderr,
|
|
"test %d: in %s, %s failed; expected %d, got %d\n",
|
|
ntest, dir, calltext, expected, actual);
|
|
if (actual < 0) perror("getcwd");
|
|
fail++;
|
|
} else if ((expected == -1) && (errno != (experr))) {
|
|
fprintf(stderr,
|
|
"test %d: in %s, %s failed; expected error %d, got %d\n",
|
|
ntest, dir, calltext, experr, errno);
|
|
if (actual < 0) perror("getcwd");
|
|
fail++;
|
|
} else if ((expected > 0) &&
|
|
(buf != NULL) &&
|
|
(strcmp (dir, buf) != 0)) {
|
|
fprintf(stderr,
|
|
"test %d: in %s, %s got wrong dir %s\n",
|
|
ntest, dir, calltext, buf);
|
|
fail++;
|
|
} else {
|
|
if (expected > 0) {
|
|
char newbuf[1024];
|
|
char *cp = old_getcwd(newbuf, sizeof(newbuf));
|
|
if (cp == NULL) {
|
|
fail++;
|
|
fprintf(stderr,
|
|
"test %d: in %s, old getcwd failed!\n",
|
|
ntest, dir);
|
|
} else if (strcmp(cp, buf)) {
|
|
fail++;
|
|
fprintf(stderr,
|
|
"test %d: in %s, old_getcwd returned different dir %s\n",
|
|
ntest, dir, cp);
|
|
}
|
|
}
|
|
pass++;
|
|
if (verbose)
|
|
printf("test %d: in %s, %s passed\n", ntest, dir, calltext);
|
|
}
|
|
if (sleepflag)
|
|
sleep(1);
|
|
}
|
|
|
|
int nloops = 100;
|
|
|
|
void
|
|
time_old_getcwd()
|
|
{
|
|
char result_buf[1024];
|
|
if (old_getcwd(result_buf, 1024) == NULL) {
|
|
fprintf(stderr, "old_getcwd failed during timing test!\n");
|
|
perror("old_getcwd");
|
|
exit(1);
|
|
}
|
|
|
|
}
|
|
|
|
void
|
|
time_kern_getcwd()
|
|
{
|
|
char result_buf[1024];
|
|
if (__getcwd(result_buf, sizeof(result_buf)) < 0) {
|
|
fprintf(stderr, "getcwd failed during timing test!");
|
|
perror("getcwd");
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
static void
|
|
time_func(name, func)
|
|
char *name;
|
|
void (*func) __P((void));
|
|
{
|
|
struct timeval before, after;
|
|
double delta_t;
|
|
|
|
int i;
|
|
chdir ("/usr/share/examples/emul/ultrix/etc");
|
|
|
|
gettimeofday(&before, 0);
|
|
for (i=0; i<nloops; i++) {
|
|
(*func)();
|
|
}
|
|
gettimeofday(&after, 0);
|
|
|
|
delta_t = after.tv_sec - before.tv_sec;
|
|
|
|
delta_t += ((double)(after.tv_usec - before.tv_usec))/1000000.0;
|
|
|
|
printf("%s: %d calls in %10.3f seconds; ", name, nloops, delta_t);
|
|
printf("%10.6f ms/call\n", (delta_t*1000.0)/nloops);
|
|
}
|
|
|
|
void
|
|
test_speed()
|
|
{
|
|
int i;
|
|
for (i=0; i<5; i++)
|
|
time_func("kernel getcwd", time_kern_getcwd);
|
|
|
|
for (i=0; i<5; i++)
|
|
time_func("old user-space getcwd", time_old_getcwd);
|
|
}
|
|
|
|
#define CHECK(dir, call, ret, err) \
|
|
check1((dir), kbuf, #call, (call), (ret), (err))
|
|
|
|
|
|
void
|
|
test___getcwd_perms()
|
|
{
|
|
char kbuf[1024];
|
|
|
|
if (geteuid() != 0)
|
|
{
|
|
fprintf(stderr, "Not root; skipping permission tests\n");
|
|
return;
|
|
}
|
|
|
|
mkdir ("/tmp/permdir", 0700);
|
|
mkdir ("/tmp/permdir/subdir", 0755);
|
|
chdir ("/tmp/permdir/subdir");
|
|
|
|
seteuid(altid);
|
|
|
|
CHECK("/tmp/permdir/subdir", __getcwd(kbuf, sizeof(kbuf)), -1, EACCES);
|
|
|
|
seteuid(0);
|
|
chdir ("/");
|
|
rmdir ("/tmp/permdir/subdir");
|
|
rmdir ("/tmp/permdir");
|
|
|
|
mkdir ("/tmp/permdir", 0755);
|
|
mkdir ("/tmp/permdir/subdir", 0711);
|
|
chdir ("/tmp/permdir/subdir");
|
|
|
|
seteuid(altid);
|
|
|
|
CHECK("/tmp/permdir/subdir", __getcwd(kbuf, sizeof(kbuf)), 20, 0);
|
|
|
|
seteuid(0);
|
|
chdir ("/");
|
|
rmdir ("/tmp/permdir/subdir");
|
|
rmdir ("/tmp/permdir");
|
|
}
|
|
|
|
void
|
|
test___getcwd_chroot()
|
|
{
|
|
int pid, status;
|
|
char kbuf[1024];
|
|
|
|
if (geteuid() != 0)
|
|
{
|
|
fprintf(stderr, "Not root; skipping chroot tests\n");
|
|
return;
|
|
}
|
|
|
|
/* XXX we need fchroot to do this properly.. */
|
|
mkdir ("/tmp/chrootdir", 0755);
|
|
mkdir ("/tmp/chrootdir/subdir", 0755);
|
|
|
|
chdir ("/tmp/chrootdir");
|
|
|
|
CHECK ("/tmp/chrootdir", __getcwd(kbuf, sizeof(kbuf)), 15, 0);
|
|
|
|
fflush(NULL);
|
|
|
|
pid = fork();
|
|
|
|
if (pid < 0) {
|
|
perror("fork");
|
|
fail++;
|
|
} else if (pid == 0) {
|
|
fail = 0;
|
|
pass = 0;
|
|
/* chroot to root of filesystem (assuming MFS /tmp) */
|
|
chroot ("/tmp");
|
|
CHECK ("/chrootdir", __getcwd(kbuf, sizeof(kbuf)), 11, 0);
|
|
/* chroot to further down */
|
|
chroot ("/chrootdir");
|
|
CHECK ("/", __getcwd(kbuf, sizeof(kbuf)), 2, 0);
|
|
chdir("subdir");
|
|
CHECK ("/subdir", __getcwd(kbuf, sizeof(kbuf)), 8, 0);
|
|
|
|
if (fail)
|
|
exit(1);
|
|
else
|
|
exit(0);
|
|
} else {
|
|
waitpid(pid, &status, 0);
|
|
|
|
if (WIFEXITED(status) &&
|
|
(WEXITSTATUS(status) == 0))
|
|
pass++;
|
|
else
|
|
fail++;
|
|
|
|
}
|
|
|
|
chdir ("/");
|
|
rmdir ("/tmp/chrootdir/subdir");
|
|
rmdir ("/tmp/chrootdir");
|
|
}
|
|
|
|
|
|
|
|
|
|
void
|
|
test___getcwd()
|
|
{
|
|
int i;
|
|
static char kbuf[1024];
|
|
|
|
chdir("/");
|
|
|
|
CHECK("/", __getcwd(0, 0), -1, ERANGE);
|
|
CHECK("/", __getcwd(0, -1), -1, ERANGE);
|
|
CHECK("/", __getcwd(kbuf, 0xdeadbeef), -1, ERANGE); /* large negative */
|
|
CHECK("/", __getcwd(kbuf, 0x7000beef), 2, 0); /* large positive, rounds down */
|
|
CHECK("/", __getcwd(kbuf, 0x10000), 2, 0); /* slightly less large positive, rounds down */
|
|
CHECK("/", __getcwd(kbuf+0x100000, sizeof(kbuf)), -1, EFAULT); /* outside address space */
|
|
CHECK("/", __getcwd(0, 30), -1, EFAULT);
|
|
CHECK("/", __getcwd((void*)0xdeadbeef, 30), -1, EFAULT);
|
|
CHECK("/", __getcwd(kbuf, 2), 2, 0);
|
|
assert (strcmp(kbuf, "/") == 0);
|
|
CHECK("/", __getcwd(kbuf, sizeof(kbuf)), 2, 0);
|
|
|
|
CHECK("/", __getcwd(kbuf, 0), -1, ERANGE);
|
|
CHECK("/", __getcwd(kbuf, 1), -1, ERANGE);
|
|
|
|
chdir("/sbin");
|
|
CHECK("/sbin", __getcwd(kbuf, sizeof(kbuf)), 6, 0);
|
|
/* verify that cacheable path gets range check right.. */
|
|
CHECK("/sbin", __getcwd(kbuf, 3), -1, ERANGE);
|
|
chdir("/etc/mtree");
|
|
CHECK("/etc/mtree", __getcwd(kbuf, sizeof(kbuf)), 11, 0);
|
|
CHECK("/etc/mtree", __getcwd(kbuf, sizeof(kbuf)), 11, 0);
|
|
/* mount point */
|
|
chdir("/usr/bin");
|
|
CHECK("/usr/bin", __getcwd(kbuf, sizeof(kbuf)), 9, 0);
|
|
|
|
/* really large (non-cacheable) entry name */
|
|
chdir("/tmp");
|
|
(void) rmdir(bigname);
|
|
mkdir(bigname, 0755);
|
|
chdir(bigname);
|
|
|
|
/* verify that non-cachable path gets range check right.. */
|
|
CHECK("/tmp/" bigname, __getcwd(kbuf, 10), -1, ERANGE);
|
|
CHECK("/tmp/" bigname, __getcwd(kbuf, sizeof(kbuf)), 40, 0);
|
|
|
|
if (rmdir("/tmp/" bigname) < 0) {
|
|
perror("rmdir");
|
|
}
|
|
CHECK("deleted directory", __getcwd(kbuf, sizeof(kbuf)), -1, ENOENT);
|
|
|
|
chdir("/tmp");
|
|
(void) rmdir(littlename);
|
|
mkdir(littlename, 0755);
|
|
chdir(littlename);
|
|
CHECK("/tmp/" littlename, __getcwd(kbuf, sizeof(kbuf)), 16, 0);
|
|
if (rename("/tmp/" littlename, "/tmp/" othername) < 0) {
|
|
perror("rename");
|
|
fail++;
|
|
}
|
|
CHECK("/tmp/" othername, __getcwd(kbuf, sizeof(kbuf)), 16, 0);
|
|
if (rmdir("/tmp/" othername) < 0) {
|
|
perror("rmdir");
|
|
fail++;
|
|
}
|
|
CHECK("deleted directory", __getcwd(kbuf, sizeof(kbuf)), -1, ENOENT);
|
|
|
|
mkdir("/tmp/bigdir", 0755);
|
|
for (i=0; i<nloops; i++) {
|
|
char buf[MAXPATHLEN];
|
|
snprintf(buf, MAXPATHLEN, "/tmp/bigdir/bigsubdirwithanamewhichistoolongtocache%04d", i);
|
|
(void)rmdir(buf);
|
|
if (mkdir (buf, 0755) < 0) {
|
|
perror("mkdir");
|
|
fail++;
|
|
break;
|
|
}
|
|
}
|
|
for (i=0; i<nloops; i++) {
|
|
char buf[MAXPATHLEN];
|
|
snprintf(buf, MAXPATHLEN, "/tmp/bigdir/bigsubdirwithanamewhichistoolongtocache%04d", i);
|
|
if (chdir(buf) < 0) {
|
|
perror("chdir");
|
|
fail++;
|
|
break;
|
|
}
|
|
CHECK(buf, __getcwd(kbuf, sizeof(kbuf)), strlen(buf)+1, 0);
|
|
}
|
|
for (i=0; i<nloops; i++) {
|
|
char buf[MAXPATHLEN];
|
|
snprintf(buf, MAXPATHLEN, "/tmp/bigdir/bigsubdirwithanamewhichistoolongtocache%04d", i);
|
|
(void)rmdir(buf);
|
|
}
|
|
(void)rmdir("/tmp/bigdir");
|
|
|
|
test___getcwd_perms();
|
|
test___getcwd_chroot();
|
|
}
|
|
|
|
|
|
void
|
|
stress_test_getcwd()
|
|
{
|
|
char buf[MAXPATHLEN];
|
|
char ubuf[MAXPATHLEN];
|
|
char kbuf[MAXPATHLEN];
|
|
printf("reading directories from stdin..\n");
|
|
while (fgets(buf, MAXPATHLEN, stdin)) {
|
|
char *cp = strrchr(buf, '\n');
|
|
if (cp) *cp = '\0';
|
|
|
|
if (chdir (buf) < 0) {
|
|
warn("Can't change directory to %s", buf);
|
|
continue;
|
|
}
|
|
|
|
|
|
cp = old_getcwd (ubuf, MAXPATHLEN);
|
|
if (strcmp(buf, ubuf) != 0) {
|
|
warnx("In %s, old_getcwd says %s\n",
|
|
buf, ubuf);
|
|
}
|
|
|
|
|
|
CHECK(buf, __getcwd (kbuf, MAXPATHLEN),
|
|
strlen(ubuf)+1, 0);
|
|
}
|
|
}
|
|
|
|
|
|
/*
|
|
* - large directories.
|
|
*
|
|
* - every single filesystem type
|
|
*
|
|
* - walk filesystem, compare sys_getcwd with getcwd for each
|
|
* directory
|
|
*/
|
|
|
|
void
|
|
usage(progname)
|
|
char *progname;
|
|
{
|
|
fprintf(stderr, "usage: %s [-srpvw] [-l nloops]\n", progname);
|
|
exit(1);
|
|
}
|
|
|
|
int run_stress = 0;
|
|
int run_regression = 0;
|
|
int run_performance = 0;
|
|
|
|
int
|
|
main(argc, argv)
|
|
int argc;
|
|
char **argv;
|
|
{
|
|
int ch;
|
|
char *progname = argv[0];
|
|
|
|
uid_from_user("nobody", &altid);
|
|
|
|
while ((ch = getopt(argc, argv, "srpvwl:u:")) != -1)
|
|
switch (ch) {
|
|
case 's':
|
|
run_stress++;
|
|
break;
|
|
case 'r':
|
|
run_regression++;
|
|
break;
|
|
case 'p':
|
|
run_performance++;
|
|
break;
|
|
case 'v':
|
|
verbose++;
|
|
break;
|
|
case 'w':
|
|
sleepflag++;
|
|
break;
|
|
case 'l':
|
|
nloops = atoi(optarg);
|
|
if (nloops == 0)
|
|
nloops = 100;
|
|
break;
|
|
case 'u':
|
|
if (uid_from_user(optarg, &altid) != 0) {
|
|
fprintf(stderr, "unknown user %s\n", optarg);
|
|
usage(progname);
|
|
exit(1);
|
|
}
|
|
break;
|
|
case '?':
|
|
default:
|
|
usage(progname);
|
|
}
|
|
if (argc != optind)
|
|
usage(progname);
|
|
|
|
if (run_regression)
|
|
test___getcwd();
|
|
|
|
if (!fail && run_performance)
|
|
test_speed();
|
|
|
|
if (!fail && run_stress)
|
|
stress_test_getcwd();
|
|
|
|
|
|
if (verbose)
|
|
printf ("%d passes\n", pass);
|
|
if (!fail)
|
|
exit (0);
|
|
else {
|
|
printf("%d failures\n", fail);
|
|
exit(1);
|
|
}
|
|
}
|
|
|
|
|