319 lines
8.7 KiB
C++
319 lines
8.7 KiB
C++
// Functions stolen from shdocvw\util.cpp
|
|
|
|
#include "stdafx.h"
|
|
#pragma hdrstop
|
|
#include "dsubscri.h"
|
|
|
|
|
|
|
|
|
|
// Helper function for getting the TopLeft point of an element from
|
|
// mshtml.dll, and have the point reported in inside relative
|
|
// coordinates (inside margins, borders and padding.)
|
|
|
|
HRESULT CSSOM_TopLeft(IHTMLElement * pIElem, POINT * ppt)
|
|
{
|
|
HRESULT hr = E_FAIL;
|
|
IHTMLStyle *pistyle;
|
|
|
|
if (SUCCEEDED(pIElem->get_style(&pistyle)) && pistyle) {
|
|
VARIANT var = {0};
|
|
|
|
if (SUCCEEDED(pistyle->get_top(&var)) && var.bstrVal) {
|
|
ppt->y = StrToIntW(var.bstrVal);
|
|
VariantClear(&var);
|
|
|
|
if (SUCCEEDED(pistyle->get_left(&var)) && var.bstrVal) {
|
|
ppt->x = StrToIntW(var.bstrVal);
|
|
VariantClear(&var);
|
|
hr = S_OK;
|
|
}
|
|
}
|
|
|
|
pistyle->Release();
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT GetHTMLElementStrMember(IHTMLElement *pielem, LPTSTR pszName, DWORD cchSize, BSTR bstrMember)
|
|
{
|
|
HRESULT hr;
|
|
VARIANT var = {0};
|
|
|
|
if (!pielem)
|
|
hr = E_INVALIDARG;
|
|
else if (SUCCEEDED(hr = pielem->getAttribute(bstrMember, TRUE, &var)))
|
|
{
|
|
if ((VT_BSTR == var.vt) && (var.bstrVal))
|
|
{
|
|
#ifdef UNICODE
|
|
StrCpyNW(pszName, (LPCWSTR)var.bstrVal, cchSize);
|
|
#else // UNICODE
|
|
SHUnicodeToAnsi((BSTR)var.bstrVal, pszName, cchSize);
|
|
#endif // UNICODE
|
|
}
|
|
else
|
|
hr = E_FAIL; // Try VariantChangeType?????
|
|
|
|
VariantClear(&var);
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
/****\
|
|
FUNCTION: IElemCheckForExistingSubscription()
|
|
|
|
RETURN VALUE:
|
|
S_OK - if the IHTMLElement points to a TAG that has a "subscribed_url" property
|
|
that is subscribed.
|
|
S_FALSE - if the IHTMLElement points to a TAG that has a
|
|
"subscribed_url" property but the URL is not subscribed.
|
|
E_FAIL - if the IHTMLElement points to a TAG that does not
|
|
have a "subscribed_url" property.
|
|
\****/
|
|
HRESULT IElemCheckForExistingSubscription(IHTMLElement *pielem)
|
|
{
|
|
HRESULT hr = E_FAIL;
|
|
TCHAR szHTMLElementName[MAX_URL_STRING];
|
|
|
|
if (!pielem)
|
|
return E_INVALIDARG;
|
|
|
|
if (SUCCEEDED(GetHTMLElementStrMember(pielem, szHTMLElementName, SIZECHARS(szHTMLElementName), (BSTR)(s_sstrSubSRCMember.wsz))))
|
|
hr = (CheckForExistingSubscription(szHTMLElementName) ? S_OK : S_FALSE);
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT IElemCloseDesktopComp(IHTMLElement *pielem)
|
|
{
|
|
HRESULT hr;
|
|
TCHAR szHTMLElementID[MAX_URL_STRING];
|
|
|
|
ASSERT(pielem);
|
|
if (pielem &&
|
|
SUCCEEDED(hr = GetHTMLElementStrMember(pielem, szHTMLElementID, SIZECHARS(szHTMLElementID), (BSTR)(s_sstrIDMember.wsz))))
|
|
{
|
|
hr = UpdateComponentFlags(szHTMLElementID, COMP_CHECKED | COMP_UNCHECKED, COMP_UNCHECKED) ? S_OK : E_FAIL;
|
|
ASSERT(SUCCEEDED(hr));
|
|
if (SUCCEEDED(hr))
|
|
REFRESHACTIVEDESKTOP();
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT IElemGetSubscriptionsDialog(IHTMLElement *pielem, HWND hwnd)
|
|
{
|
|
HRESULT hr;
|
|
TCHAR szHTMLElementName[MAX_URL_STRING];
|
|
|
|
ASSERT(pielem);
|
|
if (SUCCEEDED(hr = GetHTMLElementStrMember(pielem, szHTMLElementName, SIZECHARS(szHTMLElementName), (BSTR)(s_sstrSubSRCMember.wsz))))
|
|
{
|
|
ASSERT(CheckForExistingSubscription(szHTMLElementName)); // We should not have gotten this far.
|
|
hr = ShowSubscriptionProperties(szHTMLElementName, hwnd);
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT IElemSubscribeDialog(IHTMLElement *pielem, HWND hwnd)
|
|
{
|
|
HRESULT hr;
|
|
TCHAR szHTMLElementName[MAX_URL_STRING];
|
|
|
|
ASSERT(pielem);
|
|
hr = GetHTMLElementStrMember(pielem, szHTMLElementName, SIZECHARS(szHTMLElementName), (BSTR)(s_sstrSubSRCMember.wsz));
|
|
if (SUCCEEDED(hr))
|
|
{
|
|
ASSERT(!CheckForExistingSubscription(szHTMLElementName)); // We should not have gotten this far.
|
|
hr = CreateSubscriptionsWizard(SUBSTYPE_DESKTOPURL, szHTMLElementName, NULL, hwnd);
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT IElemUnsubscribe(IHTMLElement *pielem)
|
|
{
|
|
HRESULT hr;
|
|
TCHAR szHTMLElementName[MAX_URL_STRING];
|
|
|
|
ASSERT(pielem);
|
|
hr = GetHTMLElementStrMember(pielem, szHTMLElementName, SIZECHARS(szHTMLElementName), (BSTR)(s_sstrSubSRCMember.wsz));
|
|
if (SUCCEEDED(hr))
|
|
{
|
|
ASSERT(CheckForExistingSubscription(szHTMLElementName)); // We should not have gotten this far.
|
|
hr = DeleteFromSubscriptionList(szHTMLElementName) ? S_OK : S_FALSE;
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT IElemUpdate(IHTMLElement *pielem)
|
|
{
|
|
HRESULT hr;
|
|
TCHAR szHTMLElementName[MAX_URL_STRING];
|
|
|
|
ASSERT(pielem);
|
|
hr = GetHTMLElementStrMember(pielem, szHTMLElementName, SIZECHARS(szHTMLElementName), (BSTR)(s_sstrSubSRCMember.wsz));
|
|
if (SUCCEEDED(hr))
|
|
{
|
|
ASSERT(CheckForExistingSubscription(szHTMLElementName)); // We should not have gotten this far.
|
|
hr = UpdateSubscription(szHTMLElementName) ? S_OK : S_FALSE;
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT IElemOpenInNewWindow(IHTMLElement *pielem, IOleClientSite *piOCSite, BOOL fShowFrame, LONG width, LONG height)
|
|
{
|
|
HRESULT hr;
|
|
TCHAR szTemp[MAX_URL_STRING];
|
|
BSTR bstrURL;
|
|
|
|
ASSERT(pielem);
|
|
|
|
hr = GetHTMLElementStrMember(pielem, szTemp, SIZECHARS(szTemp), (BSTR)(s_sstrSubSRCMember.wsz));
|
|
|
|
if (SUCCEEDED(hr) && (bstrURL = SysAllocStringT(szTemp)))
|
|
{
|
|
IHTMLWindow2 *pihtmlWindow2, *pihtmlWindow2New = NULL;
|
|
BSTR bstrFeatures = 0;
|
|
|
|
if (!fShowFrame)
|
|
{
|
|
wnsprintf(szTemp, ARRAYSIZE(szTemp), TEXT("height=%li, width=%li, status=no, toolbar=no, menubar=no, location=no, resizable=no"), height, width);
|
|
bstrFeatures = SysAllocString((OLECHAR FAR *)szTemp);
|
|
}
|
|
|
|
hr = IUnknown_QueryService(piOCSite, SID_SHTMLWindow, IID_IHTMLWindow2, (LPVOID*)&pihtmlWindow2);
|
|
|
|
if (SUCCEEDED(hr) && pihtmlWindow2)
|
|
{
|
|
pihtmlWindow2->open(bstrURL, NULL, bstrFeatures, NULL, &pihtmlWindow2New);
|
|
pihtmlWindow2->Release();
|
|
ATOMICRELEASE(pihtmlWindow2New);
|
|
}
|
|
|
|
SysFreeString(bstrURL);
|
|
if (bstrFeatures)
|
|
SysFreeString(bstrFeatures);
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT ShowSubscriptionProperties(LPCTSTR pszUrl, HWND hwnd)
|
|
{
|
|
HRESULT hr;
|
|
ISubscriptionMgr *psm;
|
|
|
|
if (SUCCEEDED(hr = CoCreateInstance(CLSID_SubscriptionMgr, NULL, CLSCTX_INPROC_SERVER, IID_ISubscriptionMgr, (void**)&psm)))
|
|
{
|
|
WCHAR wszUrl[MAX_URL_STRING];
|
|
|
|
SHTCharToUnicode(pszUrl, wszUrl, ARRAYSIZE(wszUrl));
|
|
|
|
hr = psm->ShowSubscriptionProperties(wszUrl, hwnd);
|
|
psm->Release();
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
HRESULT CreateSubscriptionsWizard(SUBSCRIPTIONTYPE subType, LPCTSTR pszUrl, SUBSCRIPTIONINFO *pInfo, HWND hwnd)
|
|
{
|
|
HRESULT hr;
|
|
ISubscriptionMgr *psm;
|
|
|
|
if (SUCCEEDED(hr = CoCreateInstance(CLSID_SubscriptionMgr, NULL, CLSCTX_INPROC_SERVER, IID_ISubscriptionMgr, (void**)&psm)))
|
|
{
|
|
WCHAR wzURL[MAX_URL_STRING];
|
|
LPCWSTR pwzURL = wzURL;
|
|
|
|
#ifndef UNICODE
|
|
SHAnsiToUnicode(pszUrl, wzURL, ARRAYSIZE(wzURL));
|
|
#else // UNICODE
|
|
pwzURL = pszUrl;
|
|
#endif // UNICODE
|
|
|
|
hr = psm->CreateSubscription(hwnd, pwzURL, pwzURL, CREATESUBS_ADDTOFAVORITES, subType, pInfo);
|
|
psm->UpdateSubscription(pwzURL);
|
|
psm->Release();
|
|
}
|
|
|
|
return hr;
|
|
}
|
|
|
|
BOOL GetInfoTip(IShellFolder* psf, LPCITEMIDLIST pidl, LPTSTR pszText, int cchTextMax)
|
|
{
|
|
BOOL fRet = FALSE;
|
|
|
|
*pszText = 0; // empty for failure
|
|
|
|
if (pidl)
|
|
{
|
|
IQueryInfo *pqi;
|
|
if (SUCCEEDED(psf->GetUIObjectOf(NULL, 1, &pidl, IID_IQueryInfo, NULL, (void**)&pqi)))
|
|
{
|
|
WCHAR *pwszTip;
|
|
pqi->GetInfoTip(0, &pwszTip);
|
|
if (pwszTip)
|
|
{
|
|
fRet = TRUE;
|
|
SHUnicodeToTChar(pwszTip, pszText, cchTextMax);
|
|
SHFree(pwszTip);
|
|
}
|
|
pqi->Release();
|
|
}
|
|
}
|
|
return fRet;
|
|
}
|
|
|
|
|
|
// Use the pOleStr directly if we have one (since it might be bigger
|
|
// than MAX_PATH); otherwise, copy it into our private buffer (since
|
|
// it would then be a cStr or uOffset, which will fit into our buffer).
|
|
|
|
BSTR StrRetToBStr(LPCITEMIDLIST pidl, STRRET *pstr)
|
|
{
|
|
BSTR bstr;
|
|
if (pstr->uType == STRRET_WSTR)
|
|
{
|
|
bstr = SysAllocString(pstr->pOleStr);
|
|
SHFree(pstr->pOleStr);
|
|
}
|
|
else
|
|
{
|
|
WCHAR wszPath[MAX_PATH];
|
|
StrRetToBufW(pstr, pidl, wszPath, ARRAYSIZE(wszPath)); // NULLs output buffer on failure
|
|
bstr = SysAllocString(wszPath);
|
|
}
|
|
return bstr;
|
|
}
|
|
|
|
#if 0 // BUGBUG - g_dfs.DefRevCount - raymondc - incomplete
|
|
|
|
void SaveDefaultFolderSettings()
|
|
{
|
|
HKEY hkCabStreams;
|
|
|
|
g_dfs.dwDefRevCount++;
|
|
if (RegOpenKey(g_hkeyExplorer, c_szStreams, &hkCabStreams) == ERROR_SUCCESS)
|
|
{
|
|
RegSetValueEx(hkCabStreams, TEXT("Settings"), 0L, REG_BINARY, (LPBYTE)&g_dfs, SIZEOF(g_dfs));
|
|
RegCloseKey(hkCabStreams);
|
|
}
|
|
}
|
|
|
|
#else
|
|
|
|
void SaveDefaultFolderSettings() // BUGBUG raymondc
|
|
{
|
|
}
|
|
|
|
#endif
|