appcompat.c File Reference

#include "precomp.h"
#include <winreg.h>
#include <winver.h>
#include <commctrl.h>
#include <shlwapi_undoc.h>

Include dependency graph for appcompat.c:

Go to the source code of this file.

Classes
struct	tagFLAGMAP
struct	tagAPPCOMPATINFO
struct	tagWNDCOMPATINFO
struct	tagAPPCOMPATENUM
struct	tagLANGANDCODEPAGE

Macros
#define	MAJOR_VER_ONLY   "\x01"
#define	PRODUCT_VER_ENGLISH_US_UTF16   "\\StringFileInfo\\040904E4\\ProductVersion"
#define	PRODUCT_VER_GERMAN_UTF16   "\\StringFileInfo\\040704E4\\ProductVersion"
#define	PRODUCT_VER_ENGLISH_US_WE   "\\StringFileInfo\\040904B0\\ProductVersion"
#define	PRODUCT_VER_ENGLISH_US_NEUTRAL   "\\StringFileInfo\\04090000\\ProductVersion"
#define	PRODUCT_VER_SWEDISH_WE   "\\StringFileInfo\\041D04B0\\ProductVersion"
#define	SHACF_TO_INIT

Typedefs
typedef struct tagFLAGMAP	FLAGMAP
typedef struct tagFLAGMAP *	PFLAGMAP
typedef struct tagAPPCOMPATINFO	APPCOMPATINFO
typedef struct tagAPPCOMPATINFO *	PAPPCOMPATINFO
typedef struct tagWNDCOMPATINFO	WNDCOMPATINFO
typedef struct tagWNDCOMPATINFO *	PWNDCOMPATINFO
typedef struct tagAPPCOMPATENUM	APPCOMPATENUM
typedef struct tagAPPCOMPATENUM *	PAPPCOMPATENUM
typedef struct tagLANGANDCODEPAGE	LANGANDCODEPAGE
typedef struct tagLANGANDCODEPAGE *	PLANGANDCODEPAGE

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (shell)
static DWORD	SHLWAPI_GetMappedFlags (_In_ HKEY hKey, _In_ const FLAGMAP *pEntries, _In_ UINT nEntries)
static BOOL CALLBACK	SHLWAPI_WndCompatEnumProc (_In_ HWND hWnd, _In_ LPARAM lParam)
static HRESULT	SHLWAPI_GetModuleVersion (_In_ PCSTR pszFileName, _Out_ PSTR *ppszDest)
static BOOL	SHLWAPI_DoesModuleVersionMatch (_In_ PCSTR pszFileName, _In_opt_ PCSTR pszVersionPattern)
static DWORD	SHLWAPI_GetRegistryCompatFlags (_In_ PCSTR pszPath)
static DWORD	SHLWAPI_InitAppCompat (VOID)
DWORD WINAPI	SHGetAppCompatFlags (_In_ DWORD dwMask)

Variables
static BOOL	g_fAppCompatInitialized = FALSE
static DWORD	g_dwAppCompatFlags = 0
static FLAGMAP	g_appCompatFlagMaps []
static APPCOMPATINFO	g_appCompatInfo []
static WNDCOMPATINFO	g_wndCompatInfo []

Macro Definition Documentation

MAJOR_VER_ONLY

#define MAJOR_VER_ONLY   "\x01"

Definition at line 64 of file appcompat.c.

PRODUCT_VER_ENGLISH_US_NEUTRAL

#define PRODUCT_VER_ENGLISH_US_NEUTRAL   "\\StringFileInfo\\04090000\\ProductVersion"

Definition at line 178 of file appcompat.c.

PRODUCT_VER_ENGLISH_US_UTF16

#define PRODUCT_VER_ENGLISH_US_UTF16   "\\StringFileInfo\\040904E4\\ProductVersion"

Definition at line 172 of file appcompat.c.

PRODUCT_VER_ENGLISH_US_WE

