diff options
author | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-09-21 15:56:10 +0000 |
---|---|---|
committer | allen <allen@17b73243-c579-4c4c-a9d2-2d5706c11dac> | 2000-09-21 15:56:10 +0000 |
commit | b7f7a20ca4faabdb35648c69b5883fe6f81ef65e (patch) | |
tree | ca1e3a775bdec25f6e6e61bc2439e2205b60646f /src/util/File.c | |
parent | b7f8b54805f2cc6d7c8e59b6686d2ea4e1ed0a46 (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.c | 82 |
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 |