484 lines
11 KiB
C++

/*
** Command & Conquer Generals Zero Hour(tm)
** Copyright 2025 Electronic Arts Inc.
**
** This program is free software: you can redistribute it and/or modify
** it under the terms of the GNU General Public License as published by
** the Free Software Foundation, either version 3 of the License, or
** (at your option) any later version.
**
** This program is distributed in the hope that it will be useful,
** but WITHOUT ANY WARRANTY; without even the implied warranty of
** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
** GNU General Public License for more details.
**
** You should have received a copy of the GNU General Public License
** along with this program. If not, see <http://www.gnu.org/licenses/>.
*/
/****************************************************************************\
* C O N F I D E N T I A L --- W E S T W O O D S T U D I O S *
******************************************************************************
Project Name: Carpenter (The RedAlert ladder creator)
File Name : configfile.cpp
Author : Neal Kettler
Start Date : June 9, 1997
Last Update : June 17, 1997
This class will read in a config file and store the key value pairs for
later access. This is a fairly simple class, the config file is assumed
to be of the form:
#comment
key = value
The value can then be retrieved as a string or an integer. The key on
the left is used for retrieval and it must be specified in uppercase
for the 'get' functions. E.g. getString("KEY",valWstring);
\***************************************************************************/
#include <stdlib.h>
#include <stdio.h>
#include <ctype.h>
#include "configfile.h"
#include "wdebug.h"
static uint32 Wstring_Hash(const Wstring &string);
static char *Eat_Spaces(char *string);
ConfigFile::ConfigFile() : Dictionary_(Wstring_Hash)
{ }
ConfigFile::~ConfigFile()
{ }
// Read and parse the config file. The key value pairs will be stored
// for later access by the getString/getInt functions.
bit8 ConfigFile::readFile(FILE *in)
{
char string[256];
char sectionname[256]; // section name like '[user parameters]'
Wstring key;
Wstring value;
char *cptr;
memset(string,0,256);
memset(sectionname,0,256);
sectionList.clear();
while (fgets(string,256,in))
{
cptr=Eat_Spaces(string);
if ((*cptr==0)||(*cptr=='#')) // '#' signals a comment
continue;
if (*cptr=='[') // new section
{
key=cptr;
key.truncate(']'); // remove after & including the ]
key.cat("]"); // put the ] back
strcpy(sectionname,key.get()); // set the current section name
Wstring wssectionname;
if (strlen(sectionname)==2) // clear section with a "[]"
{
sectionname[0]=0;
wssectionname.set("");
}
else
wssectionname.set(sectionname+1);
wssectionname.truncate(']');
sectionList.addTail(wssectionname);
continue;
}
if (strchr(cptr,'=')==NULL) // All config entries must have a '='
continue;
key=cptr;
key.truncate('=');
key.removeSpaces(); // No spaces allowed in the key
key.toUpper(); // make key all caps
// Add the section name to the end of the key
if (strlen(sectionname))
key.cat(sectionname);
cptr=Eat_Spaces(strchr(cptr,'=')+1); // Jump to after the '='
value=cptr;
value.truncate('\r');
value.truncate('\n');
value.truncate('#');
// Remove trailing spaces
while(isgraph(value.get()[strlen(value.get())-1])==0)
value.get()[strlen(value.get())-1]=0;
Critsec_.lock();
Dictionary_.add(key,value);
Critsec_.unlock();
}
return(TRUE);
}
//
// Enum through the config strings. To start, index & offset should be 0
// If retval is false you're done, ignore whatever's in key & value.
//
// Section specifies the configfile section. Set to NULL if you don't care.
//
bit8 ConfigFile::enumerate(int &index, int &offset, Wstring &key, Wstring &value, IN char *section) const
{
int seclen = strlen(section);
while(1)
{
Critsec_.lock();
if (Dictionary_.iterate(index,offset,key,value)==FALSE) // out of keys?
{
Critsec_.unlock();
return(FALSE);
}
Critsec_.unlock();
if (section==NULL) // no specified section, so any will do...
break;
if (strlen(section)+2 >= strlen(key.get())) // key should have form: X[section]
continue;
// Is this key part of our section?
const char *keystr = key.get() + strlen(key.get())-seclen-1;
if (strncmp(keystr,section,strlen(section))==0)
break;
}
key.truncate('['); // remove the section name
return(TRUE);
}
// Get a config entry as a string
bit8 ConfigFile::getString(IN Wstring &_key, Wstring &value, IN char *section) const
{
Wstring key(_key);
key.toUpper();
if (section) // append section name to key
{
key+="[";
key+=section;
key+="]";
}
Critsec_.lock();
bit8 retval=Dictionary_.getValue(key,value);
Critsec_.unlock();
if (retval==FALSE)
{
DBGMSG("Config entry missing: "<<key.get());
}
return(retval);
}
// Get a config entry as a string
bit8 ConfigFile::getString(IN char *key,Wstring &value, IN char *section) const
{
Wstring sKey;
sKey.set(key);
return(getString(sKey,value,section));
}
// Get a config entry as an integer
bit8 ConfigFile::getInt(IN Wstring &_key,sint32 &value, IN char *section) const
{
Wstring key(_key);
key.toUpper();
if (section) // append section name to key
{
key+="[";
key+=section;
key+="]";
}
Wstring svalue;
Critsec_.lock();
bit8 retval=Dictionary_.getValue(key,svalue);
Critsec_.unlock();
if (retval==FALSE)
{ DBGMSG("Config entry missing: "<<key.get()); }
if (retval==FALSE)
return(FALSE);
value=atol(svalue.get());
return(TRUE);
}
// Get a config entry as an integer
bit8 ConfigFile::getInt(IN char *key,sint32 &value, IN char *section) const
{
Wstring sKey;
sKey.set(key);
return(getInt(sKey,value,section));
}
// Get a config entry as an integer
bit8 ConfigFile::getInt(IN Wstring &_key,sint16 &value, IN char *section) const
{
Wstring key(_key);
key.toUpper();
if (section) // append section name to key
{
key+="[";
key+=section;
key+="]";
}
Wstring svalue;
Critsec_.lock();
bit8 retval=Dictionary_.getValue(key,svalue);
Critsec_.unlock();
if (retval==FALSE)
{ DBGMSG("Config entry missing: "<<key.get()); }
if (retval==FALSE)
return(FALSE);
value=atoi(svalue.get());
return(TRUE);
}
// Get a config entry as an integer
bit8 ConfigFile::getInt(IN char *key,sint16 &value, IN char *section) const
{
Wstring sKey;
sKey.set(key);
return(getInt(sKey,value,section));
}
/************* MDC; Added functionality for updating and saving config files ************/
// Remove an entry
bit8 ConfigFile::removeEntry(IN Wstring &_key, IN char *section)
{
Wstring key(_key);
key.toUpper();
if (section) // append section name to key
{
key+="[";
key+=section;
key+="]";
}
Critsec_.lock();
bit8 retval=Dictionary_.remove(key);
Critsec_.unlock();
if (retval==FALSE)
{ DBGMSG("Config entry missing: "<<key.get()); }
if (retval==FALSE)
return(FALSE);
return(TRUE);
}
// Remove an entry
bit8 ConfigFile::removeEntry(IN char *key, IN char *section)
{
Wstring sKey;
sKey.set(key);
return removeEntry(sKey, section);
}
// Set a config entry as a string
bit8 ConfigFile::setString(IN Wstring &_key, IN Wstring &value, IN char *section)
{
Wstring key(_key);
key.toUpper();
if (section) // append section name to key
{
key+="[";
key+=section;
key+="]";
}
else
{
section = ""; // give it a default
}
Critsec_.lock();
Dictionary_.remove(key);
bit8 retval=Dictionary_.add(key,value);
// Test for a new section
Wstring test;
int i;
for (i=0; i<sectionList.length(); i++)
{
sectionList.get(test, i);
if (!strcmp(test.get(), section))
break;
}
if (i == sectionList.length())
{
// New section!
//DBGMSG("New section " << section << ", " << sectionList.length() << " entries");
test.set(section);
sectionList.addTail(test);
}
Critsec_.unlock();
if (retval==FALSE)
{
DBGMSG("Config could not set entry: "<<key.get());
}
return(retval);
}
// Set a config entry as a string
bit8 ConfigFile::setString(IN char *key,IN Wstring &value, IN char *section)
{
Wstring sKey;
sKey.set(key);
return(setString(sKey,value,section));
}
// Set a config entry as an integer
bit8 ConfigFile::setInt(IN Wstring &_key,IN sint32 &value, IN char *section)
{
Wstring key(_key);
key.toUpper();
if (section) // append section name to key
{
key+="[";
key+=section;
key+="]";
}
else
{
section = ""; // give it a default
}
Wstring svalue;
svalue.setFormatted("%d", value);
Critsec_.lock();
Dictionary_.remove(key);
bit8 retval=Dictionary_.add(key,svalue);
// Test for a new section
Wstring test;
//DBGMSG("Testing " << sectionList.length() << " entries for " << section);
int i;
for (i=0; i<sectionList.length(); i++)
{
sectionList.get(test, i);
//DBGMSG("Looking at " << test.get());
if (!strcmp(test.get(), section))
break;
}
if (i == sectionList.length() && section)
{
// New section!
//DBGMSG("New section " << section << ", " << sectionList.length() << " entries");
test.set(section);
sectionList.addTail(test);
}
Critsec_.unlock();
if (retval==FALSE)
{ DBGMSG("Config could not set entry: "<<key.get()); }
if (retval==FALSE)
return(FALSE);
return(TRUE);
}
// Set a config entry as an integer
bit8 ConfigFile::setInt(IN char *key,IN sint32 &value, IN char *section)
{
Wstring sKey;
sKey.set(key);
return(setInt(sKey,value,section));
}
// Write config file to disk. Does not preserve comments, etc.
bit8 ConfigFile::writeFile(FILE *config)
{
if (!config)
{
ERRMSG("No FP on config file write!");
return FALSE;
}
int index = 0;
int offset = 0;
Wstring key;
Wstring value;
Wstring section;
//DBGMSG(sectionList.length() << " entries");
for (int i=0; i<sectionList.length(); i++)
{
sectionList.get(section, i);
//DBGMSG("Writing " << section.get());
fprintf(config, "[%s]\n", section.get());
index = 0;
offset = 0;
while (enumerate(index, offset, key, value, section.get())!=FALSE)
{
fprintf(config, "%s=%s\n", key.get(), value.get());
}
fprintf(config, "\n");
}
return TRUE;
}
/************* Static functions below **************/
// Given a Wstring, return a 32 bit integer that has a good numeric
// distributation for the purposes of indexing into a hash table.
static uint32 Wstring_Hash(const Wstring &string)
{
uint32 retval=0;
retval=string.length();
for (uint32 i=0; i<string.length(); i++)
{
retval+=*(string.get()+i);
retval+=i;
retval=(retval<<8)^(retval>>24); // ROL 8
}
return(retval);
}
static char *Eat_Spaces(char *string)
{
char *retval=string;
while (isspace(*retval))
retval++;
return(retval);
}