windows-nt/Source/XPSP1/NT/shell/osshell/accesory/terminal/menus.c

497 lines
16 KiB
C
Raw Normal View History

2020-09-26 03:20:57 -05:00
/*===========================================================================*/
/* Copyright (c) 1987 - 1988, Future Soft Engineering, Inc. */
/* Houston, Texas */
/*===========================================================================*/
#define NOGDICAPMASKS TRUE
#define NOVIRTUALKEYCODES TRUE
#define NOICONS TRUE
#define NOKEYSTATES TRUE
#define NOSYSCOMMANDS TRUE
#define NOATOM TRUE
#define NODRAWTEXT TRUE
#define NOMINMAX TRUE
#define NOOPENFILE TRUE
#define NOSCROLL TRUE
#define NOPROFILER TRUE
#define NODEFERWINDOWPOS TRUE
#define NOPEN TRUE
#define NO_TASK_DEFINES TRUE
#define NOLSTRING TRUE
#define WIN31
#include <stdarg.h>
#include <windows.h>
#include <shellapi.h>
#include "port1632.h"
#include "dcrc.h"
#include "dynacomm.h"
#include "task.h"
#include "printfil.h"
#include <commdlg.h>
#include <cderr.h>
/*---------------------------------------------------------------------------*/
/* enableMenuList() - [mbb] */
/*---------------------------------------------------------------------------*/
VOID enableMenuList(HMENU hAppMenu,BOOL bEnable, ...)
{
va_list ap;
INT ndx;
UINT miList;
HMENU hSubMenu;
va_start(ap,bEnable);
for(miList = va_arg(ap,UINT); miList; miList = va_arg(ap,UINT))
{
if(miList & 0x8000)
{
miList &= 0x000F;
if(childZoomStatus(0x0001, 0))
miList += 1;
hSubMenu = GetSubMenu(hAppMenu, miList);
for(ndx = GetMenuItemCount(hSubMenu)-1; ndx >= 0; ndx -= 1)
EnableMenuItem(hSubMenu, ndx, (bEnable ? MF_ENABLED : MF_GRAYED) | MF_BYPOSITION);
}
else
EnableMenuItem(hAppMenu, miList, bEnable ? MF_ENABLED : MF_GRAYED);
}
va_end(ap);
}
/*---------------------------------------------------------------------------*/
/* initMenuPopup() - [mbb] */
/*---------------------------------------------------------------------------*/
VOID initMenuPopup(WORD menuIndex)
{
HMENU hAppMenu;
WORD systemIndex;
if(childZoomStatus(0x0001, 0))
menuIndex -= 1;
hAppMenu = hMenu;
systemIndex = menuIndex;
switch(menuIndex)
{
case FILEMENU:
enableMenuList(hAppMenu, countChildWindows(FALSE), FMCLOSE, FMSAVE, FMSAVEAS, NULL);
enableMenuList(hAppMenu, TRUE, FMPRINT, FMPRINTSETUP, NULL);
enableMenuList(hAppMenu, (hPrintFile==NULL), FMPRINTSETUP, FMPRINTSETUP, NULL); /* jtf 3.20 check to see if chanel open */
break;
case EDITMENU:
if(GetTopWindow(hItWnd) == hTermWnd)
{
enableMenuList(hAppMenu, TRUE, EMSELECTALL, EMCLEAR, NULL);
enableMenuList(hAppMenu, (hTE.selStart != hTE.selEnd), EMCOPY, EMCOPYTHENPASTE, EMCOPYSPECIAL, NULL);
enableMenuList(hAppMenu, IsClipboardFormatAvailable(CF_TEXT), EMPASTE, NULL);
if (scrapSeq || ((xferFlag != XFRNONE) && (xferFlag != XFRRCV)) ) /* jtf 3.17 disable send if in transfer */
{
enableMenuList(hAppMenu, FALSE, EMCOPYTHENPASTE, NULL);
enableMenuList(hAppMenu, FALSE, EMPASTE, NULL);
enableMenuList(hAppMenu, FALSE, EMSELECTALL, NULL);
enableMenuList(hAppMenu, FALSE, EMCOPY, NULL);
}
enableMenuList(hAppMenu, (curTopLine >= savTopLine), EMSAVESCREEN, NULL);
}
else
enableMenuList(hAppMenu, FALSE, 0x8000 | systemIndex, NULL);
break;
case SETTINGSMENU:
enableMenuList(hAppMenu, activTerm, SMPHONE, SMEMULATE, SMTERMINAL, SMFUNCTIONKEYS, SMMODEM, NULL);
enableMenuList(hAppMenu, activTerm && (xferFlag == XFRNONE), SMTEXTXFERS, SMBINXFERS, SMCOMMUNICATIONS, NULL);
break;
case PHONEMENU: /* mbbx 2.00: network... */
if((trmParams.comDevRef > ITMNOCOM) && (xferFlag == XFRNONE)) /* mbbx 1.10: carrier... */
{
enableMenuList(hAppMenu, TRUE, 0x8000 | systemIndex, NULL);
enableMenuList(hAppMenu, !mdmOnLine, PMDIAL, NULL);
}
else
enableMenuList(hAppMenu, FALSE, 0x8000 | systemIndex, NULL);
break;
case TRANSFERMENU:
/* mbbx 1.10: answerMode... */
enableMenuList(hAppMenu, (trmParams.comDevRef > ITMNOCOM) && (xferFlag == XFRNONE), /* mbbx 2.00: network... */
TMSENDTEXTFILE, TMRCVTEXTFILE, NULL);
enableMenuList(hAppMenu, (trmParams.comDevRef > ITMNOCOM) && (xferFlag == XFRNONE) && !answerMode,
TMSENDBINFILE, TMRCVBINFILE, NULL);
enableMenuList(hAppMenu, activTerm && (xferFlag == XFRNONE), TMVIEWTEXTFILE, NULL);
enableMenuList(hAppMenu, (xferFlag > XFRNONE) && (xferFlag < XFRBSND) && !xferPaused, TMPAUSE, NULL);
enableMenuList(hAppMenu, (xferFlag > XFRNONE) && (xferFlag < XFRBSND) && xferPaused, TMRESUME, NULL);
enableMenuList(hAppMenu, (xferFlag > XFRNONE), TMSTOP, NULL);
if (scrapSeq) /* jtf gold 045 */
enableMenuList(hAppMenu, FALSE, TMSENDTEXTFILE, TMVIEWTEXTFILE, NULL); /* jtf 3.27 */
break;
case HELPMENU: /* mbbx 2.00: CUA... */
break;
}
}
/*---------------------------------------------------------------------------*/
/* doEditMenu() - Edit memu commands happen here ! [scf] */
/*---------------------------------------------------------------------------*/
VOID doEditMenu(INT theItem)
{
DWORD scrapSize;
HANDLE hText;
HANDLE tmpScrapHandle;
// -sdj unreferenced local var HDC theDC,newDC;
// -sdj unreferenced local varRECT theClient;
// -sdj unreferenced local varHANDLE newHdl;
if(GetTopWindow(hItWnd) == hTermWnd)
{
hText = hTE.hText;
switch(theItem)
{
case EMSELECTALL:
termSetSelect(0l, (LONG) (savTopLine + maxScreenLine + 1) * (maxChars + 2));
activSelect = TRUE; /* jtf 3.30 */
noSelect = FALSE; /* rjs bugs 020 */
break;
case EMCOPY:
case EMPASTE:
case EMCOPYTABLE:
case EMCOPYTHENPASTE:
if((theItem == EMCOPY) || (theItem == EMCOPYTABLE) || (theItem == EMCOPYTHENPASTE))
{
copiedTable = FALSE;
scrapSize = hTE.selEnd - hTE.selStart;
if (scrapSize == 0)
break; /* jtf 3.20 do not copy blank selection */
/* the + 3 for possible <cr>,<lf>, NULL */
if((tEScrapHandle = GlobalAlloc (GMEM_MOVEABLE | GMEM_ZEROINIT, scrapSize + 3)) != NULL)
{
blockMove((LPBYTE) GlobalLock(hText) + hTE.selStart,
(LPBYTE) GlobalLock(tEScrapHandle), scrapSize);
GlobalUnlock(hText);
GlobalUnlock(tEScrapHandle);
stripBlanks(GlobalLock(tEScrapHandle), &scrapSize);
GlobalUnlock(tEScrapHandle);
if((tEScrapHandle = GlobalReAlloc(tEScrapHandle, scrapSize+1, GMEM_MOVEABLE | GMEM_ZEROINIT)) != NULL)
if(OpenClipboard(hTermWnd))
{
EmptyClipboard();
SetClipboardData(CF_TEXT, tEScrapHandle);
CloseClipboard();
}
}
}
if((theItem == EMPASTE) || (theItem == EMCOPYTHENPASTE))
if (IsClipboardFormatAvailable(CF_TEXT)) /* jtf 3.20 prevent protect violation */
if(OpenClipboard(hTermWnd))
{
if((tmpScrapHandle = GetClipboardData(CF_TEXT)) != NULL)
{
scrapSize = (DWORD) lstrlen(GlobalLock(tmpScrapHandle));
GlobalUnlock(tmpScrapHandle);
if((tEScrapHandle = GlobalAlloc(GMEM_MOVEABLE | GMEM_ZEROINIT, scrapSize+1)) != NULL)
{
blockMove(GlobalLock(tmpScrapHandle), GlobalLock(tEScrapHandle), scrapSize);
GlobalUnlock(tmpScrapHandle);
GlobalUnlock(tEScrapHandle);
}
}
CloseClipboard();
useScrap = TRUE;
}
break;
case EMCLEAR:
cursorAdjust();
clearBuffer();
break;
}
}
}
/*---------------------------------------------------------------------------*/
/* doCommand() - [mbb] */
/*---------------------------------------------------------------------------*/
VOID doCommand(HWND hWnd, WPARAM wParam, LONG lParam)
{
/* this is called from within WM_COMMAND, so that wParam and lParam change as per*/
/* win32. This is also called from another place with lParm set to zero */
/* I'll fix the wParam references, and debug to see if any other fixes needed*/
CHAR work[STR255];
CHAR extrainfo[STR255]; // -sdj another buff to hold EXTRAINFO string of aboutbox;
BOOL result;
// -sdj unreferenced local var LPSTR lpEOS;
INT rc;
PRINTDLG PRN;
offCursor();
switch(GET_WM_COMMAND_ID(wParam, lParam))
{
case FMNEW:
doFileNew();
break;
case FMOPEN:
doFileOpen();
break;
case FMCLOSE:
doFileClose();
break;
case FMSAVE:
doFileSave();
break;
case FMSAVEAS:
doFileSaveAs();
break;
case FMPRINTSETUP:
/* initialize PRINTDLG structure */
PRN.lStructSize = sizeof(PRINTDLG);
PRN.hDevMode = hDevMode;
PRN.hDevNames = hDevNames;
PRN.Flags = PD_PRINTSETUP;
PRN.hwndOwner = hWnd;
PrintDlg(&PRN);
rc = CommDlgExtendedError();
/* Probable cause is low memory. */
if(rc == CDERR_DIALOGFAILURE || rc == CDERR_INITIALIZATION ||
rc == CDERR_LOADSTRFAILURE || rc == CDERR_LOADRESFAILURE ||
rc == PDERR_LOADDRVFAILURE || rc == PDERR_GETDEVMODEFAIL)
{
testBox(hWnd,-(MB_ICONHAND|MB_SYSTEMMODAL|MB_OK),STR_ERRCAPTION,NoMemStr);
}
else
{
hDevMode = PRN.hDevMode;
hDevNames= PRN.hDevNames;
}
break;
case FMPRINTER:
PrintFileComm(!prtFlag); /* mbbx 1.03: prAction(!prtFlag); */
break;
case FMTIMER:
timerToggle(TRUE); /* mbbx 1.03 */
break;
case FMEXIT: /* mbbx 1.10: CUA... */
CommThreadExit = TRUE; // we are exiting, so let the thread
// exit on its own by ExitThread.
PostMessage(hItWnd, WM_CLOSE, 0, 0L);
break;
case EMUNDO:
case EMSELECTALL:
case EMCUT:
case EMCOPY:
case EMPASTE:
case EMCLEAR:
case EMCOPYTHENPASTE:
doEditMenu(GET_WM_COMMAND_ID(wParam, lParam));
break;
case SMPHONE: /* mbbx 1.04 ... */
doSettings(IDDBPHON, dbPhon);
break;
case SMEMULATE:
doSettings(IDDBEMUL, dbEmul);
break;
case SMTERMINAL:
doSettings(IDDBTERM, dbTerm);
break;
case SMFUNCTIONKEYS:
doSettings(IDDBFKEY, dbFkey);
break;
case SMTEXTXFERS:
doSettings(IDDBTXTX, dbTxtX);
break;
case SMBINXFERS:
doSettings(IDDBBINX, dbBinX);
break;
case SMCOMMUNICATIONS:
doSettings(IDDBCOMM, dbComm);
break;
case SMMODEM: /* mbbx 1.10: CUA... */
doSettings(IDDBMODEM, dbModem);
break;
case PMDIAL:
dialPhone();
break;
case PMHANGUP:
hangUpPhone();
break;
case TMSENDTEXTFILE:
DEBOUT("doCommand: Got %s menu click\n","SENDTEXTFILE");
*taskState.string = 0; /* mbbx 1.01... */
sndTFile();
break;
case TMRCVTEXTFILE:
DEBOUT("doCommand: Got %s menu click\n","RCVTEXTFILE");
*taskState.string = 0; /* mbbx 1.01... */
rcvTFile();
break;
case TMVIEWTEXTFILE:
DEBOUT("doCommand: Got %s menu click\n","VIEWTEXTFILE");
*taskState.string = 0; /* mbbx 1.01... */
typTFile();
break;
case TMSENDBINFILE:
DEBOUT("doCommand: Got %s menu click\n","SENDBINFILE");
*taskState.string = 0; /* mbbx 1.01... */
sndBFile();
break;
case TMRCVBINFILE:
DEBOUT("doCommand: Got %s menu click\n","RCVBINFILE");
*taskState.string = 0; /* mbbx 1.01... */
rcvBFile();
break;
case TMPAUSE: /* mbbx 2.00: xfer ctrls... */
xferPauseResume(TRUE, FALSE);
break;
case TMRESUME:
xferPauseResume(FALSE, TRUE);
break;
case TMSTOP:
xferStopBreak(TRUE);
break;
case WMFKEYS:
showHidedbmyControls(!fKeysShown, TRUE); /* mbbx 2.00: bArrange... */
break;
case HMCOMMANDS:
case HMPROCEDURES:
case HMKEYBOARD:
LoadString(hInst, STR_HELPFILE, work, STR255-1);
result = WinHelp(hTermWnd, work, HELP_CONTEXT, wParam);
if(!result)
testBox(hTermWnd,-(MB_ICONHAND|MB_SYSTEMMODAL|MB_OK),STR_ERRCAPTION,NoMemStr);
break;
case HMINDEX: /* mbbx 2.00: CUA... */
LoadString(hInst, STR_HELPFILE, work, STR255-1);
result = WinHelp(hTermWnd,work,HELP_INDEX,0L);
if(!result)
testBox(hTermWnd,-(MB_ICONHAND|MB_SYSTEMMODAL|MB_OK),STR_ERRCAPTION,NoMemStr);
break;
case HMHELP:
result = WinHelp(hTermWnd,NULL,HELP_HELPONHELP,0L);
if(!result)
testBox(hTermWnd,-(MB_ICONHAND|MB_SYSTEMMODAL|MB_OK),STR_ERRCAPTION,NoMemStr);
break;
case HMSEARCH:
LoadString(hInst, STR_HELPFILE, work, STR255-1);
if(!WinHelp(hTermWnd, work, HELP_PARTIALKEY, (DWORD_PTR)""))
testBox(hTermWnd,-(MB_ICONHAND|MB_SYSTEMMODAL|MB_OK),STR_ERRCAPTION,NoMemStr);
break;
// case HMABOUT:
// DialogBox(hInst, MAKEINTRESOURCE(IDDBABOUT), hItWnd, dbAbout);
// break;
// lets try to close one bugreport, by using shellabout again so that
// the about box is consistent with the other shell applets and win31
// -sdj 12/15/92
case HMABOUT:
LoadString(hInst, STR_APPNAME, work, STR255-1);
LoadString(hInst, STR_EXTRAINFO, extrainfo, STR255-1);
ShellAbout(hTermWnd, work, extrainfo,
LoadIcon(hInst, MAKEINTRESOURCE(ICO_DYNACOMM)));
break;
default:
DEBOUT("doCommand: %s\n","Got INTO default option");
switch(GET_WM_COMMAND_ID(wParam, lParam) & 0xF000)
{
case 0xF000:
/* NOTE under lParam may be zero and screw up under win32, since lParam*/
/* is passed in sometimes == zero by another function*/
DEBOUT("doCommand: %s\n","Got into default option: doing SendMsg");
SendMessage(GetTopWindow(hItWnd), WM_SYSCOMMAND, wParam, lParam);
DEBOUT("doCommand: %s\n","Got into default option: done SendMsg");
break;
}
DEBOUT("doCommand: %s\n","Got OUT of default option");
break;
}
DEBOUT("doCommand: %s\n","Doing UpdateWindow(hItWnd)");
UpdateWindow(hItWnd);
DEBOUT("doCommand: %s\n","Done UpdateWindow(hItWnd)");
onCursor();
}
INT_PTR CALLBACK dbAbout(HWND hDlg, UINT message, WPARAM wParam, LPARAM lParam)
{
switch (message)
{
case WM_INITDIALOG:
return TRUE;
case WM_COMMAND:
if (wParam == IDOK)
EndDialog(hDlg, GET_WM_COMMAND_ID(wParam, lParam));
break;
}
return FALSE;
}