Changeset 135

Timestamp:

07/22/2009 09:06:18 PM (14 years ago)

Author:

marcus

Message:

r85 | svn | 2009-06-20 23:06:31 +0200 (Sa, 20 Jun 2009) | 1 line

fixed bug overwriting existing files

File:

• SH_SHM/trunk/source/seed_io/seed_tidy.c (modified) (3 diffs)

SH_SHM/trunk/source/seed_io/seed_tidy.c

@@ -112 +112 @@
 static void TdFixTbnames( char name[] );
 int TdQsortCompare( const void *d1, const void *d2 );
+static void TdUniqueFilename( char fname[] );
 
 
@@ -974 +975 @@
                                 nametime.min, chan );
                 } /*endif*/
+                TdUniqueFilename( fname );
                 recnum = 1;
                 fd = 1;
@@ -1010 +1012 @@
 
 
+
+/*---------------------------------------------------------------------------*/
+
+
+static void TdUniqueFilename( char fname[] )
+
+/* Adds counter to filename until a non existing filename is reached
+ *
+ * parameters of routine
+ * char      fname[];        modify; name to be checked/modified
+ */
+{
+        /* local variables */
+        int    cnt;                       /* counter */
+        FILE   *fp;                       /* file pointer */
+        char   fnamecopy[cBcFileLth+1];   /* copy of filename */
+
+        /* executable code */
+
+        /* if file does not exist, just leave everything unchanged and return */
+        fp = fopen( fname, "r" );
+        if  (fp == NULL)
+                return;
+
+        /* if file is already existing change it using a counter */
+        strcpy( fnamecopy, fname );
+        cnt = 1;
+        do {
+                fclose( fp );
+                sprintf( fname, "%s.%d", fnamecopy, cnt );
+                cnt++;
+                fp = fopen( fname, "r" );
+        } while (fp != NULL);
+
+} /* end of TdUniqueFilename */
 
 /*---------------------------------------------------------------------------*/