/* INIT.C
Resident Code Segment // Tweak: make non-resident
Initialization and destroy routines
InitFrost()
CloseFrost()
Frosting: Master Theme Selector for Windows '95
Copyright (c) 1994-1999 Microsoft Corporation. All rights reserved.
*/
// ---------------------------------------------
// Brief file history:
// Alpha:
// Beta:
// Bug fixes
// ---------
//
// ---------------------------------------------
#include "windows.h"
#include "frost.h"
#include "global.h"
#include "schedule.h"
#include "htmlprev.h"
// Local Routines
BOOL InitInstance(HINSTANCE, HINSTANCE, int);
BOOL GetRotateTheme(LPTSTR);
// Globals
TCHAR szPlus_CurTheme[] = TEXT("Software\\Microsoft\\Plus!\\Themes\\Current");
TCHAR szPlus_CBs[] = TEXT("Software\\Microsoft\\Plus!\\Themes\\Apply");
#define bThemed (*szCurThemeFile)
// Reg paths for finding potential Theme directories
#define PLUS95_KEY TEXT("Software\\Microsoft\\Plus!\\Setup")
#define PLUS95_PATH TEXT("DestPath")
#define PLUS98_KEY TEXT("Software\\Microsoft\\Plus!98")
#define PLUS98_PATH TEXT("Path")
#define KIDS_KEY TEXT("Software\\Microsoft\\Microsoft Kids\\Kids Plus!")
#define KIDS_PATH TEXT("InstallDir")
#define PROGRAMFILES_KEY TEXT("Software\\Microsoft\\Windows\\CurrentVersion")
#define PROGRAMFILES_PATH TEXT("ProgramFilesDir")
// ProcessCmdLine
//
// Very basic commandline: "/s themefile" to apply theme
// "themefile" to open app with theme selected
// and curdir to be that file's dir
//
// Return: TRUE if we should exit the app
// FALSE to continue execution
//
BOOL ProcessCmdLine(LPTSTR lpCmdLine)
{
extern TCHAR szFrostSection[], szMagic[], szVerify[];
BOOL fSetTheme = FALSE;
BOOL fRotateTheme = FALSE;
LPTSTR lpszThemeFile;
BOOL fStopOnQuote = FALSE;
WIN32_FIND_DATA wfdFind;
HANDLE hFind;
TCHAR szRotateTheme[MAX_PATH];
// TCHAR szThemesExe[MAX_PATH];
DWORD dwRet;
HKEY hKey;
extern TCHAR szPlus_CurTheme[];
Assert(0, TEXT("Cmd line: '"));
Assert(0, lpCmdLine);
Assert(0, TEXT("'\n"));
// Skip leading whitespace.
while (*lpCmdLine && (*lpCmdLine != TEXT('/')))
lpCmdLine = CharNext(lpCmdLine);
// Check for special switches.
if (*lpCmdLine == TEXT('/')) {
lpCmdLine = CharNext(lpCmdLine);
switch (*lpCmdLine) {
// "Set" theme as active.
case TEXT('s'):
case TEXT('S'):
fSetTheme = TRUE;
lpCmdLine = CharNext(lpCmdLine);
break;
case TEXT('r'):
case TEXT('R'):
fRotateTheme = TRUE;
lpCmdLine = CharNext(lpCmdLine);
break;
default:
return FALSE; // invalid flag so continue execution EXIT
}
while (*lpCmdLine == TEXT(' '))
lpCmdLine = CharNext(lpCmdLine);
}
// Handle quoted long file names. Even if the name isn't quoted, we'll
// still parse to the end of the commandline.
if (*lpCmdLine == TEXT('\"')) {
fStopOnQuote = TRUE;
lpCmdLine = CharNext(lpCmdLine);
}
lpszThemeFile = lpCmdLine;
// Parse until end of line or we find the closing quote.
while (*lpCmdLine && !(fStopOnQuote && *lpCmdLine == TEXT('\"')))
lpCmdLine = CharNext(lpCmdLine);
// Back up to the last non-whitespace character.
while (lpCmdLine > lpszThemeFile && *(lpCmdLine-1) == TEXT(' '))
lpCmdLine = CharPrev(lpszThemeFile, lpCmdLine);
// If there's anything after the closing quote, so what?
*lpCmdLine = TEXT('\0');
// This is our chance to fake a theme rotation "/r" into the
// "/s" paradigm. Let's get a string to the next theme in the
// rotation.
if (fRotateTheme) {
if (GetRotateTheme(szRotateTheme)) {
fSetTheme = TRUE;
lpszThemeFile = szRotateTheme;
}
// GetRotateTheme failed. If we fall through we're likely
// to display the main dialog and we don't want to do that
// in the "/r" case. Just exit the app.
else return TRUE;
}
// After all that work, nothing was specified on the commandline.
if (lpszThemeFile == lpCmdLine)
return FALSE; // no filename so continue execution EXIT
//
// OK: you've got a theme file. if it is for real, save it for use.
// first check existence
hFind = FindFirstFile(lpszThemeFile, (LPWIN32_FIND_DATA)&wfdFind);
if (INVALID_HANDLE_VALUE == hFind)
return (TRUE); // file doesn't exist so continue execution EXIT
// PLUS98 BUG 1293 -- this used to return FALSE
// and open the Theme applet if /s had an invalid
// file. Now we return TRUE which closes Themes
// then check for magic string
GetPrivateProfileString((LPTSTR)szFrostSection,
(LPTSTR)szMagic,
(LPTSTR)szNULL,
(LPTSTR)szMsg, MAX_MSGLEN,
lpszThemeFile);
// magic str check
if (lstrcmp((LPTSTR)szMsg, (LPTSTR)szVerify)) {
// No magic string so this must not be a real theme file.
// If this was from a "/r" rotate we want to return TRUE and
// bail out. Otherwise return FALSE so we open the Theme
// app. (this was the existing Plus 95 behavior):
if (fRotateTheme) return (TRUE);
else return (FALSE);
}
//
// get the confirmed theme into the necessary globals
// save theme file using the long filename
lstrcpy(szCurThemeFile, lpszThemeFile); // actual pathname verified
// save cur dir (not theme dir)
lstrcpy(szCurDir, szCurThemeFile);
*(FileFromPath(szCurDir)) = 0;
// save theme name
lstrcpy(szCurThemeName, wfdFind.cFileName); // make sure long filename
TruncateExt(szCurThemeName);
// now maybe we just want to apply the theme and exit
if (fSetTheme) {
// Make sure there is even enough space to do theme
// But don't complain, if there isn't
if (! CheckSpace (NULL, FALSE)) // definition in Regutils.c
return FALSE;
// Make the apply code write out everything.
InitCheckboxes();
// Simulate a left shift keypress to wake up the screensaver.
// Otherwise if the SS is running and we apply a new SS you
// can wind up with dueling savers...
keybd_event(VK_LSHIFT, 0, 0, 0);
keybd_event(VK_LSHIFT, 0, KEYEVENTF_KEYUP, 0);
ApplyThemeFile(lpszThemeFile);
// APPCOMPAT -- Plus95 Themes was not updating the Current Theme
// setting in the registry on this codepath. Need to fix that
// here.
dwRet = RegOpenKeyEx(HKEY_CURRENT_USER, szPlus_CurTheme,
(DWORD)0, KEY_SET_VALUE, (PHKEY)&hKey );
if (dwRet != ERROR_SUCCESS) {
DWORD dwDisposition;
Assert(FALSE, TEXT("couldn't RegOpenKey save theme file\n"));
dwRet = RegCreateKeyEx( HKEY_CURRENT_USER, szPlus_CurTheme,
(DWORD)0, (LPTSTR)szNULL, REG_OPTION_NON_VOLATILE,
KEY_SET_VALUE, (LPSECURITY_ATTRIBUTES)NULL,
(PHKEY)&hKey, (LPDWORD)&dwDisposition );
}
// if open or create worked
if (dwRet == ERROR_SUCCESS) {
dwRet = RegSetValueEx(hKey, (LPTSTR)NULL, // default value
0,
(DWORD)REG_SZ,
(LPBYTE)lpszThemeFile,
(DWORD)( SZSIZEINBYTES((LPTSTR)szCurThemeFile) + 1 ));
RegCloseKey(hKey);
}
Assert(dwRet == ERROR_SUCCESS, TEXT("couldn't open, set or create Registry save theme file\n"));
return TRUE; // set the theme so now just exit app EXIT
} // end if fSetTheme
return FALSE; // continue execution
}
// InitFrost
// Since there are no window classes to register, this routine just loads
// the strings and, since there's only one instance, calls InitInstance().
//
// Returns: success of initialization
BOOL FAR InitFrost(hPrevInstance, hInstance, lpCmdLine, nCmdShow)
HINSTANCE hPrevInstance;
HINSTANCE hInstance; /* Current instance identifier. */
LPTSTR lpCmdLine;
int nCmdShow; /* Param for first ShowWindow() call. */
{
LPTSTR lpScan, lpTemp;
WNDCLASS WndClass;
BOOL bret;
BOOL bGotThemeDir;
HDC hdc;
//
// Get initial strings
// (Gauranteed enough mem at app init for these loads)
InitNoMem(hInstance);
LoadString(hInstance, STR_APPNAME, szAppName, MAX_STRLEN);
LoadString(hInstance, STR_CURSET, szCurSettings, MAX_STRLEN);
LoadString(hInstance, STR_PREVSET, szPrevSettings, MAX_STRLEN);
LoadString(hInstance, STR_PREVSETFILE, szPrevSettingsFilename, MAX_STRLEN);
LoadString(hInstance, STR_OTHERTHM, szOther, MAX_STRLEN);
LoadString(hInstance, STR_THMEXT, szExt, MAX_STRLEN);
LoadString(hInstance, STR_PREVIEWTITLE, szPreviewTitle, MAX_STRLEN);
LoadString(hInstance, STR_HELPFILE, szHelpFile, MAX_STRLEN);
LoadString(hInstance, STR_HELPFILE98, szHelpFile98, MAX_STRLEN);
LoadString(hInstApp, STR_SUGGEST, szNewFile, MAX_STRLEN);
LoadString(hInstApp, STR_SAVETITLE, szSaveTitle, MAX_STRLEN);
LoadString(hInstApp, STR_OPENTITLE, szOpenTitle, MAX_STRLEN);
LoadString(hInstApp, STR_FILETYPE, szFileTypeDesc, MAX_STRLEN);
WndClass.style = CS_DBLCLKS | CS_BYTEALIGNWINDOW | CS_GLOBALCLASS;
WndClass.lpfnWndProc = DefDlgProc;
WndClass.cbClsExtra = 0;
WndClass.cbWndExtra = DLGWINDOWEXTRA;
WndClass.hInstance = hInstApp;
WndClass.hIcon = LoadIcon(hInstance, MAKEINTRESOURCE(FROST_ICON));
WndClass.hCursor = LoadCursor(NULL, IDC_ARROW);
WndClass.hbrBackground = (HBRUSH) (COLOR_3DFACE + 1);
WndClass.lpszMenuName = NULL;
WndClass.lpszClassName = szClassName;
if (!RegisterClass(&WndClass))
return FALSE;
// Initialize our g_bGradient flag
hdc = GetDC(NULL);
g_bGradient = (BOOL)(GetDeviceCaps(hdc, BITSPIXEL) > 8);
ReleaseDC(NULL, hdc);
//
// build file search string
lpScan = (LPTSTR)szFileTypeDesc;
while (*lpScan) {
if (2 == CompareString(LOCALE_USER_DEFAULT, NORM_IGNOREWIDTH,
(LPTSTR)TEXT("|"), 1, lpScan, 1)) {
lpTemp = lpScan;
lpScan = CharNext(lpScan);
*lpTemp = 0;
}
else
lpScan = CharNext(lpScan);
}
//
// init directory strings
// theme directory - for now it is subdir of EXE dir
GetModuleFileName(hInstApp, (LPTSTR)szThemeDir, MAX_PATHLEN);
*(FileFromPath((LPTSTR)szThemeDir)) = 0; // leaves trailing '\'
// Save this path momentarily -- if we can't find any good Themes
// directory we're going to fall back to this directory.
lstrcpy(szCurDir, szThemeDir);
// Tack a "Themes" onto the path
LoadString(hInstance, STR_THEMESUBDIR, // includes trailing '\'
(LPTSTR)(szThemeDir + lstrlen((LPTSTR)szThemeDir)), MAX_STRLEN);
// Find out if this ThemeDir even exists. If it doesn't we need
// to get creative in finding our ThemeDir by searching the
// following locales:
//
// Plus!98 Install Path\Themes
// Plus!95 Install Path\Themes
// Kids for Plus! Install Path\Themes
// Program Files\Plus!\Themes
bGotThemeDir = FALSE;
Assert(0, TEXT("Themes.exe\\Themes path: "));
Assert(0, szThemeDir);
Assert(0, TEXT("\n"));
if (0xFFFFFFFF != GetFileAttributes(szThemeDir)) bGotThemeDir = TRUE;
if (!bGotThemeDir)
{
// Haven't found ThemeDir yet. Try the Plus!98 location
bret = HandGet(HKEY_LOCAL_MACHINE, PLUS98_KEY,
PLUS98_PATH, (LPTSTR)szThemeDir);
if (bret)
{
// Tack a "Themes" onto the path
lstrcat(szThemeDir, TEXT("\\"));
LoadString(hInstance, STR_THEMESUBDIR,
(szThemeDir + lstrlen((LPTSTR)szThemeDir)), MAX_STRLEN);
Assert(0, TEXT("Plus! 98 path: "));
Assert(0, szThemeDir);
Assert(0, TEXT("\n"));
if (0xFFFFFFFF != GetFileAttributes(szThemeDir)) bGotThemeDir = TRUE;
}
}
if (!bGotThemeDir)
{
// Still haven't found ThemeDir. Try the Plus! 95 location
bret = HandGet(HKEY_LOCAL_MACHINE, PLUS95_KEY,
PLUS95_PATH, (LPTSTR)szThemeDir);
if (bret)
{
// Tack on a "Themes" onto the path
// Plus!95 DestPath has "Plus!.dll" on the end so get rid
// of that.
*(FileFromPath(szThemeDir)) = 0;
LoadString(hInstance, STR_THEMESUBDIR,
(szThemeDir + lstrlen((LPTSTR)szThemeDir)), MAX_STRLEN);
Assert(0, TEXT("Plus! 95 path: "));
Assert(0, szThemeDir);
Assert(0, TEXT("\n"));
if (0xFFFFFFFF != GetFileAttributes(szThemeDir)) bGotThemeDir = TRUE;
}
}
if (!bGotThemeDir)
{
// Still haven't found ThemeDir. Try the Kids for Plus! location
bret = HandGet(HKEY_LOCAL_MACHINE, KIDS_KEY,
KIDS_PATH, (LPTSTR)szThemeDir);
if (bret)
{
// Tack a "\Plus! for Kids\Themes" onto the path
lstrcat(szThemeDir, TEXT("\\Plus! for Kids\\"));
LoadString(hInstance, STR_THEMESUBDIR,
(szThemeDir + lstrlen((LPTSTR)szThemeDir)), MAX_STRLEN);
Assert(0, TEXT("Kids Plus! path: "));
Assert(0, szThemeDir);
Assert(0, TEXT("\n"));
if (0xFFFFFFFF != GetFileAttributes(szThemeDir)) bGotThemeDir = TRUE;
}
}
if (!bGotThemeDir)
{
// Still haven't found ThemeDir. Try the Program Files\Plus! location
bret = HandGet(HKEY_LOCAL_MACHINE, PROGRAMFILES_KEY,
PROGRAMFILES_PATH, (LPTSTR)szThemeDir);
if (bret)
{
// Tack a "Plus!\Themes" onto the path
lstrcat(szThemeDir, TEXT("\\Plus!\\"));
LoadString(hInstance, STR_THEMESUBDIR,
(szThemeDir + lstrlen((LPTSTR)szThemeDir)), MAX_STRLEN);
Assert(0, TEXT("Program Files path: "));
Assert(0, szThemeDir);
Assert(0, TEXT("\n"));
if (0xFFFFFFFF != GetFileAttributes(szThemeDir)) bGotThemeDir = TRUE;
}
}
if (!bGotThemeDir)
{
// After all that searching we still haven't found a good Theme
// dir. So we'll just use the directory where Themes.exe is
// located -- we saved this in szCurDir before we started this
// search process.
lstrcpy(szThemeDir, szCurDir);
Assert(0, TEXT("Themes.exe path: "));
Assert(0, szThemeDir);
Assert(0, TEXT("\n"));
}
// default current dir
lstrcpy((LPTSTR)szCurDir, (LPTSTR)szThemeDir);
// Windows directory
GetWindowsDirectory((LPTSTR)szWinDir, MAX_PATHLEN);
if (TEXT('\\') != szWinDir[lstrlen((LPTSTR)szWinDir)-1])
lstrcat((LPTSTR)szWinDir, (LPTSTR)TEXT("\\"));
//
// see if there is a previous theme file to return to
bret = HandGet(HKEY_CURRENT_USER, szPlus_CurTheme,
(LPTSTR)NULL, (LPTSTR)szMsg);
Assert(bret, TEXT("no previous theme file in Registry!\n"));
if (bret) {
// get init cur dir from prev theme file
lstrcpy(szCurDir, szMsg);
*(FileFromPath(szCurDir)) = 0;
// Used to actually set the cur theme file/name to prev theme.
// Now we just use the directory if there is a prev theme.
// No longer care if it is a real file or a theme file or not.
#ifdef REVERT
WIN32_FIND_DATA wfdFind;
HANDLE hFind;
extern TCHAR szFrostSection[], szMagic[], szVerify[];
TCHAR szMagicTest[MAX_STRLEN+1];
// first check if it is for real: existence
hFind = FindFirstFile(szMsg, (LPWIN32_FIND_DATA)&wfdFind);
if (INVALID_HANDLE_VALUE != hFind) {
// then check if it is for real: theme file magic string
GetPrivateProfileString((LPTSTR)szFrostSection,
(LPTSTR)szMagic,
(LPTSTR)szNULL,
(LPTSTR)szMagicTest, MAX_STRLEN,
szMsg);
if (!lstrcmp((LPTSTR)szMagicTest, (LPTSTR)szVerify)) {
//
// now you're convinced that the prev theme file is legit
//
// then use it to set some globals
lstrcpy(szCurThemeFile, szMsg);
// save cur dir (not theme dir)
lstrcpy(szCurDir, szCurThemeFile);
*(FileFromPath(szCurDir)) = 0;
// save theme name
lstrcpy(szCurThemeName, FileFromPath(szCurThemeFile));
TruncateExt(szCurThemeName);
}
}
#endif // REVERT
}
// then look if there is a command line that may override things
if (ProcessCmdLine(lpCmdLine))
return TRUE; // don't run app EXIT, hWndApp==NULL as flag
// Single-instance application can call InitInstance() here
// Return success of inst initialization
return(InitInstance(hPrevInstance, hInstance, nCmdShow));
}
// InitInstance
// Create main window; assign globals for instance and window handles.
//
// Returns: success of initialization
BOOL InitInstance(hPrevInstance, hInstance, nCmdShow)
HINSTANCE hPrevInstance;
HINSTANCE hInstance; /* Current instance identifier. */
int nCmdShow; /* Param for first ShowWindow() call. */
{
RECT rWndApp, rWorkArea;
TCHAR szThemesExe[MAX_PATH];
// assign global instance handle
hInstApp = hInstance;
// create main window and assign global window handle
bNoMem = FALSE; // clear out of mem flag
hWndApp = CreateDialog( hInstApp,
MAKEINTRESOURCE(DLG_MAIN),
(HWND)NULL,
PreviewDlgProc
);
if (!hWndApp || bNoMem) // if problems, then bail
return (FALSE);
InitHTMLBM(); // Init the IThumbnail interface for HTML wallpaper support
// have to init preview painting stuff after create dlg
if (!PreviewInit()) {
DestroyWindow(hWndApp);
return (FALSE); // low mem on dc/bmp create EXIT
}
// this doesn't work from WM_INITDIALOG, so added here, too
InitCheckboxes(); // init stored values
RestoreCheckboxes(); // init actual cbs from stored values
if (bThemed) // kinda kludgy to put here but it works
EnableWindow(GetDlgItem(hWndApp, PB_SAVE), FALSE);
// also, can now make init Preview bmp for init paint
BuildPreviewBitmap((LPTSTR)szCurThemeFile);
// center main window on screen
GetWindowRect(hWndApp, (LPRECT)&rWndApp);
SystemParametersInfo(SPI_GETWORKAREA, 0, (PVOID)(LPRECT)&rWorkArea, 0);
MoveWindow(hWndApp,
((rWorkArea.right-rWorkArea.left) - (rWndApp.right-rWndApp.left))/2,
((rWorkArea.bottom-rWorkArea.top) - (rWndApp.bottom-rWndApp.top))/2,
// (GetSystemMetrics(SM_CXSCREEN) - (rWndApp.right-rWndApp.left))/2,
// (GetSystemMetrics(SM_CYSCREEN) - (rWndApp.bottom-rWndApp.top))/2,
rWndApp.right-rWndApp.left, rWndApp.bottom-rWndApp.top,
FALSE); // don't repaint
// Make the main window visible; update its client area
ShowWindow(hWndApp, nCmdShow); /* Show the window */
UpdateWindow(hWndApp); /* Sends WM_PAINT message */
// Check to see if CB_SCHEDULE is checked and verify that Task
// Scheduler is running and the Themes task exists as appropriate
if (bCBStates[FC_SCHEDULE]) {
if (IsTaskSchedulerRunning()) {
if (!IsThemesScheduled()) {
GetModuleFileName(hInstApp, (LPTSTR)szThemesExe, MAX_PATH);
if (!AddThemesTask(szThemesExe, TRUE /*Show errors*/)) {
// Couldn't add task -- ATT gave error but need to clear
// SCHEDULE CB
bCBStates[FC_SCHEDULE] = FALSE;
RestoreCheckboxes();
SaveStates(); // Write checkbox states to registry
}
} // Themes.job exists so do nothing
}
else {
// Zonk -- Task Scheduler isn't running. Start it.
if (StartTaskScheduler(TRUE /*prompt user*/)) {
// Task scheduler started -- check if themes task already
// exists
if (!IsThemesScheduled()) {
GetModuleFileName(hInstApp, (LPTSTR)szThemesExe, MAX_PATH);
if (!AddThemesTask(szThemesExe, TRUE /*Show errors*/)) {
// Couldn't add task -- ATT gave error but need to clear
// SCHEDULE CB
bCBStates[FC_SCHEDULE] = FALSE;
RestoreCheckboxes();
SaveStates(); // Write checkbox states to registry
}
} //TS is running now and Themes.job exists
}
else {
// Couldn't start TS -- STS() gave error. Need to clear
// SCHEDULE CB and HandDelete any existing Themes.job.
// CheckDlgButton(hdlg, CB_SCHEDULE, BST_UNCHECKED);
bCBStates[FC_SCHEDULE] = FALSE;
RestoreCheckboxes();
SaveStates(); // Write checkbox states to the registry
HandDeleteThemesTask();
}
} // END ELSE Task Scheduler isn't running
}
else { // bCBStates[FC_CHECKBOX] != TRUE
// SCHEDULE Checkbox is clear -- should delete Themes task.
if (IsTaskSchedulerRunning()) DeleteThemesTask();
else HandDeleteThemesTask();
}
// cleanup
return (TRUE); // success
}
// CloseFrost
//
// Cleanup your objects, thunks, etc.
//
void FAR CloseFrost()
{
// just extra tidy housekeeping
hWndApp = NULL;
hInstApp = NULL;
PreviewDestroy();
}
// SaveStates
//
// Remember persistent states: currently checkboxes.
// Last applied theme is remembered at Apply time.
//
void FAR SaveStates()
{
LONG lret;
HKEY hKey;
int iter;
//
// checkboxes
//
lret = RegOpenKeyEx(HKEY_CURRENT_USER, szPlus_CBs,
(DWORD)0, KEY_SET_VALUE, (PHKEY)&hKey );
if (lret != ERROR_SUCCESS) {
DWORD dwDisposition;
Assert(FALSE, TEXT("couldn't RegOpenKey save checkboxes\n"));
lret = RegCreateKeyEx( HKEY_CURRENT_USER, szPlus_CBs,
(DWORD)0, (LPTSTR)szNULL, REG_OPTION_NON_VOLATILE,
KEY_SET_VALUE, (LPSECURITY_ATTRIBUTES)NULL,
(PHKEY)&hKey, (LPDWORD)&dwDisposition );
}
// if open or create worked
if (lret == ERROR_SUCCESS) {
for (iter = 0; iter < MAX_FCHECKS; iter ++) {
if (bThemed)
RegSetValueEx(hKey, (LPTSTR)szCBNames[iter],
0,
(DWORD)REG_SZ,
(LPBYTE)(IsDlgButtonChecked(hWndApp, iCBIDs[iter]) ?
TEXT("1") : TEXT("0")),
(DWORD)2*sizeof(TCHAR));
else // cur win settings --> real states saved in bCBStates[]
RegSetValueEx(hKey, (LPTSTR)szCBNames[iter],
0,
(DWORD)REG_SZ,
(LPBYTE)(bCBStates[iter] ? TEXT("1") : TEXT("0")),
(DWORD)2*sizeof(TCHAR));
}
// close when finished
RegCloseKey(hKey);
}
else {
Assert(FALSE, TEXT("couldn't open or create Registry save checkboxes\n"));
}
}
BOOL GetRotateTheme(LPTSTR lpszRotateTheme)
{
BOOL bRet = FALSE;
TCHAR szThemesdir[MAX_PATH];
HANDLE hFF;
WIN32_FIND_DATA FindData;
// WARNING -- If "next" .Theme file is not valid theme file we'll never rotate!
// See if there is a current theme.
szThemesdir[0] = TEXT('\0');
bRet = HandGet(HKEY_CURRENT_USER, szPlus_CurTheme,
(LPTSTR)NULL, (LPTSTR)szThemesdir);
// Do we have a current Theme?
hFF = INVALID_HANDLE_VALUE;
if (szThemesdir[0]) {
// Yes we do, so do a FindFirst on it and make sure we've
// got the long filename.
ZeroMemory(&FindData, sizeof(WIN32_FIND_DATA));
hFF = FindFirstFile(szThemesdir, &FindData);
}
// Did we find the file on FindFirst? If so, proceed with finding
// the next Theme in that directory else assume that the registry's
// Current Theme setting is bogus and look in the default dir.
if (INVALID_HANDLE_VALUE != hFF) {
// Copy long filename.
lstrcpy(lpszRotateTheme, FindData.cFileName);
FindClose(hFF);
// We've got the longfilename to the current Theme
// Now do a FF/FN on *.Theme in the Theme dir until
// we find the current theme.
// Strip the theme file off the path.
*(FileFromPath(szThemesdir)) = 0;
lstrcat(szThemesdir, TEXT("*\0"));
LoadString(NULL, STR_THMEXT, (szThemesdir + lstrlen(szThemesdir)),
MAX_PATH);
ZeroMemory(&FindData, sizeof(WIN32_FIND_DATA));
hFF = FindFirstFile(szThemesdir, &FindData);
if (INVALID_HANDLE_VALUE == hFF) {
// We shouldn't hit this since we just found our current
// theme in this directory. If we do, just bail out.
lpszRotateTheme[0] = TEXT('\0');
return FALSE;
}
// Step through the .Theme files in this dir until we find our
// current theme file.
bRet = TRUE;
while (lstrcmp(FindData.cFileName, lpszRotateTheme) && bRet) {
bRet = FindNextFile(hFF, &FindData);
}
if (lstrcmp(FindData.cFileName, lpszRotateTheme)) {
// We ran out of files before finding the current theme!?!?
// Not likely... Bail out.
FindClose(hFF);
lpszRotateTheme[0] = TEXT('\0');
return FALSE;
}
// Assume the FindNext file is our current theme. Let's
// get the Next .Theme file -- that's what we're rotating to...
if (FindNextFile(hFF, &FindData)) {
*(FileFromPath(szThemesdir)) = 0;
lstrcat(szThemesdir, FindData.cFileName);
lstrcpy(lpszRotateTheme, szThemesdir);
FindClose(hFF);
return TRUE;
}
// OK, we failed to find another Theme file in the current dir
// so assume our current Theme is the last in the list. Go
// back to the beginning and use the first Theme file we find
// as our "rotate to" theme.
else {
FindClose(hFF);
ZeroMemory(&FindData, sizeof(WIN32_FIND_DATA));
hFF = FindFirstFile(szThemesdir, &FindData);
if (INVALID_HANDLE_VALUE == hFF) {
// This shouldn't fail since we just found our current
// theme in this dir. If it does, bail out.
lpszRotateTheme[0] = TEXT('\0');
return FALSE;
}
// This is our new/rotate file
*(FileFromPath(szThemesdir)) = 0;
lstrcat(szThemesdir, FindData.cFileName);
lstrcpy (lpszRotateTheme, szThemesdir);
FindClose(hFF);
return TRUE;
}
}
// No current theme applied or the Current Theme setting in the
// registry is bogus so use the global szThemeDir setting and
// look for a theme in that directory.
else {
lstrcpy(szThemesdir, szThemeDir);
lstrcat(szThemesdir, TEXT("*\0"));
LoadString(NULL, STR_THMEXT, (szThemesdir + lstrlen(szThemesdir)),
MAX_PATH);
ZeroMemory(&FindData, sizeof(WIN32_FIND_DATA));
hFF = FindFirstFile(szThemesdir, &FindData);
if (INVALID_HANDLE_VALUE == hFF) {
// Apparently there are no themes available in the default
// Themes directory. We're hosed -- no rotation today.
lpszRotateTheme[0] = TEXT('\0');
return FALSE;
}
// This is our new/rotate file
*(FileFromPath(szThemesdir)) = 0;
lstrcat(szThemesdir, FindData.cFileName);
lstrcpy (lpszRotateTheme, szThemesdir);
FindClose(hFF);
return TRUE;
}
return FALSE;
}