1123 lines
27 KiB
C
Executable File
1123 lines
27 KiB
C
Executable File
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@file iniparser.c
|
|
@author N. Devillard
|
|
@brief Parser for ini files.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
/*---------------------------- Includes ------------------------------------*/
|
|
#include <ctype.h>
|
|
#include "iniparser.h"
|
|
|
|
/*---------------------------- Defines -------------------------------------*/
|
|
#define ASCIILINESZ (1024)
|
|
#define INI_INVALID_KEY ((char *)-1)
|
|
|
|
/*---------------------------------------------------------------------------
|
|
* Private to this module
|
|
---------------------------------------------------------------------------*/
|
|
/**
|
|
* This enum stores the status for each parsed line (internal use only).
|
|
*/
|
|
typedef enum _line_status_ {
|
|
LINE_UNPROCESSED,
|
|
LINE_ERROR,
|
|
LINE_EMPTY,
|
|
LINE_COMMENT,
|
|
LINE_SECTION,
|
|
LINE_VALUE
|
|
} line_status;
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Convert a string to lowercase.
|
|
@param s String to convert.
|
|
|
|
This function modifies the string passed, the modified string
|
|
contains a lowercased version of the input string.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
#if 0
|
|
static void strlwc(char *s)
|
|
{
|
|
int i;
|
|
|
|
if (s == NULL) return;
|
|
i = 0;
|
|
while (s[i]) {
|
|
s[i] = (char)tolower((int)s[i]);
|
|
i++;
|
|
}
|
|
}
|
|
#endif
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Remove blanks at the beginning and the end of a string.
|
|
@param s String to parse.
|
|
|
|
This function modifies the input string and returns a modified string
|
|
which is identical to the input string, except that all blank
|
|
characters at the end and the beg. of the string have been removed.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
static void strstrip(char *s)
|
|
{
|
|
if (s == NULL)
|
|
return;
|
|
|
|
char *last = s + strlen(s);
|
|
char *dest = s;
|
|
|
|
while (isspace((int)*s) && *s)
|
|
s++;
|
|
|
|
while (last > s) {
|
|
if (!isspace((int)*(last-1)))
|
|
break;
|
|
last--;
|
|
}
|
|
*last = (char)0;
|
|
|
|
memmove(dest, s, last - s + 1);
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get number of sections in a dictionary
|
|
@param d Dictionary to examine
|
|
@return int Number of sections found in dictionary
|
|
|
|
This function returns the number of sections found in a dictionary.
|
|
The test to recognize sections is done on the string stored in the
|
|
dictionary: a section name is given as "section" whereas a key is
|
|
stored as "section:key", thus the test looks for entries that do not
|
|
contain a colon.
|
|
|
|
This clearly fails in the case a section name contains a colon, but
|
|
this should simply be avoided.
|
|
|
|
This function returns -1 in case of error.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
int iniparser_getnsec(dictionary *d)
|
|
{
|
|
int i;
|
|
int nsec;
|
|
|
|
if (d == NULL)
|
|
return -1;
|
|
nsec = 0;
|
|
for (i = 0; i < d->size; i++) {
|
|
if (d->key[i] == NULL)
|
|
continue;
|
|
if (strchr(d->key[i], ':') == NULL) {
|
|
nsec++;
|
|
}
|
|
}
|
|
return nsec;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get name for section n in a dictionary.
|
|
@param d Dictionary to examine
|
|
@param n Section number (from 0 to nsec-1).
|
|
@return Pointer to char string
|
|
|
|
This function locates the n-th section in a dictionary and returns
|
|
its name as a pointer to a string statically allocated inside the
|
|
dictionary. Do not free or modify the returned string!
|
|
|
|
This function returns NULL in case of error.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
char *iniparser_getsecname(dictionary *d, int n)
|
|
{
|
|
int i;
|
|
int foundsec;
|
|
|
|
if (d == NULL || n < 0)
|
|
return NULL;
|
|
foundsec = 0;
|
|
for (i = 0; i < d->size; i++) {
|
|
if (d->key[i] == NULL)
|
|
continue;
|
|
if (strchr(d->key[i], ':') == NULL) {
|
|
foundsec++;
|
|
if (foundsec > n)
|
|
break;
|
|
}
|
|
}
|
|
if (foundsec <= n) {
|
|
return NULL;
|
|
}
|
|
return d->key[i];
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Dump a dictionary to an opened file pointer.
|
|
@param d Dictionary to dump.
|
|
@param f Opened file pointer to dump to.
|
|
@return void
|
|
|
|
This function prints out the contents of a dictionary, one element by
|
|
line, onto the provided file pointer. It is OK to specify @c stderr
|
|
or @c stdout as output files. This function is meant for debugging
|
|
purposes mostly.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
void iniparser_dump(dictionary *d, FILE *f)
|
|
{
|
|
int i;
|
|
|
|
if (d == NULL || f == NULL)
|
|
return;
|
|
for (i = 0; i < d->size; i++) {
|
|
if (d->key[i] == NULL)
|
|
continue;
|
|
if (d->val[i] != NULL) {
|
|
fprintf(f, "[%s]=[%s]\n", d->key[i], d->val[i]);
|
|
} else {
|
|
fprintf(f, "[%s]=UNDEF\n", d->key[i]);
|
|
}
|
|
}
|
|
return;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Save a dictionary to a loadable ini file
|
|
@param d Dictionary to dump
|
|
@param f Opened file pointer to dump to
|
|
@return void
|
|
|
|
This function dumps a given dictionary into a loadable ini file.
|
|
It is Ok to specify @c stderr or @c stdout as output files.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
void iniparser_dump_ini(dictionary *d, FILE *f)
|
|
{
|
|
int i;
|
|
int nsec;
|
|
char *secname;
|
|
|
|
if (d == NULL || f == NULL)
|
|
return;
|
|
|
|
nsec = iniparser_getnsec(d);
|
|
if (nsec < 1) {
|
|
/* No section in file: dump all keys as they are */
|
|
for (i = 0; i < d->size; i++) {
|
|
if (d->key[i] == NULL)
|
|
continue;
|
|
fprintf(f, "%s = %s\n", d->key[i], d->val[i]);
|
|
}
|
|
return;
|
|
}
|
|
for (i = 0; i < nsec; i++) {
|
|
secname = iniparser_getsecname(d, i);
|
|
iniparser_dumpsection_ini(d, secname, f);
|
|
}
|
|
fprintf(f, "\n");
|
|
return;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Save a dictionary section to a loadable ini file
|
|
@param d Dictionary to dump
|
|
@param s Section name of dictionary to dump
|
|
@param f Opened file pointer to dump to
|
|
@return void
|
|
|
|
This function dumps a given section of a given dictionary into a loadable ini
|
|
file. It is Ok to specify @c stderr or @c stdout as output files.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
void iniparser_dumpsection_ini(dictionary *d, char *s, FILE *f)
|
|
{
|
|
int j;
|
|
char *keym;
|
|
int secsize;
|
|
|
|
if (d == NULL || f == NULL)
|
|
return;
|
|
if (!iniparser_find_entry(d, s))
|
|
return;
|
|
|
|
fprintf(f, "\n[%s]\n", s);
|
|
secsize = (int)strlen(s) + 2;
|
|
keym = malloc(secsize);
|
|
snprintf(keym, secsize, "%s:", s);
|
|
for (j = 0; j < d->size; j++) {
|
|
if (d->key[j] == NULL)
|
|
continue;
|
|
if (!strncmp(d->key[j], keym, secsize-1)) {
|
|
fprintf(f,
|
|
"%-30s = %s\n",
|
|
d->key[j]+secsize-1,
|
|
d->val[j] ? d->val[j] : "");
|
|
}
|
|
}
|
|
fprintf(f, "\n");
|
|
free(keym);
|
|
return;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get the number of keys in a section of a dictionary.
|
|
@param d Dictionary to examine
|
|
@param s Section name of dictionary to examine
|
|
@return Number of keys in section
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
int iniparser_getsecnkeys(dictionary *d, char *s)
|
|
{
|
|
int secsize, nkeys;
|
|
char *keym;
|
|
int j;
|
|
|
|
nkeys = 0;
|
|
|
|
if (d == NULL)
|
|
return nkeys;
|
|
if (!iniparser_find_entry(d, s))
|
|
return nkeys;
|
|
|
|
secsize = (int)strlen(s)+2;
|
|
keym = malloc(secsize);
|
|
snprintf(keym, secsize, "%s:", s);
|
|
|
|
for (j = 0; j < d->size; j++) {
|
|
if (d->key[j] == NULL)
|
|
continue;
|
|
if (!strncmp(d->key[j], keym, secsize-1))
|
|
nkeys++;
|
|
}
|
|
free(keym);
|
|
return nkeys;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get the number of keys in a section of a dictionary.
|
|
@param d Dictionary to examine
|
|
@param s Section name of dictionary to examine
|
|
@return pointer to statically allocated character strings
|
|
|
|
This function queries a dictionary and finds all keys in a given section.
|
|
Each pointer in the returned char pointer-to-pointer is pointing to
|
|
a string allocated in the dictionary; do not free or modify them.
|
|
|
|
This function returns NULL in case of error.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
char **iniparser_getseckeys(dictionary *d, char *s)
|
|
{
|
|
|
|
char **keys;
|
|
int i, j;
|
|
char *keym;
|
|
int secsize, nkeys;
|
|
|
|
keys = NULL;
|
|
|
|
if (d == NULL)
|
|
return keys;
|
|
if (!iniparser_find_entry(d, s))
|
|
return keys;
|
|
|
|
nkeys = iniparser_getsecnkeys(d, s);
|
|
|
|
keys = (char **) malloc(nkeys*sizeof(char *));
|
|
|
|
secsize = (int)strlen(s) + 2;
|
|
keym = malloc(secsize);
|
|
snprintf(keym, secsize, "%s:", s);
|
|
|
|
i = 0;
|
|
|
|
for (j = 0; j < d->size; j++) {
|
|
if (d->key[j] == NULL)
|
|
continue;
|
|
if (!strncmp(d->key[j], keym, secsize-1)) {
|
|
keys[i] = d->key[j];
|
|
i++;
|
|
}
|
|
}
|
|
free(keym);
|
|
return keys;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get the string associated to a key
|
|
@param d Dictionary to search
|
|
@param key Key string to look for
|
|
@param def Default value to return if key not found.
|
|
@return pointer to statically allocated character string
|
|
|
|
This function queries a dictionary for a key. A key as read from an
|
|
ini file is given as "section:key". If the key cannot be found,
|
|
the pointer passed as 'def' is returned.
|
|
The returned char pointer is pointing to a string allocated in
|
|
the dictionary, do not free or modify it.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
char *iniparser_getstring(dictionary *d, const char *key, char *def)
|
|
{
|
|
char *lc_key;
|
|
char *sval;
|
|
|
|
if (d == NULL || key == NULL)
|
|
return def;
|
|
|
|
lc_key = aw_strdup(key);
|
|
//strlwc(lc_key);
|
|
sval = dictionary_get(d, lc_key, def);
|
|
free(lc_key);
|
|
return sval;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get the string associated to a key, convert to an int
|
|
@param d Dictionary to search
|
|
@param key Key string to look for
|
|
@param notfound Value to return in case of error
|
|
@return integer
|
|
|
|
This function queries a dictionary for a key. A key as read from an
|
|
ini file is given as "section:key". If the key cannot be found,
|
|
the notfound value is returned.
|
|
|
|
Supported values for integers include the usual C notation
|
|
so decimal, octal (starting with 0) and hexadecimal (starting with 0x)
|
|
are supported. Examples:
|
|
|
|
"42" -> 42
|
|
"042" -> 34 (octal -> decimal)
|
|
"0x42" -> 66 (hexa -> decimal)
|
|
|
|
Warning: the conversion may overflow in various ways. Conversion is
|
|
totally outsourced to strtol(), see the associated man page for overflow
|
|
handling.
|
|
|
|
Credits: Thanks to A. Becker for suggesting strtol()
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
int iniparser_getint(dictionary *d, const char *key, int notfound)
|
|
{
|
|
char *str;
|
|
str = iniparser_getstring(d, key, INI_INVALID_KEY);
|
|
if (str == INI_INVALID_KEY)
|
|
return notfound;
|
|
return (int)strtol(str, NULL, 0);
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get the string associated to a key, convert to a double
|
|
@param d Dictionary to search
|
|
@param key Key string to look for
|
|
@param notfound Value to return in case of error
|
|
@return double
|
|
|
|
This function queries a dictionary for a key. A key as read from an
|
|
ini file is given as "section:key". If the key cannot be found,
|
|
the notfound value is returned.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
double iniparser_getdouble(dictionary *d, const char *key, double notfound)
|
|
{
|
|
char *str;
|
|
|
|
str = iniparser_getstring(d, key, INI_INVALID_KEY);
|
|
if (str == INI_INVALID_KEY)
|
|
return notfound;
|
|
return atof(str);
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Get the string associated to a key, convert to a boolean
|
|
@param d Dictionary to search
|
|
@param key Key string to look for
|
|
@param notfound Value to return in case of error
|
|
@return integer
|
|
|
|
This function queries a dictionary for a key. A key as read from an
|
|
ini file is given as "section:key". If the key cannot be found,
|
|
the notfound value is returned.
|
|
|
|
A true boolean is found if one of the following is matched:
|
|
|
|
- A string starting with 'y'
|
|
- A string starting with 'Y'
|
|
- A string starting with 't'
|
|
- A string starting with 'T'
|
|
- A string starting with '1'
|
|
|
|
A false boolean is found if one of the following is matched:
|
|
|
|
- A string starting with 'n'
|
|
- A string starting with 'N'
|
|
- A string starting with 'f'
|
|
- A string starting with 'F'
|
|
- A string starting with '0'
|
|
|
|
The notfound value returned if no boolean is identified, does not
|
|
necessarily have to be 0 or 1.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
int iniparser_getboolean(dictionary *d, const char *key, int notfound)
|
|
{
|
|
char *c;
|
|
int ret;
|
|
|
|
c = iniparser_getstring(d, key, INI_INVALID_KEY);
|
|
if (c == INI_INVALID_KEY)
|
|
return notfound;
|
|
if (c[0] == 'y' || c[0] == 'Y' || c[0] == '1' || c[0] == 't' || c[0] == 'T') {
|
|
ret = 1;
|
|
} else if (c[0] == 'n' || c[0] == 'N' || c[0] == '0' || c[0] == 'f' || c[0] == 'F') {
|
|
ret = 0;
|
|
} else {
|
|
ret = notfound;
|
|
}
|
|
return ret;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Finds out if a given entry exists in a dictionary
|
|
@param ini Dictionary to search
|
|
@param entry Name of the entry to look for
|
|
@return integer 1 if entry exists, 0 otherwise
|
|
|
|
Finds out if a given entry exists in the dictionary. Since sections
|
|
are stored as keys with NULL associated values, this is the only way
|
|
of querying for the presence of sections in a dictionary.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
int iniparser_find_entry(dictionary *ini, const char *entry)
|
|
{
|
|
int found = 0;
|
|
if (iniparser_getstring(ini, entry, INI_INVALID_KEY) != INI_INVALID_KEY) {
|
|
found = 1;
|
|
}
|
|
return found;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Set an entry in a dictionary.
|
|
@param ini Dictionary to modify.
|
|
@param entry Entry to modify (entry name)
|
|
@param val New value to associate to the entry.
|
|
@return int 0 if Ok, -1 otherwise.
|
|
|
|
If the given entry can be found in the dictionary, it is modified to
|
|
contain the provided value. If it cannot be found, -1 is returned.
|
|
It is Ok to set val to NULL.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
int iniparser_set(dictionary *ini, const char *entry, const char *val)
|
|
{
|
|
int result = 0;
|
|
char *lc_entry = aw_strdup(entry);
|
|
//strlwc(lc_entry);
|
|
result = dictionary_set(ini, lc_entry, val);
|
|
free(lc_entry);
|
|
return result;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Delete an entry in a dictionary
|
|
@param ini Dictionary to modify
|
|
@param entry Entry to delete (entry name)
|
|
@return void
|
|
|
|
If the given entry can be found, it is deleted from the dictionary.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
void iniparser_unset(dictionary *ini, const char *entry)
|
|
{
|
|
char *lc_entry = aw_strdup(entry);
|
|
//strlwc(lc_entry);
|
|
dictionary_unset(ini, lc_entry);
|
|
free(lc_entry);
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Load a single line from an INI file
|
|
@param input_line Input line, may be concatenated multi-line input
|
|
@param section Output space to store section
|
|
@param key Output space to store key
|
|
@param value Output space to store value
|
|
@return line_status value
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
static line_status iniparser_line(int line_size, const char *input_line,
|
|
char **section_out, char **key_out,
|
|
char **value_out)
|
|
{
|
|
line_status sta;
|
|
int len = line_size - 1;
|
|
char *line = malloc(line_size);
|
|
char *key = NULL;
|
|
char *value = NULL;
|
|
char *equals = NULL;
|
|
if (!line) {
|
|
fprintf(stderr, "iniparser: memory alloc error\n");
|
|
return LINE_ERROR;
|
|
}
|
|
|
|
*line = 0;
|
|
strcpy(line, input_line);
|
|
strstrip(line);
|
|
len = (int)strlen(line);
|
|
|
|
/* only allocate necessary space for key & val */
|
|
equals = strchr(line, '=');
|
|
if (equals) {
|
|
value = malloc((len + line) - equals + 1);
|
|
key = malloc(equals - line + 1);
|
|
*value = 0;
|
|
} else {
|
|
key = malloc(line_size + 1);
|
|
}
|
|
|
|
if (!key || (equals && !value)) {
|
|
fprintf(stderr, "iniparser: memory alloc error\n");
|
|
sta = LINE_ERROR;
|
|
goto out;
|
|
}
|
|
|
|
*key = 0;
|
|
|
|
sta = LINE_UNPROCESSED;
|
|
if (len < 1) {
|
|
/* Empty line */
|
|
sta = LINE_EMPTY;
|
|
} else if (line[0] == '#' || line[0] == ';') {
|
|
/* Comment line */
|
|
sta = LINE_COMMENT;
|
|
} else if (line[0] == '[' && line[len-1] == ']') {
|
|
/* Section name */
|
|
sscanf(line, "[%[^]]", key);
|
|
strstrip(key);
|
|
//strlwc(key);
|
|
sta = LINE_SECTION;
|
|
*section_out = key;
|
|
|
|
/* don't free key's memory */
|
|
key = NULL;
|
|
} else if (equals && (sscanf(line, "%[^=] = %[^\n]", key, value) == 2
|
|
|| sscanf(line, "%[^=] = '%[^\']'", key, value) == 2
|
|
|| sscanf(line, "%[^=] = %[^;#]", key, value) == 2)) {
|
|
|
|
/* Usual key=value, with or without comments */
|
|
strstrip(key);
|
|
//strlwc(key);
|
|
strstrip(value);
|
|
/*
|
|
* sscanf cannot handle '' or "" as empty values
|
|
* this is done here
|
|
*/
|
|
if (!strcmp(value, "\"\"") || (!strcmp(value, "''"))) {
|
|
value[0] = 0;
|
|
}
|
|
*key_out = key;
|
|
*value_out = value;
|
|
key = NULL;
|
|
value = NULL;
|
|
sta = LINE_VALUE;
|
|
} else if (equals && (sscanf(line, "%[^=] = %[;#]", key, value) == 2
|
|
|| sscanf(line, "%[^=] %[=]", key, value) == 2)) {
|
|
|
|
/*
|
|
* Special cases:
|
|
* key=
|
|
* key=;
|
|
* key=#
|
|
*/
|
|
strstrip(key);
|
|
//strlwc(key);
|
|
value[0] = 0;
|
|
*key_out = key;
|
|
*value_out = value;
|
|
|
|
/* don't free out params key or val's memory */
|
|
key = NULL;
|
|
value = NULL;
|
|
sta = LINE_VALUE;
|
|
} else {
|
|
|
|
/* Generate syntax error */
|
|
sta = LINE_ERROR;
|
|
}
|
|
out:
|
|
if (line) {
|
|
free(line);
|
|
line = NULL;
|
|
}
|
|
if (key) {
|
|
free(key);
|
|
key = NULL;
|
|
}
|
|
if (value) {
|
|
free(value);
|
|
value = NULL;
|
|
}
|
|
|
|
return sta;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Parse an ini file and return an allocated dictionary object
|
|
@param ininame Name of the ini file to read.
|
|
@return Pointer to newly allocated dictionary
|
|
|
|
This is the parser for ini files. This function is called, providing
|
|
the name of the file to be read. It returns a dictionary object that
|
|
should not be accessed directly, but through accessor functions
|
|
instead.
|
|
|
|
The returned dictionary must be freed using iniparser_freedict().
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
dictionary *iniparser_load(const char *ininame)
|
|
{
|
|
FILE *in = NULL;
|
|
|
|
char line[ASCIILINESZ+1];
|
|
char *section = aw_strdup("");
|
|
char *current_section = NULL;
|
|
char *key = NULL;
|
|
char *val = NULL;
|
|
char *full_line = NULL;
|
|
char *prev_line = NULL;
|
|
|
|
int len;
|
|
int lineno = 0;
|
|
int errs = 0;
|
|
int seckey_size = 0;
|
|
|
|
dictionary *dict = NULL;
|
|
in = fopen(ininame, "r");
|
|
if (in == NULL) {
|
|
fprintf(stderr, "iniparser: cannot open %s\n", ininame);
|
|
goto out;
|
|
}
|
|
|
|
dict = dictionary_new(DICT_STORAGE_SIZE);
|
|
if (!dict) {
|
|
goto out;
|
|
}
|
|
|
|
memset(line, 0, ASCIILINESZ);
|
|
|
|
while (fgets(line, ASCIILINESZ, in) != NULL) {
|
|
int prev_line_len = 0;
|
|
int multi_line = 0;
|
|
int total_size = 0;
|
|
|
|
if (key) {
|
|
free(key);
|
|
key = NULL;
|
|
}
|
|
if (val) {
|
|
free(val);
|
|
val = NULL;
|
|
}
|
|
lineno++;
|
|
len = (int)strlen(line) - 1;
|
|
if (len == 0)
|
|
continue;
|
|
/* Safety check against buffer overflows */
|
|
if (line[len] != '\n' && !feof(in)) {
|
|
fprintf(stderr,
|
|
"iniparser: input line too long in %s (%d)\n",
|
|
ininame,
|
|
lineno);
|
|
errs++;
|
|
goto out;
|
|
}
|
|
/* Get rid of \n and spaces at end of line */
|
|
while ((len >= 0) && ((line[len] == '\n') || (isspace(line[len])))) {
|
|
line[len] = 0;
|
|
len--;
|
|
}
|
|
|
|
if (len < 0) { /* Line was entirely \n and/or spaces */
|
|
len = 0;
|
|
}
|
|
|
|
/* Detect multi-line */
|
|
if (line[len] == '\\') {
|
|
multi_line = 1;
|
|
}
|
|
if (multi_line) {
|
|
/* Multi-line value */
|
|
/* length without trailing '\' */
|
|
/* remove multi-line indicator before appending*/
|
|
line[len] = 0;
|
|
len--;
|
|
}
|
|
|
|
/*
|
|
* If processing a multi-line then append it the previous portion,
|
|
* at this point 'full_line' has the previously read portion of a
|
|
* multi-line line (or NULL)
|
|
*/
|
|
prev_line = full_line;
|
|
prev_line_len = 0;
|
|
if (prev_line) {
|
|
prev_line_len = strlen(prev_line);
|
|
}
|
|
|
|
/* len is not strlen(line) but strlen(line) -1 */
|
|
total_size = (len + 1) + prev_line_len + 1;
|
|
|
|
full_line = malloc(total_size);
|
|
if (!full_line) {
|
|
fprintf(stderr,
|
|
"iniparser: out of mem\n");
|
|
errs++;
|
|
goto out;
|
|
}
|
|
|
|
memset(full_line, 0, total_size);
|
|
|
|
if (prev_line) {
|
|
strcpy(full_line, prev_line);
|
|
}
|
|
|
|
strcpy(full_line + prev_line_len, line);
|
|
free(prev_line);
|
|
prev_line = NULL;
|
|
|
|
if (multi_line) {
|
|
continue;
|
|
}
|
|
|
|
switch (iniparser_line(total_size, full_line, ¤t_section, &key, &val)) {
|
|
case LINE_EMPTY:
|
|
case LINE_COMMENT:
|
|
break;
|
|
case LINE_SECTION:
|
|
if (section) {
|
|
free(section);
|
|
section = NULL;
|
|
}
|
|
errs = dictionary_set(dict, current_section, NULL);
|
|
section = current_section;
|
|
break;
|
|
case LINE_VALUE:
|
|
{
|
|
char *seckey;
|
|
/* section + ':' + key + eos */
|
|
seckey_size = strlen(section) + strlen(key) + 2;
|
|
seckey = malloc(seckey_size);
|
|
if (!seckey) {
|
|
errs++;
|
|
fprintf(stderr, "iniparser: out of mem\n");
|
|
goto out;
|
|
}
|
|
snprintf(seckey, seckey_size, "%s:%s", section, key);
|
|
errs = dictionary_set(dict, seckey, val);
|
|
free(seckey);
|
|
seckey = NULL;
|
|
}
|
|
break;
|
|
case LINE_ERROR:
|
|
fprintf(stderr, "iniparser: syntax error in %s (%d):\n",
|
|
ininame,lineno);
|
|
fprintf(stderr, "-> %s\n", full_line);
|
|
errs++;
|
|
break;
|
|
default:
|
|
break;
|
|
}
|
|
memset(line, 0, ASCIILINESZ);
|
|
if (full_line) {
|
|
free(full_line);
|
|
full_line = NULL;
|
|
}
|
|
if (errs < 0)
|
|
break;
|
|
}
|
|
out:
|
|
if (errs) {
|
|
dictionary_del(dict);
|
|
dict = NULL;
|
|
}
|
|
if (val) {
|
|
free(val);
|
|
val = NULL;
|
|
}
|
|
if (key) {
|
|
free(key);
|
|
key = NULL;
|
|
}
|
|
if (section) {
|
|
free(section);
|
|
section = NULL;
|
|
}
|
|
if (full_line) {
|
|
free(full_line);
|
|
full_line = NULL;
|
|
}
|
|
if (prev_line) {
|
|
free(prev_line);
|
|
prev_line = NULL;
|
|
}
|
|
if (in) {
|
|
fclose(in);
|
|
}
|
|
return dict;
|
|
}
|
|
|
|
/*-------------------------------------------------------------------------*/
|
|
/**
|
|
@brief Free all memory associated to an ini dictionary
|
|
@param d Dictionary to free
|
|
@return void
|
|
|
|
Free all memory associated to an ini dictionary.
|
|
It is mandatory to call this function before the dictionary object
|
|
gets out of the current context.
|
|
*/
|
|
/*--------------------------------------------------------------------------*/
|
|
void iniparser_freedict(dictionary *d)
|
|
{
|
|
dictionary_del(d);
|
|
}
|
|
|
|
int iniparser_get_str2int(char *saddr, int value[])
|
|
{
|
|
|
|
char *src;
|
|
char off, ch;
|
|
unsigned int tmp_value = 0;
|
|
int data_count, i;
|
|
char tmp_str[128];
|
|
int sign = 1;
|
|
|
|
data_count = 2;
|
|
src = saddr;
|
|
off = 0;
|
|
|
|
if (!strncmp(src, "port:", 5)) {
|
|
if ((src[5] == 'P') || (src[5] == 'p')) {
|
|
off = 3;
|
|
src += 6;
|
|
}
|
|
} else if (!strncmp(src, "string:", 7)) {
|
|
off = 0;
|
|
src += 7;
|
|
} else if (src[0] == '"') {
|
|
off = 5;
|
|
src += 1;
|
|
} else if ((src[0] == '0') && ((src[1] == 'x') || (src[1] == 'X'))) {
|
|
src += 2;
|
|
off = 2;
|
|
} else if ((src[0] >= '0') && (src[0] <= '9')) {
|
|
off = 1;
|
|
} else if (((src[1] >= '0') && (src[1] <= '9')) && (src[0] == '-')) {
|
|
src++;
|
|
off = 1;
|
|
sign = -1;
|
|
} else if (src[0] == '\0') {
|
|
src++;
|
|
off = 4;
|
|
}
|
|
|
|
if (off == 0) {
|
|
data_count = 0;
|
|
while (src[data_count] != '\0') {
|
|
data_count++;
|
|
if (data_count > DICT_STORAGE_SIZE - 1) {
|
|
break;
|
|
}
|
|
}
|
|
if (data_count & 0x03) {
|
|
data_count = (data_count & (~0x03)) + 4;
|
|
} else {
|
|
data_count = data_count + 4;
|
|
}
|
|
value[0] = data_count>>2;
|
|
if (saddr != src) {
|
|
value[1] = 0;
|
|
} else {
|
|
value[1] = 1;
|
|
}
|
|
return DATA_TYPE_STRING;
|
|
|
|
} else if (off == 5) {
|
|
data_count = 0;
|
|
while (src[data_count] != '"') {
|
|
data_count++;
|
|
if (data_count > DICT_STORAGE_SIZE - 1) {
|
|
break;
|
|
}
|
|
}
|
|
src[data_count] = '\0';
|
|
if (data_count & 0x03) {
|
|
data_count = (data_count & (~0x03)) + 4;
|
|
} else {
|
|
data_count = data_count + 4;
|
|
}
|
|
value[0] = data_count>>2;
|
|
value[1] = 5;
|
|
|
|
return DATA_TYPE_STRING;
|
|
} else if (off == 1) {
|
|
while (*src != '\0') {
|
|
if ((*src >= '0') && (*src <= '9')) {
|
|
tmp_value = tmp_value * 10 + (*src - '0');
|
|
src++;
|
|
} else {
|
|
return -1;
|
|
}
|
|
}
|
|
value[0] = tmp_value * sign;
|
|
return DATA_TYPE_SINGLE_WORD_DEC;
|
|
} else if (off == 2) {
|
|
while (*src != '\0') {
|
|
if ((*src >= '0') && (*src <= '9')) {
|
|
tmp_value = tmp_value * 16 + (*src - '0');
|
|
src++;
|
|
} else if ((*src >= 'A') && (*src <= 'F')) {
|
|
tmp_value = tmp_value * 16 + (*src - 'A' + 10);
|
|
src++;
|
|
} else if ((*src >= 'a') && (*src <= 'f')) {
|
|
tmp_value = tmp_value * 16 + (*src - 'a' + 10);
|
|
src++;
|
|
} else {
|
|
return -1;
|
|
}
|
|
}
|
|
value[0] = tmp_value;
|
|
return DATA_TYPE_SINGLE_WORD_HEX;
|
|
} else if (off == 3) {
|
|
|
|
int tmp_flag = 0;
|
|
ch = *src++;
|
|
if ((ch == 'o') || (ch == 'O')) {
|
|
ch = src[0];
|
|
if ((ch == 'w') || (ch == 'W')) {
|
|
ch = src[1];
|
|
if ((ch == 'e') || (ch == 'E')) {
|
|
ch = src[2];
|
|
if ((ch == 'r') || (ch == 'R')) {
|
|
value[0] = 0xffff;
|
|
src += 3;
|
|
tmp_flag = 1;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if (!tmp_flag) {
|
|
if ((ch >= 'A') && (ch <= 'Z')) {
|
|
value[0] = ch - 'A' + 1;
|
|
} else if ((ch >= 'a') && (ch <= 'z')) {
|
|
value[0] = ch - 'a' + 1;
|
|
} else {
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
ch = *src++;
|
|
tmp_value = 0;
|
|
while (ch != '<') {
|
|
if ((ch >= '0') && (ch <= '9')) {
|
|
tmp_value = tmp_value * 10 + (ch - '0');
|
|
ch = *src++;
|
|
} else if (ch == 0) {
|
|
src--;
|
|
break;
|
|
} else {
|
|
return -1;
|
|
}
|
|
}
|
|
value[1] = tmp_value;
|
|
ch = *src++;
|
|
while (ch != '\0') {
|
|
i = 0;
|
|
memset(tmp_str, 0, sizeof(tmp_str));
|
|
while(ch != '>'){
|
|
if((ch >= 'A') && (ch <= 'Z')){
|
|
ch += 'a' - 'A';
|
|
}
|
|
tmp_str[i++] = ch;
|
|
ch = *src++;
|
|
}
|
|
tmp_str[i] = '\0';
|
|
if (!strcmp(tmp_str, "default")) {
|
|
value[data_count] = -1;
|
|
} else if (!strcmp(tmp_str, "none")) {
|
|
value[data_count] = -1;
|
|
} else if (!strcmp(tmp_str, "null")) {
|
|
value[data_count] = -1;
|
|
} else if (!strcmp(tmp_str, "-1")) {
|
|
value[data_count] = -1;
|
|
} else {
|
|
i = 0;
|
|
ch = tmp_str[i++];
|
|
tmp_value = 0;
|
|
if (ch == '-') {
|
|
sign = -1;
|
|
ch = tmp_str[i++];
|
|
}
|
|
while (ch != '\0') {
|
|
if ((ch >= '0') && (ch <= '9')) {
|
|
tmp_value = tmp_value * 10 + (ch - '0');
|
|
} else {
|
|
return -1;
|
|
}
|
|
ch = tmp_str[i++];
|
|
}
|
|
value[data_count] = tmp_value * sign;
|
|
}
|
|
|
|
data_count ++;
|
|
ch = *src++;
|
|
if (ch == '<') {
|
|
ch = *src++;
|
|
} else if (ch == '\0') {
|
|
;
|
|
} else {
|
|
return -1;
|
|
}
|
|
}
|
|
switch (data_count) {
|
|
case 3:
|
|
value[3] = -1;
|
|
case 4:
|
|
value[4] = -1;
|
|
case 5:
|
|
value[5] = -1;
|
|
case 6:
|
|
break;
|
|
default:
|
|
return -1;
|
|
}
|
|
return DATA_TYPE_GPIO;
|
|
} else if (off == 4) {
|
|
value[0] = 4 >> 2;
|
|
return DATA_EMPTY;
|
|
} else {
|
|
return -1;
|
|
}
|
|
}
|
|
|
|
/* vim: set ts=4 et sw=4 tw=75 */
|