#define PRODUCT_VER_ENGLISH_US_WE   "\\StringFileInfo\\040904B0\\ProductVersion"

Definition at line 176 of file appcompat.c.

PRODUCT_VER_GERMAN_UTF16

#define PRODUCT_VER_GERMAN_UTF16   "\\StringFileInfo\\040704E4\\ProductVersion"

Definition at line 174 of file appcompat.c.

PRODUCT_VER_SWEDISH_WE

#define PRODUCT_VER_SWEDISH_WE   "\\StringFileInfo\\041D04B0\\ProductVersion"

Definition at line 180 of file appcompat.c.

SHACF_TO_INIT

#define SHACF_TO_INIT

Value:

    ( \
    SHACF_CONTEXTMENU | \
    SHACF_DOCOBJECT | \
    SHACF_CORELINTERNETENUM | \
    SHACF_MYCOMPUTERFIRST | \
    SHACF_OLDREGITEMGDN | \
    SHACF_LOADCOLUMNHANDLER | \
    SHACF_ANSI | \
    SHACF_WIN95SHLEXEC | \
    SHACF_STAROFFICE5PRINTER | \
    SHACF_NOVALIDATEFSIDS | \
    SHACF_FILEOPENNEEDSEXT | \
    SHACF_WIN95BINDTOOBJECT | \
    SHACF_IGNOREENUMRESET | \
    SHACF_ANSIDISPLAYNAMES | \
    SHACF_FILEOPENBOGUSCTRLID | \
    SHACF_FORCELFNIDLIST \
)

Definition at line 407 of file appcompat.c.

Typedef Documentation

APPCOMPATENUM

typedef struct tagAPPCOMPATENUM APPCOMPATENUM

APPCOMPATINFO

typedef struct tagAPPCOMPATINFO APPCOMPATINFO

FLAGMAP

typedef struct tagFLAGMAP FLAGMAP

LANGANDCODEPAGE

typedef struct tagLANGANDCODEPAGE LANGANDCODEPAGE

PAPPCOMPATENUM

typedef struct tagAPPCOMPATENUM * PAPPCOMPATENUM

PAPPCOMPATINFO

typedef struct tagAPPCOMPATINFO * PAPPCOMPATINFO

PFLAGMAP

typedef struct tagFLAGMAP * PFLAGMAP

PLANGANDCODEPAGE

typedef struct tagLANGANDCODEPAGE * PLANGANDCODEPAGE

PWNDCOMPATINFO

typedef struct tagWNDCOMPATINFO * PWNDCOMPATINFO

WNDCOMPATINFO

typedef struct tagWNDCOMPATINFO WNDCOMPATINFO

Function Documentation

SHGetAppCompatFlags()

DWORD WINAPI SHGetAppCompatFlags

(

_In_ DWORD

dwMask

)

Definition at line 433 of file appcompat.c.

{
    TRACE("(0x%lX)\n", dwMask);
 
    // Initialize and retrieve flags if necessary
    if (dwMask & SHACF_TO_INIT)
    {
        if (!g_fAppCompatInitialized)
        {
            DWORD dwAppCompatFlags = SHLWAPI_InitAppCompat();
            InterlockedExchange((PLONG)&g_dwAppCompatFlags, dwAppCompatFlags);
 
            g_fAppCompatInitialized = TRUE; // Mark as initialized
        }
    }
 
    // Retrieve additional flags if necessary
    DWORD dwAppCompatFlags = g_dwAppCompatFlags;
    if (dwAppCompatFlags && (dwMask & (SHACF_UNKNOWN1 | SHACF_UNKNOWN2)))
    {
        // Find the target window and its flags using g_wndCompatInfo
        APPCOMPATENUM data =
        {
            g_wndCompatInfo, _countof(g_wndCompatInfo), GetCurrentProcessId(), -1
        };
        EnumWindows(SHLWAPI_WndCompatEnumProc, (LPARAM)&data);
 
        // Add the target flags if a match is found
        if (data.iFound >= 0)
            dwAppCompatFlags |= g_wndCompatInfo[data.iFound].dwCompatFlags;
 
        dwAppCompatFlags |= SHACF_UNKNOWN3;
 
        InterlockedExchange((PLONG)&g_dwAppCompatFlags, dwAppCompatFlags);
    }
 
    return dwAppCompatFlags;
}

