Return to debug.c CVS log

Up to [WindowsNT SDKs] / mstools / ole20 / samples / outline

Annotation of mstools/ole20/samples/outline/debug.c, revision 1.1

1.1     ! root        1: /*************************************************************************
        !             2: ** 
        !             3: **    OLE 2 Sample Code
        !             4: **    
        !             5: **    debug.c
        !             6: **    
        !             7: **    This file contains some functions for debugging support
        !             8: **    
        !             9: **    (c) Copyright Microsoft Corp. 1992 - 1993 All Rights Reserved
        !            10: **
        !            11: *************************************************************************/
        !            12: 
        !            13: #include "outline.h"
        !            14: 
        !            15: OLEDBGDATA
        !            16: 
        !            17: extern LPOUTLINEAPP g_lpApp;
        !            18: 
        !            19: void SetDebugLevelCommand(void)
        !            20: {
        !            21:     char szBuf[80];
        !            22:     HWND hWndFrame = OutlineApp_GetFrameWindow(g_lpApp);
        !            23:     
        !            24:     wsprintf(szBuf, "%d", OleDbgGetDbgLevel());
        !            25:     
        !            26:     if (InputTextDlg(hWndFrame, szBuf, "Debug Level [0-4]")) {
        !            27:         switch (szBuf[0]) {
        !            28:             case '0':
        !            29:                 OleDbgSetDbgLevel(0);
        !            30:                 break;
        !            31:             case '1':
        !            32:                 OleDbgSetDbgLevel(1);
        !            33:                 break;
        !            34:             case '2':
        !            35:                 OleDbgSetDbgLevel(2);
        !            36:                 break;
        !            37:             case '3':
        !            38:                 OleDbgSetDbgLevel(3);
        !            39:                 break;
        !            40:             case '4':
        !            41:                 OleDbgSetDbgLevel(4);
        !            42:                 break;
        !            43:             default:
        !            44:                 OutlineApp_ErrorMessage(g_lpApp, "Valid Debug Level Range: 0-4");
        !            45:                 break;
        !            46:         }
        !            47:     }
        !            48: }
        !            49: 
        !            50: 
        !            51: #if defined( OLE_VERSION )
        !            52: 
        !            53: /* InstallMessageFilterCommand
        !            54:  * ---------------------------
        !            55:  *
        !            56:  * Handles the "Install Message Filter" menu item.  If a message filter is
        !            57:  * already installed, this function de-installs it.  If there is not one
        !            58:  * already installed, this function installs one.
        !            59:  *
        !            60:  */
        !            61: 
        !            62: void InstallMessageFilterCommand(void)
        !            63: {
        !            64:     LPOLEAPP lpOleApp = (LPOLEAPP)g_lpApp;
        !            65: 
        !            66:     /*
        !            67:     ** Check to see if we've already installed a MessageFilter.  
        !            68:     ** If so, uninstall it.
        !            69:     */
        !            70:     if (lpOleApp->m_lpMsgFilter != NULL) 
        !            71:         OleApp_RevokeMessageFilter(lpOleApp);
        !            72:     else 
        !            73:         OleApp_RegisterMessageFilter(lpOleApp);
        !            74: }
        !            75: 
        !            76: 
        !            77: /* RejectIncomingCommand
        !            78:  * ---------------------
        !            79:  *
        !            80:  * Toggles between rejecting and not-handling in coming LRPC calls
        !            81:  *
        !            82:  */
        !            83: 
        !            84: void RejectIncomingCommand(void)
        !            85: {
        !            86:     DWORD dwOldStatus;
        !            87:     DWORD dwNewStatus;
        !            88:     LPOLEAPP lpOleApp = (LPOLEAPP)g_lpApp;
        !            89:     
        !            90:     dwOldStatus = OleStdMsgFilter_GetInComingCallStatus(lpOleApp->m_lpMsgFilter);
        !            91:     
        !            92:     if (dwOldStatus == SERVERCALL_RETRYLATER)
        !            93:         dwNewStatus = SERVERCALL_ISHANDLED;
        !            94:     else
        !            95:         dwNewStatus = SERVERCALL_RETRYLATER;
        !            96: 
        !            97:     OleStdMsgFilter_SetInComingCallStatus(lpOleApp->m_lpMsgFilter, dwNewStatus);
        !            98: }
        !            99: 
        !           100: #endif  // OLE_VERSION
        !           101: 
        !           102: 

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.