intshcut.c File Reference

#include <stdio.h>
#include "ieframe.h"
#include "shlobj.h"
#include "shobjidl.h"
#include "intshcut.h"
#include "shellapi.h"
#include "winreg.h"
#include "shlwapi.h"
#include "shlguid.h"
#include "wine/debug.h"

Include dependency graph for intshcut.c:

Go to the source code of this file.

Classes
struct	InternetShortcut

Functions
	WINE_DEFAULT_DEBUG_CHANNEL (ieframe)
static InternetShortcut *	impl_from_IUniformResourceLocatorA (IUniformResourceLocatorA *iface)
static InternetShortcut *	impl_from_IUniformResourceLocatorW (IUniformResourceLocatorW *iface)
static InternetShortcut *	impl_from_IPersistFile (IPersistFile *iface)
static InternetShortcut *	impl_from_IPropertySetStorage (IPropertySetStorage *iface)
static BOOL	run_winemenubuilder (const WCHAR *args)
static BOOL	StartLinkProcessor (LPCOLESTR szLink)
static HRESULT	Unknown_QueryInterface (InternetShortcut *This, REFIID riid, PVOID *ppvObject)
static ULONG	Unknown_AddRef (InternetShortcut *This)
static ULONG	Unknown_Release (InternetShortcut *This)
static HRESULT WINAPI	UniformResourceLocatorW_QueryInterface (IUniformResourceLocatorW *url, REFIID riid, PVOID *ppvObject)
static ULONG WINAPI	UniformResourceLocatorW_AddRef (IUniformResourceLocatorW *url)
static ULONG WINAPI	UniformResourceLocatorW_Release (IUniformResourceLocatorW *url)
static HRESULT WINAPI	UniformResourceLocatorW_SetUrl (IUniformResourceLocatorW *url, LPCWSTR pcszURL, DWORD dwInFlags)
static HRESULT WINAPI	UniformResourceLocatorW_GetUrl (IUniformResourceLocatorW *url, LPWSTR *ppszURL)
static HRESULT WINAPI	UniformResourceLocatorW_InvokeCommand (IUniformResourceLocatorW *url, PURLINVOKECOMMANDINFOW pCommandInfo)
static HRESULT WINAPI	UniformResourceLocatorA_QueryInterface (IUniformResourceLocatorA *url, REFIID riid, PVOID *ppvObject)
static ULONG WINAPI	UniformResourceLocatorA_AddRef (IUniformResourceLocatorA *url)
static ULONG WINAPI	UniformResourceLocatorA_Release (IUniformResourceLocatorA *url)
static HRESULT WINAPI	UniformResourceLocatorA_SetUrl (IUniformResourceLocatorA *url, LPCSTR pcszURL, DWORD dwInFlags)
static HRESULT WINAPI	UniformResourceLocatorA_GetUrl (IUniformResourceLocatorA *url, LPSTR *ppszURL)
static HRESULT WINAPI	UniformResourceLocatorA_InvokeCommand (IUniformResourceLocatorA *url, PURLINVOKECOMMANDINFOA pCommandInfo)
static HRESULT WINAPI	PersistFile_QueryInterface (IPersistFile *pFile, REFIID riid, PVOID *ppvObject)
static ULONG WINAPI	PersistFile_AddRef (IPersistFile *pFile)
static ULONG WINAPI	PersistFile_Release (IPersistFile *pFile)
static HRESULT WINAPI	PersistFile_GetClassID (IPersistFile *pFile, CLSID *pClassID)
static HRESULT WINAPI	PersistFile_IsDirty (IPersistFile *pFile)
static HRESULT	get_profile_string (LPCWSTR lpAppName, LPCWSTR lpKeyName, LPCWSTR lpFileName, WCHAR **rString)
static HRESULT WINAPI	PersistFile_Load (IPersistFile *pFile, LPCOLESTR pszFileName, DWORD dwMode)
static HRESULT WINAPI	PersistFile_Save (IPersistFile *pFile, LPCOLESTR pszFileName, BOOL fRemember)
static HRESULT WINAPI	PersistFile_SaveCompleted (IPersistFile *pFile, LPCOLESTR pszFileName)
static HRESULT WINAPI	PersistFile_GetCurFile (IPersistFile *pFile, LPOLESTR *ppszFileName)
static HRESULT WINAPI	PropertySetStorage_QueryInterface (IPropertySetStorage *iface, REFIID riid, PVOID *ppvObject)
static ULONG WINAPI	PropertySetStorage_AddRef (IPropertySetStorage *iface)
static ULONG WINAPI	PropertySetStorage_Release (IPropertySetStorage *iface)
static HRESULT WINAPI	PropertySetStorage_Create (IPropertySetStorage *iface, REFFMTID rfmtid, const CLSID *pclsid, DWORD grfFlags, DWORD grfMode, IPropertyStorage **ppprstg)
static HRESULT WINAPI	PropertySetStorage_Open (IPropertySetStorage *iface, REFFMTID rfmtid, DWORD grfMode, IPropertyStorage **ppprstg)
static HRESULT WINAPI	PropertySetStorage_Delete (IPropertySetStorage *iface, REFFMTID rfmtid)
static HRESULT WINAPI	PropertySetStorage_Enum (IPropertySetStorage *iface, IEnumSTATPROPSETSTG **ppenum)
static InternetShortcut *	create_shortcut (void)
HRESULT WINAPI	InternetShortcut_Create (IClassFactory *iface, IUnknown *outer, REFIID riid, void **ppv)
void WINAPI	OpenURL (HWND hWnd, HINSTANCE hInst, LPCSTR lpcstrUrl, int nShowCmd)