Referenced by ShellExecuteA(), and ShellExecuteW().

SHLWAPI_DoesModuleVersionMatch()

static BOOL SHLWAPI_DoesModuleVersionMatch ( _In_ PCSTR  pszFileName, _In_opt_ PCSTR  pszVersionPattern  )

static

Definition at line 250 of file appcompat.c.

{
    if (!pszVersionPattern)
        return TRUE;
 
    PSTR pszModuleVersion = NULL;
    HRESULT hr = SHLWAPI_GetModuleVersion(pszFileName, &pszModuleVersion);
    if (FAILED(hr))
        return FALSE;
 
    BOOL ret = FALSE;
    if (pszVersionPattern[0] == MAJOR_VER_ONLY[0]) // Special handling for major version only
    {
        // Truncate at comma (',') if present
        PSTR pchComma = StrChrA(pszModuleVersion, ',');
        if (pchComma)
            *pchComma = ANSI_NULL;
 
        // Truncate at dot ('.') if present
        PSTR pchDot = StrChrA(pszModuleVersion, '.');
        if (pchDot)
            *pchDot = ANSI_NULL;
 
        ret = (lstrcmpiA(pszModuleVersion, &pszVersionPattern[1]) == 0);
    }
    else // Otherwise, perform a normal match
    {
        PSTR pchAsterisk = StrChrA(pszVersionPattern, '*'); // Find an asterisk ('*')
        if (pchAsterisk) // Asterisk found
        {
            // Check for a match, ignoring the substring after '*'
            INT cchPrefix = (INT)(pchAsterisk - pszVersionPattern);
            if (cchPrefix > 0)
                ret = (StrCmpNIA(pszModuleVersion, pszVersionPattern, cchPrefix) == 0);
        }
 
        if (!ret)
            ret = (lstrcmpiA(pszModuleVersion, pszVersionPattern) == 0); // Full match
    }
 
    LocalFree(pszModuleVersion);
    return ret;
}

Referenced by SHLWAPI_GetRegistryCompatFlags(), and SHLWAPI_InitAppCompat().

SHLWAPI_GetMappedFlags()

static DWORD SHLWAPI_GetMappedFlags ( _In_ HKEY  hKey, _In_ const FLAGMAP *  pEntries, _In_ UINT  nEntries  )

static

Definition at line 52 of file appcompat.c.

{
    DWORD flags = 0;
    for (UINT iEntry = 0; iEntry < nEntries; ++iEntry)
    {
        DWORD error = SHGetValueA(hKey, NULL, pEntries[iEntry].name, NULL, NULL, NULL);
        if (error == ERROR_SUCCESS)
            flags |= pEntries[iEntry].flags;
    }
    return flags;
}

Referenced by SHLWAPI_GetRegistryCompatFlags().

SHLWAPI_GetModuleVersion()

static HRESULT SHLWAPI_GetModuleVersion ( _In_ PCSTR  pszFileName, _Out_ PSTR *  ppszDest  )

static

Definition at line 189 of file appcompat.c.

