VBoxSFUtil.cpp@ 96931

Last change on this file since 96931 was 79110, checked in by vboxsync, 6 years ago
os2/VBoxSF: Forgot to set fpGEAList to NULL when full EAs are queried. FC/2 paniced the guest copying files off shared folder.
Property svn:eol-style set to `native` Property svn:keywords set to `Author Date Id Revision`
File size: 27.6 KB

Line
1	/** $Id: VBoxSFUtil.cpp 79110 2019-06-13 00:17:25Z vboxsync $ */
2	/** @file
3	* VBoxSF - OS/2 Shared Folders, Utility for attaching and testing.
4	*/
5
6	/*
7	* Copyright (c) 2016-2018 knut st. osmundsen <bird-src-spam@anduin.net>
8	*
9	* Permission is hereby granted, free of charge, to any person
10	* obtaining a copy of this software and associated documentation
11	* files (the "Software"), to deal in the Software without
12	* restriction, including without limitation the rights to use,
13	* copy, modify, merge, publish, distribute, sublicense, and/or sell
14	* copies of the Software, and to permit persons to whom the
15	* Software is furnished to do so, subject to the following
16	* conditions:
17	*
18	* The above copyright notice and this permission notice shall be
19	* included in all copies or substantial portions of the Software.
20	*
21	* THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
22	* EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
23	* OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
24	* NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
25	* HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
26	* WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
27	* FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
28	* OTHER DEALINGS IN THE SOFTWARE.
29	*/
30
31
32	/*********************************************************************************************************************************
33	* Header Files *
34	*********************************************************************************************************************************/
35	#include <string.h>
36	#include <stdarg.h>
37	#include <stdio.h>
38	#include <stdint.h>
39	#include <stdlib.h>
40	#define INCL_BASE
41	#define INCL_DOSINFOSEG
42	#define OS2EMX_PLAIN_CHAR
43	#include <os2.h>
44	#include <iprt/asm-amd64-x86.h>
45
46
47	/*********************************************************************************************************************************
48	* Internal Functions *
49	*********************************************************************************************************************************/
50	extern "C" APIRET __cdecl CallDosQFileMode(const char *pszFilename, PUSHORT pfAttr, ULONG ulReserved);
51
52	#ifndef GETGINFOSEG
53	typedef struct _GINFOSEG
54	{
55	ULONG time;
56	ULONG msecs;
57	UCHAR hour;
58	UCHAR minutes;
59	UCHAR seconds;
60	UCHAR hundredths;
61	USHORT timezone;
62	USHORT cusecTimerInterval;
63	UCHAR day;
64	UCHAR month;
65	USHORT year;
66	UCHAR weekday;
67	UCHAR uchMajorVersion;
68	UCHAR uchMinorVersion;
69	UCHAR chRevisionLetter;
70	UCHAR sgCurrent;
71	UCHAR sgMax;
72	UCHAR cHugeShift;
73	UCHAR fProtectModeOnly;
74	USHORT pidForeground;
75	UCHAR fDynamicSched;
76	UCHAR csecMaxWait;
77	USHORT cmsecMinSlice;
78	USHORT cmsecMaxSlice;
79	USHORT bootdrive;
80	UCHAR amecRAS[32];
81	UCHAR csgWindowableVioMax;
82	UCHAR csgPMMax;
83	USHORT SIS_Syslog;
84	USHORT SIS_MMIOBase;
85	USHORT SIS_MMIOAddr;
86	UCHAR SIS_MaxVDMs;
87	UCHAR SIS_Reserved;
88	} GINFOSEG;
89	typedef GINFOSEG *PGINFOSEG;
90
91	extern "C" void _System DOS16GLOBALINFO(void);
92	# define GETGINFOSEG() ((PGINFOSEG)(void *)(((unsigned)&DOS16GLOBALINFO & 0xfff8) << 13))
93
94	#endif
95
96
97	/*********************************************************************************************************************************
98	* Global Variables *
99	*********************************************************************************************************************************/
100	static GINFOSEG volatile *g_pGInfoSeg;
101	static PTIB g_pTib;
102	static PPIB g_pPib;
103
104
105	static int syntaxError(const char *pszFormat, ...)
106	{
107	fprintf(stderr, "syntax error: ");
108	va_list va;
109	va_start(va, pszFormat);
110	vfprintf(stderr, pszFormat, va);
111	va_end(va);
112	if (strchr(pszFormat, '\0')[-1] != '\n')
113	fputc('\n', stderr);
114	return 2;
115	}
116
117
118	static int error(const char *pszFormat, ...)
119	{
120	fprintf(stderr, "error: ");
121	va_list va;
122	va_start(va, pszFormat);
123	vfprintf(stderr, pszFormat, va);
124	va_end(va);
125	if (strchr(pszFormat, '\0')[-1] != '\n')
126	fputc('\n', stderr);
127	return 1;
128	}
129
130
131	int vboxSfOs2UtilUse(int argc, char **argv)
132	{
133	/*
134	* Continue parsing.
135	*/
136	if (argc != 3)
137	return syntaxError("Expected three arguments to 'use' command\n");
138
139	/* The drive letter. */
140	const char *pszDrive = argv[1];
141	if ( ( (pszDrive[0] >= 'A' && pszDrive[0] <= 'Z')
142	\|\| (pszDrive[0] >= 'a' && pszDrive[0] <= 'z'))
143	&& pszDrive[1] == ':'
144	&& pszDrive[2] == '\0')
145	{ /* likely */ }
146	else
147	return syntaxError("Invalid drive specification '%s', expected something like 'K:'.\n", pszDrive);
148
149	/* The shared folder. */
150	const char *pszFolder = argv[2];
151	size_t cchFolder = strlen(pszFolder);
152	if (cchFolder <= 80 && cchFolder != 0)
153	{ /* likely */ }
154	else
155	return syntaxError("Shared folder name '%s' is too %s!\n", pszFolder, cchFolder >= 1 ? "long" : "short");
156
157	/*
158	* Try attach it.
159	*/
160	APIRET rc = DosFSAttach(pszDrive, "VBOXSF", (void *)pszFolder, cchFolder + 1, FS_ATTACH);
161	if (rc == NO_ERROR)
162	{
163	printf("done\n");
164	return 0;
165	}
166	return error("DosFSAttach failed: %lu\n", rc);
167	}
168
169
170	int vboxSfOs2UtilQPathInfo(int argc, char **argv)
171	{
172	for (int i = 1; i < argc; i++)
173	{
174	union
175	{
176	USHORT fAttribs;
177	FILESTATUS Lvl1r1;
178	FILESTATUS3 Lvl1r3;
179	FILESTATUS3L Lvl11;
180	FILESTATUS2 Lvl2r2;
181	FILESTATUS4 Lvl2r4;
182	FILESTATUS4L Lvl12;
183	FEA2LIST FeaList;
184	char szFullName[260];
185	//char szTest1[sizeof(FILESTATUS3) == sizeof(FILESTATUS)];
186	//char szTest2[sizeof(FILESTATUS4) == sizeof(FILESTATUS2)];
187	} u;
188
189	u.fAttribs = 0xffff;
190	int rc = CallDosQFileMode(argv[i], &u.fAttribs, 0 /* reserved */);
191	printf("%s: DosQFileMode -> %u, %#x\n", argv[i], rc, u.fAttribs);
192
193	memset(&u, 0xaa, sizeof(u));
194	rc = DosQueryPathInfo(argv[i], FIL_STANDARD, &u.Lvl1r1, sizeof(u.Lvl1r1));
195	printf("%s: FIL_STANDARD/%#x -> %u\n", argv[i], sizeof(u.Lvl1r1), rc);
196	#define D(x) ((uint16_t )&(x))
197	#define T(x) ((uint16_t )&(x))
198	if (rc == NO_ERROR)
199	{
200	printf(" Lvl1r1: creation=%u:%u write=%u:%u access=%u:%u\n",
201	D(u.Lvl1r1.fdateCreation), T(u.Lvl1r1.ftimeCreation), D(u.Lvl1r1.fdateLastWrite), T(u.Lvl1r1.ftimeLastWrite),
202	D(u.Lvl1r1.fdateLastAccess), T(u.Lvl1r1.ftimeLastAccess));
203	printf(" Lvl1r1: attrib=%#x size=%lu alloc=%lu\n", u.Lvl1r1.attrFile, u.Lvl1r1.cbFile, u.Lvl1r1.cbFileAlloc);
204
205	}
206
207	memset(&u, 0xbb, sizeof(u));
208	rc = DosQueryPathInfo(argv[i], FIL_STANDARD, &u.Lvl1r3, sizeof(u.Lvl1r3));
209	printf("%s: FIL_STANDARD/%#x-> %u\n", argv[i], sizeof(u.Lvl1r3), rc);
210	if (rc == NO_ERROR)
211	{
212	printf(" Lvl1r3: creation=%u:%u write=%u:%u access=%u:%u\n",
213	D(u.Lvl1r3.fdateCreation), T(u.Lvl1r3.ftimeCreation), D(u.Lvl1r3.fdateLastWrite), T(u.Lvl1r3.ftimeLastWrite),
214	D(u.Lvl1r3.fdateLastAccess), T(u.Lvl1r3.ftimeLastAccess));
215	printf(" Lvl1r3: attrib=%#lx size=%lu alloc=%lu\n", u.Lvl1r3.attrFile, u.Lvl1r3.cbFile, u.Lvl1r3.cbFileAlloc);
216
217	}
218
219	memset(&u, 0xdd, sizeof(u));
220	rc = DosQueryPathInfo(argv[i], FIL_STANDARDL, &u.Lvl11, sizeof(u.Lvl11));
221	printf("%s: FIL_STANDARDL/%#x -> %u\n", argv[i], sizeof(u.Lvl11), rc);
222	if (rc == NO_ERROR)
223	{
224	printf(" Lvl11: creation=%u:%u write=%u:%u access=%u:%u\n",
225	D(u.Lvl11.fdateCreation), T(u.Lvl11.ftimeCreation), D(u.Lvl11.fdateLastWrite), T(u.Lvl11.ftimeLastWrite),
226	D(u.Lvl11.fdateLastAccess), T(u.Lvl11.ftimeLastAccess));
227	printf(" Lvl11: attrib=%#lx size=%llu alloc=%llu\n", u.Lvl11.attrFile, u.Lvl11.cbFile, u.Lvl11.cbFileAlloc);
228	}
229
230	memset(&u, 0xee, sizeof(u));
231	rc = DosQueryPathInfo(argv[i], FIL_QUERYEASIZE, &u.Lvl2r2, sizeof(u.Lvl2r2));
232	printf("%s: FIL_QUERYEASIZE/%#x -> %u\n", argv[i], sizeof(u.Lvl2r2), rc);
233	if (rc == NO_ERROR)
234	{
235	printf(" Lvl2: creation=%u:%u write=%u:%u access=%u:%u\n",
236	D(u.Lvl2r2.fdateCreation), T(u.Lvl2r2.ftimeCreation), D(u.Lvl2r2.fdateLastWrite), T(u.Lvl2r2.ftimeLastWrite),
237	D(u.Lvl2r2.fdateLastAccess), T(u.Lvl2r2.ftimeLastAccess));
238	printf(" Lvl2: attrib=%#x size=%lu alloc=%lu cbList=%#lx\n",
239	u.Lvl2r2.attrFile, u.Lvl2r2.cbFile, u.Lvl2r2.cbFileAlloc, u.Lvl2r4.cbList);
240	}
241
242	memset(&u, 0x55, sizeof(u));
243	rc = DosQueryPathInfo(argv[i], FIL_QUERYEASIZE, &u.Lvl2r4, sizeof(u.Lvl2r4));
244	printf("%s: FIL_QUERYEASIZE/%#x -> %u\n", argv[i], sizeof(u.Lvl2r4), rc);
245	if (rc == NO_ERROR)
246	{
247	printf(" Lvl2: creation=%u:%u write=%u:%u access=%u:%u\n",
248	D(u.Lvl2r4.fdateCreation), T(u.Lvl2r4.ftimeCreation), D(u.Lvl2r4.fdateLastWrite), T(u.Lvl2r4.ftimeLastWrite),
249	D(u.Lvl2r4.fdateLastAccess), T(u.Lvl2r4.ftimeLastAccess));
250	printf(" Lvl2: attrib=%#lx size=%lu alloc=%lu cbList=%#lx\n",
251	u.Lvl2r4.attrFile, u.Lvl2r4.cbFile, u.Lvl2r4.cbFileAlloc, u.Lvl2r4.cbList);
252	}
253
254	memset(&u, 0x99, sizeof(u));
255	rc = DosQueryPathInfo(argv[i], FIL_QUERYEASIZEL, &u.Lvl12, sizeof(u.Lvl12));
256	printf("%s: FIL_QUERYEASIZEL/%#x -> %u\n", argv[i], sizeof(u.Lvl12), rc);
257	if (rc == NO_ERROR)
258	{
259	printf(" Lvl12: creation=%u:%u write=%u:%u access=%u:%u\n",
260	D(u.Lvl12.fdateCreation), T(u.Lvl12.ftimeCreation), D(u.Lvl12.fdateLastWrite), T(u.Lvl12.ftimeLastWrite),
261	D(u.Lvl12.fdateLastAccess), T(u.Lvl12.ftimeLastAccess));
262	printf(" Lvl12: attrib=%#lx size=%llu alloc=%llu cbList=%#lx\n",
263	u.Lvl12.attrFile, u.Lvl12.cbFile, u.Lvl12.cbFileAlloc, u.Lvl12.cbList);
264	}
265
266	memset(&u, 0x44, sizeof(u));
267	rc = DosQueryPathInfo(argv[i], FIL_QUERYFULLNAME, &u.szFullName[0], sizeof(u.szFullName));
268	printf("%s: FIL_QUERYFULLNAME -> %u\n", argv[i], rc);
269	if (rc == NO_ERROR)
270	printf(" Lvl5: %s<eol>\n", u.szFullName);
271
272	size_t cchInput = strlen(argv[i]);
273	if (cchInput >= sizeof(u.szFullName))
274	cchInput = sizeof(u.szFullName) - 1;
275
276	/** @todo Cannot get to level 6 thru 32-bit, need 16-bit. DOSCALL1.DLL
277	* chickens out on us. Sigh. */
278	memcpy(u.szFullName, argv[i], cchInput);
279	u.szFullName[0] = '\0';
280	rc = DosQueryPathInfo(argv[i], 6 /FIL_VERIFY_SYNTAX/, &u.szFullName[0], sizeof(u.szFullName));
281	printf("%s: FIL_VERIFY_SYNTAX -> %u\n", argv[i], rc);
282	if (rc == NO_ERROR)
283	printf(" Lvl6: %s<eol>\n", u.szFullName);
284
285	memcpy(u.szFullName, argv[i], cchInput);
286	u.szFullName[0] = '\0';
287	rc = DosQueryPathInfo(argv[i], 16 /FIL_VERIFY_SYNTAX_L/, &u.szFullName[0], sizeof(u.szFullName));
288	printf("%s: FIL_VERIFY_SYNTAX_L -> %u\n", argv[i], rc);
289	if (rc == NO_ERROR)
290	printf(" Lvl6L: %s<eol>\n", u.szFullName);
291
292	memcpy(u.szFullName, argv[i], cchInput);
293	u.szFullName[0] = '\0';
294	rc = DosQueryPathInfo(argv[i], 7 /FIL_FIX_CASE/, &u.szFullName[0], sizeof(u.szFullName));
295	printf("%s: FIL_FIX_CASE -> %u\n", argv[i], rc);
296	if (rc == NO_ERROR)
297	printf(" Lvl7: %s<eol>\n", u.szFullName);
298
299	memcpy(u.szFullName, argv[i], cchInput);
300	u.szFullName[0] = '\0';
301	rc = DosQueryPathInfo(argv[i], 17 /FIL_FIX_CASE_L/, &u.szFullName[0], sizeof(u.szFullName));
302	printf("%s: FIL_FIX_CASE_L -> %u\n", argv[i], rc);
303	if (rc == NO_ERROR)
304	printf(" Lvl17: %s<eol>\n", u.szFullName);
305
306	struct
307	{
308	ULONG cbList;
309	ULONG oNext;
310	BYTE cchName;
311	char szName[10];
312	} Gea2List, Gea2ListOrg = { sizeof(Gea2List), 0, sizeof(".LONGNAME") - 1, ".LONGNAME" };
313	EAOP2 EaOp;
314	EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
315	EaOp.fpFEA2List = &u.FeaList;
316	EaOp.oError = 0;
317	memset(&u, '\0', sizeof(u));
318	u.FeaList.cbList = sizeof(u);
319	rc = DosQueryPathInfo(argv[i], FIL_QUERYEASFROMLIST, &EaOp, sizeof(EaOp));
320	printf("%s: FIL_QUERYEASFROMLIST -> %u\n", argv[i], rc);
321	if (rc == NO_ERROR)
322	printf(" Lvl3: FeaList.cbList=%#lx oError=%#lx\n", u.FeaList.cbList, EaOp.oError);
323
324	EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
325	EaOp.fpFEA2List = &u.FeaList;
326	EaOp.oError = 0;
327	memset(&u, '\0', sizeof(u));
328	u.FeaList.cbList = sizeof(u);
329	rc = DosQueryPathInfo(argv[i], FIL_QUERYEASFROMLISTL, &EaOp, sizeof(EaOp));
330	if (rc != ERROR_INVALID_LEVEL)
331	printf("%s: FIL_QUERYEASFROMLISTL -> %u\n", argv[i], rc);
332
333	//EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
334	EaOp.fpGEA2List = (PGEA2LIST)0xfefefef7;
335	EaOp.fpFEA2List = &u.FeaList;
336	EaOp.oError = 0;
337	memset(&u, '\0', sizeof(u));
338	u.FeaList.cbList = sizeof(u);
339	rc = DosQueryPathInfo(argv[i], 4, &EaOp, sizeof(EaOp));
340	printf("%s: FIL_QUERYALLEAS/4 -> %u\n", argv[i], rc);
341	if (rc == NO_ERROR)
342	printf(" Lvl4: FeaList.cbList=%#lx oError=%#lx\n", u.FeaList.cbList, EaOp.oError);
343
344	EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
345	EaOp.fpFEA2List = &u.FeaList;
346	EaOp.oError = 0;
347	memset(&u, '\0', sizeof(u));
348	u.FeaList.cbList = sizeof(u);
349	rc = DosQueryPathInfo(argv[i], 14, &EaOp, sizeof(EaOp));
350	if (rc != ERROR_INVALID_LEVEL)
351	printf("%s: FIL_QUERYALLEASL/14 -> %u\n", argv[i], rc);
352
353	EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
354	EaOp.fpFEA2List = &u.FeaList;
355	EaOp.oError = 0;
356	memset(&u, '\0', sizeof(u));
357	u.FeaList.cbList = sizeof(u);
358	rc = DosQueryPathInfo(argv[i], 8, &EaOp, sizeof(EaOp));
359	printf("%s: FIL_QUERYALLEAS/8 -> %u\n", argv[i], rc);
360	if (rc == NO_ERROR)
361	printf(" Lvl8: FeaList.cbList=%#lx oError=%#lx\n", u.FeaList.cbList, EaOp.oError);
362
363	EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
364	EaOp.fpFEA2List = &u.FeaList;
365	EaOp.oError = 0;
366	memset(&u, '\0', sizeof(u));
367	u.FeaList.cbList = sizeof(u);
368	rc = DosQueryPathInfo(argv[i], 18, &EaOp, sizeof(EaOp));
369	if (rc != ERROR_INVALID_LEVEL)
370	printf("%s: FIL_QUERYALLEASL/18 -> %u\n", argv[i], rc);
371
372	EaOp.fpGEA2List = (PGEA2LIST)memcpy(&Gea2List, &Gea2ListOrg, sizeof(Gea2List));
373	EaOp.fpFEA2List = &u.FeaList;
374	EaOp.oError = 0;
375	memset(&u, '\0', sizeof(u));
376	u.FeaList.cbList = sizeof(u);
377	rc = DosQueryPathInfo(argv[i], 15, &EaOp, sizeof(EaOp));
378	if (rc != ERROR_INVALID_LEVEL)
379	printf("%s: FIL_QUERYALLEASL/15 -> %u\n", argv[i], rc);
380
381	memset(&u, '\0', sizeof(u));
382	rc = DosQueryPathInfo(argv[i], 0, &u, sizeof(u));
383	if (rc != ERROR_INVALID_LEVEL)
384	printf("%s: 0 -> %u\n", argv[i], rc);
385	}
386	return 0;
387	}
388
389
390	int vboxSfOs2UtilFindFile(int argc, char **argv)
391	{
392	unsigned cMaxMatches = 1;
393	unsigned cbBuf = 1024;
394	unsigned uLevel = FIL_STANDARDL;
395	unsigned fAttribs = FILE_DIRECTORY \| FILE_HIDDEN \| FILE_SYSTEM;
396	bool fOptions = true;
397
398	uint8_t *pbBuf = NULL;
399	for (int i = 1; i < argc; i++)
400	{
401	const char *pszArg = argv[i];
402
403	/*
404	* Deal with options.
405	*/
406	if (fOptions && *pszArg == '-')
407	{
408	pszArg++;
409	if (*pszArg == '-')
410	{
411	pszArg++;
412	if (!*pszArg)
413	{
414	fOptions = false;
415	continue;
416	}
417	if (strcmp(pszArg, "attribs") == 0)
418	pszArg = "a";
419	else if (strcmp(pszArg, "buffer-size") == 0)
420	pszArg = "b";
421	else if (strcmp(pszArg, "level") == 0)
422	pszArg = "l";
423	else if (strcmp(pszArg, "matches") == 0)
424	pszArg = "m";
425	else if (strcmp(pszArg, "help") == 0)
426	pszArg = "h";
427	else
428	return syntaxError("Unknown option: %s\n", argv[i]);
429	}
430	do
431	{
432	const char *pszValue = NULL;
433	char chOpt = *pszArg++;
434	if (strchr("ablm", chOpt) != NULL)
435	{
436	if (*pszArg != '\0')
437	pszValue = pszArg == ':' \|\| pszArg == '=' ? ++pszArg : pszArg;
438	else if (i + 1 < argc)
439	pszValue = argv[++i];
440	else
441	return syntaxError("-%c takes a value\n", chOpt);
442	pszArg = "";
443	}
444	switch (chOpt)
445	{
446	case 'a':
447	fAttribs = atoi(pszValue);
448	break;
449	case 'b':
450	cbBuf = atoi(pszValue);
451	free(pbBuf);
452	pbBuf = NULL;
453	break;
454	case 'l':
455	uLevel = atoi(pszValue);
456	break;
457	case 'm':
458	cMaxMatches = atoi(pszValue);
459	break;
460	case 'h':
461	printf("usage: findfile [-a\|--attribs <mask>] [-b\|--buffer-size <bytes>]\n"
462	" [-l\|--level <num>] [-m\|--matches <num>] [--] <dir1> [dir2..N]\n");
463	return 0;
464	default:
465	return syntaxError("Unknown option '%c' (%s)\n", chOpt, argv[i - (pszValue != NULL)]);
466	}
467
468	} while (pszArg && *pszArg != '\0');
469	}
470	else
471	{
472	/*
473	* Search the specified directory/whatever.
474	*/
475	if (!pbBuf)
476	{
477	pbBuf = (uint8_t *)malloc(cbBuf);
478	if (!pbBuf)
479	return error("out of memory (cbBuf=%#x)\n", cbBuf);
480	}
481
482	HDIR hDir = HDIR_CREATE;
483	ULONG cMatches = cMaxMatches;
484	memset(pbBuf, 0xf6, cbBuf);
485	APIRET rc = DosFindFirst(pszArg, &hDir, fAttribs, pbBuf, cbBuf, &cMatches, uLevel);
486	printf("DosFindFirst -> %lu hDir=%#lx cMatches=%#lx\n", rc, hDir, cMatches);
487	if (rc == NO_ERROR)
488	{
489	do
490	{
491	uint8_t *pbTmp = pbBuf;
492	for (uint32_t iMatch = 0; iMatch < cMatches; iMatch++)
493	{
494	uint32_t offNext = (uint32_t )pbTmp;
495	switch (uLevel)
496	{
497	case FIL_STANDARD:
498	{
499	PFILEFINDBUF3 pBuf = (PFILEFINDBUF3)pbTmp;
500	printf("#%u: nx=%#lx sz=%#lx at=%#lx nm=%#x:%s\n",
501	iMatch, pBuf->oNextEntryOffset, pBuf->cbFile, pBuf->attrFile, pBuf->cchName, pBuf->achName);
502	if (strlen(pBuf->achName) != pBuf->cchName)
503	printf("Bad name length!\n");
504	break;
505	}
506	case FIL_STANDARDL:
507	{
508	PFILEFINDBUF3L pBuf = (PFILEFINDBUF3L)pbTmp;
509	printf("#%u: nx=%#lx sz=%#llx at=%#lx nm=%#x:%s\n",
510	iMatch, pBuf->oNextEntryOffset, pBuf->cbFile, pBuf->attrFile, pBuf->cchName, pBuf->achName);
511	if (strlen(pBuf->achName) != pBuf->cchName)
512	printf("Bad name length!\n");
513	break;
514	}
515	case FIL_QUERYEASIZE:
516	{
517	PFILEFINDBUF4 pBuf = (PFILEFINDBUF4)pbTmp;
518	printf("#%u: nx=%#lx sz=%#lx at=%#lx nm=%#x:%s\n",
519	iMatch, pBuf->oNextEntryOffset, pBuf->cbFile, pBuf->attrFile, pBuf->cchName, pBuf->achName);
520	if (strlen(pBuf->achName) != pBuf->cchName)
521	printf("Bad name length!\n");
522	break;
523	}
524	case FIL_QUERYEASIZEL:
525	{
526	PFILEFINDBUF4L pBuf = (PFILEFINDBUF4L)pbTmp;
527	printf("#%u: nx=%#lx sz=%#llx at=%#lx nm=%#x:%s\n",
528	iMatch, pBuf->oNextEntryOffset, pBuf->cbFile, pBuf->attrFile, pBuf->cchName, pBuf->achName);
529	if (strlen(pBuf->achName) != pBuf->cchName)
530	printf("Bad name length!\n");
531	break;
532	}
533
534	}
535
536	pbTmp += offNext;
537	}
538
539	/* Next bunch. */
540	memset(pbBuf, 0xf6, cbBuf);
541	cMatches = cMaxMatches;
542	rc = DosFindNext(hDir, pbBuf, cbBuf, &cMatches);
543	printf("DosFindNext -> %lu hDir=%#lx cMatches=%#lx\n", rc, hDir, cMatches);
544	} while (rc == NO_ERROR);
545
546	rc = DosFindClose(hDir);
547	printf("DosFindClose -> %lu\n", rc);
548	}
549	}
550	}
551	return 0;
552	}
553
554
555	static int vboxSfOs2UtilMkDir(int argc, char **argv)
556	{
557	for (int i = 1; i < argc; i++)
558	{
559	APIRET rc = DosCreateDir(argv[i], NULL);
560	printf("DosCreateDir -> %lu for '%s'\n", rc, argv[i]);
561	}
562	return 0;
563	}
564
565
566	static int vboxSfOs2UtilBenchFStat(int argc, char **argv)
567	{
568	int rcRet = 0;
569	bool fOptions = true;
570	unsigned msRuntime = 5*1000;
571	for (int i = 1; i < argc; i++)
572	{
573	/*
574	* Parse arguments.
575	*/
576	const char *pszArg = argv[i];
577	if (*pszArg == '-' && fOptions)
578	{
579	if (*++pszArg == '-')
580	{
581	pszArg++;
582	if (*pszArg == '\0')
583	{
584	fOptions = false;
585	continue;
586	}
587	if (strcmp(pszArg, "runtime") == 0)
588	pszArg = "r";
589	else if (strcmp(pszArg, "help") == 0)
590	pszArg = "h";
591	else
592	return syntaxError("Unknown option: %s", argv[i]);
593	}
594
595	while (*pszArg != '\0')
596	{
597	char chOpt = *pszArg++;
598	const char *pszValue = NULL;
599	if (chOpt == 'r')
600	{
601	if (*pszArg != '\0')
602	{
603	pszValue = pszArg == ':' \|\| pszArg == '=' ? pszArg + 1 : pszArg;
604	pszArg = "";
605	}
606	else if (i + 1 < argc)
607	pszValue = argv[++i];
608	else
609	return syntaxError("Expected value after -%c.", chOpt);
610	}
611	switch (chOpt)
612	{
613	case 'r':
614	msRuntime = atoi(pszValue);
615	break;
616
617	default:
618	return syntaxError("Unknown option: -%c", chOpt);
619	}
620	}
621	}
622	/*
623	* Run tests on the file.
624	*/
625	else
626	{
627	ULONG ulAction = 0;
628	HFILE hFile = NULLHANDLE;
629	APIRET rc = DosOpen(pszArg, &hFile, &ulAction, 0 /cbFile/, FILE_NORMAL,
630	OPEN_ACTION_FAIL_IF_NEW \| OPEN_ACTION_OPEN_IF_EXISTS,
631	OPEN_SHARE_DENYNONE \| OPEN_ACCESS_READONLY \| OPEN_FLAGS_FAIL_ON_ERROR, NULL /pEaBuf/);
632	if (rc == NO_ERROR)
633	{
634	/* Do a test run. */
635	FILESTATUS3 Info;
636	rc = DosQueryFileInfo(hFile, FIL_STANDARD, &Info, sizeof(Info));
637	if (rc == NO_ERROR)
638	{
639	printf("Testing '%s'...\n", pszArg);
640
641	/* Tread water till the microsecond count changes. */
642	ULONG msStart = g_pGInfoSeg->msecs;
643	while (g_pGInfoSeg->msecs == msStart)
644	{ /* nothing */ }
645
646	/* Do the actual testing. */
647	msStart = g_pGInfoSeg->msecs;
648	ULONG cCalls = 0;
649	uint64_t cTscElapsed = ASMReadTSC();
650	do
651	{
652	cCalls++;
653	rc = DosQueryFileInfo(hFile, FIL_STANDARD, &Info, sizeof(Info));
654	} while (rc == NO_ERROR && g_pGInfoSeg->msecs - msStart < msRuntime );
655	cTscElapsed = ASMReadTSC() - cTscElapsed;
656
657	if (rc == NO_ERROR)
658	printf("%7lu calls in %14lu ms - %6llu ns per call\n"
659	"%7lu calls in %14llu ticks - %6llu ticks per call\n",
660	cCalls, msRuntime, msRuntime * (uint64_t)1000000 / cCalls,
661	cCalls, cTscElapsed, cTscElapsed / cCalls);
662	else
663	rcRet = error("DosQueryFileInfo failed on '%s' after %u calls: %u", pszArg, cCalls, rc);
664	}
665	else
666	rcRet = error("DosQueryFileInfo failed on '%s': %u", pszArg, rc);
667	DosClose(hFile);
668	}
669	else
670	rcRet = error("DosOpen failed on '%s': %u", pszArg, rc);
671	}
672	}
673	return rcRet;
674	}
675
676
677	int main(int argc, char **argv)
678	{
679	g_pGInfoSeg = GETGINFOSEG();
680	DosGetInfoBlocks(&g_pTib, &g_pPib);
681
682	/*
683	* Parse input.
684	*/
685	for (int i = 1; i < argc; i++)
686	{
687	const char *pszArg = argv[i];
688	if (strcmp(pszArg, "use") == 0)
689	return vboxSfOs2UtilUse(argc - i, argv + i);
690	if (strcmp(pszArg, "qpathinfo") == 0)
691	return vboxSfOs2UtilQPathInfo(argc - i, argv + i);
692	if (strcmp(pszArg, "findfile") == 0)
693	return vboxSfOs2UtilFindFile(argc - i, argv + i);
694	if (strcmp(pszArg, "mkdir") == 0)
695	return vboxSfOs2UtilMkDir(argc - i, argv + i);
696	if (strcmp(pszArg, "benchfstat") == 0)
697	return vboxSfOs2UtilBenchFStat(argc - i, argv + i);
698
699	fprintf(stderr, "Unknown command/option: %s\n", pszArg);
700	return 2;
701	}
702	fprintf(stderr,
703	"usage: VBoxSFUtil.exe use [drive] [shared-folder]\n"
704	" or VBoxSFUtil.exe unuse [drive\|shared-folder] [..]\n"
705	" or VBoxSFUtil.exe list\n");
706	return 2;
707	}
708

Note: See TracBrowser for help on using the repository browser.

source: vbox/trunk/src/VBox/Additions/os2/VBoxSF/VBoxSFUtil.cpp@ 96931

Download in other formats: