1 files changed, 131 insertions, 0 deletions
diff --git a/private/oleauto/tests/common/assert.cpp b/private/oleauto/tests/common/assert.cpp
new file mode 100644
index 000000000..083540d45
--- /dev/null
+++ b/private/oleauto/tests/common/assert.cpp
@@ -0,0 +1,131 @@
+/*** 
+*assert.cpp
+*
+*  Copyright (C) 1992, Microsoft Corporation.  All Rights Reserved.
+*  Information Contained Herein Is Proprietary and Confidential.
+*
+*Purpose:
+*  Internal assertion support.
+*
+*Revision History:
+*
+* [00]	22-May-93 bradlo: Created.
+*
+*Implementation Notes:
+*
+*****************************************************************************/
+
+
+// Disable Unicode expansion for assertions
+#if defined(WIN32)
+  #undef UNICODE
+#endif
+
+#include "common.h"
+#include "assrtdlg.h"
+
+#include <stdio.h>  /* sprintf */
+
+
+#ifdef _DEBUG /* { */
+
+#ifndef _MAC /* { */
+
+
+extern HINSTANCE g_hinst;
+
+LPSTR g_szLoc;
+LPSTR g_szMsg;
+
+BOOL EXPORT FAR PASCAL
+AssertDlgProc(
+    HWND hdlg,
+    WORD message,
+    WORD wParam,
+    LONG lParam)
+{
+    switch (message){
+    case WM_INITDIALOG:
+      SetDlgItemText(hdlg, ASSERT_ID_LOC, g_szLoc);
+      if(g_szMsg)
+        SetDlgItemText(hdlg, ASSERT_ID_MSG, g_szMsg);
+      break;
+
+    case WM_COMMAND:
+      switch(wParam){
+      case ASSERT_ID_BREAK:
+      case ASSERT_ID_EXIT:
+      case ASSERT_ID_IGNORE:
+        EndDialog(hdlg, wParam);
+        return TRUE;
+      }
+      break;
+    }
+    return FALSE;
+}
+
+#endif /* } */
+
+#endif /* } */
+
+STDAPI_(void)
+DispAssert(
+    char FAR* szMsg,
+    char FAR* szFileName,
+    int line)
+{
+#ifdef _DEBUG /* { */
+
+    char rgchBuf[200];
+    char rgchLoc[200];
+
+#ifdef _MAC /* { */
+
+    sprintf(rgchLoc, "File %s, line %d", szFileName, line);
+    rgchBuf[0] = sprintf(
+      rgchBuf+1, "Assertion failed: %s %s\n",
+      rgchLoc, szMsg == NULL ? "" : szMsg);
+    --rgchBuf[0]; // kill the cr in string
+    DebugStr((const unsigned char FAR*)rgchBuf);
+
+#else /* }{  */
+
+    int i;
+    FARPROC pfnAssertDlgProc;
+
+    pfnAssertDlgProc = MakeProcInstance((FARPROC)AssertDlgProc, g_hinst);
+    wsprintf(rgchBuf, "Assertion failed: ");
+    wsprintf(rgchLoc, "File %s, line %d", szFileName, line);
+
+    OutputDebugString(rgchBuf);
+    OutputDebugString(rgchLoc);
+    if(szMsg){
+      OutputDebugString("\r\n");
+      OutputDebugString(szMsg);
+    }
+    OutputDebugString("\r\n");
+
+    g_szMsg = szMsg;
+    g_szLoc = rgchLoc;
+
+#ifdef WIN32       // required by new Daytona headers
+    i = DialogBox(g_hinst, "AssertFailDlg", NULL, (DLGPROC)pfnAssertDlgProc);
+#else //WIN32
+    i = DialogBox(g_hinst, "AssertFailDlg", NULL, pfnAssertDlgProc);
+#endif //WIN32
+    FreeProcInstance(pfnAssertDlgProc);
+
+    switch(i){
+    case ASSERT_ID_BREAK:
+      DebugBreak();
+      break;
+    case ASSERT_ID_EXIT:
+      CoFreeAllLibraries();
+      FatalAppExit(0, "Assertion failure");
+      break;
+    }
+
+#endif /* } */
+#endif /* } */
+}
+