Variables
static const IUniformResourceLocatorWVtbl	uniformResourceLocatorWVtbl
static const IUniformResourceLocatorAVtbl	uniformResourceLocatorAVtbl
static const IPersistFileVtbl	persistFileVtbl
static const IPropertySetStorageVtbl	propertySetStorageVtbl

Function Documentation

create_shortcut()

static InternetShortcut * create_shortcut ( void  )

static

Definition at line 790 of file intshcut.c.

{
    InternetShortcut *newshortcut;
 
    newshortcut = calloc(1, sizeof(InternetShortcut));
    if (newshortcut)
    {
        HRESULT hr;
        IPropertyStorage *dummy;
 
        newshortcut->IUniformResourceLocatorA_iface.lpVtbl = &uniformResourceLocatorAVtbl;
        newshortcut->IUniformResourceLocatorW_iface.lpVtbl = &uniformResourceLocatorWVtbl;
        newshortcut->IPersistFile_iface.lpVtbl = &persistFileVtbl;
        newshortcut->IPropertySetStorage_iface.lpVtbl = &propertySetStorageVtbl;
        newshortcut->refCount = 1;
        hr = StgCreateStorageEx(NULL, STGM_CREATE | STGM_READWRITE | STGM_SHARE_EXCLUSIVE | STGM_DELETEONRELEASE,
                                STGFMT_STORAGE, 0, NULL, NULL, &IID_IPropertySetStorage, (void **) &newshortcut->property_set_storage);
        if (FAILED(hr))
        {
            TRACE("Failed to create the storage object needed for the shortcut.\n");
            free(newshortcut);
            return NULL;
        }
 
        hr = IPropertySetStorage_Create(newshortcut->property_set_storage, &FMTID_Intshcut, NULL, PROPSETFLAG_DEFAULT, STGM_CREATE | STGM_READWRITE | STGM_SHARE_EXCLUSIVE, &dummy);
        if (FAILED(hr))
        {
            TRACE("Failed to create the property object needed for the shortcut.\n");
            IPropertySetStorage_Release(newshortcut->property_set_storage);
            free(newshortcut);
            return NULL;
        }
        IPropertyStorage_Release(dummy);
    }
 
    return newshortcut;
}

Referenced by InternetShortcut_Create(), and OpenURL().

get_profile_string()

static HRESULT get_profile_string ( LPCWSTR  lpAppName, LPCWSTR  lpKeyName, LPCWSTR  lpFileName, WCHAR **  rString  )

static

Definition at line 422 of file intshcut.c.

{
    DWORD r = 0;
    DWORD len = 128;
    WCHAR *buffer;
 
    *rString = NULL;
    buffer = CoTaskMemAlloc(len * sizeof(*buffer));
    if (!buffer)
        return E_OUTOFMEMORY;
 
    r = GetPrivateProfileStringW(lpAppName, lpKeyName, NULL, buffer, len, lpFileName);
    while (r == len-1)
    {
        WCHAR *realloc_buf;
 
        len *= 2;
        realloc_buf = CoTaskMemRealloc(buffer, len * sizeof(*buffer));
        if (realloc_buf == NULL)
        {
            CoTaskMemFree(buffer);
            return E_OUTOFMEMORY;
        }
        buffer = realloc_buf;
 
        r = GetPrivateProfileStringW(lpAppName, lpKeyName, NULL, buffer, len, lpFileName);
    }
 
    *rString = buffer;
    return r ? S_OK : E_FAIL;
}

Referenced by PersistFile_Load().

impl_from_IPersistFile()

static InternetShortcut * impl_from_IPersistFile ( IPersistFile *  iface )

inlinestatic

Definition at line 73 of file intshcut.c.

{
    return CONTAINING_RECORD(iface, InternetShortcut, IPersistFile_iface);
}

Referenced by PersistFile_AddRef(), PersistFile_GetCurFile(), PersistFile_IsDirty(), PersistFile_Load(), PersistFile_QueryInterface(), PersistFile_Release(), and PersistFile_Save().

impl_from_IPropertySetStorage()

static InternetShortcut * impl_from_IPropertySetStorage ( IPropertySetStorage *  iface )

inlinestatic

Definition at line 78 of file intshcut.c.

{
    return CONTAINING_RECORD(iface, InternetShortcut, IPropertySetStorage_iface);
}

Referenced by PropertySetStorage_AddRef(), PropertySetStorage_Create(), PropertySetStorage_Delete(), PropertySetStorage_Open(), PropertySetStorage_QueryInterface(), and PropertySetStorage_Release().

impl_from_IUniformResourceLocatorA()

static InternetShortcut * impl_from_IUniformResourceLocatorA ( IUniformResourceLocatorA *  iface )

inlinestatic

Definition at line 63 of file intshcut.c.

{
    return CONTAINING_RECORD(iface, InternetShortcut, IUniformResourceLocatorA_iface);
}

Referenced by UniformResourceLocatorA_AddRef(), UniformResourceLocatorA_GetUrl(), UniformResourceLocatorA_InvokeCommand(), UniformResourceLocatorA_QueryInterface(), UniformResourceLocatorA_Release(), and UniformResourceLocatorA_SetUrl().

impl_from_IUniformResourceLocatorW()

static InternetShortcut * impl_from_IUniformResourceLocatorW ( IUniformResourceLocatorW *  iface )

inlinestatic

Definition at line 68 of file intshcut.c.