{
    DWORD dwHandle;
    PBYTE pbData;
    PVOID pvData;
 
    *ppszDest = NULL;
 
    // Obtain the version info
    UINT size = GetFileVersionInfoSizeA(pszFileName, &dwHandle);
    if (!size)
    {
        TRACE("No version info\n");
        return E_FAIL;
    }
    pbData = (PBYTE)LocalAlloc(LPTR, size);
    if (!pbData)
    {
        ERR("E_OUTOFMEMORY\n");
        return E_OUTOFMEMORY;
    }
    GetFileVersionInfoA(pszFileName, dwHandle, size, pbData);
 
    // Getting the product version
    HRESULT hr = E_FAIL;
    if ((VerQueryValueA(pbData, PRODUCT_VER_ENGLISH_US_UTF16,   &pvData, &size) ||
         VerQueryValueA(pbData, PRODUCT_VER_GERMAN_UTF16,       &pvData, &size) ||
         VerQueryValueA(pbData, PRODUCT_VER_ENGLISH_US_WE,      &pvData, &size) ||
         VerQueryValueA(pbData, PRODUCT_VER_ENGLISH_US_NEUTRAL, &pvData, &size) ||
         VerQueryValueA(pbData, PRODUCT_VER_SWEDISH_WE,         &pvData, &size)) && size)
    {
        // NOTE: *ppszDest must be freed using LocalFree later
        *ppszDest = StrDupA((PSTR)pvData);
        hr = *ppszDest ? S_OK : E_OUTOFMEMORY;
    }
    else if (VerQueryValueA(pbData, "\\VarFileInfo\\Translation", &pvData, &size))
    {
        PVOID pDataSaved = pvData;
        PLANGANDCODEPAGE pEntry = (PLANGANDCODEPAGE)pvData;
        for (; (PBYTE)pEntry + sizeof(LANGANDCODEPAGE) <= (PBYTE)pDataSaved + size; ++pEntry)
        {
            CHAR szPath[MAX_PATH];
            wnsprintfA(szPath, _countof(szPath), "\\StringFileInfo\\%04X%04X\\ProductVersion",
                       pEntry->wLanguage, pEntry->wCodePage);
            if (VerQueryValueA(pbData, szPath, &pvData, &size) && size)
            {
                // NOTE: *ppszDest must be freed using LocalFree later
                *ppszDest = StrDupA((PSTR)pvData);
                hr = *ppszDest ? S_OK : E_OUTOFMEMORY;
            }
        }
    }
 
    if (FAILED(hr))
        WARN("hr: 0x%lX\n", hr);
 
    LocalFree(pbData);
    return hr;
}

Referenced by SHLWAPI_DoesModuleVersionMatch().

SHLWAPI_GetRegistryCompatFlags()

static DWORD SHLWAPI_GetRegistryCompatFlags ( _In_ PCSTR  pszPath )

static

Definition at line 295 of file appcompat.c.

