static char *
getpath(const char *name)
{
char *pathenv = NULL, *env;
const char *d;
int found;
char rpath[PATH_MAX];
if (strchr(name, '/') != NULL) {
strcpy(rpath, name);
if (is_there(rpath)) {
found = 1;
goto ret;
} else
return NULL;
}
if (getenv("PATH") == NULL)
return NULL;
pathenv = strdup(getenv("PATH"));
if (pathenv == NULL)
return NULL;
found = 0;
env = pathenv;
while ((d = strsep(&env, ":")) != NULL) {
if (*d == '\0')
d = ".";
if (snprintf(rpath, sizeof(rpath), "%s/%s", d, name) >=
(int)sizeof(rpath))
continue;
if (is_there(rpath)) {
found = 1;
break;
}
}
free(pathenv);
ret:
if (found) {
return realpath(rpath, prgname);
} else
return NULL;
}
static int
print_matches(char *path, char *filename)
{
char candidate[PATH_MAX];
const char *d;
int found;
if (strchr(filename, '/') != NULL)
return (is_there(filename) ? 0 : -1);
found = 0;
while ((d = strsep(&path, ":")) != NULL) {
if (*d == '\0')
d = ".";
if (snprintf(candidate, sizeof(candidate), "%s/%s", d,
filename) >= (int)sizeof(candidate))
continue;
if (is_there(candidate)) {
found = 1;
if (!allpaths)
break;
}
}
return (found ? 0 : -1);
}
int
get_match(char **pathabs, char **path, char *filename)
{
char candidate[PATH_MAX];
const char *d;
int len;
while ((d = strsep(path, ":")) != NULL) {
if (snprintf(candidate, sizeof(candidate), "%s/%s", d,
filename) >= (int)sizeof(candidate))
continue;
if (is_there(candidate)) {
len = strlen(candidate) + 1;
*pathabs = malloc(len);
if (*pathabs == NULL)
return (EX_OSERR);
strlcpy(*pathabs, candidate, len);
return (EX_OK);
}
}
return (EX_USAGE);
}
/* ------------------------------- */
int main(int ac, char **av)
{
int cc, i, t;
int Debug = 0;
char *tests = NULL;
static char *vers = "AFP3.2";
static char *uam = "Cleartxt Passwrd";
struct passwd *pw = getpwuid(getuid());
if (pw)
User = strdup(pw->pw_name);
while (( cc = getopt( ac, av, "t:vVgG345h:n:p:s:u:w:c:F:" )) != EOF ) {
switch ( cc ) {
case 't':
tests = strdup(optarg);
break;
case '3':
vers = "AFPX03";
Version = 30;
break;
case '4':
vers = "AFP3.1";
Version = 31;
break;
case '5':
vers = "AFP3.2";
Version = 32;
break;
case 'n':
Iterations = atoi(optarg);
break;
case 'h':
Server = strdup(optarg);
break;
case 's':
Vol = strdup(optarg);
break;
case 'u':
if (User)
free(User);
User = strdup(optarg);
break;
case 'w':
Password = strdup(optarg);
break;
case 'p' :
Port = atoi( optarg );
if (Port <= 0) {
fprintf(stdout, "Bad port.\n");
exit(1);
}
break;
case 'v':
Debug = 1;
break;
case 'V':
Verbose = 1;
break;
case 'g':
rwsize *= 10;
break;
case 'G':
rwsize *= 100;
break;
case 'F':
bigfilename = strdup(optarg);
break;
default :
usage( av[ 0 ] );
}
}
if (! Server)
usage( av[ 0 ] );
if (! Debug) {
Verbose = 0;
freopen("/dev/null", "w", stdout);
}
if ((User[0] == 0) || (Password[0] == 0))
uam = "No User Authent";
Iterations_save = Iterations;
results = calloc(Iterations * NUMTESTS, sizeof(unsigned long));
if (!tests) {
memset(teststorun, 1, NUMTESTS);
} else {
i = 0;
for (; tests[i]; i++) {
t = tests[i] - '1';
if ((t >= 0) && (t <= NUMTESTS))
teststorun[t] = 1;
}
if (teststorun[TEST_READ100MB] && !bigfilename)
teststorun[TEST_WRITE100MB] = 1;
if (teststorun[TEST_ENUM2000FILES])
teststorun[TEST_CREATE2000FILES] = 1;
}
if ((Conn = (CONN *)calloc(1, sizeof(CONN))) == NULL)
return 1;
Conn->type = Proto;
if (!Proto) {
int sock;
dsi = &Conn->dsi;
sock = OpenClientSocket(Server, Port);
if ( sock < 0) {
return 2;
}
dsi->protocol = DSI_TCPIP;
dsi->socket = sock;
}
Conn->afp_version = Version;
/* login */
if (Version >= 30)
ExitCode = ntohs(FPopenLoginExt(Conn, vers, uam, User, Password));
else
ExitCode = ntohs(FPopenLogin(Conn, vers, uam, User, Password));
vol = FPOpenVol(Conn, Vol);
if (vol == 0xffff) {
nottested();
}
int dir;
char testdir[MAXPATHLEN];
sprintf(testdir, "LanTest-%d", getpid());
if (FPGetFileDirParams(Conn, vol, DIRDID_ROOT, "", 0, (1<< DIRPBIT_DID)))
fatal_failed();
if (is_there(Conn, DIRDID_ROOT, testdir) == AFP_OK)
fatal_failed();
if (!(dir = FPCreateDir(Conn, vol, DIRDID_ROOT, testdir)))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, "", 0 , (1<< DIRPBIT_DID)))
fatal_failed();
if (is_there(Conn, DIRDID_ROOT, testdir) != AFP_OK)
fatal_failed();
while (Iterations--) {
run_test(dir);
}
FPDelete(Conn, vol, dir, "");
if (ExitCode != AFP_OK && ! Debug) {
if (!Debug)
printf("Error, ExitCode: %u. Run with -v to see what went wrong.\n", ExitCode);
goto exit;
}
displayresults();
exit:
if (Conn) FPLogOut(Conn);
return ExitCode;
}
/* ------------------------- */
void run_test(const int dir)
{
static char *data;
int i,maxi = 0;
int j, k;
int fork;
int test = 0;
int nowrite;
off_t offset;
struct async_io_req air;
static char temp[MAXPATHLEN];
numrw = rwsize / (dsi->server_quantum - FPWRITE_RQST_SIZE);
if (!data)
data = calloc(1, dsi->server_quantum);
/* --------------- */
/* Test (1) */
if (teststorun[TEST_OPENSTATREAD]) {
for (i=0; i <= smallfiles; i++) {
sprintf(temp, "File.small%d", i);
if (ntohl(AFPERR_NOOBJ) != is_there(Conn, dir, temp)) {
fatal_failed();
}
if (FPGetFileDirParams(Conn, vol, dir, "", 0, (1<< DIRPBIT_DID) )) {
fatal_failed();
}
if (FPCreateFile(Conn, vol, 0, dir , temp)){
fatal_failed();
}
if (is_there(Conn, dir, temp)) {
fatal_failed();
}
if (FPGetFileDirParams(Conn, vol, dir, temp,
(1<<FILPBIT_FNUM )|(1<<FILPBIT_PDID)|(1<<FILPBIT_FINFO)|
(1<<FILPBIT_CDATE)|(1<<FILPBIT_MDATE)|(1<<FILPBIT_DFLEN)|(1<<FILPBIT_RFLEN)
, 0)) {
fatal_failed();
}
if (FPGetFileDirParams(Conn, vol, dir, temp,
(1<<FILPBIT_FNUM )|(1<<FILPBIT_PDID)|(1<<FILPBIT_FINFO)|
(1<< DIRPBIT_ATTR)|(1<<DIRPBIT_BDATE)|
(1<<FILPBIT_CDATE)|(1<<FILPBIT_MDATE)|(1<<FILPBIT_DFLEN)|(1<<FILPBIT_RFLEN)
, 0)) {
fatal_failed();
}
fork = FPOpenFork(Conn, vol, OPENFORK_DATA ,
(1<<FILPBIT_PDID)|(1<< DIRPBIT_LNAME)|(1<<FILPBIT_FNUM)|(1<<FILPBIT_DFLEN)
, dir, temp, OPENACC_WR |OPENACC_RD| OPENACC_DWR| OPENACC_DRD);
if (!fork) {
fatal_failed();
}
if (FPGetForkParam(Conn, fork, (1<<FILPBIT_PDID)|(1<< DIRPBIT_LNAME)|(1<<FILPBIT_DFLEN))) {
fatal_failed();
}
if (FPWrite(Conn, fork, 0, 20480, data, 0 )) {
fatal_failed();
}
if (FPCloseFork(Conn,fork)) {fatal_failed();}
maxi = i;
}
if (FPEnumerate(Conn, vol, dir , "",
(1<<FILPBIT_LNAME) | (1<<FILPBIT_FNUM ) | (1<<FILPBIT_ATTR) | (1<<FILPBIT_FINFO)|
(1<<FILPBIT_CDATE) | (1<<FILPBIT_BDATE) | (1<<FILPBIT_MDATE) |
(1<<FILPBIT_DFLEN) | (1<<FILPBIT_RFLEN)
,
(1<< DIRPBIT_ATTR) | (1<<DIRPBIT_ATTR) | (1<<DIRPBIT_FINFO) |
(1<<DIRPBIT_CDATE) | (1<<DIRPBIT_BDATE) | (1<<DIRPBIT_MDATE) |
(1<< DIRPBIT_LNAME) | (1<< DIRPBIT_PDID) | (1<< DIRPBIT_DID)|(1<< DIRPBIT_ACCESS)
)) {
fatal_failed();
}
starttimer();
for (i=1; i <= maxi; i++) {
sprintf(temp, "File.small%d", i);
if (is_there(Conn, dir, temp)) {
fatal_failed();
}
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x72d,0)) {
fatal_failed();
}
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x73f, 0x133f )) {
fatal_failed();
}
fork = FPOpenFork(Conn, vol, OPENFORK_DATA , 0x342, dir, temp, OPENACC_RD);
if (!fork) {
fatal_failed();
}
if (FPGetForkParam(Conn, fork, (1<<FILPBIT_DFLEN))) {fatal_failed();}
if (FPRead(Conn, fork, 0, 512, data)) {fatal_failed();}
if (FPCloseFork(Conn,fork)) {fatal_failed();}
fork = FPOpenFork(Conn, vol, OPENFORK_DATA , 0x342 , dir, temp,OPENACC_RD| OPENACC_DWR);
if (!fork) {
fatal_failed();
}
if (FPGetForkParam(Conn, fork, 0x242)) {fatal_failed();}
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x72d,0)) {
fatal_failed();
}
if (FPCloseFork(Conn,fork)) {fatal_failed();}
}
stoptimer();
addresult(TEST_OPENSTATREAD, Iterations);
/* ---------------- */
for (i=0; i <= maxi; i++) {
sprintf(temp, "File.small%d", i);
if (is_there(Conn, dir, temp)) {
fatal_failed();
}
if (FPGetFileDirParams(Conn, vol, dir, temp, 0, (1<< FILPBIT_FNUM) )) {
fatal_failed();
}
if (FPDelete(Conn, vol, dir, temp)) {fatal_failed();}
}
if (FPGetVolParam(Conn, vol, (1 << VOLPBIT_MDATE )|(1 << VOLPBIT_XBFREE))) {
fatal_failed();
}
}
/* -------- */
/* Test (2) */
if (teststorun[TEST_WRITE100MB]) {
strcpy(temp, "File.big");
if (FPCreateFile(Conn, vol, 0, dir , temp)){
failed();
goto fin1;
}
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x72d,0))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x73f, 0x133f ))
fatal_failed();
fork = FPOpenFork(Conn, vol, OPENFORK_DATA ,
(1<<FILPBIT_PDID)|(1<<FILPBIT_FNUM)|(1<<FILPBIT_DFLEN)
,dir, temp, OPENACC_WR |OPENACC_RD| OPENACC_DWR| OPENACC_DRD);
if (!fork)
fatal_failed();
if (FPGetForkParam(Conn, fork, (1<<FILPBIT_PDID)))
fatal_failed();
air.air_count = numrw;
air.air_size = FPWRITE_RPLY_SIZE;
(void)pthread_create(&tid, NULL, rply_thread, &air);
starttimer();
for (i = 0, offset = 0; i < numrw; offset += (dsi->server_quantum - FPWRITE_RQST_SIZE), i++) {
if (FPWrite_ext_async(Conn, fork, offset, dsi->server_quantum - FPWRITE_RQST_SIZE, data, 0))
fatal_failed();
}
pthread_join(tid, NULL);
if (FPCloseFork(Conn,fork))
fatal_failed();
stoptimer();
addresult(TEST_WRITE100MB, Iterations);
}
/* -------- */
/* Test (3) */
if (teststorun[TEST_READ100MB]) {
if (!bigfilename) {
if (is_there(Conn, dir, temp) != AFP_OK)
fatal_failed();
fork = FPOpenFork(Conn, vol, OPENFORK_DATA, 0x342, dir, temp,
OPENACC_RD|OPENACC_DWR);
} else {
if (is_there(Conn, DIRDID_ROOT, bigfilename) != AFP_OK)
fatal_failed();
fork = FPOpenFork(Conn, vol, OPENFORK_DATA, 0x342, DIRDID_ROOT, bigfilename,
OPENACC_RD|OPENACC_DWR);
}
if (!fork)
fatal_failed();
if (FPGetForkParam(Conn, fork, 0x242))
fatal_failed();
air.air_count = numrw;
air.air_size = (dsi->server_quantum - FPWRITE_RQST_SIZE) + 16;
(void)pthread_create(&tid, NULL, rply_thread, &air);
starttimer();
for (i=0; i < numrw ; i++) {
if (FPRead_ext_async(Conn, fork, i * (dsi->server_quantum - FPWRITE_RQST_SIZE), dsi->server_quantum - FPWRITE_RQST_SIZE, data)) {
fatal_failed();
}
}
pthread_join(tid, NULL);
if (FPCloseFork(Conn,fork))
fatal_failed();
stoptimer();
addresult(TEST_READ100MB, Iterations);
}
/* Remove test 2+3 testfile */
if (teststorun[TEST_WRITE100MB])
FPDelete(Conn, vol, dir, "File.big");
/* -------- */
/* Test (4) */
if (teststorun[TEST_LOCKUNLOCK]) {
strcpy(temp, "File.lock");
if (ntohl(AFPERR_NOOBJ) != is_there(Conn, dir, temp))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, "", 0, (1<< DIRPBIT_DID) ))
fatal_failed();
if (FPCreateFile(Conn, vol, 0, dir , temp))
fatal_failed();
if (is_there(Conn, dir, temp))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, temp,
(1<<FILPBIT_FNUM )|(1<<FILPBIT_PDID)|(1<<FILPBIT_FINFO)|
(1<<FILPBIT_CDATE)|(1<<FILPBIT_DFLEN)|(1<<FILPBIT_RFLEN)
, 0))
fatal_failed();
fork = FPOpenFork(Conn, vol, OPENFORK_DATA ,
(1<<FILPBIT_PDID)|(1<<FILPBIT_FNUM)|(1<<FILPBIT_DFLEN)
, dir, temp, OPENACC_WR|OPENACC_RD|OPENACC_DWR|OPENACC_DRD);
if (!fork)
fatal_failed();
if (FPGetForkParam(Conn, fork, (1<<FILPBIT_PDID)|(1<<FILPBIT_DFLEN)))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, temp,
(1<< DIRPBIT_ATTR)|(1<<FILPBIT_CDATE)|(1<<FILPBIT_MDATE)|
(1<<FILPBIT_FNUM)|
(1<<FILPBIT_FINFO)|(1<<FILPBIT_DFLEN)|(1<<FILPBIT_RFLEN)
, 0))
fatal_failed();
if (FPWrite(Conn, fork, 0, 40000, data, 0 ))
fatal_failed();
if (FPCloseFork(Conn,fork))
fatal_failed();
if (is_there(Conn, dir, temp))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x73f, 0x133f))
fatal_failed();
fork = FPOpenFork(Conn, vol, OPENFORK_DATA , 0x342 , dir, temp,OPENACC_RD);
if (!fork)
fatal_failed();
if (FPGetForkParam(Conn, fork, (1<<FILPBIT_DFLEN))) {fatal_failed();}
if (FPRead(Conn, fork, 0, 512, data)) {fatal_failed();}
if (FPCloseFork(Conn,fork)) {fatal_failed();}
fork = FPOpenFork(Conn, vol, OPENFORK_DATA, 0x342, dir, temp,
OPENACC_RD|OPENACC_WR);
if (!fork)
fatal_failed();
if (FPGetForkParam(Conn, fork, 0x242))
fatal_failed();
if (FPGetFileDirParams(Conn, vol, dir, temp, 0x72d, 0))
fatal_failed();
starttimer();
for (j = 0; j < locking; j++) {
for (i = 0;i <= 390; i += 10) {
if (FPByteLock(Conn, fork, 0, 0 , i , 10)) {fatal_failed();}
if (FPByteLock(Conn, fork, 0, 1 , i , 10)) {fatal_failed();}
}
}
stoptimer();
addresult(TEST_LOCKUNLOCK, Iterations);
if (is_there(Conn, dir, temp)) {fatal_failed();}
if (FPCloseFork(Conn,fork)) {fatal_failed();}
if (FPDelete(Conn, vol, dir, "File.lock")) {fatal_failed();}
}
/* -------- */
/* Test (5) */
if (teststorun[TEST_CREATE2000FILES]) {
starttimer();
for (i=1; i <= create_enum_files; i++) {
sprintf(temp, "File.0k%d", i);
if (FPCreateFile(Conn, vol, 0, dir , temp)){
fatal_failed();
break;
}
if (FPGetFileDirParams(Conn, vol, dir, temp,
(1<<FILPBIT_FNUM )|(1<<FILPBIT_PDID)|(1<<FILPBIT_FINFO)|
(1<<FILPBIT_CDATE)|(1<<FILPBIT_DFLEN)|(1<<FILPBIT_RFLEN)
, 0) != AFP_OK)
fatal_failed();
}
maxi = i;
stoptimer();
addresult(TEST_CREATE2000FILES, Iterations);
}
/* -------- */
/* Test (6) */
if (teststorun[TEST_ENUM2000FILES]) {
starttimer();
if (FPEnumerateFull(Conn, vol, 1, 40, DSI_DATASIZ, dir , "",
(1<<FILPBIT_LNAME) | (1<<FILPBIT_FNUM ) | (1<<FILPBIT_ATTR) |
(1<<FILPBIT_FINFO) | (1<<FILPBIT_CDATE) | (1<<FILPBIT_BDATE)|
(1<<FILPBIT_MDATE) | (1<<FILPBIT_DFLEN) | (1<<FILPBIT_RFLEN)
,
(1<< DIRPBIT_ATTR) | (1<<DIRPBIT_ATTR) | (1<<DIRPBIT_FINFO)|
(1<<DIRPBIT_CDATE) | (1<<DIRPBIT_BDATE) | (1<<DIRPBIT_MDATE)|
(1<< DIRPBIT_LNAME) | (1<< DIRPBIT_PDID) | (1<< DIRPBIT_DID)|
(1<< DIRPBIT_ACCESS)))
fatal_failed();
for (i=41; (i + 40) < create_enum_files; i +=80) {
if (FPEnumerateFull(Conn, vol, i + 40, 40, DSI_DATASIZ, dir , "",
(1<<FILPBIT_LNAME) | (1<<FILPBIT_FNUM ) | (1<<FILPBIT_ATTR) |
(1<<FILPBIT_FINFO) | (1<<FILPBIT_CDATE) | (1<<FILPBIT_BDATE)|
(1<<FILPBIT_MDATE) | (1<<FILPBIT_DFLEN) | (1<<FILPBIT_RFLEN)
,
(1<< DIRPBIT_ATTR) | (1<<DIRPBIT_ATTR) | (1<<DIRPBIT_FINFO)|
(1<<DIRPBIT_CDATE) | (1<<DIRPBIT_BDATE) | (1<<DIRPBIT_MDATE)|
(1<< DIRPBIT_LNAME) | (1<< DIRPBIT_PDID) | (1<< DIRPBIT_DID)|
(1<< DIRPBIT_ACCESS)))
fatal_failed();
if (FPEnumerateFull(Conn, vol, i, 40, DSI_DATASIZ, dir , "",
(1<<FILPBIT_LNAME) | (1<<FILPBIT_FNUM ) | (1<<FILPBIT_ATTR) |
(1<<FILPBIT_FINFO) | (1<<FILPBIT_CDATE) | (1<<FILPBIT_BDATE)|
(1<<FILPBIT_MDATE) | (1<<FILPBIT_DFLEN) | (1<<FILPBIT_RFLEN)
,
(1<< DIRPBIT_ATTR) | (1<<DIRPBIT_ATTR) | (1<<DIRPBIT_FINFO)|
(1<<DIRPBIT_CDATE) | (1<<DIRPBIT_BDATE) | (1<<DIRPBIT_MDATE)|
(1<< DIRPBIT_LNAME) | (1<< DIRPBIT_PDID) | (1<< DIRPBIT_DID)|
(1<< DIRPBIT_ACCESS)))
fatal_failed();
}
stoptimer();
addresult(TEST_ENUM2000FILES, Iterations);
}
/* Delete files from Test (5/6) */
if (teststorun[TEST_CREATE2000FILES]) {
for (i=1; i < maxi; i++) {
sprintf(temp, "File.0k%d", i);
if (FPDelete(Conn, vol, dir, temp))
fatal_failed();
}
}
/* -------- */
/* Test (7) */
if (teststorun[TEST_DIRTREE]) {
uint32_t idirs[DIRNUM];
uint32_t jdirs[DIRNUM][DIRNUM];
uint32_t kdirs[DIRNUM][DIRNUM][DIRNUM];
starttimer();
for (i=0; i < DIRNUM; i++) {
sprintf(temp, "dir%02u", i+1);
FAILEXIT(!(idirs[i] = FPCreateDir(Conn,vol, dir, temp)), fin1);
for (j=0; j < DIRNUM; j++) {
sprintf(temp, "dir%02u", j+1);
FAILEXIT(!(jdirs[i][j] = FPCreateDir(Conn,vol, idirs[i], temp)), fin1);
for (k=0; k < DIRNUM; k++) {
sprintf(temp, "dir%02u", k+1);
FAILEXIT(!(kdirs[i][j][k] = FPCreateDir(Conn,vol, jdirs[i][j], temp)), fin1);
}
}
}
stoptimer();
addresult(TEST_DIRTREE, Iterations);
for (i=0; i < DIRNUM; i++) {
for (j=0; j < DIRNUM; j++) {
for (k=0; k < DIRNUM; k++) {
FAILEXIT(FPDelete(Conn,vol, kdirs[i][j][k], "") != 0, fin1);
}
FAILEXIT(FPDelete(Conn,vol, jdirs[i][j], "") != 0, fin1);
}
FAILEXIT(FPDelete(Conn,vol, idirs[i], "") != 0, fin1);
}
}
fin1:
fin:
return;
}