{
    return CONTAINING_RECORD(iface, InternetShortcut, IUniformResourceLocatorW_iface);
}

Referenced by UniformResourceLocatorW_AddRef(), UniformResourceLocatorW_GetUrl(), UniformResourceLocatorW_InvokeCommand(), UniformResourceLocatorW_QueryInterface(), UniformResourceLocatorW_Release(), and UniformResourceLocatorW_SetUrl().

InternetShortcut_Create()

HRESULT WINAPI InternetShortcut_Create	(	IClassFactory *	iface,
		IUnknown *	outer,
		REFIID	riid,
		void **	ppv
	)

Definition at line 828 of file intshcut.c.

{
    InternetShortcut *This;
    HRESULT hres;
 
    TRACE("(%p, %s, %p)\n", outer, debugstr_guid(riid), ppv);
 
    *ppv = NULL;
 
    if(outer)
        return CLASS_E_NOAGGREGATION;
 
    This = create_shortcut();
    if(!This)
        return E_OUTOFMEMORY;
 
    hres = Unknown_QueryInterface(This, riid, ppv);
    Unknown_Release(This);
    return hres;
}

OpenURL()

void WINAPI OpenURL	(	HWND	hWnd,
		HINSTANCE	hInst,
		LPCSTR	lpcstrUrl,
		int	nShowCmd
	)

Definition at line 853 of file intshcut.c.

{
    InternetShortcut *shortcut;
    WCHAR* urlfilepath = NULL;
    int len;
 
    shortcut = create_shortcut();
 
    if(!shortcut)
        return;
 
    len = MultiByteToWideChar(CP_ACP, 0, lpcstrUrl, -1, NULL, 0);
    urlfilepath = malloc(len * sizeof(WCHAR));
    MultiByteToWideChar(CP_ACP, 0, lpcstrUrl, -1, urlfilepath, len);
 
    if(SUCCEEDED(IPersistFile_Load(&shortcut->IPersistFile_iface, urlfilepath, 0))) {
        URLINVOKECOMMANDINFOW ici;
 
        memset( &ici, 0, sizeof ici );
        ici.dwcbSize = sizeof ici;
        ici.dwFlags = IURL_INVOKECOMMAND_FL_USE_DEFAULT_VERB;
        ici.hwndParent = hWnd;
 
        if(FAILED(UniformResourceLocatorW_InvokeCommand(&shortcut->IUniformResourceLocatorW_iface, (PURLINVOKECOMMANDINFOW) &ici)))
            TRACE("failed to open URL: %s\n", debugstr_a(lpcstrUrl));
    }
 
    free(urlfilepath);
    Unknown_Release(shortcut);
}

PersistFile_AddRef()

static ULONG WINAPI PersistFile_AddRef ( IPersistFile *  pFile )

static

Definition at line 393 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPersistFile(pFile);
    TRACE("(%p)\n", pFile);
    return Unknown_AddRef(This);
}

PersistFile_GetClassID()

static HRESULT WINAPI PersistFile_GetClassID ( IPersistFile *  pFile, CLSID *  pClassID  )

static

Definition at line 407 of file intshcut.c.

{
    TRACE("(%p, %p)\n", pFile, pClassID);
    *pClassID = CLSID_InternetShortcut;
    return S_OK;
}

PersistFile_GetCurFile()

static HRESULT WINAPI PersistFile_GetCurFile ( IPersistFile *  pFile, LPOLESTR *  ppszFileName  )

static

Definition at line 657 of file intshcut.c.

{
    HRESULT hr = S_OK;
    InternetShortcut *This = impl_from_IPersistFile(pFile);
    TRACE("(%p, %p)\n", pFile, ppszFileName);
    if (This->currentFile == NULL)
        *ppszFileName = NULL;
    else
    {
        *ppszFileName = co_strdupW(This->currentFile);
        if (*ppszFileName == NULL)
            hr = E_OUTOFMEMORY;
    }
    return hr;
}

PersistFile_IsDirty()

static HRESULT WINAPI PersistFile_IsDirty ( IPersistFile *  pFile )

static

Definition at line 414 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPersistFile(pFile);
    TRACE("(%p)\n", pFile);
    return This->isDirty ? S_OK : S_FALSE;
}

PersistFile_Load()

static HRESULT WINAPI PersistFile_Load ( IPersistFile *  pFile, LPCOLESTR  pszFileName, DWORD  dwMode  )

static

Definition at line 455 of file intshcut.c.

