1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
/*
* $Id: chdir.c,v 1.1 2005/03/31 13:12:59 baud Exp $
*/
/*
* Copyright (C) 2001-2002 by CERN/IT/PDP/DM
* All rights reserved
*/
#ifndef lint
static char sccsid[] = "@(#)$RCSfile: chdir.c,v $ $Revision: 1.1 $ $Date: 2005/03/31 13:12:59 $ CERN/IT/PDP/DM Jean-Philippe Baud";
#endif /* not lint */
/* chdir.c Remote File I/O - change working directory */
#define RFIO_KERNEL 1 /* KERNEL part of the routines */
#include "rfio.h" /* Remote File I/O general definitions */
int DLL_DECL rfio_chdir(dirpath)
char *dirpath; /* directory path */
{
char *filename;
char *host;
int rc;
int parserc;
INIT_TRACE("RFIO_TRACE");
TRACE(1, "rfio", "rfio_chdir(%s)", dirpath);
if (!(parserc = rfio_parseln(dirpath, &host, &filename, NORDLINKS))) {
/* if not a remote file, must be local or HSM */
if ( host != NULL ) {
/*
* HSM file
*/
TRACE(1, "rfio", "rfio_chdir: %s is an HSM path", filename);
END_TRACE();
rfio_errno = 0;
if ( (rc = rfio_HsmIf_chdir(filename)) == 0 )
rfio_HsmIf_SetCwdServer(host);
return(rc);
}
TRACE(1, "rfio", "rfio_chdir: using local chdir(%s)", filename);
END_TRACE();
rfio_errno = 0;
if ( (rc = chdir(filename)) == 0 )
rfio_HsmIf_SetCwdType(0);
else
serrno = 0;
return(rc);
}
if (parserc < 0) {
END_TRACE();
return(-1);
}
END_TRACE();
rfio_errno = 0;
serrno = SEOPNOTSUP;
return (-1);
}
|
