OSDN Git Service

Some improvements to OS::known_folder() function.
[mutilities/MUtilities.git] / src / OSSupport_Win32.cpp
1 ///////////////////////////////////////////////////////////////////////////////
2 // MuldeR's Utilities for Qt
3 // Copyright (C) 2004-2018 LoRd_MuldeR <MuldeR2@GMX.de>
4 //
5 // This library is free software; you can redistribute it and/or
6 // modify it under the terms of the GNU Lesser General Public
7 // License as published by the Free Software Foundation; either
8 // version 2.1 of the License, or (at your option) any later version.
9 //
10 // This library is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13 // Lesser General Public License for more details.
14 //
15 // You should have received a copy of the GNU Lesser General Public
16 // License along with this library; if not, write to the Free Software
17 // Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301  USA
18 //
19 // http://www.gnu.org/licenses/lgpl-2.1.txt
20 //////////////////////////////////////////////////////////////////////////////////
21
22 //Win32 API
23 #define WIN32_LEAN_AND_MEAN 1
24 #include <Windows.h>
25 #include <Psapi.h>
26 #include <Sensapi.h>
27 #include <Shellapi.h>
28 #include <PowrProf.h>
29 #include <Mmsystem.h>
30 #include <WinIoCtl.h>
31 #pragma warning(push)
32 #pragma warning(disable:4091) //for MSVC2015
33 #include <ShlObj.h>
34 #pragma warning(pop)
35
36 //CRT
37 #include <io.h>
38
39 //Internal
40 #include <MUtils/Global.h>
41 #include <MUtils/OSSupport.h>
42 #include <MUtils/GUI.h>
43 #include "CriticalSection_Win32.h"
44 #include "Utils_Win32.h"
45
46 //Qt
47 #include <QMap>
48 #include <QReadWriteLock>
49 #include <QDir>
50 #include <QWidget>
51 #include <QProcess>
52 #include <QSet>
53
54 //Main thread ID
55 static const DWORD g_main_thread_id = GetCurrentThreadId();
56
57 ///////////////////////////////////////////////////////////////////////////////
58 // SYSTEM MESSAGE
59 ///////////////////////////////////////////////////////////////////////////////
60
61 static const UINT g_msgBoxFlags = MB_TOPMOST | MB_TASKMODAL | MB_SETFOREGROUND;
62
63 void MUtils::OS::system_message_nfo(const wchar_t *const title, const wchar_t *const text)
64 {
65         MessageBoxW(NULL, text, title, g_msgBoxFlags | MB_ICONINFORMATION);
66 }
67
68 void MUtils::OS::system_message_wrn(const wchar_t *const title, const wchar_t *const text)
69 {
70         MessageBoxW(NULL, text, title, g_msgBoxFlags | MB_ICONWARNING);
71 }
72
73 void MUtils::OS::system_message_err(const wchar_t *const title, const wchar_t *const text)
74 {
75         MessageBoxW(NULL, text, title, g_msgBoxFlags | MB_ICONERROR);
76 }
77
78 ///////////////////////////////////////////////////////////////////////////////
79 // FETCH CLI ARGUMENTS
80 ///////////////////////////////////////////////////////////////////////////////
81
82 static QReadWriteLock                          g_arguments_lock;
83 static QScopedPointer<MUtils::OS::ArgumentMap> g_arguments_list;
84
85 const QStringList MUtils::OS::crack_command_line(const QString &command_line)
86 {
87         int nArgs = 0;
88         LPWSTR *szArglist = CommandLineToArgvW(command_line.isNull() ? GetCommandLineW() : MUTILS_WCHR(command_line), &nArgs);
89
90         QStringList command_line_tokens;
91         if(NULL != szArglist)
92         {
93                 for(int i = 0; i < nArgs; i++)
94                 {
95                         const QString argStr = MUTILS_QSTR(szArglist[i]).trimmed();
96                         if(!argStr.isEmpty())
97                         {
98                                 command_line_tokens << argStr;
99                         }
100                 }
101                 LocalFree(szArglist);
102         }
103
104         return command_line_tokens;
105 }
106
107 const MUtils::OS::ArgumentMap &MUtils::OS::arguments(void)
108 {
109         QReadLocker readLock(&g_arguments_lock);
110
111         //Already initialized?
112         if(!g_arguments_list.isNull())
113         {
114                 return (*(g_arguments_list.data()));
115         }
116
117         readLock.unlock();
118         QWriteLocker writeLock(&g_arguments_lock);
119
120         //Still not initialized?
121         if(!g_arguments_list.isNull())
122         {
123                 return (*(g_arguments_list.data()));
124         }
125
126         g_arguments_list.reset(new ArgumentMap());
127         const QStringList argList = crack_command_line();
128
129         if(!argList.isEmpty())
130         {
131                 const QString argPrefix = QLatin1String("--");
132                 const QChar   separator = QLatin1Char('=');
133
134                 bool firstToken = true;
135                 for(QStringList::ConstIterator iter = argList.constBegin(); iter != argList.constEnd(); iter++)
136                 {
137                         if(firstToken)
138                         {
139                                 firstToken = false;
140                                 continue; /*skip executable file name*/
141                         }
142                         if(iter->startsWith(argPrefix))
143                         {
144                                 const QString argData = iter->mid(2).trimmed();
145                                 if(argData.length() > 0)
146                                 {
147                                         const int separatorIndex = argData.indexOf(separator);
148                                         if(separatorIndex > 0)
149                                         {
150                                                 const QString argKey = argData.left(separatorIndex).trimmed();
151                                                 const QString argVal = argData.mid(separatorIndex + 1).trimmed();
152                                                 g_arguments_list->insertMulti(argKey.toLower(), argVal);
153                                         }
154                                         else
155                                         {
156                                                 g_arguments_list->insertMulti(argData.toLower(), QString());
157                                         }
158                                 }
159                         }
160                 }
161         }
162         else if(argList.empty())
163         {
164                 qWarning("CommandLineToArgvW() has failed !!!");
165         }
166
167         return (*(g_arguments_list.data()));
168 }
169
170 ///////////////////////////////////////////////////////////////////////////////
171 // COPY FILE
172 ///////////////////////////////////////////////////////////////////////////////
173
174 typedef struct _progress_callback_data_t
175 {
176         MUtils::OS::progress_callback_t callback_function;
177         void *user_data;
178 }
179 progress_callback_data_t;
180
181 static DWORD __stdcall copy_file_progress(LARGE_INTEGER TotalFileSize, LARGE_INTEGER TotalBytesTransferred, LARGE_INTEGER StreamSize, LARGE_INTEGER StreamBytesTransferred, DWORD dwStreamNumber, DWORD dwCallbackReason, HANDLE hSourceFile, HANDLE hDestinationFile, LPVOID lpData)
182 {
183         if(const progress_callback_data_t *data = (progress_callback_data_t*) lpData)
184         {
185                 const double progress = qBound(0.0, double(TotalBytesTransferred.QuadPart) / double(TotalFileSize.QuadPart), 1.0);
186                 return data->callback_function(progress, data->user_data) ? PROGRESS_CONTINUE : PROGRESS_CANCEL;
187         }
188         return PROGRESS_CONTINUE;
189 }
190
191 MUTILS_API bool MUtils::OS::copy_file(const QString &sourcePath, const QString &outputPath, const bool &overwrite, const progress_callback_t callback, void *const userData)
192 {
193         progress_callback_data_t callback_data = { callback, userData };
194         BOOL cancel = FALSE;
195         const BOOL result = CopyFileExW(MUTILS_WCHR(QDir::toNativeSeparators(sourcePath)), MUTILS_WCHR(QDir::toNativeSeparators(outputPath)), ((callback_data.callback_function) ? copy_file_progress : NULL), ((callback_data.callback_function) ? &callback_data : NULL), &cancel, (overwrite ? 0 : COPY_FILE_FAIL_IF_EXISTS));
196
197         if(result == FALSE)
198         {
199                 const DWORD errorCode = GetLastError();
200                 if(errorCode != ERROR_REQUEST_ABORTED)
201                 {
202                         qWarning("CopyFile() failed with error code 0x%08X!", errorCode);
203                 }
204                 else
205                 {
206                         qWarning("CopyFile() operation was abroted by user!");
207                 }
208         }
209
210         return (result != FALSE);
211 }
212
213 ///////////////////////////////////////////////////////////////////////////////
214 // GET FILE VERSION
215 ///////////////////////////////////////////////////////////////////////////////
216
217 static bool get_file_version_helper(const QString fileName, PVOID buffer, const size_t &size, quint16 *const major, quint16 *const minor, quint16 *const patch, quint16 *const build)
218 {
219         if(!GetFileVersionInfo(MUTILS_WCHR(fileName), 0, size, buffer))
220         {
221                 qWarning("GetFileVersionInfo() has failed, file version cannot be determined!");
222                 return false;
223         }
224
225         VS_FIXEDFILEINFO *verInfo;
226         UINT verInfoLen;
227         if(!VerQueryValue(buffer, L"\\", (LPVOID*)(&verInfo), &verInfoLen))
228         {
229                 qWarning("VerQueryValue() has failed, file version cannot be determined!");
230                 return false;
231         }
232
233         if(major) *major = quint16((verInfo->dwFileVersionMS >> 16) & 0x0000FFFF);
234         if(minor) *minor = quint16((verInfo->dwFileVersionMS)       & 0x0000FFFF);
235         if(patch) *patch = quint16((verInfo->dwFileVersionLS >> 16) & 0x0000FFFF);
236         if(build) *build = quint16((verInfo->dwFileVersionLS)       & 0x0000FFFF);
237
238         return true;
239 }
240
241 bool MUtils::OS::get_file_version(const QString fileName, quint16 *const major, quint16 *const minor, quint16 *const patch, quint16 *const build)
242 {
243         if(major) *major = 0U; if(minor) *minor = 0U;
244         if(patch) *patch = 0U; if(build) *build = 0U;
245
246         const DWORD size = GetFileVersionInfoSize(MUTILS_WCHR(fileName), NULL);
247         if(size < 1)
248         {
249                 qWarning("GetFileVersionInfoSize() has failed, file version cannot be determined!");
250                 return false;
251         }
252         
253         PVOID buffer = _malloca(size);
254         if(!buffer)
255         {
256                 qWarning("Memory allocation has failed!");
257                 return false;
258         }
259
260         const bool success = get_file_version_helper(fileName, buffer, size, major, minor, patch, build);
261
262         _freea(buffer);
263         return success;
264 }
265
266 ///////////////////////////////////////////////////////////////////////////////
267 // OS VERSION DETECTION
268 ///////////////////////////////////////////////////////////////////////////////
269
270 static bool g_os_version_initialized = false;
271 static MUtils::OS::Version::os_version_t g_os_version_info = MUtils::OS::Version::UNKNOWN_OPSYS;
272 static QReadWriteLock g_os_version_lock;
273
274 //Maps marketing names to the actual Windows NT versions
275 static const struct
276 {
277         MUtils::OS::Version::os_version_t version;
278         const char friendlyName[64];
279 }
280 g_os_version_lut[] =
281 {
282         { MUtils::OS::Version::WINDOWS_WIN2K, "Windows 2000"                                  },        //2000
283         { MUtils::OS::Version::WINDOWS_WINXP, "Windows XP or Windows XP Media Center Edition" },        //XP
284         { MUtils::OS::Version::WINDOWS_XPX64, "Windows Server 2003 or Windows XP x64"         },        //XP_x64
285         { MUtils::OS::Version::WINDOWS_VISTA, "Windows Vista or Windows Server 2008"          },        //Vista
286         { MUtils::OS::Version::WINDOWS_WIN70, "Windows 7 or Windows Server 2008 R2"           },        //7
287         { MUtils::OS::Version::WINDOWS_WIN80, "Windows 8 or Windows Server 2012"              },        //8
288         { MUtils::OS::Version::WINDOWS_WIN81, "Windows 8.1 or Windows Server 2012 R2"         },        //8.1
289         { MUtils::OS::Version::WINDOWS_WN100, "Windows 10 or Windows Server 2016"             },        //10
290         { MUtils::OS::Version::UNKNOWN_OPSYS, "N/A" }
291 };
292
293 //OS version data dtructures
294 namespace MUtils
295 {
296         namespace OS
297         {
298                 namespace Version
299                 {
300                         //Comparision operators for os_version_t
301                         bool os_version_t::operator== (const os_version_t &rhs) const { return (type == rhs.type) && (versionMajor == rhs.versionMajor) && ((versionMinor == rhs.versionMinor)); }
302                         bool os_version_t::operator!= (const os_version_t &rhs) const { return (type != rhs.type) || (versionMajor != rhs.versionMajor) || ((versionMinor != rhs.versionMinor)); }
303                         bool os_version_t::operator>  (const os_version_t &rhs) const { return (type == rhs.type) && ((versionMajor > rhs.versionMajor) || ((versionMajor == rhs.versionMajor) && (versionMinor >  rhs.versionMinor))); }
304                         bool os_version_t::operator>= (const os_version_t &rhs) const { return (type == rhs.type) && ((versionMajor > rhs.versionMajor) || ((versionMajor == rhs.versionMajor) && (versionMinor >= rhs.versionMinor))); }
305                         bool os_version_t::operator<  (const os_version_t &rhs) const { return (type == rhs.type) && ((versionMajor < rhs.versionMajor) || ((versionMajor == rhs.versionMajor) && (versionMinor <  rhs.versionMinor))); }
306                         bool os_version_t::operator<= (const os_version_t &rhs) const { return (type == rhs.type) && ((versionMajor < rhs.versionMajor) || ((versionMajor == rhs.versionMajor) && (versionMinor <= rhs.versionMinor))); }
307
308                         //Known Windows NT versions
309                         const os_version_t WINDOWS_WIN2K = { OS_WINDOWS,  5, 0,  2195, 0 };     // 2000
310                         const os_version_t WINDOWS_WINXP = { OS_WINDOWS,  5, 1,  2600, 0 };     // XP
311                         const os_version_t WINDOWS_XPX64 = { OS_WINDOWS,  5, 2,  3790, 0 };     // XP_x64
312                         const os_version_t WINDOWS_VISTA = { OS_WINDOWS,  6, 0,  6000, 0 };     // Vista
313                         const os_version_t WINDOWS_WIN70 = { OS_WINDOWS,  6, 1,  7600, 0 };     // 7
314                         const os_version_t WINDOWS_WIN80 = { OS_WINDOWS,  6, 2,  9200, 0 };     // 8
315                         const os_version_t WINDOWS_WIN81 = { OS_WINDOWS,  6, 3,  9600, 0 };     // 8.1
316                         const os_version_t WINDOWS_WN100 = { OS_WINDOWS, 10, 0, 10240, 0 };     // 10
317
318                         //Unknown OS
319                         const os_version_t UNKNOWN_OPSYS = { OS_UNKNOWN, 0,  0,     0, 0 };     // N/A
320                 }
321         }
322 }
323
324 static inline DWORD SAFE_ADD(const DWORD &a, const DWORD &b, const DWORD &limit = MAXDWORD)
325 {
326         return ((a >= limit) || (b >= limit) || ((limit - a) <= b)) ? limit : (a + b);
327 }
328
329
330 static void initialize_os_version(OSVERSIONINFOEXW *const osInfo)
331 {
332         memset(osInfo, 0, sizeof(OSVERSIONINFOEXW));
333         osInfo->dwOSVersionInfoSize = sizeof(OSVERSIONINFOEXW);
334 }
335
336 static inline DWORD initialize_step_size(const DWORD &limit)
337 {
338         DWORD result = 1;
339         while (result < limit)
340         {
341                 result = SAFE_ADD(result, result);
342         }
343         return result;
344 }
345
346 static bool rtl_get_version(OSVERSIONINFOEXW *const osInfo)
347 {
348         typedef LONG(__stdcall *RtlGetVersion)(LPOSVERSIONINFOEXW);
349         if (const HMODULE ntdll = GetModuleHandleW(L"ntdll"))
350         {
351                 if (const RtlGetVersion pRtlGetVersion = (RtlGetVersion)GetProcAddress(ntdll, "RtlGetVersion"))
352                 {
353                         initialize_os_version(osInfo);
354                         if (pRtlGetVersion(osInfo) == 0)
355                         {
356                                 return true;
357                         }
358                 }
359         }
360
361         //Fallback
362         initialize_os_version(osInfo);
363         return (GetVersionExW((LPOSVERSIONINFOW)osInfo) != FALSE);
364 }
365
366 static bool rtl_verify_version(OSVERSIONINFOEXW *const osInfo, const ULONG typeMask, const ULONGLONG condMask)
367 {
368         typedef LONG(__stdcall *RtlVerifyVersionInfo)(LPOSVERSIONINFOEXW, ULONG, ULONGLONG);
369         if (const HMODULE ntdll = GetModuleHandleW(L"ntdll"))
370         {
371                 if (const RtlVerifyVersionInfo pRtlVerifyVersionInfo = (RtlVerifyVersionInfo)GetProcAddress(ntdll, "RtlVerifyVersionInfo"))
372                 {
373                         if (pRtlVerifyVersionInfo(osInfo, typeMask, condMask) == 0)
374                         {
375                                 return true;
376                         }
377                 }
378         }
379
380         //Fallback
381         return (VerifyVersionInfoW(osInfo, typeMask, condMask) != FALSE);
382 }
383
384 static bool verify_os_version(const DWORD major, const DWORD minor)
385 {
386         OSVERSIONINFOEXW osvi;
387         DWORDLONG dwlConditionMask = 0;
388         initialize_os_version(&osvi);
389
390         //Initialize the OSVERSIONINFOEX structure
391         osvi.dwMajorVersion = major;
392         osvi.dwMinorVersion = minor;
393         osvi.dwPlatformId = VER_PLATFORM_WIN32_NT;
394
395         //Initialize the condition mask
396         VER_SET_CONDITION(dwlConditionMask, VER_MAJORVERSION, VER_GREATER_EQUAL);
397         VER_SET_CONDITION(dwlConditionMask, VER_MINORVERSION, VER_GREATER_EQUAL);
398         VER_SET_CONDITION(dwlConditionMask, VER_PLATFORMID,   VER_EQUAL);
399
400         // Perform the test
401         const BOOL ret = rtl_verify_version(&osvi, VER_MAJORVERSION | VER_MINORVERSION | VER_PLATFORMID, dwlConditionMask);
402
403         //Error checking
404         if(!ret)
405         {
406                 if(GetLastError() != ERROR_OLD_WIN_VERSION)
407                 {
408                         qWarning("VerifyVersionInfo() system call has failed!");
409                 }
410         }
411
412         return (ret != FALSE);
413 }
414
415 static bool verify_os_build(const DWORD build)
416 {
417         OSVERSIONINFOEXW osvi;
418         DWORDLONG dwlConditionMask = 0;
419         initialize_os_version(&osvi);
420
421         //Initialize the OSVERSIONINFOEX structure
422         osvi.dwBuildNumber = build;
423         osvi.dwPlatformId = VER_PLATFORM_WIN32_NT;
424
425         //Initialize the condition mask
426         VER_SET_CONDITION(dwlConditionMask, VER_BUILDNUMBER, VER_GREATER_EQUAL);
427         VER_SET_CONDITION(dwlConditionMask, VER_PLATFORMID, VER_EQUAL);
428
429         // Perform the test
430         const BOOL ret = rtl_verify_version(&osvi, VER_BUILDNUMBER | VER_PLATFORMID, dwlConditionMask);
431
432         //Error checking
433         if (!ret)
434         {
435                 if (GetLastError() != ERROR_OLD_WIN_VERSION)
436                 {
437                         qWarning("VerifyVersionInfo() system call has failed!");
438                 }
439         }
440
441         return (ret != FALSE);
442 }
443
444 static bool verify_os_spack(const WORD spack)
445 {
446         OSVERSIONINFOEXW osvi;
447         DWORDLONG dwlConditionMask = 0;
448         initialize_os_version(&osvi);
449
450         //Initialize the OSVERSIONINFOEX structure
451         osvi.wServicePackMajor = spack;
452         osvi.dwPlatformId = VER_PLATFORM_WIN32_NT;
453
454         //Initialize the condition mask
455         VER_SET_CONDITION(dwlConditionMask, VER_SERVICEPACKMAJOR, VER_GREATER_EQUAL);
456         VER_SET_CONDITION(dwlConditionMask, VER_PLATFORMID, VER_EQUAL);
457
458         // Perform the test
459         const BOOL ret = rtl_verify_version(&osvi, VER_SERVICEPACKMAJOR | VER_PLATFORMID, dwlConditionMask);
460
461         //Error checking
462         if (!ret)
463         {
464                 if (GetLastError() != ERROR_OLD_WIN_VERSION)
465                 {
466                         qWarning("VerifyVersionInfo() system call has failed!");
467                 }
468         }
469
470         return (ret != FALSE);
471 }
472
473 static bool get_real_os_version(unsigned int *const major, unsigned int *const minor, unsigned int *const build, unsigned int *const spack, bool *const pbOverride)
474 {
475         static const DWORD MAX_VERSION = MAXWORD;
476         static const DWORD MAX_BUILDNO = MAXINT;
477         static const DWORD MAX_SRVCPCK = MAXWORD;
478
479         *major = *minor = *build = *spack = 0U;
480         *pbOverride = false;
481         
482         //Initialize local variables
483         OSVERSIONINFOEXW osvi;
484         memset(&osvi, 0, sizeof(OSVERSIONINFOEXW));
485         osvi.dwOSVersionInfoSize = sizeof(OSVERSIONINFOEXW);
486
487         //Try GetVersionEx() first
488         if(rtl_get_version(&osvi) == FALSE)
489         {
490                 qWarning("GetVersionEx() has failed, cannot detect Windows version!");
491                 return false;
492         }
493
494         //Make sure we are running on NT
495         if(osvi.dwPlatformId == VER_PLATFORM_WIN32_NT)
496         {
497                 *major = osvi.dwMajorVersion;
498                 *minor = osvi.dwMinorVersion;
499                 *build = osvi.dwBuildNumber;
500                 *spack = osvi.wServicePackMajor;
501         }
502         else
503         {
504                 if (verify_os_version(4, 0))
505                 {
506                         *major = 4;
507                         *build = 1381;
508                         *pbOverride = true;
509                 }
510                 else
511                 {
512                         qWarning("Not running on Windows NT, unsupported operating system!");
513                         return false;
514                 }
515         }
516
517         //Major Version
518         for (DWORD nextMajor = (*major) + 1; nextMajor <= MAX_VERSION; nextMajor++)
519         {
520                 if (verify_os_version(nextMajor, 0))
521                 {
522                         *major = nextMajor;
523                         *minor = 0;
524                         *pbOverride = true;
525                         continue;
526                 }
527                 break;
528         }
529
530         //Minor Version
531         for (DWORD nextMinor = (*minor) + 1; nextMinor <= MAX_VERSION; nextMinor++)
532         {
533                 if (verify_os_version((*major), nextMinor))
534                 {
535                         *minor = nextMinor;
536                         *pbOverride = true;
537                         continue;
538                 }
539                 break;
540         }
541
542         //Build Version
543         if (verify_os_build(SAFE_ADD((*build), 1, MAX_BUILDNO)))
544         {
545                 DWORD stepSize = initialize_step_size(MAX_BUILDNO);
546                 for (DWORD nextBuildNo = SAFE_ADD((*build), stepSize, MAX_BUILDNO); (*build) < MAX_BUILDNO; nextBuildNo = SAFE_ADD((*build), stepSize, MAX_BUILDNO))
547                 {
548                         if (verify_os_build(nextBuildNo))
549                         {
550                                 *build = nextBuildNo;
551                                 *pbOverride = true;
552                                 continue;
553                         }
554                         if (stepSize > 1)
555                         {
556                                 stepSize = stepSize / 2;
557                                 continue;
558                         }
559                         break;
560                 }
561         }
562
563         //Service Pack
564         if (verify_os_spack(SAFE_ADD((*spack), 1, MAX_SRVCPCK)))
565         {
566                 DWORD stepSize = initialize_step_size(MAX_SRVCPCK);
567                 for (DWORD nextSPackNo = SAFE_ADD((*spack), stepSize, MAX_SRVCPCK); (*spack) < MAX_SRVCPCK; nextSPackNo = SAFE_ADD((*spack), stepSize, MAX_SRVCPCK))
568                 {
569                         if (verify_os_spack(nextSPackNo))
570                         {
571                                 *build = nextSPackNo;
572                                 *pbOverride = true;
573                                 continue;
574                         }
575                         if (stepSize > 1)
576                         {
577                                 stepSize = stepSize / 2;
578                                 continue;
579                         }
580                         break;
581                 }
582         }
583
584         return true;
585 }
586
587 const MUtils::OS::Version::os_version_t &MUtils::OS::os_version(void)
588 {
589         QReadLocker readLock(&g_os_version_lock);
590
591         //Already initialized?
592         if(g_os_version_initialized)
593         {
594                 return g_os_version_info;
595         }
596         
597         readLock.unlock();
598         QWriteLocker writeLock(&g_os_version_lock);
599
600         //Initialized now?
601         if(g_os_version_initialized)
602         {
603                 return g_os_version_info;
604         }
605
606         //Detect OS version
607         unsigned int major, minor, build, spack; bool overrideFlg;
608         if(get_real_os_version(&major, &minor, &build, &spack, &overrideFlg))
609         {
610                 g_os_version_info.type = Version::OS_WINDOWS;
611                 g_os_version_info.versionMajor = major;
612                 g_os_version_info.versionMinor = minor;
613                 g_os_version_info.versionBuild = build;
614                 g_os_version_info.versionSPack = spack;
615                 g_os_version_info.overrideFlag = overrideFlg;
616         }
617         else
618         {
619                 qWarning("Failed to determine the operating system version!");
620         }
621
622         //Completed
623         g_os_version_initialized = true;
624         return g_os_version_info;
625 }
626
627 const char *MUtils::OS::os_friendly_name(const MUtils::OS::Version::os_version_t &os_version)
628 {
629         for(size_t i = 0; g_os_version_lut[i].version != MUtils::OS::Version::UNKNOWN_OPSYS; i++)
630         {
631                 if(os_version == g_os_version_lut[i].version)
632                 {
633                         return g_os_version_lut[i].friendlyName;
634                 }
635         }
636
637         return NULL;
638 }
639
640 ///////////////////////////////////////////////////////////////////////////////
641 // WINE DETECTION
642 ///////////////////////////////////////////////////////////////////////////////
643
644 static bool g_wine_deteced = false;
645 static bool g_wine_initialized = false;
646 static QReadWriteLock g_wine_lock;
647
648 static const bool detect_wine(void)
649 {
650         void *const ptr = MUtils::Win32Utils::resolve<void*>(QLatin1String("ntdll"), QLatin1String("wine_get_version"));
651         return (ptr != NULL);
652 }
653
654 const bool &MUtils::OS::running_on_wine(void)
655 {
656         QReadLocker readLock(&g_wine_lock);
657
658         //Already initialized?
659         if(g_wine_initialized)
660         {
661                 return g_wine_deteced;
662         }
663
664         readLock.unlock();
665         QWriteLocker writeLock(&g_wine_lock);
666
667         //Initialized now?
668         if(g_wine_initialized)
669         {
670                 return g_wine_deteced;
671         }
672
673         //Try to detect Wine
674         g_wine_deteced = detect_wine();
675         g_wine_initialized = true;
676
677         return g_wine_deteced;
678 }
679
680 ///////////////////////////////////////////////////////////////////////////////
681 // KNWON FOLDERS
682 ///////////////////////////////////////////////////////////////////////////////
683
684 typedef QMap<size_t, QString> KFMap;
685 typedef HRESULT (WINAPI *SHGetKnownFolderPath_t)(const GUID &rfid, DWORD dwFlags, HANDLE hToken, PWSTR *ppszPath);
686 typedef HRESULT (WINAPI *SHGetFolderPath_t)     (HWND hwndOwner, int nFolder, HANDLE hToken, DWORD dwFlags, LPWSTR pszPath);
687
688 static QScopedPointer<KFMap>  g_known_folders_map;
689 static QReadWriteLock         g_known_folders_lock;
690
691 const QString &MUtils::OS::known_folder(known_folder_t folder_id)
692 {
693         typedef enum { KF_FLAG_CREATE = 0x00008000 } kf_flags_t;
694         
695         struct
696         {
697                 const int csidl;
698                 const GUID guid;
699         }
700         static s_folders[] =
701         {
702                 { 0x001c, {0xF1B32785,0x6FBA,0x4FCF,{0x9D,0x55,0x7B,0x8E,0x7F,0x15,0x70,0x91}} },  //CSIDL_LOCAL_APPDATA
703                 { 0x0026, {0x905e63b6,0xc1bf,0x494e,{0xb2,0x9c,0x65,0xb7,0x32,0xd3,0xd2,0x1a}} },  //CSIDL_PROGRAM_FILES
704                 { 0x0024, {0xF38BF404,0x1D43,0x42F2,{0x93,0x05,0x67,0xDE,0x0B,0x28,0xFC,0x23}} },  //CSIDL_WINDOWS_FOLDER
705                 { 0x0025, {0x1AC14E77,0x02E7,0x4E5D,{0xB7,0x44,0x2E,0xB1,0xAE,0x51,0x98,0xB7}} },  //CSIDL_SYSTEM_FOLDER
706         };
707
708         size_t folderId = size_t(-1);
709
710         switch(folder_id)
711         {
712                 case FOLDER_LOCALAPPDATA: folderId = 0; break;
713                 case FOLDER_PROGRAMFILES: folderId = 1; break;
714                 case FOLDER_SYSTROOT_DIR: folderId = 2; break;
715                 case FOLDER_SYSTEMFOLDER: folderId = 3; break;
716         }
717
718         if(folderId == size_t(-1))
719         {
720                 qWarning("Invalid 'known' folder was requested!");
721                 return *reinterpret_cast<QString*>(NULL);
722         }
723
724         QReadLocker readLock(&g_known_folders_lock);
725
726         //Already in cache?
727         if(!g_known_folders_map.isNull())
728         {
729                 if(g_known_folders_map->contains(folderId))
730                 {
731                         return (*g_known_folders_map)[folderId];
732                 }
733         }
734
735         //Obtain write lock to initialize
736         readLock.unlock();
737         QWriteLocker writeLock(&g_known_folders_lock);
738
739         //Still not in cache?
740         if(!g_known_folders_map.isNull())
741         {
742                 if(g_known_folders_map->contains(folderId))
743                 {
744                         return (*g_known_folders_map)[folderId];
745                 }
746         }
747
748         //Initialize on first call
749         if(g_known_folders_map.isNull())
750         {
751                 g_known_folders_map.reset(new QMap<size_t, QString>());
752         }
753
754         QString folderPath;
755
756         //Try SHGetKnownFolderPath() first!
757         if(const SHGetKnownFolderPath_t known_folders_fpGetKnownFolderPath = MUtils::Win32Utils::resolve<SHGetKnownFolderPath_t>(QLatin1String("shell32"), QLatin1String("SHGetKnownFolderPath")))
758         {
759                 WCHAR *path = NULL;
760                 if(known_folders_fpGetKnownFolderPath(s_folders[folderId].guid, KF_FLAG_CREATE, NULL, &path) == S_OK)
761                 {
762                         //MessageBoxW(0, path, L"SHGetKnownFolderPath", MB_TOPMOST);
763                         const QDir folderTemp = QDir(QDir::fromNativeSeparators(MUTILS_QSTR(path)));
764                         if(folderTemp.exists())
765                         {
766                                 folderPath = folderTemp.canonicalPath();
767                         }
768                         CoTaskMemFree(path);
769                 }
770         }
771
772         //Fall back to SHGetFolderPathW()
773         if (folderPath.isEmpty())
774         {
775                 if (const SHGetFolderPath_t known_folders_fpGetFolderPath = MUtils::Win32Utils::resolve<SHGetFolderPath_t>(QLatin1String("shell32"), QLatin1String("SHGetFolderPathW")))
776                 {
777                         QScopedArrayPointer<WCHAR> path(new WCHAR[4096]);
778                         if (known_folders_fpGetFolderPath(NULL, s_folders[folderId].csidl | CSIDL_FLAG_CREATE, NULL, NULL, path.data()) == S_OK)
779                         {
780                                 //MessageBoxW(0, path, L"SHGetFolderPathW", MB_TOPMOST);
781                                 const QDir folderTemp = QDir(QDir::fromNativeSeparators(MUTILS_QSTR(path.data())));
782                                 if (folderTemp.exists())
783                                 {
784                                         folderPath = folderTemp.canonicalPath();
785                                 }
786                         }
787                 }
788         }
789
790         //Update cache
791         if (!folderPath.isEmpty())
792         {
793                 qWarning("g_known_folders_map->insert");
794                 g_known_folders_map->insert(folderId, folderPath);
795         }
796
797         return folderPath;
798 }
799
800 ///////////////////////////////////////////////////////////////////////////////
801 // CURRENT DATA & TIME
802 ///////////////////////////////////////////////////////////////////////////////
803
804 QDate MUtils::OS::current_date(void)
805 {
806         const DWORD MAX_PROC = 1024;
807         QScopedArrayPointer<DWORD> processes(new DWORD[MAX_PROC]);
808         DWORD bytesReturned = 0;
809         
810         if(!EnumProcesses(processes.data(), sizeof(DWORD) * MAX_PROC, &bytesReturned))
811         {
812                 return QDate::currentDate();
813         }
814
815         const DWORD procCount = bytesReturned / sizeof(DWORD);
816         ULARGE_INTEGER lastStartTime;
817         memset(&lastStartTime, 0, sizeof(ULARGE_INTEGER));
818
819         for(DWORD i = 0; i < procCount; i++)
820         {
821                 if(HANDLE hProc = OpenProcess(PROCESS_QUERY_INFORMATION, FALSE, processes[i]))
822                 {
823                         FILETIME processTime[4];
824                         if(GetProcessTimes(hProc, &processTime[0], &processTime[1], &processTime[2], &processTime[3]))
825                         {
826                                 ULARGE_INTEGER timeCreation;
827                                 timeCreation.LowPart  = processTime[0].dwLowDateTime;
828                                 timeCreation.HighPart = processTime[0].dwHighDateTime;
829                                 if(timeCreation.QuadPart > lastStartTime.QuadPart)
830                                 {
831                                         lastStartTime.QuadPart = timeCreation.QuadPart;
832                                 }
833                         }
834                         CloseHandle(hProc);
835                 }
836         }
837         
838         FILETIME lastStartTime_fileTime;
839         lastStartTime_fileTime.dwHighDateTime = lastStartTime.HighPart;
840         lastStartTime_fileTime.dwLowDateTime  = lastStartTime.LowPart;
841
842         FILETIME lastStartTime_localTime;
843         if(!FileTimeToLocalFileTime(&lastStartTime_fileTime, &lastStartTime_localTime))
844         {
845                 memcpy(&lastStartTime_localTime, &lastStartTime_fileTime, sizeof(FILETIME));
846         }
847         
848         SYSTEMTIME lastStartTime_system;
849         if(!FileTimeToSystemTime(&lastStartTime_localTime, &lastStartTime_system))
850         {
851                 memset(&lastStartTime_system, 0, sizeof(SYSTEMTIME));
852                 lastStartTime_system.wYear = 1970; lastStartTime_system.wMonth = lastStartTime_system.wDay = 1;
853         }
854
855         const QDate currentDate = QDate::currentDate();
856         const QDate processDate = QDate(lastStartTime_system.wYear, lastStartTime_system.wMonth, lastStartTime_system.wDay);
857         return (currentDate >= processDate) ? currentDate : processDate;
858 }
859
860 quint64 MUtils::OS::current_file_time(void)
861 {
862         FILETIME fileTime;
863         GetSystemTimeAsFileTime(&fileTime);
864
865         ULARGE_INTEGER temp;
866         temp.HighPart = fileTime.dwHighDateTime;
867         temp.LowPart = fileTime.dwLowDateTime;
868
869         return temp.QuadPart;
870 }
871
872 ///////////////////////////////////////////////////////////////////////////////
873 // FILE PATH FROM FD
874 ///////////////////////////////////////////////////////////////////////////////
875
876 typedef DWORD(_stdcall *GetPathNameByHandleFun)(HANDLE hFile, LPWSTR lpszFilePath, DWORD cchFilePath, DWORD dwFlags);
877
878 static QString get_file_path_drive_list(void)
879 {
880         QString list;
881         const DWORD len = GetLogicalDriveStringsW(0, NULL);
882         if (len > 0)
883         {
884                 if (wchar_t *const buffer = (wchar_t*) _malloca(sizeof(wchar_t) * len))
885                 {
886                         const DWORD ret = GetLogicalDriveStringsW(len, buffer);
887                         if ((ret > 0) && (ret < len))
888                         {
889                                 const wchar_t *ptr = buffer;
890                                 while (const size_t current_len = wcslen(ptr))
891                                 {
892                                         list.append(QChar(*reinterpret_cast<const ushort*>(ptr)));
893                                         ptr += (current_len + 1);
894                                 }
895                         }
896                         _freea(buffer);
897                 }
898         }
899         return list;
900 }
901
902 static void get_file_path_translate(QString &path)
903 {
904         static const DWORD BUFSIZE = 2048;
905         wchar_t buffer[BUFSIZE], drive[3];
906
907         const QString driveList = get_file_path_drive_list();
908         wcscpy_s(drive, 3, L"?:");
909         for (const wchar_t *current = MUTILS_WCHR(driveList); *current; current++)
910         {
911                 drive[0] = (*current);
912                 if (QueryDosDeviceW(drive, buffer, MAX_PATH))
913                 {
914                         const QString prefix = MUTILS_QSTR(buffer);
915                         if (path.startsWith(prefix, Qt::CaseInsensitive))
916                         {
917                                 path.remove(0, prefix.length()).prepend(QLatin1Char(':')).prepend(QChar(*reinterpret_cast<const ushort*>(current)));
918                                 break;
919                         }
920                 }
921         }
922 }
923
924 static QString get_file_path_fallback(const HANDLE &hFile)
925 {
926         QString filePath;
927
928         const HANDLE hFileMap = CreateFileMappingW(hFile, NULL, PAGE_READONLY, 0, 1, NULL);
929         if (hFileMap)
930         {
931                 void *const pMem = MapViewOfFile(hFileMap, FILE_MAP_READ, 0, 0, 1);
932                 if (pMem)
933                 {
934                         static const size_t BUFFSIZE = 2048;
935                         wchar_t buffer[BUFFSIZE];
936                         if (GetMappedFileNameW(GetCurrentProcess(), pMem, buffer, BUFFSIZE) > 0)
937                         {
938                                 filePath = MUTILS_QSTR(buffer);
939                         }
940                         UnmapViewOfFile(pMem);
941                 }
942                 CloseHandle(hFileMap);
943         }
944
945         if (!filePath.isEmpty())
946         {
947                 get_file_path_translate(filePath);
948         }
949
950         return filePath;
951 }
952
953 QString MUtils::OS::get_file_path(const int &fd)
954 {
955         if (fd >= 0)
956         {
957                 const GetPathNameByHandleFun getPathNameByHandleFun = MUtils::Win32Utils::resolve<GetPathNameByHandleFun>(QLatin1String("kernel32"), QLatin1String("GetFinalPathNameByHandleW"));
958                 if (!getPathNameByHandleFun)
959                 {
960                         return get_file_path_fallback((HANDLE)_get_osfhandle(fd));
961                 }
962
963                 const HANDLE handle = (HANDLE) _get_osfhandle(fd);
964                 const DWORD len = getPathNameByHandleFun(handle, NULL, 0, FILE_NAME_OPENED);
965                 if (len > 0)
966                 {
967                         if (wchar_t *const buffer = (wchar_t*)_malloca(sizeof(wchar_t) * len))
968                         {
969                                 const DWORD ret = getPathNameByHandleFun(handle, buffer, len, FILE_NAME_OPENED);
970                                 if ((ret > 0) && (ret < len))
971                                 {
972                                         const QString path(MUTILS_QSTR(buffer));
973                                         return path.startsWith(QLatin1String("\\\\?\\")) ? path.mid(4) : path;
974                                 }
975                                 _freea(buffer);
976                         }
977                 }
978         }
979
980         return QString();
981 }
982
983 ///////////////////////////////////////////////////////////////////////////////
984 // PROCESS ELEVATION
985 ///////////////////////////////////////////////////////////////////////////////
986
987 static bool user_is_admin_helper(void)
988 {
989         HANDLE hToken = NULL;
990         if(!OpenProcessToken(GetCurrentProcess(), TOKEN_QUERY, &hToken))
991         {
992                 return false;
993         }
994
995         DWORD dwSize = 0;
996         if(!GetTokenInformation(hToken, TokenGroups, NULL, 0, &dwSize))
997         {
998                 if(GetLastError() != ERROR_INSUFFICIENT_BUFFER)
999                 {
1000                         CloseHandle(hToken);
1001                         return false;
1002                 }
1003         }
1004
1005         PTOKEN_GROUPS lpGroups = (PTOKEN_GROUPS) malloc(dwSize);
1006         if(!lpGroups)
1007         {
1008                 CloseHandle(hToken);
1009                 return false;
1010         }
1011
1012         if(!GetTokenInformation(hToken, TokenGroups, lpGroups, dwSize, &dwSize))
1013         {
1014                 free(lpGroups);
1015                 CloseHandle(hToken);
1016                 return false;
1017         }
1018
1019         PSID lpSid = NULL; SID_IDENTIFIER_AUTHORITY Authority = {SECURITY_NT_AUTHORITY};
1020         if(!AllocateAndInitializeSid(&Authority, 2, SECURITY_BUILTIN_DOMAIN_RID, DOMAIN_ALIAS_RID_ADMINS, 0, 0, 0, 0, 0, 0, &lpSid))
1021         {
1022                 free(lpGroups);
1023                 CloseHandle(hToken);
1024                 return false;
1025         }
1026
1027         bool bResult = false;
1028         for(DWORD i = 0; i < lpGroups->GroupCount; i++)
1029         {
1030                 if(EqualSid(lpSid, lpGroups->Groups[i].Sid))
1031                 {
1032                         bResult = true;
1033                         break;
1034                 }
1035         }
1036
1037         FreeSid(lpSid);
1038         free(lpGroups);
1039         CloseHandle(hToken);
1040         return bResult;
1041 }
1042
1043 bool MUtils::OS::is_elevated(bool *bIsUacEnabled)
1044 {
1045         if(bIsUacEnabled)
1046         {
1047                 *bIsUacEnabled = false;
1048         }
1049
1050         bool bIsProcessElevated = false;
1051         HANDLE hToken = NULL;
1052         
1053         if(OpenProcessToken(GetCurrentProcess(), TOKEN_QUERY, &hToken))
1054         {
1055                 TOKEN_ELEVATION_TYPE tokenElevationType;
1056                 DWORD returnLength;
1057                 if(GetTokenInformation(hToken, TokenElevationType, &tokenElevationType, sizeof(TOKEN_ELEVATION_TYPE), &returnLength))
1058                 {
1059                         if(returnLength == sizeof(TOKEN_ELEVATION_TYPE))
1060                         {
1061                                 switch(tokenElevationType)
1062                                 {
1063                                 case TokenElevationTypeDefault:
1064                                         qDebug("Process token elevation type: Default -> UAC is disabled.\n");
1065                                         break;
1066                                 case TokenElevationTypeFull:
1067                                         qWarning("Process token elevation type: Full -> potential security risk!\n");
1068                                         bIsProcessElevated = true;
1069                                         if(bIsUacEnabled) *bIsUacEnabled = true;
1070                                         break;
1071                                 case TokenElevationTypeLimited:
1072                                         qDebug("Process token elevation type: Limited -> not elevated.\n");
1073                                         if(bIsUacEnabled) *bIsUacEnabled = true;
1074                                         break;
1075                                 default:
1076                                         qWarning("Unknown tokenElevationType value: %d", tokenElevationType);
1077                                         break;
1078                                 }
1079                         }
1080                         else
1081                         {
1082                                 qWarning("GetTokenInformation() return an unexpected size!");
1083                         }
1084                 }
1085                 CloseHandle(hToken);
1086         }
1087         else
1088         {
1089                 qWarning("Failed to open process token!");
1090         }
1091
1092         return bIsProcessElevated;
1093 }
1094
1095 bool MUtils::OS::user_is_admin(void)
1096 {
1097         bool isAdmin = false;
1098
1099         //Check for process elevation and UAC support first!
1100         if(MUtils::OS::is_elevated(&isAdmin))
1101         {
1102                 qWarning("Process is elevated -> user is admin!");
1103                 return true;
1104         }
1105         
1106         //If not elevated and UAC is not available -> user must be in admin group!
1107         if(!isAdmin)
1108         {
1109                 qDebug("UAC is disabled/unavailable -> checking for Administrators group");
1110                 isAdmin = user_is_admin_helper();
1111         }
1112
1113         return isAdmin;
1114 }
1115
1116 ///////////////////////////////////////////////////////////////////////////////
1117 // NETWORK STATE
1118 ///////////////////////////////////////////////////////////////////////////////
1119
1120 int MUtils::OS::network_status(void)
1121 {
1122         DWORD dwFlags;
1123         const BOOL ret = IsNetworkAlive(&dwFlags);
1124         if(GetLastError() == 0)
1125         {
1126                 return (ret != FALSE) ? NETWORK_TYPE_YES : NETWORK_TYPE_NON;
1127         }
1128         return NETWORK_TYPE_ERR;
1129 }
1130
1131 ///////////////////////////////////////////////////////////////////////////////
1132 // MESSAGE HANDLER
1133 ///////////////////////////////////////////////////////////////////////////////
1134
1135 bool MUtils::OS::handle_os_message(const void *const message, long *result)
1136 {
1137         const MSG *const msg = reinterpret_cast<const MSG*>(message);
1138
1139         switch(msg->message)
1140         {
1141         case WM_QUERYENDSESSION:
1142                 qWarning("WM_QUERYENDSESSION message received!");
1143                 *result = MUtils::GUI::broadcast(MUtils::GUI::USER_EVENT_QUERYENDSESSION, false) ? TRUE : FALSE;
1144                 return true;
1145         case WM_ENDSESSION:
1146                 qWarning("WM_ENDSESSION message received!");
1147                 if(msg->wParam == TRUE)
1148                 {
1149                         MUtils::GUI::broadcast(MUtils::GUI::USER_EVENT_ENDSESSION, false);
1150                         MUtils::GUI::force_quit();
1151                         exit(1);
1152                 }
1153                 *result = 0;
1154                 return true;
1155         default:
1156                 /*ignore this message and let Qt handle it*/
1157                 return false;
1158         }
1159 }
1160
1161 ///////////////////////////////////////////////////////////////////////////////
1162 // SLEEP
1163 ///////////////////////////////////////////////////////////////////////////////
1164
1165 void MUtils::OS::sleep_ms(const size_t &duration)
1166 {
1167         Sleep((DWORD) duration);
1168 }
1169
1170 ///////////////////////////////////////////////////////////////////////////////
1171 // EXECUTABLE CHECK
1172 ///////////////////////////////////////////////////////////////////////////////
1173
1174 static int g_library_as_image_resource_supported = -1;
1175 static QReadWriteLock g_library_as_image_resource_supported_lock;
1176
1177 static bool library_as_image_resource_supported()
1178 {
1179         QReadLocker readLocker(&g_library_as_image_resource_supported_lock);
1180         if (g_library_as_image_resource_supported >= 0)
1181         {
1182                 return (g_library_as_image_resource_supported > 0);
1183         }
1184
1185         readLocker.unlock();
1186         QWriteLocker writeLocker(&g_library_as_image_resource_supported_lock);
1187
1188         if (g_library_as_image_resource_supported < 0)
1189         {
1190                 g_library_as_image_resource_supported = 0;
1191                 OSVERSIONINFOEXW osvi;
1192                 if (rtl_get_version(&osvi))
1193                 {
1194                         if ((osvi.dwPlatformId == VER_PLATFORM_WIN32_NT) && (osvi.dwMajorVersion >= 6U))
1195                         {
1196                                 g_library_as_image_resource_supported = 1;
1197                         }
1198                 }
1199         }
1200
1201         return (g_library_as_image_resource_supported > 0);
1202 }
1203
1204 bool MUtils::OS::is_executable_file(const QString &path)
1205 {
1206         DWORD binaryType;
1207         if(GetBinaryType(MUTILS_WCHR(QDir::toNativeSeparators(path)), &binaryType))
1208         {
1209                 return ((binaryType == SCS_32BIT_BINARY) || (binaryType == SCS_64BIT_BINARY));
1210         }
1211
1212         const DWORD errorCode = GetLastError();
1213         qWarning("GetBinaryType() failed with error: 0x%08X", errorCode);
1214         return false;
1215 }
1216
1217 bool MUtils::OS::is_library_file(const QString &path)
1218 {
1219         const DWORD flags = library_as_image_resource_supported() ? (LOAD_LIBRARY_AS_DATAFILE | LOAD_LIBRARY_AS_IMAGE_RESOURCE) : (LOAD_LIBRARY_AS_DATAFILE | DONT_RESOLVE_DLL_REFERENCES);
1220         if (const HMODULE hMod = LoadLibraryEx(MUTILS_WCHR(QDir::toNativeSeparators(path)), NULL, flags))
1221         {
1222                 FreeLibrary(hMod);
1223                 return true;
1224         }
1225
1226         const DWORD errorCode = GetLastError();
1227         qWarning("LoadLibraryEx() failed with error: 0x%08X", errorCode);
1228         return false;
1229 }
1230
1231 ///////////////////////////////////////////////////////////////////////////////
1232 // HIBERNATION / SHUTDOWN
1233 ///////////////////////////////////////////////////////////////////////////////
1234
1235 bool MUtils::OS::is_hibernation_supported(void)
1236 {
1237         bool hibernationSupported = false;
1238
1239         SYSTEM_POWER_CAPABILITIES pwrCaps;
1240         SecureZeroMemory(&pwrCaps, sizeof(SYSTEM_POWER_CAPABILITIES));
1241         
1242         if(GetPwrCapabilities(&pwrCaps))
1243         {
1244                 hibernationSupported = pwrCaps.SystemS4 && pwrCaps.HiberFilePresent;
1245         }
1246
1247         return hibernationSupported;
1248 }
1249
1250 bool MUtils::OS::shutdown_computer(const QString &message, const unsigned long timeout, const bool forceShutdown, const bool hibernate)
1251 {
1252         HANDLE hToken = NULL;
1253
1254         if(OpenProcessToken(GetCurrentProcess(), TOKEN_ADJUST_PRIVILEGES | TOKEN_QUERY, &hToken))
1255         {
1256                 TOKEN_PRIVILEGES privileges;
1257                 memset(&privileges, 0, sizeof(TOKEN_PRIVILEGES));
1258                 privileges.PrivilegeCount = 1;
1259                 privileges.Privileges[0].Attributes = SE_PRIVILEGE_ENABLED;
1260                 
1261                 if(LookupPrivilegeValue(NULL, SE_SHUTDOWN_NAME, &privileges.Privileges[0].Luid))
1262                 {
1263                         if(AdjustTokenPrivileges(hToken, FALSE, &privileges, NULL, NULL, NULL))
1264                         {
1265                                 if(hibernate)
1266                                 {
1267                                         if(SetSuspendState(TRUE, TRUE, TRUE))
1268                                         {
1269                                                 return true;
1270                                         }
1271                                 }
1272                                 const DWORD reason = SHTDN_REASON_MAJOR_APPLICATION | SHTDN_REASON_FLAG_PLANNED;
1273                                 return InitiateSystemShutdownEx(NULL, const_cast<wchar_t*>(MUTILS_WCHR(message)), timeout, forceShutdown ? TRUE : FALSE, FALSE, reason);
1274                         }
1275                 }
1276         }
1277         
1278         return false;
1279 }
1280
1281 ///////////////////////////////////////////////////////////////////////////////
1282 // FREE DISKSPACE
1283 ///////////////////////////////////////////////////////////////////////////////
1284
1285 bool MUtils::OS::free_diskspace(const QString &path, quint64 &freeSpace)
1286 {
1287         ULARGE_INTEGER freeBytesAvailable, totalNumberOfBytes, totalNumberOfFreeBytes;
1288         if(GetDiskFreeSpaceExW(reinterpret_cast<const wchar_t*>(QDir::toNativeSeparators(path).utf16()), &freeBytesAvailable, &totalNumberOfBytes, &totalNumberOfFreeBytes))
1289         {
1290                 freeSpace = freeBytesAvailable.QuadPart;
1291                 return true;;
1292         }
1293
1294         freeSpace = -1;
1295         return false;
1296 }
1297
1298 ///////////////////////////////////////////////////////////////////////////////
1299 // DRIVE TYPE
1300 ///////////////////////////////////////////////////////////////////////////////
1301
1302 static wchar_t get_drive_letter(const QString &path)
1303 {
1304         QString nativePath = QDir::toNativeSeparators(path);
1305         while (nativePath.startsWith("\\\\?\\") || nativePath.startsWith("\\\\.\\"))
1306         {
1307                 nativePath = QDir::toNativeSeparators(nativePath.mid(4));
1308         }
1309         if ((path.length() > 1) && (path[1] == QLatin1Char(':')))
1310         {
1311                 const wchar_t letter = static_cast<wchar_t>(path[0].unicode());
1312                 if (((letter >= 'A') && (letter <= 'Z')) || ((letter >= 'a') && (letter <= 'z')))
1313                 {
1314                         return towupper(letter);
1315                 }
1316         }
1317         return L'\0'; /*invalid path spec*/
1318 }
1319
1320 static QSet<DWORD> get_physical_drive_ids(const wchar_t drive_letter)
1321 {
1322         QSet<DWORD> physical_drives;
1323         wchar_t driveName[8];
1324         _snwprintf_s(driveName, 8, _TRUNCATE, L"\\\\.\\%c:", drive_letter);
1325         const HANDLE hDrive = CreateFileW(driveName, 0, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, NULL);
1326         if (hDrive && (hDrive != INVALID_HANDLE_VALUE))
1327         {
1328                 const size_t BUFF_SIZE = sizeof(VOLUME_DISK_EXTENTS) + (32U * sizeof(DISK_EXTENT));
1329                 VOLUME_DISK_EXTENTS *const diskExtents = (VOLUME_DISK_EXTENTS*)_malloca(BUFF_SIZE);
1330                 DWORD dwSize;
1331                 if (DeviceIoControl(hDrive, IOCTL_VOLUME_GET_VOLUME_DISK_EXTENTS, NULL, 0, (LPVOID)diskExtents, (DWORD)BUFF_SIZE, (LPDWORD)&dwSize, NULL))
1332                 {
1333                         for (DWORD index = 0U; index < diskExtents->NumberOfDiskExtents; ++index)
1334                         {
1335                                 physical_drives.insert(diskExtents->Extents[index].DiskNumber);
1336                         }
1337                 }
1338                 _freea(diskExtents);
1339                 CloseHandle(hDrive);
1340         }
1341         return physical_drives;
1342 }
1343
1344 static bool incurs_seek_penalty(const DWORD device_id)
1345 {
1346         wchar_t driveName[24];
1347         _snwprintf_s(driveName, 24, _TRUNCATE, L"\\\\?\\PhysicalDrive%u", device_id);
1348         const HANDLE hDevice = CreateFileW(driveName, 0, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, 0, NULL);
1349         bool seeking_penalty = true;
1350         if (hDevice && (hDevice != INVALID_HANDLE_VALUE))
1351         {
1352                 STORAGE_PROPERTY_QUERY spq;
1353                 DEVICE_SEEK_PENALTY_DESCRIPTOR dspd;
1354                 memset(&spq, 0, sizeof(STORAGE_PROPERTY_QUERY));
1355                 spq.PropertyId = (STORAGE_PROPERTY_ID)StorageDeviceSeekPenaltyProperty;
1356                 spq.QueryType = PropertyStandardQuery;
1357                 DWORD dwSize;
1358                 if (DeviceIoControl(hDevice, IOCTL_STORAGE_QUERY_PROPERTY, (LPVOID)&spq, (DWORD)sizeof(spq), (LPVOID)&dspd, (DWORD)sizeof(dspd), (LPDWORD)&dwSize, NULL))
1359                 {
1360                         seeking_penalty = dspd.IncursSeekPenalty;
1361                 }
1362                 CloseHandle(hDevice);
1363         }
1364         return seeking_penalty;
1365 }
1366
1367 static bool is_fast_seeking_drive(const wchar_t drive_letter)
1368 {
1369         bool fast_seeking = false;
1370         const QSet<DWORD> physical_drive_ids = get_physical_drive_ids(drive_letter);
1371         if (!physical_drive_ids.empty())
1372         {
1373                 fast_seeking = true;
1374                 for (QSet<DWORD>::const_iterator iter = physical_drive_ids.constBegin(); iter != physical_drive_ids.constEnd(); ++iter)
1375                 {
1376                         fast_seeking = fast_seeking && (!incurs_seek_penalty(*iter));
1377                 }
1378         }
1379         return fast_seeking;
1380 }
1381
1382 MUtils::OS::drive_type_t MUtils::OS::get_drive_type(const QString &path, bool *fast_seeking)
1383 {
1384         drive_type_t driveType = DRIVE_TYPE_ERR;
1385         const wchar_t driveLetter = get_drive_letter(path);
1386         if (driveLetter)
1387         {
1388                 wchar_t driveName[8];
1389                 _snwprintf_s(driveName, 8, _TRUNCATE, L"\\\\.\\%c:\\", driveLetter);
1390                 switch (GetDriveTypeW(driveName))
1391                 {
1392                         case DRIVE_REMOVABLE: driveType = DRIVE_TYPE_FDD; break;
1393                         case DRIVE_FIXED:     driveType = DRIVE_TYPE_HDD; break;
1394                         case DRIVE_REMOTE:    driveType = DRIVE_TYPE_NET; break;
1395                         case DRIVE_CDROM:     driveType = DRIVE_TYPE_OPT; break;
1396                         case DRIVE_RAMDISK:   driveType = DRIVE_TYPE_RAM; break;
1397                 }
1398         }
1399         if (fast_seeking)
1400         {
1401                 if (driveType == DRIVE_TYPE_HDD)
1402                 {
1403                         *fast_seeking = is_fast_seeking_drive(driveLetter);
1404                 }
1405                 else
1406                 {
1407                         *fast_seeking = (driveType == DRIVE_TYPE_RAM);
1408                 }
1409         }
1410         return driveType;
1411 }
1412
1413 ///////////////////////////////////////////////////////////////////////////////
1414 // SHELL OPEN
1415 ///////////////////////////////////////////////////////////////////////////////
1416
1417 bool MUtils::OS::shell_open(const QWidget *parent, const QString &url, const QString &parameters, const QString &directory, const bool explore)
1418 {
1419         return ((int) ShellExecuteW((parent ? reinterpret_cast<HWND>(parent->winId()) : NULL), (explore ? L"explore" : L"open"), MUTILS_WCHR(url), ((!parameters.isEmpty()) ? MUTILS_WCHR(parameters) : NULL), ((!directory.isEmpty()) ? MUTILS_WCHR(directory) : NULL), SW_SHOW)) > 32;
1420 }
1421
1422 bool MUtils::OS::shell_open(const QWidget *parent, const QString &url, const bool explore)
1423 {
1424         return shell_open(parent, url, QString(), QString(), explore);
1425 }
1426
1427 ///////////////////////////////////////////////////////////////////////////////
1428 // OPEN MEDIA FILE
1429 ///////////////////////////////////////////////////////////////////////////////
1430
1431 bool MUtils::OS::open_media_file(const QString &mediaFilePath)
1432 {
1433         const static wchar_t *registryPrefix[2] = { L"SOFTWARE\\", L"SOFTWARE\\Wow6432Node\\" };
1434         const static wchar_t *registryKeys[3] = 
1435         {
1436                 L"Microsoft\\Windows\\CurrentVersion\\Uninstall\\{97D341C8-B0D1-4E4A-A49A-C30B52F168E9}",
1437                 L"Microsoft\\Windows\\CurrentVersion\\Uninstall\\{DB9E4EAB-2717-499F-8D56-4CC8A644AB60}",
1438                 L"foobar2000"
1439         };
1440         const static wchar_t *appNames[4] = { L"smplayer_portable.exe", L"smplayer.exe", L"MPUI.exe", L"foobar2000.exe" };
1441         const static wchar_t *valueNames[2] = { L"InstallLocation", L"InstallDir" };
1442
1443         for(size_t i = 0; i < 3; i++)
1444         {
1445                 for(size_t j = 0; j < 2; j++)
1446                 {
1447                         QString mplayerPath;
1448                         HKEY registryKeyHandle = NULL;
1449
1450                         const QString currentKey = MUTILS_QSTR(registryPrefix[j]).append(MUTILS_QSTR(registryKeys[i]));
1451                         if(RegOpenKeyExW(HKEY_LOCAL_MACHINE, MUTILS_WCHR(currentKey), 0, KEY_READ, &registryKeyHandle) == ERROR_SUCCESS)
1452                         {
1453                                 for(size_t k = 0; k < 2; k++)
1454                                 {
1455                                         wchar_t Buffer[4096];
1456                                         DWORD BuffSize = sizeof(wchar_t*) * 4096;
1457                                         DWORD DataType = REG_NONE;
1458                                         if(RegQueryValueExW(registryKeyHandle, valueNames[k], 0, &DataType, reinterpret_cast<BYTE*>(Buffer), &BuffSize) == ERROR_SUCCESS)
1459                                         {
1460                                                 if((DataType == REG_SZ) || (DataType == REG_EXPAND_SZ) || (DataType == REG_LINK))
1461                                                 {
1462                                                         mplayerPath = MUTILS_QSTR(Buffer);
1463                                                         break;
1464                                                 }
1465                                         }
1466                                 }
1467                                 RegCloseKey(registryKeyHandle);
1468                         }
1469
1470                         if(!mplayerPath.isEmpty())
1471                         {
1472                                 QDir mplayerDir(mplayerPath);
1473                                 if(mplayerDir.exists())
1474                                 {
1475                                         for(size_t k = 0; k < 4; k++)
1476                                         {
1477                                                 if(mplayerDir.exists(MUTILS_QSTR(appNames[k])))
1478                                                 {
1479                                                         qDebug("Player found at:\n%s\n", MUTILS_UTF8(mplayerDir.absoluteFilePath(MUTILS_QSTR(appNames[k]))));
1480                                                         QProcess::startDetached(mplayerDir.absoluteFilePath(MUTILS_QSTR(appNames[k])), QStringList() << QDir::toNativeSeparators(mediaFilePath));
1481                                                         return true;
1482                                                 }
1483                                         }
1484                                 }
1485                         }
1486                 }
1487         }
1488         return false;
1489 }
1490
1491 ///////////////////////////////////////////////////////////////////////////////
1492 // DEBUGGER CHECK
1493 ///////////////////////////////////////////////////////////////////////////////
1494
1495 static bool change_process_priority_helper(const HANDLE hProcess, const int priority)
1496 {
1497         bool ok = false;
1498
1499         switch(qBound(-2, priority, 2))
1500         {
1501         case 2:
1502                 ok = (SetPriorityClass(hProcess, HIGH_PRIORITY_CLASS) == TRUE);
1503                 break;
1504         case 1:
1505                 if(!(ok = (SetPriorityClass(hProcess, ABOVE_NORMAL_PRIORITY_CLASS) == TRUE)))
1506                 {
1507                         ok = (SetPriorityClass(hProcess, HIGH_PRIORITY_CLASS) == TRUE);
1508                 }
1509                 break;
1510         case 0:
1511                 ok = (SetPriorityClass(hProcess, NORMAL_PRIORITY_CLASS) == TRUE);
1512                 break;
1513         case -1:
1514                 if(!(ok = (SetPriorityClass(hProcess, BELOW_NORMAL_PRIORITY_CLASS) == TRUE)))
1515                 {
1516                         ok = (SetPriorityClass(hProcess, IDLE_PRIORITY_CLASS) == TRUE);
1517                 }
1518                 break;
1519         case -2:
1520                 ok = (SetPriorityClass(hProcess, IDLE_PRIORITY_CLASS) == TRUE);
1521                 break;
1522         }
1523
1524         return ok;
1525 }
1526
1527 bool MUtils::OS::change_process_priority(const int priority)
1528 {
1529         return change_process_priority_helper(GetCurrentProcess(), priority);
1530 }
1531
1532 bool MUtils::OS::change_process_priority(const QProcess *proc, const int priority)
1533 {
1534         if(Q_PID qPid = proc->pid())
1535         {
1536                 return change_process_priority_helper(qPid->hProcess, priority);
1537         }
1538         else
1539         {
1540                 return false;
1541         }
1542 }
1543
1544 ///////////////////////////////////////////////////////////////////////////////
1545 // PROCESS ID
1546 ///////////////////////////////////////////////////////////////////////////////
1547
1548 quint32 MUtils::OS::process_id(void)
1549 {
1550         return GetCurrentProcessId();
1551 }
1552
1553 quint32 MUtils::OS::process_id(const QProcess *const proc)
1554 {
1555         PROCESS_INFORMATION *procInf = proc->pid();
1556         return (procInf) ? procInf->dwProcessId : 0;
1557 }
1558
1559 quint32 MUtils::OS::thread_id(void)
1560 {
1561         return GetCurrentThreadId();
1562 }
1563
1564 quint32 MUtils::OS::thread_id(const QProcess *const proc)
1565 {
1566         PROCESS_INFORMATION *procInf = proc->pid();
1567         return (procInf) ? procInf->dwThreadId : 0;
1568 }
1569
1570 ///////////////////////////////////////////////////////////////////////////////
1571 // PROCESS SUSPEND/RESUME
1572 ///////////////////////////////////////////////////////////////////////////////
1573
1574 bool MUtils::OS::suspend_process(const QProcess *proc, const bool suspend)
1575 {
1576         if(Q_PID pid = proc->pid())
1577         {
1578                 if(suspend)
1579                 {
1580                         return (SuspendThread(pid->hThread) != ((DWORD) -1));
1581                 }
1582                 else
1583                 {
1584                         return (ResumeThread(pid->hThread)  != ((DWORD) -1));
1585                 }
1586         }
1587         else
1588         {
1589                 return false;
1590         }
1591 }
1592
1593 ///////////////////////////////////////////////////////////////////////////////
1594 // SYSTEM TIMER
1595 ///////////////////////////////////////////////////////////////////////////////
1596
1597 bool MUtils::OS::setup_timer_resolution(const quint32 &interval)
1598 {
1599         return timeBeginPeriod(interval) == TIMERR_NOERROR;
1600 }
1601
1602 bool MUtils::OS::reset_timer_resolution(const quint32 &interval)
1603 {
1604         return timeEndPeriod(interval) == TIMERR_NOERROR;
1605 }
1606
1607 ///////////////////////////////////////////////////////////////////////////////
1608 // SET FILE TIME
1609 ///////////////////////////////////////////////////////////////////////////////
1610
1611 static QScopedPointer<QDateTime> s_epoch;
1612 static QReadWriteLock            s_epochLock;
1613
1614 static const QDateTime *get_epoch(void)
1615 {
1616         QReadLocker rdLock(&s_epochLock);
1617
1618         if (s_epoch.isNull())
1619         {
1620                 rdLock.unlock();
1621                 QWriteLocker wrLock(&s_epochLock);
1622                 if (s_epoch.isNull())
1623                 {
1624                         s_epoch.reset(new QDateTime(QDate(1601, 1, 1), QTime(0, 0, 0, 0), Qt::UTC));
1625                 }
1626                 wrLock.unlock();
1627                 rdLock.relock();
1628         }
1629
1630         return s_epoch.data();
1631 }
1632
1633 static FILETIME *qt_time_to_file_time(FILETIME *const fileTime, const QDateTime &dateTime)
1634 {
1635         memset(fileTime, 0, sizeof(FILETIME));
1636
1637         if (const QDateTime *const epoch = get_epoch())
1638         {
1639                 const qint64 msecs = epoch->msecsTo(dateTime);
1640                 if (msecs > 0)
1641                 {
1642                         const quint64 ticks = 10000U * quint64(msecs);
1643                         fileTime->dwHighDateTime = ((ticks >> 32) & 0xFFFFFFFF);
1644                         fileTime->dwLowDateTime = (ticks & 0xFFFFFFFF);
1645                         return fileTime;
1646                 }
1647         }
1648
1649         return NULL;
1650 }
1651
1652 static bool set_file_time(const HANDLE hFile, const QDateTime &created, const QDateTime &lastMod, const QDateTime &lastAcc)
1653 {
1654         FILETIME ftCreated, ftLastMod, ftLastAcc;
1655
1656         FILETIME *const pCreated = created.isValid() ? qt_time_to_file_time(&ftCreated, created) : NULL;
1657         FILETIME *const pLastMod = lastMod.isValid() ? qt_time_to_file_time(&ftLastMod, lastMod) : NULL;
1658         FILETIME *const pLastAcc = lastAcc.isValid() ? qt_time_to_file_time(&ftLastAcc, lastAcc) : NULL;
1659
1660         if (pCreated || pLastMod || pLastAcc)
1661         {
1662                 return (SetFileTime(hFile, pCreated, pLastAcc, pLastMod) != FALSE);
1663         }
1664
1665         return false;
1666 }
1667
1668 bool MUtils::OS::set_file_time(const QFile &file, const QDateTime &created, const QDateTime &lastMod, const QDateTime &lastAcc)
1669 {
1670         const int fd = file.handle();
1671         if (fd >= 0)
1672         {
1673                 return set_file_time((HANDLE)_get_osfhandle(fd), created, lastMod, lastAcc);
1674         }
1675         return false;
1676 }
1677
1678 bool MUtils::OS::set_file_time(const QString &path, const QDateTime &created, const QDateTime &lastMod, const QDateTime &lastAcc)
1679 {
1680         const HANDLE hFile = CreateFileW(MUTILS_WCHR(path), FILE_WRITE_ATTRIBUTES, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, 0);
1681         bool okay = false;
1682         if ((hFile != NULL) && (hFile != INVALID_HANDLE_VALUE))
1683         {
1684                 okay = set_file_time(hFile, created, lastMod, lastAcc);
1685                 CloseHandle(hFile);
1686         }
1687         return okay;
1688 }
1689
1690 ///////////////////////////////////////////////////////////////////////////////
1691 // CHECK KEY STATE
1692 ///////////////////////////////////////////////////////////////////////////////
1693
1694 bool MUtils::OS::check_key_state_esc(void)
1695 {
1696         return (GetAsyncKeyState(VK_ESCAPE) & 0x0001) != 0;
1697 }
1698
1699 ///////////////////////////////////////////////////////////////////////////////
1700 // SHELL CHANGE NOTIFICATION
1701 ///////////////////////////////////////////////////////////////////////////////
1702
1703 void MUtils::OS::shell_change_notification(void)
1704 {
1705         SHChangeNotify(SHCNE_ASSOCCHANGED, SHCNF_IDLIST, NULL, NULL);
1706 }
1707
1708 ///////////////////////////////////////////////////////////////////////////////
1709 // WOW64 REDIRECTION
1710 ///////////////////////////////////////////////////////////////////////////////
1711
1712 typedef BOOL (_stdcall *Wow64DisableWow64FsRedirectionFun)(void *OldValue);
1713 typedef BOOL (_stdcall *Wow64RevertWow64FsRedirectionFun )(void *OldValue);
1714
1715 bool MUtils::OS::wow64fsredir_disable(void *oldValue)
1716 {
1717         const Wow64DisableWow64FsRedirectionFun wow64redir_disable = MUtils::Win32Utils::resolve<Wow64DisableWow64FsRedirectionFun>(QLatin1String("kernel32"), QLatin1String("Wow64DisableWow64FsRedirection"));
1718         if(wow64redir_disable)
1719         {
1720                 if (wow64redir_disable(oldValue))
1721                 {
1722                         return true;
1723                 }
1724         }
1725         return false;
1726 }
1727
1728 bool MUtils::OS::wow64fsredir_revert(void *oldValue)
1729 {
1730         const Wow64RevertWow64FsRedirectionFun wow64redir_disable = MUtils::Win32Utils::resolve<Wow64RevertWow64FsRedirectionFun>(QLatin1String("kernel32"), QLatin1String("Wow64RevertWow64FsRedirection"));
1731         if (wow64redir_disable)
1732         {
1733                 if (wow64redir_disable(oldValue))
1734                 {
1735                         return true;
1736                 }
1737         }
1738         return false;
1739 }
1740
1741 ///////////////////////////////////////////////////////////////////////////////
1742 // DEBUGGER CHECK
1743 ///////////////////////////////////////////////////////////////////////////////
1744
1745 QString MUtils::OS::get_envvar(const QString &name)
1746 {
1747         wchar_t *buffer = NULL;
1748         size_t requiredSize = 0, buffSize = 0;
1749         QString result;
1750
1751         forever
1752         {
1753                 //Adjust the buffer size as required first!
1754                 if (buffSize < requiredSize)
1755                 {
1756                         if (buffer)
1757                         {
1758                                 _freea(buffer);
1759                         }
1760                         if (!(buffer = (wchar_t*)_malloca(sizeof(wchar_t) * requiredSize)))
1761                         {
1762                                 break; /*out of memory error!*/
1763                         }
1764                         buffSize = requiredSize;
1765                 }
1766
1767                 //Try to fetch the environment variable now
1768                 const errno_t error = _wgetenv_s(&requiredSize, buffer, buffSize, MUTILS_WCHR(name));
1769                 if(!error)
1770                 {
1771                         if (requiredSize > 0)
1772                         {
1773                                 result = MUTILS_QSTR(buffer);
1774                         }
1775                         break; /*done*/
1776                 }
1777                 else if (error != ERANGE)
1778                 {
1779                         break; /*somethging else went wrong!*/
1780                 }
1781         }
1782         
1783         if (buffer)
1784         {
1785                 _freea(buffer);
1786                 buffSize = 0;
1787                 buffer = NULL;
1788         }
1789
1790         return result;
1791 }
1792
1793 bool MUtils::OS::set_envvar(const QString &name, const QString &value)
1794 {
1795         if (!_wputenv_s(MUTILS_WCHR(name), MUTILS_WCHR(value)))
1796         {
1797                 return true;
1798         }
1799         return false;
1800 }
1801
1802 ///////////////////////////////////////////////////////////////////////////////
1803 // NULL DEVICE
1804 ///////////////////////////////////////////////////////////////////////////////
1805
1806 static const QLatin1String NULL_DEVICE("NUL");
1807
1808 const QLatin1String &MUtils::OS::null_device(void)
1809 {
1810         return NULL_DEVICE;
1811 }
1812
1813 ///////////////////////////////////////////////////////////////////////////////
1814 // DEBUGGER CHECK
1815 ///////////////////////////////////////////////////////////////////////////////
1816
1817 #if (!(MUTILS_DEBUG))
1818 static __forceinline bool is_debugger_present(void)
1819 {
1820         __try
1821         {
1822                 CloseHandle((HANDLE)((DWORD_PTR)-3));
1823         }
1824         __except(1)
1825         {
1826                 return true;
1827         }
1828
1829         BOOL bHaveDebugger = FALSE;
1830         if(CheckRemoteDebuggerPresent(GetCurrentProcess(), &bHaveDebugger))
1831         {
1832                 if(bHaveDebugger) return true;
1833         }
1834
1835         return IsDebuggerPresent();
1836 }
1837 static __forceinline bool check_debugger_helper(void)
1838 {
1839         if(is_debugger_present())
1840         {
1841                 MUtils::OS::fatal_exit(L"Not a debug build. Please unload debugger and try again!");
1842                 return true;
1843         }
1844         return false;
1845 }
1846 #else
1847 #define check_debugger_helper() (false)
1848 #endif
1849
1850 void MUtils::OS::check_debugger(void)
1851 {
1852         check_debugger_helper();
1853 }
1854
1855 static volatile bool g_debug_check = check_debugger_helper();
1856
1857 ///////////////////////////////////////////////////////////////////////////////
1858 // FATAL EXIT
1859 ///////////////////////////////////////////////////////////////////////////////
1860
1861 static MUtils::Internal::CriticalSection g_fatal_exit_lock;
1862 static QAtomicInt g_fatal_exit_flag;
1863
1864 static DWORD WINAPI fatal_exit_helper(LPVOID lpParameter)
1865 {
1866         MUtils::OS::system_message_err(L"GURU MEDITATION", (LPWSTR) lpParameter);
1867         return 0;
1868 }
1869
1870 void MUtils::OS::fatal_exit(const wchar_t* const errorMessage)
1871 {
1872         g_fatal_exit_lock.enter();
1873         
1874         if(!g_fatal_exit_flag.testAndSetOrdered(0, 1))
1875         {
1876                 return; /*prevent recursive invocation*/
1877         }
1878
1879         if(g_main_thread_id != GetCurrentThreadId())
1880         {
1881                 if(HANDLE hThreadMain = OpenThread(THREAD_SUSPEND_RESUME, FALSE, g_main_thread_id))
1882                 {
1883                         SuspendThread(hThreadMain); /*stop main thread*/
1884                 }
1885         }
1886
1887         if(HANDLE hThread = CreateThread(NULL, 0, fatal_exit_helper, (LPVOID)errorMessage, 0, NULL))
1888         {
1889                 WaitForSingleObject(hThread, INFINITE);
1890         }
1891         else
1892         {
1893                 fatal_exit_helper((LPVOID)errorMessage);
1894         }
1895
1896         for(;;)
1897         {
1898                 TerminateProcess(GetCurrentProcess(), 666);
1899         }
1900 }
1901
1902 ///////////////////////////////////////////////////////////////////////////////