{
    static const WCHAR str_header[] = {'I','n','t','e','r','n','e','t','S','h','o','r','t','c','u','t',0};
    static const WCHAR str_URL[] = {'U','R','L',0};
    static const WCHAR str_iconfile[] = {'i','c','o','n','f','i','l','e',0};
    static const WCHAR str_iconindex[] = {'i','c','o','n','i','n','d','e','x',0};
    InternetShortcut *This = impl_from_IPersistFile(pFile);
    WCHAR *filename = NULL;
    WCHAR *url;
    HRESULT hr;
    IPropertyStorage *pPropStg;
    WCHAR *iconfile;
    WCHAR *iconindexstring;
 
    TRACE("(%p, %s, 0x%lx)\n", pFile, debugstr_w(pszFileName), dwMode);
 
    if (dwMode != 0)
        FIXME("ignoring unimplemented mode 0x%lx\n", dwMode);
 
    filename = co_strdupW(pszFileName);
    if (!filename)
        return E_OUTOFMEMORY;
 
    if (FAILED(hr = get_profile_string(str_header, str_URL, pszFileName, &url)))
    {
        CoTaskMemFree(filename);
        return hr;
    }
 
    hr = IPropertySetStorage_Open(This->property_set_storage, &FMTID_Intshcut,
                STGM_READWRITE | STGM_SHARE_EXCLUSIVE, &pPropStg);
    if (FAILED(hr))
    {
        CoTaskMemFree(filename);
        CoTaskMemFree(url);
        return hr;
    }
 
    CoTaskMemFree(This->currentFile);
    This->currentFile = filename;
    CoTaskMemFree(This->url);
    This->url = url;
    This->isDirty = FALSE;
 
    /* Now we're going to read in the iconfile and iconindex.
       If we don't find them, that's not a failure case -- it's possible
       that they just aren't in there. */
 
    if (get_profile_string(str_header, str_iconfile, pszFileName, &iconfile) == S_OK)
    {
        PROPSPEC ps;
        PROPVARIANT pv;
        ps.ulKind = PRSPEC_PROPID;
        ps.propid = PID_IS_ICONFILE;
        pv.vt = VT_LPWSTR;
        pv.pwszVal = iconfile;
        hr = IPropertyStorage_WriteMultiple(pPropStg, 1, &ps, &pv, 0);
        if (FAILED(hr))
            TRACE("Failed to store the iconfile to our property storage.  hr = 0x%lx\n", hr);
    }
    CoTaskMemFree(iconfile);
 
    if (get_profile_string(str_header, str_iconindex, pszFileName, &iconindexstring) == S_OK)
    {
        int iconindex;
        PROPSPEC ps;
        PROPVARIANT pv;
        iconindex = wcstol(iconindexstring, NULL, 10);
        ps.ulKind = PRSPEC_PROPID;
        ps.propid = PID_IS_ICONINDEX;
        pv.vt = VT_I4;
        pv.iVal = iconindex;
        hr = IPropertyStorage_WriteMultiple(pPropStg, 1, &ps, &pv, 0);
        if (FAILED(hr))
           TRACE("Failed to store the iconindex to our property storage.  hr = 0x%lx\n", hr);
    }
    CoTaskMemFree(iconindexstring);
 
    IPropertyStorage_Release(pPropStg);
    return hr;
}

PersistFile_QueryInterface()

static HRESULT WINAPI PersistFile_QueryInterface ( IPersistFile *  pFile, REFIID  riid, PVOID *  ppvObject  )

static

Definition at line 386 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPersistFile(pFile);
    TRACE("(%p, %s, %p)\n", pFile, debugstr_guid(riid), ppvObject);
    return Unknown_QueryInterface(This, riid, ppvObject);
}

PersistFile_Release()

static ULONG WINAPI PersistFile_Release ( IPersistFile *  pFile )

static

Definition at line 400 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPersistFile(pFile);
    TRACE("(%p)\n", pFile);
    return Unknown_Release(This);
}

PersistFile_Save()

static HRESULT WINAPI PersistFile_Save ( IPersistFile *  pFile, LPCOLESTR  pszFileName, BOOL  fRemember  )

static

Definition at line 537 of file intshcut.c.

{
    HRESULT hr = S_OK;
    INT len;
    CHAR *url;
    InternetShortcut *This = impl_from_IPersistFile(pFile);
 
    TRACE("(%p, %s, %d)\n", pFile, debugstr_w(pszFileName), fRemember);
 
    if (pszFileName != NULL && fRemember)
    {
        LPOLESTR oldFile = This->currentFile;
        This->currentFile = co_strdupW(pszFileName);
        if (This->currentFile == NULL)
        {
            This->currentFile = oldFile;
            return E_OUTOFMEMORY;
        }
        CoTaskMemFree(oldFile);
    }
    if (This->url == NULL)
        return E_FAIL;
 
    /* Windows seems to always write:
     *   ASCII "[InternetShortcut]" headers
     *   ASCII names in "name=value" pairs
     *   An ASCII (probably UTF8?) value in "URL=..."
     */
    len = WideCharToMultiByte(CP_UTF8, 0, This->url, -1, NULL, 0, 0, 0);
    url = malloc(len);
    if (url != NULL)
    {
        HANDLE file;
        WideCharToMultiByte(CP_UTF8, 0, This->url, -1, url, len, 0, 0);
        file = CreateFileW(pszFileName, GENERIC_WRITE, FILE_SHARE_READ, NULL, CREATE_ALWAYS, FILE_ATTRIBUTE_NORMAL, NULL);
        if (file != INVALID_HANDLE_VALUE)
        {
            static const char str_header[] = "[InternetShortcut]";
            static const char str_URL[] = "URL=";
            static const char str_ICONFILE[] = "ICONFILE=";
            static const char str_eol[] = "\r\n";
            DWORD bytesWritten;
            char *iconfile;
            IPropertyStorage *pPropStgRead;
            PROPSPEC ps[2];
            PROPVARIANT pvread[2];
            ps[0].ulKind = PRSPEC_PROPID;
            ps[0].propid = PID_IS_ICONFILE;
            ps[1].ulKind = PRSPEC_PROPID;
            ps[1].propid = PID_IS_ICONINDEX;
 
            WriteFile(file, str_header, ARRAY_SIZE(str_header) - 1, &bytesWritten, NULL);
            WriteFile(file, str_eol, ARRAY_SIZE(str_eol) - 1, &bytesWritten, NULL);
            WriteFile(file, str_URL, ARRAY_SIZE(str_URL) - 1, &bytesWritten, NULL);
            WriteFile(file, url, lstrlenA(url), &bytesWritten, NULL);
            WriteFile(file, str_eol, ARRAY_SIZE(str_eol) - 1, &bytesWritten, NULL);
 
            hr = IPropertySetStorage_Open(This->property_set_storage, &FMTID_Intshcut, STGM_READ|STGM_SHARE_EXCLUSIVE, &pPropStgRead);
            if (SUCCEEDED(hr))
            {
                hr = IPropertyStorage_ReadMultiple(pPropStgRead, 2, ps, pvread);
                if (hr == S_FALSE)
                {
                    /* None of the properties are present, that's ok */
                    hr = S_OK;
                    IPropertyStorage_Release(pPropStgRead);
                }
                else if (SUCCEEDED(hr))
                {
                    char indexString[50];
                    len = WideCharToMultiByte(CP_UTF8, 0, pvread[0].pwszVal, -1, NULL, 0, 0, 0);
                    iconfile = malloc(len);
                    if (iconfile != NULL)
                    {
                        WideCharToMultiByte(CP_UTF8, 0, pvread[0].pwszVal, -1, iconfile, len, 0, 0);
                        WriteFile(file, str_ICONFILE, lstrlenA(str_ICONFILE), &bytesWritten, NULL);
                        WriteFile(file, iconfile, lstrlenA(iconfile), &bytesWritten, NULL);
                        WriteFile(file, str_eol, lstrlenA(str_eol), &bytesWritten, NULL);
                        free(iconfile);
                    }
 
                    sprintf(indexString, "ICONINDEX=%d", pvread[1].iVal);
                    WriteFile(file, indexString, lstrlenA(indexString), &bytesWritten, NULL);
                    WriteFile(file, str_eol, lstrlenA(str_eol), &bytesWritten, NULL);
 
                    IPropertyStorage_Release(pPropStgRead);
                    PropVariantClear(&pvread[0]);
                    PropVariantClear(&pvread[1]);
                }
                else
                {
                    TRACE("Unable to read properties.\n");
                }
            }
            else
            {
               TRACE("Unable to get the IPropertyStorage.\n");
            }
 
            CloseHandle(file);
            if (pszFileName == NULL || fRemember)
                This->isDirty = FALSE;
            StartLinkProcessor(pszFileName);
        }
        else
            hr = E_FAIL;
        free(url);
    }
    else
        hr = E_OUTOFMEMORY;
 
    return hr;
}

