MINIZIP: use windows specific os support on windows
[spectmorph.git] / 3rdparty / minizip / mz_strm_os_win32.c
1 /* mz_strm_win32.c -- Stream for filesystem access for windows
2    Version 2.8.1, December 1, 2018
3    part of the MiniZip project
4
5    Copyright (C) 2010-2018 Nathan Moinvaziri
6      https://github.com/nmoinvaz/minizip
7    Copyright (C) 2009-2010 Mathias Svensson
8      Modifications for Zip64 support
9      http://result42.com
10    Copyright (C) 1998-2010 Gilles Vollant
11      https://www.winimage.com/zLibDll/minizip.html
12
13    This program is distributed under the terms of the same license as zlib.
14    See the accompanying LICENSE file for the full text of the license.
15 */
16
17
18 #include "mz.h"
19 #include "mz_os.h"
20 #include "mz_strm.h"
21 #include "mz_strm_os.h"
22
23 #include <windows.h>
24
25 /***************************************************************************/
26
27 #ifndef INVALID_HANDLE_VALUE
28 #  define INVALID_HANDLE_VALUE (0xFFFFFFFF)
29 #endif
30
31 #ifndef INVALID_SET_FILE_POINTER
32 #  define INVALID_SET_FILE_POINTER ((DWORD)-1)
33 #endif
34
35 #if defined(WINAPI_FAMILY_ONE_PARTITION) && !defined(MZ_WINRT_API)
36 #  if WINAPI_FAMILY_ONE_PARTITION(WINAPI_FAMILY, WINAPI_PARTITION_APP)
37 #    define MZ_WINRT_API 1
38 #  endif
39 #endif
40
41 /***************************************************************************/
42
43 static mz_stream_vtbl mz_stream_os_vtbl = {
44     mz_stream_os_open,
45     mz_stream_os_is_open,
46     mz_stream_os_read,
47     mz_stream_os_write,
48     mz_stream_os_tell,
49     mz_stream_os_seek,
50     mz_stream_os_close,
51     mz_stream_os_error,
52     mz_stream_os_create,
53     mz_stream_os_delete,
54     NULL,
55     NULL
56 };
57
58 /***************************************************************************/
59
60 typedef struct mz_stream_win32_s
61 {
62     mz_stream       stream;
63     HANDLE          handle;
64     int32_t         error;
65 } mz_stream_win32;
66
67 /***************************************************************************/
68
69 #if 0
70 #  define mz_stream_os_print printf
71 #else
72 #  define mz_stream_os_print(fmt,...)
73 #endif
74
75 /***************************************************************************/
76
77 int32_t mz_stream_os_open(void *stream, const char *path, int32_t mode)
78 {
79     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
80     uint32_t desired_access = 0;
81     uint32_t creation_disposition = 0;
82     uint32_t share_mode = FILE_SHARE_READ;
83     uint32_t flags_attribs = FILE_ATTRIBUTE_NORMAL;
84     wchar_t *path_wide = NULL;
85
86
87     if (path == NULL)
88         return MZ_PARAM_ERROR;
89
90     /* Some use cases require write sharing as well */
91     share_mode |= FILE_SHARE_WRITE;
92
93     if ((mode & MZ_OPEN_MODE_READWRITE) == MZ_OPEN_MODE_READ)
94     {
95         desired_access = GENERIC_READ;
96         creation_disposition = OPEN_EXISTING;
97     }
98     else if (mode & MZ_OPEN_MODE_APPEND)
99     {
100         desired_access = GENERIC_WRITE | GENERIC_READ;
101         creation_disposition = OPEN_EXISTING;
102     }
103     else if (mode & MZ_OPEN_MODE_CREATE)
104     {
105         desired_access = GENERIC_WRITE | GENERIC_READ;
106         creation_disposition = CREATE_ALWAYS;
107     }
108     else
109     {
110         return MZ_PARAM_ERROR;
111     }
112
113     mz_stream_os_print("Win32 - Open - %s (mode %"PRId32")\n", path);
114
115     path_wide = mz_os_unicode_string_create(path, MZ_ENCODING_UTF8);
116     if (path_wide == NULL)
117         return MZ_PARAM_ERROR;
118
119 #ifdef MZ_WINRT_API
120     win32->handle = CreateFile2W(path_wide, desired_access, share_mode, 
121         creation_disposition, NULL);
122 #else
123     win32->handle = CreateFileW(path_wide, desired_access, share_mode, NULL, 
124         creation_disposition, flags_attribs, NULL);
125 #endif
126
127     mz_os_unicode_string_delete(&path_wide);
128
129     if (mz_stream_os_is_open(stream) != MZ_OK)
130     {
131         win32->error = GetLastError();
132         return MZ_OPEN_ERROR;
133     }
134
135     if (mode & MZ_OPEN_MODE_APPEND)
136         return mz_stream_os_seek(stream, 0, MZ_SEEK_END);
137
138     return MZ_OK;
139 }
140
141 int32_t mz_stream_os_is_open(void *stream)
142 {
143     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
144     if (win32->handle == NULL || win32->handle == INVALID_HANDLE_VALUE)
145         return MZ_OPEN_ERROR;
146     return MZ_OK;
147 }
148
149 int32_t mz_stream_os_read(void *stream, void *buf, int32_t size)
150 {
151     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
152     uint32_t read = 0;
153
154     if (mz_stream_os_is_open(stream) != MZ_OK)
155         return MZ_OPEN_ERROR;
156
157     if (!ReadFile(win32->handle, buf, size, (DWORD *)&read, NULL))
158     {
159         win32->error = GetLastError();
160         if (win32->error == ERROR_HANDLE_EOF)
161             win32->error = 0;
162     }
163
164     mz_stream_os_print("Win32 - Read - %"PRId32"\n", read);
165
166     return read;
167 }
168
169 int32_t mz_stream_os_write(void *stream, const void *buf, int32_t size)
170 {
171     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
172     int32_t written = 0;
173
174     if (mz_stream_os_is_open(stream) != MZ_OK)
175         return MZ_OPEN_ERROR;
176
177     if (!WriteFile(win32->handle, buf, size, (DWORD *)&written, NULL))
178     {
179         win32->error = GetLastError();
180         if (win32->error == ERROR_HANDLE_EOF)
181             win32->error = 0;
182     }
183
184     mz_stream_os_print("Win32 - Write - %"PRId32"\n", written);
185
186     return written;
187 }
188
189 static int32_t mz_stream_os_seekinternal(HANDLE handle, LARGE_INTEGER large_pos, 
190     LARGE_INTEGER *new_pos, uint32_t move_method)
191 {
192 #ifdef MZ_WINRT_API
193     return SetFilePointerEx(handle, pos, newPos, dwMoveMethod);
194 #else
195     LONG high_part = 0;
196     uint32_t pos = 0;
197
198     high_part = large_pos.HighPart;
199     pos = SetFilePointer(handle, large_pos.LowPart, &high_part, move_method);
200
201     if ((pos == INVALID_SET_FILE_POINTER) && (GetLastError() != NO_ERROR))
202         return MZ_SEEK_ERROR;
203
204     if (new_pos != NULL)
205     {
206         new_pos->LowPart = pos;
207         new_pos->HighPart = high_part;
208     }
209
210     return MZ_OK;
211 #endif
212 }
213
214 int64_t mz_stream_os_tell(void *stream)
215 {
216     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
217     LARGE_INTEGER large_pos;
218
219     if (mz_stream_os_is_open(stream) != MZ_OK)
220         return MZ_OPEN_ERROR;
221
222     large_pos.QuadPart = 0;
223
224     if (mz_stream_os_seekinternal(win32->handle, large_pos, &large_pos, FILE_CURRENT) != MZ_OK)
225         win32->error = GetLastError();
226
227     mz_stream_os_print("Win32 - Tell - %"PRId64"\n", large_pos.QuadPart);
228
229     return large_pos.QuadPart;
230 }
231
232 int32_t mz_stream_os_seek(void *stream, int64_t offset, int32_t origin)
233 {
234     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
235     uint32_t move_method = 0xFFFFFFFF;
236     int32_t err = MZ_OK;
237     LARGE_INTEGER large_pos;
238
239
240     if (mz_stream_os_is_open(stream) != MZ_OK)
241         return MZ_OPEN_ERROR;
242
243     switch (origin)
244     {
245         case MZ_SEEK_CUR:
246             move_method = FILE_CURRENT;
247             break;
248         case MZ_SEEK_END:
249             move_method = FILE_END;
250             break;
251         case MZ_SEEK_SET:
252             move_method = FILE_BEGIN;
253             break;
254         default:
255             return MZ_SEEK_ERROR;
256     }
257
258     mz_stream_os_print("Win32 - Seek - %"PRId64" (origin %"PRId32")\n", offset, origin);
259
260     large_pos.QuadPart = offset;
261
262     err = mz_stream_os_seekinternal(win32->handle, large_pos, NULL, move_method);
263     if (err != MZ_OK)
264     {
265         win32->error = GetLastError();
266         return err;
267     }
268
269     return MZ_OK;
270 }
271
272 int32_t mz_stream_os_close(void *stream)
273 {
274     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
275
276     if (win32->handle != NULL)
277         CloseHandle(win32->handle);
278     mz_stream_os_print("Win32 - Close\n");
279     win32->handle = NULL;
280     return MZ_OK;
281 }
282
283 int32_t mz_stream_os_error(void *stream)
284 {
285     mz_stream_win32 *win32 = (mz_stream_win32 *)stream;
286     return win32->error;
287 }
288
289 void *mz_stream_os_create(void **stream)
290 {
291     mz_stream_win32 *win32 = NULL;
292
293     win32 = (mz_stream_win32 *)MZ_ALLOC(sizeof(mz_stream_win32));
294     if (win32 != NULL)
295     {
296         memset(win32, 0, sizeof(mz_stream_win32));
297         win32->stream.vtbl = &mz_stream_os_vtbl;
298     }
299     if (stream != NULL)
300         *stream = win32;
301
302     return win32;
303 }
304
305 void mz_stream_os_delete(void **stream)
306 {
307     mz_stream_win32 *win32 = NULL;
308     if (stream == NULL)
309         return;
310     win32 = (mz_stream_win32 *)*stream;
311     if (win32 != NULL)
312         MZ_FREE(win32);
313     *stream = NULL;
314 }
315
316 void *mz_stream_os_get_interface(void)
317 {
318     return (void *)&mz_stream_os_vtbl;
319 }