summaryrefslogtreecommitdiff
path: root/src/util/File.c
diff options
context:
space:
mode:
authorallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>2000-09-21 15:56:10 +0000
committerallen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac>2000-09-21 15:56:10 +0000
commitb7f7a20ca4faabdb35648c69b5883fe6f81ef65e (patch)
treeca1e3a775bdec25f6e6e61bc2439e2205b60646f /src/util/File.c
parentb7f8b54805f2cc6d7c8e59b6686d2ea4e1ed0a46 (diff)
Removed deprecated CCTK_mkdir
git-svn-id: http://svn.cactuscode.org/flesh/trunk@1835 17b73243-c579-4c4c-a9d2-2d5706c11dac
Diffstat (limited to 'src/util/File.c')
-rw-r--r--src/util/File.c82
1 files changed, 0 insertions, 82 deletions
diff --git a/src/util/File.c b/src/util/File.c
index 4153671c..f01ccc3a 100644
--- a/src/util/File.c
+++ b/src/util/File.c
@@ -44,88 +44,6 @@ CCTK_FILEVERSION(util_File_c)
int CCTK_CreateDirectory(int mode,const char *pathname);
-/* DEPRECATED IN BETA 9 */
-
- /*@@
- @routine CCTK_mkdir
- @date September 6th 1999
- @author Gabrielle Allen
- @desc
- Create a directory, if we haven't already tried
- to create it.
- @enddesc
- @var dir
- @vdesc directory name to create
- @vtype const char *
- @vio in
- @endvar
-
- @returntype int
- @returndesc negative: failed to create dir for some reason
- 0 dir was successfully created
- positive directory already exists
- @endreturndesc
-
- @@*/
-
-int CCTK_mkdir(const char *dir)
-{
-
- int retval;
-
-#if 0
-
- struct stat statbuf;
- char *command;
-
- if(stat(dir, &statbuf) == 0)
- return(S_ISDIR(statbuf.st_mode) ? +1 : -1);
-
- command = (char *) malloc(strlen(MKDIR MKDIRFLAGS) + strlen(dir) + 2);
-
- /***
- TR 13/09/99: disabled use of MKDIRFLAGS until it also works for NT
- This means either
- - we make sure to always use the bash's mkdir command (which accepts
- option '-p')
- - call the dos shell with MKDIRFLAGS set to an empty string
- - use the POSIX mkdir routine
- The disadvantage for calling mkdir without '-p' under UNIX is now
- that we can always create one subdirectory only which needs to be
- relative to an existing directory.
- ***/
-#if 0
- sprintf(command, MKDIR MKDIRFLAGS " %s",dir);
-#else
- sprintf(command, MKDIR " %s",dir);
-#endif
-
- CCTK_VInfo("Cactus","Creating directory: \"%s\"",command);
-
- /*** FIXME: not sure what a successful system call looks like
- across all architecures - ignore for now
- and set zero for Cactus success ***/
- retval = system(command);
-
- free(command);
-
- retval = 0;
-#endif
-
- retval = CCTK_CreateDirectory(0755, dir);
-
- return retval;
-
-}
-
-void CCTK_FCALL CCTK_FNAME(CCTK_mkdir)
- (int *ierr, ONE_FORTSTRING_ARG)
-{
- ONE_FORTSTRING_CREATE(arg1)
- *ierr = CCTK_mkdir(arg1);
- free(arg1);
-}
-/* END DEPRECATED IN BETA 9 */
/*@@
@routine CCTK_CreateDirectory