PersistFile_SaveCompleted()

static HRESULT WINAPI PersistFile_SaveCompleted ( IPersistFile *  pFile, LPCOLESTR  pszFileName  )

static

Definition at line 651 of file intshcut.c.

{
    FIXME("(%p, %p): stub\n", pFile, pszFileName);
    return E_NOTIMPL;
}

PropertySetStorage_AddRef()

static ULONG WINAPI PropertySetStorage_AddRef ( IPropertySetStorage *  iface )

static

Definition at line 680 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPropertySetStorage(iface);
    TRACE("(%p)\n", iface);
    return Unknown_AddRef(This);
}

PropertySetStorage_Create()

static HRESULT WINAPI PropertySetStorage_Create ( IPropertySetStorage *  iface, REFFMTID  rfmtid, const CLSID *  pclsid, DWORD  grfFlags, DWORD  grfMode, IPropertyStorage **  ppprstg  )

static

Definition at line 694 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPropertySetStorage(iface);
    TRACE("(%s, %p, 0x%lx, 0x%lx, %p)\n", debugstr_guid(rfmtid), pclsid, grfFlags, grfMode, ppprstg);
 
    return IPropertySetStorage_Create(This->property_set_storage,
                                      rfmtid,
                                      pclsid,
                                      grfFlags,
                                      grfMode,
                                      ppprstg);
}

PropertySetStorage_Delete()

static HRESULT WINAPI PropertySetStorage_Delete ( IPropertySetStorage *  iface, REFFMTID  rfmtid  )

static

Definition at line 734 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPropertySetStorage(iface);
    TRACE("(%s)\n", debugstr_guid(rfmtid));
 
 
    return IPropertySetStorage_Delete(This->property_set_storage,
                                      rfmtid);
}

PropertySetStorage_Enum()

static HRESULT WINAPI PropertySetStorage_Enum ( IPropertySetStorage *  iface, IEnumSTATPROPSETSTG **  ppenum  )

static

Definition at line 744 of file intshcut.c.

{
    FIXME("(%p): stub\n", ppenum);
    return E_NOTIMPL;
}

PropertySetStorage_Open()

static HRESULT WINAPI PropertySetStorage_Open ( IPropertySetStorage *  iface, REFFMTID  rfmtid, DWORD  grfMode, IPropertyStorage **  ppprstg  )

static

Definition at line 713 of file intshcut.c.

{
    const DWORD STGM_ACCESS_MASK = 0x0000000f;
    InternetShortcut *This = impl_from_IPropertySetStorage(iface);
    TRACE("(%s, 0x%lx, %p)\n", debugstr_guid(rfmtid), grfMode, ppprstg);
 
    /* ole32 doesn't like STGM_WRITE */
    if ((grfMode & STGM_ACCESS_MASK) == STGM_WRITE)
        grfMode = (grfMode & ~STGM_ACCESS_MASK) | STGM_READWRITE;
 
    /* Note:  The |STGM_SHARE_EXCLUSIVE is to cope with a bug in the implementation.  Should be fixed in ole32. */
    return IPropertySetStorage_Open(This->property_set_storage,
                                    rfmtid,
                                    grfMode|STGM_SHARE_EXCLUSIVE,
                                    ppprstg);
}

