-#include "apitest.h"\r
-\r
-void\r
-OutputUsage(LPWSTR pszExe)\r
-{\r
- printf("\nUsage:\n\n");\r
- printf("%ls <TestName> - perform individual test\n", pszExe);\r
- printf("%ls all - perform all tests\n", pszExe);\r
- printf("%ls status - create api status file\n", pszExe);\r
- printf("%ls -r ... - perform regression testing\n", pszExe);\r
- printf("\n");\r
-}\r
-\r
-int\r
-TestMain(LPWSTR pszExe)\r
-{\r
- INT argc, i, j;\r
- LPWSTR *argv;\r
- TESTINFO ti;\r
- INT opassed, ofailed, orfailed;\r
- BOOL bAll, bStatus;\r
-\r
- ti.bRegress = FALSE;\r
- bAll = FALSE;\r
- bStatus = FALSE;\r
- opassed = ofailed = orfailed = 0;\r
-\r
- argv = CommandLineToArgvW(GetCommandLineW(), &argc);\r
-\r
- if (argc < 2)\r
- {\r
- OutputUsage(pszExe);\r
- return 0;\r
- }\r
-\r
- /* Get options */\r
- for (i = 1; i < argc; i++)\r
- {\r
- if (wcsicmp(argv[i], L"-r") == 0)\r
- {\r
- ti.bRegress = TRUE;\r
- }\r
- else if (wcsicmp(argv[i], L"all") == 0)\r
- {\r
- bAll = TRUE;\r
- }\r
- else if (wcsicmp(argv[i], L"status") == 0)\r
- {\r
- bAll = TRUE;\r
- bStatus = TRUE;\r
- }\r
- }\r
-\r
- if (bStatus)\r
- {\r
- printf("Output of API status is unimplemented.\n");\r
- return 0;\r
- }\r
-\r
- for (i = 0; i < NumTests(); i++)\r
- {\r
- for (j = 1; j < argc; j++)\r
- {\r
- if (bAll || wcsicmp(argv[j], TestList[i].Test) == 0)\r
- {\r
- ti.passed = 0;\r
- ti.failed = 0;\r
- ti.rfailed = 0;\r
- if (!IsFunctionPresent(TestList[i].Test))\r
- {\r
- printf("Function %ls was not found!\n", TestList[i].Test);\r
- }\r
- else\r
- {\r
- printf("Executing test: %ls\n", TestList[i].Test);\r
- TestList[i].Proc(&ti);\r
- opassed += ti.passed;\r
- ofailed += ti.failed;\r
- orfailed += ti.rfailed;\r
- printf(" tests: %d, passed: %d, failed: %d\n\n", ti.passed+ti.failed, ti.passed, ti.failed);\r
- }\r
- break;\r
- }\r
- }\r
- }\r
-\r
- printf("Overall:\n");\r
- printf(" tests: %d, passed: %d, failed: %d\n\n", opassed+ofailed, opassed, ofailed);\r
- if (ti.bRegress)\r
- {\r
- printf(" regressions: %d\n", orfailed);\r
- }\r
-\r
- if (ti.bRegress)\r
- return ti.rfailed;\r
-\r
- return ti.failed;\r
-}\r
+#include "apitest.h"
+
+const char szFileHeader1[] = "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n"
+ "<html xmlns=\"http://www.w3.org/1999/xhtml\">\n"
+ "<head>\n"
+ "<meta http-equiv=\"content-type\" content=\"text/html; charset=utf-8\" />\n";
+const char szFileHeader2[] = "<style type=\"text/css\">\n"
+ "body {font-family: sans-serif;}\n"
+ "table {width: 100%;}\n"
+ "th {text-align: left;}\n"
+ "td.red {color: red;}\n"
+ "td.green {color: green;}\n"
+ "</style>\n"
+ "</head>\n"
+ "<body>\n";
+const char szTableHeader[] = "<table><tr><th>Function</th><th>Status</th><th>Tests (all/passed/failed)</th><th>Regressions</th></tr>";
+const char szFileFooter[] = "</table></body></html>";
+
+void
+OutputUsage(LPWSTR pszName)
+{
+ printf("\nUsage:\n\n");
+ printf("%ls.exe <TestName> - Perform individual test\n", pszName);
+ printf("%ls.exe all - Perform all tests\n", pszName);
+ printf("%ls.exe tests - List the valid test names\n", pszName);
+ printf("%ls.exe status - Create api status file\n", pszName);
+ printf("%ls.exe -r ... - Perform regression testing\n", pszName);
+ printf("\n");
+}
+
+BOOL
+WriteFileHeader(HANDLE hFile, LPDWORD lpdwBytesWritten, LPWSTR pszModule)
+{
+ char szHeader[100];
+
+ WriteFile(hFile, szFileHeader1, strlen(szFileHeader1), lpdwBytesWritten, NULL);
+ sprintf(szHeader, "<title>%ls Test results</title>", pszModule);
+ WriteFile(hFile, szHeader, strlen(szHeader), lpdwBytesWritten, NULL);
+ WriteFile(hFile, szFileHeader2, strlen(szFileHeader2), lpdwBytesWritten, NULL);
+
+ sprintf(szHeader, "<h1>Test results for %ls</h1>", pszModule);
+ WriteFile(hFile, szHeader, strlen(szHeader), lpdwBytesWritten, NULL);
+
+ WriteFile(hFile, szTableHeader, strlen(szTableHeader), lpdwBytesWritten, NULL);
+
+ return TRUE;
+}
+
+BOOL
+WriteRow(HANDLE hFile, LPDWORD lpdwBytesWritten, LPWSTR pszFunction, PTESTINFO pti)
+{
+ char szLine[500];
+
+ sprintf(szLine, "<tr><td>%ls</td>", pszFunction);
+
+ switch(pti->nApiStatus)
+ {
+ case APISTATUS_NOT_FOUND:
+ strcat(szLine, "<td class=\"red\">not found</td>");
+ break;
+ case APISTATUS_UNIMPLEMENTED:
+ strcat(szLine, "<td class=\"red\">unimplemented</td>");
+ break;
+ case APISTATUS_ASSERTION_FAILED:
+ strcat(szLine, "<td class=\"red\">assertion failed</td>");
+ break;
+ case APISTATUS_REGRESSION:
+ strcat(szLine, "<td class=\"red\">Regression!</td>");
+ break;
+ case APISTATUS_NORMAL:
+ strcat(szLine, "<td class=\"green\">Implemented</td>");
+ break;
+ }
+
+ sprintf(szLine + strlen(szLine), "<td>%d / %d / %d</td><td>%d</td></tr>\n",
+ pti->passed+pti->failed, pti->passed, pti->failed, pti->rfailed);
+
+ WriteFile(hFile, szLine, strlen(szLine), lpdwBytesWritten, NULL);
+
+ return TRUE;
+}
+
+static CHAR
+GetDisplayChar(CHAR c)
+{
+ if (c < 32) return '.';
+ return c;
+}
+
+VOID
+DumpMem(PVOID pData, ULONG cbSize, ULONG nWidth)
+{
+ ULONG cLines = (cbSize + nWidth - 1) / nWidth;
+ ULONG cbLastLine = cbSize % nWidth;
+ INT i,j;
+
+ for (i = 0; i <= cLines; i++)
+ {
+ printf("%08lx: ", i*nWidth);
+ for (j = 0; j < (i == cLines? cbLastLine : nWidth); j++)
+ {
+ printf("%02x ", ((BYTE*)pData)[i*nWidth + j]);
+ }
+ printf(" ");
+ for (j = 0; j < (i == cLines? cbLastLine : nWidth); j++)
+ {
+ printf("%c", GetDisplayChar(((CHAR*)pData)[i*nWidth + j]));
+ }
+ printf("\n");
+ }
+}
+
+int
+TestMain(LPWSTR pszName, LPWSTR pszModule)
+{
+ INT argc, i, j;
+ LPWSTR *argv;
+ TESTINFO ti;
+ INT opassed, ofailed, orfailed;
+ BOOL bAll, bStatus;
+ HANDLE hFile = NULL;
+ DWORD dwBytesWritten;
+
+ ti.bRegress = FALSE;
+ bAll = FALSE;
+ bStatus = FALSE;
+ opassed = ofailed = orfailed = 0;
+
+ argv = CommandLineToArgvW(GetCommandLineW(), &argc);
+
+ if (argc < 2)
+ {
+ OutputUsage(pszName);
+ return 0;
+ }
+
+ /* Get options */
+ for (i = 1; i < argc; i++)
+ {
+ if (_wcsicmp(argv[i], L"-r") == 0)
+ {
+ ti.bRegress = TRUE;
+ }
+ else if (_wcsicmp(argv[i], L"all") == 0)
+ {
+ bAll = TRUE;
+ }
+ else if (_wcsicmp(argv[i], L"status") == 0)
+ {
+ bAll = TRUE;
+ bStatus = TRUE;
+ }
+ else if (_wcsicmp(argv[i], L"tests") == 0)
+ {
+ /* List all the tests and exit */
+ printf("Valid test names:\n\n");
+
+ for (i = 0; i < NumTests(); i++)
+ printf("%ls\n", TestList[i].Test);
+
+ return 0;
+ }
+ }
+
+ if (bStatus)
+ {
+ WCHAR szOutputFile[MAX_PATH];
+
+ ti.bRegress = TRUE;
+ wcscpy(szOutputFile, pszName);
+ wcscat(szOutputFile, L".html");
+ hFile = CreateFileW(szOutputFile, GENERIC_WRITE, 0, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
+
+ if (hFile == INVALID_HANDLE_VALUE)
+ {
+ printf("Could not create output file.\n");
+ return 0;
+ }
+
+ WriteFileHeader(hFile, &dwBytesWritten, pszModule);
+ }
+
+ for (i = 0; i < NumTests(); i++)
+ {
+ for (j = 1; j < argc; j++)
+ {
+ if (bAll || _wcsicmp(argv[j], TestList[i].Test) == 0)
+ {
+ ti.passed = 0;
+ ti.failed = 0;
+ ti.rfailed = 0;
+ if (!IsFunctionPresent(TestList[i].Test))
+ {
+ printf("Function %ls was not found!\n", TestList[i].Test);
+ ti.nApiStatus = APISTATUS_NOT_FOUND;
+ }
+ else
+ {
+ printf("Executing test: %ls\n", TestList[i].Test);
+ ti.nApiStatus = TestList[i].Proc(&ti);
+ opassed += ti.passed;
+ ofailed += ti.failed;
+ orfailed += ti.rfailed;
+ printf(" tests: %d, passed: %d, failed: %d\n\n", ti.passed+ti.failed, ti.passed, ti.failed);
+ }
+ if (bStatus)
+ {
+ if (ti.rfailed > 0)
+ ti.nApiStatus = APISTATUS_REGRESSION;
+ WriteRow(hFile, &dwBytesWritten, TestList[i].Test, &ti);
+ }
+ break;
+ }
+ }
+ }
+
+ printf("Overall:\n");
+ printf(" tests: %d, passed: %d, failed: %d\n\n", opassed+ofailed, opassed, ofailed);
+ if (ti.bRegress)
+ {
+ printf(" regressions: %d\n", orfailed);
+ }
+
+ if (bStatus)
+ {
+ WriteFile(hFile, szFileFooter, strlen(szFileFooter), &dwBytesWritten, NULL);
+ CloseHandle(hFile);
+ }
+
+ if (ti.bRegress)
+ return ti.rfailed;
+
+ return ti.failed;
+}