]> glassweightruler.freedombox.rocks Git - Ventoy.git/blob - Ventoy2Disk/Ventoy2Disk/PhyDrive.c
07c168cd000fd4192d324883aae28ae9a93b01e9
[Ventoy.git] / Ventoy2Disk / Ventoy2Disk / PhyDrive.c
1 /******************************************************************************
2 * PhyDrive.c
3 *
4 * Copyright (c) 2020, longpanda <admin@ventoy.net>
5 * Copyright (c) 2011-2020, Pete Batard <pete@akeo.ie>
6 *
7 * This program is free software; you can redistribute it and/or
8 * modify it under the terms of the GNU General Public License as
9 * published by the Free Software Foundation; either version 3 of the
10 * License, or (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License
18 * along with this program; if not, see <http://www.gnu.org/licenses/>.
19 *
20 */
21
22 #include <Windows.h>
23 #include <winternl.h>
24 #include <commctrl.h>
25 #include <initguid.h>
26 #include <vds.h>
27 #include "resource.h"
28 #include "Language.h"
29 #include "Ventoy2Disk.h"
30 #include "fat_filelib.h"
31 #include "ff.h"
32
33 /*
34 * Some code and functions in the file are copied from rufus.
35 * https://github.com/pbatard/rufus
36 */
37 #define VDS_SET_ERROR SetLastError
38 #define IVdsServiceLoader_LoadService(This, pwszMachineName, ppService) (This)->lpVtbl->LoadService(This, pwszMachineName, ppService)
39 #define IVdsServiceLoader_Release(This) (This)->lpVtbl->Release(This)
40 #define IVdsService_QueryProviders(This, masks, ppEnum) (This)->lpVtbl->QueryProviders(This, masks, ppEnum)
41 #define IVdsService_WaitForServiceReady(This) ((This)->lpVtbl->WaitForServiceReady(This))
42 #define IVdsService_CleanupObsoleteMountPoints(This) ((This)->lpVtbl->CleanupObsoleteMountPoints(This))
43 #define IVdsService_Refresh(This) ((This)->lpVtbl->Refresh(This))
44 #define IVdsService_Reenumerate(This) ((This)->lpVtbl->Reenumerate(This))
45 #define IVdsSwProvider_QueryInterface(This, riid, ppvObject) (This)->lpVtbl->QueryInterface(This, riid, ppvObject)
46 #define IVdsProvider_Release(This) (This)->lpVtbl->Release(This)
47 #define IVdsSwProvider_QueryPacks(This, ppEnum) (This)->lpVtbl->QueryPacks(This, ppEnum)
48 #define IVdsSwProvider_Release(This) (This)->lpVtbl->Release(This)
49 #define IVdsPack_QueryDisks(This, ppEnum) (This)->lpVtbl->QueryDisks(This, ppEnum)
50 #define IVdsDisk_GetProperties(This, pDiskProperties) (This)->lpVtbl->GetProperties(This, pDiskProperties)
51 #define IVdsDisk_Release(This) (This)->lpVtbl->Release(This)
52 #define IVdsDisk_QueryInterface(This, riid, ppvObject) (This)->lpVtbl->QueryInterface(This, riid, ppvObject)
53 #define IVdsAdvancedDisk_QueryPartitions(This, ppPartitionPropArray, plNumberOfPartitions) (This)->lpVtbl->QueryPartitions(This, ppPartitionPropArray, plNumberOfPartitions)
54 #define IVdsAdvancedDisk_DeletePartition(This, ullOffset, bForce, bForceProtected) (This)->lpVtbl->DeletePartition(This, ullOffset, bForce, bForceProtected)
55 #define IVdsAdvancedDisk_Clean(This, bForce, bForceOEM, bFullClean, ppAsync) (This)->lpVtbl->Clean(This, bForce, bForceOEM, bFullClean, ppAsync)
56 #define IVdsAdvancedDisk_Release(This) (This)->lpVtbl->Release(This)
57 #define IEnumVdsObject_Next(This, celt, ppObjectArray, pcFetched) (This)->lpVtbl->Next(This, celt, ppObjectArray, pcFetched)
58 #define IVdsPack_QueryVolumes(This, ppEnum) (This)->lpVtbl->QueryVolumes(This, ppEnum)
59 #define IVdsVolume_QueryInterface(This, riid, ppvObject) (This)->lpVtbl->QueryInterface(This, riid, ppvObject)
60 #define IVdsVolume_Release(This) (This)->lpVtbl->Release(This)
61 #define IVdsVolumeMF3_QueryVolumeGuidPathnames(This, pwszPathArray, pulNumberOfPaths) (This)->lpVtbl->QueryVolumeGuidPathnames(This,pwszPathArray,pulNumberOfPaths)
62 #define IVdsVolumeMF3_FormatEx2(This, pwszFileSystemTypeName, usFileSystemRevision, ulDesiredUnitAllocationSize, pwszLabel, Options, ppAsync) (This)->lpVtbl->FormatEx2(This, pwszFileSystemTypeName, usFileSystemRevision, ulDesiredUnitAllocationSize, pwszLabel, Options, ppAsync)
63 #define IVdsVolumeMF3_Release(This) (This)->lpVtbl->Release(This)
64 #define IVdsVolume_GetProperties(This, pVolumeProperties) (This)->lpVtbl->GetProperties(This,pVolumeProperties)
65 #define IVdsAsync_Cancel(This) (This)->lpVtbl->Cancel(This)
66 #define IVdsAsync_QueryStatus(This,pHrResult,pulPercentCompleted) (This)->lpVtbl->QueryStatus(This,pHrResult,pulPercentCompleted)
67 #define IVdsAsync_Wait(This,pHrResult,pAsyncOut) (This)->lpVtbl->Wait(This,pHrResult,pAsyncOut)
68 #define IVdsAsync_Release(This) (This)->lpVtbl->Release(This)
69
70 #define IUnknown_QueryInterface(This, a, b) (This)->lpVtbl->QueryInterface(This,a,b)
71 #define IUnknown_Release(This) (This)->lpVtbl->Release(This)
72
73 /*
74 * Delete all the partitions from a disk, using VDS
75 * Mostly copied from https://social.msdn.microsoft.com/Forums/vstudio/en-US/b90482ae-4e44-4b08-8731-81915030b32a/createpartition-using-vds-interface-throw-error-enointerface-dcom?forum=vcgeneral
76 */
77 BOOL DeletePartitions(DWORD DriveIndex, BOOL OnlyPart2)
78 {
79 BOOL r = FALSE;
80 HRESULT hr;
81 ULONG ulFetched;
82 wchar_t wPhysicalName[48];
83 IVdsServiceLoader *pLoader;
84 IVdsService *pService;
85 IEnumVdsObject *pEnum;
86 IUnknown *pUnk;
87
88 swprintf_s(wPhysicalName, ARRAYSIZE(wPhysicalName), L"\\\\?\\PhysicalDrive%lu", DriveIndex);
89
90 // Initialize COM
91 CoInitializeEx(NULL, COINIT_APARTMENTTHREADED);
92 CoInitializeSecurity(NULL, -1, NULL, NULL, RPC_C_AUTHN_LEVEL_CONNECT,
93 RPC_C_IMP_LEVEL_IMPERSONATE, NULL, 0, NULL);
94
95 // Create a VDS Loader Instance
96 hr = CoCreateInstance(&CLSID_VdsLoader, NULL, CLSCTX_LOCAL_SERVER | CLSCTX_REMOTE_SERVER,
97 &IID_IVdsServiceLoader, (void **)&pLoader);
98 if (hr != S_OK) {
99 VDS_SET_ERROR(hr);
100 Log("Could not create VDS Loader Instance: %u", LASTERR);
101 goto out;
102 }
103
104 // Load the VDS Service
105 hr = IVdsServiceLoader_LoadService(pLoader, L"", &pService);
106 IVdsServiceLoader_Release(pLoader);
107 if (hr != S_OK) {
108 VDS_SET_ERROR(hr);
109 Log("Could not load VDS Service: %u", LASTERR);
110 goto out;
111 }
112
113 // Wait for the Service to become ready if needed
114 hr = IVdsService_WaitForServiceReady(pService);
115 if (hr != S_OK) {
116 VDS_SET_ERROR(hr);
117 Log("VDS Service is not ready: %u", LASTERR);
118 goto out;
119 }
120
121 // Query the VDS Service Providers
122 hr = IVdsService_QueryProviders(pService, VDS_QUERY_SOFTWARE_PROVIDERS, &pEnum);
123 if (hr != S_OK) {
124 VDS_SET_ERROR(hr);
125 Log("Could not query VDS Service Providers: %u", LASTERR);
126 goto out;
127 }
128
129 while (IEnumVdsObject_Next(pEnum, 1, &pUnk, &ulFetched) == S_OK) {
130 IVdsProvider *pProvider;
131 IVdsSwProvider *pSwProvider;
132 IEnumVdsObject *pEnumPack;
133 IUnknown *pPackUnk;
134
135 // Get VDS Provider
136 hr = IUnknown_QueryInterface(pUnk, &IID_IVdsProvider, (void **)&pProvider);
137 IUnknown_Release(pUnk);
138 if (hr != S_OK) {
139 VDS_SET_ERROR(hr);
140 Log("Could not get VDS Provider: %u", LASTERR);
141 goto out;
142 }
143
144 // Get VDS Software Provider
145 hr = IVdsSwProvider_QueryInterface(pProvider, &IID_IVdsSwProvider, (void **)&pSwProvider);
146 IVdsProvider_Release(pProvider);
147 if (hr != S_OK) {
148 VDS_SET_ERROR(hr);
149 Log("Could not get VDS Software Provider: %u", LASTERR);
150 goto out;
151 }
152
153 // Get VDS Software Provider Packs
154 hr = IVdsSwProvider_QueryPacks(pSwProvider, &pEnumPack);
155 IVdsSwProvider_Release(pSwProvider);
156 if (hr != S_OK) {
157 VDS_SET_ERROR(hr);
158 Log("Could not get VDS Software Provider Packs: %u", LASTERR);
159 goto out;
160 }
161
162 // Enumerate Provider Packs
163 while (IEnumVdsObject_Next(pEnumPack, 1, &pPackUnk, &ulFetched) == S_OK) {
164 IVdsPack *pPack;
165 IEnumVdsObject *pEnumDisk;
166 IUnknown *pDiskUnk;
167
168 hr = IUnknown_QueryInterface(pPackUnk, &IID_IVdsPack, (void **)&pPack);
169 IUnknown_Release(pPackUnk);
170 if (hr != S_OK) {
171 VDS_SET_ERROR(hr);
172 Log("Could not query VDS Software Provider Pack: %u", LASTERR);
173 goto out;
174 }
175
176 // Use the pack interface to access the disks
177 hr = IVdsPack_QueryDisks(pPack, &pEnumDisk);
178 if (hr != S_OK) {
179 VDS_SET_ERROR(hr);
180 Log("Could not query VDS disks: %u", LASTERR);
181 goto out;
182 }
183
184 // List disks
185 while (IEnumVdsObject_Next(pEnumDisk, 1, &pDiskUnk, &ulFetched) == S_OK) {
186 VDS_DISK_PROP diskprop;
187 VDS_PARTITION_PROP* prop_array;
188 LONG i, prop_array_size;
189 IVdsDisk *pDisk;
190 IVdsAdvancedDisk *pAdvancedDisk;
191
192 // Get the disk interface.
193 hr = IUnknown_QueryInterface(pDiskUnk, &IID_IVdsDisk, (void **)&pDisk);
194 if (hr != S_OK) {
195 VDS_SET_ERROR(hr);
196 Log("Could not query VDS Disk Interface: %u", LASTERR);
197 goto out;
198 }
199
200 // Get the disk properties
201 hr = IVdsDisk_GetProperties(pDisk, &diskprop);
202 if (hr != S_OK) {
203 VDS_SET_ERROR(hr);
204 Log("Could not query VDS Disk Properties: %u", LASTERR);
205 goto out;
206 }
207
208 // Isolate the disk we want
209 if (_wcsicmp(wPhysicalName, diskprop.pwszName) != 0) {
210 IVdsDisk_Release(pDisk);
211 continue;
212 }
213
214 // Instantiate the AdvanceDisk interface for our disk.
215 hr = IVdsDisk_QueryInterface(pDisk, &IID_IVdsAdvancedDisk, (void **)&pAdvancedDisk);
216 IVdsDisk_Release(pDisk);
217 if (hr != S_OK) {
218 VDS_SET_ERROR(hr);
219 Log("Could not access VDS Advanced Disk interface: %u", LASTERR);
220 goto out;
221 }
222
223 // Query the partition data, so we can get the start offset, which we need for deletion
224 hr = IVdsAdvancedDisk_QueryPartitions(pAdvancedDisk, &prop_array, &prop_array_size);
225 if (hr == S_OK) {
226 Log("Deleting ALL partition(s) from disk '%S':", diskprop.pwszName);
227 // Now go through each partition
228 for (i = 0; i < prop_array_size; i++) {
229
230 Log("* Partition %d (offset: %lld, size: %llu)", prop_array[i].ulPartitionNumber,
231 prop_array[i].ullOffset, (ULONGLONG)prop_array[i].ullSize);
232
233 if (OnlyPart2 && prop_array[i].ullOffset == 2048*512)
234 {
235 Log("Skip this partition...");
236 continue;
237 }
238
239
240 hr = IVdsAdvancedDisk_DeletePartition(pAdvancedDisk, prop_array[i].ullOffset, TRUE, TRUE);
241 if (hr != S_OK) {
242 r = FALSE;
243 VDS_SET_ERROR(hr);
244 Log("Could not delete partitions: %u", LASTERR);
245 }
246 }
247 r = TRUE;
248 }
249 else {
250 Log("No partition to delete on disk '%S'", diskprop.pwszName);
251 r = TRUE;
252 }
253 CoTaskMemFree(prop_array);
254
255 #if 0
256 // Issue a Clean while we're at it
257 HRESULT hr2 = E_FAIL;
258 ULONG completed;
259 IVdsAsync* pAsync;
260 hr = IVdsAdvancedDisk_Clean(pAdvancedDisk, TRUE, FALSE, FALSE, &pAsync);
261 while (SUCCEEDED(hr)) {
262 if (IS_ERROR(FormatStatus)) {
263 IVdsAsync_Cancel(pAsync);
264 break;
265 }
266 hr = IVdsAsync_QueryStatus(pAsync, &hr2, &completed);
267 if (SUCCEEDED(hr)) {
268 hr = hr2;
269 if (hr == S_OK)
270 break;
271 if (hr == VDS_E_OPERATION_PENDING)
272 hr = S_OK;
273 }
274 Sleep(500);
275 }
276 if (hr != S_OK) {
277 VDS_SET_ERROR(hr);
278 Log("Could not clean disk: %s", LASTERR);
279 }
280 #endif
281 IVdsAdvancedDisk_Release(pAdvancedDisk);
282 goto out;
283 }
284 }
285 }
286
287 out:
288 return r;
289 }
290
291
292 static DWORD GetVentoyVolumeName(int PhyDrive, UINT32 StartSectorId, CHAR *NameBuf, UINT32 BufLen, BOOL DelSlash)
293 {
294 size_t len;
295 BOOL bRet;
296 DWORD dwSize;
297 HANDLE hDrive;
298 HANDLE hVolume;
299 UINT64 PartOffset;
300 DWORD Status = ERROR_NOT_FOUND;
301 DISK_EXTENT *pExtents = NULL;
302 CHAR VolumeName[MAX_PATH] = { 0 };
303 VOLUME_DISK_EXTENTS DiskExtents;
304
305 PartOffset = 512ULL * StartSectorId;
306
307 Log("GetVentoyVolumeName PhyDrive %d SectorStart:%u PartOffset:%llu", PhyDrive, StartSectorId, (ULONGLONG)PartOffset);
308
309 hVolume = FindFirstVolumeA(VolumeName, sizeof(VolumeName));
310 if (hVolume == INVALID_HANDLE_VALUE)
311 {
312 return 1;
313 }
314
315 do {
316
317 len = strlen(VolumeName);
318 Log("Find volume:%s", VolumeName);
319
320 VolumeName[len - 1] = 0;
321
322 hDrive = CreateFileA(VolumeName, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL);
323 if (hDrive == INVALID_HANDLE_VALUE)
324 {
325 continue;
326 }
327
328 bRet = DeviceIoControl(hDrive,
329 IOCTL_VOLUME_GET_VOLUME_DISK_EXTENTS,
330 NULL,
331 0,
332 &DiskExtents,
333 (DWORD)(sizeof(DiskExtents)),
334 (LPDWORD)&dwSize,
335 NULL);
336
337 Log("IOCTL_VOLUME_GET_VOLUME_DISK_EXTENTS bRet:%u code:%u", bRet, LASTERR);
338 Log("NumberOfDiskExtents:%u DiskNumber:%u", DiskExtents.NumberOfDiskExtents, DiskExtents.Extents[0].DiskNumber);
339
340 if (bRet && DiskExtents.NumberOfDiskExtents == 1)
341 {
342 pExtents = DiskExtents.Extents;
343
344 Log("This volume DiskNumber:%u offset:%llu", pExtents->DiskNumber, (ULONGLONG)pExtents->StartingOffset.QuadPart);
345 if ((int)pExtents->DiskNumber == PhyDrive && pExtents->StartingOffset.QuadPart == PartOffset)
346 {
347 Log("This volume match");
348
349 if (!DelSlash)
350 {
351 VolumeName[len - 1] = '\\';
352 }
353
354 sprintf_s(NameBuf, BufLen, "%s", VolumeName);
355 Status = ERROR_SUCCESS;
356 CloseHandle(hDrive);
357 break;
358 }
359 }
360
361 CloseHandle(hDrive);
362 } while (FindNextVolumeA(hVolume, VolumeName, sizeof(VolumeName)));
363
364 FindVolumeClose(hVolume);
365
366 Log("GetVentoyVolumeName return %u", Status);
367 return Status;
368 }
369
370 static int GetLettersBelongPhyDrive(int PhyDrive, char *DriveLetters, size_t Length)
371 {
372 int n = 0;
373 DWORD DataSize = 0;
374 CHAR *Pos = NULL;
375 CHAR *StringBuf = NULL;
376
377 DataSize = GetLogicalDriveStringsA(0, NULL);
378 StringBuf = (CHAR *)malloc(DataSize + 1);
379 if (StringBuf == NULL)
380 {
381 return 1;
382 }
383
384 GetLogicalDriveStringsA(DataSize, StringBuf);
385
386 for (Pos = StringBuf; *Pos; Pos += strlen(Pos) + 1)
387 {
388 if (n < (int)Length && PhyDrive == GetPhyDriveByLogicalDrive(Pos[0]))
389 {
390 Log("%C: is belong to phydrive%d", Pos[0], PhyDrive);
391 DriveLetters[n++] = Pos[0];
392 }
393 }
394
395 free(StringBuf);
396 return 0;
397 }
398
399 static HANDLE GetPhysicalHandle(int Drive, BOOLEAN bLockDrive, BOOLEAN bWriteAccess, BOOLEAN bWriteShare)
400 {
401 int i;
402 DWORD dwSize;
403 DWORD LastError;
404 UINT64 EndTime;
405 HANDLE hDrive = INVALID_HANDLE_VALUE;
406 CHAR PhyDrive[128];
407 CHAR DevPath[MAX_PATH] = { 0 };
408
409 safe_sprintf(PhyDrive, "\\\\.\\PhysicalDrive%d", Drive);
410
411 if (0 == QueryDosDeviceA(PhyDrive + 4, DevPath, sizeof(DevPath)))
412 {
413 Log("QueryDosDeviceA failed error:%u", GetLastError());
414 strcpy_s(DevPath, sizeof(DevPath), "???");
415 }
416 else
417 {
418 Log("QueryDosDeviceA success %s", DevPath);
419 }
420
421 for (i = 0; i < DRIVE_ACCESS_RETRIES; i++)
422 {
423 // Try without FILE_SHARE_WRITE (unless specifically requested) so that
424 // we won't be bothered by the OS or other apps when we set up our data.
425 // However this means we might have to wait for an access gap...
426 // We keep FILE_SHARE_READ though, as this shouldn't hurt us any, and is
427 // required for enumeration.
428 hDrive = CreateFileA(PhyDrive,
429 GENERIC_READ | (bWriteAccess ? GENERIC_WRITE : 0),
430 FILE_SHARE_READ | (bWriteShare ? FILE_SHARE_WRITE : 0),
431 NULL,
432 OPEN_EXISTING,
433 FILE_ATTRIBUTE_NORMAL | FILE_FLAG_NO_BUFFERING | FILE_FLAG_WRITE_THROUGH,
434 NULL);
435
436 LastError = GetLastError();
437 Log("[%d] CreateFileA %s code:%u %p", i, PhyDrive, LastError, hDrive);
438
439 if (hDrive != INVALID_HANDLE_VALUE)
440 {
441 break;
442 }
443
444 if ((LastError != ERROR_SHARING_VIOLATION) && (LastError != ERROR_ACCESS_DENIED))
445 {
446 break;
447 }
448
449 if (i == 0)
450 {
451 Log("Waiting for access on %s [%s]...", PhyDrive, DevPath);
452 }
453 else if (!bWriteShare && (i > DRIVE_ACCESS_RETRIES / 3))
454 {
455 // If we can't seem to get a hold of the drive for some time, try to enable FILE_SHARE_WRITE...
456 Log("Warning: Could not obtain exclusive rights. Retrying with write sharing enabled...");
457 bWriteShare = TRUE;
458
459 // Try to report the process that is locking the drive
460 // We also use bit 6 as a flag to indicate that SearchProcess was called.
461 //access_mask = SearchProcess(DevPath, SEARCH_PROCESS_TIMEOUT, TRUE, TRUE, FALSE) | 0x40;
462
463 }
464 Sleep(DRIVE_ACCESS_TIMEOUT / DRIVE_ACCESS_RETRIES);
465 }
466
467 if (hDrive == INVALID_HANDLE_VALUE)
468 {
469 Log("Could not open %s %u", PhyDrive, LASTERR);
470 goto End;
471 }
472
473 if (bWriteAccess)
474 {
475 Log("Opened %s for %s write access", PhyDrive, bWriteShare ? "shared" : "exclusive");
476 }
477
478 if (bLockDrive)
479 {
480 if (DeviceIoControl(hDrive, FSCTL_ALLOW_EXTENDED_DASD_IO, NULL, 0, NULL, 0, &dwSize, NULL))
481 {
482 Log("I/O boundary checks disabled");
483 }
484
485 EndTime = GetTickCount64() + DRIVE_ACCESS_TIMEOUT;
486
487 do {
488 if (DeviceIoControl(hDrive, FSCTL_LOCK_VOLUME, NULL, 0, NULL, 0, &dwSize, NULL))
489 {
490 Log("FSCTL_LOCK_VOLUME success");
491 goto End;
492 }
493 Sleep(DRIVE_ACCESS_TIMEOUT / DRIVE_ACCESS_RETRIES);
494 } while (GetTickCount64() < EndTime);
495
496 // If we reached this section, either we didn't manage to get a lock or the user cancelled
497 Log("Could not lock access to %s %u", PhyDrive, LASTERR);
498
499 // See if we can report the processes are accessing the drive
500 //if (!IS_ERROR(FormatStatus) && (access_mask == 0))
501 // access_mask = SearchProcess(DevPath, SEARCH_PROCESS_TIMEOUT, TRUE, TRUE, FALSE);
502 // Try to continue if the only access rights we saw were for read-only
503 //if ((access_mask & 0x07) != 0x01)
504 // safe_closehandle(hDrive);
505
506 CHECK_CLOSE_HANDLE(hDrive);
507 }
508
509 End:
510
511 if (hDrive == INVALID_HANDLE_VALUE)
512 {
513 Log("Can get handle of %s, maybe some process control it.", DevPath);
514 }
515
516 return hDrive;
517 }
518
519 int GetPhyDriveByLogicalDrive(int DriveLetter)
520 {
521 BOOL Ret;
522 DWORD dwSize;
523 HANDLE Handle;
524 VOLUME_DISK_EXTENTS DiskExtents;
525 CHAR PhyPath[128];
526
527 safe_sprintf(PhyPath, "\\\\.\\%C:", (CHAR)DriveLetter);
528
529 Handle = CreateFileA(PhyPath, GENERIC_READ, FILE_SHARE_READ | FILE_SHARE_WRITE, 0, OPEN_EXISTING, 0, 0);
530 if (Handle == INVALID_HANDLE_VALUE)
531 {
532 Log("Could not open the disk<%s>, error:%u", PhyPath, LASTERR);
533 return -1;
534 }
535
536 Ret = DeviceIoControl(Handle,
537 IOCTL_VOLUME_GET_VOLUME_DISK_EXTENTS,
538 NULL,
539 0,
540 &DiskExtents,
541 (DWORD)(sizeof(DiskExtents)),
542 (LPDWORD)&dwSize,
543 NULL);
544
545 if (!Ret || DiskExtents.NumberOfDiskExtents == 0)
546 {
547 Log("DeviceIoControl IOCTL_VOLUME_GET_VOLUME_DISK_EXTENTS failed %s, error:%u", PhyPath, LASTERR);
548 CHECK_CLOSE_HANDLE(Handle);
549 return -1;
550 }
551 CHECK_CLOSE_HANDLE(Handle);
552
553 Log("LogicalDrive:%s PhyDrive:%d Offset:%llu ExtentLength:%llu",
554 PhyPath,
555 DiskExtents.Extents[0].DiskNumber,
556 DiskExtents.Extents[0].StartingOffset.QuadPart,
557 DiskExtents.Extents[0].ExtentLength.QuadPart
558 );
559
560 return (int)DiskExtents.Extents[0].DiskNumber;
561 }
562
563 int GetAllPhysicalDriveInfo(PHY_DRIVE_INFO *pDriveList, DWORD *pDriveCount)
564 {
565 int i;
566 int Count;
567 int id;
568 int Letter = 'A';
569 BOOL bRet;
570 DWORD dwBytes;
571 DWORD DriveCount = 0;
572 HANDLE Handle = INVALID_HANDLE_VALUE;
573 CHAR PhyDrive[128];
574 PHY_DRIVE_INFO *CurDrive = pDriveList;
575 GET_LENGTH_INFORMATION LengthInfo;
576 STORAGE_PROPERTY_QUERY Query;
577 STORAGE_DESCRIPTOR_HEADER DevDescHeader;
578 STORAGE_DEVICE_DESCRIPTOR *pDevDesc;
579 int PhyDriveId[VENTOY_MAX_PHY_DRIVE];
580
581 Count = GetPhysicalDriveCount();
582
583 for (i = 0; i < Count && i < VENTOY_MAX_PHY_DRIVE; i++)
584 {
585 PhyDriveId[i] = i;
586 }
587
588 dwBytes = GetLogicalDrives();
589 Log("Logical Drives: 0x%x", dwBytes);
590 while (dwBytes)
591 {
592 if (dwBytes & 0x01)
593 {
594 id = GetPhyDriveByLogicalDrive(Letter);
595 Log("%C --> %d", Letter, id);
596 if (id >= 0)
597 {
598 for (i = 0; i < Count; i++)
599 {
600 if (PhyDriveId[i] == id)
601 {
602 break;
603 }
604 }
605
606 if (i >= Count)
607 {
608 Log("Add phy%d to list", i);
609 PhyDriveId[Count] = id;
610 Count++;
611 }
612 }
613 }
614
615 Letter++;
616 dwBytes >>= 1;
617 }
618
619 for (i = 0; i < Count && DriveCount < VENTOY_MAX_PHY_DRIVE; i++)
620 {
621 CHECK_CLOSE_HANDLE(Handle);
622
623 safe_sprintf(PhyDrive, "\\\\.\\PhysicalDrive%d", PhyDriveId[i]);
624 Handle = CreateFileA(PhyDrive, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, 0, NULL);
625 Log("Create file Handle:%p %s status:%u", Handle, PhyDrive, LASTERR);
626
627 if (Handle == INVALID_HANDLE_VALUE)
628 {
629 continue;
630 }
631
632 bRet = DeviceIoControl(Handle,
633 IOCTL_DISK_GET_LENGTH_INFO, NULL,
634 0,
635 &LengthInfo,
636 sizeof(LengthInfo),
637 &dwBytes,
638 NULL);
639 if (!bRet)
640 {
641 Log("DeviceIoControl IOCTL_DISK_GET_LENGTH_INFO failed error:%u", LASTERR);
642 continue;
643 }
644
645 Log("PHYSICALDRIVE%d size %llu bytes", i, (ULONGLONG)LengthInfo.Length.QuadPart);
646
647 Query.PropertyId = StorageDeviceProperty;
648 Query.QueryType = PropertyStandardQuery;
649
650 bRet = DeviceIoControl(Handle,
651 IOCTL_STORAGE_QUERY_PROPERTY,
652 &Query,
653 sizeof(Query),
654 &DevDescHeader,
655 sizeof(STORAGE_DESCRIPTOR_HEADER),
656 &dwBytes,
657 NULL);
658 if (!bRet)
659 {
660 Log("DeviceIoControl1 error:%u dwBytes:%u", LASTERR, dwBytes);
661 continue;
662 }
663
664 if (DevDescHeader.Size < sizeof(STORAGE_DEVICE_DESCRIPTOR))
665 {
666 Log("Invalid DevDescHeader.Size:%u", DevDescHeader.Size);
667 continue;
668 }
669
670 pDevDesc = (STORAGE_DEVICE_DESCRIPTOR *)malloc(DevDescHeader.Size);
671 if (!pDevDesc)
672 {
673 Log("failed to malloc error:%u len:%u", LASTERR, DevDescHeader.Size);
674 continue;
675 }
676
677 bRet = DeviceIoControl(Handle,
678 IOCTL_STORAGE_QUERY_PROPERTY,
679 &Query,
680 sizeof(Query),
681 pDevDesc,
682 DevDescHeader.Size,
683 &dwBytes,
684 NULL);
685 if (!bRet)
686 {
687 Log("DeviceIoControl2 error:%u dwBytes:%u", LASTERR, dwBytes);
688 free(pDevDesc);
689 continue;
690 }
691
692 CurDrive->PhyDrive = i;
693 CurDrive->SizeInBytes = LengthInfo.Length.QuadPart;
694 CurDrive->DeviceType = pDevDesc->DeviceType;
695 CurDrive->RemovableMedia = pDevDesc->RemovableMedia;
696 CurDrive->BusType = pDevDesc->BusType;
697
698 if (pDevDesc->VendorIdOffset)
699 {
700 safe_strcpy(CurDrive->VendorId, (char *)pDevDesc + pDevDesc->VendorIdOffset);
701 TrimString(CurDrive->VendorId);
702 }
703
704 if (pDevDesc->ProductIdOffset)
705 {
706 safe_strcpy(CurDrive->ProductId, (char *)pDevDesc + pDevDesc->ProductIdOffset);
707 TrimString(CurDrive->ProductId);
708 }
709
710 if (pDevDesc->ProductRevisionOffset)
711 {
712 safe_strcpy(CurDrive->ProductRev, (char *)pDevDesc + pDevDesc->ProductRevisionOffset);
713 TrimString(CurDrive->ProductRev);
714 }
715
716 if (pDevDesc->SerialNumberOffset)
717 {
718 safe_strcpy(CurDrive->SerialNumber, (char *)pDevDesc + pDevDesc->SerialNumberOffset);
719 TrimString(CurDrive->SerialNumber);
720 }
721
722 CurDrive++;
723 DriveCount++;
724
725 free(pDevDesc);
726
727 CHECK_CLOSE_HANDLE(Handle);
728 }
729
730 for (i = 0, CurDrive = pDriveList; i < (int)DriveCount; i++, CurDrive++)
731 {
732 Log("PhyDrv:%d BusType:%-4s Removable:%u Size:%dGB(%llu) Name:%s %s",
733 CurDrive->PhyDrive, GetBusTypeString(CurDrive->BusType), CurDrive->RemovableMedia,
734 GetHumanReadableGBSize(CurDrive->SizeInBytes), CurDrive->SizeInBytes,
735 CurDrive->VendorId, CurDrive->ProductId);
736 }
737
738 *pDriveCount = DriveCount;
739
740 return 0;
741 }
742
743
744 static HANDLE g_FatPhyDrive;
745 static UINT64 g_Part2StartSec;
746 static int GetVentoyVersionFromFatFile(CHAR *VerBuf, size_t BufLen)
747 {
748 int rc = 1;
749 int size = 0;
750 char *buf = NULL;
751 void *flfile = NULL;
752
753 flfile = fl_fopen("/grub/grub.cfg", "rb");
754 if (flfile)
755 {
756 fl_fseek(flfile, 0, SEEK_END);
757 size = (int)fl_ftell(flfile);
758
759 fl_fseek(flfile, 0, SEEK_SET);
760
761 buf = (char *)malloc(size + 1);
762 if (buf)
763 {
764 fl_fread(buf, 1, size, flfile);
765 buf[size] = 0;
766
767 rc = 0;
768 sprintf_s(VerBuf, BufLen, "%s", ParseVentoyVersionFromString(buf));
769 free(buf);
770 }
771
772 fl_fclose(flfile);
773 }
774
775 return rc;
776 }
777
778 static int VentoyFatDiskRead(uint32 Sector, uint8 *Buffer, uint32 SectorCount)
779 {
780 DWORD dwSize;
781 BOOL bRet;
782 DWORD ReadSize;
783 LARGE_INTEGER liCurrentPosition;
784
785 liCurrentPosition.QuadPart = Sector + g_Part2StartSec;
786 liCurrentPosition.QuadPart *= 512;
787 SetFilePointerEx(g_FatPhyDrive, liCurrentPosition, &liCurrentPosition, FILE_BEGIN);
788
789 ReadSize = (DWORD)(SectorCount * 512);
790
791 bRet = ReadFile(g_FatPhyDrive, Buffer, ReadSize, &dwSize, NULL);
792 if (bRet == FALSE || dwSize != ReadSize)
793 {
794 Log("ReadFile error bRet:%u WriteSize:%u dwSize:%u ErrCode:%u\n", bRet, ReadSize, dwSize, LASTERR);
795 }
796
797 return 1;
798 }
799
800
801 int GetVentoyVerInPhyDrive(const PHY_DRIVE_INFO *pDriveInfo, MBR_HEAD *pMBR, CHAR *VerBuf, size_t BufLen)
802 {
803 int rc = 0;
804 HANDLE hDrive;
805
806 hDrive = GetPhysicalHandle(pDriveInfo->PhyDrive, FALSE, FALSE, FALSE);
807 if (hDrive == INVALID_HANDLE_VALUE)
808 {
809 return 1;
810 }
811
812 g_FatPhyDrive = hDrive;
813 g_Part2StartSec = pMBR->PartTbl[1].StartSectorId;
814
815 Log("Parse FAT fs...");
816
817 fl_init();
818
819 if (0 == fl_attach_media(VentoyFatDiskRead, NULL))
820 {
821 rc = GetVentoyVersionFromFatFile(VerBuf, BufLen);
822 }
823 else
824 {
825 rc = 1;
826 }
827
828 fl_shutdown();
829
830 CHECK_CLOSE_HANDLE(hDrive);
831
832 return rc;
833 }
834
835
836
837
838
839 static unsigned int g_disk_unxz_len = 0;
840 static BYTE *g_part_img_pos = NULL;
841 static BYTE *g_part_img_buf[VENTOY_EFI_PART_SIZE / SIZE_1MB];
842
843
844 static int VentoyFatMemRead(uint32 Sector, uint8 *Buffer, uint32 SectorCount)
845 {
846 uint32 i;
847 uint32 offset;
848 BYTE *MbBuf = NULL;
849
850 for (i = 0; i < SectorCount; i++)
851 {
852 offset = (Sector + i) * 512;
853
854 if (g_part_img_buf[1] == NULL)
855 {
856 MbBuf = g_part_img_buf[0] + offset;
857 memcpy(Buffer + i * 512, MbBuf, 512);
858 }
859 else
860 {
861 MbBuf = g_part_img_buf[offset / SIZE_1MB];
862 memcpy(Buffer + i * 512, MbBuf + (offset % SIZE_1MB), 512);
863 }
864 }
865
866 return 1;
867 }
868
869
870 static int VentoyFatMemWrite(uint32 Sector, uint8 *Buffer, uint32 SectorCount)
871 {
872 uint32 i;
873 uint32 offset;
874 BYTE *MbBuf = NULL;
875
876 for (i = 0; i < SectorCount; i++)
877 {
878 offset = (Sector + i) * 512;
879
880 if (g_part_img_buf[1] == NULL)
881 {
882 MbBuf = g_part_img_buf[0] + offset;
883 memcpy(MbBuf, Buffer + i * 512, 512);
884 }
885 else
886 {
887 MbBuf = g_part_img_buf[offset / SIZE_1MB];
888 memcpy(MbBuf + (offset % SIZE_1MB), Buffer + i * 512, 512);
889 }
890 }
891
892 return 1;
893 }
894
895 int VentoyProcSecureBoot(BOOL SecureBoot)
896 {
897 int rc = 0;
898 int size;
899 char *filebuf = NULL;
900 void *file = NULL;
901
902 Log("VentoyProcSecureBoot %d ...", SecureBoot);
903
904 if (SecureBoot)
905 {
906 Log("Secure boot is enabled ...");
907 return 0;
908 }
909
910 fl_init();
911
912 if (0 == fl_attach_media(VentoyFatMemRead, VentoyFatMemWrite))
913 {
914 file = fl_fopen("/EFI/BOOT/grubx64_real.efi", "rb");
915 Log("Open ventoy efi file %p ", file);
916 if (file)
917 {
918 fl_fseek(file, 0, SEEK_END);
919 size = (int)fl_ftell(file);
920 fl_fseek(file, 0, SEEK_SET);
921
922 Log("ventoy efi file size %d ...", size);
923
924 filebuf = (char *)malloc(size);
925 if (filebuf)
926 {
927 fl_fread(filebuf, 1, size, file);
928 }
929
930 fl_fclose(file);
931
932 Log("Now delete all efi files ...");
933 fl_remove("/EFI/BOOT/BOOTX64.EFI");
934 fl_remove("/EFI/BOOT/grubx64.efi");
935 fl_remove("/EFI/BOOT/grubx64_real.efi");
936 fl_remove("/EFI/BOOT/MokManager.efi");
937
938 file = fl_fopen("/EFI/BOOT/BOOTX64.EFI", "wb");
939 Log("Open bootx64 efi file %p ", file);
940 if (file)
941 {
942 if (filebuf)
943 {
944 fl_fwrite(filebuf, 1, size, file);
945 }
946
947 fl_fflush(file);
948 fl_fclose(file);
949 }
950
951 if (filebuf)
952 {
953 free(filebuf);
954 }
955 }
956 }
957 else
958 {
959 rc = 1;
960 }
961
962 fl_shutdown();
963
964 return rc;
965 }
966
967
968
969 static int disk_xz_flush(void *src, unsigned int size)
970 {
971 unsigned int i;
972 BYTE *buf = (BYTE *)src;
973
974 for (i = 0; i < size; i++)
975 {
976 *g_part_img_pos = *buf++;
977
978 g_disk_unxz_len++;
979 if ((g_disk_unxz_len % SIZE_1MB) == 0)
980 {
981 g_part_img_pos = g_part_img_buf[g_disk_unxz_len / SIZE_1MB];
982 }
983 else
984 {
985 g_part_img_pos++;
986 }
987 }
988
989 return (int)size;
990 }
991
992 static void unxz_error(char *x)
993 {
994 Log("%s", x);
995 }
996
997 static BOOL TryWritePart2(HANDLE hDrive, UINT64 StartSectorId)
998 {
999 BOOL bRet;
1000 DWORD TrySize = 16 * 1024;
1001 DWORD dwSize;
1002 BYTE *Buffer = NULL;
1003 unsigned char *data = NULL;
1004 LARGE_INTEGER liCurrentPosition;
1005
1006 liCurrentPosition.QuadPart = StartSectorId * 512;
1007 SetFilePointerEx(hDrive, liCurrentPosition, &liCurrentPosition, FILE_BEGIN);
1008
1009 Buffer = malloc(TrySize);
1010
1011 bRet = WriteFile(hDrive, Buffer, TrySize, &dwSize, NULL);
1012
1013 free(Buffer);
1014
1015 Log("Try write part2 bRet:%u dwSize:%u code:%u", bRet, dwSize, LASTERR);
1016
1017 if (bRet && dwSize == TrySize)
1018 {
1019 return TRUE;
1020 }
1021
1022 return FALSE;
1023 }
1024
1025 static int FormatPart2Fat(HANDLE hDrive, UINT64 StartSectorId)
1026 {
1027 int i;
1028 int rc = 0;
1029 int len = 0;
1030 int writelen = 0;
1031 int partwrite = 0;
1032 DWORD dwSize = 0;
1033 BOOL bRet;
1034 unsigned char *data = NULL;
1035 LARGE_INTEGER liCurrentPosition;
1036 LARGE_INTEGER liNewPosition;
1037
1038 Log("FormatPart2Fat %llu...", StartSectorId);
1039
1040 rc = ReadWholeFileToBuf(VENTOY_FILE_DISK_IMG, 0, (void **)&data, &len);
1041 if (rc)
1042 {
1043 Log("Failed to read img file %p %u", data, len);
1044 return 1;
1045 }
1046
1047 liCurrentPosition.QuadPart = StartSectorId * 512;
1048 SetFilePointerEx(hDrive, liCurrentPosition, &liNewPosition, FILE_BEGIN);
1049
1050 Log("Set file pointer: %llu New pointer:%llu", liCurrentPosition.QuadPart, liNewPosition.QuadPart);
1051
1052 memset(g_part_img_buf, 0, sizeof(g_part_img_buf));
1053
1054 g_part_img_buf[0] = (BYTE *)malloc(VENTOY_EFI_PART_SIZE);
1055 if (g_part_img_buf[0])
1056 {
1057 Log("Malloc whole img buffer success, now decompress ...");
1058 unxz(data, len, NULL, NULL, g_part_img_buf[0], &writelen, unxz_error);
1059
1060 if (len == writelen)
1061 {
1062 Log("decompress finished success");
1063
1064 VentoyProcSecureBoot(g_SecureBoot);
1065
1066 for (i = 0; i < VENTOY_EFI_PART_SIZE / SIZE_1MB; i++)
1067 {
1068 dwSize = 0;
1069 bRet = WriteFile(hDrive, g_part_img_buf[0] + i * SIZE_1MB, SIZE_1MB, &dwSize, NULL);
1070 Log("Write part data bRet:%u dwSize:%u code:%u", bRet, dwSize, LASTERR);
1071
1072 if (!bRet)
1073 {
1074 rc = 1;
1075 goto End;
1076 }
1077
1078 PROGRESS_BAR_SET_POS(PT_WRITE_VENTOY_START + i);
1079 }
1080 }
1081 else
1082 {
1083 rc = 1;
1084 Log("decompress finished failed");
1085 goto End;
1086 }
1087 }
1088 else
1089 {
1090 Log("Failed to malloc whole img size %u, now split it", VENTOY_EFI_PART_SIZE);
1091
1092 partwrite = 1;
1093 for (i = 0; i < VENTOY_EFI_PART_SIZE / SIZE_1MB; i++)
1094 {
1095 g_part_img_buf[i] = (BYTE *)malloc(SIZE_1MB);
1096 if (g_part_img_buf[i] == NULL)
1097 {
1098 rc = 1;
1099 goto End;
1100 }
1101 }
1102
1103 Log("Malloc part img buffer success, now decompress ...");
1104
1105 g_part_img_pos = g_part_img_buf[0];
1106
1107 unxz(data, len, NULL, disk_xz_flush, NULL, NULL, unxz_error);
1108
1109 if (g_disk_unxz_len == VENTOY_EFI_PART_SIZE)
1110 {
1111 Log("decompress finished success");
1112
1113 VentoyProcSecureBoot(g_SecureBoot);
1114
1115 for (int i = 0; i < VENTOY_EFI_PART_SIZE / SIZE_1MB; i++)
1116 {
1117 dwSize = 0;
1118 bRet = WriteFile(hDrive, g_part_img_buf[i], SIZE_1MB, &dwSize, NULL);
1119 Log("Write part data bRet:%u dwSize:%u code:%u", bRet, dwSize, LASTERR);
1120
1121 if (!bRet)
1122 {
1123 rc = 1;
1124 goto End;
1125 }
1126
1127 PROGRESS_BAR_SET_POS(PT_WRITE_VENTOY_START + i);
1128 }
1129 }
1130 else
1131 {
1132 rc = 1;
1133 Log("decompress finished failed");
1134 goto End;
1135 }
1136 }
1137
1138 End:
1139
1140 if (data) free(data);
1141
1142 if (partwrite)
1143 {
1144 for (i = 0; i < VENTOY_EFI_PART_SIZE / SIZE_1MB; i++)
1145 {
1146 if (g_part_img_buf[i]) free(g_part_img_buf[i]);
1147 }
1148 }
1149 else
1150 {
1151 if (g_part_img_buf[0]) free(g_part_img_buf[0]);
1152 }
1153
1154 return rc;
1155 }
1156
1157 static int WriteGrubStage1ToPhyDrive(HANDLE hDrive)
1158 {
1159 int Len = 0;
1160 int readLen = 0;
1161 BOOL bRet;
1162 DWORD dwSize;
1163 BYTE *ImgBuf = NULL;
1164 BYTE *RawBuf = NULL;
1165
1166 Log("WriteGrubStage1ToPhyDrive ...");
1167
1168 RawBuf = (BYTE *)malloc(SIZE_1MB);
1169 if (!RawBuf)
1170 {
1171 return 1;
1172 }
1173
1174 if (ReadWholeFileToBuf(VENTOY_FILE_STG1_IMG, 0, (void **)&ImgBuf, &Len))
1175 {
1176 Log("Failed to read stage1 img");
1177 free(RawBuf);
1178 return 1;
1179 }
1180
1181 unxz(ImgBuf, Len, NULL, NULL, RawBuf, &readLen, unxz_error);
1182
1183 SetFilePointer(hDrive, 512, NULL, FILE_BEGIN);
1184
1185 bRet = WriteFile(hDrive, RawBuf, SIZE_1MB - 512, &dwSize, NULL);
1186 Log("WriteFile Ret:%u dwSize:%u ErrCode:%u", bRet, dwSize, GetLastError());
1187
1188 free(RawBuf);
1189 free(ImgBuf);
1190 return 0;
1191 }
1192
1193
1194
1195 static int FormatPart1exFAT(UINT64 DiskSizeBytes)
1196 {
1197 MKFS_PARM Option;
1198 FRESULT Ret;
1199 FATFS fs;
1200
1201 Option.fmt = FM_EXFAT;
1202 Option.n_fat = 1;
1203 Option.align = 8;
1204 Option.n_root = 1;
1205
1206 // < 32GB select 32KB as cluster size
1207 // > 32GB select 128KB as cluster size
1208 if (DiskSizeBytes / 1024 / 1024 / 1024 <= 32)
1209 {
1210 Option.au_size = 32768;
1211 }
1212 else
1213 {
1214 Option.au_size = 131072;
1215 }
1216
1217 Log("Formatting Part1 exFAT ...");
1218
1219 Ret = f_mkfs(TEXT("0:"), &Option, 0, 8 * 1024 * 1024);
1220
1221 if (FR_OK == Ret)
1222 {
1223 Log("Formatting Part1 exFAT success");
1224
1225 Ret = f_mount(&fs, TEXT("0:"), 1);
1226 Log("mount part %d", Ret);
1227
1228 if (FR_OK == Ret)
1229 {
1230 Ret = f_setlabel(TEXT("Ventoy"));
1231 Log("f_setlabel %d", Ret);
1232
1233 Ret = f_mount(0, TEXT("0:"), 1);
1234 Log("umount part %d", Ret);
1235 }
1236
1237 return 0;
1238 }
1239 else
1240 {
1241 Log("Formatting Part1 exFAT failed");
1242 return 1;
1243 }
1244 }
1245
1246
1247 int InstallVentoy2PhyDrive(PHY_DRIVE_INFO *pPhyDrive)
1248 {
1249 int i;
1250 int rc = 0;
1251 int state = 0;
1252 HANDLE hDrive;
1253 DWORD dwSize;
1254 BOOL bRet;
1255 CHAR MountDrive;
1256 CHAR DriveName[] = "?:\\";
1257 CHAR DriveLetters[MAX_PATH] = { 0 };
1258 MBR_HEAD MBR;
1259
1260 Log("InstallVentoy2PhyDrive PhyDrive%d <<%s %s %dGB>>",
1261 pPhyDrive->PhyDrive, pPhyDrive->VendorId, pPhyDrive->ProductId,
1262 GetHumanReadableGBSize(pPhyDrive->SizeInBytes));
1263
1264 PROGRESS_BAR_SET_POS(PT_LOCK_FOR_CLEAN);
1265
1266 VentoyFillMBR(pPhyDrive->SizeInBytes, &MBR);
1267
1268 Log("Lock disk for clean ............................. ");
1269
1270 hDrive = GetPhysicalHandle(pPhyDrive->PhyDrive, TRUE, FALSE, FALSE);
1271 if (hDrive == INVALID_HANDLE_VALUE)
1272 {
1273 Log("Failed to open physical disk");
1274 return 1;
1275 }
1276
1277 GetLettersBelongPhyDrive(pPhyDrive->PhyDrive, DriveLetters, sizeof(DriveLetters));
1278
1279 if (DriveLetters[0] == 0)
1280 {
1281 Log("No drive letter was assigned...");
1282 DriveName[0] = GetFirstUnusedDriveLetter();
1283 Log("GetFirstUnusedDriveLetter %C: ...", DriveName[0]);
1284 }
1285 else
1286 {
1287 // Unmount all mounted volumes that belong to this drive
1288 // Do it in reverse so that we always end on the first volume letter
1289 for (i = (int)strlen(DriveLetters); i > 0; i--)
1290 {
1291 DriveName[0] = DriveLetters[i - 1];
1292 bRet = DeleteVolumeMountPointA(DriveName);
1293 Log("Delete mountpoint %s ret:%u code:%u", DriveName, bRet, GetLastError());
1294 }
1295 }
1296
1297 MountDrive = DriveName[0];
1298 Log("Will use '%C:' as volume mountpoint", DriveName[0]);
1299
1300 // It kind of blows, but we have to relinquish access to the physical drive
1301 // for VDS to be able to delete the partitions that reside on it...
1302 DeviceIoControl(hDrive, FSCTL_UNLOCK_VOLUME, NULL, 0, NULL, 0, &dwSize, NULL);
1303 CHECK_CLOSE_HANDLE(hDrive);
1304
1305 PROGRESS_BAR_SET_POS(PT_DEL_ALL_PART);
1306
1307 if (!DeletePartitions(pPhyDrive->PhyDrive, FALSE))
1308 {
1309 Log("Notice: Could not delete partitions: %u", GetLastError());
1310 }
1311
1312 Log("Deleting all partitions ......................... OK");
1313
1314 PROGRESS_BAR_SET_POS(PT_LOCK_FOR_WRITE);
1315
1316 Log("Lock disk for write ............................. ");
1317 hDrive = GetPhysicalHandle(pPhyDrive->PhyDrive, TRUE, TRUE, FALSE);
1318 if (hDrive == INVALID_HANDLE_VALUE)
1319 {
1320 Log("Failed to GetPhysicalHandle for write.");
1321 rc = 1;
1322 goto End;
1323 }
1324
1325 //Refresh Drive Layout
1326 DeviceIoControl(hDrive, IOCTL_DISK_UPDATE_PROPERTIES, NULL, 0, NULL, 0, &dwSize, NULL);
1327
1328 disk_io_set_param(hDrive, MBR.PartTbl[0].StartSectorId + MBR.PartTbl[0].SectorCount);
1329
1330 PROGRESS_BAR_SET_POS(PT_FORMAT_PART1);
1331
1332 Log("Formatting part1 exFAT ...");
1333 if (0 != FormatPart1exFAT(pPhyDrive->SizeInBytes))
1334 {
1335 rc = 1;
1336 goto End;
1337 }
1338
1339 PROGRESS_BAR_SET_POS(PT_FORMAT_PART2);
1340 Log("Writing part2 FAT img ...");
1341 if (0 != FormatPart2Fat(hDrive, MBR.PartTbl[1].StartSectorId))
1342 {
1343 rc = 1;
1344 goto End;
1345 }
1346
1347 PROGRESS_BAR_SET_POS(PT_WRITE_STG1_IMG);
1348 Log("Writting Boot Image ............................. ");
1349 if (WriteGrubStage1ToPhyDrive(hDrive) != 0)
1350 {
1351 rc = 1;
1352 goto End;
1353 }
1354
1355
1356 PROGRESS_BAR_SET_POS(PT_WRITE_PART_TABLE);
1357 Log("Writting Partition Table ........................ ");
1358 SetFilePointer(hDrive, 0, NULL, FILE_BEGIN);
1359 if (!WriteFile(hDrive, &MBR, sizeof(MBR), &dwSize, NULL))
1360 {
1361 rc = 1;
1362 Log("Write MBR Failed, dwSize:%u ErrCode:%u", dwSize, GetLastError());
1363 goto End;
1364 }
1365
1366 Log("Write MBR OK ...");
1367
1368 //Refresh Drive Layout
1369 DeviceIoControl(hDrive, IOCTL_DISK_UPDATE_PROPERTIES, NULL, 0, NULL, 0, &dwSize, NULL);
1370
1371 End:
1372 CHECK_CLOSE_HANDLE(hDrive);
1373
1374 PROGRESS_BAR_SET_POS(PT_MOUNT_VOLUME);
1375 Log("Mounting Ventoy Partition ....................... ");
1376 Sleep(1000);
1377
1378 state = 0;
1379 memset(DriveLetters, 0, sizeof(DriveLetters));
1380 GetLettersBelongPhyDrive(pPhyDrive->PhyDrive, DriveLetters, sizeof(DriveLetters));
1381 Log("Logical drive letter after write ventoy: <%s>", DriveLetters);
1382
1383 for (i = 0; i < sizeof(DriveLetters) && DriveLetters[i]; i++)
1384 {
1385 DriveName[0] = DriveLetters[i];
1386 if (IsVentoyLogicalDrive(DriveName[0]))
1387 {
1388 Log("%s is ventoy part2, delete mountpoint", DriveName);
1389 DeleteVolumeMountPointA(DriveName);
1390 }
1391 else
1392 {
1393 Log("%s is ventoy part1, already mounted", DriveName);
1394 state = 1;
1395 }
1396 }
1397
1398 if (state != 1)
1399 {
1400 Log("need to mount ventoy part1...");
1401 if (0 == GetVentoyVolumeName(pPhyDrive->PhyDrive, MBR.PartTbl[0].StartSectorId, DriveLetters, sizeof(DriveLetters), FALSE))
1402 {
1403 DriveName[0] = MountDrive;
1404 bRet = SetVolumeMountPointA(DriveName, DriveLetters);
1405 Log("SetVolumeMountPoint <%s> <%s> bRet:%u code:%u", DriveName, DriveLetters, bRet, GetLastError());
1406 }
1407 else
1408 {
1409 Log("Failed to find ventoy volume");
1410 }
1411 }
1412
1413 Log("OK\n");
1414
1415 return rc;
1416 }
1417
1418 int UpdateVentoy2PhyDrive(PHY_DRIVE_INFO *pPhyDrive)
1419 {
1420 int i;
1421 int rc = 0;
1422 BOOL ForceMBR = FALSE;
1423 HANDLE hVolume;
1424 HANDLE hDrive;
1425 DWORD Status;
1426 DWORD dwSize;
1427 BOOL bRet;
1428 CHAR DriveName[] = "?:\\";
1429 CHAR DriveLetters[MAX_PATH] = { 0 };
1430 UINT32 StartSector;
1431 UINT64 ReservedMB = 0;
1432 MBR_HEAD BootImg;
1433 MBR_HEAD MBR;
1434
1435 Log("UpdateVentoy2PhyDrive PhyDrive%d <<%s %s %dGB>>",
1436 pPhyDrive->PhyDrive, pPhyDrive->VendorId, pPhyDrive->ProductId,
1437 GetHumanReadableGBSize(pPhyDrive->SizeInBytes));
1438
1439 PROGRESS_BAR_SET_POS(PT_LOCK_FOR_CLEAN);
1440
1441 Log("Lock disk for umount ............................ ");
1442
1443 hDrive = GetPhysicalHandle(pPhyDrive->PhyDrive, TRUE, FALSE, FALSE);
1444 if (hDrive == INVALID_HANDLE_VALUE)
1445 {
1446 Log("Failed to open physical disk");
1447 return 1;
1448 }
1449
1450 // Read MBR
1451 SetFilePointer(hDrive, 0, NULL, FILE_BEGIN);
1452 ReadFile(hDrive, &MBR, sizeof(MBR), &dwSize, NULL);
1453
1454 StartSector = MBR.PartTbl[1].StartSectorId;
1455 Log("StartSector in PartTbl:%u", StartSector);
1456
1457 ReservedMB = (pPhyDrive->SizeInBytes / 512 - (StartSector + VENTOY_EFI_PART_SIZE / 512)) / 2048;
1458 Log("Reserved Disk Space:%u MB", ReservedMB);
1459
1460 GetLettersBelongPhyDrive(pPhyDrive->PhyDrive, DriveLetters, sizeof(DriveLetters));
1461
1462 if (DriveLetters[0] == 0)
1463 {
1464 Log("No drive letter was assigned...");
1465 }
1466 else
1467 {
1468 // Unmount all mounted volumes that belong to this drive
1469 // Do it in reverse so that we always end on the first volume letter
1470 for (i = (int)strlen(DriveLetters); i > 0; i--)
1471 {
1472 DriveName[0] = DriveLetters[i - 1];
1473 if (IsVentoyLogicalDrive(DriveName[0]))
1474 {
1475 Log("%s is ventoy logical drive", DriveName);
1476 bRet = DeleteVolumeMountPointA(DriveName);
1477 Log("Delete mountpoint %s ret:%u code:%u", DriveName, bRet, LASTERR);
1478 break;
1479 }
1480 }
1481 }
1482
1483 // It kind of blows, but we have to relinquish access to the physical drive
1484 // for VDS to be able to delete the partitions that reside on it...
1485 DeviceIoControl(hDrive, FSCTL_UNLOCK_VOLUME, NULL, 0, NULL, 0, &dwSize, NULL);
1486 CHECK_CLOSE_HANDLE(hDrive);
1487
1488 PROGRESS_BAR_SET_POS(PT_LOCK_FOR_WRITE);
1489
1490 Log("Lock disk for update ............................ ");
1491 hDrive = GetPhysicalHandle(pPhyDrive->PhyDrive, TRUE, TRUE, FALSE);
1492 if (hDrive == INVALID_HANDLE_VALUE)
1493 {
1494 Log("Failed to GetPhysicalHandle for write.");
1495 rc = 1;
1496 goto End;
1497 }
1498
1499 PROGRESS_BAR_SET_POS(PT_LOCK_VOLUME);
1500
1501 Log("Lock volume for update .......................... ");
1502 hVolume = INVALID_HANDLE_VALUE;
1503 Status = GetVentoyVolumeName(pPhyDrive->PhyDrive, MBR.PartTbl[1].StartSectorId, DriveLetters, sizeof(DriveLetters), TRUE);
1504 if (ERROR_SUCCESS == Status)
1505 {
1506 Log("Now lock and dismount volume <%s>", DriveLetters);
1507 hVolume = CreateFileA(DriveLetters,
1508 GENERIC_READ | GENERIC_WRITE,
1509 FILE_SHARE_READ,
1510 NULL,
1511 OPEN_EXISTING,
1512 FILE_ATTRIBUTE_NORMAL | FILE_FLAG_NO_BUFFERING | FILE_FLAG_WRITE_THROUGH,
1513 NULL);
1514
1515 if (hVolume == INVALID_HANDLE_VALUE)
1516 {
1517 Log("Failed to create file volume, errcode:%u", LASTERR);
1518 rc = 1;
1519 goto End;
1520 }
1521
1522 bRet = DeviceIoControl(hVolume, FSCTL_LOCK_VOLUME, NULL, 0, NULL, 0, &dwSize, NULL);
1523 Log("FSCTL_LOCK_VOLUME bRet:%u code:%u", bRet, LASTERR);
1524
1525 bRet = DeviceIoControl(hVolume, FSCTL_DISMOUNT_VOLUME, NULL, 0, NULL, 0, &dwSize, NULL);
1526 Log("FSCTL_DISMOUNT_VOLUME bRet:%u code:%u", bRet, LASTERR);
1527 }
1528 else if (ERROR_NOT_FOUND == Status)
1529 {
1530 Log("Volume not found, maybe not supported");
1531 }
1532 else
1533 {
1534 rc = 1;
1535 goto End;
1536 }
1537
1538
1539 if (!TryWritePart2(hDrive, StartSector))
1540 {
1541 ForceMBR = TRUE;
1542 Log("Try write failed, now delete partition 2...");
1543
1544 CHECK_CLOSE_HANDLE(hDrive);
1545
1546 Log("Now delete partition 2...");
1547 DeletePartitions(pPhyDrive->PhyDrive, TRUE);
1548
1549 hDrive = GetPhysicalHandle(pPhyDrive->PhyDrive, TRUE, TRUE, FALSE);
1550 if (hDrive == INVALID_HANDLE_VALUE)
1551 {
1552 Log("Failed to GetPhysicalHandle for write.");
1553 rc = 1;
1554 goto End;
1555 }
1556 }
1557
1558
1559 PROGRESS_BAR_SET_POS(PT_FORMAT_PART2);
1560
1561 Log("Write Ventoy to disk ............................ ");
1562 if (0 != FormatPart2Fat(hDrive, StartSector))
1563 {
1564 rc = 1;
1565 goto End;
1566 }
1567
1568 if (hVolume != INVALID_HANDLE_VALUE)
1569 {
1570 bRet = DeviceIoControl(hVolume, FSCTL_UNLOCK_VOLUME, NULL, 0, NULL, 0, &dwSize, NULL);
1571 Log("FSCTL_UNLOCK_VOLUME bRet:%u code:%u", bRet, LASTERR);
1572 CHECK_CLOSE_HANDLE(hVolume);
1573 }
1574
1575 Log("Updating Boot Image ............................. ");
1576 if (WriteGrubStage1ToPhyDrive(hDrive) != 0)
1577 {
1578 rc = 1;
1579 goto End;
1580 }
1581
1582 // Boot Image
1583 VentoyGetLocalBootImg(&BootImg);
1584
1585 // Use Old UUID
1586 memcpy(BootImg.BootCode + 0x180, MBR.BootCode + 0x180, 16);
1587
1588 if (ForceMBR == FALSE && memcmp(BootImg.BootCode, MBR.BootCode, 440) == 0)
1589 {
1590 Log("Boot image has no difference, no need to write.");
1591 }
1592 else
1593 {
1594 Log("Boot image need to write %u.", ForceMBR);
1595
1596 SetFilePointer(hDrive, 0, NULL, FILE_BEGIN);
1597
1598 memcpy(MBR.BootCode, BootImg.BootCode, 440);
1599 bRet = WriteFile(hDrive, &MBR, 512, &dwSize, NULL);
1600 Log("Write Boot Image ret:%u dwSize:%u Error:%u", bRet, dwSize, LASTERR);
1601 }
1602
1603 if (0x00 == MBR.PartTbl[0].Active && 0x80 == MBR.PartTbl[1].Active)
1604 {
1605 Log("Need to chage 1st partition active and 2nd partition inactive.");
1606
1607 MBR.PartTbl[0].Active = 0x80;
1608 MBR.PartTbl[1].Active = 0x00;
1609
1610 SetFilePointer(hDrive, 0, NULL, FILE_BEGIN);
1611 bRet = WriteFile(hDrive, &MBR, 512, &dwSize, NULL);
1612 Log("Write NEW MBR ret:%u dwSize:%u Error:%u", bRet, dwSize, LASTERR);
1613 }
1614
1615 //Refresh Drive Layout
1616 DeviceIoControl(hDrive, IOCTL_DISK_UPDATE_PROPERTIES, NULL, 0, NULL, 0, &dwSize, NULL);
1617
1618 End:
1619 CHECK_CLOSE_HANDLE(hDrive);
1620
1621 return rc;
1622 }
1623