PropertySetStorage_QueryInterface()

static HRESULT WINAPI PropertySetStorage_QueryInterface ( IPropertySetStorage *  iface, REFIID  riid, PVOID *  ppvObject  )

static

Definition at line 673 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPropertySetStorage(iface);
    TRACE("(%p)\n", iface);
    return Unknown_QueryInterface(This, riid, ppvObject);
}

PropertySetStorage_Release()

static ULONG WINAPI PropertySetStorage_Release ( IPropertySetStorage *  iface )

static

Definition at line 687 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IPropertySetStorage(iface);
    TRACE("(%p)\n", iface);
    return Unknown_Release(This);
}

run_winemenubuilder()

static BOOL run_winemenubuilder ( const WCHAR *  args )

static

Definition at line 83 of file intshcut.c.

{
    static const WCHAR menubuilder[] = {'\\','w','i','n','e','m','e','n','u','b','u','i','l','d','e','r','.','e','x','e',0};
    LONG len;
    LPWSTR buffer;
    STARTUPINFOW si;
    PROCESS_INFORMATION pi;
    BOOL ret;
    WCHAR app[MAX_PATH];
    void *redir;
 
    GetSystemDirectoryW( app, MAX_PATH - ARRAY_SIZE( menubuilder ));
    lstrcatW( app, menubuilder );
 
    len = (lstrlenW( app ) + lstrlenW( args ) + 1) * sizeof(WCHAR);
    buffer = malloc( len );
    if( !buffer )
        return FALSE;
 
    lstrcpyW( buffer, app );
    lstrcatW( buffer, args );
 
    TRACE("starting %s\n",debugstr_w(buffer));
 
    memset(&si, 0, sizeof(si));
    si.cb = sizeof(si);
 
    Wow64DisableWow64FsRedirection( &redir );
    ret = CreateProcessW( app, buffer, NULL, NULL, FALSE, DETACHED_PROCESS, NULL, NULL, &si, &pi );
    Wow64RevertWow64FsRedirection( redir );
 
    free( buffer );
 
    if (ret)
    {
        CloseHandle( pi.hProcess );
        CloseHandle( pi.hThread );
    }
 
    return ret;
}

Referenced by StartLinkProcessor().

StartLinkProcessor()

static BOOL StartLinkProcessor ( LPCOLESTR  szLink )

static

Definition at line 125 of file intshcut.c.

{
    static const WCHAR szFormat[] = { ' ','-','w',' ','-','u',' ','"','%','s','"',0 };
    LONG len;
    LPWSTR buffer;
    BOOL ret;
 
    len = sizeof(szFormat) + lstrlenW( szLink ) * sizeof(WCHAR);
    buffer = malloc( len );
    if( !buffer )
        return FALSE;
 
    swprintf( buffer, len / sizeof(WCHAR), szFormat, szLink );
    ret = run_winemenubuilder( buffer );
    free( buffer );
    return ret;
}

Referenced by PersistFile_Save().

UniformResourceLocatorA_AddRef()

static ULONG WINAPI UniformResourceLocatorA_AddRef ( IUniformResourceLocatorA *  url )

static

Definition at line 310 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorA(url);
    TRACE("(%p)\n", url);
    return Unknown_AddRef(This);
}

UniformResourceLocatorA_GetUrl()

static HRESULT WINAPI UniformResourceLocatorA_GetUrl ( IUniformResourceLocatorA *  url, LPSTR *  ppszURL  )

static

Definition at line 343 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorA(url);
 
    TRACE("(%p, %p)\n", url, ppszURL);
 
    if (!This->url) {
        *ppszURL = NULL;
        return S_FALSE;
 
    }
 
    *ppszURL = co_strdupWtoA(This->url);
    if (!*ppszURL)
        return E_OUTOFMEMORY;
 
    return S_OK;
}

UniformResourceLocatorA_InvokeCommand()

static HRESULT WINAPI UniformResourceLocatorA_InvokeCommand ( IUniformResourceLocatorA *  url, PURLINVOKECOMMANDINFOA  pCommandInfo  )

static

Definition at line 362 of file intshcut.c.

{
    URLINVOKECOMMANDINFOW wideCommandInfo;
    int len;
    WCHAR *wideVerb;
    HRESULT res;
    InternetShortcut *This = impl_from_IUniformResourceLocatorA(url);
 
    wideCommandInfo.dwcbSize = sizeof wideCommandInfo;
    wideCommandInfo.dwFlags = pCommandInfo->dwFlags;
    wideCommandInfo.hwndParent = pCommandInfo->hwndParent;
 
    len = MultiByteToWideChar(CP_ACP, 0, pCommandInfo->pcszVerb, -1, NULL, 0);
    wideVerb = malloc(len * sizeof(WCHAR));
    MultiByteToWideChar(CP_ACP, 0, pCommandInfo->pcszVerb, -1, wideVerb, len);
 
    wideCommandInfo.pcszVerb = wideVerb;
 
    res = UniformResourceLocatorW_InvokeCommand(&This->IUniformResourceLocatorW_iface, &wideCommandInfo);
    free(wideVerb);
 
    return res;
}

UniformResourceLocatorA_QueryInterface()

static HRESULT WINAPI UniformResourceLocatorA_QueryInterface ( IUniformResourceLocatorA *  url, REFIID  riid, PVOID *  ppvObject  )

static

Definition at line 303 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorA(url);
    TRACE("(%p, %s, %p)\n", url, debugstr_guid(riid), ppvObject);
    return Unknown_QueryInterface(This, riid, ppvObject);
}

