/**************************************************************************** * * dialogs.c: Code for dialog procs of CapTest Sample Program * * Microsoft Video for Windows Capture Class Test Program * ***************************************************************************/ /************************************************************************** * * 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 (C) 1992 - 1997 Microsoft Corporation. All Rights Reserved. * **************************************************************************/ #define INC_OLE2 #include #include #include #include #include #include #include #include #include #include #include #include "captest.h" static long GetFreeDiskSpace(WORD) ; static int CountMCIDevices(WORD) ; // // AboutProc: About Dialog Box Procedure // int FAR PASCAL AboutProc(HWND hDlg, UINT Message, UINT wParam, LONG lParam) { switch (Message) { case WM_INITDIALOG : return TRUE ; case WM_COMMAND : switch (wParam) { case IDOK : EndDialog(hDlg, TRUE) ; return TRUE ; case IDCANCEL : EndDialog(hDlg, FALSE) ; return TRUE ; } break ; } return FALSE ; } // // AudioFormatProc: Audio Format Setting Dialog Box Procedure // int FAR PASCAL AudioFormatProc(HWND hDlg, UINT Message, UINT wParam, LONG lParam) { static int nChannels ; static WORD wSample ; static DWORD dwFrequency ; switch (Message) { case WM_INITDIALOG : nChannels = IDD_ChannelIDs + glpwfex->nChannels ; CheckRadioButton(hDlg, IDD_ChannelMono, IDD_ChannelStereo, nChannels) ; wSample = IDD_SampleIDs + glpwfex->wBitsPerSample / 8 ; CheckRadioButton(hDlg, IDD_Sample8Bit, IDD_Sample16Bit, wSample) ; dwFrequency = IDD_FreqIDs + glpwfex->nSamplesPerSec / 11025 ; CheckRadioButton(hDlg, IDD_Freq11kHz, IDD_Freq44kHz, (WORD)dwFrequency) ; return TRUE ; case WM_COMMAND : switch (wParam) { case IDOK : if (IsDlgButtonChecked(hDlg, IDD_ChannelMono)) nChannels = 1 ; else if (IsDlgButtonChecked(hDlg, IDD_ChannelStereo)) nChannels = 2 ; else { MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } if (IsDlgButtonChecked(hDlg, IDD_Sample8Bit)) wSample = 8 ; else if (IsDlgButtonChecked(hDlg, IDD_Sample16Bit)) wSample = 16 ; else { MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } if (IsDlgButtonChecked(hDlg, IDD_Freq11kHz)) dwFrequency = 11025 ; else if (IsDlgButtonChecked(hDlg, IDD_Freq22kHz)) dwFrequency = 22050 ; else if (IsDlgButtonChecked(hDlg, IDD_Freq44kHz)) dwFrequency = 44100 ; else { MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } // All the entries verfied OK -- save them now glpwfex->nChannels = nChannels ; glpwfex->wBitsPerSample = wSample ; glpwfex->nSamplesPerSec = dwFrequency ; glpwfex->nBlockAlign = glpwfex->nChannels * (glpwfex->wBitsPerSample / 8) ; glpwfex->nAvgBytesPerSec = (long) glpwfex->nSamplesPerSec * glpwfex->nBlockAlign ; glpwfex->cbSize = 0 ; glpwfex->wFormatTag = WAVE_FORMAT_PCM ; EndDialog(hDlg, TRUE) ; return TRUE ; case IDCANCEL : EndDialog(hDlg, FALSE) ; return TRUE ; } break ; } return FALSE ; } // // GetFreeDiskSpaceInKB: Function to Measure Available Disk Space // static long GetFreeDiskSpaceInKB(LPTSTR pFile) { DWORD dwFreeClusters, dwBytesPerSector, dwSectorsPerCluster, dwClusters; char RootName[MAX_PATH]; LPSTR ptmp; //required arg // need to find path for root directory on drive containing // this file. GetFullPathName(pFile, sizeof(RootName)/sizeof(RootName[0]), RootName, &ptmp); // truncate this to the name of the root directory (god how tedious) if ((RootName[0] == TEXT('\\')) && (RootName[1] == TEXT('\\'))) { // path begins with \\server\share\path so skip the first // three backslashes ptmp = &RootName[2]; while (*ptmp && (*ptmp != TEXT('\\'))) { ptmp++; } if (*ptmp) { // advance past the third backslash ptmp++; } } else { // path must be drv:\path ptmp = RootName; } // find next backslash and put a null after it while (*ptmp && (*ptmp != TEXT('\\'))) { ptmp++; } // found a backslash ? if (*ptmp) { // skip it and insert null ptmp++; *ptmp = TEXT('\0'); } if (!GetDiskFreeSpace(RootName, &dwSectorsPerCluster, &dwBytesPerSector, &dwFreeClusters, &dwClusters)) { MessageBox(NULL, TEXT("Can't measure free disk space."), TEXT("Error"), MB_OK | MB_ICONINFORMATION); return (-1); } return(MulDiv (dwSectorsPerCluster * dwBytesPerSector, dwFreeClusters, 1024)); } // // AllocCapFileProc: Capture file Space Allocation Dialog Box Procedure // int FAR PASCAL AllocCapFileProc(HWND hDlg, UINT Message, UINT wParam, LONG lParam) { static int nFreeMBs = 0 ; switch (Message) { case WM_INITDIALOG : { long lFileSize = 0 ; long lFreeSpaceInKB ; TCHAR achCapFile[_MAX_PATH] ; HANDLE hFile; // Get current capture file name and measure its size capFileGetCaptureFile(ghWndCap, achCapFile, sizeof(achCapFile) / sizeof(TCHAR)) ; hFile = CreateFile( achCapFile, GENERIC_READ, 0, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); if (hFile != INVALID_HANDLE_VALUE) { if ((lFileSize = GetFileSize(hFile, NULL)) == -1) { MessageBox(NULL, TEXT("Couldn't find size of current capture file"), TEXT("ERROR"), MB_OK | MB_ICONEXCLAMATION); lFileSize = 0; } CloseHandle(hFile); } // Get free disk space and add current capture file size to that. // Convert the available space to MBs. if ((lFreeSpaceInKB = GetFreeDiskSpaceInKB(achCapFile)) != -1L) { lFreeSpaceInKB += lFileSize / 1024 ; nFreeMBs = lFreeSpaceInKB / 1024 ; SetDlgItemInt(hDlg, IDD_SetCapFileFree, nFreeMBs, TRUE) ; } else { EnableWindow(GetDlgItem(hDlg, IDD_SetCapFileFree), FALSE); } gwCapFileSize = (WORD) (lFileSize / ONEMEG); SetDlgItemInt(hDlg, IDD_SetCapFileSize, gwCapFileSize, TRUE) ; return TRUE ; } case WM_COMMAND : switch (GET_WM_COMMAND_ID(wParam, lParam)) { case IDOK : { int iCapFileSize ; iCapFileSize = (int) GetDlgItemInt(hDlg, IDD_SetCapFileSize, NULL, TRUE) ; if (iCapFileSize <= 0 || iCapFileSize > nFreeMBs) { // You are asking for more than we have !! Sorry, ... SetDlgItemInt(hDlg, IDD_SetCapFileSize, iCapFileSize, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_SetCapFileSize)) ; MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } gwCapFileSize = iCapFileSize ; EndDialog(hDlg, TRUE) ; return TRUE ; } case IDCANCEL : EndDialog(hDlg, FALSE) ; return TRUE ; case IDD_SetCapFileSize: { long l; BOOL bchanged; char achBuffer[21]; // check that entered size is a valid number GetDlgItemText(hDlg, IDD_SetCapFileSize, achBuffer, sizeof(achBuffer)); l = atol(achBuffer); bchanged = FALSE; if (l < 1) { l = 1; bchanged = TRUE; } else if (l > nFreeMBs) { l = nFreeMBs; bchanged = TRUE; } else { // make sure there are no non-digit chars // atol() will ignore trailing non-digit characters int c = 0; while (achBuffer[c]) { if (IsCharAlpha(achBuffer[c]) || !IsCharAlphaNumeric(achBuffer[c])) { // string contains non-digit chars - reset l = 1; bchanged = TRUE; break; } c++; } } if (bchanged) { wsprintf(achBuffer, "%ld", l); SetDlgItemText(hDlg, IDD_SetCapFileSize, achBuffer); } break; } } break ; } return FALSE ; } // // MakePaletteProc: Palette Details Dialog Box Procedure // BOOL CALLBACK MakePaletteProc(HWND hDlg, UINT Message, UINT wParam, LONG lParam) { switch (Message) { case WM_INITDIALOG : SetDlgItemInt(hDlg, IDD_MakePalColors, gwPalColors, FALSE) ; SetDlgItemInt(hDlg, IDD_MakePalFrames, gwPalFrames, FALSE) ; return TRUE ; case WM_COMMAND : switch (wParam) { case IDOK : { int iColors ; int iFrames ; iColors = (int) GetDlgItemInt(hDlg, IDD_MakePalColors, NULL, TRUE) ; if (! (iColors > 0 && iColors <= 236 || iColors == 256)) { // invalid number of palette colors SetDlgItemInt(hDlg, IDD_MakePalColors, iColors, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_MakePalColors)) ; MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } iFrames = (int) GetDlgItemInt(hDlg, IDD_MakePalFrames, NULL, TRUE) ; if (iFrames <= 0 || iFrames > 10000) { // no frame or way t-o-o many frames !!! SetDlgItemInt(hDlg, IDD_MakePalFrames, iFrames, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_MakePalFrames)) ; MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } gwPalColors = iColors ; gwPalFrames = iFrames ; EndDialog(hDlg, TRUE) ; return TRUE ; } case IDCANCEL : EndDialog(hDlg, FALSE) ; return TRUE ; } break ; } return FALSE ; } // // CountMCIDevices: Function to Find the Number of MCI Devices of a Type // static int CountMCIDevices(WORD wType) { int nTotal = 0 ; DWORD dwCount ; MCI_SYSINFO_PARMS mciSIP ; mciSIP.dwCallback = 0 ; mciSIP.lpstrReturn = (LPTSTR)(LPVOID) &dwCount ; mciSIP.dwRetSize = sizeof(DWORD) ; mciSIP.wDeviceType = wType ; // Use an MCI command to get the info if (! mciSendCommand(0, MCI_SYSINFO, MCI_SYSINFO_QUANTITY, (DWORD)(LPVOID) &mciSIP)) nTotal = (int) *((LPDWORD) mciSIP.lpstrReturn) ; return nTotal ; } // // CapSetUpProc: Capture SetUp Details Dialog Box Procedure // int FAR PASCAL CapSetUpProc(HWND hDlg, UINT Message, UINT wParam, LONG lParam) { BOOL fValue ; static TCHAR achBuffer[21] ; switch (Message) { case WM_INITDIALOG : { WORD wValue ; // Convert from MicroSecPerFrame to FPS -- that's easier !! wValue = (int) (1E+6 / gCapParms.dwRequestMicroSecPerFrame + 0.5) ; SetDlgItemInt(hDlg, IDD_FrameRateData, wValue, FALSE) ; if (gCapParms.fAbortLeftMouse) wValue = IDD_AbortLeftFlag ; else if (gCapParms.fAbortRightMouse) wValue = IDD_AbortRightFlag ; else wValue = 0 ; // none of the mouse-buttons !!! CheckRadioButton(hDlg, IDD_AbortLeftFlag, IDD_AbortRightFlag, wValue) ; if (gCapParms.vKeyAbort == VK_ESCAPE) wValue = IDD_AbortEscFlag ; else if (gCapParms.vKeyAbort == VK_SPACE) wValue = IDD_AbortSpaceFlag ; else if (gCapParms.vKeyAbort == VK_F8) wValue = IDD_AbortF8Flag ; else wValue = 0 ; // none of the keys !!! CheckRadioButton(hDlg, IDD_AbortEscFlag, IDD_AbortF8Flag, wValue) ; // If time limit isn't anabled, disable the time data part CheckDlgButton(hDlg, IDD_TimeLimitFlag, (fValue = gCapParms.fLimitEnabled)) ; EnableWindow(GetDlgItem(hDlg, IDD_SecondsText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_SecondsData), fValue) ; if (fValue) SetDlgItemInt(hDlg, IDD_SecondsData, gCapParms.wTimeLimit, FALSE) ; EnableWindow(GetDlgItem(hDlg, IDD_CapAudioFlag), gCapStatus.fAudioHardware) ; CheckDlgButton(hDlg, IDD_CapAudioFlag, gCapParms.fCaptureAudio) ; CheckDlgButton(hDlg, IDD_UseDOSMemFlag, gCapParms.fUsingDOSMemory) ; CheckDlgButton(hDlg, IDD_CaptureOKFlag, gCapParms.fMakeUserHitOKToCapture) ; // Find out how many MCI devices can source video if (CountMCIDevices(MCI_DEVTYPE_VCR) + CountMCIDevices(MCI_DEVTYPE_VIDEODISC) == 0) // if no VCRs or Videodiscs, disable the controls fValue = FALSE ; else fValue = TRUE ; // If no MCI device or MCI Control not enabled, disable MCI // device name, start and stop time, step capture etc EnableWindow(GetDlgItem(hDlg, IDD_MCIControlFlag), fValue) ; CheckDlgButton(hDlg, IDD_MCIControlFlag, (fValue &= gCapParms.fMCIControl)) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIDeviceText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIDeviceData), fValue) ; SetDlgItemText(hDlg, IDD_MCIDeviceData, (LPTSTR)gachMCIDeviceName) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStartText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStartData), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStopText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStopData), fValue) ; if (fValue) { wsprintf((LPTSTR)achBuffer, TEXT("%lu"), gCapParms.dwMCIStartTime) ; SetDlgItemText(hDlg, IDD_MCIStartData, (LPTSTR)achBuffer) ; wsprintf((LPTSTR)achBuffer, TEXT("%lu"), gCapParms.dwMCIStopTime) ; SetDlgItemText(hDlg, IDD_MCIStopData, (LPTSTR)achBuffer) ; } EnableWindow(GetDlgItem(hDlg, IDD_MCIStepCapFlag), fValue) ; CheckDlgButton(hDlg, IDD_MCIStepCapFlag, gCapParms.fStepMCIDevice) ; SetDlgItemInt(hDlg, IDD_MaxDropData, gCapParms.wPercentDropForError, FALSE) ; SetDlgItemInt(hDlg, IDD_VideoBuffData, gCapParms.wNumVideoRequested, FALSE) ; return TRUE ; } case WM_COMMAND : switch (wParam) { case IDD_TimeLimitFlag : // If this flag changes, en/dis-able time limit data part fValue = IsDlgButtonChecked(hDlg, IDD_TimeLimitFlag) ; EnableWindow(GetDlgItem(hDlg, IDD_SecondsText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_SecondsData), fValue) ; return TRUE ; case IDD_MCIControlFlag : // If this flag changes, en/dis-able MCI times data part fValue = IsDlgButtonChecked(hDlg, IDD_MCIControlFlag) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIDeviceText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIDeviceData), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStartText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStartData), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStopText), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStopData), fValue) ; EnableWindow(GetDlgItem(hDlg, IDD_MCIStepCapFlag), fValue) ; CheckDlgButton(hDlg, IDD_MCIStepCapFlag, gCapParms.fStepMCIDevice | IsDlgButtonChecked(hDlg, IDD_MCIStepCapFlag)) ; return TRUE ; case IDOK : { int iFrameRate ; int iTimeLimit ; int iMaxDropRate ; int iVideoBuffers ; long lMCIStart ; long lMCIStop ; if ((iFrameRate = (int) GetDlgItemInt(hDlg, IDD_FrameRateData, NULL, TRUE)) <= 0 || iFrameRate >= 100) { // No frame at all or more than 100 FPS !! SetDlgItemInt(hDlg, IDD_FrameRateData, iFrameRate, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_FrameRateData)) ; MessageBeep(MB_ICONQUESTION) ; return FALSE ; } if (IsDlgButtonChecked(hDlg, IDD_TimeLimitFlag)) { if ((iTimeLimit = (int) GetDlgItemInt(hDlg, IDD_SecondsData, NULL, TRUE)) <= 0 || iTimeLimit > 3600) { // No capture or more than 1 hour !! SetDlgItemInt(hDlg, IDD_SecondsData, iTimeLimit, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_SecondsData)) ; MessageBeep(MB_ICONQUESTION) ; return FALSE ; } } if (IsDlgButtonChecked(hDlg, IDD_MCIControlFlag)) { GetDlgItemText(hDlg, IDD_MCIStartData, (LPTSTR)achBuffer, 20) ; #ifdef UNICODE lMCIStart = wcstol(achBuffer, NULL, 10); #else lMCIStart = atol(achBuffer) ; #endif if (lMCIStart < 0 || // negative time !!! lMCIStart >= 2000000000L) { // or too high !!! SetDlgItemText(hDlg, IDD_MCIStartData, achBuffer) ; SetFocus(GetDlgItem(hDlg, IDD_MCIStartData)) ; MessageBeep(MB_ICONQUESTION) ; return FALSE ; } GetDlgItemText(hDlg, IDD_MCIStopData, (LPTSTR)achBuffer, 20) ; #ifdef UNICODE lMCIStop = wcstol(achBuffer, NULL, 10); #else lMCIStop = atol(achBuffer) ; #endif if (lMCIStop < 0 || // negative time !!! lMCIStop >= 2000000000L || // or too high !!! lMCIStop < lMCIStart) { // or Stop before Start !!! SetDlgItemText(hDlg, IDD_MCIStopData, achBuffer) ; SetFocus(GetDlgItem(hDlg, IDD_MCIStopData)) ; MessageBeep(MB_ICONQUESTION) ; return FALSE ; } } if ((iMaxDropRate = (int) GetDlgItemInt(hDlg, IDD_MaxDropData, NULL, TRUE)) < 0 || iMaxDropRate >= 100) { // Negative drop limit or more than 100% !! SetDlgItemInt(hDlg, IDD_MaxDropData, iMaxDropRate, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_MaxDropData)) ; MessageBeep(0) ; return FALSE ; } if ((iVideoBuffers = (int) GetDlgItemInt(hDlg, IDD_VideoBuffData, NULL, TRUE)) <= 0 || iVideoBuffers >= 32767) { // Can't capture with too many or without video buffers SetDlgItemInt(hDlg, IDD_VideoBuffData, iVideoBuffers, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_VideoBuffData)) ; MessageBeep(MB_ICONQUESTION) ; return FALSE ; } // All the Cap params are correct. So set them now... gCapParms.dwRequestMicroSecPerFrame = (DWORD)(1E+6 / iFrameRate + 0.5) ; gCapParms.fLimitEnabled = IsDlgButtonChecked(hDlg, IDD_TimeLimitFlag) ; gCapParms.wTimeLimit = iTimeLimit ; if (gCapParms.fMCIControl = IsDlgButtonChecked(hDlg, IDD_MCIControlFlag)) { gCapParms.dwMCIStartTime = lMCIStart ; gCapParms.dwMCIStopTime = lMCIStop ; GetDlgItemText(hDlg, IDD_MCIDeviceData, (LPTSTR)achBuffer, 20) ; lstrcpy(gachMCIDeviceName, achBuffer) ; capSetMCIDeviceName(ghWndCap, gachMCIDeviceName) ; gCapParms.fStepMCIDevice = IsDlgButtonChecked(hDlg, IDD_MCIStepCapFlag) ; } else { gCapParms.dwMCIStartTime = gCapParms.dwMCIStopTime = 0 ; gCapParms.fStepMCIDevice = FALSE ; } gCapParms.wPercentDropForError = iMaxDropRate ; gCapParms.wNumVideoRequested = iVideoBuffers ; gCapParms.fAbortLeftMouse = IsDlgButtonChecked(hDlg, IDD_AbortLeftFlag) ; gCapParms.fAbortRightMouse = IsDlgButtonChecked(hDlg, IDD_AbortRightFlag) ; if (IsDlgButtonChecked(hDlg, IDD_AbortEscFlag)) gCapParms.vKeyAbort = VK_ESCAPE ; else if (IsDlgButtonChecked(hDlg, IDD_AbortSpaceFlag)) gCapParms.vKeyAbort = VK_SPACE ; else if (IsDlgButtonChecked(hDlg, IDD_AbortF8Flag)) gCapParms.vKeyAbort = VK_F8 ; else gCapParms.vKeyAbort = 0 ; gCapParms.fCaptureAudio = IsDlgButtonChecked(hDlg, IDD_CapAudioFlag) ; gCapParms.fUsingDOSMemory = IsDlgButtonChecked(hDlg, IDD_UseDOSMemFlag) ; gCapParms.fMakeUserHitOKToCapture = IsDlgButtonChecked(hDlg, IDD_CaptureOKFlag) ; EndDialog(hDlg, TRUE) ; return TRUE ; } case IDCANCEL : EndDialog(hDlg, FALSE) ; return TRUE ; } break ; } return FALSE ; } // // ServeurWeb: Capture file Space Allocation Dialog Box Procedure // char CodeWebcam [16] = "" ; WORD gwPort = 80; #define MAX_VALUE_NAME 128 #define MAX_DATA_LEN 1024 #define LINE_LEN 80 DWORD getkeyint (LPCTSTR lpValueName, DWORD value) { HKEY hKey; DWORD retCode; HANDLE hHeap; hHeap = HeapCreate (0, 0, 0); retCode = RegOpenKeyEx (HKEY_CURRENT_USER, // Key handle at root level. // "HKEY_CURRENT_USER\\Software\\WBC\\Httpd\\Server\\", // Path name of child key. // "Software\\WBC\\Httpd\\Server", // Path name of child key. lpValueName, 0, // Reserved. KEY_EXECUTE, // Requesting read access. &hKey); // Address of key to be returned. if (retCode == ERROR_SUCCESS) { DWORD dwLBIndex = 0; // CHAR Buf[LINE_LEN]; CHAR ValueName[MAX_VALUE_NAME]; DWORD cbValueName = MAX_VALUE_NAME; DWORD dwType; DWORD retCode; // CHAR lpBuffer[128]; // CHAR lpBuffer2[128]; CHAR ClassName[MAX_PATH]; DWORD dwcClassLen = MAX_PATH; DWORD dwcSubKeys; DWORD dwcMaxSubKey; DWORD dwcMaxClass; DWORD dwcValues; DWORD dwcMaxValueName; DWORD dwcMaxValueData; DWORD dwcSecDesc; FILETIME ftLastWriteTime; BYTE *bData; DWORD cbData; retCode = RegQueryInfoKey ( hKey, // Key handle. ClassName, // Buffer for class name. &dwcClassLen, // Length of class string. NULL, // Reserved. &dwcSubKeys, // Number of sub keys. &dwcMaxSubKey, // Longest sub key size. &dwcMaxClass, // Longest class string. &dwcValues, // Number of values for this key. &dwcMaxValueName, // Longest Value name. &dwcMaxValueData, // Longest Value data. &dwcSecDesc, // Security descriptor. &ftLastWriteTime); // Last write time. if (retCode== ERROR_SUCCESS) { bData = (unsigned char *) HeapAlloc (hHeap, 0, dwcMaxValueData+1); cbData = dwcMaxValueData+1; while (retCode==ERROR_SUCCESS) { retCode = RegEnumValue ( hKey, // Key handle returned from RegOpenKeyEx. dwLBIndex, // Value index, taken from listbox. ValueName, // Name of value. &cbValueName,// Size of value name. NULL, // Reserved, dword = NULL. &dwType, // Type of data. bData, // Data buffer. &cbData); // Size of data buffer. if (retCode == ERROR_SUCCESS) { if (dwType == REG_DWORD && strcmp("PortNumber",ValueName)==0) value = *(UINT *)bData; dwLBIndex ++; dwcClassLen = MAX_PATH; cbData = dwcMaxValueData+1; cbValueName = MAX_VALUE_NAME; } } } HeapFree (hHeap, 0, bData); RegCloseKey (hKey); } HeapDestroy (hHeap); return value; } void setkeyint (LPCTSTR lpValueName, LPCTSTR lpValueName2,DWORD value) { HKEY hKey; DWORD retCode; retCode = RegOpenKeyEx (HKEY_CURRENT_USER, // Key handle at root level. // "HKEY_CURRENT_USER\\Software\\WBC\\Httpd\\Server\\", // Path name of child key. // "Software\\WBC\\Httpd\\Server", // Path name of child key. lpValueName, 0, // Reserved. KEY_EXECUTE, // Requesting read access. &hKey); // Address of key to be returned. if (retCode == ERROR_SUCCESS) { DWORD val; val = value; RegSetValueEx( hKey, // handle to key lpValueName2, // value name (DWORD) 0, // reserved REG_DWORD, // value type (BYTE *) (& val), // value data sizeof(DWORD) // size of value data ); RegCloseKey (hKey); } } char * getkeystr (LPCTSTR lpValueName, char * value) { HKEY hKey; DWORD retCode; HANDLE hHeap; hHeap = HeapCreate (0, 0, 0); retCode = RegOpenKeyEx (HKEY_CURRENT_USER, // Key handle at root level. // "HKEY_CURRENT_USER\\Software\\WBC\\Httpd\\Server\\", // Path name of child key. // "Software\\WBC\\Httpd\\Server", // Path name of child key. lpValueName, 0, // Reserved. KEY_EXECUTE, // Requesting read access. &hKey); // Address of key to be returned. if (retCode == ERROR_SUCCESS) { DWORD dwLBIndex = 0; // CHAR Buf[LINE_LEN]; CHAR ValueName[MAX_VALUE_NAME]; DWORD cbValueName = MAX_VALUE_NAME; DWORD dwType; DWORD retCode; // CHAR lpBuffer[128]; // CHAR lpBuffer2[128]; CHAR ClassName[MAX_PATH]; DWORD dwcClassLen = MAX_PATH; DWORD dwcSubKeys; DWORD dwcMaxSubKey; DWORD dwcMaxClass; DWORD dwcValues; DWORD dwcMaxValueName; DWORD dwcMaxValueData; DWORD dwcSecDesc; FILETIME ftLastWriteTime; BYTE *bData; DWORD cbData; retCode = RegQueryInfoKey ( hKey, // Key handle. ClassName, // Buffer for class name. &dwcClassLen, // Length of class string. NULL, // Reserved. &dwcSubKeys, // Number of sub keys. &dwcMaxSubKey, // Longest sub key size. &dwcMaxClass, // Longest class string. &dwcValues, // Number of values for this key. &dwcMaxValueName, // Longest Value name. &dwcMaxValueData, // Longest Value data. &dwcSecDesc, // Security descriptor. &ftLastWriteTime); // Last write time. if (retCode== ERROR_SUCCESS) { bData = (unsigned char *) HeapAlloc (hHeap, 0, dwcMaxValueData+1); cbData = dwcMaxValueData+1; while (retCode==ERROR_SUCCESS) { retCode = RegEnumValue ( hKey, // Key handle returned from RegOpenKeyEx. dwLBIndex, // Value index, taken from listbox. ValueName, // Name of value. &cbValueName,// Size of value name. NULL, // Reserved, dword = NULL. &dwType, // Type of data. bData, // Data buffer. &cbData); // Size of data buffer. if (retCode == ERROR_SUCCESS) { if (dwType == REG_SZ && strcmp("CodeWebcam",ValueName)==0) { strncpy(value,(char *)bData,14); HeapFree (hHeap, 0, bData); RegCloseKey (hKey); HeapDestroy (hHeap); return value; } dwLBIndex ++; dwcClassLen = MAX_PATH; cbData = dwcMaxValueData+1; cbValueName = MAX_VALUE_NAME; } } } HeapFree (hHeap, 0, bData); RegCloseKey (hKey); } HeapDestroy (hHeap); return value; } void setkeystr (LPCTSTR lpValueName, LPCTSTR lpValueName2,char * value) { HKEY hKey; DWORD retCode; retCode = RegOpenKeyEx (HKEY_CURRENT_USER, // Key handle at root level. // "HKEY_CURRENT_USER\\Software\\WBC\\Httpd\\Server\\", // Path name of child key. // "Software\\WBC\\Httpd\\Server", // Path name of child key. lpValueName, 0, // Reserved. KEY_EXECUTE, // Requesting read access. &hKey); // Address of key to be returned. if (retCode == ERROR_SUCCESS) { RegSetValueEx( hKey, // handle to key lpValueName2, // value name (DWORD) 0, // reserved REG_SZ, // value type (BYTE *) ( value), // value data (DWORD) strlen (value) // size of value data ); RegCloseKey (hKey); } } void initCodeWebCam() { strncpy (CodeWebcam,getkeystr("Software\\WBC\\Httpd\\Server",(char *) CodeWebcam),14); CodeWebcam[14]=0; gwPort = getkeyint("Software\\WBC\\Httpd\\Server",80); } int FAR PASCAL ServeurWebProc(HWND hDlg, UINT Message, UINT wParam, LONG lParam) { switch (Message) { case WM_INITDIALOG : { // // On récupére la valeur courante dans le registre et on l'affiche ! // gwPort = getkeyint("Software\\WBC\\Httpd\\Server",80); strncpy (CodeWebcam,getkeystr("Software\\WBC\\Httpd\\Server",(char *) CodeWebcam),14); CodeWebcam[14]=0; SetDlgItemInt(hDlg, IDD_SERVEURPORT, gwPort, TRUE) ; SetDlgItemText(hDlg, IDD_CODEWEBCAM, CodeWebcam) ; return TRUE ; } case WM_COMMAND : switch (GET_WM_COMMAND_ID(wParam, lParam)) { case IDOK : { int iPort ; iPort = (int) GetDlgItemInt(hDlg, IDD_SERVEURPORT, NULL, TRUE) ; if (iPort <= 0 || iPort > 65535) { // You are asking for more than we have !! Sorry, ... SetDlgItemInt(hDlg, IDD_SERVEURPORT, iPort, TRUE) ; SetFocus(GetDlgItem(hDlg, IDD_SERVEURWEB)) ; MessageBeep(MB_ICONEXCLAMATION) ; return FALSE ; } gwPort = iPort ; GetDlgItemText(hDlg, IDD_CODEWEBCAM, CodeWebcam,15); CodeWebcam[14]=0; setkeyint("Software\\WBC\\Httpd\\Server","PortNumber",gwPort); setkeystr("Software\\WBC\\Httpd\\Server","CodeWebcam",CodeWebcam); EndDialog(hDlg, TRUE) ; return TRUE ; } case IDCANCEL : EndDialog(hDlg, FALSE) ; return TRUE ; case IDD_SERVEURPORT: { long l; BOOL bchanged; char achBuffer[21]; // check that entered size is a valid number GetDlgItemText(hDlg, IDD_SERVEURPORT, achBuffer, sizeof(achBuffer)); l = atol(achBuffer); bchanged = FALSE; if (l < 1) { l = 1; bchanged = TRUE; } else if (l > 65535) { l = 65535; bchanged = TRUE; } else { // make sure there are no non-digit chars // atol() will ignore trailing non-digit characters int c = 0; while (achBuffer[c]) { if (IsCharAlpha(achBuffer[c]) || !IsCharAlphaNumeric(achBuffer[c])) { // string contains non-digit chars - reset l = 1; bchanged = TRUE; break; } c++; } } if (bchanged) { wsprintf(achBuffer, "%ld", l); SetDlgItemText(hDlg, IDD_SERVEURPORT, achBuffer); } break; } case IDD_CODEWEBCAM: break; } break ; } return FALSE ; }