1 | /* $Id: tstDBGCParser.cpp 31932 2010-08-24 15:59:25Z vboxsync $ */
|
---|
2 | /** @file
|
---|
3 | * DBGC Testcase - Command Parser.
|
---|
4 | */
|
---|
5 |
|
---|
6 | /*
|
---|
7 | * Copyright (C) 2006-2010 Oracle Corporation
|
---|
8 | *
|
---|
9 | * This file is part of VirtualBox Open Source Edition (OSE), as
|
---|
10 | * available from http://www.virtualbox.org. This file is free software;
|
---|
11 | * you can redistribute it and/or modify it under the terms of the GNU
|
---|
12 | * General Public License (GPL) as published by the Free Software
|
---|
13 | * Foundation, in version 2 as it comes in the "COPYING" file of the
|
---|
14 | * VirtualBox OSE distribution. VirtualBox OSE is distributed in the
|
---|
15 | * hope that it will be useful, but WITHOUT ANY WARRANTY of any kind.
|
---|
16 | */
|
---|
17 |
|
---|
18 | /*******************************************************************************
|
---|
19 | * Header Files *
|
---|
20 | *******************************************************************************/
|
---|
21 | #include <VBox/dbg.h>
|
---|
22 | #include "../DBGCInternal.h"
|
---|
23 |
|
---|
24 | #include <iprt/string.h>
|
---|
25 | #include <iprt/test.h>
|
---|
26 |
|
---|
27 |
|
---|
28 | /*******************************************************************************
|
---|
29 | * Internal Functions *
|
---|
30 | *******************************************************************************/
|
---|
31 | static DECLCALLBACK(bool) tstDBGCBackInput(PDBGCBACK pBack, uint32_t cMillies);
|
---|
32 | static DECLCALLBACK(int) tstDBGCBackRead(PDBGCBACK pBack, void *pvBuf, size_t cbBuf, size_t *pcbRead);
|
---|
33 | static DECLCALLBACK(int) tstDBGCBackWrite(PDBGCBACK pBack, const void *pvBuf, size_t cbBuf, size_t *pcbWritten);
|
---|
34 | static DECLCALLBACK(void) tstDBGCBackSetReady(PDBGCBACK pBack, bool fReady);
|
---|
35 |
|
---|
36 |
|
---|
37 | /*******************************************************************************
|
---|
38 | * Global Variables *
|
---|
39 | *******************************************************************************/
|
---|
40 | /** The test handle. */
|
---|
41 | static RTTEST g_hTest = NIL_RTTEST;
|
---|
42 |
|
---|
43 | /** The DBGC backend structure for use in this testcase. */
|
---|
44 | static DBGCBACK g_tstBack =
|
---|
45 | {
|
---|
46 | tstDBGCBackInput,
|
---|
47 | tstDBGCBackRead,
|
---|
48 | tstDBGCBackWrite,
|
---|
49 | tstDBGCBackSetReady
|
---|
50 | };
|
---|
51 | /** For keeping track of output prefixing. */
|
---|
52 | static bool g_fPendingPrefix = true;
|
---|
53 | /** Pointer to the current input position. */
|
---|
54 | const char *g_pszInput = NULL;
|
---|
55 | /** The output of the last command. */
|
---|
56 | static char g_szOutput[1024];
|
---|
57 | /** The current offset into g_szOutput. */
|
---|
58 | static size_t g_offOutput = 0;
|
---|
59 |
|
---|
60 |
|
---|
61 | /**
|
---|
62 | * Checks if there is input.
|
---|
63 | *
|
---|
64 | * @returns true if there is input ready.
|
---|
65 | * @returns false if there not input ready.
|
---|
66 | * @param pBack Pointer to the backend structure supplied by
|
---|
67 | * the backend. The backend can use this to find
|
---|
68 | * it's instance data.
|
---|
69 | * @param cMillies Number of milliseconds to wait on input data.
|
---|
70 | */
|
---|
71 | static DECLCALLBACK(bool) tstDBGCBackInput(PDBGCBACK pBack, uint32_t cMillies)
|
---|
72 | {
|
---|
73 | return g_pszInput != NULL
|
---|
74 | && *g_pszInput != '\0';
|
---|
75 | }
|
---|
76 |
|
---|
77 |
|
---|
78 | /**
|
---|
79 | * Read input.
|
---|
80 | *
|
---|
81 | * @returns VBox status code.
|
---|
82 | * @param pBack Pointer to the backend structure supplied by
|
---|
83 | * the backend. The backend can use this to find
|
---|
84 | * it's instance data.
|
---|
85 | * @param pvBuf Where to put the bytes we read.
|
---|
86 | * @param cbBuf Maximum nymber of bytes to read.
|
---|
87 | * @param pcbRead Where to store the number of bytes actually read.
|
---|
88 | * If NULL the entire buffer must be filled for a
|
---|
89 | * successful return.
|
---|
90 | */
|
---|
91 | static DECLCALLBACK(int) tstDBGCBackRead(PDBGCBACK pBack, void *pvBuf, size_t cbBuf, size_t *pcbRead)
|
---|
92 | {
|
---|
93 | if (g_pszInput && *g_pszInput)
|
---|
94 | {
|
---|
95 | size_t cb = strlen(g_pszInput);
|
---|
96 | if (cb > cbBuf)
|
---|
97 | cb = cbBuf;
|
---|
98 | *pcbRead = cb;
|
---|
99 | memcpy(pvBuf, g_pszInput, cb);
|
---|
100 | g_pszInput += cb;
|
---|
101 | }
|
---|
102 | else
|
---|
103 | *pcbRead = 0;
|
---|
104 | return VINF_SUCCESS;
|
---|
105 | }
|
---|
106 |
|
---|
107 |
|
---|
108 | /**
|
---|
109 | * Write (output).
|
---|
110 | *
|
---|
111 | * @returns VBox status code.
|
---|
112 | * @param pBack Pointer to the backend structure supplied by
|
---|
113 | * the backend. The backend can use this to find
|
---|
114 | * it's instance data.
|
---|
115 | * @param pvBuf What to write.
|
---|
116 | * @param cbBuf Number of bytes to write.
|
---|
117 | * @param pcbWritten Where to store the number of bytes actually written.
|
---|
118 | * If NULL the entire buffer must be successfully written.
|
---|
119 | */
|
---|
120 | static DECLCALLBACK(int) tstDBGCBackWrite(PDBGCBACK pBack, const void *pvBuf, size_t cbBuf, size_t *pcbWritten)
|
---|
121 | {
|
---|
122 | const char *pch = (const char *)pvBuf;
|
---|
123 | if (pcbWritten)
|
---|
124 | *pcbWritten = cbBuf;
|
---|
125 | while (cbBuf-- > 0)
|
---|
126 | {
|
---|
127 | /* screen/log output */
|
---|
128 | if (g_fPendingPrefix)
|
---|
129 | {
|
---|
130 | RTTestPrintfNl(g_hTest, RTTESTLVL_ALWAYS, "OUTPUT: ");
|
---|
131 | g_fPendingPrefix = false;
|
---|
132 | }
|
---|
133 | if (*pch == '\n')
|
---|
134 | g_fPendingPrefix = true;
|
---|
135 | RTTestPrintf(g_hTest, RTTESTLVL_ALWAYS, "%c", *pch);
|
---|
136 |
|
---|
137 | /* buffer output */
|
---|
138 | if (g_offOutput < sizeof(g_szOutput) - 1)
|
---|
139 | {
|
---|
140 | g_szOutput[g_offOutput++] = *pch;
|
---|
141 | g_szOutput[g_offOutput] = '\0';
|
---|
142 | }
|
---|
143 |
|
---|
144 | /* advance */
|
---|
145 | pch++;
|
---|
146 | }
|
---|
147 | return VINF_SUCCESS;
|
---|
148 | }
|
---|
149 |
|
---|
150 |
|
---|
151 | /**
|
---|
152 | * Ready / busy notification.
|
---|
153 | *
|
---|
154 | * @param pBack Pointer to the backend structure supplied by
|
---|
155 | * the backend. The backend can use this to find
|
---|
156 | * it's instance data.
|
---|
157 | * @param fReady Whether it's ready (true) or busy (false).
|
---|
158 | */
|
---|
159 | static DECLCALLBACK(void) tstDBGCBackSetReady(PDBGCBACK pBack, bool fReady)
|
---|
160 | {
|
---|
161 | }
|
---|
162 |
|
---|
163 |
|
---|
164 | /**
|
---|
165 | * Completes the output, making sure that we're in
|
---|
166 | * the 1 position of a new line.
|
---|
167 | */
|
---|
168 | static void tstCompleteOutput(void)
|
---|
169 | {
|
---|
170 | if (!g_fPendingPrefix)
|
---|
171 | RTTestPrintf(g_hTest, RTTESTLVL_ALWAYS, "\n");
|
---|
172 | g_fPendingPrefix = true;
|
---|
173 | }
|
---|
174 |
|
---|
175 |
|
---|
176 | /**
|
---|
177 | * Tries one command string.
|
---|
178 | * @param pDbgc Pointer to the debugger instance.
|
---|
179 | * @param pszCmds The command to test.
|
---|
180 | * @param rcCmd The expected result.
|
---|
181 | * @param fNoExecute When set, the command is not executed.
|
---|
182 | * @param pszExpected Expected output. This does not need to include all
|
---|
183 | * of the output, just the start of it. Thus the
|
---|
184 | * prompt can be omitted.
|
---|
185 | */
|
---|
186 | static void tstTryEx(PDBGC pDbgc, const char *pszCmds, int rcCmd, bool fNoExecute, const char *pszExpected)
|
---|
187 | {
|
---|
188 | RT_ZERO(g_szOutput);
|
---|
189 | g_offOutput = 0;
|
---|
190 | g_pszInput = pszCmds;
|
---|
191 | if (strchr(pszCmds, '\0')[-1] == '\n')
|
---|
192 | RTTestPrintfNl(g_hTest, RTTESTLVL_ALWAYS, "RUNNING: %s", pszCmds);
|
---|
193 | else
|
---|
194 | RTTestPrintfNl(g_hTest, RTTESTLVL_ALWAYS, "RUNNING: %s\n", pszCmds);
|
---|
195 |
|
---|
196 | pDbgc->rcCmd = VERR_INTERNAL_ERROR;
|
---|
197 | dbgcProcessInput(pDbgc, fNoExecute);
|
---|
198 | tstCompleteOutput();
|
---|
199 |
|
---|
200 | if (pDbgc->rcCmd != rcCmd)
|
---|
201 | RTTestFailed(g_hTest, "rcCmd=%Rrc expected =%Rrc\n", pDbgc->rcCmd, rcCmd);
|
---|
202 | else if ( !fNoExecute
|
---|
203 | && pszExpected
|
---|
204 | && strncmp(pszExpected, g_szOutput, strlen(pszExpected)))
|
---|
205 | RTTestFailed(g_hTest, "Wrong output - expected \"%s\"", pszExpected);
|
---|
206 | }
|
---|
207 |
|
---|
208 |
|
---|
209 | /**
|
---|
210 | * Tries one command string without executing it.
|
---|
211 | *
|
---|
212 | * @param pDbgc Pointer to the debugger instance.
|
---|
213 | * @param pszCmds The command to test.
|
---|
214 | * @param rcCmd The expected result.
|
---|
215 | */
|
---|
216 | static void tstTry(PDBGC pDbgc, const char *pszCmds, int rcCmd)
|
---|
217 | {
|
---|
218 | return tstTryEx(pDbgc, pszCmds, rcCmd, true /*fNoExecute*/, NULL);
|
---|
219 | }
|
---|
220 |
|
---|
221 |
|
---|
222 | /**
|
---|
223 | * Tries to execute one command string.
|
---|
224 | * @param pDbgc Pointer to the debugger instance.
|
---|
225 | * @param pszCmds The command to test.
|
---|
226 | * @param rcCmd The expected result.
|
---|
227 | * @param pszExpected Expected output. This does not need to include all
|
---|
228 | * of the output, just the start of it. Thus the
|
---|
229 | * prompt can be omitted.
|
---|
230 | */
|
---|
231 | static void tstTryExec(PDBGC pDbgc, const char *pszCmds, int rcCmd, const char *pszExpected)
|
---|
232 | {
|
---|
233 | return tstTryEx(pDbgc, pszCmds, rcCmd, false /*fNoExecute*/, pszExpected);
|
---|
234 | }
|
---|
235 |
|
---|
236 |
|
---|
237 | /**
|
---|
238 | * Test an operator on an expression resulting a plain number.
|
---|
239 | *
|
---|
240 | * @param pDbgc Pointer to the debugger instance.
|
---|
241 | * @param pszExpr The express to test.
|
---|
242 | * @param u64Expect The expected result.
|
---|
243 | */
|
---|
244 | static void tstNumOp(PDBGC pDbgc, const char *pszExpr, uint64_t u64Expect)
|
---|
245 | {
|
---|
246 | char szCmd[80];
|
---|
247 | RTStrPrintf(szCmd, sizeof(szCmd), "format %s\n", pszExpr);
|
---|
248 |
|
---|
249 | char szExpected[80];
|
---|
250 | RTStrPrintf(szExpected, sizeof(szExpected),
|
---|
251 | "Number: hex %llx dec 0i%lld oct 0t%llo", u64Expect, u64Expect, u64Expect);
|
---|
252 |
|
---|
253 | return tstTryEx(pDbgc, szCmd, VINF_SUCCESS, false /*fNoExecute*/, szExpected);
|
---|
254 | }
|
---|
255 |
|
---|
256 |
|
---|
257 |
|
---|
258 | int main()
|
---|
259 | {
|
---|
260 | /*
|
---|
261 | * Init.
|
---|
262 | */
|
---|
263 | int rc = RTTestInitAndCreate("tstDBGCParser", &g_hTest);
|
---|
264 | if (rc)
|
---|
265 | return rc;
|
---|
266 | RTTestBanner(g_hTest);
|
---|
267 |
|
---|
268 | /*
|
---|
269 | * Create a DBGC instance.
|
---|
270 | */
|
---|
271 | PDBGC pDbgc;
|
---|
272 | rc = dbgcCreate(&pDbgc, &g_tstBack, 0);
|
---|
273 | if (RT_SUCCESS(rc))
|
---|
274 | {
|
---|
275 | rc = dbgcProcessInput(pDbgc, true /* fNoExecute */);
|
---|
276 | tstCompleteOutput();
|
---|
277 | if (RT_SUCCESS(rc))
|
---|
278 | {
|
---|
279 | tstTry(pDbgc, "stop\n", VINF_SUCCESS);
|
---|
280 | tstTry(pDbgc, "format 1\n", VINF_SUCCESS);
|
---|
281 | tstTry(pDbgc, "format \n", VERR_PARSE_TOO_FEW_ARGUMENTS);
|
---|
282 | tstTry(pDbgc, "format 0 1 23 4\n", VERR_PARSE_TOO_MANY_ARGUMENTS);
|
---|
283 | tstTry(pDbgc, "sa 3 23 4 'q' \"21123123\" 'b' \n", VINF_SUCCESS);
|
---|
284 |
|
---|
285 | tstNumOp(pDbgc, "1", 1);
|
---|
286 | tstNumOp(pDbgc, "1", 1);
|
---|
287 | tstNumOp(pDbgc, "1", 1);
|
---|
288 |
|
---|
289 | tstNumOp(pDbgc, "+1", 1);
|
---|
290 | tstNumOp(pDbgc, "++++++1", 1);
|
---|
291 |
|
---|
292 | tstNumOp(pDbgc, "-1", UINT64_MAX);
|
---|
293 | tstNumOp(pDbgc, "--1", 1);
|
---|
294 | tstNumOp(pDbgc, "---1", UINT64_MAX);
|
---|
295 | tstNumOp(pDbgc, "----1", 1);
|
---|
296 |
|
---|
297 | tstNumOp(pDbgc, "~0", UINT64_MAX);
|
---|
298 | tstNumOp(pDbgc, "~1", UINT64_MAX-1);
|
---|
299 | tstNumOp(pDbgc, "~~0", 0);
|
---|
300 | tstNumOp(pDbgc, "~~1", 1);
|
---|
301 |
|
---|
302 | tstNumOp(pDbgc, "!1", 0);
|
---|
303 | tstNumOp(pDbgc, "!0", 1);
|
---|
304 | tstNumOp(pDbgc, "!42", 0);
|
---|
305 | tstNumOp(pDbgc, "!!42", 1);
|
---|
306 | tstNumOp(pDbgc, "!!!42", 0);
|
---|
307 | tstNumOp(pDbgc, "!!!!42", 1);
|
---|
308 |
|
---|
309 | tstNumOp(pDbgc, "1 +1", 2);
|
---|
310 | tstNumOp(pDbgc, "1 + 1", 2);
|
---|
311 | tstNumOp(pDbgc, "1+1", 2);
|
---|
312 | tstNumOp(pDbgc, "1+ 1", 2);
|
---|
313 |
|
---|
314 | tstNumOp(pDbgc, "1 - 1", 0);
|
---|
315 | tstNumOp(pDbgc, "99 - 90", 9);
|
---|
316 |
|
---|
317 | tstNumOp(pDbgc, "2 * 2", 4);
|
---|
318 |
|
---|
319 | tstNumOp(pDbgc, "2 / 2", 1);
|
---|
320 | tstNumOp(pDbgc, "2 / 0", UINT64_MAX);
|
---|
321 | tstNumOp(pDbgc, "0i1024 / 0i4", 256);
|
---|
322 |
|
---|
323 | tstNumOp(pDbgc, "1<<1", 2);
|
---|
324 | tstNumOp(pDbgc, "1<<0i32", UINT64_C(0x0000000100000000));
|
---|
325 | tstNumOp(pDbgc, "1<<0i48", UINT64_C(0x0001000000000000));
|
---|
326 | tstNumOp(pDbgc, "1<<0i63", UINT64_C(0x8000000000000000));
|
---|
327 |
|
---|
328 | tstNumOp(pDbgc, "fedcba0987654321>>0i04", UINT64_C(0x0fedcba098765432));
|
---|
329 | tstNumOp(pDbgc, "fedcba0987654321>>0i32", UINT64_C(0xfedcba09));
|
---|
330 | tstNumOp(pDbgc, "fedcba0987654321>>0i48", UINT64_C(0x0000fedc));
|
---|
331 |
|
---|
332 | tstNumOp(pDbgc, "0ef & 4", 4);
|
---|
333 | tstNumOp(pDbgc, "01234567891 & fff", UINT64_C(0x00000000891));
|
---|
334 | tstNumOp(pDbgc, "01234567891 & ~fff", UINT64_C(0x01234567000));
|
---|
335 |
|
---|
336 | tstNumOp(pDbgc, "1 | 1", 1);
|
---|
337 | tstNumOp(pDbgc, "0 | 4", 4);
|
---|
338 | tstNumOp(pDbgc, "4 | 0", 4);
|
---|
339 | tstNumOp(pDbgc, "4 | 4", 4);
|
---|
340 | tstNumOp(pDbgc, "1 | 4 | 2", 7);
|
---|
341 |
|
---|
342 | tstNumOp(pDbgc, "1 ^ 1", 0);
|
---|
343 | tstNumOp(pDbgc, "1 ^ 0", 1);
|
---|
344 | tstNumOp(pDbgc, "0 ^ 1", 1);
|
---|
345 | tstNumOp(pDbgc, "3 ^ 1", 2);
|
---|
346 | tstNumOp(pDbgc, "7 ^ 3", 4);
|
---|
347 |
|
---|
348 | tstNumOp(pDbgc, "7 || 3", 1);
|
---|
349 | tstNumOp(pDbgc, "1 || 0", 1);
|
---|
350 | tstNumOp(pDbgc, "0 || 1", 1);
|
---|
351 | tstNumOp(pDbgc, "0 || 0", 0);
|
---|
352 |
|
---|
353 | tstNumOp(pDbgc, "0 && 0", 0);
|
---|
354 | tstNumOp(pDbgc, "1 && 0", 0);
|
---|
355 | tstNumOp(pDbgc, "0 && 1", 0);
|
---|
356 | tstNumOp(pDbgc, "1 && 1", 1);
|
---|
357 | tstNumOp(pDbgc, "4 && 1", 1);
|
---|
358 |
|
---|
359 | }
|
---|
360 |
|
---|
361 | dbgcDestroy(pDbgc);
|
---|
362 | }
|
---|
363 |
|
---|
364 | /*
|
---|
365 | * Summary
|
---|
366 | */
|
---|
367 | return RTTestSummaryAndDestroy(g_hTest);
|
---|
368 | }
|
---|