|  | /* | 
|  | *	common shell dialogs | 
|  | * | 
|  | * Copyright 2000 Juergen Schmied | 
|  | * | 
|  | * This library is free software; you can redistribute it and/or | 
|  | * modify it under the terms of the GNU Lesser General Public | 
|  | * License as published by the Free Software Foundation; either | 
|  | * version 2.1 of the License, or (at your option) any later version. | 
|  | * | 
|  | * This library is distributed in the hope that it will be useful, | 
|  | * but WITHOUT ANY WARRANTY; without even the implied warranty of | 
|  | * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU | 
|  | * Lesser General Public License for more details. | 
|  | * | 
|  | * You should have received a copy of the GNU Lesser General Public | 
|  | * License along with this library; if not, write to the Free Software | 
|  | * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA | 
|  | */ | 
|  |  | 
|  | #include "config.h" | 
|  | #include "wine/port.h" | 
|  |  | 
|  | #include <string.h> | 
|  | #include <stdio.h> | 
|  | #include "winerror.h" | 
|  | #include "winreg.h" | 
|  | #include "commdlg.h" | 
|  | #include "wine/debug.h" | 
|  |  | 
|  | #include "shellapi.h" | 
|  | #include "shlobj.h" | 
|  | #include "shell32_main.h" | 
|  | #include "undocshell.h" | 
|  |  | 
|  | typedef struct | 
|  | { | 
|  | HWND hwndOwner ; | 
|  | HICON hIcon ; | 
|  | LPCSTR lpstrDirectory ; | 
|  | LPCSTR lpstrTitle ; | 
|  | LPCSTR lpstrDescription ; | 
|  | UINT uFlags ; | 
|  | } RUNFILEDLGPARAMS ; | 
|  |  | 
|  | typedef BOOL (*LPFNOFN) (OPENFILENAMEA *) ; | 
|  |  | 
|  | WINE_DEFAULT_DEBUG_CHANNEL(shell); | 
|  | INT_PTR CALLBACK RunDlgProc (HWND, UINT, WPARAM, LPARAM) ; | 
|  | void FillList (HWND, char *) ; | 
|  |  | 
|  |  | 
|  | /************************************************************************* | 
|  | * PickIconDlg					[SHELL32.62] | 
|  | * | 
|  | */ | 
|  | BOOL WINAPI PickIconDlg( | 
|  | HWND hwndOwner, | 
|  | LPSTR lpstrFile, | 
|  | DWORD nMaxFile, | 
|  | LPDWORD lpdwIconIndex) | 
|  | { | 
|  | FIXME("(%p,%s,%08lx,%p):stub.\n", | 
|  | hwndOwner, lpstrFile, nMaxFile,lpdwIconIndex); | 
|  | return 0xffffffff; | 
|  | } | 
|  |  | 
|  | /************************************************************************* | 
|  | * RunFileDlg					[SHELL32.61] | 
|  | * | 
|  | * NOTES | 
|  | *     Original name: RunFileDlg (exported by ordinal) | 
|  | */ | 
|  | void WINAPI RunFileDlg( | 
|  | HWND hwndOwner, | 
|  | HICON hIcon, | 
|  | LPCSTR lpstrDirectory, | 
|  | LPCSTR lpstrTitle, | 
|  | LPCSTR lpstrDescription, | 
|  | UINT uFlags) | 
|  | { | 
|  |  | 
|  | RUNFILEDLGPARAMS rfdp; | 
|  | HRSRC hRes; | 
|  | LPVOID template; | 
|  | TRACE("\n"); | 
|  |  | 
|  | rfdp.hwndOwner        = hwndOwner; | 
|  | rfdp.hIcon            = hIcon; | 
|  | rfdp.lpstrDirectory   = lpstrDirectory; | 
|  | rfdp.lpstrTitle       = lpstrTitle; | 
|  | rfdp.lpstrDescription = lpstrDescription; | 
|  | rfdp.uFlags           = uFlags; | 
|  |  | 
|  | if(!(hRes = FindResourceA(shell32_hInstance, "SHELL_RUN_DLG", RT_DIALOGA))) | 
|  | { | 
|  | MessageBoxA (hwndOwner, "Couldn't find dialog.", "Nix", MB_OK) ; | 
|  | return; | 
|  | } | 
|  | if(!(template = (LPVOID)LoadResource(shell32_hInstance, hRes))) | 
|  | { | 
|  | MessageBoxA (hwndOwner, "Couldn't load dialog.", "Nix", MB_OK) ; | 
|  | return; | 
|  | } | 
|  |  | 
|  | DialogBoxIndirectParamA((HINSTANCE)GetWindowLongA( hwndOwner, | 
|  | GWL_HINSTANCE ), | 
|  | template, hwndOwner, RunDlgProc, (LPARAM)&rfdp); | 
|  |  | 
|  | } | 
|  |  | 
|  | /* Dialog procedure for RunFileDlg */ | 
|  | INT_PTR CALLBACK RunDlgProc (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam) | 
|  | { | 
|  | int ic ; | 
|  | char *psz, szMsg[256] ; | 
|  | static RUNFILEDLGPARAMS *prfdp = NULL ; | 
|  |  | 
|  | switch (message) | 
|  | { | 
|  | case WM_INITDIALOG : | 
|  | prfdp = (RUNFILEDLGPARAMS *)lParam ; | 
|  | SetWindowTextA (hwnd, prfdp->lpstrTitle) ; | 
|  | SetClassLongA (hwnd, GCL_HICON, (LPARAM)prfdp->hIcon) ; | 
|  | SendMessageA (GetDlgItem (hwnd, 12297), STM_SETICON, (WPARAM)LoadIconA (NULL, IDI_WINLOGOA), 0) ; | 
|  | FillList (GetDlgItem (hwnd, 12298), NULL) ; | 
|  | SetFocus (GetDlgItem (hwnd, 12298)) ; | 
|  | return TRUE ; | 
|  |  | 
|  | case WM_COMMAND : | 
|  | { | 
|  | STARTUPINFOA si ; | 
|  | PROCESS_INFORMATION pi ; | 
|  |  | 
|  | si.cb = sizeof (STARTUPINFOA) ; | 
|  | si.lpReserved = NULL ; | 
|  | si.lpDesktop = NULL ; | 
|  | si.lpTitle = NULL ; | 
|  | si.dwX = 0 ; | 
|  | si.dwY = 0 ; | 
|  | si.dwXSize = 0 ; | 
|  | si.dwYSize = 0 ; | 
|  | si.dwXCountChars = 0 ; | 
|  | si.dwYCountChars = 0 ; | 
|  | si.dwFillAttribute = 0 ; | 
|  | si.dwFlags = 0 ; | 
|  | si.cbReserved2 = 0 ; | 
|  | si.lpReserved2 = NULL ; | 
|  |  | 
|  | switch (LOWORD (wParam)) | 
|  | { | 
|  | case IDOK : | 
|  | { | 
|  | HWND htxt = NULL ; | 
|  | if ((ic = GetWindowTextLengthA (htxt = GetDlgItem (hwnd, 12298)))) | 
|  | { | 
|  | psz = malloc (ic + 2) ; | 
|  | GetWindowTextA (htxt, psz, ic + 1) ; | 
|  |  | 
|  | if (!CreateProcessA (NULL, psz, NULL, NULL, TRUE, | 
|  | NORMAL_PRIORITY_CLASS, NULL, NULL, &si, &pi)) | 
|  | { | 
|  | char *pszSysMsg = NULL ; | 
|  | FormatMessageA ( | 
|  | FORMAT_MESSAGE_ALLOCATE_BUFFER | | 
|  | FORMAT_MESSAGE_FROM_SYSTEM | | 
|  | FORMAT_MESSAGE_IGNORE_INSERTS, | 
|  | NULL, GetLastError (), | 
|  | MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), | 
|  | (LPSTR)&pszSysMsg, 0, NULL | 
|  | ) ; | 
|  | sprintf (szMsg, "Error: %s", pszSysMsg) ; | 
|  | LocalFree ((HLOCAL)pszSysMsg) ; | 
|  | MessageBoxA (hwnd, szMsg, "Nix", MB_OK | MB_ICONEXCLAMATION) ; | 
|  |  | 
|  | free (psz) ; | 
|  | SendMessageA (htxt, CB_SETEDITSEL, 0, MAKELPARAM (0, -1)) ; | 
|  | return TRUE ; | 
|  | } | 
|  | FillList (htxt, psz) ; | 
|  | free (psz) ; | 
|  | EndDialog (hwnd, 0) ; | 
|  | } | 
|  | } | 
|  |  | 
|  | case IDCANCEL : | 
|  | EndDialog (hwnd, 0) ; | 
|  | return TRUE ; | 
|  |  | 
|  | case 12288 : | 
|  | { | 
|  | HMODULE hComdlg = NULL ; | 
|  | LPFNOFN ofnProc = NULL ; | 
|  | static char szFName[1024] = "", szFileTitle[256] = "", szInitDir[768] = "" ; | 
|  | static OPENFILENAMEA ofn = | 
|  | { | 
|  | sizeof (OPENFILENAMEA), | 
|  | NULL, | 
|  | NULL, | 
|  | "Executable Files\0*.exe\0All Files\0*.*\0\0\0\0", | 
|  | NULL, | 
|  | 0, | 
|  | 0, | 
|  | szFName, | 
|  | 1023, | 
|  | szFileTitle, | 
|  | 255, | 
|  | (LPCSTR)szInitDir, | 
|  | "Browse", | 
|  | OFN_ENABLESIZING | OFN_FILEMUSTEXIST | OFN_HIDEREADONLY | OFN_PATHMUSTEXIST, | 
|  | 0, | 
|  | 0, | 
|  | NULL, | 
|  | 0, | 
|  | (LPOFNHOOKPROC)NULL, | 
|  | NULL | 
|  | } ; | 
|  |  | 
|  | ofn.hwndOwner = hwnd ; | 
|  |  | 
|  | if (NULL == (hComdlg = LoadLibraryExA ("comdlg32", NULL, 0))) | 
|  | { | 
|  | MessageBoxA (hwnd, "Unable to display dialog box (LoadLibraryEx) !", "Nix", MB_OK | MB_ICONEXCLAMATION) ; | 
|  | return TRUE ; | 
|  | } | 
|  |  | 
|  | if ((LPFNOFN)NULL == (ofnProc = (LPFNOFN)GetProcAddress (hComdlg, "GetOpenFileNameA"))) | 
|  | { | 
|  | MessageBoxA (hwnd, "Unable to display dialog box (GetProcAddress) !", "Nix", MB_OK | MB_ICONEXCLAMATION) ; | 
|  | return TRUE ; | 
|  | } | 
|  |  | 
|  | ofnProc (&ofn) ; | 
|  |  | 
|  | SetFocus (GetDlgItem (hwnd, IDOK)) ; | 
|  | SetWindowTextA (GetDlgItem (hwnd, 12298), szFName) ; | 
|  | SendMessageA (GetDlgItem (hwnd, 12298), CB_SETEDITSEL, 0, MAKELPARAM (0, -1)) ; | 
|  | SetFocus (GetDlgItem (hwnd, IDOK)) ; | 
|  |  | 
|  | FreeLibrary (hComdlg) ; | 
|  |  | 
|  | return TRUE ; | 
|  | } | 
|  | } | 
|  | return TRUE ; | 
|  | } | 
|  | } | 
|  | return FALSE ; | 
|  | } | 
|  |  | 
|  | /* This grabs the MRU list from the registry and fills the combo for the "Run" dialog above */ | 
|  | void FillList (HWND hCb, char *pszLatest) | 
|  | { | 
|  | HKEY hkey ; | 
|  | /*    char szDbgMsg[256] = "" ; */ | 
|  | char *pszList = NULL, *pszCmd = NULL, cMatch = 0, cMax = 0x60, szIndex[2] = "-" ; | 
|  | DWORD icList = 0, icCmd = 0 ; | 
|  | UINT Nix ; | 
|  |  | 
|  | SendMessageA (hCb, CB_RESETCONTENT, 0, 0) ; | 
|  |  | 
|  | if (ERROR_SUCCESS != RegCreateKeyExA ( | 
|  | HKEY_CURRENT_USER, "Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\RunMRU", | 
|  | 0, "", REG_OPTION_NON_VOLATILE, KEY_ALL_ACCESS, NULL, &hkey, NULL)) | 
|  | MessageBoxA (hCb, "Unable to open registry key !", "Nix", MB_OK) ; | 
|  |  | 
|  | RegQueryValueExA (hkey, "MRUList", NULL, NULL, NULL, &icList) ; | 
|  |  | 
|  | if (icList > 0) | 
|  | { | 
|  | pszList = malloc (icList) ; | 
|  | if (ERROR_SUCCESS != RegQueryValueExA (hkey, "MRUList", NULL, NULL, pszList, &icList)) | 
|  | MessageBoxA (hCb, "Unable to grab MRUList !", "Nix", MB_OK) ; | 
|  | } | 
|  | else | 
|  | { | 
|  | pszList = malloc (icList = 1) ; | 
|  | pszList[0] = 0 ; | 
|  | } | 
|  |  | 
|  | for (Nix = 0 ; Nix < icList - 1 ; Nix++) | 
|  | { | 
|  | if (pszList[Nix] > cMax) | 
|  | cMax = pszList[Nix] ; | 
|  |  | 
|  | szIndex[0] = pszList[Nix] ; | 
|  |  | 
|  | if (ERROR_SUCCESS != RegQueryValueExA (hkey, szIndex, NULL, NULL, NULL, &icCmd)) | 
|  | MessageBoxA (hCb, "Unable to grab size of index", "Nix", MB_OK) ; | 
|  | pszCmd = realloc (pszCmd, icCmd) ; | 
|  | if (ERROR_SUCCESS != RegQueryValueExA (hkey, szIndex, NULL, NULL, pszCmd, &icCmd)) | 
|  | MessageBoxA (hCb, "Unable to grab index", "Nix", MB_OK) ; | 
|  |  | 
|  | if (NULL != pszLatest) | 
|  | { | 
|  | if (!strcasecmp (pszCmd, pszLatest)) | 
|  | { | 
|  | /* | 
|  | sprintf (szDbgMsg, "Found existing (%d).\n", Nix) ; | 
|  | MessageBoxA (hCb, szDbgMsg, "Nix", MB_OK) ; | 
|  | */ | 
|  | SendMessageA (hCb, CB_INSERTSTRING, 0, (LPARAM)pszCmd) ; | 
|  | SetWindowTextA (hCb, pszCmd) ; | 
|  | SendMessageA (hCb, CB_SETEDITSEL, 0, MAKELPARAM (0, -1)) ; | 
|  |  | 
|  | cMatch = pszList[Nix] ; | 
|  | memmove (&pszList[1], pszList, Nix) ; | 
|  | pszList[0] = cMatch ; | 
|  | continue ; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (26 != icList - 1 || icList - 2 != Nix || cMatch || NULL == pszLatest) | 
|  | { | 
|  | /* | 
|  | sprintf (szDbgMsg, "Happily appending (%d).\n", Nix) ; | 
|  | MessageBoxA (hCb, szDbgMsg, "Nix", MB_OK) ; | 
|  | */ | 
|  | SendMessageA (hCb, CB_ADDSTRING, 0, (LPARAM)pszCmd) ; | 
|  | if (!Nix) | 
|  | { | 
|  | SetWindowTextA (hCb, pszCmd) ; | 
|  | SendMessageA (hCb, CB_SETEDITSEL, 0, MAKELPARAM (0, -1)) ; | 
|  | } | 
|  |  | 
|  | } | 
|  | else | 
|  | { | 
|  | /* | 
|  | sprintf (szDbgMsg, "Doing loop thing.\n") ; | 
|  | MessageBoxA (hCb, szDbgMsg, "Nix", MB_OK) ; | 
|  | */ | 
|  | SendMessageA (hCb, CB_INSERTSTRING, 0, (LPARAM)pszLatest) ; | 
|  | SetWindowTextA (hCb, pszLatest) ; | 
|  | SendMessageA (hCb, CB_SETEDITSEL, 0, MAKELPARAM (0, -1)) ; | 
|  |  | 
|  | cMatch = pszList[Nix] ; | 
|  | memmove (&pszList[1], pszList, Nix) ; | 
|  | pszList[0] = cMatch ; | 
|  | szIndex[0] = cMatch ; | 
|  | RegSetValueExA (hkey, szIndex, 0, REG_SZ, pszLatest, strlen (pszLatest) + 1) ; | 
|  | } | 
|  | } | 
|  |  | 
|  | if (!cMatch && NULL != pszLatest) | 
|  | { | 
|  | /* | 
|  | sprintf (szDbgMsg, "Simply inserting (increasing list).\n") ; | 
|  | MessageBoxA (hCb, szDbgMsg, "Nix", MB_OK) ; | 
|  | */ | 
|  | SendMessageA (hCb, CB_INSERTSTRING, 0, (LPARAM)pszLatest) ; | 
|  | SetWindowTextA (hCb, pszLatest) ; | 
|  | SendMessageA (hCb, CB_SETEDITSEL, 0, MAKELPARAM (0, -1)) ; | 
|  |  | 
|  | cMatch = ++cMax ; | 
|  | pszList = realloc (pszList, ++icList) ; | 
|  | memmove (&pszList[1], pszList, icList - 1) ; | 
|  | pszList[0] = cMatch ; | 
|  | szIndex[0] = cMatch ; | 
|  | RegSetValueExA (hkey, szIndex, 0, REG_SZ, pszLatest, strlen (pszLatest) + 1) ; | 
|  | } | 
|  |  | 
|  | RegSetValueExA (hkey, "MRUList", 0, REG_SZ, pszList, strlen (pszList) + 1) ; | 
|  |  | 
|  | free (pszCmd) ; | 
|  | free (pszList) ; | 
|  | } | 
|  |  | 
|  | /************************************************************************* | 
|  | * ExitWindowsDialog				[SHELL32.60] | 
|  | * | 
|  | * NOTES | 
|  | *     exported by ordinal | 
|  | */ | 
|  | void WINAPI ExitWindowsDialog (HWND hWndOwner) | 
|  | { | 
|  | TRACE("(%p)\n", hWndOwner); | 
|  | if (MessageBoxA( hWndOwner, "Do you want to exit WINE?", "Shutdown", MB_YESNO|MB_ICONQUESTION) == IDYES) | 
|  | { | 
|  | SendMessageA ( hWndOwner, WM_QUIT, 0, 0); | 
|  | } | 
|  | } |