upgrade.c File Reference

#include <stdarg.h>
#include "windef.h"
#include "winbase.h"
#include "winerror.h"
#include "winreg.h"
#include "wine/debug.h"
#include "msidefs.h"
#include "msipriv.h"
#include "winuser.h"

Include dependency graph for upgrade.c:

Go to the source code of this file.

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (msi)
static BOOL	check_language (DWORD lang1, LPCWSTR lang2, DWORD attributes)
static BOOL	find_product (const WCHAR *list, const WCHAR *product)
static void	append_productcode (MSIPACKAGE *package, const WCHAR *action_prop, const WCHAR *product)
static UINT	ITERATE_FindRelatedProducts (MSIRECORD *rec, LPVOID param)
UINT	ACTION_FindRelatedProducts (MSIPACKAGE *package)

Function Documentation

ACTION_FindRelatedProducts()

UINT ACTION_FindRelatedProducts

(

MSIPACKAGE *

package

)

Definition at line 217 of file upgrade.c.

{
    MSIQUERY *view;
    UINT rc;
 
    if (msi_get_property_int(package->db, L"Installed", 0))
    {
        TRACE("Skipping FindRelatedProducts action: product already installed\n");
        return ERROR_SUCCESS;
    }
    if (msi_action_is_unique(package, L"FindRelatedProducts"))
    {
        TRACE("Skipping FindRelatedProducts action: already done in UI sequence\n");
        return ERROR_SUCCESS;
    }
    else
        msi_register_unique_action(package, L"FindRelatedProducts");
 
    rc = MSI_DatabaseOpenViewW(package->db, L"SELECT * FROM `Upgrade`", &view);
    if (rc != ERROR_SUCCESS)
        return ERROR_SUCCESS;
 
    rc = MSI_IterateRecords(view, NULL, ITERATE_FindRelatedProducts, package);
    msiobj_release(&view->hdr);
    return rc;
}

append_productcode()

static void append_productcode ( MSIPACKAGE *  package, const WCHAR *  action_prop, const WCHAR *  product  )

static

Definition at line 80 of file upgrade.c.

{
    WCHAR *prop, *newprop;
    DWORD len = 0;
    UINT r;
 
    prop = msi_dup_property( package->db, action_prop );
    if (find_product( prop, product ))
    {
        TRACE( "related product property %s already contains %s\n", debugstr_w(action_prop), debugstr_w(product) );
        msi_free( prop );
        return;
    }
 
    if (prop) len += lstrlenW( prop );
    len += lstrlenW( product ) + 2;
    if (!(newprop = msi_alloc( len * sizeof(WCHAR) ))) return;
    if (prop)
    {
        lstrcpyW( newprop, prop );
        lstrcatW( newprop, L";" );
    }
    else newprop[0] = 0;
    lstrcatW( newprop, product );
 
    r = msi_set_property( package->db, action_prop, newprop, -1 );
    if (r == ERROR_SUCCESS && !wcscmp( action_prop, L"SourceDir" ))
        msi_reset_source_folders( package );
 
    TRACE( "related product property %s now %s\n", debugstr_w(action_prop), debugstr_w(newprop) );
 
    msi_free( prop );
    msi_free( newprop );
}

Referenced by ITERATE_FindRelatedProducts().

check_language()

static BOOL check_language ( DWORD  lang1, LPCWSTR  lang2, DWORD  attributes  )

static

Definition at line 42 of file upgrade.c.

{
    DWORD langdword;
 
    if (!lang2 || lang2[0]==0)
        return TRUE;
 
    langdword = wcstol(lang2, NULL, 10);
 
    if (attributes & msidbUpgradeAttributesLanguagesExclusive)
        return (lang1 != langdword);
    else
        return (lang1 == langdword);
}

Referenced by ITERATE_FindRelatedProducts().

find_product()

static BOOL find_product ( const WCHAR *  list, const WCHAR *  product  )

static

Definition at line 57 of file upgrade.c.

{
    const WCHAR *p = list, *q;
 
    if (!list) return FALSE;
    for (;;)
    {
        while (*p && *p != '{') p++;
        if (*p != '{') return FALSE;
        q = p;
        while (*q && *q != '}') q++;
        if (*q != '}') return FALSE;
        q++;
        if (q - p < lstrlenW( product )) return FALSE;
        if (!memcmp( p, product, (q - p) * sizeof(WCHAR) )) return TRUE;
        p = q + 1;
        while (*p && *p != ';') p++;
        if (*p != ';') break;
    }
 
    return FALSE;
}

