[commit: packages/Win32] Mistuke-fix-build, depend-os-windows, fix-appveyor-curl-ussue, master, win32-2.5.4.1-ghc-8.2, win32-prepare-release-2.4.0.0: Win32: Added file access rights (84b9663)
git at git.haskell.org
git at git.haskell.org
Mon Apr 17 21:27:29 UTC 2017
- Previous message: [commit: packages/Win32] Mistuke-fix-build, depend-os-windows, fix-appveyor-curl-ussue, master, win32-2.5.4.1-ghc-8.2, win32-prepare-release-2.4.0.0: Win32: Updated readme documentation (7afacde)
- Next message: [commit: packages/Win32] Mistuke-fix-build, depend-os-windows, fix-appveyor-curl-ussue, master, win32-2.5.4.1-ghc-8.2, win32-prepare-release-2.4.0.0: Merge pull request #50 from Mistuke/win32-add-file-access-rights (bf19ad4)
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
Repository : ssh://git@git.haskell.org/Win32
On branches: Mistuke-fix-build,depend-os-windows,fix-appveyor-curl-ussue,master,win32-2.5.4.1-ghc-8.2,win32-prepare-release-2.4.0.0
Link : http://git.haskell.org/packages/Win32.git/commitdiff/84b96632627f758f8af96c340a161b138dae9cde
>---------------------------------------------------------------
commit 84b96632627f758f8af96c340a161b138dae9cde
Author: Tamar Christina <tamar at zhox.com>
Date: Thu Jun 16 13:13:15 2016 +0200
Win32: Added file access rights
>---------------------------------------------------------------
84b96632627f758f8af96c340a161b138dae9cde
System/Win32/File.hsc | 49 ++++++++++++++++++++++++++++++++-----------------
changelog.md | 1 +
2 files changed, 33 insertions(+), 17 deletions(-)
diff --git a/System/Win32/File.hsc b/System/Win32/File.hsc
index 7b13a01..48f728a 100644
--- a/System/Win32/File.hsc
+++ b/System/Win32/File.hsc
@@ -47,23 +47,38 @@ gENERIC_NONE :: AccessMode
gENERIC_NONE = 0
#{enum AccessMode,
- , gENERIC_READ = GENERIC_READ
- , gENERIC_WRITE = GENERIC_WRITE
- , gENERIC_EXECUTE = GENERIC_EXECUTE
- , gENERIC_ALL = GENERIC_ALL
- , dELETE = DELETE
- , rEAD_CONTROL = READ_CONTROL
- , wRITE_DAC = WRITE_DAC
- , wRITE_OWNER = WRITE_OWNER
- , sYNCHRONIZE = SYNCHRONIZE
- , sTANDARD_RIGHTS_REQUIRED = STANDARD_RIGHTS_REQUIRED
- , sTANDARD_RIGHTS_READ = STANDARD_RIGHTS_READ
- , sTANDARD_RIGHTS_WRITE = STANDARD_RIGHTS_WRITE
- , sTANDARD_RIGHTS_EXECUTE = STANDARD_RIGHTS_EXECUTE
- , sTANDARD_RIGHTS_ALL = STANDARD_RIGHTS_ALL
- , sPECIFIC_RIGHTS_ALL = SPECIFIC_RIGHTS_ALL
- , aCCESS_SYSTEM_SECURITY = ACCESS_SYSTEM_SECURITY
- , mAXIMUM_ALLOWED = MAXIMUM_ALLOWED
+ , gENERIC_READ = GENERIC_READ
+ , gENERIC_WRITE = GENERIC_WRITE
+ , gENERIC_EXECUTE = GENERIC_EXECUTE
+ , gENERIC_ALL = GENERIC_ALL
+ , dELETE = DELETE
+ , rEAD_CONTROL = READ_CONTROL
+ , wRITE_DAC = WRITE_DAC
+ , wRITE_OWNER = WRITE_OWNER
+ , sYNCHRONIZE = SYNCHRONIZE
+ , sTANDARD_RIGHTS_REQUIRED = STANDARD_RIGHTS_REQUIRED
+ , sTANDARD_RIGHTS_READ = STANDARD_RIGHTS_READ
+ , sTANDARD_RIGHTS_WRITE = STANDARD_RIGHTS_WRITE
+ , sTANDARD_RIGHTS_EXECUTE = STANDARD_RIGHTS_EXECUTE
+ , sTANDARD_RIGHTS_ALL = STANDARD_RIGHTS_ALL
+ , sPECIFIC_RIGHTS_ALL = SPECIFIC_RIGHTS_ALL
+ , aCCESS_SYSTEM_SECURITY = ACCESS_SYSTEM_SECURITY
+ , mAXIMUM_ALLOWED = MAXIMUM_ALLOWED
+ , fILE_ADD_FILE = FILE_ADD_FILE
+ , fILE_ADD_SUBDIRECTORY = FILE_ADD_SUBDIRECTORY
+ , fILE_ALL_ACCESS = FILE_ALL_ACCESS
+ , fILE_APPEND_DATA = FILE_APPEND_DATA
+ , fILE_CREATE_PIPE_INSTANCE = FILE_CREATE_PIPE_INSTANCE
+ , fILE_DELETE_CHILD = FILE_DELETE_CHILD
+ , fILE_EXECUTE = FILE_EXECUTE
+ , fILE_LIST_DIRECTORY = FILE_LIST_DIRECTORY
+ , fILE_READ_ATTRIBUTES = FILE_READ_ATTRIBUTES
+ , fILE_READ_DATA = FILE_READ_DATA
+ , fILE_READ_EA = FILE_READ_EA
+ , fILE_TRAVERSE = FILE_TRAVERSE
+ , fILE_WRITE_ATTRIBUTES = FILE_WRITE_ATTRIBUTES
+ , fILE_WRITE_DATA = FILE_WRITE_DATA
+ , fILE_WRITE_EA = FILE_WRITE_EA
}
----------------------------------------------------------------
diff --git a/changelog.md b/changelog.md
index fd55c6c..438539e 100644
--- a/changelog.md
+++ b/changelog.md
@@ -8,3 +8,4 @@
* Added function `getUserName`
* Added file attribute `fILE_ATTRIBUTE_REPARSE_POINT`
+* Added more [`File Access Rights` constants](https://msdn.microsoft.com/en-us/library/windows/desktop/gg258116%28v=vs.85%29.aspx)
\ No newline at end of file
- Previous message: [commit: packages/Win32] Mistuke-fix-build, depend-os-windows, fix-appveyor-curl-ussue, master, win32-2.5.4.1-ghc-8.2, win32-prepare-release-2.4.0.0: Win32: Updated readme documentation (7afacde)
- Next message: [commit: packages/Win32] Mistuke-fix-build, depend-os-windows, fix-appveyor-curl-ussue, master, win32-2.5.4.1-ghc-8.2, win32-prepare-release-2.4.0.0: Merge pull request #50 from Mistuke/win32-add-file-access-rights (bf19ad4)
- Messages sorted by:
[ date ]
[ thread ]
[ subject ]
[ author ]
More information about the ghc-commits
mailing list