home *** CD-ROM | disk | FTP | other *** search
/ Tools / WinSN5.0Ver.iso / NETSCAP.50 / WIN1998.ZIP / ns / cmd / macfe / sharemnu / LMenuSharing.cp next >
Encoding:
Text File  |  1998-04-08  |  4.9 KB  |  169 lines
  1. /* -*- Mode: C++; tab-width: 4; indent-tabs-mode: nil; c-basic-offset: 2 -*-
  2.  *
  3.  * The contents of this file are subject to the Netscape Public License
  4.  * Version 1.0 (the "NPL"); you may not use this file except in
  5.  * compliance with the NPL.  You may obtain a copy of the NPL at
  6.  * http://www.mozilla.org/NPL/
  7.  *
  8.  * Software distributed under the NPL is distributed on an "AS IS" basis,
  9.  * WITHOUT WARRANTY OF ANY KIND, either express or implied. See the NPL
  10.  * for the specific language governing rights and limitations under the
  11.  * NPL.
  12.  *
  13.  * The Initial Developer of this code under the NPL is Netscape
  14.  * Communications Corporation.  Portions created by Netscape are
  15.  * Copyright (C) 1998 Netscape Communications Corporation.  All Rights
  16.  * Reserved.
  17.  */
  18.  
  19. #include "LMenuSharing.h" // ALWAYS put the .h file first.  This ensures that it compiles.
  20.  
  21. #include "MenuSharing.h" // This is the UserLand header.
  22. #include "uapp.h"
  23. #include "uerrmgr.h"
  24. #include "PascalString.h"
  25. #include "MercutioAPI.h"
  26.  
  27. #include "CTargetedUpdateMenuRegistry.h"
  28.  
  29. // Menu sharing callbacks
  30. static pascal void ErrorDialog (Str255 s);
  31. static pascal void EventFilter (EventRecord *ev);
  32.  
  33. static pascal void ErrorDialog (Str255 s)
  34. {
  35.     ErrorManager::PlainAlert(s, NULL, NULL, NULL);
  36. } 
  37.  
  38. static pascal void EventFilter (EventRecord *ev)
  39. {
  40.     (CFrontApp::GetApplication())->DispatchEvent(*ev);
  41. }
  42.  
  43. // ===========================================================================
  44. // LMenuSharing.cp                                         
  45. // ===========================================================================
  46. //    MenuShring class. Based upon Frontier and draper@usis.com code
  47.     
  48. LMenuSharingAttachment::LMenuSharingAttachment(
  49.     MessageT    inMessage,
  50.     Boolean        inExecuteHost,Int16    resIDofLastMenu)
  51.         : LAttachment(inMessage, inExecuteHost)
  52. {
  53.     mCanMenuShare = ::InitSharedMenus (ErrorDialog, EventFilter);    
  54.     mInsertAfterMenuID = resIDofLastMenu + 1;
  55. }
  56.  
  57.  
  58. void LMenuSharingAttachment::ExecuteSelf( MessageT inMessage, void* ioParam)
  59. {
  60.     if (!mCanMenuShare)
  61.             return; // Don't bother if we can't menu share...
  62.     mExecuteHost = true;
  63.     switch (inMessage)
  64.     {
  65.     case msg_Event:
  66.         
  67.         EventRecord *    ev = (EventRecord*)ioParam;
  68.         ResIDT            menuId;
  69.         Int16            menuItem;
  70.         MenuHandle        menuH;
  71.         CommandT        command;
  72.         LMenuBar*        menubar;
  73.         WindowPtr         w;
  74.         Int16            part;
  75.         LCommander*        commander;
  76.         
  77.         
  78.         CheckSharedMenus(mInsertAfterMenuID);
  79.         
  80.         if (ev->what== mouseDown)
  81.         {
  82.             part = FindWindow (ev->where, &w);
  83.              if (part == inMenuBar) 
  84.             {
  85.                 // (CFrontApp::GetApplication())->UpdateMenus();
  86.                 // myoung: Do this instead.
  87.                 CTargetedUpdateMenuRegistry::SetCommands(CFrontApp::GetCommandsToUpdateBeforeSelectingMenu());
  88.                 CTargetedUpdateMenuRegistry::UpdateMenus();
  89.                 
  90.                 menubar = LMenuBar::GetCurrentMenuBar();
  91.  
  92.                 Int32 theMenuChoice;
  93.                 command = menubar->MenuCommandSelection(*ev, theMenuChoice);
  94.             
  95.                 menubar->FindMenuItem(command,menuId,menuH,menuItem);
  96.                 mExecuteHost = false;
  97.                 if (command != cmd_Nothing)
  98.                 {
  99.                     if (LCommander::IsSyntheticCommand(command,menuId, menuItem))
  100.                     {
  101.                         if (SharedMenuHit (menuId, menuItem))
  102.                         {
  103.                             HiliteMenu(0);
  104.                             break;
  105.                         }
  106.                     }
  107.                     commander = LCommander::GetTarget();
  108.                     commander->ProcessCommand(command, nil);
  109.                     mExecuteHost = false;
  110.                 }
  111.                 HiliteMenu(0);
  112.             }
  113.             break;
  114.         }
  115.         else if (ev->what!=keyDown)    //On keyDown, just drop through the attachments
  116.             break;
  117.     case msg_KeyPress:
  118.  
  119.         ev = (EventRecord*)ioParam;
  120.         char         ch;
  121.  
  122.         mExecuteHost = true;
  123.         command = cmd_Nothing;
  124.         ch = (*ev).message & charCodeMask;
  125.         menubar = LMenuBar::GetCurrentMenuBar();
  126.         if (menubar->CouldBeKeyCommand(*ev))
  127.         {
  128.             // I moved this in here so it is only called when the command key is down.
  129.             // It was making editing unusable.  Also, we only need the menu stuff, not
  130.             // the side effects (like button updates), so call the base class method.
  131.             // --- 97/01/21 jrm
  132.             
  133.             // (CFrontApp::GetApplication())->LApplication::UpdateMenus();
  134.             // myoung: Don't do this here.
  135.  
  136.             //    Use code similar to CFrontApp::EventKeyDown which calls MDEF_MenuKey
  137.             //    instead of calling LMenuBar::FindKeyCommand which calls MenuKey.
  138.             //    DDM 06-JUN-96
  139.             Int32 theMenuChoice = MDEF_MenuKey(ev->message, ev->modifiers, ::GetMenu(666));
  140.             
  141.             if (HiWord(theMenuChoice) != 0)
  142.             {
  143.                 command = LMenuBar::GetCurrentMenuBar()->FindCommand(HiWord(theMenuChoice), LoWord(theMenuChoice));
  144.                 
  145.                 if (LCommander::IsSyntheticCommand(command,menuId, menuItem))
  146.                 {
  147.                     if (SharedMenuHit (menuId, menuItem))// someone is running a script from a commandKey
  148.                     {
  149.                         HiliteMenu(0);
  150.                         mExecuteHost = false;                        
  151.                         break;
  152.                     }
  153.                 }
  154.             }
  155.             if (ch == '.')
  156.             {
  157.                 if (SharedScriptRunning ()) /*cmd-period terminates the script*/
  158.                                 CancelSharedScript (); /*cancel the shared menu script*/
  159.             }
  160.         }
  161.         break;    
  162.     default:
  163.         break;
  164.     }
  165. }
  166.  
  167.     
  168.     
  169.