UniformResourceLocatorA_Release()

static ULONG WINAPI UniformResourceLocatorA_Release ( IUniformResourceLocatorA *  url )

static

Definition at line 317 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorA(url);
    TRACE("(%p)\n", url);
    return Unknown_Release(This);
}

UniformResourceLocatorA_SetUrl()

static HRESULT WINAPI UniformResourceLocatorA_SetUrl ( IUniformResourceLocatorA *  url, LPCSTR  pcszURL, DWORD  dwInFlags  )

static

Definition at line 324 of file intshcut.c.

{
    WCHAR *newURL = NULL;
    InternetShortcut *This = impl_from_IUniformResourceLocatorA(url);
    TRACE("(%p, %s, 0x%lx)\n", url, debugstr_a(pcszURL), dwInFlags);
    if (dwInFlags != 0)
        FIXME("ignoring unsupported flags 0x%lx\n", dwInFlags);
    if (pcszURL != NULL)
    {
        newURL = co_strdupAtoW(pcszURL);
        if (newURL == NULL)
            return E_OUTOFMEMORY;
    }
    CoTaskMemFree(This->url);
    This->url = newURL;
    This->isDirty = TRUE;
    return S_OK;
}

UniformResourceLocatorW_AddRef()

static ULONG WINAPI UniformResourceLocatorW_AddRef ( IUniformResourceLocatorW *  url )

static

Definition at line 207 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorW(url);
    TRACE("(%p)\n", url);
    return Unknown_AddRef(This);
}

UniformResourceLocatorW_GetUrl()

static HRESULT WINAPI UniformResourceLocatorW_GetUrl ( IUniformResourceLocatorW *  url, LPWSTR *  ppszURL  )

static

Definition at line 240 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorW(url);
 
    TRACE("(%p, %p)\n", url, ppszURL);
 
    if (!This->url) {
        *ppszURL = NULL;
        return S_FALSE;
    }
 
    *ppszURL = co_strdupW(This->url);
    if (!*ppszURL)
        return E_OUTOFMEMORY;
 
    return S_OK;
}

UniformResourceLocatorW_InvokeCommand()

static HRESULT WINAPI UniformResourceLocatorW_InvokeCommand ( IUniformResourceLocatorW *  url, PURLINVOKECOMMANDINFOW  pCommandInfo  )

static

Definition at line 258 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorW(url);
    WCHAR app[64];
    HKEY hkey;
    static const WCHAR wszURLProtocol[] = {'U','R','L',' ','P','r','o','t','o','c','o','l',0};
    SHELLEXECUTEINFOW sei;
    DWORD res, type;
    HRESULT hres;
 
    TRACE("%p %p\n", This, pCommandInfo );
 
    if (pCommandInfo->dwcbSize < sizeof (URLINVOKECOMMANDINFOW))
        return E_INVALIDARG;
 
    if (pCommandInfo->dwFlags != IURL_INVOKECOMMAND_FL_USE_DEFAULT_VERB)
    {
        FIXME("(%p, %p): non-default verbs not implemented\n", url, pCommandInfo);
        return E_NOTIMPL;
    }
 
    hres = CoInternetParseUrl(This->url, PARSE_SCHEMA, 0, app, ARRAY_SIZE(app), NULL, 0);
    if(FAILED(hres))
        return E_FAIL;
 
    res = RegOpenKeyW(HKEY_CLASSES_ROOT, app, &hkey);
    if(res != ERROR_SUCCESS)
        return E_FAIL;
 
    res = RegQueryValueExW(hkey, wszURLProtocol, NULL, &type, NULL, NULL);
    RegCloseKey(hkey);
    if(res != ERROR_SUCCESS || type != REG_SZ)
        return E_FAIL;
 
    memset(&sei, 0, sizeof(sei));
    sei.cbSize = sizeof(sei);
    sei.lpFile = This->url;
    sei.nShow = SW_SHOW;
 
    if( ShellExecuteExW(&sei) )
        return S_OK;
    else
        return E_FAIL;
}

Referenced by OpenURL(), and UniformResourceLocatorA_InvokeCommand().

UniformResourceLocatorW_QueryInterface()

static HRESULT WINAPI UniformResourceLocatorW_QueryInterface ( IUniformResourceLocatorW *  url, REFIID  riid, PVOID *  ppvObject  )

static

Definition at line 200 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorW(url);
    TRACE("(%p, %s, %p)\n", url, debugstr_guid(riid), ppvObject);
    return Unknown_QueryInterface(This, riid, ppvObject);
}

UniformResourceLocatorW_Release()

static ULONG WINAPI UniformResourceLocatorW_Release ( IUniformResourceLocatorW *  url )

static

Definition at line 214 of file intshcut.c.

{
    InternetShortcut *This = impl_from_IUniformResourceLocatorW(url);
    TRACE("(%p)\n", url);
    return Unknown_Release(This);
}

UniformResourceLocatorW_SetUrl()

static HRESULT WINAPI UniformResourceLocatorW_SetUrl ( IUniformResourceLocatorW *  url, LPCWSTR  pcszURL, DWORD  dwInFlags  )

static

Definition at line 221 of file intshcut.c.

{
    WCHAR *newURL = NULL;
    InternetShortcut *This = impl_from_IUniformResourceLocatorW(url);
    TRACE("(%p, %s, 0x%lx)\n", url, debugstr_w(pcszURL), dwInFlags);
    if (dwInFlags != 0)
        FIXME("ignoring unsupported flags 0x%lx\n", dwInFlags);
    if (pcszURL != NULL)
    {
        newURL = co_strdupW(pcszURL);
        if (newURL == NULL)
            return E_OUTOFMEMORY;
    }
    CoTaskMemFree(This->url);
    This->url = newURL;
    This->isDirty = TRUE;
    return S_OK;
}