Referenced by append_productcode().

ITERATE_FindRelatedProducts()

static UINT ITERATE_FindRelatedProducts ( MSIRECORD *  rec, LPVOID  param  )

static

Definition at line 115 of file upgrade.c.

{
    MSIPACKAGE *package = param;
    WCHAR product[SQUASHED_GUID_SIZE];
    DWORD index = 0, attributes = 0, sz = ARRAY_SIZE(product);
    LPCWSTR upgrade_code;
    HKEY hkey = 0;
    UINT rc = ERROR_SUCCESS;
    MSIRECORD *uirow;
 
    upgrade_code = MSI_RecordGetString(rec,1);
 
    rc = MSIREG_OpenUpgradeCodesKey(upgrade_code, &hkey, FALSE);
    if (rc != ERROR_SUCCESS)
        return ERROR_SUCCESS;
 
    uirow = MSI_CreateRecord(1);
    attributes = MSI_RecordGetInteger(rec,5);
 
    while (rc == ERROR_SUCCESS)
    {
        rc = RegEnumValueW(hkey, index, product, &sz, NULL, NULL, NULL, NULL);
        if (rc == ERROR_SUCCESS)
        {
            WCHAR productid[GUID_SIZE];
            LPCWSTR ver, language, action_property;
            DWORD check = 0, comp_ver, sz = 0x100;
            HKEY hukey;
            INT r;
 
            TRACE( "looking at index %lu product %s\n", index, debugstr_w(product) );
 
            unsquash_guid(product, productid);
            if (MSIREG_OpenProductKey(productid, NULL, MSIINSTALLCONTEXT_USERMANAGED, &hukey, FALSE) &&
                MSIREG_OpenProductKey(productid, NULL, MSIINSTALLCONTEXT_USERUNMANAGED, &hukey, FALSE) &&
                MSIREG_OpenProductKey(productid, NULL, MSIINSTALLCONTEXT_MACHINE, &hukey, FALSE))
            {
                TRACE("product key not found\n");
                rc = ERROR_SUCCESS;
                index ++;
                continue;
            }
 
            sz = sizeof(DWORD);
            RegQueryValueExW(hukey, INSTALLPROPERTY_VERSIONW, NULL, NULL, (LPBYTE)&check, &sz);
 
            /* check version minimum */
            ver = MSI_RecordGetString(rec,2);
            if (ver)
            {
                comp_ver = msi_version_str_to_dword(ver);
                r = check - comp_ver;
                if (r < 0 || (r == 0 && !(attributes & msidbUpgradeAttributesVersionMinInclusive)))
                {
                    TRACE("version below minimum\n");
                    RegCloseKey(hukey);
                    index ++;
                    continue;
                }
            }
 
            /* check version maximum */
            ver = MSI_RecordGetString(rec,3);
            if (ver)
            {
                comp_ver = msi_version_str_to_dword(ver);
                r = check - comp_ver;
                if (r > 0 || (r == 0 && !(attributes & msidbUpgradeAttributesVersionMaxInclusive)))
                {
                    RegCloseKey(hukey);
                    index ++;
                    continue;
                }
                TRACE("version above maximum\n");
            }
 
            /* check language */
            sz = sizeof(DWORD);
            RegQueryValueExW(hukey, INSTALLPROPERTY_LANGUAGEW, NULL, NULL, (LPBYTE)&check, &sz);
            RegCloseKey(hukey);
            language = MSI_RecordGetString(rec,4);
            if (!check_language(check, language, attributes))
            {
                index ++;
                TRACE("language doesn't match\n");
                continue;
            }
            TRACE("found related product\n");
 
            action_property = MSI_RecordGetString(rec, 7);
            append_productcode(package, action_property, productid);
            MSI_RecordSetStringW(uirow, 1, productid);
            MSI_ProcessMessage(package, INSTALLMESSAGE_ACTIONDATA, uirow);
        }
        index ++;
    }
    RegCloseKey(hkey);
    msiobj_release( &uirow->hdr);
 
    return ERROR_SUCCESS;
}

Referenced by ACTION_FindRelatedProducts().

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

msi

)