profile.c File Reference

#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <sys/types.h>
#include "profile.h"

Include dependency graph for profile.c:

Go to the source code of this file.

Data Structures
struct	TKeys
struct	TSecHeader
struct	TProfile
Defines
#define	xmalloc(x, y)   malloc (x)
#define	INIFILE   "win.ini"
#define	STRSIZE   255
#define	overflow   (next == &CharBuffer [STRSIZE-1])
Enumerations
enum	{   FirstBrace, OnSecHeader, IgnoreToEOL, KeyDef,   KeyValue, FirstChar }
Functions
static int	is_loaded (char *FileName, TSecHeader **section)
static TSecHeader *	load (char *file)
static void	new_key (TSecHeader *section, char *KeyName, char *Value)
char *	GetSetProfileChar (int set, char *AppName, char *KeyName, char *Default, char *FileName)
short	GetSetProfile (int set, char *AppName, char *KeyName, char *Default, char *ReturnedString, short Size, char *FileName)
short	GetPrivateProfileString (char *AppName, char *KeyName, char *Default, char *ReturnedString, short Size, char *FileName)
char *	get_profile_string (char *AppName, char *KeyName, char *Default, char *FileName)
int	GetProfileString (char *AppName, char *KeyName, char *Default, char *ReturnedString, int Size)
int	GetPrivateProfileInt (char *AppName, char *KeyName, short Default, char *File)
int	GetProfileInt (char *AppName, char *KeyName, int Default)
int	WritePrivateProfileString (char *AppName, char *KeyName, char *String, char *FileName)
int	WriteProfileString (char *AppName, char *KeyName, char *String)
static void	dump_keys (FILE *profile, TKeys *p)
static void	dump_sections (FILE *profile, TSecHeader *p)
static void	dump_profile (TProfile *p)
void	sync_profiles (void)
static void	free_keys (TKeys *p)
static void	free_sections (TSecHeader *p)
static void	free_profile (TProfile *p)
void	free_profiles (void)
void *	profile_init_iterator (char *appname, char *file)
void *	profile_iterator_next (void *s, char **key, char **value)
void	profile_clean_section (char *appname, char *file)
Variables
TProfile *	Current = 0
TProfile *	Base = 0

---

Define Documentation

#define INIFILE   "win.ini"

Definition at line 46 of file profile.c.

Referenced by GetProfileInt(), GetProfileString(), and WriteProfileString().

#define overflow   (next == &CharBuffer [STRSIZE-1])

Definition at line 48 of file profile.c.

Referenced by load().

#define STRSIZE   255

Definition at line 47 of file profile.c.

Referenced by load().

#define xmalloc	(	x,
		y		)	malloc (x)

Definition at line 43 of file profile.c.

Referenced by GetSetProfileChar(), load(), new_key(), and profile_init_iterator().

---

Enumeration Type Documentation

anonymous enum

Enumerator:

FirstBrace
OnSecHeader
IgnoreToEOL
KeyDef
KeyValue
FirstChar

Definition at line 50 of file profile.c.

     {
   FirstBrace, OnSecHeader, IgnoreToEOL, KeyDef, KeyValue, FirstChar
};

---

Function Documentation

static void dump_keys	(	FILE *	profile,
		TKeys *	p
	)			[static]

Definition at line 340 of file profile.c.

References TKeys::KeyName, TKeys::link, and TKeys::Value.

Referenced by dump_sections().

{
   if (!p)
      return;
   dump_keys (profile, p->link);
   fprintf (profile, "%s=%s\n", p->KeyName, p->Value);
}

Here is the caller graph for this function:

static void dump_profile

(

TProfile *

p

)

[static]

Definition at line 361 of file profile.c.

References dump_sections(), TProfile::FileName, TProfile::link, and TProfile::Section.

Referenced by sync_profiles().

