257 lines
7.0 KiB
C++
257 lines
7.0 KiB
C++
//**************************************************************
|
|
//* OpenGLide for Macintosh - Glide to OpenGL Wrapper
|
|
//* http://macglide.sourceforge.net/
|
|
//*
|
|
//* OpenGLide Settings File
|
|
//*
|
|
//* OpenGLide is OpenSource under LGPL license
|
|
//* Mac version and additional features by Jens-Olaf Hemprich
|
|
//**************************************************************
|
|
|
|
#include "GlideSettings_FSp.h"
|
|
|
|
char* s_SettingsFolderName = "XMacGLide Settings";
|
|
const char* s_DefaultSettingsFileName = "Defaults";
|
|
const char* s_LogFileName = "MacGLide.log";
|
|
|
|
OSType s_SettingsFileCreator = 0x54545854; // "ttxt"
|
|
OSType s_SettingsFileType = 0x54455854; // "TEXT"
|
|
OSType s_LogFileCreator = 0x54545854; // "ttxt"
|
|
OSType s_LogFileType = 0x54455854; // "TEXT"
|
|
|
|
GlideSettingsFSp::GlideSettingsFSp()
|
|
: m_vRefNumPrefsFolder(0)
|
|
, m_dirIDPrefsFolder(0)
|
|
, m_SettingsFileRefnum(0)
|
|
, m_LogFileRefnum(0)
|
|
{
|
|
}
|
|
|
|
GlideSettingsFSp::~GlideSettingsFSp(void)
|
|
{
|
|
if (m_FileBuffer) DisposePtr(m_FileBuffer);
|
|
FSClose(m_LogFileRefnum);
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::makeSettingsFolderFileSpec(const char* path, const char* filename, FSSpec* fsspec)
|
|
{
|
|
char buffer[StringBufferSize];
|
|
strcpy(&buffer[1], ":");
|
|
strcat(&buffer[1], path);
|
|
strcat(&buffer[1], ":");
|
|
strcat(&buffer[1], filename);
|
|
GlideSettings::IOErr err = FSMakeFSSpec(m_vRefNumPrefsFolder, m_dirIDPrefsFolder, PascalString(buffer), fsspec);
|
|
if (err == fnfErr) err = noErr;
|
|
return err;
|
|
}
|
|
|
|
/**
|
|
* Find/Create settings folder
|
|
* @return fnfErr means the Classic environment wasn't found
|
|
*/
|
|
GlideSettings::IOErr GlideSettingsFSp::init(const char* applicationname)
|
|
{
|
|
// Select the domain
|
|
#ifdef OPENGLIDE_HOST_MAC // defined in system.h
|
|
short vRefNum = kOnSystemDisk;
|
|
#else // OPENGLIDE_HOST_MAC_OSX
|
|
// else is ok since this is Mac specific code anyway
|
|
short vRefNum = kClassicDomain;
|
|
#endif
|
|
// Make the settings folder
|
|
GlideSettings::IOErr err = FindFolder(vRefNum, kPreferencesFolderType, kCreateFolder, &m_vRefNumPrefsFolder, &m_dirIDPrefsFolder);
|
|
if (err == noErr)
|
|
{
|
|
FSSpec fsspec;
|
|
err = FSMakeFSSpec(m_vRefNumPrefsFolder, m_dirIDPrefsFolder, PascalString(s_SettingsFolderName), &fsspec);
|
|
if (err == fnfErr)
|
|
{
|
|
long dirID;
|
|
err = FSpDirCreate(&fsspec, smSystemScript, &dirID);
|
|
}
|
|
}
|
|
// Make references to various files
|
|
m_fsSettingsFile.vRefNum = 0;
|
|
if (err == noErr)
|
|
{
|
|
err = makeSettingsFolderFileSpec(&s_SettingsFolderName[1], s_LogFileName, &m_fsLogFile);
|
|
if (err == noErr)
|
|
{
|
|
err = makeSettingsFolderFileSpec(&s_SettingsFolderName[1], s_DefaultSettingsFileName, &m_fsDefaultSettingsFile);
|
|
if (err == noErr)
|
|
{
|
|
if (applicationname)
|
|
{
|
|
err = makeSettingsFolderFileSpec(&s_SettingsFolderName[1], applicationname, &m_fsSettingsFile);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::read_file(FSSpec* file, char** mem, long* size, short* refnum)
|
|
{
|
|
GlideSettings::IOErr err = FSpOpenDF(file, fsRdPerm, refnum);
|
|
if (err == noErr)
|
|
{
|
|
err = GetEOF(*refnum, size);
|
|
if (err == noErr)
|
|
{
|
|
*mem = new char[*size + 1];
|
|
(*mem)[*size] = 0x00;
|
|
err = FSRead(*refnum, size, *mem);
|
|
if (err == noErr)
|
|
{
|
|
err = FSClose(*refnum);
|
|
}
|
|
else
|
|
{
|
|
FSClose(*refnum);
|
|
}
|
|
}
|
|
}
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::read_defaults()
|
|
{
|
|
#ifdef OGL_DEBUG
|
|
GlideMsg("Reading default settings...\n");
|
|
#endif
|
|
return read_settings_from_file(&m_fsDefaultSettingsFile, &GlideSettings::create_defaults);
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::read()
|
|
{
|
|
#ifdef OGL_DEBUG
|
|
GlideMsg("Reading application specific settings...\n");
|
|
#endif
|
|
return read_settings_from_file(&m_fsSettingsFile, &GlideSettings::create);
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::read_settings_from_file(FSSpec* file, GlideSettingsFSp::IOErr (GlideSettings::*default_creator) ())
|
|
{
|
|
GlideSettings::IOErr err = read_file(file, &m_FileBuffer, &m_FileBufferSize, &m_SettingsFileRefnum);
|
|
if (err != noErr)
|
|
{
|
|
// create file with default settings
|
|
defaults();
|
|
err = (this->*default_creator)();
|
|
if (err == noErr)
|
|
{
|
|
err = save();
|
|
if (err == noErr)
|
|
{
|
|
// Now we have to load the file into memory to make the settings reader happy
|
|
err = read_file(file, &m_FileBuffer, &m_FileBufferSize, &m_SettingsFileRefnum);
|
|
}
|
|
}
|
|
}
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::create_defaults()
|
|
{
|
|
#ifdef OGL_DEBUG
|
|
GlideMsg("Creating new file with default settings...\n");
|
|
#endif
|
|
GlideSettings::IOErr err = FSpDelete(&m_fsDefaultSettingsFile);
|
|
err = FSpCreate(&m_fsDefaultSettingsFile, s_SettingsFileCreator, s_SettingsFileType, smSystemScript);
|
|
if (err == noErr || err == dupFNErr)
|
|
{
|
|
err = FSpOpenDF(&m_fsDefaultSettingsFile, fsWrPerm, &m_SettingsFileRefnum);
|
|
}
|
|
if (err == noErr)
|
|
{
|
|
#ifdef OGL_DEBUG
|
|
GlideMsg("Looking for obsolete 0.09 settings in app dir...\n");
|
|
#endif
|
|
ProcessSerialNumber psn;
|
|
if (GetCurrentProcess(&psn) == noErr)
|
|
{
|
|
ProcessInfoRec info;
|
|
memset(&info, 0, sizeof(info));
|
|
info.processInfoLength = sizeof(info);
|
|
FSSpec fsspec;
|
|
info.processAppSpec = &fsspec;
|
|
GlideSettings::IOErr err2 = GetProcessInformation(&psn, &info);
|
|
if (err2 == noErr)
|
|
{
|
|
const unsigned int number_of_old_files = 3;
|
|
char* old_files[number_of_old_files] =
|
|
{
|
|
"X:OpenGLid.INI",
|
|
"X:OpenGLid.LOG",
|
|
"X:OpenGLid.ERR"
|
|
};
|
|
for(unsigned long i = 0; i < number_of_old_files; i++)
|
|
{
|
|
err2 = HDelete(fsspec.vRefNum, fsspec.parID, PascalString(old_files[i]));
|
|
if (err2 == noErr) GlideMsg("Removed 0.09 %s in app dir\n", &(old_files[i])[2]);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::create()
|
|
{
|
|
#ifdef OGL_DEBUG
|
|
GlideMsg("Creating new file with application specific settings...\n");
|
|
#endif
|
|
GlideSettings::IOErr err = FSpDelete(&m_fsSettingsFile);
|
|
err = FSpCreate(&m_fsSettingsFile, s_SettingsFileCreator, s_SettingsFileType, smSystemScript);
|
|
if (err == noErr || err == dupFNErr)
|
|
{
|
|
err = FSpOpenDF(&m_fsSettingsFile, fsWrPerm, &m_SettingsFileRefnum);
|
|
if (err == noErr)
|
|
{
|
|
// Enable using this file
|
|
UseApplicationSpecificSettings = true;
|
|
}
|
|
}
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::put_raw(const char* string)
|
|
{
|
|
long count = strlen(string);
|
|
GlideSettings::IOErr err = FSWrite(m_SettingsFileRefnum, &count, string);
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::close()
|
|
{
|
|
GlideSettings::IOErr err = FSClose(m_SettingsFileRefnum);
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::create_log()
|
|
{
|
|
GlideSettings::IOErr err = FSpDelete(&m_fsLogFile);
|
|
if (err == noErr || err == fnfErr)
|
|
{
|
|
err = FSpCreate(&m_fsLogFile, s_SettingsFileCreator, s_SettingsFileType, smSystemScript);
|
|
if (err == noErr)
|
|
{
|
|
err = FSpOpenDF(&m_fsLogFile, fsWrPerm, &m_LogFileRefnum);
|
|
}
|
|
}
|
|
return err;
|
|
}
|
|
|
|
GlideSettings::IOErr GlideSettingsFSp::write_log(const char* message)
|
|
{
|
|
long count = strlen(message);
|
|
IOErr err = FSWrite(m_LogFileRefnum, &count, message);
|
|
return err;
|
|
}
|
|
|
|
const unsigned char* GlideSettingsFSp::PascalString(char* string)
|
|
{
|
|
string[0] = static_cast<char>(strlen(&string[1]));
|
|
return reinterpret_cast<const unsigned char*>(string);
|
|
}
|