mirror of https://github.com/tongzx/nt5src
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
1168 lines
34 KiB
1168 lines
34 KiB
#include "shellprv.h"
|
|
#pragma hdrstop
|
|
|
|
#include "control.h"
|
|
#include "uemapp.h"
|
|
|
|
#include <limits.h>
|
|
|
|
#define TF_CPL TF_CUSTOM2
|
|
|
|
typedef struct
|
|
{
|
|
ATOM aCPL; // CPL name atom (so we can match requests)
|
|
ATOM aApplet; // applet name atom (so we can match requests, may be zero)
|
|
HWND hwndStub; // window for this dude (so we can switch to it)
|
|
UINT flags; // see PCPLIF_ flags below
|
|
} CPLAPPLETID;
|
|
|
|
//
|
|
// PCPLIF_DEFAULT_APPLET
|
|
// There are two ways of getting the default applet, asking for it my name
|
|
// and passing an empty applet name. This flag should be set regardless,
|
|
// so that the code which switches to an already-active applet can always
|
|
// find a previous instance if it exists.
|
|
//
|
|
|
|
#define PCPLIF_DEFAULT_APPLET (0x1)
|
|
|
|
typedef struct
|
|
{
|
|
int icon;
|
|
TCHAR cpl[ CCHPATHMAX ];
|
|
TCHAR applet[ MAX_CCH_CPLNAME ];
|
|
TCHAR *params;
|
|
} CPLEXECINFO;
|
|
|
|
ATOM aCPLName = (ATOM)0;
|
|
ATOM aCPLFlags = (ATOM)0;
|
|
|
|
void CPL_ParseCommandLine (CPLEXECINFO *info, LPTSTR pszCmdLine, BOOL extract_icon);
|
|
BOOL CPL_LoadAndFindApplet (LPCPLMODULE *pcplm, HICON *phIcon, UINT *puControl, CPLEXECINFO *info);
|
|
|
|
BOOL CPL_FindCPLInfo(LPTSTR pszCmdLine, HICON *phIcon, UINT *ppapl, LPTSTR *pparm)
|
|
{
|
|
LPCPLMODULE pmod;
|
|
CPLEXECINFO info;
|
|
|
|
CPL_ParseCommandLine(&info, pszCmdLine, TRUE);
|
|
|
|
if (CPL_LoadAndFindApplet(&pmod, phIcon, ppapl, &info))
|
|
{
|
|
*pparm = info.params;
|
|
CPL_FreeCPLModule(pmod);
|
|
return TRUE;
|
|
}
|
|
|
|
*pparm = NULL;
|
|
return FALSE;
|
|
}
|
|
|
|
typedef struct _fcc {
|
|
LPTSTR lpszClassStub;
|
|
CPLAPPLETID *target;
|
|
HWND hwndMatch;
|
|
} FCC, *LPFCC;
|
|
|
|
|
|
BOOL _FindCPLCallback(HWND hwnd, LPARAM lParam)
|
|
{
|
|
LPFCC lpfcc = (LPFCC)lParam;
|
|
TCHAR szClass[32];
|
|
|
|
GetClassName(hwnd, szClass, ARRAYSIZE(szClass));
|
|
|
|
if (lstrcmp(szClass, lpfcc->lpszClassStub) == 0) // Must be same class...
|
|
{
|
|
// Found a stub window
|
|
if (lpfcc->target->aCPL != 0)
|
|
{
|
|
HANDLE hHandle;
|
|
|
|
ATOM aCPL;
|
|
hHandle = GetProp(hwnd, (LPCTSTR)(DWORD_PTR)aCPLName);
|
|
|
|
ASSERT((DWORD_PTR) hHandle < USHRT_MAX);
|
|
aCPL = (ATOM)(DWORD_PTR) hHandle;
|
|
|
|
if (aCPL != 0 && aCPL == lpfcc->target->aCPL)
|
|
{
|
|
ATOM aApplet;
|
|
hHandle = GetProp(hwnd, (LPCTSTR)(DWORD_PTR)aCPL);
|
|
aApplet = (ATOM)(DWORD_PTR) hHandle;
|
|
ASSERT((DWORD_PTR) hHandle < USHRT_MAX);
|
|
|
|
// users may request any applet by name
|
|
if (aApplet != 0 && aApplet == lpfcc->target->aApplet)
|
|
{
|
|
lpfcc->hwndMatch = hwnd;
|
|
return FALSE;
|
|
}
|
|
//
|
|
// Users may request the default w/o specifying a name
|
|
//
|
|
if (lpfcc->target->flags & PCPLIF_DEFAULT_APPLET)
|
|
{
|
|
UINT flags = HandleToUlong(GetProp(hwnd, MAKEINTATOM(aCPLFlags)));
|
|
|
|
if (flags & PCPLIF_DEFAULT_APPLET)
|
|
{
|
|
lpfcc->hwndMatch = hwnd;
|
|
return FALSE;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return TRUE;
|
|
}
|
|
|
|
HWND FindCPL(HWND hwndStub, CPLAPPLETID *target)
|
|
{
|
|
FCC fcc;
|
|
TCHAR szClassStub[32];
|
|
|
|
if (aCPLName == (ATOM)0)
|
|
{
|
|
aCPLName = GlobalAddAtom(TEXT("CPLName"));
|
|
aCPLFlags = GlobalAddAtom(TEXT("CPLFlags"));
|
|
|
|
if (aCPLName == (ATOM)0 || aCPLFlags == (ATOM)0)
|
|
return NULL; // This should never happen... didn't find hwnd
|
|
}
|
|
|
|
szClassStub[0] = '\0'; // a NULL hwnd has no class
|
|
if (hwndStub)
|
|
{
|
|
GetClassName(hwndStub, szClassStub, ARRAYSIZE(szClassStub));
|
|
}
|
|
fcc.lpszClassStub = szClassStub;
|
|
fcc.target = target;
|
|
fcc.hwndMatch = (HWND)0;
|
|
|
|
EnumWindows(_FindCPLCallback, (LPARAM)&fcc);
|
|
|
|
return fcc.hwndMatch;
|
|
}
|
|
|
|
//----------------------------------------------------------------------------
|
|
// parsing helper for comma lists
|
|
//
|
|
|
|
TCHAR *CPL_ParseToSeparator(TCHAR *dst, TCHAR *psrc, size_t dstmax, BOOL spacedelimits)
|
|
{
|
|
if (psrc)
|
|
{
|
|
TCHAR source[CCHPATHMAX], *src;
|
|
TCHAR *delimiter, *closingquote = NULL;
|
|
|
|
lstrcpyn(source, psrc, (int)((dstmax < ARRAYSIZE(source)) ? dstmax : ARRAYSIZE(source)));
|
|
src = source;
|
|
|
|
//
|
|
// eat whitespace
|
|
//
|
|
|
|
while(*src == TEXT(' '))
|
|
src++;
|
|
|
|
delimiter = src;
|
|
|
|
//
|
|
// ignore stuff inside quoted strings
|
|
//
|
|
|
|
if (*src == TEXT('"'))
|
|
{
|
|
//
|
|
// start after first quote, advance src past quote
|
|
//
|
|
|
|
closingquote = ++src;
|
|
|
|
while(*closingquote && *closingquote != TEXT('"'))
|
|
closingquote++;
|
|
|
|
//
|
|
// see if loop above ended on a quote
|
|
//
|
|
|
|
if (*closingquote)
|
|
{
|
|
//
|
|
// temporary NULL termination
|
|
//
|
|
|
|
*closingquote = 0;
|
|
|
|
//
|
|
// start looking for delimiter again after quotes
|
|
//
|
|
|
|
delimiter = closingquote + 1;
|
|
}
|
|
else
|
|
closingquote = NULL;
|
|
}
|
|
|
|
if (spacedelimits)
|
|
{
|
|
delimiter += StrCSpn(delimiter, TEXT(", "));
|
|
|
|
if (!*delimiter)
|
|
delimiter = NULL;
|
|
}
|
|
else
|
|
delimiter = StrChr(delimiter, TEXT(','));
|
|
|
|
//
|
|
// temporary NULL termination
|
|
//
|
|
|
|
if (delimiter)
|
|
*delimiter = 0;
|
|
|
|
if (dst)
|
|
{
|
|
lstrcpyn(dst, src, (int)dstmax);
|
|
dst[ dstmax - 1 ] = 0;
|
|
}
|
|
|
|
//
|
|
// put back stuff we terminated above
|
|
//
|
|
|
|
if (delimiter)
|
|
*delimiter = TEXT(',');
|
|
|
|
if (closingquote)
|
|
*closingquote = TEXT('"');
|
|
|
|
//
|
|
// return start of next string
|
|
//
|
|
|
|
psrc = (delimiter ? (psrc + ((delimiter + 1) - source)) : NULL);
|
|
}
|
|
else if (dst)
|
|
{
|
|
*dst = 0;
|
|
}
|
|
|
|
//
|
|
// new source location
|
|
//
|
|
|
|
return psrc;
|
|
}
|
|
|
|
|
|
// parse the Control_RunDLL command line
|
|
// format: "CPL name, applet name, extra params"
|
|
// format: "CPL name, icon index, applet name, extra params"
|
|
//
|
|
// NOTE: [stevecat] 3/10/95
|
|
//
|
|
// The 'extra params' do not have to be delimited by a ","
|
|
// in NT for the case "CPL name applet name extra params"
|
|
//
|
|
// A workaround for applet names that include a space
|
|
// in their name would be to enclose that value in
|
|
// double quotes (see the CPL_ParseToSeparator routine.)
|
|
//
|
|
|
|
void CPL_ParseCommandLine(CPLEXECINFO *info, LPTSTR pszCmdLine, BOOL extract_icon)
|
|
{
|
|
//
|
|
// parse out the CPL name, spaces are valid separators
|
|
//
|
|
|
|
pszCmdLine = CPL_ParseToSeparator(info->cpl, pszCmdLine, CCHPATHMAX, TRUE);
|
|
|
|
if (extract_icon)
|
|
{
|
|
TCHAR icon[ 8 ];
|
|
|
|
//
|
|
// parse out the icon id/index, spaces are not valid separators
|
|
//
|
|
|
|
pszCmdLine = CPL_ParseToSeparator(icon, pszCmdLine, ARRAYSIZE(icon), FALSE);
|
|
|
|
info->icon = StrToInt(icon);
|
|
}
|
|
else
|
|
info->icon = 0;
|
|
|
|
//
|
|
// parse out the applet name, spaces are not valid separators
|
|
//
|
|
|
|
info->params = CPL_ParseToSeparator(info->applet, pszCmdLine,
|
|
MAX_CCH_CPLNAME, FALSE);
|
|
|
|
CPL_StripAmpersand(info->applet);
|
|
}
|
|
|
|
BOOL CPL_LoadAndFindApplet(LPCPLMODULE *ppcplm, HICON *phIcon, UINT *puControl, CPLEXECINFO *info)
|
|
{
|
|
TCHAR szControl[MAX_CCH_CPLNAME];
|
|
LPCPLMODULE pcplm;
|
|
LPCPLITEM pcpli;
|
|
int nControl = 0; // fall thru to default
|
|
int NumControls;
|
|
|
|
ENTERCRITICAL;
|
|
|
|
pcplm = CPL_LoadCPLModule(info->cpl);
|
|
|
|
if (!pcplm || !pcplm->hacpli)
|
|
{
|
|
DebugMsg(DM_ERROR, TEXT("Control_RunDLL: ") TEXT("CPL_LoadCPLModule failed \"%s\""), info->cpl);
|
|
LEAVECRITICAL;
|
|
goto Error0;
|
|
}
|
|
|
|
//
|
|
// Look for the specified applet
|
|
// no applet specified selects applet 0
|
|
//
|
|
|
|
if (*info->applet)
|
|
{
|
|
NumControls = DSA_GetItemCount(pcplm->hacpli);
|
|
|
|
if (info->applet[0] == TEXT('@'))
|
|
{
|
|
nControl = StrToLong(info->applet+1);
|
|
|
|
if (nControl >= 0 && nControl < NumControls)
|
|
{
|
|
goto GotControl;
|
|
}
|
|
}
|
|
|
|
//
|
|
// Check for the "Setup" argument and send the special CPL_SETUP
|
|
// message to the applet to tell it we are running under Setup.
|
|
//
|
|
|
|
if (!lstrcmpi (TEXT("Setup"), info->params))
|
|
CPL_CallEntry(pcplm, NULL, CPL_SETUP, 0L, 0L);
|
|
|
|
for (nControl=0; nControl < NumControls; nControl++)
|
|
{
|
|
pcpli = DSA_GetItemPtr(pcplm->hacpli, nControl);
|
|
lstrcpyn(szControl, pcpli->pszName, ARRAYSIZE(szControl));
|
|
CPL_StripAmpersand(szControl);
|
|
|
|
// if there is only one control, then use it. This solves
|
|
// some compat issues with CP names changing.
|
|
if (lstrcmpi(info->applet, szControl) == 0 || 1 == NumControls)
|
|
break;
|
|
}
|
|
|
|
//
|
|
// If we get to the end of the list, bail out
|
|
//
|
|
|
|
// LEGACY WARNING: It might be necessary to handle some old applet names in a special
|
|
// way. This would be bad because the names are localized. We would need to somehow
|
|
// call into the CPL's to ask them if they support the given name. Only the CPL
|
|
// itself would know the correct legacy name mapping. Adding a new CPL message might
|
|
// cause as many legacy CPL problems as it solves so we would need to do something tricky
|
|
// like adding an exported function. We could then GetProcAddress on this exported function.
|
|
// If the export exists, we would pass it the legacy name and it would return a number.
|
|
//
|
|
// Example: "control mmsys.cpl,Sounds" must work even though mmsys.cpl no longer contains
|
|
// an applet called "Sounds". "control mmsys.cpl,Multimedia" must work even though
|
|
// mmsys.cpl no longer contains an applet called "Multimedia". You can't simply
|
|
// rename the applet becuase these two CPL's were both merged into one CPL. Renaming
|
|
// could never solve more than half the problem.
|
|
|
|
if (nControl >= NumControls)
|
|
{
|
|
DebugMsg(DM_ERROR, TEXT("Control_RunDLL: ") TEXT("Cannot find specified applet"));
|
|
LEAVECRITICAL;
|
|
goto Error1;
|
|
}
|
|
}
|
|
|
|
GotControl:
|
|
if (phIcon != NULL)
|
|
{
|
|
pcpli = DSA_GetItemPtr(pcplm->hacpli, nControl);
|
|
*phIcon = CopyIcon(pcpli->hIcon);
|
|
}
|
|
|
|
LEAVECRITICAL;
|
|
//
|
|
// yes, we really do want to pass negative indices through...
|
|
//
|
|
|
|
*puControl = (UINT)nControl;
|
|
*ppcplm = pcplm;
|
|
|
|
return TRUE;
|
|
|
|
Error1:
|
|
CPL_FreeCPLModule(pcplm);
|
|
Error0:
|
|
return FALSE;
|
|
}
|
|
|
|
BOOL CPL_Identify(CPLAPPLETID *identity, CPLEXECINFO *info, HWND stub)
|
|
{
|
|
identity->aApplet = (ATOM)0;
|
|
identity->hwndStub = stub;
|
|
identity->flags = 0;
|
|
|
|
if ((identity->aCPL = GlobalAddAtom(info->cpl)) == (ATOM)0)
|
|
return FALSE;
|
|
|
|
if (*info->applet)
|
|
{
|
|
if ((identity->aApplet = GlobalAddAtom(info->applet)) == (ATOM)0)
|
|
return FALSE;
|
|
}
|
|
else
|
|
{
|
|
//
|
|
// no applet name means use the default
|
|
//
|
|
|
|
identity->flags = PCPLIF_DEFAULT_APPLET;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
void CPL_UnIdentify(CPLAPPLETID *identity)
|
|
{
|
|
if (identity->aCPL)
|
|
{
|
|
GlobalDeleteAtom(identity->aCPL);
|
|
identity->aCPL = (ATOM)0;
|
|
}
|
|
|
|
if (identity->aApplet)
|
|
{
|
|
GlobalDeleteAtom(identity->aApplet);
|
|
identity->aApplet = (ATOM)0;
|
|
}
|
|
|
|
identity->hwndStub = NULL;
|
|
identity->flags = 0;
|
|
}
|
|
|
|
|
|
// It's time for Legacy Mode!!! In NT5 we removed a bunch of CPL files
|
|
// from the product. These files are used by name by many programs. As a result,
|
|
// the old names need to keep working even though the files no longer exist.
|
|
// We handle this by checking if the file exists. If it does not exist, we run
|
|
// the cpl name through a mapping table and then try again. The mapping table can
|
|
// potentially change the CPL name, the applet number, and the params.
|
|
typedef struct
|
|
{
|
|
LPTSTR oldInfo_cpl;
|
|
LPTSTR oldInfo_applet;
|
|
LPTSTR oldInfo_params;
|
|
LPTSTR newInfo_cpl;
|
|
LPTSTR newInfo_applet;
|
|
LPTSTR newInfo_params;
|
|
} RUNDLLCPLMAPPING;
|
|
|
|
// For the oldInfo member, a NULL means to match any value from the pinfo structure.
|
|
// If the oldInfo structure mathces the pinfo structure then it will be updated using
|
|
// the data from newInfo structure. For the newInfo member, a NULL means to leave the
|
|
// corresponding pinfo member unchanged.
|
|
const RUNDLLCPLMAPPING g_rgRunDllCPLMapping[] =
|
|
{
|
|
{ TEXT("MODEM.CPL"), NULL, NULL, TEXT("TELEPHON.CPL"), TEXT("@0"), TEXT("1") },
|
|
{ TEXT("UPS.CPL"), NULL, NULL, TEXT("POWERCFG.CPL"), NULL, NULL }
|
|
};
|
|
|
|
BOOL CPL_CheckLegacyMappings(CPLEXECINFO * pinfo)
|
|
{
|
|
LPTSTR p;
|
|
int i;
|
|
|
|
TraceMsg(TF_CPL, "Attmepting Legacy CPL conversion on %s", pinfo->cpl);
|
|
|
|
// we want only the filename, strip off any path information
|
|
p = PathFindFileName(pinfo->cpl);
|
|
StrCpyN(pinfo->cpl, p, CCHPATHMAX);
|
|
|
|
for (i = 0; i < ARRAYSIZE(g_rgRunDllCPLMapping); i++)
|
|
{
|
|
if (0 == StrCmpI(pinfo->cpl, g_rgRunDllCPLMapping[i].oldInfo_cpl))
|
|
{
|
|
if (!g_rgRunDllCPLMapping[i].oldInfo_applet ||
|
|
0 == StrCmpI(pinfo->applet, g_rgRunDllCPLMapping[i].oldInfo_applet))
|
|
{
|
|
if (!g_rgRunDllCPLMapping[i].oldInfo_params ||
|
|
(pinfo->params &&
|
|
0 == StrCmpI(pinfo->params, g_rgRunDllCPLMapping[i].oldInfo_params)
|
|
)
|
|
)
|
|
{
|
|
if (pinfo->params)
|
|
{
|
|
TraceMsg(TF_CPL, "%s,%s,%s matches item %d", pinfo->cpl, pinfo->applet, pinfo->params, i);
|
|
}
|
|
else
|
|
{
|
|
TraceMsg(TF_CPL, "%s,%s matches item %d", pinfo->cpl, pinfo->applet, i);
|
|
}
|
|
|
|
// The current entry matches the request. Map to the new info and then
|
|
// ensure the new CPL exists.
|
|
StrCpyN(pinfo->cpl, g_rgRunDllCPLMapping[i].newInfo_cpl, CCHPATHMAX);
|
|
|
|
if (g_rgRunDllCPLMapping[i].newInfo_applet)
|
|
{
|
|
StrCpyN(pinfo->applet, g_rgRunDllCPLMapping[i].newInfo_applet, MAX_CCH_CPLNAME);
|
|
}
|
|
|
|
if (g_rgRunDllCPLMapping[i].newInfo_params)
|
|
{
|
|
// the params pointer is normally a pointer into the remaining chunk of a string
|
|
// buffer. As such, we don't need to delete the memory it points to. Also, this
|
|
// argument is read only so it should be safe for us to point it at our constant
|
|
// data.
|
|
pinfo->params = g_rgRunDllCPLMapping[i].newInfo_params;
|
|
}
|
|
|
|
if (pinfo->params)
|
|
{
|
|
TraceMsg(TF_CPL, "CPL mapped to %s,%s,%s", pinfo->cpl, pinfo->applet, pinfo->params);
|
|
}
|
|
else
|
|
{
|
|
TraceMsg(TF_CPL, "CPL mapped to %s,%s", pinfo->cpl, pinfo->applet);
|
|
}
|
|
|
|
return PathFindOnPath(pinfo->cpl, NULL);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
return FALSE;
|
|
}
|
|
|
|
// Goes through all of the work of identifying and starting a control
|
|
// applet. Accepts a flag specifying whether or not to load a new DLL if it
|
|
// is not already present. This code will ALLWAYS switch to an existing
|
|
// instance of the applet if bFindExisting is specified.
|
|
//
|
|
// WARNING: this function butchers the command line you pass in!
|
|
|
|
BOOL CPL_RunMeBaby(HWND hwndStub, HINSTANCE hAppInstance, LPTSTR pszCmdLine, int nCmdShow, BOOL bAllowLoad, BOOL bFindExisting)
|
|
{
|
|
int nApplet;
|
|
LPCPLMODULE pcplm;
|
|
LPCPLITEM pcpli;
|
|
CPLEXECINFO info;
|
|
CPLAPPLETID identity;
|
|
TCHAR szApplet[ MAX_CCH_CPLNAME ];
|
|
BOOL bResult = FALSE;
|
|
HWND hwndOtherStub;
|
|
HRESULT hrInit;
|
|
|
|
if (SHRestricted(REST_NOCONTROLPANEL))
|
|
{
|
|
ShellMessageBox(HINST_THISDLL, hwndStub, MAKEINTRESOURCE(IDS_RESTRICTIONS),
|
|
MAKEINTRESOURCE(IDS_RESTRICTIONSTITLE), MB_OK|MB_ICONSTOP);
|
|
return FALSE;
|
|
}
|
|
|
|
hrInit = SHCoInitialize();
|
|
|
|
//
|
|
// parse the command line we got
|
|
//
|
|
|
|
CPL_ParseCommandLine(&info, pszCmdLine, FALSE);
|
|
|
|
//
|
|
// no applet to run means open the controls folder
|
|
//
|
|
|
|
if (!*info.cpl)
|
|
{
|
|
InvokeFolderPidl(MAKEINTIDLIST(CSIDL_CONTROLS), nCmdShow);
|
|
bResult = TRUE;
|
|
goto Error0;
|
|
}
|
|
|
|
// expand CPL name to a full path if it isn't already
|
|
if (PathIsFileSpec(info.cpl))
|
|
{
|
|
if (!PathFindOnPath(info.cpl, NULL))
|
|
{
|
|
if (!CPL_CheckLegacyMappings(&info))
|
|
goto Error0;
|
|
}
|
|
}
|
|
else if (!PathFileExists(info.cpl))
|
|
{
|
|
if (!CPL_CheckLegacyMappings(&info))
|
|
goto Error0;
|
|
}
|
|
|
|
if (!CPL_Identify(&identity, &info, hwndStub))
|
|
goto Error0;
|
|
|
|
//
|
|
// If we have already loaded this CPL, then jump to the existing window
|
|
//
|
|
|
|
hwndOtherStub = FindCPL(hwndStub, &identity);
|
|
|
|
//
|
|
// If we found a window and the caller says its ok to find an existing
|
|
// window then set the focus to it
|
|
//
|
|
if (bFindExisting && hwndOtherStub)
|
|
{
|
|
//
|
|
// try to find a CPL window on top of it
|
|
//
|
|
|
|
HWND hwndTarget = GetLastActivePopup(hwndOtherStub);
|
|
|
|
if (hwndTarget && IsWindow(hwndTarget))
|
|
{
|
|
|
|
DebugMsg(DM_WARNING, TEXT("Control_RunDLL: ") TEXT("Switching to already loaded CPL applet"));
|
|
SetForegroundWindow(hwndTarget);
|
|
bResult = TRUE;
|
|
goto Error1;
|
|
}
|
|
|
|
//
|
|
// couldn't find it, must be exiting or some sort of error...
|
|
// so ignore it.
|
|
//
|
|
|
|
DebugMsg(DM_WARNING, TEXT("Control_RunDLL: ") TEXT("Bogus CPL identity in array; purging after (presumed) RunDLL crash"));
|
|
}
|
|
|
|
//
|
|
// stop here if we're not allowed to load the cpl
|
|
//
|
|
|
|
if (!bAllowLoad)
|
|
goto Error1;
|
|
|
|
//
|
|
// i guess we didn't stop up there
|
|
//
|
|
|
|
if (!CPL_LoadAndFindApplet(&pcplm, NULL, &nApplet, &info))
|
|
goto Error1;
|
|
|
|
//
|
|
// get the name that the applet thinks it should have
|
|
//
|
|
|
|
pcpli = DSA_GetItemPtr(pcplm->hacpli, nApplet);
|
|
|
|
lstrcpyn(szApplet, pcpli->pszName, ARRAYSIZE(szApplet));
|
|
|
|
CPL_StripAmpersand(szApplet);
|
|
|
|
// handle "default applet" cases before running anything
|
|
if (identity.aApplet)
|
|
{
|
|
// we were started with an explicitly named applet
|
|
if (!nApplet)
|
|
{
|
|
// we were started with the name of the default applet
|
|
identity.flags |= PCPLIF_DEFAULT_APPLET;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
// we were started without a name, assume the default applet
|
|
identity.flags |= PCPLIF_DEFAULT_APPLET;
|
|
|
|
// get the applet's name (now that we've loaded it's CPL)
|
|
if ((identity.aApplet = GlobalAddAtom(szApplet)) == (ATOM)0)
|
|
{
|
|
// bail 'cause we could nuke a CPL if we don't have this
|
|
goto Error2;
|
|
}
|
|
}
|
|
|
|
// mark the window so we'll be able to verify that it's really ours
|
|
if (aCPLName == (ATOM)0)
|
|
{
|
|
aCPLName = GlobalAddAtom(TEXT("CPLName"));
|
|
aCPLFlags = GlobalAddAtom(TEXT("CPLFlags"));
|
|
|
|
if (aCPLName == (ATOM)0 || aCPLFlags == (ATOM)0)
|
|
goto Error2; // This should never happen... blow off applet
|
|
}
|
|
|
|
if (!SetProp(hwndStub, // Mark its name
|
|
MAKEINTATOM(aCPLName), (HANDLE)(DWORD_PTR)identity.aCPL))
|
|
{
|
|
goto Error2;
|
|
}
|
|
|
|
if (!SetProp(hwndStub, // Mark its applet
|
|
MAKEINTATOM(identity.aCPL), (HANDLE)(DWORD_PTR)identity.aApplet))
|
|
{
|
|
goto Error2;
|
|
}
|
|
if (identity.flags)
|
|
{
|
|
if (aCPLFlags == (ATOM)0)
|
|
aCPLFlags = GlobalAddAtom(TEXT("CPLFlags"));
|
|
// Mark its flags
|
|
SetProp(hwndStub, MAKEINTATOM(aCPLFlags), (HANDLE)UIntToPtr(identity.flags));
|
|
}
|
|
|
|
//
|
|
// Send the stub window a message so it will have the correct title and
|
|
// icon in the alt-tab window, etc...
|
|
//
|
|
|
|
if (hwndStub) {
|
|
DWORD dwPID;
|
|
SendMessage(hwndStub, STUBM_SETICONTITLE, (WPARAM)pcpli->hIcon, (LPARAM)szApplet);
|
|
GetWindowThreadProcessId(hwndStub, &dwPID);
|
|
if (dwPID == GetCurrentProcessId()) {
|
|
RUNDLL_NOTIFY sNotify;
|
|
|
|
sNotify.hIcon = pcpli->hIcon;
|
|
sNotify.lpszTitle = szApplet;
|
|
|
|
// HACK: It will look like the stub window is sending itself
|
|
// a WM_NOTIFY message. Oh well.
|
|
//
|
|
SendNotify(hwndStub, hwndStub, RDN_TASKINFO, (NMHDR FAR*)&sNotify);
|
|
}
|
|
}
|
|
|
|
if (info.params)
|
|
{
|
|
DebugMsg(DM_TRACE, TEXT("Control_RunDLL: ") TEXT("Sending CPL_STARTWPARAMS to applet with: %s"), info.params);
|
|
|
|
bResult = BOOLFROMPTR(CPL_CallEntry(pcplm, hwndStub, CPL_STARTWPARMS, (LONG)nApplet, (LPARAM)info.params));
|
|
}
|
|
|
|
// Check whether we need to run as a different windows version
|
|
{
|
|
PPEB Peb = NtCurrentPeb();
|
|
PIMAGE_DOS_HEADER pDosHeader = (PIMAGE_DOS_HEADER)pcplm->minst.hinst;
|
|
PIMAGE_NT_HEADERS pHeader = (PIMAGE_NT_HEADERS)((DWORD_PTR)pcplm->minst.hinst + pDosHeader->e_lfanew);
|
|
|
|
if (pHeader->FileHeader.SizeOfOptionalHeader != 0 &&
|
|
pHeader->OptionalHeader.Win32VersionValue != 0)
|
|
{
|
|
//
|
|
// Stolen from ntos\mm\procsup.c
|
|
//
|
|
Peb->OSMajorVersion = pHeader->OptionalHeader.Win32VersionValue & 0xFF;
|
|
Peb->OSMinorVersion = (pHeader->OptionalHeader.Win32VersionValue >> 8) & 0xFF;
|
|
Peb->OSBuildNumber = (USHORT) ((pHeader->OptionalHeader.Win32VersionValue >> 16) & 0x3FFF);
|
|
Peb->OSPlatformId = (pHeader->OptionalHeader.Win32VersionValue >> 30) ^ 0x2;
|
|
}
|
|
}
|
|
|
|
#ifdef UNICODE
|
|
//
|
|
// If the cpl didn't respond to CPL_STARTWPARMSW (unicode version),
|
|
// maybe it is an ANSI only CPL
|
|
//
|
|
if (info.params && (!bResult))
|
|
{
|
|
int cchParams = WideCharToMultiByte(CP_ACP, 0, info.params, -1, NULL, 0, NULL, NULL);
|
|
LPSTR lpstrParams = LocalAlloc(LMEM_FIXED, sizeof(char) * cchParams);
|
|
if (lpstrParams != NULL)
|
|
{
|
|
WideCharToMultiByte(CP_ACP, 0, info.params, -1, lpstrParams, cchParams, NULL, NULL);
|
|
|
|
DebugMsg(DM_TRACE, TEXT("Control_RunDLL: ") TEXT("Sending CPL_STARTWPARAMSA to applet with: %hs"), lpstrParams);
|
|
|
|
bResult = BOOLFROMPTR(CPL_CallEntry(pcplm, hwndStub, CPL_STARTWPARMSA, (LONG)nApplet, (LPARAM)lpstrParams));
|
|
|
|
LocalFree(lpstrParams);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
if (!bResult)
|
|
{
|
|
DebugMsg(DM_TRACE, TEXT("Control_RunDLL: ") TEXT("Sending CPL_DBLCLK to applet"));
|
|
|
|
CPL_CallEntry(pcplm, hwndStub, CPL_DBLCLK, (LONG)nApplet, pcpli->lData);
|
|
|
|
// some 3x applets return the wrong value so we can't fail here
|
|
bResult = TRUE;
|
|
}
|
|
|
|
bResult = TRUE; // make it!
|
|
|
|
RemoveProp(hwndStub, (LPCTSTR)(UINT_PTR)identity.aCPL);
|
|
Error2:
|
|
CPL_FreeCPLModule(pcplm);
|
|
Error1:
|
|
CPL_UnIdentify(&identity);
|
|
Error0:
|
|
|
|
SHCoUninitialize(hrInit);
|
|
|
|
return bResult;
|
|
}
|
|
|
|
//
|
|
// Check the following reg location and see if this CPL is registered to run in proc:
|
|
// HKLM\\Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\InProcCPLs
|
|
//
|
|
STDAPI_(BOOL) CPL_IsInProc(LPCTSTR pszCmdLine)
|
|
{
|
|
BOOL bInProcCPL = FALSE;
|
|
TCHAR szTempCmdLine[2 * MAX_PATH];
|
|
CPLEXECINFO info = {0};
|
|
LPTSTR pszCPLFile = NULL;
|
|
|
|
ASSERT(pszCmdLine);
|
|
|
|
// Make a copy of the command line
|
|
lstrcpyn(szTempCmdLine, pszCmdLine, ARRAYSIZE(szTempCmdLine));
|
|
|
|
// Parse the command line using standard parsing function
|
|
CPL_ParseCommandLine(&info, szTempCmdLine, FALSE);
|
|
|
|
// Find the file name of this cpl
|
|
pszCPLFile = PathFindFileName(info.cpl);
|
|
if (pszCPLFile)
|
|
{
|
|
// Open the reg key
|
|
HKEY hkeyInProcCPL = NULL;
|
|
if (ERROR_SUCCESS == RegOpenKeyEx(HKEY_LOCAL_MACHINE,
|
|
TEXT("Software\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\InProcCPLs"), 0, KEY_READ, &hkeyInProcCPL))
|
|
{
|
|
// Look up in the registry for this cpl name
|
|
LONG cbData;
|
|
if (ERROR_SUCCESS == SHQueryValueEx(hkeyInProcCPL, pszCPLFile, NULL, NULL, NULL, &cbData))
|
|
bInProcCPL = TRUE;
|
|
|
|
RegCloseKey(hkeyInProcCPL);
|
|
}
|
|
}
|
|
return bInProcCPL;
|
|
}
|
|
|
|
|
|
BOOL UsePCHealthFaultUploading(LPCTSTR pszCmdLine)
|
|
{
|
|
// Do we want exceptions to go unhandled so PCHealth will upload the faults?
|
|
BOOL fUsePCHealth = FALSE; // By default no, because
|
|
LPCTSTR pszFilename = PathFindFileName(pszCmdLine);
|
|
|
|
if (pszFilename)
|
|
{
|
|
DWORD dwType;
|
|
DWORD dwFlags;
|
|
DWORD cbSize = sizeof(dwFlags);
|
|
|
|
DWORD dwError = SHGetValue(HKEY_LOCAL_MACHINE, TEXT("SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Explorer\\ControlPanel\\Flags"),
|
|
pszFilename, &dwType, (void *)&dwFlags, &cbSize);
|
|
if ((ERROR_SUCCESS == dwError) && (REG_DWORD == dwType))
|
|
{
|
|
// The 0x00000001 bit will indicate if they want to not have exceptions caught for them.
|
|
if (0x00000001 & dwFlags)
|
|
{
|
|
fUsePCHealth = TRUE;
|
|
}
|
|
}
|
|
}
|
|
|
|
return fUsePCHealth;
|
|
}
|
|
|
|
|
|
//
|
|
// Starts a remote control applet on a new RunDLL process
|
|
// Or on another thread InProcess
|
|
//
|
|
STDAPI_(BOOL) CPL_RunRemote(LPCTSTR pszCmdLine, HWND hwnd, BOOL fRunAsNewUser)
|
|
{
|
|
BOOL bRet = FALSE;
|
|
TCHAR szRunParams[2 * MAX_PATH];
|
|
BOOL fUsePCHealth = UsePCHealthFaultUploading(pszCmdLine);
|
|
|
|
if (fRunAsNewUser)
|
|
{
|
|
wnsprintf(szRunParams, ARRAYSIZE(szRunParams), TEXT("%sshell32.dll,Control_RunDLLAsUser %s"), (fUsePCHealth ? TEXT("/d ") : TEXT("")), pszCmdLine);
|
|
}
|
|
else
|
|
{
|
|
wnsprintf(szRunParams, ARRAYSIZE(szRunParams), TEXT("%sshell32.dll,Control_RunDLL %s"), (fUsePCHealth ? TEXT("/d ") : TEXT("")), pszCmdLine);
|
|
}
|
|
|
|
if (!fRunAsNewUser && CPL_IsInProc(pszCmdLine))
|
|
{
|
|
// lanuch this cpl in process from another thread
|
|
bRet = SHRunDLLThread(hwnd, szRunParams, SW_SHOWNORMAL);
|
|
}
|
|
else
|
|
{
|
|
// lanuch this cpl on another thread
|
|
bRet = SHRunDLLProcess(hwnd, szRunParams, SW_SHOWNORMAL, IDS_CONTROLPANEL, fRunAsNewUser);
|
|
}
|
|
|
|
return bRet;
|
|
}
|
|
|
|
//
|
|
// Attempts to open the specified control applet.
|
|
// Tries to switch to an existing instance before starting a new one, unless the user
|
|
// specifies the fRunAsNewUser in which case we always launch a new process.
|
|
//
|
|
STDAPI_(BOOL) SHRunControlPanelEx(LPCTSTR pszOrigCmdLine, HWND hwnd, BOOL fRunAsNewUser)
|
|
{
|
|
BOOL bRes = FALSE;
|
|
LPTSTR pszCmdLine = NULL;
|
|
|
|
// check to see if the caller passed a resource id instead of a string
|
|
|
|
if (!IS_INTRESOURCE(pszOrigCmdLine))
|
|
{
|
|
pszCmdLine = StrDup(pszOrigCmdLine);
|
|
}
|
|
else
|
|
{
|
|
TCHAR szCmdLine[MAX_PATH];
|
|
|
|
if (LoadString(HINST_THISDLL, PtrToUlong((void *)pszOrigCmdLine), szCmdLine, ARRAYSIZE(szCmdLine)))
|
|
pszCmdLine = StrDup(szCmdLine);
|
|
}
|
|
|
|
//
|
|
// CPL_RunMeBaby whacks on the command line while parsing...use a dup
|
|
//
|
|
if (pszCmdLine)
|
|
{
|
|
|
|
if (!fRunAsNewUser)
|
|
{
|
|
// if fRunAsNewUser is NOT specified, then try to switch to an active CPL
|
|
// which matches our pszCmdLine
|
|
bRes = CPL_RunMeBaby(NULL, NULL, pszCmdLine, SW_SHOWNORMAL, FALSE, TRUE);
|
|
}
|
|
|
|
if (!bRes)
|
|
{
|
|
// launch a new cpl in a separate process
|
|
bRes = CPL_RunRemote(pszCmdLine, hwnd, fRunAsNewUser);
|
|
}
|
|
LocalFree(pszCmdLine);
|
|
}
|
|
|
|
if (bRes && UEMIsLoaded() && !IS_INTRESOURCE(pszOrigCmdLine))
|
|
{
|
|
UEMFireEvent(&UEMIID_SHELL, UEME_RUNCPL, UEMF_XEVENT, -1, (LPARAM)pszOrigCmdLine);
|
|
}
|
|
|
|
return bRes;
|
|
}
|
|
|
|
// This function is a TCHAR export from shell32 (header defn is in shsemip.h)
|
|
//
|
|
// UNDOCUMENTED: You may pass a shell32 resource ID in place of a pszCmdLine
|
|
//
|
|
STDAPI_(BOOL) SHRunControlPanel(LPCTSTR pszOrigCmdLine, HWND hwnd)
|
|
{
|
|
return SHRunControlPanelEx(pszOrigCmdLine, hwnd, FALSE);
|
|
}
|
|
|
|
|
|
//
|
|
// Attempts to open the specified control applet.
|
|
// This function is intended to be called by RunDLL for isolating applets.
|
|
// Tries to switch to an existing instance before starting a new one.
|
|
//
|
|
// The command lines for Control_RunDLL are as follows:
|
|
//
|
|
// 1) rundll32 shell32.dll,Control_RunDLL fred.cpl,@n,arguments
|
|
//
|
|
// This launches the (n+1)th applet in fred.cpl.
|
|
//
|
|
// If "@n" is not supplied, the default is @0.
|
|
//
|
|
// 2) rundll32 shell32.dll,Control_RunDLL fred.cpl,Ba&rney,arguments
|
|
//
|
|
// This launches the applet in fred.cpl named "Barney". Ampersands are
|
|
// stripped from the name.
|
|
//
|
|
// 3) rundll32 shell32.dll,Control_RunDLL fred.cpl,Setup
|
|
//
|
|
// This loads fred.cpl and sends it a CPL_SETUP message.
|
|
//
|
|
// In cases (1) and (2), the "arguments" are passed to the applet via
|
|
// the CPL_STARTWPARAMS (start with parameters) message. It is the
|
|
// applet's job to parse the arguments and do something interesting.
|
|
//
|
|
// It is traditional for the command line of a cpl to be the index of
|
|
// the page that should initially be shown to the user, but that's just
|
|
// tradition.
|
|
//
|
|
|
|
STDAPI_(void) Control_RunDLL(HWND hwndStub, HINSTANCE hAppInstance, LPSTR pszCmdLine, int nCmdShow)
|
|
{
|
|
TCHAR szCmdLine[MAX_PATH * 2];
|
|
SHAnsiToTChar(pszCmdLine, szCmdLine, ARRAYSIZE(szCmdLine));
|
|
|
|
CPL_RunMeBaby(hwndStub, hAppInstance, szCmdLine, nCmdShow, TRUE, TRUE);
|
|
}
|
|
|
|
STDAPI_(void) Control_RunDLLW(HWND hwndStub, HINSTANCE hAppInstance, LPWSTR lpwszCmdLine, int nCmdShow)
|
|
{
|
|
TCHAR szCmdLine[MAX_PATH * 2];
|
|
SHUnicodeToTChar(lpwszCmdLine, szCmdLine, ARRAYSIZE(szCmdLine));
|
|
|
|
CPL_RunMeBaby(hwndStub, hAppInstance, szCmdLine, nCmdShow, TRUE, TRUE);
|
|
}
|
|
|
|
// This is the entry that gets called when we run a cpl as a new user.
|
|
//
|
|
STDAPI_(void) Control_RunDLLAsUserW(HWND hwndStub, HINSTANCE hAppInstance, LPWSTR lpwszCmdLine, int nCmdShow)
|
|
{
|
|
CPL_RunMeBaby(hwndStub, hAppInstance, lpwszCmdLine, nCmdShow, TRUE, FALSE);
|
|
}
|
|
|
|
// data passed around dialog and worker thread for Control_FillCache_RunDLL
|
|
|
|
typedef struct
|
|
{
|
|
IShellFolder * psfControl;
|
|
IEnumIDList * penumControl;
|
|
HWND dialog;
|
|
} FillCacheData;
|
|
|
|
|
|
//
|
|
// important work of Control_FillCache_RunDLL
|
|
// jogs the control panel enumerator so it will fill the presentation cache
|
|
// also forces the applet icons to be extracted into the shell icon cache
|
|
//
|
|
|
|
DWORD CALLBACK Control_FillCacheThreadProc(void *pv)
|
|
{
|
|
FillCacheData *data = (FillCacheData *)pv;
|
|
LPITEMIDLIST pidlApplet;
|
|
ULONG dummy;
|
|
|
|
while(data->penumControl->lpVtbl->Next(data->penumControl, 1, &pidlApplet, &dummy) == NOERROR)
|
|
{
|
|
SHMapPIDLToSystemImageListIndex(data->psfControl, pidlApplet, NULL);
|
|
ILFree(pidlApplet);
|
|
}
|
|
|
|
if (data->dialog)
|
|
EndDialog(data->dialog, 0);
|
|
|
|
return 0;
|
|
}
|
|
|
|
|
|
//
|
|
// dlgproc for Control_FillCache_RunDLL UI
|
|
// just something to keep the user entertained while we load a billion DLLs
|
|
//
|
|
|
|
BOOL_PTR CALLBACK _Control_FillCacheDlg(HWND dialog, UINT message, WPARAM wparam, LPARAM lparam)
|
|
{
|
|
switch(message)
|
|
{
|
|
case WM_INITDIALOG:
|
|
{
|
|
DWORD dummy;
|
|
HANDLE thread;
|
|
|
|
((FillCacheData *)lparam)->dialog = dialog;
|
|
|
|
thread = CreateThread(NULL, 0, Control_FillCacheThreadProc, (void*)lparam, 0, &dummy);
|
|
if (thread)
|
|
CloseHandle(thread);
|
|
else
|
|
EndDialog(dialog, -1);
|
|
}
|
|
break;
|
|
|
|
case WM_COMMAND:
|
|
break;
|
|
|
|
default:
|
|
return FALSE;
|
|
}
|
|
|
|
return TRUE;
|
|
}
|
|
|
|
|
|
//
|
|
// enumerates control applets in a manner that fills the presentation cache
|
|
// this is so the first time a user opens the control panel it comes up fast
|
|
// intended to be called at final setup on first boot
|
|
//
|
|
// FUNCTION WORKS FOR BOTH ANSI/UNICODE, it never uses pszCmdLine
|
|
//
|
|
|
|
STDAPI_(void) Control_FillCache_RunDLL(HWND hwndStub, HINSTANCE hAppInstance, LPSTR pszCmdLine, int nCmdShow)
|
|
{
|
|
IShellFolder *psfDesktop;
|
|
HKEY hk;
|
|
|
|
// nuke the old data so that any bogus cached info from a beta goes away
|
|
if (RegOpenKey(HKEY_LOCAL_MACHINE, REGSTR_PATH_CONTROLSFOLDER, &hk) == ERROR_SUCCESS)
|
|
{
|
|
RegDeleteValue(hk, TEXT("Presentation Cache"));
|
|
RegCloseKey(hk);
|
|
}
|
|
|
|
SHGetDesktopFolder(&psfDesktop);
|
|
Shell_GetImageLists(NULL, NULL); // make sure icon cache is around
|
|
|
|
if (psfDesktop)
|
|
{
|
|
LPITEMIDLIST pidlControl = SHCloneSpecialIDList(hwndStub, CSIDL_CONTROLS, FALSE);
|
|
if (pidlControl)
|
|
{
|
|
FillCacheData data = {0};
|
|
|
|
if (SUCCEEDED(psfDesktop->lpVtbl->BindToObject(psfDesktop,
|
|
pidlControl, NULL, &IID_IShellFolder, &data.psfControl)))
|
|
{
|
|
if (S_OK == data.psfControl->lpVtbl->EnumObjects(
|
|
data.psfControl, NULL, SHCONTF_NONFOLDERS, &data.penumControl))
|
|
{
|
|
if (nCmdShow == SW_HIDE || DialogBoxParam(HINST_THISDLL,
|
|
MAKEINTRESOURCE(DLG_CPL_FILLCACHE), hwndStub,
|
|
_Control_FillCacheDlg, (LPARAM)&data) == -1)
|
|
{
|
|
Control_FillCacheThreadProc(&data);
|
|
}
|
|
|
|
data.penumControl->lpVtbl->Release(data.penumControl);
|
|
}
|
|
|
|
data.psfControl->lpVtbl->Release(data.psfControl);
|
|
}
|
|
|
|
ILFree(pidlControl);
|
|
}
|
|
}
|
|
}
|
|
|
|
STDAPI_(void) Control_FillCache_RunDLLW(HWND hwndStub, HINSTANCE hAppInstance, LPWSTR lpwszCmdLine, int nCmdShow)
|
|
{
|
|
Control_FillCache_RunDLL(hwndStub,hAppInstance,NULL,nCmdShow);
|
|
}
|