GLOBCL.C
// THIS CODE AND INFORMATION IS PROVIDED "AS IS" WITHOUT WARRANTY OF
// ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING BUT NOT LIMITED TO
// THE IMPLIED WARRANTIES OF MERCHANTABILITY AND/OR FITNESS FOR A
// PARTICULAR PURPOSE.
//
// Copyright 1993 - 1998 Microsoft Corporation. All Rights Reserved.
//
// MODULE: globcl.c
//
// PURPOSE: Implement the windows procedure for the main application
// windows. Also implement the generic message and command dispatchers.
//
// FUNCTIONS:
// WndProc - Processes messages for the main window.
// MsgCreate - Initializes Edit Controls for text input/output.
// MsgSize - Adjusts size of Edit Controls when window is resized.
// MsgSetfocus - Keeps window focus on edit control instead of parent.
// MsgDataready - Reads data from incoming IPC mechanism.
// MsgRefreshdisplay - Refills Inbox edit control text contents
// MsgDisconnected - Cleans up connection killed by other side
// MsgCommand - Handle the WM_COMMAND messages for the main window.
// MsgDestroy - Handles the WM_DESTROY message by calling
// PostQuitMessage().
// CmdOutbox - Handles messages from Outbox edit control.
// CmdDisconnected - Disconnects current connection
// CmdEndChat - Ends Peer to Peer session
// CmdExit - Handles the file exit command by calling destory
// window on the main window.
//
// COMMENTS:
//
#include <windows.h> // required for all Windows applications
#include <windowsx.h>
#include <wsipx.h>
#include <wsnetbs.h>
#include <nspapi.h>
#include "globals.h" // prototypes specific to this application
// Main window message table definition.
MSD rgmsd[] =
{
{WM_CREATE, MsgCreate},
{WM_SIZE, MsgSize},
{WM_SETFOCUS, MsgSetfocus},
{WM_COMMAND, MsgCommand},
{WM_DESTROY, MsgDestroy},
{MW_DATAREADY, MsgDataready},
{MW_DISCONNECTED, MsgDisconnected},
{MW_DISPLAYREFRESH, MsgRefreshdisplay}
};
MSDI msdiMain =
{
sizeof(rgmsd) / sizeof(MSD),
rgmsd,
edwpWindow
};
// Main window command table definition.
CMD rgcmd[] =
{
{IDM_CONNECT, CmdConnect},
{IDM_SELECT, CmdSelect},
{IDM_EXIT, CmdExit},
{IDM_ABOUT, CmdAbout},
{ID_OUTBOX, CmdOutbox},
{IDM_DISCONNECT_SERVER, CmdDisconnect},
{IDM_END_CHAT, CmdEndChat}
};
CMDI cmdiMain =
{
sizeof(rgcmd) / sizeof(CMD),
rgcmd,
edwpWindow
};
//
// FUNCTION: WndProc(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Processes messages for the main window.
//
// PARAMETERS:
// hwnd - window handle
// uMessage - message number
// wparam - additional information (dependant on message number)
// lparam - additional information (dependant on message number)
//
// RETURN VALUE:
// The return value depends on the message number. If the message
// is implemented in the message dispatch table, the return value is
// the value returned by the message handling function. Otherwise,
// the return value is the value returned by the default window procedure.
//
// COMMENTS:
// Call the DispMessage() function with the main window's message dispatch
// information (msdiMain) and the message specific information.
//
LRESULT CALLBACK WndProc(HWND hwnd,
UINT uMessage,
WPARAM wparam,
LPARAM lparam)
{
return DispMessage(&msdiMain, hwnd, uMessage, wparam, lparam);
}
//
// FUNCTION: MsgCreate(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Creates Inbox and Outbox Edit controls
//
// PARAMETERS:
//
// hwnd - Window handle
// uMessage - Message number (Unused)
// wparam - Extra data (Unused)
// lparam - Extra data (Unused)
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgCreate(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
// Create Edit control for typing to be sent to server
hOutWnd = CreateWindow("EDIT",
NULL,
WS_BORDER | WS_CHILD | WS_VISIBLE | WS_VSCROLL | ES_LEFT |
ES_MULTILINE | ES_AUTOVSCROLL,
0,0,0,0,
hwnd,
(HMENU) ID_OUTBOX,
(HINSTANCE) GetWindowLong(hwnd, GWL_HINSTANCE),
0);
// Create Edit control for typing to be received from server
hInWnd = CreateWindow("EDIT",
NULL,
WS_BORDER | WS_CHILD | WS_VISIBLE | WS_VSCROLL | ES_LEFT |
ES_MULTILINE | ES_AUTOVSCROLL,
0,0,0,0,
hwnd,
(HMENU) ID_INBOX,
(HINSTANCE) GetWindowLong(hwnd, GWL_HINSTANCE),
0);
return (TRUE);
}
//
// FUNCTION: MsgSize(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Adjust Size of Inbox and Outbox Edit controls
//
// PARAMETERS:
//
// hwnd - Window handle
// uMessage - Message number (Unused)
// wparam - Extra data (Unused)
// lparam - Parent Window Size
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgSize(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
// Size OutBox Edit Control
MoveWindow(hOutWnd,
1,1, // Upper Left Corner
LOWORD(lparam) - 2, // Width of Parent Window
(HIWORD(lparam) / 2) - 2 , // Half the height of Parent
TRUE); // repaint
// Size Inbox Edit Control
MoveWindow(hInWnd,
1, (HIWORD(lparam) / 2) + 1, // Half Way down right side
LOWORD(lparam) - 2, // Width of Parent Window
(HIWORD(lparam) / 2) - 2, // Half the height of Parent
TRUE); // repaint
return (TRUE);
}
//
// FUNCTION: MsgSetfocus(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Keeps Window focus on edit control
//
// PARAMETERS:
//
// hwnd - Window handle
// uMessage - Message number (Unused)
// wparam - Extra data (Unused)
// lparam - Extra data (Unused)
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgSetfocus(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
SetFocus(hOutWnd); // Don't let main window have focus
return (TRUE);
}
//
// FUNCTION: MsgDataready(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Read data and post message to display data
//
// PARAMETERS:
//
// hwnd - Window handle
// uMessage - Message number (Unused)
// wparam - forwarded to ReceiveInBox
// lparam - forwarded to ReceiveInBox
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgDataready(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
// Call protocol specific function to Read data and put in szRcvBuf
if(ReceiveInBox(hwnd, wparam, lparam, szRcvBuf, sizeof(szRcvBuf)))
{
PostMessage(hwnd, MW_DISPLAYREFRESH, 0, 0);
}
else
{
PostMessage(hwnd, IDM_SELECT, 0, 0);
}
return(TRUE);
}
//
// FUNCTION: MsgRefreshdisplay(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Display socket data in inbox
//
// PARAMETERS:
//
// hwnd - Window handle
// uMessage - Message number (Unused)
// wparam - Extra Data (Unused)
// lparam - Extra Data (Unused)
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgRefreshdisplay(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
MSG peekmsg;
// Don't bother displaying if there is already another update queued
if(PeekMessage(&peekmsg, hwnd, MW_DATAREADY, MW_DISPLAYREFRESH, PM_NOREMOVE))
{
return(TRUE);
}
// Put data in szRcvBuf in InBox
SendDlgItemMessage(hwnd,
ID_INBOX,
EM_SETSEL,
0,-1);
SendDlgItemMessage(hwnd,
ID_INBOX,
EM_REPLACESEL,
0,
(LPARAM)szRcvBuf);
return(TRUE);
}
//
// FUNCTION: MsgDisconnected(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Cleanup connection dropped from other side
//
// PARAMETERS:
//
// hwnd - Window handle
// uMessage - Message number (Unused)
// wparam - Extra data (Unused)
// lparam - Extra data (Unused)
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgDisconnected(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
HMENU hmenu;
// Let the user know
MessageBox(hwnd,
GetStringRes(IDS_CONNECTION_STOPPED),
GetStringRes(IDS_CHAT_DLG_STOPPED),
MB_OK);
// cleanup socket
closesocket(MySock.sock);
// Fix menus
hmenu = GetMenu(hwnd);
EnableMenuItem(hmenu, IDM_CONNECT, MF_ENABLED);
EnableMenuItem(hmenu, IDM_DISCONNECT_SERVER, MF_GRAYED);
EnableMenuItem(hmenu, IDM_END_CHAT, MF_GRAYED);
SetWindowText(hwnd, szTitle);
return(TRUE);
}
//
// FUNCTION: MsgCommand(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Handle the WM_COMMAND messages for the main window.
//
// PARAMETERS:
// hwnd - window handle
// uMessage - WM_COMMAND (Unused)
// GET_WM_COMMAND_ID(wparam, lparam) - Command identifier
// GET_WM_COMMAND_HWND(wparam, lparam) - Control handle
//
// RETURN VALUE:
// The return value depends on the message number. If the message
// is implemented in the message dispatch table, the return value is
// the value returned by the message handling function. Otherwise,
// the return value is the value returned by the default window procedure.
//
// COMMENTS:
// Call the DispCommand() function with the main window's command dispatch
// information (cmdiMain) and the command specific information.
//
LRESULT MsgCommand(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
return DispCommand(&cmdiMain, hwnd, wparam, lparam);
}
//
// FUNCTION: MsgDestroy(HWND, UINT, WPARAM, LPARAM)
//
// PURPOSE: Calls PostQuitMessage().
//
// PARAMETERS:
//
// hwnd - Window handle (Unused)
// uMessage - Message number (Unused)
// wparam - Extra data (Unused)
// lparam - Extra data (Unused)
//
// RETURN VALUE:
//
// Always returns 0 - Message handled
//
// COMMENTS:
//
//
LRESULT MsgDestroy(HWND hwnd, UINT uMessage, WPARAM wparam, LPARAM lparam)
{
PostQuitMessage(0);
return 0;
}
//
// FUNCTION: CmdOutbox(HWND, WORD, WORD, HWND)
//
// PURPOSE: Handle messages from Outbox--Send data if EN_CHANGE
//
// PARAMETERS:
// hwnd - The window.
// wCommand - ID_OUTBOX (unused)
// wNotify - Notification number (unused)
// hwndCtrl - NULL (unused)
//
// RETURN VALUE:
// Always returns 0 - command handled.
//
// COMMENTS:
//
//
LRESULT CmdOutbox(HWND hwnd, WORD wCommand, WORD wNotify, HWND hwndCtrl)
{
int cSendLen;
if (wNotify != EN_CHANGE) // We only care if text has changed
{
return 0;
}
// Text has changed! Put OutBox's text in szSndBuf
cSendLen = GetDlgItemText(hwnd,
ID_OUTBOX,
szSndBuf,
sizeof(szSndBuf));
cSendLen++; // Add a byte for the NULL terminator
// Do a send
SendOutBox(szSndBuf, cSendLen);
return 0;
}
//
// FUNCTION: CmdDisconnect(HWND, WORD, WORD, HWND)
//
// PURPOSE: Cut off session and fix menus appropriately
//
// PARAMETERS:
// hwnd - The window.
// wCommand - ID_OUTBOX (unused)
// wNotify - Notification number (unused)
// hwndCtrl - NULL (unused)
//
// RETURN VALUE:
// Always returns 0 - command handled.
//
// COMMENTS:
//
//
LRESULT CmdDisconnect(HWND hwnd, WORD wCommand, WORD wNotify, HWND hwndCtrl)
{
HMENU hmenu;
closesocket(MySock.sock);
// Fix menus
hmenu = GetMenu(hwnd);
EnableMenuItem(hmenu, IDM_CONNECT, MF_ENABLED);
EnableMenuItem(hmenu, IDM_DISCONNECT_SERVER, MF_GRAYED);
EnableMenuItem(hmenu, IDM_END_CHAT, MF_GRAYED);
SetWindowText(hwnd, szTitle);
return 0;
}
//
// FUNCTION: CmdEndChat(HWND, WORD, WORD, HWND)
//
// PURPOSE: End Peer to Peer session
//
// PARAMETERS:
// hwnd - The window.
// wCommand - IDM_END_CHAT (unused)
// wNotify - Notification number (unused)
// hwndCtrl - NULL (unused)
//
// RETURN VALUE:
// Always returns 0 - command handled.
//
// COMMENTS:
//
//
LRESULT CmdEndChat(HWND hwnd, WORD wCommand, WORD wNotify, HWND hwndCtrl)
{
HMENU hmenu;
char outtext[80];
// Send SESSION_CLOSE message
xferbuf.hdr.signature = MYSIGNATURE;
xferbuf.hdr.length = HDRSIZE;
xferbuf.hdr.command = SESSION_CLOSE;
senddatamessage(MySock.sock, &xferbuf);
// Currently socket is set to notify this parent window of events.
// We need to stop this so that the dialog that we are about to
// display will get events instead.
if (WSAAsyncSelect(MySock.sock, hwnd, 0, 0) == SOCKET_ERROR)
{
// Oops
return 0;
}
// Put up select dialog
PostMessage(hwnd, WM_COMMAND, MAKELONG(IDM_SELECT, 0), 0);
// Fix menus
hmenu = GetMenu(hwnd);
EnableMenuItem(hmenu, IDM_CONNECT, MF_ENABLED);
EnableMenuItem(hmenu, IDM_DISCONNECT_SERVER, MF_GRAYED);
EnableMenuItem(hmenu, IDM_END_CHAT, MF_GRAYED);
wsprintf(outtext, GetStringRes(IDS_CHAT_AVAILABLE), MySock.name);
SetWindowText(hwnd, outtext);
return 0;
}
//
// FUNCTION: CmdExit(HWND, WORD, WORD, HWND)
//
// PURPOSE: Exit the application.
//
// PARAMETERS:
// hwnd - The window.
// wCommand - IDM_EXIT (unused)
// wNotify - Notification number (unused)
// hwndCtrl - NULL (unused)
//
// RETURN VALUE:
// Always returns 0 - command handled.
//
// COMMENTS:
//
//
LRESULT CmdExit(HWND hwnd, WORD wCommand, WORD wNotify, HWND hwndCtrl)
{
closesocket(MySock.sock);
WSACleanup();
DestroyWindow(hwnd);
return 0;
}