{
    // Build the path to the "application compatibility" registry key
    CHAR szText[MAX_PATH];
    wnsprintfA(szText, _countof(szText),
               "SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\ShellCompatibility\\Applications\\%s",
               PathFindFileNameA(pszPath));
 
    // Open the key
    HKEY hKey;
    const REGSAM samDesired = KEY_QUERY_VALUE | KEY_ENUMERATE_SUB_KEYS;
    LSTATUS error = RegOpenKeyExA(HKEY_LOCAL_MACHINE, szText, 0, samDesired, &hKey);
    if (error != ERROR_SUCCESS)
    {
        ERR("error: %lu\n", error);
        return 0; // Failed
    }
 
    // Build the base directory
    CHAR szBaseDir[MAX_PATH];
    lstrcpynA(szBaseDir, pszPath, _countof(szBaseDir));
    PathRemoveFileSpecA(szBaseDir);
 
    // Search from the registry key
    DWORD dwCompatFlags = 0;
    szText[0] = ANSI_NULL; // The first attempt is for the non-subkey path
    for (DWORD dwIndex = 0; error == ERROR_SUCCESS;)
    {
        HKEY hSubKey;
        error = RegOpenKeyExA(hKey, szText, 0, KEY_QUERY_VALUE, &hSubKey);
        if (error != ERROR_SUCCESS)
            break;
 
        // Get the "RequiredFile" value
        CHAR szRequired[MAX_PATH];
        DWORD cbData = sizeof(szRequired);
        error = SHGetValueA(hSubKey, NULL, "RequiredFile", NULL, szRequired, &cbData);
        BOOL bValueExists = (error == ERROR_SUCCESS);
        BOOL bRequiredFileExists = FALSE;
        if (bValueExists) // Does the "RequiredFile" value exist?
        {
            // Build required file path to szText
            PathCombineA(szText, szBaseDir, szRequired);
            TRACE("RequiredFile: %s\n", wine_dbgstr_a(szRequired));
            TRACE("szText: %s\n", wine_dbgstr_a(szText));
            // Now szText is a full path
            bRequiredFileExists = (GetFileAttributesA(szText) != INVALID_FILE_ATTRIBUTES);
        }
 
        // If the "RequiredFile" value doesn't exist, or the file specified by szText exists:
        if (!bValueExists || bRequiredFileExists)
        {
            // Check the "Version" value if necessary
            error = SHGetValueA(hSubKey, NULL, "Version", NULL, szText, &cbData);
            PCSTR pszVersionPattern = ((error == ERROR_SUCCESS) ? szText : NULL);
            TRACE("pszVersionPattern: %s\n", wine_dbgstr_a(pszVersionPattern));
 
            // Does the pattern match?
            if (SHLWAPI_DoesModuleVersionMatch(pszPath, pszVersionPattern))
            {
                // Add additional flags from the registry key
                dwCompatFlags |= SHLWAPI_GetMappedFlags(hSubKey, g_appCompatFlagMaps,
                                                        _countof(g_appCompatFlagMaps));
            }
        }
 
        RegCloseKey(hSubKey);
 
        // Go to the next sub-key
        ++dwIndex;
        error = RegEnumKeyA(hKey, dwIndex, szText, _countof(szText));
    }
 
    RegCloseKey(hKey);
 
    return dwCompatFlags;
}

Referenced by SHLWAPI_InitAppCompat().

SHLWAPI_InitAppCompat()

static DWORD SHLWAPI_InitAppCompat ( VOID  )

static

Definition at line 374 of file appcompat.c.

{
    if (GetProcessVersion(0) >= MAKELONG(0, 5))
        return 0; // Flags are not needed
 
    // Get module pathname
    CHAR szModulePathA[MAX_PATH];
    if (!GetModuleFileNameA(NULL, szModulePathA, _countof(szModulePathA)))
        return 0;
 
    PCSTR pszFileName = PathFindFileNameA(szModulePathA); // Get the file title from the path
 
    // Search the file title from g_appCompatInfo
    DWORD dwAppCompatFlags = 0;
    for (UINT iItem = 0; iItem < _countof(g_appCompatInfo); ++iItem)
    {
        const APPCOMPATINFO *pInfo = &g_appCompatInfo[iItem];
        if (lstrcmpiA(pInfo->pszAppName, pszFileName) == 0 &&
            SHLWAPI_DoesModuleVersionMatch(pszFileName, pInfo->pszAppVersion))
        {
            // Found, set the flags
            dwAppCompatFlags = g_appCompatInfo[iItem].dwCompatFlags;
            break;
        }
    }
 
    // Add additional flags from the registry
    dwAppCompatFlags |= SHLWAPI_GetRegistryCompatFlags(pszFileName);
 
    return dwAppCompatFlags;
}

Referenced by SHGetAppCompatFlags().

SHLWAPI_WndCompatEnumProc()

static BOOL CALLBACK SHLWAPI_WndCompatEnumProc ( _In_ HWND  hWnd, _In_ LPARAM  lParam  )

static

Definition at line 136 of file appcompat.c.