Unknown_AddRef()

static ULONG Unknown_AddRef ( InternetShortcut *  This )

static

Definition at line 178 of file intshcut.c.

{
    TRACE("(%p)\n", This);
    return InterlockedIncrement(&This->refCount);
}

Referenced by PersistFile_AddRef(), PropertySetStorage_AddRef(), UniformResourceLocatorA_AddRef(), and UniformResourceLocatorW_AddRef().

Unknown_QueryInterface()

static HRESULT Unknown_QueryInterface ( InternetShortcut *  This, REFIID  riid, PVOID *  ppvObject  )

static

Definition at line 145 of file intshcut.c.

{
    TRACE("(%p, %s, %p)\n", This, debugstr_guid(riid), ppvObject);
    *ppvObject = NULL;
    if (IsEqualGUID(&IID_IUnknown, riid))
        *ppvObject = &This->IUniformResourceLocatorA_iface;
    else if (IsEqualGUID(&IID_IUniformResourceLocatorA, riid))
        *ppvObject = &This->IUniformResourceLocatorA_iface;
    else if (IsEqualGUID(&IID_IUniformResourceLocatorW, riid))
        *ppvObject = &This->IUniformResourceLocatorW_iface;
    else if (IsEqualGUID(&IID_IPersistFile, riid))
        *ppvObject = &This->IPersistFile_iface;
    else if (IsEqualGUID(&IID_IPropertySetStorage, riid))
        *ppvObject = &This->IPropertySetStorage_iface;
    else if (IsEqualGUID(&IID_IShellLinkA, riid))
    {
        FIXME("The IShellLinkA interface is not yet supported by InternetShortcut\n");
        return E_NOINTERFACE;
    }
    else if (IsEqualGUID(&IID_IShellLinkW, riid))
    {
        FIXME("The IShellLinkW interface is not yet supported by InternetShortcut\n");
        return E_NOINTERFACE;
    }
    else
    {
        FIXME("Interface with GUID %s not yet implemented by InternetShortcut\n", debugstr_guid(riid));
        return E_NOINTERFACE;
    }
    IUnknown_AddRef((IUnknown*)*ppvObject);
    return S_OK;
}

Referenced by InternetShortcut_Create(), PersistFile_QueryInterface(), PropertySetStorage_QueryInterface(), UniformResourceLocatorA_QueryInterface(), and UniformResourceLocatorW_QueryInterface().

Unknown_Release()

static ULONG Unknown_Release ( InternetShortcut *  This )

static

Definition at line 184 of file intshcut.c.

{
    ULONG count;
    TRACE("(%p)\n", This);
    count = InterlockedDecrement(&This->refCount);
    if (count == 0)
    {
        CoTaskMemFree(This->url);
        CoTaskMemFree(This->currentFile);
        IPropertySetStorage_Release(This->property_set_storage);
        free(This);
        unlock_module();
    }
    return count;
}

Referenced by InternetShortcut_Create(), OpenURL(), PersistFile_Release(), PropertySetStorage_Release(), UniformResourceLocatorA_Release(), and UniformResourceLocatorW_Release().

WINE_DEFAULT_DEBUG_CHANNEL()

WINE_DEFAULT_DEBUG_CHANNEL

(

ieframe

)

Variable Documentation

persistFileVtbl

const IPersistFileVtbl persistFileVtbl

static

Initial value:

= {
    PersistFile_QueryInterface,
    PersistFile_AddRef,
    PersistFile_Release,
    PersistFile_GetClassID,
    PersistFile_IsDirty,
    PersistFile_Load,
    PersistFile_Save,
    PersistFile_SaveCompleted,
    PersistFile_GetCurFile
}

Definition at line 768 of file intshcut.c.

Referenced by create_shortcut().

propertySetStorageVtbl

const IPropertySetStorageVtbl propertySetStorageVtbl

static

Initial value:

= {
    PropertySetStorage_QueryInterface,
    PropertySetStorage_AddRef,
    PropertySetStorage_Release,
    PropertySetStorage_Create,
    PropertySetStorage_Open,
    PropertySetStorage_Delete,
    PropertySetStorage_Enum
}

Definition at line 780 of file intshcut.c.

Referenced by create_shortcut().

uniformResourceLocatorAVtbl

const IUniformResourceLocatorAVtbl uniformResourceLocatorAVtbl

static

Initial value:

= {
    UniformResourceLocatorA_QueryInterface,
    UniformResourceLocatorA_AddRef,
    UniformResourceLocatorA_Release,
    UniformResourceLocatorA_SetUrl,
    UniformResourceLocatorA_GetUrl,
    UniformResourceLocatorA_InvokeCommand
}

Definition at line 759 of file intshcut.c.

Referenced by create_shortcut().

uniformResourceLocatorWVtbl

const IUniformResourceLocatorWVtbl uniformResourceLocatorWVtbl

static

Initial value:

= {
    UniformResourceLocatorW_QueryInterface,
    UniformResourceLocatorW_AddRef,
    UniformResourceLocatorW_Release,
    UniformResourceLocatorW_SetUrl,
    UniformResourceLocatorW_GetUrl,
    UniformResourceLocatorW_InvokeCommand
}

Definition at line 750 of file intshcut.c.

Referenced by create_shortcut().