home *** CD-ROM | disk | FTP | other *** search
/ The Best of Select: Windows 95 Special 1 / WINDOWS95_1.bin / internet / vogon / mainfrm.cpp < prev    next >
Encoding:
C/C++ Source or Header  |  1995-07-29  |  10.1 KB  |  376 lines
  1. // mainfrm.cpp : implementation of the CMainFrame class
  2. //
  3.  
  4. #include "stdafx.h"
  5. #include "Vogon.h"
  6.  
  7. #include "CntrInfo.h"
  8. #include "CntrItem.h"
  9. #include "VogonDoc.h"
  10. #include "VogonVw.h"
  11.  
  12. #include "MainFrm.h"
  13. #include "UnRegDlg.h"
  14.  
  15. #ifdef _DEBUG
  16. #undef THIS_FILE
  17. static char BASED_CODE THIS_FILE[] = __FILE__;
  18. #endif
  19.  
  20. /////////////////////////////////////////////////////////////////////////////
  21. // This code is straight from MSDN
  22.  
  23. #ifdef _WIN32
  24. #define LOADLIBRARY_FAILED(x) (x == 0)
  25. #include "winver.h"
  26. #else
  27. #define LOADLIBRARY_FAILED(x) (x <= HINSTANCE_ERROR)
  28. #include "ver.h" 
  29. #endif
  30.  
  31. #include <memory.h>
  32.  
  33. //
  34. //
  35. //
  36. typedef HRESULT (STDAPICALLTYPE *CTLREGPROC)(void) ; //see COMPOBJ.H
  37.  
  38. //
  39. //
  40. //
  41. CRegisterControl::CRegisterControl(CString PathName)
  42. {
  43.    m_strPathName = PathName ;
  44. }
  45.  
  46. //
  47. //
  48. //
  49. CRegisterControl::~CRegisterControl()
  50. {
  51.    m_strPathName.Empty() ; 
  52. }
  53.  
  54. //
  55. //
  56. //
  57. BOOL CRegisterControl::Register()
  58. {
  59.    BOOL bResult = FALSE;
  60.    ASSERT(!m_strPathName.IsEmpty()) ;
  61.  
  62.    if (SupportsSelfRegister()) 
  63.    {  
  64.       char* szPathName = m_strPathName.GetBuffer(m_strPathName.GetLength()) ;
  65.       HINSTANCE hModule = ::LoadLibrary(szPathName) ;
  66.       m_strPathName.ReleaseBuffer(-1) ;
  67.       if (LOADLIBRARY_FAILED(hModule)) return FALSE ;
  68.             
  69.       CTLREGPROC DLLRegisterServer = (CTLREGPROC)::GetProcAddress(hModule,"DllRegisterServer" ) ;
  70.       if (DLLRegisterServer != NULL)
  71.       {
  72.          HRESULT regResult = DLLRegisterServer() ;
  73.          bResult = (regResult == NOERROR) ; 
  74.       }     
  75.       ::FreeLibrary(hModule) ;          
  76.          
  77.    }
  78.    return bResult;   
  79. }
  80.  
  81. //
  82. //
  83. //
  84. BOOL CRegisterControl::Unregister()
  85. {
  86.    BOOL bResult = FALSE ;
  87.    ASSERT(!m_strPathName.IsEmpty()) ;
  88.  
  89.    if (SupportsSelfRegister()) 
  90.    {                                    
  91.       char* szPathName = m_strPathName.GetBuffer(m_strPathName.GetLength()) ;
  92.       HMODULE hModule = ::LoadLibrary(szPathName) ;
  93.       m_strPathName.ReleaseBuffer(-1) ;
  94.       if (LOADLIBRARY_FAILED(hModule)) return FALSE ;
  95.             
  96.       CTLREGPROC DllUnregisterServer = (CTLREGPROC)::GetProcAddress(hModule,"DllUnregisterServer" ) ;
  97.       if (DllUnregisterServer != NULL)
  98.       {
  99.          HRESULT regResult = DllUnregisterServer() ;
  100.          bResult = (regResult == NOERROR) ; 
  101.       }     
  102.       FreeLibrary(hModule) ;
  103.    }                                     
  104.    return bResult;   
  105. } 
  106.  
  107. //
  108. //
  109. //
  110. BOOL CRegisterControl::SupportsSelfRegister()
  111. {
  112.    BOOL bResult = FALSE;
  113.    DWORD  handle;
  114.    DWORD  uiInfoSize;
  115.    UINT  uiVerSize ;
  116.    UINT  uiSize ;
  117.    DWORD* lpBuffer;
  118.    CString strName   ;
  119.    char szName[128] ;
  120.  
  121.    // Get the size of the version information.
  122.    uiInfoSize = ::GetFileVersionInfoSize((LPTSTR)(LPCTSTR)m_strPathName, &handle);
  123.    if (uiInfoSize == 0) 
  124.       return FALSE ;
  125.  
  126.    // Allocate a buffer for the version information.
  127.    char* pbData = new char[uiInfoSize] ;
  128.  
  129.    // Fill the buffer with the version information.
  130.    bResult = ::GetFileVersionInfo((LPTSTR)(LPCTSTR)m_strPathName, handle, uiInfoSize, pbData);  
  131.    if (!bResult) goto NastyGoto ;
  132.  
  133.    // Get the translation information.
  134.    bResult = ::VerQueryValue(pbData, "\\VarFileInfo\\Translation", (void**)&lpBuffer, &uiVerSize);
  135.    if (!bResult) goto NastyGoto ;
  136.  
  137.    bResult = uiVerSize ;
  138.    if (!bResult) goto NastyGoto ;
  139.  
  140.    // Build the path to the key OLESelfRegister using the translation information.
  141.    wsprintf(szName,"\\StringFileInfo\\%04hX%04hX\\OLESelfRegister",LOWORD(*lpBuffer),HIWORD(*lpBuffer)) ;
  142.  
  143.    // Search for the key.
  144.     bResult = ::VerQueryValue(pbData, szName, (void**)&lpBuffer, &uiSize);
  145.  
  146. NastyGoto:
  147.    delete [] pbData ;
  148.    return bResult ;
  149. }
  150.  
  151. // END This code is straight from MSDN
  152. /////////////////////////////////////////////////////////////////////////////
  153.  
  154.  
  155. /////////////////////////////////////////////////////////////////////////////
  156. // CMainFrame
  157.  
  158. IMPLEMENT_DYNAMIC(CMainFrame, CMDIFrameWnd)
  159.  
  160. BEGIN_MESSAGE_MAP(CMainFrame, CMDIFrameWnd)
  161.    //{{AFX_MSG_MAP(CMainFrame)
  162.    ON_WM_CREATE()
  163.    ON_COMMAND(ID_VIEW_REGISTERWEBSTER, OnRegisterWebster)
  164.    ON_COMMAND(ID_VIEW_UNREGISTERWEBSTER, OnUnregisterWebster)
  165.    //}}AFX_MSG_MAP
  166.    ON_UPDATE_COMMAND_UI(ID_INDICATOR_STATUS, OnUpdateStatusPane)
  167.    ON_UPDATE_COMMAND_UI(ID_INDICATOR_URL,    OnUpdateUrlPane)
  168. END_MESSAGE_MAP()
  169.  
  170. /////////////////////////////////////////////////////////////////////////////
  171. // arrays of IDs used to initialize control bars
  172.  
  173. // toolbar buttons - IDs are command buttons
  174. static UINT BASED_CODE buttons[] =
  175. {
  176.    // same order as in the bitmap 'toolbar.bmp'
  177.    ID_FILE_NEW,
  178.    ID_FILE_OPEN,
  179.    ID_FILE_SAVE,
  180.       ID_SEPARATOR,
  181.    ID_SHOW_PROPERTY_INSPECTOR,
  182.       ID_SEPARATOR,
  183.    ID_VIEW_SLIDESHOW,
  184.    ID_VIEW_SLIDESHOW_SETUP,
  185.       ID_SEPARATOR,
  186.    ID_VIEW_URLFILTER,
  187.    ID_VIEW_REVEALPAGE,
  188.       ID_SEPARATOR,
  189.    ID_VIEW_TEXTRETRIEVAL,
  190.    ID_VIEW_HYPERLINKS,
  191.       ID_SEPARATOR,
  192.    ID_VIEW_ABOUTWEBSTER,
  193.    ID_APP_ABOUT
  194. };
  195.  
  196. static UINT BASED_CODE indicators[] =
  197. {  // status line indicators
  198.    ID_INDICATOR_STATUS,           
  199.    ID_INDICATOR_URL,
  200.    //ID_INDICATOR_CAPS,
  201.    //ID_INDICATOR_NUM,
  202.    //ID_INDICATOR_SCRL,
  203. };
  204.  
  205. /////////////////////////////////////////////////////////////////////////////
  206. // CMainFrame construction/destruction
  207.  
  208. CMainFrame::CMainFrame()
  209. {
  210.    // TODO: add member initialization code here
  211. }
  212.  
  213. CMainFrame::~CMainFrame()
  214. {
  215. }
  216.  
  217. int CMainFrame::OnCreate(LPCREATESTRUCT lpCreateStruct)
  218. {
  219.    if (CMDIFrameWnd::OnCreate(lpCreateStruct) == -1)
  220.       return -1;
  221.  
  222. #ifdef _WIN32
  223.    if (!m_wndToolBar.Create(this, CBRS_TOOLTIPS | WS_CHILD | WS_VISIBLE | CBRS_TOP) ||
  224. #else   // not _WIN32
  225.    if (!m_wndToolBar.Create(this, WS_CHILD | WS_VISIBLE | CBRS_TOP) ||
  226. #endif  //     _WIN32
  227.       !m_wndToolBar.LoadBitmap(IDR_MAINFRAME) ||
  228.       !m_wndToolBar.SetButtons(buttons,
  229.         sizeof(buttons)/sizeof(UINT)))
  230.    {
  231.       TRACE("Failed to create toolbar\n");
  232.       return -1;      // fail to create
  233.    }
  234.  
  235.    if (!m_wndStatusBar.Create(this) ||
  236.       !m_wndStatusBar.SetIndicators(indicators,
  237.         sizeof(indicators)/sizeof(UINT)))
  238.    {
  239.       TRACE("Failed to create status bar\n");
  240.       return -1;      // fail to create
  241.    }
  242.  
  243. #ifdef NOTNOW
  244.    else
  245.    {  // Default hide the status bar
  246.       m_wndStatusBar.ShowWindow(SW_HIDE);
  247.       RecalcLayout();
  248.    }
  249. #endif // NOTNOW
  250.  
  251.    return 0;
  252. }
  253.  
  254. /////////////////////////////////////////////////////////////////////////////
  255. // CMainFrame diagnostics
  256.  
  257. #ifdef _DEBUG
  258. void CMainFrame::AssertValid() const
  259. {
  260.    CMDIFrameWnd::AssertValid();
  261. }
  262.  
  263. void CMainFrame::Dump(CDumpContext& dc) const
  264. {
  265.    CMDIFrameWnd::Dump(dc);
  266. }
  267.  
  268. #endif //_DEBUG
  269.  
  270. /////////////////////////////////////////////////////////////////////////////
  271. // CMainFrame message handlers
  272.  
  273. /////////////////////////////////////////////////////////////////////////////
  274. //
  275. void CMainFrame::OnUpdateStatusPane(CCmdUI *pCmdUI)
  276. {   // Pane must be enabled, else it is disabled ...
  277.     pCmdUI->Enable(); 
  278.  
  279.     // Default the status to "Idle"
  280.     short status = -1;
  281.  
  282.     // Get the active MDI child window, it contains the view of interest
  283.     CMDIChildWnd* pWnd = MDIGetActive();
  284.     
  285.     // Do we have a child window ?
  286.     if (pWnd)
  287.     {  // Get the active view to get the control to get the status:
  288.        CVogonView* pView = (CVogonView*) pWnd->GetActiveView();
  289.  
  290.        // Do we have a View with a Webster ?
  291.        if (pView && pView->m_pSelection)
  292.        {  // Yes: get the load status of the current visible page
  293.           status = pView->m_pSelection->m_dWebster.GetLoadStatus();
  294.        }
  295.     }
  296.  
  297.     // Convert the status short to a string using carefully-placed string table entries:
  298.     CString stringStatus;
  299.     stringStatus.LoadString(IDS_STATUS_LOADCOMPLETE + status);
  300.  
  301.     // Show the status for the current active page
  302.     pCmdUI->SetText(stringStatus);
  303. }
  304.  
  305. /////////////////////////////////////////////////////////////////////////////
  306. //
  307. void CMainFrame::OnUpdateUrlPane(CCmdUI *pCmdUI)
  308. {   // Pane must be enabled, else it is disabled ...
  309.     pCmdUI->Enable(); 
  310.  
  311.     CString stringUrl(_T("No active URL"));
  312.  
  313.     // Get the active MDI child window, it contains the view of interest
  314.     CMDIChildWnd* pWnd = MDIGetActive();
  315.     
  316.     // Do we have a child window ?
  317.     if (pWnd)
  318.     {  // Get the active view to get the control to get the URL:
  319.        CVogonView* pView = (CVogonView*) pWnd->GetActiveView();
  320.  
  321.        // Do we have a View with a Webster ?
  322.        if (pView && pView->m_pSelection)
  323.        {  // Yes: get the load status of the current visible page
  324.           stringUrl = pView->m_pSelection->m_dWebster.GetPageURL();
  325.        }
  326.     }
  327.  
  328.     // Show the status for the current active page
  329.     pCmdUI->SetText(stringUrl);
  330. }
  331.  
  332. /////////////////////////////////////////////////////////////////////////////
  333. //
  334. void CMainFrame::OnRegisterWebster() 
  335. {
  336.    static char BASED_CODE szFilter[] = "OLE controls (*.ocx) | *.ocx | DLL's (*.dll) | *.dll | OCX and DLL (*.ocx; *.dll) | *.ocx;*.dll | All Files (*.*) | *.* ||" ;
  337.  
  338.    CFileDialog aDlg(TRUE, "OCX", "*.ocx;*.dll", OFN_PATHMUSTEXIST | OFN_FILEMUSTEXIST ,szFilter,this ) ;  
  339.  
  340.    if (aDlg.DoModal() == IDOK)
  341.    {
  342.       CString strCtlPathName = aDlg.GetPathName() ;
  343.       CRegisterControl aCtlReg(strCtlPathName) ;
  344.       if (aCtlReg.Register())
  345.       {
  346.             MessageBox("Successful control registration.","Control Registration.",MB_OK | MB_ICONINFORMATION) ;
  347.       }
  348.       else
  349.       {
  350.             MessageBox("Control registration failed.",NULL,MB_OK | MB_ICONEXCLAMATION) ;
  351.       }
  352.    }  
  353. }
  354.  
  355. /////////////////////////////////////////////////////////////////////////////
  356. //
  357. void CMainFrame::OnUnregisterWebster() 
  358. {
  359.    CUnregisterDlg dlgUnReg(this);
  360.  
  361.    if(dlgUnReg.DoModal() == IDOK)
  362.    {
  363.       CRegisterControl aCtlReg(dlgUnReg.m_strThePath); 
  364.       if (aCtlReg.Unregister())
  365.       {
  366.          MessageBox("Control unregistered successfully.","Control Registration.",MB_OK | MB_ICONINFORMATION) ;
  367.       }
  368.       else
  369.       {
  370.          MessageBox("Unable to unregister control.",NULL,MB_OK | MB_ICONEXCLAMATION) ;
  371.       }     
  372.    }
  373. }
  374.  
  375.  
  376.