{
    PAPPCOMPATENUM pEnum = (PAPPCOMPATENUM)lParam;
 
    CHAR szClass[256];
    if (!pEnum->nItems || !GetClassNameA(hWnd, szClass, _countof(szClass)))
        return TRUE; // Ignore and continue
 
    // Search for the target window in pEnum
    const INT cchClass = lstrlenA(szClass);
    for (UINT iItem = 0; iItem < pEnum->nItems; ++iItem)
    {
        PCSTR pszLengthAndClassName = pEnum->pItems[iItem].pszLengthAndClassName;
 
        INT cchLength = pszLengthAndClassName[0]; // The first byte represents the length
        if (cchClass < cchLength)
            cchLength = cchClass; // Ignore trailing characters
 
        // Compare the string
        if (StrCmpNA(szClass, &pszLengthAndClassName[1], cchLength) == 0) // Class name matched
        {
            // Get the process ID
            DWORD dwProcessId;
            GetWindowThreadProcessId(hWnd, &dwProcessId);
            if (dwProcessId == pEnum->dwProcessId) // Same process
            {
                pEnum->iFound = iItem; // Found
                return FALSE; // Quit enumeration
            }
        }
    }
 
    return TRUE; // Continue enumeration
}

Referenced by SHGetAppCompatFlags().

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

shell

)

Variable Documentation

g_appCompatFlagMaps

FLAGMAP g_appCompatFlagMaps[]

static

Initial value:

=
{
    { SHACF_CONTEXTMENU, "CONTEXTMENU" },
    { SHACF_CORELINTERNETENUM, "CORELINTERNETENUM" },
    { SHACF_OLDCREATEVIEWWND, "OLDCREATEVIEWWND" },
    { SHACF_WIN95DEFVIEW, "WIN95DEFVIEW" },
    { SHACF_DOCOBJECT, "DOCOBJECT" },
    { SHACF_FLUSHNOWAITALWAYS, "FLUSHNOWAITALWAYS" },
    { SHACF_MYCOMPUTERFIRST, "MYCOMPUTERFIRST" },
    { SHACF_OLDREGITEMGDN, "OLDREGITEMGDN" },
    { SHACF_LOADCOLUMNHANDLER, "LOADCOLUMNHANDLER" },
    { SHACF_ANSI, "ANSI" },
    { SHACF_STAROFFICE5PRINTER, "STAROFFICE5PRINTER" },
    { SHACF_NOVALIDATEFSIDS, "NOVALIDATEFSIDS" },
    { SHACF_WIN95SHLEXEC, "WIN95SHLEXEC" },
    { SHACF_FILEOPENNEEDSEXT, "FILEOPENNEEDSEXT" },
    { SHACF_WIN95BINDTOOBJECT, "WIN95BINDTOOBJECT" },
    { SHACF_IGNOREENUMRESET, "IGNOREENUMRESET" },
    { SHACF_ANSIDISPLAYNAMES, "ANSIDISPLAYNAMES" },
    { SHACF_FILEOPENBOGUSCTRLID, "FILEOPENBOGUSCTRLID" },
    { SHACF_FORCELFNIDLIST, "FORCELFNIDLIST" },
}

Definition at line 27 of file appcompat.c.

Referenced by SHLWAPI_GetRegistryCompatFlags().

g_appCompatInfo

APPCOMPATINFO g_appCompatInfo[]

static

Definition at line 74 of file appcompat.c.

Referenced by SHLWAPI_InitAppCompat().

g_dwAppCompatFlags

DWORD g_dwAppCompatFlags = 0

static

Definition at line 19 of file appcompat.c.

Referenced by SHGetAppCompatFlags().

g_fAppCompatInitialized

BOOL g_fAppCompatInitialized = FALSE

static

Definition at line 17 of file appcompat.c.

Referenced by SHGetAppCompatFlags().

g_wndCompatInfo

WNDCOMPATINFO g_wndCompatInfo[]

static

Initial value:

=
{
    
    { "\x09" "bosa_sdm_", SHACF_UNKNOWN1 | SHACF_UNKNOWN2 },
    { "\x18" "File Open Message Window", SHACF_UNKNOWN1 | SHACF_UNKNOWN2 },
}

Definition at line 119 of file appcompat.c.

Referenced by SHGetAppCompatFlags().