{
   FILE   *profile;

   if (!p)
      return;
   dump_profile (p->link);
   if ((profile = fopen (p->FileName, "w")) != NULL) {
      dump_sections (profile, p->Section);
      fclose (profile);
   }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void dump_sections	(	FILE *	profile,
		TSecHeader *	p
	)			[static]

Definition at line 349 of file profile.c.

References TSecHeader::AppName, dump_keys(), TSecHeader::Keys, and TSecHeader::link.

Referenced by dump_profile().

{
   if (!p)
      return;
   dump_sections (profile, p->link);
   if (p->AppName[0]) {
      fprintf (profile, "\n[%s]\n", p->AppName);
      dump_keys (profile, p->Keys);
   }
}

Here is the call graph for this function:

Here is the caller graph for this function:

static void free_keys

(

TKeys *

p

)

[static]

Definition at line 385 of file profile.c.

References TKeys::KeyName, TKeys::link, and TKeys::Value.

Referenced by free_sections().

{
   if (!p)
      return;
   free_keys (p->link);
   free (p->KeyName);
   free (p->Value);
   free (p);
}

Here is the caller graph for this function:

static void free_profile

(

TProfile *

p

)

[static]

Definition at line 409 of file profile.c.

References TProfile::FileName, free_sections(), TProfile::link, and TProfile::Section.

Referenced by free_profiles().

{
   if (!p)
      return;
   free_profile (p->link);
   free_sections (p->Section);
   free (p->FileName);
   free (p);
}

Here is the call graph for this function:

Here is the caller graph for this function:

void free_profiles

(

void

)

Definition at line 420 of file profile.c.

References free_profile().

{
   free_profile (Base);
}

Here is the call graph for this function:

static void free_sections

(

TSecHeader *

p

)

[static]

Definition at line 396 of file profile.c.

References TSecHeader::AppName, free_keys(), TSecHeader::Keys, and TSecHeader::link.

Referenced by free_profile().

{
   if (!p)
      return;
   free_sections (p->link);
   free_keys (p->Keys);
   free (p->AppName);
   p->link = 0;
   p->Keys = 0;
   free (p);
}

Here is the call graph for this function:

Here is the caller graph for this function:

char* get_profile_string	(	char *	AppName,
		char *	KeyName,
		char *	Default,
		char *	FileName
	)

Definition at line 288 of file profile.c.

References GetSetProfileChar().

{
   return GetSetProfileChar (0, AppName, KeyName, Default, FileName);
}

Here is the call graph for this function:

int GetPrivateProfileInt	(	char *	AppName,
		char *	KeyName,
		short	Default,
		char *	File
	)

Definition at line 303 of file profile.c.

References GetPrivateProfileString().

Referenced by GetProfileInt(), and main().

{
   static char IntBuf[10];
   static char buf[10];

   sprintf (buf, "%d", Default);

   /* Check the exact semantic with the SDK */
   GetPrivateProfileString (AppName, KeyName, buf, IntBuf, 5, File);
   if (!strcasecmp (IntBuf, "true"))
      return 1;
   if (!strcasecmp (IntBuf, "yes"))
      return 1;
   return atoi (IntBuf);
}

Here is the call graph for this function:

Here is the caller graph for this function:

short GetPrivateProfileString	(	char *	AppName,
		char *	KeyName,
		char *	Default,
		char *	ReturnedString,
		short	Size,
		char *	FileName
	)

Definition at line 280 of file profile.c.

References GetSetProfile().

Referenced by GetPrivateProfileInt(), GetProfileString(), mollerClass::Loop(), and main().

{
   return (GetSetProfile (0, AppName, KeyName, Default, ReturnedString, Size, FileName));
}

Here is the call graph for this function:

Here is the caller graph for this function:

int GetProfileInt	(	char *	AppName,
		char *	KeyName,
		int	Default
	)

Definition at line 321 of file profile.c.

References GetPrivateProfileInt(), and INIFILE.

{
   return GetPrivateProfileInt (AppName, KeyName, Default, INIFILE);
}

Here is the call graph for this function:

int GetProfileString	(	char *	AppName,
		char *	KeyName,
		char *	Default,
		char *	ReturnedString,
		int	Size
	)

Definition at line 295 of file profile.c.

References GetPrivateProfileString(), and INIFILE.

{
   return GetPrivateProfileString (AppName, KeyName, Default,
           ReturnedString, Size, INIFILE);
}

Here is the call graph for this function:

short GetSetProfile	(	int	set,
		char *	AppName,
		char *	KeyName,
		char *	Default,
		char *	ReturnedString,
		short	Size,
		char *	FileName
	)

Definition at line 266 of file profile.c.

References GetSetProfileChar().

Referenced by GetPrivateProfileString(), and WritePrivateProfileString().

{
   char   *s;

   s = GetSetProfileChar (set, AppName, KeyName, Default, FileName);
   if (!set) {
      ReturnedString[Size - 1] = 0;
      strncpy (ReturnedString, s, Size - 1);
   }
   return 1;
}

Here is the call graph for this function:

Here is the caller graph for this function:

char* GetSetProfileChar	(	int	set,
		char *	AppName,
		char *	KeyName,
		char *	Default,
		char *	FileName
	)

Definition at line 214 of file profile.c.

References TSecHeader::AppName, TProfile::FileName, is_loaded(), TKeys::KeyName, TSecHeader::Keys, TKeys::link, TSecHeader::link, TProfile::link, load(), new_key(), TProfile::Section, TKeys::Value, and xmalloc.

Referenced by get_profile_string(), and GetSetProfile().

{

   TProfile *New;
   TSecHeader *section;
   TKeys  *key;

   if (!is_loaded (FileName, &section)) {
      New = (TProfile *) xmalloc (sizeof (TProfile), "GetSetProfile");
      New->link = Base;
      New->FileName = strdup (FileName);
      New->Section = load (FileName);
      Base = New;
      section = New->Section;
      Current = New;
   }
   /* Start search */
   for (; section; section = section->link) {
      if (strcasecmp (section->AppName, AppName))
   continue;
      for (key = section->Keys; key; key = key->link) {
   if (strcasecmp (key->KeyName, KeyName))
      continue;
   if (set) {
      free (key->Value);
      key->Value = strdup (Default);
   }
   return key->Value;
      }
      /* If getting the information, then don't write the information
       * to the INI file, need to run a couple of tests with windog */
      /* No key found */
      if (set) {
   new_key (section, KeyName, Default);
   return 0;
      }
   }

   /* Non existent section */
   if (set) {
      section = (TSecHeader *) xmalloc (sizeof (TSecHeader), "GSP3");
      section->AppName = strdup (AppName);
      section->Keys = 0;
      new_key (section, KeyName, Default);
      section->link = Current->Section;
      Current->Section = section;
   }
   return Default;
}

Here is the call graph for this function:

Here is the caller graph for this function:

static int is_loaded	(	char *	FileName,
		TSecHeader **	section
	)			[static]

Definition at line 76 of file profile.c.

References TProfile::FileName, TProfile::link, and TProfile::Section.

Referenced by GetSetProfileChar(), profile_clean_section(), and profile_init_iterator().

{
   TProfile *p = Base;

   while (p) {
      if (!strcasecmp (FileName, p->FileName)) {
   Current = p;
   *section = p->Section;
   return 1;
      }
      p = p->link;
   }
   return 0;
}

Here is the caller graph for this function:

static TSecHeader* load

(

char *

file

)

[static]

Definition at line 94 of file profile.c.

References TSecHeader::AppName, FirstBrace, FirstChar, IgnoreToEOL, KeyDef, TKeys::KeyName, TSecHeader::Keys, KeyValue, TKeys::link, TSecHeader::link, OnSecHeader, overflow, STRSIZE, TKeys::Value, and xmalloc.

Referenced by GetSetProfileChar(), and profile_init_iterator().

{
   FILE   *f;
   int     state;
   TSecHeader *SecHeader = 0;
   char    CharBuffer[STRSIZE];
   char   *next = "";   /* Not needed */
   int     c;

   if ((f = fopen (file, "r")) == NULL)
      return NULL;

   state = FirstBrace;
   while ((c = getc (f)) != EOF) {
      if (c == '\r')    /* Ignore Carriage Return */
   continue;

      switch (state) {

      case OnSecHeader:
   if (c == ']' || overflow) {
      *next = '\0';
      next = CharBuffer;
      SecHeader->AppName = strdup (CharBuffer);
      state = IgnoreToEOL;
   } else
      *next++ = c;
   break;

      case IgnoreToEOL:
   if (c == '\n') {
      state = FirstChar;
      next = CharBuffer;
   }
   break;

      case FirstBrace:
      case FirstChar:
   if (c == '#' || c == ';') {
      state = IgnoreToEOL;
      break;
   }
      case KeyDef:
   if (c == '[') {
      TSecHeader *temp;

      temp = SecHeader;
      SecHeader = (TSecHeader *) xmalloc (sizeof (TSecHeader),
            "KeyDef");
      SecHeader->link = temp;
      SecHeader->Keys = 0;
      state = OnSecHeader;
      next = CharBuffer;
      break;
   }
   if (state == FirstBrace) /* On first pass, don't allow dangling keys */
      break;

   if (state == FirstChar)  /* On first pass, don't allow dangling keys */
      state = KeyDef;

   if (c == ' ' || c == '\t')
      break;

   if (c == '\n' || overflow) { /* Abort Definition */
#ifdef DEBUG
      printf ("Abort %s (%s)\n", next, CharBuffer);
#endif
      next = CharBuffer;
      break;
   }
   if (c == '=' || overflow) {
      TKeys  *temp;

      temp = SecHeader->Keys;
      *next = '\0';
      SecHeader->Keys = (TKeys *) xmalloc (sizeof (TKeys), "KD2");
      SecHeader->Keys->link = temp;
      SecHeader->Keys->KeyName = strdup (CharBuffer);
      state = KeyValue;
      next = CharBuffer;
   } else
      *next++ = c;
   break;

      case KeyValue:
   if (overflow || c == '\n') {
      *next = '\0';
      SecHeader->Keys->Value = strdup (CharBuffer);
      state = c == '\n' ? FirstChar : IgnoreToEOL;
      next = CharBuffer;
#ifdef DEBUG
      printf ("[%s] (%s)=%s\n", SecHeader->AppName,
        SecHeader->Keys->KeyName, SecHeader->Keys->Value);
#endif
   } else
      *next++ = c;
   break;

      }       /* switch */
#ifdef DEBUG
      printf ("%i Step %c [%s] (%s)\n", state, c, next, CharBuffer);
#endif
   }        /* while ((c = getc (f)) != EOF) */
   return SecHeader;
}

Here is the caller graph for this function:

static void new_key	(	TSecHeader *	section,
		char *	KeyName,
		char *	Value
	)			[static]

Definition at line 202 of file profile.c.

References TKeys::KeyName, TSecHeader::Keys, TKeys::link, TKeys::Value, and xmalloc.

Referenced by GetSetProfileChar().

{
   TKeys  *key;

   key = (TKeys *) xmalloc (sizeof (TKeys), "new_key");
   key->KeyName = strdup (KeyName);
   key->Value = strdup (Value);
   key->link = section->Keys;
   section->Keys = key;
}

Here is the caller graph for this function:

void profile_clean_section	(	char *	appname,
		char *	file
	)

Definition at line 462 of file profile.c.

References TSecHeader::AppName, is_loaded(), and TSecHeader::link.

{
   TSecHeader *section;

   /* We assume the user has called one of the other initialization funcs */
   if (!is_loaded (file, &section)) {
      fprintf (stderr, "Warning: profile_clean_section called before init\n");
      return;
   }
   /* We only disable the section, so it will still be freed, but it */
   /* won't be find by further walks of the structure */

   for (; section; section = section->link) {
      if (strcasecmp (section->AppName, appname))
   continue;
      section->AppName[0] = 0;
   }
}

Here is the call graph for this function:

void* profile_init_iterator	(	char *	appname,
		char *	file
	)

Definition at line 426 of file profile.c.

References TSecHeader::AppName, TProfile::FileName, is_loaded(), TSecHeader::Keys, TSecHeader::link, TProfile::link, load(), TProfile::Section, and xmalloc.

{
   TProfile *New;
   TSecHeader *section;

   if (!is_loaded (file, &section)) {
      New = (TProfile *) xmalloc (sizeof (TProfile), "GetSetProfile");
      New->link = Base;
      New->FileName = strdup (file);
      New->Section = load (file);
      Base = New;
      section = New->Section;
      Current = New;
   }
   for (; section; section = section->link) {
      if (strcasecmp (section->AppName, appname))
   continue;
      return section->Keys;
   }
   return 0;
}

Here is the call graph for this function:

void* profile_iterator_next	(	void *	s,
		char **	key,
		char **	value
	)

Definition at line 449 of file profile.c.

References TKeys::KeyName, TKeys::link, and TKeys::Value.

{
   TKeys  *keys = (TKeys *) s;

   if (keys) {
      *key = keys->KeyName;
      *value = keys->Value;
      keys = keys->link;
   }
   return keys;
}

void sync_profiles

(

void

)

Definition at line 379 of file profile.c.

References dump_profile().

{
   dump_profile (Base);
}

Here is the call graph for this function:

int WritePrivateProfileString	(	char *	AppName,
		char *	KeyName,
		char *	String,
		char *	FileName
	)

Definition at line 327 of file profile.c.

References GetSetProfile().

Referenced by WriteProfileString().

{
   return GetSetProfile (1, AppName, KeyName, String, "", 0, FileName);
}

Here is the call graph for this function:

Here is the caller graph for this function:

int WriteProfileString	(	char *	AppName,
		char *	KeyName,
		char *	String
	)

Definition at line 334 of file profile.c.

References INIFILE, and WritePrivateProfileString().

{
   return (WritePrivateProfileString (AppName, KeyName, String, INIFILE));
}

Here is the call graph for this function:

---

Variable Documentation

TProfile* Base = 0

Definition at line 73 of file profile.c.

TProfile* Current = 0

Definition at line 72 of file profile.c.