/* $Id: ordinal_odin.cpp,v 1.6 2002-06-07 08:02:17 sandervl Exp $ */ /* * Win32 Lightweight SHELL32 for OS/2 * * Copyright 2000 Patrick Haller (phaller@gmx.net) * Project Odin Software License can be found in LICENSE.TXT * * Ordinally Exported Functions * */ /***************************************************************************** * Remark * ***************************************************************************** */ /***************************************************************************** * Includes * *****************************************************************************/ #include #include #include #include #include #include #ifndef __GNUC__ #include #endif #define HAVE_WCTYPE_H #include "debugtools.h" #include #include #include #include #include #include #include #define CINTERFACE #include "winerror.h" #include "winnls.h" #include "winversion.h" #include "heap.h" #include "win/wine/obj_base.h" #include "shellapi.h" #include "shlobj.h" #include "shlwapi.h" #include "shlwapi_odin.h" /***************************************************************************** * Local Variables * *****************************************************************************/ /***************************************************************************** * Name : ??? * Purpose : Looks like a strdup() * Parameters: Unknown (wrong) * Variables : * Result : Unknown * Remark : * Status : UNTESTED STUB * * Author : Patrick Haller [Sun, 2000/06/09 04:47] *****************************************************************************/ DWORD WIN32API SHLWAPI_12(DWORD arg0, DWORD arg1) { dprintf(("not implemented, explorer.exe will trap now")); return 0; } /***************************************************************************** * Name : ??? * Purpose : Unknown (used by explorer.exe) * Parameters: Unknown (wrong) * Variables : * Result : Unknown * Remark : * Status : UNTESTED STUB * * Author : Patrick Haller [Sun, 2000/06/09 04:47] *****************************************************************************/ DWORD WIN32API SHLWAPI_17(DWORD arg0, DWORD arg1) { dprintf(("not implemented, explorer.exe will trap now")); return 0; } /***************************************************************************** * Name : ??? * Purpose : Unknown (used by explorer.exe) * Parameters: Unknown (wrong) * Variables : * Result : Unknown * Remark : * Status : UNTESTED STUB * * Author : Patrick Haller [Sun, 2000/06/09 04:47] *****************************************************************************/ DWORD WIN32API SHLWAPI_20(DWORD arg0, DWORD arg1) { dprintf(("not implemented, explorer.exe will trap now")); return 0; } /***************************************************************************** * Name : DWORD SHLWAPI_160 * Purpose : * Parameters: * Variables : * Result : * Remark : SHLWAPI.160 * Status : UNTESTED STUB * * Author : Patrick Haller [Sun, 2000/06/10 04:02] *****************************************************************************/ DWORD WIN32API SHLWAPI_160(DWORD arg0, DWORD arg1) { dprintf(("not implemented.\n")); return 0; } /***************************************************************************** * Name : SHLWAPI_185 * Purpose : some M$ nag screen ? * Parameters: * Variables : * Result : * Remark : SHLWAPI.185 * Status : COMPLETELY IMPLEMENTED UNTESTED * * Author : Patrick Haller [Sun, 2000/06/10 04:02] *****************************************************************************/ DWORD WIN32API SHLWAPI_185(DWORD arg0, LPSTR lpStr1, LPSTR lpStr2, DWORD arg3, DWORD dwDefault, LPSTR lpstrValueName) { BOOL fDontShow; WCHAR szValueNameW[256]; fDontShow = SHRegGetBoolUSValueA("Software\\Microsoft\\Windows\\CurrentVersion\\" "Explorer\\DontShowMeThisDialogAgain", lpstrValueName, 0, 1); if (fDontShow == FALSE) return dwDefault; int iLength1 = lstrlenA(lpStr1)+1; HLOCAL hLocal1 = LocalAlloc(LMEM_ZEROINIT, iLength1 << 1); if (hLocal1 == NULL) return dwDefault; int iLength2 = lstrlenA(lpStr2)+1; HLOCAL hLocal2 = LocalAlloc(LMEM_ZEROINIT, iLength2 << 1); if (hLocal2 == NULL) { LocalFree(hLocal1); return dwDefault; } #if 0 // convert all ascii values to Unicode SHLWAPI_215(lpStr1, (LPWSTR)hLocal1, iLength1); SHLWAPI_215(lpStr2, (LPWSTR)hLocal2, iLength2); SHLWAPI_215(lpstrValueName, szValueNameW, 256); // do something dwDefault = SHLWAPI_191(arg0, (LPWSTR)hLocal1, arg3, dwDefault, szValueNameW); #endif if (hLocal1) LocalFree(hLocal1); if (hLocal2) LocalFree(hLocal2); return dwDefault; } /***************************************************************************** * Name : SHLWAPI_191 * Purpose : display some M$ nag screen if enabled * Parameters: * Variables : * Result : * Remark : SHLWAPI.191 * Status : COMPLETELY IMPLEMENTED ? UNTESTED * * Author : Patrick Haller [Sun, 2000/06/10 04:02] *****************************************************************************/ DWORD WIN32API SHLWAPI_191(HWND hwndParent, DWORD arg1, DWORD arg2, DWORD arg3, DWORD dwDefault, LPWSTR lpstrDialog) { BOOL rc = SHRegGetBoolUSValueW((LPCWSTR)L"Software\\Microsoft\\Windows\\CurrentVersion" L"\\Explorer\\DontShowMeThisDialogAgain", lpstrDialog, 0, 1); if (rc == FALSE) return dwDefault; static HINSTANCE hShellInstance; // @@@PH where to put / initialize? #if 0 struct { DWORD s1; DWORD s2; DWORD s3; DWORD s4; } sInit; sInit.s1 = "software..."; sInit.s2 = arg1; sInit.s3 = arg2; sInit.s4 = arg3; return DialogBoxParamW(hShellInstance, 0x1200, // some template hwndParent, i_DialogProc, &sInit); #endif return dwDefault; } /***************************************************************************** * Name : BOOL SHLWAPI_197 * Purpose : Set text background? * Parameters: * Variables : * Result : * Remark : SHLWAPI.197 * Status : COMPLETELY IMPLEMENTED ? UNTESTED * * Author : Patrick Haller [Sun, 2000/06/10 04:02] *****************************************************************************/ BOOL WIN32API SHLWAPI_197(HDC hdc, CONST RECT*lprc, COLORREF crColor) { COLORREF crOld; BOOL res; crOld = SetBkColor(hdc, crColor); res = ExtTextOutA(hdc, 0, 0, ETO_OPAQUE, lprc, 0, 0, 0); SetBkColor(hdc, crOld); return res; } /***************************************************************************** * Name : SHLWAPI_243 * Purpose : does something critical, even with performance counters * Parameters: * Variables : * Result : * Remark : SHLWAPI.243 * Status : STUB UNTESTED * * Author : Patrick Haller [Sun, 2000/06/10 04:02] *****************************************************************************/ DWORD WIN32API SHLWAPI_243(DWORD arg0, DWORD arg1, DWORD arg2, DWORD arg3, DWORD arg4) { dprintf(("not implementes.\n")); return 0; } /***************************************************************************** * Name : DWORD SHLWAPI_437 * Purpose : Determine product version and options * Parameters: * Variables : * Result : * Remark : SHLWAPI.437 * Status : UNTESTED * * Author : Patrick Haller [Sun, 2000/06/10 04:02] *****************************************************************************/ #define REG_PRODUCTOPTIONS "System\\CurrentControlSet\\Control\\ProductOptions" #define REG_OPTIONS_PRODUCTTYPE "ProductType" #define REG_OPTIONS_ENTERPRISE "Enterprise" #define REG_OPTIONS_DATACENTER "DataCenter" DWORD WIN32API SHLWAPI_437(DWORD nFunction) { static BOOL flagProductOptionsInitialized = FALSE; static BOOL flagIsProductEnterprise = FALSE; static BOOL flagIsProductDatacenter = FALSE; static OSVERSIONINFOA osVersionInfo; HKEY hKeyOptions; DWORD dwKeyType; char szBuffer[260]; // MAX_PATH_LEN DWORD dwDataLength; dprintf(("not (properly) implemented.\n")); if (flagProductOptionsInitialized == FALSE) { // set to TRUE regardless of subsequent errors flagProductOptionsInitialized = TRUE; // initialize required structures osVersionInfo.dwOSVersionInfoSize = 0x9c; if (GetVersionExA(&osVersionInfo) == FALSE) { osVersionInfo.dwOSVersionInfoSize = 0x94; GetVersionExA(&osVersionInfo); } LONG rc = RegOpenKeyExA(HKEY_LOCAL_MACHINE, REG_PRODUCTOPTIONS, 0, KEY_READ, &hKeyOptions); if (rc == ERROR_SUCCESS) { dwDataLength = sizeof(szBuffer); rc = RegQueryValueExA(hKeyOptions, REG_OPTIONS_PRODUCTTYPE, 0, &dwKeyType, (LPBYTE)szBuffer, &dwDataLength); if (StrStrIA(szBuffer, REG_OPTIONS_ENTERPRISE) != 0) flagIsProductEnterprise = TRUE; else if (StrStrIA(szBuffer, REG_OPTIONS_DATACENTER) != 0) flagIsProductDatacenter = TRUE; RegCloseKey(hKeyOptions); } } // OK, now to the usual work ... switch (nFunction) { // is platform WINDOWS case 0: if (osVersionInfo.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS) return 1; else return 0; // is platform NT case 1: if (osVersionInfo.dwPlatformId == VER_PLATFORM_WIN32_NT) return 1; else return 0; // is platform Windows 95/98/xx ? case 2: if (osVersionInfo.dwPlatformId != VER_PLATFORM_WIN32_WINDOWS) return 0; if (osVersionInfo.dwMajorVersion >= 4) return 1; else return 0; // is platform NT4 or better? case 3: if (osVersionInfo.dwPlatformId != VER_PLATFORM_WIN32_NT) return 0; if (osVersionInfo.dwMajorVersion >= 4) return 1; else return 0; // is platform Win2000 or better? case 4: if (osVersionInfo.dwPlatformId != VER_PLATFORM_WIN32_NT) return 0; if (osVersionInfo.dwMajorVersion >= 5) return 1; else return 0; // at least Windows 4.10 ? case 5: if (osVersionInfo.dwPlatformId != VER_PLATFORM_WIN32_WINDOWS) return 0; if (osVersionInfo.dwMajorVersion > 4) return 1; else if (osVersionInfo.dwMajorVersion == 4) if (osVersionInfo.dwMinorVersion >= 10) return 1; return 0; // is platform Windows98 GA ? case 6: if ( (osVersionInfo.dwPlatformId == VER_PLATFORM_WIN32_WINDOWS) && (osVersionInfo.dwMajorVersion == 4) && (osVersionInfo.dwMinorVersion == 10) && (osVersionInfo.dwBuildNumber == 1998) ) // 0x7ce return 1; else return 0; // is platform some specific CSD ? case 7: case 8: //@@@PH incorrect if (osVersionInfo.dwMajorVersion >= 5) return 1; else return 0; case 9: //@@@PH incorrect if (osVersionInfo.dwMajorVersion >= 5 || flagIsProductEnterprise || flagIsProductDatacenter) return 1; else return 0; case 10: //@@@PH incorrect if (osVersionInfo.dwMajorVersion >= 5) return flagIsProductEnterprise; else return 0; case 11: //@@@PH incorrect if (osVersionInfo.dwMajorVersion >= 5) return flagIsProductDatacenter; else return 0; // @@@PH: Oops, wazzup there ? case 12: return GetSystemMetrics(4096); } return 0; }