aboutsummaryrefslogtreecommitdiff
path: root/Src/Winamp/ApplicationCOM.cpp
diff options
context:
space:
mode:
Diffstat (limited to 'Src/Winamp/ApplicationCOM.cpp')
-rw-r--r--Src/Winamp/ApplicationCOM.cpp321
1 files changed, 321 insertions, 0 deletions
diff --git a/Src/Winamp/ApplicationCOM.cpp b/Src/Winamp/ApplicationCOM.cpp
new file mode 100644
index 00000000..509db740
--- /dev/null
+++ b/Src/Winamp/ApplicationCOM.cpp
@@ -0,0 +1,321 @@
+/** (c) Nullsoft, Inc. C O N F I D E N T I A L
+ ** Filename:
+ ** Project:
+ ** Description:
+ ** Author: Ben Allison benski@nullsoft.com
+ ** Created:
+ **/
+#include "main.h"
+#include "ApplicationCOM.h"
+#include "../nu/AutoWide.h"
+#include "../nu/AutoChar.h"
+#include "../nu/ns_wc.h"
+#include "api.h"
+#include "../Plugins/General/gen_ml/ml.h"
+#include <api/syscb/callbacks/browsercb.h>
+#include "../Agave/Language/api_language.h"
+HINSTANCE WASABI_API_LNG_HINST;
+HINSTANCE WASABI_API_ORIG_HINST;
+#include <shlwapi.h>
+#include "TempFileCOM.h"
+#include "resource.h"
+#include "JSAPI.h"
+
+#define CSTR_INVARIANT MAKELCID(MAKELANGID(LANG_ENGLISH, SUBLANG_ENGLISH_US), SORT_DEFAULT)
+
+bool FilterUrl(const wchar_t *url)
+{
+ const wchar_t filterNowPlaying[] = L"http://client.winamp.com/nowplaying";
+ size_t urlLength, filterLength;
+ if (NULL == url)
+ return false;
+
+ urlLength = lstrlenW(url);
+ filterLength = ARRAYSIZE(filterNowPlaying) - 1;
+ if (urlLength >= filterLength &&
+ CSTR_EQUAL == CompareStringW(CSTR_INVARIANT, NORM_IGNORECASE,
+ url, (int)filterLength, filterNowPlaying, (int)filterLength))
+ {
+ return true;
+ }
+
+ return false;
+}
+
+void myOpenURL(HWND hwnd, const wchar_t *loc)
+{
+ if (loc)
+ {
+ bool override=false;
+ WASABI_API_SYSCB->syscb_issueCallback(SysCallback::BROWSER, BrowserCallback::ONOPENURL, reinterpret_cast<intptr_t>(loc), reinterpret_cast<intptr_t>(&override));
+ if (!override && false == FilterUrl(loc))
+ ShellExecuteW(hwnd, L"open", loc, NULL, NULL, SW_SHOWNORMAL);
+ }
+}
+
+void myOpenURLWithFallback(HWND hwnd, wchar_t *loc, wchar_t *fallbackLoc)
+{
+ bool override=false;
+ if (loc)
+ {
+ WASABI_API_SYSCB->syscb_issueCallback(SysCallback::BROWSER, BrowserCallback::ONOPENURL, reinterpret_cast<intptr_t>(loc), reinterpret_cast<intptr_t>(&override));
+ }
+ if (!override && false == FilterUrl(loc) && fallbackLoc)
+ ShellExecuteW(hwnd, L"open", fallbackLoc, NULL, NULL, SW_SHOWNORMAL);
+}
+
+
+enum
+{
+ DISP_APPLICATION_IDLE = 777,
+ DISP_APPLICATION_GETLANGUAGE,
+ DISP_APPLICATION_ISWINAMPPRO,
+ DISP_APPLICATION_GETCOUNTRY,
+ DISP_APPLICATION_GETLOCALE,
+ DISP_APPLICATION_LAUNCHURL,
+ DISP_APPLICATION_VERSION,
+ DISP_APPLICATION_SPECIALBUILD,
+ DISP_APPLICATION_DOWNLOADMEDIA,
+ DISP_APPLICATION_CREATETEMPFILE,
+};
+
+#define CHECK_ID(str, id)\
+ if (CSTR_EQUAL == CompareStringW(lcid, NORM_IGNORECASE, rgszNames[i], -1, L##str, -1))\
+ { rgdispid[i] = id; continue; }
+
+HRESULT ApplicationCOM::GetIDsOfNames(REFIID riid, OLECHAR FAR* FAR* rgszNames, unsigned int cNames, LCID lcid, DISPID FAR* rgdispid)
+{
+ bool unknowns = false;
+ for (unsigned int i = 0;i != cNames;i++)
+ {
+ CHECK_ID("Idle", DISP_APPLICATION_IDLE)
+ CHECK_ID("GetLanguage", DISP_APPLICATION_GETLANGUAGE)
+ CHECK_ID("IsWinampPro", DISP_APPLICATION_ISWINAMPPRO)
+ CHECK_ID("GetCountry", DISP_APPLICATION_GETCOUNTRY)
+ CHECK_ID("GetLocale", DISP_APPLICATION_GETLOCALE)
+ CHECK_ID("LaunchURL", DISP_APPLICATION_LAUNCHURL)
+ CHECK_ID("Version", DISP_APPLICATION_VERSION)
+ CHECK_ID("GetSpecialBuildName", DISP_APPLICATION_SPECIALBUILD)
+ CHECK_ID("DownloadMedia", DISP_APPLICATION_DOWNLOADMEDIA)
+ CHECK_ID("CreateTempFile", DISP_APPLICATION_CREATETEMPFILE)
+ rgdispid[i] = DISPID_UNKNOWN;
+ unknowns = true;
+ }
+ if (unknowns)
+ return DISP_E_UNKNOWNNAME;
+ else
+ return S_OK;
+}
+
+HRESULT ApplicationCOM::GetTypeInfo(unsigned int itinfo, LCID lcid, ITypeInfo FAR* FAR* pptinfo)
+{
+ return E_NOTIMPL;
+}
+
+HRESULT ApplicationCOM::GetTypeInfoCount(unsigned int FAR * pctinfo)
+{
+ return E_NOTIMPL;
+}
+
+void GetLanguage(wchar_t *language, size_t size)
+{
+ StringCchCopyW(language, size, WASABI_API_LNG->GetLanguageIdentifier(LANG_LANG_CODE));
+}
+
+void GetCountry(wchar_t *language, size_t size)
+{
+ // language packs aren't country-specific enough to use them for country info, yet
+ int err = GetLocaleInfoW(LOCALE_USER_DEFAULT, LOCALE_SISO3166CTRYNAME , language, (int)size);
+ if (err == 0) // win95 doesn't support this flag, so we'll check for an error
+ lstrcpynW(language, L"US", (int)size); // and default to english
+}
+
+void CALLBACK OpenURLAPC(ULONG_PTR param)
+{
+ wchar_t *url = (wchar_t *)param;
+ myOpenURL(NULL, url);
+ free(url);
+}
+
+void GetPathToStore(wchar_t path_to_store[MAX_PATH])
+{
+ if (FAILED(SHGetFolderPathW(NULL, CSIDL_MYMUSIC, NULL, SHGFP_TYPE_CURRENT, path_to_store)))
+ {
+ if (FAILED(SHGetFolderPathW(NULL, CSIDL_PERSONAL, NULL, SHGFP_TYPE_CURRENT, path_to_store)))
+ {
+ // and if that all fails then do a reasonable default
+ GetPrivateProfileStringW(L"gen_ml_config", L"extractpath", L"C:\\My Music", path_to_store, MAX_PATH, ML_INI_FILE);
+ }
+ // if there's no valid My Music folder (typically win2k) then default to %my_documents%\my music
+ else
+ {
+ PathCombineW(path_to_store, path_to_store, L"My Music");
+ }
+ }
+}
+
+static void CALLBACK SendOpenUrl_Callback(HWND hwnd, UINT uMsg, ULONG_PTR dwData, LRESULT lResult)
+{
+ if (NULL != dwData)
+ free((void*)dwData);
+}
+
+HRESULT ApplicationCOM::Invoke(DISPID dispid, REFIID riid, LCID lcid, WORD wFlags, DISPPARAMS FAR *pdispparams, VARIANT FAR *pvarResult, EXCEPINFO FAR * pexecinfo, unsigned int FAR *puArgErr)
+{
+ switch (dispid)
+ {
+ case DISP_APPLICATION_CREATETEMPFILE:
+ {
+ IDispatch *tempFile =0;
+ if (pdispparams->cArgs == 1)
+ tempFile = new TempFileCOM(pdispparams->rgvarg[0].bstrVal);
+ else
+ tempFile = new TempFileCOM(0);
+
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_DISPATCH;
+ V_DISPATCH(pvarResult) = tempFile;
+ return S_OK;
+ }
+ case DISP_APPLICATION_DOWNLOADMEDIA:
+ {
+ const wchar_t *url = pdispparams->rgvarg[0].bstrVal;
+ if (url)
+ {
+ const wchar_t *destFileSpec=PathFindFileNameW(url);
+ wchar_t path_to_store[MAX_PATH] = {0};
+ GetPathToStore(path_to_store);
+ wchar_t destfile[MAX_PATH] = {0};
+ wchar_t dlgtitle[256] = {0};
+
+ CreateDirectoryW(path_to_store, NULL);
+
+ PathCombineW(destfile, path_to_store, destFileSpec);
+ httpRetrieveFileW(hMainWindow, AutoChar(url), destfile, getStringW(IDS_DOWNLOADING, dlgtitle,256));
+ LMDB_FILE_ADD_INFOW fi = {const_cast<wchar_t *>(destfile), -1, -1};
+ sendMlIpc(ML_IPC_DB_ADDORUPDATEFILEW, (WPARAM)&fi);
+ sendMlIpc(ML_IPC_DB_SYNCDB, 0);
+ }
+ }
+ return S_OK;
+ case DISP_APPLICATION_IDLE:
+ //Idle();
+ return S_OK;
+ case DISP_APPLICATION_GETLANGUAGE:
+ {
+ wchar_t langName[8] = {0};
+ GetLanguage(langName, 8);
+
+ BSTR language = SysAllocString(langName);
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_BSTR;
+ V_BSTR(pvarResult) = language;
+ return S_OK;
+ }
+ case DISP_APPLICATION_GETCOUNTRY:
+ {
+ wchar_t countryName[8] = {0};
+ GetCountry(countryName, 8);
+
+ BSTR country = SysAllocString(countryName);
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_BSTR;
+ V_BSTR(pvarResult) = country;
+ return S_OK;
+ }
+ case DISP_APPLICATION_GETLOCALE:
+ {
+ wchar_t countryName[8] = {0};
+ GetCountry(countryName, 8);
+
+ wchar_t langName[8] = {0};
+ GetLanguage(langName, 8);
+
+ wchar_t language_country[16] = {0};
+ StringCchPrintfW(language_country, 16, L"%s-%s", langName, countryName);
+
+ BSTR languageAndCountryCode = SysAllocString(language_country);
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_BSTR;
+ V_BSTR(pvarResult) = languageAndCountryCode;
+ return S_OK;
+ }
+ case DISP_APPLICATION_ISWINAMPPRO:
+ {
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_BOOL;
+ V_BOOL(pvarResult) = VARIANT_TRUE;
+ return S_OK;
+ }
+ case DISP_APPLICATION_LAUNCHURL:
+ if (pdispparams->cArgs == 1 || pdispparams->cArgs == 2)
+ {
+ if (JSAPI_PARAM_OPTIONAL(pdispparams, 2, boolVal, FALSE) == TRUE)
+ ShellExecuteW(NULL, L"open", JSAPI_PARAM(pdispparams, 1).bstrVal, NULL, L".", 0);
+ else
+ {
+ LPWSTR url = _wcsdup(JSAPI_PARAM(pdispparams, 1).bstrVal);
+ if ( 0 == SendMessageCallback(hMainWindow, WM_WA_IPC, (WPARAM)url, (LPARAM)IPC_OPEN_URL, SendOpenUrl_Callback, (ULONG_PTR)url) &&
+ 0 == QueueUserAPC(OpenURLAPC, hMainThread, (ULONG_PTR)url))
+ {
+ free(url);
+ }
+ }
+
+ return S_OK;
+ }
+ else
+ return DISP_E_BADPARAMCOUNT;
+ case DISP_APPLICATION_VERSION:
+ {
+ AutoWide versionW(APP_VERSION);
+ BSTR versionB = SysAllocString(versionW);
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_BSTR;
+ V_BSTR(pvarResult) = versionB;
+ return S_OK;
+ }
+ case DISP_APPLICATION_SPECIALBUILD:
+ {
+ BSTR special = SysAllocString(SPECIAL_BUILD_NAME);
+ VariantInit(pvarResult);
+ V_VT(pvarResult) = VT_BSTR;
+ V_BSTR(pvarResult) = special;
+ return S_OK;
+ }
+ }
+ return DISP_E_MEMBERNOTFOUND;
+}
+
+STDMETHODIMP ApplicationCOM::QueryInterface(REFIID riid, PVOID *ppvObject)
+{
+ if (!ppvObject)
+ return E_POINTER;
+ else if (IsEqualIID(riid, IID_IDispatch))
+ *ppvObject = (IDispatch *)this;
+ else if (IsEqualIID(riid, IID_IUnknown))
+ *ppvObject = this;
+ else
+ {
+ *ppvObject = NULL;
+ return E_NOINTERFACE;
+ }
+
+ AddRef();
+ return S_OK;
+}
+
+ULONG ApplicationCOM::AddRef(void)
+{
+ return 0;
+}
+
+ULONG ApplicationCOM::Release(void)
+{
+ return 0;
+}
+
+void ApplicationCOM::Idle()
+{
+ WASABI_API_APP->app_messageLoopStep();
+} \ No newline at end of file
generated by cgit (git 2.34.1) at 2025-04-30 09:09:09 -0400