430 lines
13 KiB
C
430 lines
13 KiB
C
/*
|
|
File multilink.c
|
|
|
|
Implements the multilink dialog display by the connections
|
|
status monitor
|
|
|
|
Paul Mayfield 10/17/97
|
|
*/
|
|
|
|
#include "rassrv.h"
|
|
|
|
#define MTL_TIMER_ID 1
|
|
|
|
typedef struct _MULTILINKDATA {
|
|
HANDLE hConn;
|
|
RAS_PORT_0 * pPorts;
|
|
RAS_PORT_0 * pCurPort0;
|
|
RAS_PORT_1 * pCurPort1;
|
|
DWORD dwCurPort;
|
|
DWORD dwPortCount;
|
|
} MULTILINKDATA;
|
|
|
|
// This dialog procedure responds to messages send to the
|
|
// mtleral tab.
|
|
BOOL CALLBACK mtlUiDialogProc(HWND hwndDlg,
|
|
UINT uMsg,
|
|
WPARAM wParam,
|
|
LPARAM lParam);
|
|
|
|
// Fills in the property sheet structure with the information required to display
|
|
// the multilink tab.
|
|
DWORD mtlUiGetPropertyPage(LPPROPSHEETPAGE ppage, DWORD dwUserData) {
|
|
MULTILINKDATA * mld;
|
|
|
|
// Create the multilink data to send
|
|
mld = (MULTILINKDATA*) malloc (sizeof (MULTILINKDATA));
|
|
ZeroMemory(mld, sizeof(MULTILINKDATA));
|
|
mld->hConn = (HANDLE)dwUserData;
|
|
|
|
// Initialize
|
|
ZeroMemory(ppage, sizeof(LPPROPSHEETPAGE));
|
|
|
|
// Fill in the values
|
|
ppage->dwSize = sizeof(PROPSHEETPAGE);
|
|
ppage->hInstance = Globals.hInstDll;
|
|
ppage->pszTemplate = MAKEINTRESOURCE(IDD_MULTILINKTAB);
|
|
ppage->pfnDlgProc = mtlUiDialogProc;
|
|
ppage->pfnCallback = NULL;
|
|
ppage->dwFlags = 0;
|
|
ppage->lParam = (LPARAM)mld;
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// Error reporting
|
|
void mtlUiErrorMessageBox(HWND hwnd, DWORD err) {
|
|
WCHAR buf[1024];
|
|
FormatMessageW(FORMAT_MESSAGE_FROM_SYSTEM,NULL,err,(DWORD)NULL,buf,1024,NULL);
|
|
MessageBoxW(hwnd,
|
|
buf,
|
|
L"Dialup Server Configuration Error",
|
|
MB_OK | MB_ICONERROR | MB_APPLMODAL);
|
|
}
|
|
|
|
// Formats an unsigned number with commas, etc.
|
|
PWCHAR mtlFormatDword(DWORD dwVal) {
|
|
static WCHAR ret[64];
|
|
WCHAR num[64];
|
|
int i = 0, tmp, j, k;
|
|
|
|
if (dwVal == 0) {
|
|
ret[0] = (WCHAR)'0';
|
|
ret[1] = (WCHAR)0;
|
|
return ret;
|
|
}
|
|
|
|
// Get the value in reverse order
|
|
while (dwVal) {
|
|
tmp = dwVal % 10;
|
|
dwVal /= 10;
|
|
num[i++] = (WCHAR)('0' + tmp);
|
|
}
|
|
num[i] = (WCHAR)0;
|
|
|
|
// Add commas
|
|
k = 0;
|
|
for (j = 0; j < i; j++) {
|
|
if (k%4 == 3)
|
|
ret[k++] = (WCHAR)',';
|
|
ret[k++] = num[j];
|
|
}
|
|
ret[k] = 0;
|
|
k--;
|
|
|
|
// reverse the string
|
|
for (j=0; j < (k+1)/2; j++) {
|
|
tmp = ret[j];
|
|
ret[j] = ret[k-j];
|
|
ret[k-j] = tmp;
|
|
}
|
|
|
|
return ret;
|
|
}
|
|
|
|
// Formats a string representing the time that a connection is connected
|
|
PWCHAR mtlFormatTime(DWORD dwSeconds) {
|
|
DWORD dwSec, dwHr, dwMin;
|
|
static WCHAR ret[16];
|
|
|
|
dwSec = dwSeconds % 60;
|
|
dwMin = dwSeconds / 60;
|
|
dwHr = dwSeconds / 3600;
|
|
|
|
wsprintfW(ret, L"%02d:%02d:%02d", dwHr, dwMin, dwSec);
|
|
|
|
return ret;
|
|
}
|
|
|
|
// Formats a string to display connection speed
|
|
PWCHAR mtlFormatSpeed(DWORD dwBps) {
|
|
static WCHAR ret[64];
|
|
|
|
wsprintfW(ret, L"%s bps", mtlFormatDword(dwBps));
|
|
return ret;
|
|
}
|
|
|
|
// The list view control requires the list of icons it will display
|
|
// to be provided up front. This function initializes and presents
|
|
// this list.
|
|
DWORD mtlUiInitializeListViewIcons(HWND hwndLV) {
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// Returns the index of an to display icon based on the type of incoming
|
|
// connection and whether or not it should be checked.
|
|
int mtlGetIconIndex(DWORD dwType, BOOL bEnabled) {
|
|
if (bEnabled)
|
|
return dwType + 1;
|
|
return dwType;
|
|
}
|
|
|
|
// Fills in the user list view with the names of the users stored in the
|
|
// user database provide. Also, initializes the checked/unchecked status
|
|
// of each user.
|
|
DWORD mtlUiFillPortList(HWND hwndLV, MULTILINKDATA * mld) {
|
|
LV_ITEM lvi;
|
|
DWORD i, dwErr, dwType;
|
|
char pszAName[1024];
|
|
|
|
// Add the images that this list item will display
|
|
dwErr = mtlUiInitializeListViewIcons(hwndLV);
|
|
if (dwErr != NO_ERROR)
|
|
return dwErr;
|
|
|
|
// Initialize the list item
|
|
ZeroMemory(&lvi, sizeof(LV_ITEM));
|
|
lvi.mask = LVIF_TEXT;
|
|
// lvi.mask = LVIF_TEXT | LVIF_IMAGE;
|
|
|
|
// Looop through all of the users adding their names as we go
|
|
for (i=0; i<mld->dwPortCount; i++) {
|
|
//WideCharToMultiByte(CP_ACP,0,mld->pPorts[i].wszPortName,-1,pszAName,1024,NULL,NULL);
|
|
lvi.iItem = i;
|
|
//lvi.pszText = pszAName;
|
|
lvi.pszText = mld->pPorts[i].wszPortName;
|
|
//lvi.cchTextMax = strlen(pszAName) + 1;
|
|
lvi.cchTextMax = wcslen(mld->pPorts[i].wszPortName) + 1;
|
|
ListView_InsertItem(hwndLV,&lvi);
|
|
}
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// Loads the current port
|
|
DWORD mtlLoadCurrentPort(MULTILINKDATA * mld) {
|
|
DWORD dwErr;
|
|
|
|
// Cleanup the old data
|
|
if (mld->pCurPort0)
|
|
MprAdminBufferFree(mld->pCurPort0);
|
|
if (mld->pCurPort1)
|
|
MprAdminBufferFree(mld->pCurPort1);
|
|
|
|
dwErr = MprAdminPortGetInfo(Globals.hRasServer,
|
|
1,
|
|
mld->pPorts[mld->dwCurPort].hPort,
|
|
(LPBYTE*)&mld->pCurPort1);
|
|
|
|
dwErr = MprAdminPortGetInfo(Globals.hRasServer,
|
|
0,
|
|
mld->pPorts[mld->dwCurPort].hPort,
|
|
(LPBYTE*)&mld->pCurPort0);
|
|
|
|
return dwErr;
|
|
}
|
|
|
|
// Initializes the multilink data
|
|
DWORD mtlLoadPortData(MULTILINKDATA * mld, DWORD dwCur) {
|
|
DWORD dwTot, dwErr;
|
|
|
|
// Set the current port and load the data
|
|
mld->dwCurPort = dwCur;
|
|
|
|
// Cleanup
|
|
if (mld->pPorts)
|
|
MprAdminBufferFree(mld->pPorts);
|
|
|
|
// Get the count of ports
|
|
dwErr = MprAdminPortEnum (Globals.hRasServer,
|
|
0,
|
|
mld->hConn,
|
|
(LPBYTE*)&mld->pPorts,
|
|
1024*1024,
|
|
&mld->dwPortCount,
|
|
&dwTot,
|
|
NULL);
|
|
if (dwErr != NO_ERROR)
|
|
return dwErr;
|
|
|
|
if (mld->dwPortCount) {
|
|
dwErr = mtlLoadCurrentPort(mld);
|
|
if (dwErr != NO_ERROR)
|
|
return NO_ERROR;
|
|
}
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// Updates the dialog with the current statistics stored in mld
|
|
DWORD mtlUpdateStats(HWND hwndDlg, MULTILINKDATA * mld) {
|
|
WCHAR buf[128];
|
|
DWORD dwErr = 0;
|
|
|
|
// Mark the bytes in and out
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_BYTESIN), mtlFormatDword(mld->pCurPort1->dwBytesRcved));
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_BYTESOUT), mtlFormatDword(mld->pCurPort1->dwBytesXmited));
|
|
|
|
// Mark the compression ratios
|
|
wsprintfW(buf, L"%d%%", mld->pCurPort1->dwCompressionRatioIn);
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_COMPIN), buf);
|
|
wsprintfW(buf, L"%d%%", mld->pCurPort1->dwCompressionRatioOut);
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_COMPOUT), buf);
|
|
|
|
// Mark the errors
|
|
dwErr = mld->pCurPort1->dwCrcErr +
|
|
mld->pCurPort1->dwTimeoutErr +
|
|
mld->pCurPort1->dwAlignmentErr +
|
|
mld->pCurPort1->dwHardwareOverrunErr +
|
|
mld->pCurPort1->dwFramingErr +
|
|
mld->pCurPort1->dwBufferOverrunErr;
|
|
wsprintfW(buf, L"%d", dwErr);
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_ERRORIN), buf);
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_ERROROUT), L"0");
|
|
|
|
// Mark the duration
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_DURATION),
|
|
mtlFormatTime(mld->pCurPort0->dwConnectDuration));
|
|
|
|
// Mark the speed
|
|
SetWindowTextW(GetDlgItem(hwndDlg, IDC_SPEED),
|
|
mtlFormatSpeed(mld->pCurPort1->dwLineSpeed));
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// Initializes the mtleral tab. By now a handle to the mtleral database
|
|
// has been placed in the user data of the dialog
|
|
DWORD mtlUiInitializeDialog(HWND hwndDlg, WPARAM wParam, LPARAM lParam) {
|
|
DWORD dwErr, dwCount;
|
|
BOOL bFlag;
|
|
HANDLE hConn, hMiscDatabase;
|
|
HWND hwndLV;
|
|
LV_COLUMN lvc;
|
|
MULTILINKDATA * mld;
|
|
LPPROPSHEETPAGE ppage;
|
|
|
|
// Set the Timer
|
|
SetTimer(hwndDlg, MTL_TIMER_ID, 500, NULL);
|
|
|
|
// Set the data for this dialog
|
|
ppage = (LPPROPSHEETPAGE)lParam;
|
|
mld = (MULTILINKDATA*)(ppage->lParam);
|
|
SetWindowLongPtr(hwndDlg, GWLP_USERDATA, (LONG_PTR)mld);
|
|
|
|
// Initialize all of the values in the multilink data structure
|
|
mtlLoadPortData(mld, 0);
|
|
|
|
// Cause the list view to send LV_EXTENSION_??? messages and to do full
|
|
// row select
|
|
hwndLV = GetDlgItem(hwndDlg, IDC_PORTLIST);
|
|
lvxExtend(hwndLV);
|
|
ListView_SetExtendedListViewStyle(hwndLV, LVS_EX_FULLROWSELECT);
|
|
|
|
// Fill in the list view will all available mtlices
|
|
mtlUiFillPortList(hwndLV, mld);
|
|
|
|
// Select the first item in the list view if any items exist
|
|
dwCount = mld->dwPortCount;
|
|
if (dwCount)
|
|
ListView_SetItemState(hwndLV, 0, LVIS_SELECTED | LVIS_FOCUSED, 0xffffffff);
|
|
|
|
// Add a colum so that we'll display in report view
|
|
lvc.mask = LVCF_FMT;
|
|
lvc.fmt = LVCFMT_LEFT;
|
|
ListView_InsertColumn(hwndLV,0,&lvc);
|
|
ListView_SetColumnWidth(hwndLV, 0, LVSCW_AUTOSIZE_USEHEADER);
|
|
|
|
// Update the statistics
|
|
mtlUpdateStats(hwndDlg, mld);
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// Updates the current port
|
|
DWORD mtlUpdateCurPort(MULTILINKDATA * mld, DWORD dwNewPort) {
|
|
mld->dwCurPort = dwNewPort;
|
|
return mtlLoadCurrentPort(mld);
|
|
}
|
|
|
|
// Hangsup the current port
|
|
DWORD mtlHangup(HWND hwndDlg, MULTILINKDATA * mld) {
|
|
DWORD dwErr;
|
|
HWND hwndLV = GetDlgItem(hwndDlg, IDC_PORTLIST);
|
|
|
|
if ((dwErr = MprAdminPortDisconnect(Globals.hRasServer, mld->pCurPort0->hPort)) != NO_ERROR)
|
|
return dwErr;
|
|
|
|
// There are no more ports if mtlLoadPortData returns an error
|
|
if ((dwErr = mtlLoadPortData(mld, 0)) != NO_ERROR)
|
|
DestroyWindow(hwndDlg);
|
|
else {
|
|
ListView_DeleteAllItems(hwndLV);
|
|
mtlUiFillPortList(hwndLV, mld);
|
|
ListView_SetItemState(hwndLV, 0, LVIS_SELECTED | LVIS_FOCUSED, 0xffffffff);
|
|
mtlUpdateStats(hwndDlg, mld);
|
|
}
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
|
|
// Cleansup the mtleral tab as it is being destroyed
|
|
DWORD mtlUiCleanupDialog(HWND hwndDlg, WPARAM wParam, LPARAM lParam) {
|
|
// Cleanup the data
|
|
MULTILINKDATA * mld = (MULTILINKDATA *) GetWindowLongPtr(hwndDlg, GWLP_USERDATA);
|
|
if (mld) {
|
|
if (mld->pCurPort0)
|
|
MprAdminBufferFree(mld->pCurPort0);
|
|
if (mld->pCurPort1)
|
|
MprAdminBufferFree(mld->pCurPort1);
|
|
if (mld)
|
|
free(mld);
|
|
}
|
|
|
|
// Stop the timer
|
|
KillTimer(hwndDlg, MTL_TIMER_ID);
|
|
|
|
return NO_ERROR;
|
|
}
|
|
|
|
// This is the dialog procedure that responds to messages sent to the
|
|
// mtleral tab.
|
|
BOOL CALLBACK mtlUiDialogProc(HWND hwndDlg,
|
|
UINT uMsg,
|
|
WPARAM wParam,
|
|
LPARAM lParam) {
|
|
NMHDR* pNotifyData;
|
|
NM_LISTVIEW* pLvNotifyData;
|
|
LV_KEYDOWN* pLvKeyDown;
|
|
MULTILINKDATA * mld = (MULTILINKDATA*) GetWindowLongPtr(hwndDlg, GWLP_USERDATA);
|
|
|
|
// Process other messages as normal
|
|
switch (uMsg) {
|
|
case WM_INITDIALOG:
|
|
return mtlUiInitializeDialog(hwndDlg, wParam, lParam);
|
|
|
|
case WM_NOTIFY:
|
|
pNotifyData = (NMHDR*)lParam;
|
|
switch (pNotifyData->code) {
|
|
// The property sheet apply button was pressed
|
|
case PSN_APPLY:
|
|
SetWindowLongPtr(hwndDlg, DWLP_MSGRESULT, PSNRET_NOERROR);
|
|
return TRUE;
|
|
|
|
// The property sheet cancel was pressed
|
|
case PSN_RESET:
|
|
SetWindowLongPtr(hwndDlg, DWLP_MSGRESULT, FALSE);
|
|
break;
|
|
|
|
// An item is changing state, keep track of any newly
|
|
// selected item so space bar can toggle him.
|
|
case LVN_ITEMCHANGING:
|
|
pLvNotifyData = (NM_LISTVIEW*)lParam;
|
|
if (pLvNotifyData->uNewState & LVIS_SELECTED) {
|
|
mtlUpdateCurPort(mld, pLvNotifyData->iItem);
|
|
mtlUpdateStats(hwndDlg, mld);
|
|
}
|
|
break;
|
|
}
|
|
break;
|
|
|
|
// Called when the timer expires
|
|
case WM_TIMER:
|
|
mtlLoadCurrentPort(mld);
|
|
mtlUpdateStats(hwndDlg, mld);
|
|
break;
|
|
|
|
// This is a custom message that we defined to toggle dialin permission
|
|
// when the mouse is clicked on a user.
|
|
case LV_EXTENSION_ITEMCLICKED:
|
|
case LV_EXTENSION_ITEMDBLCLICKED:
|
|
mtlUpdateCurPort(mld, wParam);
|
|
mtlUpdateStats(hwndDlg, mld);
|
|
break;
|
|
|
|
case WM_COMMAND:
|
|
if (wParam == IDC_HANGUP)
|
|
mtlHangup(hwndDlg, mld);
|
|
break;
|
|
|
|
// Cleanup the work done at WM_INITDIALOG
|
|
case WM_DESTROY:
|
|
mtlUiCleanupDialog(hwndDlg, wParam, lParam);
|
|
break;
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|