commit 5dda1f7e2cb7cf52f52c31099c680ff37d3456e5
author Bernhard Rosenkraenzer <bero@redhat.de> Mon Jul 23 18:09:41 2001 +0000
committer Alexandre Julliard <julliard@winehq.org> Mon Jul 23 18:09:41 2001 +0000
tree 6380cd91f5b6ff10e78e25ea3b5328aac82b5807
parent ff584e4d9c5ef84a78443366e0edf0ab5a5e74eb

Set executable permissions when creating .exe/.com files.

files/file.c

diff --git a/files/file.c b/files/file.c
index cf9c8f6..83fdf71 100644
--- a/files/file.c
+++ b/files/file.c
@@ -1938,6 +1938,17 @@
 }
 
 
+/* check if a file name is for an executable file (.exe or .com) */
+inline static BOOL is_executable( const char *name )
+{
+    int len = strlen(name);
+
+    if (len < 4) return FALSE;
+    return (!strcasecmp( name + len - 4, ".exe" ) ||
+            !strcasecmp( name + len - 4, ".com" ));
+}
+
+
 /**************************************************************************
  *           MoveFileExA   (KERNEL32.@)
  */
@@ -1992,6 +2003,19 @@
             FILE_SetDosError();
             return FALSE;
 	}
+        if (is_executable( full_name1.long_name ) != is_executable( full_name2.long_name ))
+        {
+            struct stat fstat;
+            if (stat( full_name2.long_name, &fstat ) != -1)
+            {
+                if (is_executable( full_name2.long_name ))
+                    /* set executable bit where read bit is set */
+                    fstat.st_mode |= (fstat.st_mode & 0444) >> 2;
+                else
+                    fstat.st_mode &= ~0111;
+                chmod( full_name2.long_name, fstat.st_mode );
+            }
+        }
         return TRUE;
     }
     else /* fn2 == NULL means delete source */
@@ -2045,41 +2069,34 @@
     DOS_FULL_NAME full_name1, full_name2;
     struct stat fstat;
 
-
     TRACE("(%s,%s)\n", fn1, fn2 );
 
     if (!DOSFS_GetFullName( fn1, TRUE, &full_name1 )) return FALSE;
     if (DOSFS_GetFullName( fn2, TRUE, &full_name2 ))  {
-      /* The new name must not already exist */ 
+      /* The new name must not already exist */
       SetLastError(ERROR_ALREADY_EXISTS);
       return FALSE;
     }
     if (!DOSFS_GetFullName( fn2, FALSE, &full_name2 )) return FALSE;
 
     if (full_name1.drive == full_name2.drive) /* move */
-    if (rename( full_name1.long_name, full_name2.long_name ) == -1)
+        return MoveFileExA( fn1, fn2, MOVEFILE_COPY_ALLOWED );
+
+    /* copy */
+    if (stat( full_name1.long_name, &fstat ))
     {
+        WARN("Invalid source file %s\n",
+             full_name1.long_name);
         FILE_SetDosError();
         return FALSE;
     }
-      else return TRUE;
-    else /*copy */ {
-      if (stat(  full_name1.long_name, &fstat ))
-	{
-	  WARN("Invalid source file %s\n",
-			full_name1.long_name);
-	  FILE_SetDosError();
-	  return FALSE;
-	}
-      if (S_ISDIR(fstat.st_mode)) {
-	/* No Move for directories across file systems */
-	/* FIXME: Use right error code */
-	SetLastError( ERROR_GEN_FAILURE );
-	return FALSE;
-      }
-      else
-	return CopyFileA(fn1, fn2, TRUE); /*fail, if exist */ 
+    if (S_ISDIR(fstat.st_mode)) {
+        /* No Move for directories across file systems */
+        /* FIXME: Use right error code */
+        SetLastError( ERROR_GEN_FAILURE );
+        return FALSE;
     }
+    return CopyFileA(fn1, fn2, TRUE); /*fail, if exist */
 }