archive
/
windows-nt-4.0
mirror of https://github.com/lianthony/NT4.0
2
0
Fork 0
Code Issues Projects Releases Wiki Activity
Windows NT 4.0 source code leak
You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
2 Commits
1 Branch
0 Tags
184 MiB
 
 
 
 
 
 
Tree: b4a8d373d8
Branches Tags
${ item.name }
Create tag ${ searchTerm }
Create branch ${ searchTerm }
from 'b4a8d373d8'
${ noResults }
windows-nt-4.0/private/windows/shell/accesory/winchat/dde.c

782 lines
27 KiB
Raw Blame History

/*---------------------------------------------------------------------------*\
| DDE MODULE
| This module contains the routines necessary for maintaining dde
| conversations.
|
| FUNCTIONS
| ---------
| CreateCharData
| CreatePasteData
| SendFontToPartner
|
|
| Copyright (c) Microsoft Corp., 1990-1993
|
| created: 01-Nov-91
| history: 01-Nov-91 <clausgi> created.
| 29-Dec-92 <chriswil> port to NT, cleanup.
| 19-Oct-93 <chriswil> unicode enhancements from a-dianeo.
|
\*---------------------------------------------------------------------------*/
#include <windows.h>
#include <mmsystem.h>
#include <ddeml.h>
#include <commdlg.h>
#include <commctrl.h>
#include "winchat.h"
#include "globals.h"
/*---------------------------------------------------------------------------*\
| DDE CALLBACK PROCEDURE
| This routine handles the events sent by DDEML.
|
| created: 11-Nov-91
| history: 29-Dec-92 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
HDDEDATA CALLBACK DdeCallback(UINT wType, UINT wFmt, HCONV hConv, HSZ hszTopic, HSZ hszItem, HDDEDATA hData, DWORD lData1, DWORD lData2)
{
HDC hdc;
HDDEDATA hRet;
WPARAM wParam;
LPARAM lParam;
hRet = (HDDEDATA)0;
switch(wType)
{
case XTYP_REGISTER:
case XTYP_UNREGISTER:
break;
case XTYP_XACT_COMPLETE:
if(lData1 == XactID)
{
if(hData != (HDDEDATA)0)
{
ChatState.fServerVerified = TRUE;
}
else
{
SetStatusWindowText(szNoConnect);
ChatState.fConnectPending = FALSE;
UpdateButtonStates();
}
}
break;
case XTYP_ADVDATA:
case XTYP_POKE:
if(ChatState.fConnected && (wFmt == cf_chatdata))
{
DdeGetData(hData,(LPBYTE)&ChatDataRcv,sizeof(ChatDataRcv),0L);
// This is failing in some cases. Eventually, this should be in.
//
#ifndef DDEMLBUG
if(DdeGetLastError(idInst) == DMLERR_NO_ERROR)
#endif
{
switch(ChatDataRcv.type)
{
#if !defined(UNICODE) && defined(DBCS_IME)
// We have a DBCS string selection.
//
case CHT_DBCS_STRING:
{
HANDLE hStrBuf;
LPSTR lpStrBuf;
if (hStrBuf = GlobalAlloc(GMEM_FIXED,ChatDataRcv.uval.cd_dbcs.size+1))
{
if (lpStrBuf = GlobalLock(hStrBuf))
{
DdeGetData(hData,lpStrBuf,ChatDataRcv.uval.cd_dbcs.size+1,XCHATSIZE);
#ifndef DDEMLBUG
if (DdeGetLastError(idInst) == DMLERR_NO_ERROR)
#endif
{
SendMessage(hwndRcv,EM_SETREADONLY,(WPARAM)FALSE,0L);
wParam = SET_EM_SETSEL_WPARAM(LOWORD(ChatDataRcv.uval.cd_dbcs.SelPos),HIWORD(ChatDataRcv.uval.cd_dbcs.SelPos));
lParam = SET_EM_SETSEL_LPARAM(LOWORD(ChatDataRcv.uval.cd_dbcs.SelPos),HIWORD(ChatDataRcv.uval.cd_dbcs.SelPos));
SendMessage(hwndRcv,EM_SETSEL,wParam,lParam);
SendMessage(hwndRcv,EM_REPLACESEL,0,(LPARAM)lpStrBuf);
SendMessage(hwndRcv,EM_SETREADONLY,(WPARAM)TRUE,0L);
hRet = (HDDEDATA)TRUE;
}
GlobalUnlock(hStrBuf);
}
GlobalFree(hStrBuf);
}
}
break;
#endif
// This is a Unicode conversation, so mark the flag.
//
case CHT_UNICODE:
ChatState.fUnicode = TRUE;
hRet = (HDDEDATA)TRUE;
break;
// We got a character...stuff it into the control.
//
case CHT_CHAR:
// In case user is tracking, so WM_CHAR is not tossed (thanks Dave)
//
SendMessage(hwndRcv,WM_LBUTTONUP,0,0L);
SendMessage(hwndRcv,EM_SETREADONLY,(WPARAM)FALSE,0L);
wParam = SET_EM_SETSEL_WPARAM(LOWORD(ChatDataRcv.uval.cd_char.SelPos),HIWORD(ChatDataRcv.uval.cd_char.SelPos));
lParam = SET_EM_SETSEL_LPARAM(LOWORD(ChatDataRcv.uval.cd_char.SelPos),HIWORD(ChatDataRcv.uval.cd_char.SelPos));
SendMessage(hwndRcv,EM_SETSEL,wParam,lParam);
SendMessage(hwndRcv,WM_CHAR,ChatDataRcv.uval.cd_char.Char,0L);
SendMessage(hwndRcv,EM_SETREADONLY,TRUE,0L);
hRet = (HDDEDATA)TRUE;
break;
// We have a paste selection.
//
case CHT_PASTEA:
case CHT_PASTEW:
{
HANDLE hPasteBuf,hAnsiBuf;
LPSTR lpPasteBuf,lpAnsiBuf;
DWORD BufSize;
BufSize = (ChatDataRcv.type == CHT_PASTEA ? ((ChatDataRcv.uval.cd_paste.size + 1) * sizeof(TCHAR)) : (ChatDataRcv.uval.cd_paste.size + sizeof(WCHAR)));
if(hPasteBuf = GlobalAlloc(GMEM_FIXED,BufSize))
{
if(lpPasteBuf = GlobalLock(hPasteBuf))
{
if(ChatDataRcv.type == CHT_PASTEA)
{
if(hAnsiBuf = GlobalAlloc(GMEM_FIXED,ChatDataRcv.uval.cd_paste.size+sizeof(WCHAR)))
{
if(lpAnsiBuf = GlobalLock(hAnsiBuf))
{
DdeGetData(hData,lpAnsiBuf,ChatDataRcv.uval.cd_paste.size+sizeof(WCHAR),XCHATSIZEA);
MultiByteToWideChar(CP_ACP,MB_PRECOMPOSED,lpAnsiBuf,ChatDataRcv.uval.cd_paste.size+sizeof(WCHAR),(LPWSTR)lpPasteBuf,ChatDataRcv.uval.cd_paste.size+sizeof(WCHAR));
GlobalUnlock(hAnsiBuf);
}
GlobalFree(hAnsiBuf);
}
}
else
DdeGetData(hData,lpPasteBuf,ChatDataRcv.uval.cd_paste.size+sizeof(WCHAR),XCHATSIZEW);
#ifndef DDEMLBUG
if(DdeGetLastError(idInst) == DMLERR_NO_ERROR)
#endif
{
SendMessage(hwndRcv,EM_SETREADONLY,(WPARAM)FALSE,0L);
wParam = SET_EM_SETSEL_WPARAM(LOWORD(ChatDataRcv.uval.cd_char.SelPos),HIWORD(ChatDataRcv.uval.cd_char.SelPos));
lParam = SET_EM_SETSEL_LPARAM(LOWORD(ChatDataRcv.uval.cd_char.SelPos),HIWORD(ChatDataRcv.uval.cd_char.SelPos));
SendMessage(hwndRcv,EM_SETSEL,wParam,lParam);
SendMessage(hwndRcv,EM_REPLACESEL,0,(LPARAM)lpPasteBuf);
SendMessage(hwndRcv,EM_SETREADONLY,(WPARAM)TRUE,0L);
hRet = (HDDEDATA)TRUE;
}
GlobalUnlock(hPasteBuf);
}
GlobalFree(hPasteBuf);
}
}
break;
// We got a font change. Create and stuff.
//
case CHT_FONTA:
case CHT_FONTW:
if(ChatDataRcv.type == CHT_FONTA)
{
CHATDATAA ChatDataA;
memcpy(ChatDataA.uval.cd_win.lf.lfFaceName,ChatDataRcv.uval.cd_win.lf.lfFaceName,LF_XPACKFACESIZE + (sizeof(COLORREF) * 2));
ChatDataRcv.uval.cd_win.cref = ChatDataA.uval.cd_win.cref;
ChatDataRcv.uval.cd_win.brush = ChatDataA.uval.cd_win.brush;
MultiByteToWideChar(CP_OEMCP,MB_PRECOMPOSED,ChatDataA.uval.cd_win.lf.lfFaceName,LF_XPACKFACESIZE,ChatDataRcv.uval.cd_win.lf.lfFaceName,LF_XPACKFACESIZE);
}
UnpackFont(&lfRcv,&ChatDataRcv.uval.cd_win.lf);
if(hdc = GetDC(hwndApp))
{
RcvBrushColor = PartBrushColor = GetNearestColor(hdc,ChatDataRcv.uval.cd_win.brush);
RcvColorref = GetNearestColor(hdc,ChatDataRcv.uval.cd_win.cref);
ReleaseDC(hwndApp,hdc);
}
if(!ChatState.fUseOwnFont)
{
if(hEditRcvFont)
DeleteObject(hEditRcvFont);
hEditRcvFont = CreateFontIndirect(&lfRcv);
DeleteObject(hEditRcvBrush);
hEditRcvBrush = CreateSolidBrush(RcvBrushColor);
if(hEditRcvFont)
{
SendMessage(hwndRcv,WM_SETFONT,(WPARAM)hEditRcvFont,1L);
InvalidateRect(hwndRcv,NULL,TRUE);
}
}
hRet = (HDDEDATA)TRUE;
break;
#ifdef PROTOCOL_NEGOTIATE
case CHT_PROTOCOL:
// Determine characteristics we have in common.
//
FlagIntersection(ChatDataRcv.uval.cd_protocol.pckt);
// Return the flavor, if not already done.
//
if(!ChatState.fProtocolSent)
AnnounceSupport();
hRet = (HDDEDATA)TRUE;
break;
#endif
default:
break;
}
}
}
break;
case XTYP_CONNECT:
if(!ChatState.fConnected && !ChatState.fConnectPending && !ChatState.fInProcessOfDialing)
{
// allow connect only on the chat topic.
//
if(!DdeCmpStringHandles(hszTopic,hszChatTopic))
hRet = (HDDEDATA)TRUE;
}
break;
case XTYP_CONNECT_CONFIRM:
ChatState.fConnectPending = TRUE;
ChatState.fAllowAnswer = FALSE;
ChatState.fIsServer = TRUE;
ghConv = hConv;
nConnectAttempt = 0;
UpdateButtonStates();
break;
case XTYP_DISCONNECT:
if(ChatState.fConnectPending || ChatState.fConnected)
{
if(ChatState.fConnected)
wsprintf(szBuf,szHasTerminated,(LPTSTR)szConvPartner);
else
if(ChatState.fServerVerified)
wsprintf(szBuf,szNoConnectionTo,(LPTSTR)szConvPartner);
else
lstrcpy(szBuf,szNoConnect);
SetStatusWindowText(szBuf);
ChatState.fConnectPending = FALSE;
ChatState.fConnected = FALSE;
ChatState.fIsServer = FALSE;
ChatState.fUnicode = FALSE;
#ifdef PROTOCOL_NEGOTIATE
ChatState.fProtocolSent = FALSE;
#endif
// suspend text entry
//
UpdateButtonStates();
SendMessage(hwndSnd,EM_SETREADONLY,TRUE,0L);
SetWindowText(hwndApp,szAppName);
// stop the ringing immediately
//
if(ChatState.fMMSound)
sndPlaySound(NULL,SND_ASYNC);
// cut the animation short
//
if(cAnimate)
cAnimate = 1;
}
break;
case XTYP_REQUEST:
break;
case XTYP_ADVREQ:
if(ChatState.fIsServer && ChatState.fConnected)
{
switch(ChatData.type)
{
#if !defined(UNICODE) && defined(DBCS_IME)
case CHT_DBCS_STRING:
hRet = CreateDbcsStringData();
break;
#endif
case CHT_CHAR:
case CHT_FONTA:
case CHT_FONTW:
case CHT_UNICODE:
hRet = CreateCharData();
break;
case CHT_PASTEA:
case CHT_PASTEW:
hRet = CreatePasteData();
break;
#ifdef PROTOCOL_NEGOTIATE
case CHT_PROTOCOL:
hRet = CreateProtocolData();
break;
#endif
default:
break;
}
}
break;
case XTYP_ADVSTART:
if(ChatState.fConnectPending)
{
// is this the connect confirm attempt?
//
if(!DdeCmpStringHandles(hszItem,hszConnectTest))
return((HDDEDATA)TRUE);
DdeQueryString(idInst,hszItem,szConvPartner,32L,0);
wsprintf(szBuf,szIsCalling,(LPTSTR)szConvPartner);
SetStatusWindowText(szBuf);
// set window text on initial connect attempt
//
if(nConnectAttempt == 0)
{
wsprintf(szBuf,TEXT("%s - [%s]"),(LPTSTR)szAppName,(LPTSTR)szConvPartner);
SetWindowText(hwndApp,szBuf);
}
if(ChatState.fAllowAnswer)
{
ChatState.fConnected = TRUE;
ChatState.fConnectPending = FALSE;
UpdateButtonStates();
ClearEditControls();
SendMessage(hwndSnd,EM_SETREADONLY,FALSE,0L);
wsprintf(szBuf,szConnectedTo,(LPTSTR)szConvPartner);
SetStatusWindowText(szBuf);
if(hszConvPartner)
DdeFreeStringHandle(idInst,hszConvPartner);
hszConvPartner = DdeCreateStringHandle(idInst,szConvPartner,0);
// Indicate that it is a Unicode conversation.
//
PostMessage(hwndApp,WM_COMMAND,IDX_UNICODECONV,0L);
// SendFontToPartner(); -- would like to do this - won't work
// so we workaround it by posting the app window a message
// to perform this function...
//
PostMessage(hwndApp,WM_COMMAND,IDX_DEFERFONTCHANGE,0L);
#ifdef PROTOCOL_NEGOTIATE
PostMessage(hwndApp,WM_COMMAND,IDX_DEFERPROTOCOL,0L);
#endif
hRet = (HDDEDATA)TRUE;
}
else
if(!(nConnectAttempt++ % 6))
{
// Number of animation cycles == 24: ring remote.
//
cAnimate = 24;
idTimer = SetTimer(hwndApp,1,55,NULL);
FlashWindow(hwndApp,TRUE);
DoRing(szWcRingIn);
}
}
break;
default:
break;
}
return(hRet);
}
#if !defined(UNICODE) && defined(DBCS_IME) /* #1401 7-Jul-93 v-katsuy */
/*---------------------------------------------------------------------------*\
| CREATE DBCS STRING TRANSACTION DATA
| This routine creates a DDE object representing the DBCS string information.
|
| created: 07-Jul-93
|
\*---------------------------------------------------------------------------*/
HDDEDATA CreateDbcsStringData(VOID)
{
HDDEDATA hTmp = (HDDEDATA)0;
LPSTR lpDbcsMem;
DWORD cbDbcs;
hTmp = (HDDEDATA)0;
if(lpDbcsMem = GlobalLock(ChatData.uval.cd_dbcs.hString))
{
cbDbcs = GlobalSize(ChatData.uval.cd_dbcs.hString);
ChatData.uval.cd_dbcs.size = cbDbcs;
if(hTmp = DdeCreateDataHandle(idInst,NULL,sizeof(ChatData)+cbDbcs,0L,hszTextItem,cf_chatdata,0))
{
DdeAddData(hTmp,(LPBYTE)&ChatData,sizeof(ChatData),0L);
DdeAddData(hTmp,lpDbcsMem,cbDbcs,XCHATSIZEA);
}
GlobalUnlock(ChatData.uval.cd_dbcs.hString);
}
GlobalFree(ChatData.uval.cd_dbcs.hString);
return(hTmp);
}
#endif
/*---------------------------------------------------------------------------*\
| CREATE CHARACTER TRANSACTION DATA
| This routine creates a DDE object representing the charater information.
|
| created: 11-Nov-91
| history: 29-Dec-92 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
HDDEDATA CreateCharData(VOID)
{
HANDLE hData;
LPCHATDATA lpData;
HDDEDATA hTmp;
BOOL fDefCharUsed;
hTmp = (HDDEDATA)0;
if(hData = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE | GMEM_DDESHARE,sizeof(ChatData)))
{
if(lpData = (LPCHATDATA)GlobalLock(hData))
{
*lpData = ChatData;
if(ChatData.type == CHT_FONTA)
{
lpData->uval.cd_win.cref = ((LPCHATDATAA)lpData)->uval.cd_win.cref;
lpData->uval.cd_win.brush = ((LPCHATDATAA)lpData)->uval.cd_win.brush;
}
hTmp = DdeCreateDataHandle(idInst,(LPBYTE)lpData,sizeof(ChatData),0L,hszTextItem,cf_chatdata,0);
GlobalUnlock(hData);
}
GlobalFree(hData);
}
return(hTmp);
}
/*---------------------------------------------------------------------------*\
| CREATE PASTE TRANSACTION DATA
| This routine creates a DDE object representing the paste information.
|
| created: 11-Nov-91
| history: 29-Dec-92 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
HDDEDATA CreatePasteData(VOID)
{
HDDEDATA hTmp,hRet;
HANDLE hClipb;
LPTSTR lpClipMem;
DWORD cbClip;
LPSTR lpBuf;
DWORD dwBytes;
hRet = (HDDEDATA)0;
if(OpenClipboard(hwndSnd))
{
if(hClipb = GetClipboardData(CF_UNICODETEXT))
{
if(lpClipMem = GlobalLock(hClipb))
{
cbClip = GlobalSize(hClipb);
ChatData.uval.cd_paste.size = cbClip;
if(hTmp = DdeCreateDataHandle(idInst,NULL,sizeof(ChatData)+cbClip,0L,hszTextItem,cf_chatdata,0))
{
DdeAddData(hTmp,(LPBYTE)&ChatData,sizeof(ChatData),0L);
if(ChatData.type == CHT_PASTEA)
{
dwBytes = WideCharToMultiByte(CP_ACP,0,lpClipMem,-1,NULL,0,NULL,NULL);
ChatData.uval.cd_paste.size = dwBytes;
if(lpBuf = LocalAlloc(LPTR,dwBytes))
{
WideCharToMultiByte(CP_ACP,0,lpClipMem,-1,lpBuf,dwBytes,NULL,NULL);
DdeAddData(hTmp,(LPBYTE)lpBuf,dwBytes,XCHATSIZEA);
hRet = hTmp;
LocalFree(lpBuf);
}
}
else
{
DdeAddData(hTmp,(LPBYTE)lpClipMem,cbClip,XCHATSIZEW);
hRet = hTmp;
}
}
GlobalUnlock(hClipb);
}
}
CloseClipboard();
}
return(hRet);
}
#ifdef PROTOCOL_NEGOTIATE
/*---------------------------------------------------------------------------*\
| CREATE PROTOCOL TRANSACTION DATA
| This routine creates a DDE object representing the protocol information.
|
| created: 11-Nov-91
| history: 07-Apr-93 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
HDDEDATA CreateProtocolData(VOID)
{
HANDLE hData;
LPCHATDATA lpData;
HDDEDATA hTmp;
hTmp = (HDDEDATA)0;
if(hData = GlobalAlloc(GMEM_ZEROINIT | GMEM_MOVEABLE | GMEM_DDESHARE,sizeof(ChatData)))
{
if(lpData = (LPCHATDATA)GlobalLock(hData))
{
ChatData.type = CHT_PROTOCOL;
ChatData.uval.cd_protocol.dwVer = CHT_VER;
ChatData.uval.cd_protocol.pckt = GetCurrentPckt();
*lpData = ChatData;
hTmp = DdeCreateDataHandle(idInst,(LPBYTE)lpData,sizeof(ChatData),0L,hszTextItem,cf_chatdata,0);
GlobalUnlock(hData);
}
GlobalFree(hData);
}
return(hTmp);
}
#endif
#ifdef PROTOCOL_NEGOTIATE
/*---------------------------------------------------------------------------*\
| GET CURRENT PACKET
| This routine returns the current packet capabilities of the system.
|
| created: 11-Nov-91
| history: 07-Apr-93 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
PCKT GetCurrentPckt(VOID)
{
PCKT pckt;
pckt = PCKT_TEXT;
return(pckt);
}
#endif
#ifdef PROTOCOL_NEGOTIATE
/*---------------------------------------------------------------------------*\
| FLAG INTERSECTION
| This routine determines which packet types are supporte and flags the
| appropriate ones.
|
| created: 11-Nov-91
| history: 07-Apr-93 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
VOID FlagIntersection(PCKT pcktPartner)
{
PCKT pcktNet;
pcktNet = GetCurrentPckt() & pcktPartner;
return;
}
#endif
/*---------------------------------------------------------------------------*\
| SEND FONT TO PARTNER
| This routine sends the font-information to the partner in this
| conversation.
|
| created: 11-Nov-91
| history: 29-Dec-92 <chriswil> ported to NT.
|
\*---------------------------------------------------------------------------*/
VOID SendFontToPartner(VOID)
{
HDDEDATA hDdeData;
PCHATDATAA pAChat;
ChatData.type = (ChatState.fUnicode ? CHT_FONTW : CHT_FONTA);
PackFont(&ChatData.uval.cd_win.lf,&lfSnd);
if(ChatData.type == CHT_FONTA)
{
pAChat = (PCHATDATAA)&ChatData;
pAChat->uval.cd_win.cref = SndColorref;
pAChat->uval.cd_win.brush = SndBrushColor;
}
else
{
ChatData.uval.cd_win.cref = SndColorref;
ChatData.uval.cd_win.brush = SndBrushColor;
}
if(!ChatState.fIsServer)
{
if(hDdeData = DdeCreateDataHandle(idInst,(LPBYTE) &ChatData,sizeof(ChatData),0L,hszTextItem,cf_chatdata,0))
DdeClientTransaction((LPBYTE)hDdeData,(DWORD)-1,ghConv,hszTextItem,cf_chatdata,XTYP_POKE,(DWORD)TIMEOUT_ASYNC,(LPDWORD)&StrXactID);
}
else
DdePostAdvise(idInst,hszChatTopic,hszConvPartner);
return;
}
/*---------------------------------------------------------------------------*\
| UNPACK FONT
| This routine unpacks the font stored in the packed transaction.
|
| created: 04-Feb-93
| history: 04-Feb-93 <chriswil> created.
|
\*---------------------------------------------------------------------------*/
VOID UnpackFont(LPLOGFONT lf, LPXPACKFONT lfPacked)
{
lf->lfHeight = (LONG)(short)lfPacked->lfHeight;
lf->lfWidth = (LONG)(short)lfPacked->lfWidth;
lf->lfEscapement = (LONG)(short)lfPacked->lfEscapement;
lf->lfOrientation = (LONG)(short)lfPacked->lfOrientation;
lf->lfWeight = (LONG)(short)lfPacked->lfWeight;
lf->lfItalic = (BYTE)lfPacked->lfItalic;
lf->lfUnderline = (BYTE)lfPacked->lfUnderline;
lf->lfStrikeOut = (BYTE)lfPacked->lfStrikeOut;
lf->lfCharSet = (BYTE)lfPacked->lfCharSet;
lf->lfOutPrecision = (BYTE)lfPacked->lfOutPrecision;
lf->lfClipPrecision = (BYTE)lfPacked->lfClipPrecision;
lf->lfQuality = (BYTE)lfPacked->lfQuality;
lf->lfPitchAndFamily = (BYTE)lfPacked->lfPitchAndFamily;
lstrcpy(lf->lfFaceName,lfPacked->lfFaceName);
return;
}
/*---------------------------------------------------------------------------*\
| PACK FONT
| This routine packs the font for transaction.
|
| created: 04-Feb-93
| history: 04-Feb-93 <chriswil> created.
|
\*---------------------------------------------------------------------------*/
VOID PackFont(LPXPACKFONT lfPacked, LPLOGFONT lf)
{
BOOL fDefCharUsed;
lfPacked->lfHeight = (WORD)lf->lfHeight;
lfPacked->lfWidth = (WORD)lf->lfWidth;
lfPacked->lfEscapement = (WORD)lf->lfEscapement;
lfPacked->lfOrientation = (WORD)lf->lfOrientation;
lfPacked->lfWeight = (WORD)lf->lfWeight;
lfPacked->lfItalic = (BYTE)lf->lfItalic;
lfPacked->lfUnderline = (BYTE)lf->lfUnderline;
lfPacked->lfStrikeOut = (BYTE)lf->lfStrikeOut;
lfPacked->lfCharSet = (BYTE)lf->lfCharSet;
lfPacked->lfOutPrecision = (BYTE)lf->lfOutPrecision;
lfPacked->lfClipPrecision = (BYTE)lf->lfClipPrecision;
lfPacked->lfQuality = (BYTE)lf->lfQuality;
lfPacked->lfPitchAndFamily = (BYTE)lf->lfPitchAndFamily;
if(ChatData.type == CHT_FONTA)
WideCharToMultiByte(CP_OEMCP,0,lf->lfFaceName,LF_XPACKFACESIZE,(LPSTR)(lfPacked->lfFaceName),LF_XPACKFACESIZE,NULL,&fDefCharUsed);
else
lstrcpy(lfPacked->lfFaceName,lf->lfFaceName);
return;
}