version 1.1, 2008/08/28 13:17:41
|
version 1.16, 2017/06/28 15:13:03
|
Line 1
|
Line 1
|
#include "global.h" | /************************************************************************* |
#include "aitcfg.h" | * (C) 2008 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com> |
#include "tools.h" | * by Michael Pounov <misho@openbsd-bg.org> |
| * |
| * $Author$ |
| * $Id$ |
| * |
| ************************************************************************** |
| The ELWIX and AITNET software is distributed under the following |
| terms: |
|
|
|
All of the documentation and software included in the ELWIX and AITNET |
|
Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org> |
|
|
// cfgDbg() Debug/Log operation | Copyright 2004 - 2017 |
static inline int cfgDbg(FILE *f, char *fmt, ...) | by Michael Pounov <misho@elwix.org>. All rights reserved. |
{ | |
int ret = 0; | |
va_list lst; | |
|
|
va_start(lst, fmt); | Redistribution and use in source and binary forms, with or without |
ret = vfprintf(f, fmt, lst); | modification, are permitted provided that the following conditions |
va_end(lst); | are met: |
| 1. Redistributions of source code must retain the above copyright |
| notice, this list of conditions and the following disclaimer. |
| 2. Redistributions in binary form must reproduce the above copyright |
| notice, this list of conditions and the following disclaimer in the |
| documentation and/or other materials provided with the distribution. |
| 3. All advertising materials mentioning features or use of this software |
| must display the following acknowledgement: |
| This product includes software developed by Michael Pounov <misho@elwix.org> |
| ELWIX - Embedded LightWeight unIX and its contributors. |
| 4. Neither the name of AITNET nor the names of its contributors |
| may be used to endorse or promote products derived from this software |
| without specific prior written permission. |
|
|
return ret; | THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND |
} | ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE |
| IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE |
| ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE |
| FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL |
| DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS |
| OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) |
| HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT |
| LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY |
| OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF |
| SUCH DAMAGE. |
| */ |
| #include "global.h" |
|
|
// ----------------------------------------- |
|
|
|
/* |
/* |
* ReadConfig() Read from file and add new item to config list | * cfgReadConfig() - Read file and add new item at config root |
* @f = file resource | * |
* @cfg = Head list element | * @f = File resource |
* return: 0 ok; -1 error:: can`t allocate memory | * @cfg = Config root |
*/ | * return: -1 error or 0 ok |
int ReadConfig(FILE *f, sl_config * __restrict cfg) | */ |
| int |
| cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) |
{ |
{ |
u_char szLine[MAX_STR + 1]; | char line[BUFSIZ]; |
u_char szSection[MAX_STR + 1], *psAttr, *psVal; | struct tagCfg *av = NULL; |
int pos; | int flg = 0; |
struct tagPair *av; | char *psAttr, *psVal, szSection[STRSIZ] = { 0 }; |
|
|
memset(szSection, 0, MAX_STR + 1); | if (!f || !cfg) { |
| cfg_SetErr(EINVAL, "Invalid parameter(s)"); |
| return -1; |
| } |
| |
while (!feof(f)) { |
while (!feof(f)) { |
memset(szLine, 0, MAX_STR + 1); | memset(line, 0, sizeof line); |
fgets((char*) szLine, MAX_STR, f); | fgets(line, sizeof line - 1, f); |
trim(szLine); | #ifdef SUPPORT_USER_EOF |
#ifdef __DEBUG | /* check for user end-of-file */ |
cfgDbg(stdout, "DEBUG:: RAW |%s|\n", szLine); | if (line[0] == '.' && line[1] == '\n') |
| break; |
#endif |
#endif |
|
if (!(psAttr = strpbrk(line, "\r\n"))) { |
|
/* skip line, too long */ |
|
continue; |
|
} else { |
|
*psAttr = 0; |
|
str_Trim(line); |
|
} |
|
|
// End of config | if (flg) { |
if (*szLine == '.') | /* continues line */ |
break; | if (!av) |
// Comment | continue; |
if (*szLine == '#' || *szLine == ';' || !*szLine) | else |
| psAttr = line + strlen(line) - 1; |
| if (*psAttr == '\\') |
| *psAttr = 0; |
| else |
| flg = 0; |
| /* concat line to value */ |
| AIT_SET_STRCAT(&av->cfg_val, line); |
| if (!flg && AIT_ADDR(&av->cfg_val)) |
| str_Unquot((char*) AIT_GET_STR(&av->cfg_val)); |
continue; |
continue; |
|
} |
|
|
#ifdef __DEBUG | /* *NEW PAIR* alloc new pair element */ |
cfgDbg(stdout, "DEBUG:: Clean |%s|\n", szLine); | av = e_malloc(sizeof(struct tagCfg)); |
#endif | if (!av) { |
| cfg_SetErr(elwix_GetErrno(), "%s", elwix_GetError()); |
| return -1; |
| } else { |
| memset(av, 0, sizeof(struct tagCfg)); |
| CFG_RC_LOCK(cfg); |
| TAILQ_INSERT_TAIL(cfg, av, cfg_next); |
| CFG_RC_UNLOCK(cfg); |
| } |
|
|
// Section | /* check for continues line */ |
if (*szLine == '[') { | psAttr = line + (*line ? strlen(line) : 1) - 1; |
pos = strlen((char*) szLine) - 1; | if (*psAttr == '\\') { |
if (szLine[pos] != ']') { | *psAttr = 0; |
cfgDbg(stdout, "WARNING:: Ignore section %s ... not closed breket\n", szLine); | flg = 1; |
} else { | |
szLine[pos] = 0; | |
strncpy((char*) szSection, (char*) szLine + 1, MAX_STR); | |
#ifdef __DEBUG | |
cfgDbg(stdout, "DEBUG:: Section %s\n", szSection); | |
#endif | |
} | |
continue; | |
} |
} |
|
|
// Devide pairs | /* check for comment or empty line */ |
pos = strchr((char*) szLine, '=') ? strchr((char*) szLine, '=') - (char*) szLine : 0; | if (!*line || *line == '#' || *line == ';') { |
if (!pos) { | AIT_SET_STR(&av->cfg_val, line); |
cfgDbg(stdout, "WARNING:: Ignore a/v %s ... format error!\n", szLine); | |
continue; |
continue; |
} else { | } |
av = malloc(sizeof(struct tagPair)); | /* section */ |
if (!av) { | if (*line == '[') { |
LOGERR; | psAttr = line + strlen(line) - 1; |
return -1; | if (*psAttr == ']') { |
} else { | *psAttr = 0; |
// added new element | flg = 0; |
av->sle_next = cfg->slh_first; | strlcpy(szSection, line + 1, sizeof szSection); |
cfg->slh_first = av; | AIT_SET_STR(&av->cfg_sec, line); |
} | |
// added section name to element | |
if (*szSection) { | |
av->psSection = malloc(strlen((char*) szSection) + 1); | |
if (!av->psSection) { | |
LOGERR; | |
free(av); | |
return -1; | |
} else | |
strcpy((char*) av->psSection, (char*) szSection); | |
} else |
} else |
av->psSection = NULL; | EDEBUG(7, "Ignore section '%s' ... not found ']'", line); |
| continue; |
| } |
| /* parse pair */ |
| if (!(psAttr = strchr(line, '='))) { |
| AIT_SET_STR(&av->cfg_val, line); |
| EDEBUG(7, "Ignore a/v '%s' ... not found '='", line); |
| continue; |
| } else { |
| *psAttr = 0; |
| psVal = psAttr + 1; |
| psAttr = line; |
| } |
|
|
psAttr = szLine; | /* if exists, added section name to element */ |
psVal = (szLine + pos + 1); | if (*szSection) { |
szLine[pos] = 0; | AIT_SET_STR(&av->cfg_sec, szSection); |
rtrim(psAttr); | AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*), |
ltrim(psVal); | E_ALIGN(AIT_LEN(&av->cfg_sec) - 1, 2) / 2); |
#ifdef __DEBUG | |
cfgDbg(stdout, "DEBUG:: Attr(%p) ->%s size=%d Value(%p) ->%s size=%d\n", | |
psAttr, psAttr, strlen((char*) psAttr), psVal, psVal, strlen((char*) psVal)); | |
#endif | |
// added attribute to element | |
av->psAttribute = malloc(strlen((char*) psAttr) + 1); | |
if (!av->psAttribute) { | |
LOGERR; | |
free(av->psSection); | |
free(av); | |
return -1; | |
} else | |
strcpy((char*) av->psAttribute, (char*) psAttr); | |
// added value to element | |
av->psValue = malloc(strlen((char*) psVal) + 1); | |
if (!av->psValue) { | |
LOGERR; | |
free(av->psAttribute); | |
free(av->psSection); | |
free(av); | |
return -1; | |
} else | |
strcpy((char*) av->psValue, (char*) psVal); | |
} |
} |
|
|
|
str_RTrim(psAttr); |
|
str_LTrim(psVal); |
|
if (!flg) |
|
str_Unquot(psVal); |
|
AIT_SET_STR(&av->cfg_val, psVal); |
|
AIT_SET_STR(&av->cfg_attr, psAttr); |
|
AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*), |
|
E_ALIGN(AIT_LEN(&av->cfg_attr) - 1, 2) / 2); |
|
|
|
CFG_RC_LOCK(cfg); |
|
RB_INSERT(tagRC, cfg, av); |
|
CFG_RC_UNLOCK(cfg); |
} |
} |
|
|
return 0; |
return 0; |
} |
} |
|
|
/* |
/* |
* WriteConfig() Write to file from items in config list | * cfgWriteConfig() - Write config from memory |
* @f = file resource | * |
* @cfg = Head list element | * @f = File handle |
* return: 0 ok; -1 error:: can`t write to file | * @cfg = Config root |
*/ | * @whitespace = Additional whitespace characters to file |
int WriteConfig(FILE *f, sl_config * __restrict cfg) | * return: -1 error or 0 ok |
| */ |
| int |
| cfgWriteConfig(FILE *f, cfg_root_t * __restrict cfg, int whitespace) |
{ |
{ |
struct tagPair *av; | struct tagCfg *av; |
time_t tim; | char line[BUFSIZ] = { 0 }, szSection[STRSIZ] = { [0 ... STRSIZ - 1] = 0 }; |
char szTime[MAX_STR + 1]; | |
u_char szSection[MAX_STR + 1]; | |
|
|
bzero(szSection, MAX_STR + 1); | if (!f || !cfg) { |
| cfg_SetErr(EINVAL, "Invalid parameter(s)"); |
bzero(szTime, MAX_STR + 1); | |
time(&tim); | |
strftime(szTime, MAX_STR, "(UTC) %Y-%m-%d %H:%M:%S", gmtime(&tim)); | |
if (!cfgDbg(f, "## Write Config :: %s\n#\n", szTime)) { | |
LOGERR; | |
return -1; |
return -1; |
} |
} |
|
|
for (av = cfg->slh_first; av; av = av->sle_next) { | CFG_RC_LOCK(cfg); |
if (av->psSection && strcmp((char*) av->psSection, (char*) szSection)) { | RB_FOREACH(av, tagRC, cfg) { |
bzero(szSection, MAX_STR + 1); | /* empty lines or comment */ |
strcpy((char*) szSection, (char*) av->psSection); | if (AIT_ISEMPTY(&av->cfg_attr)) { |
if (!cfgDbg(f, "\n[%s]\n", av->psSection)) { | if (AIT_ISEMPTY(&av->cfg_val)) |
| continue; |
| strlcpy(line, AIT_GET_STR(&av->cfg_val), sizeof line); |
| goto skip_sec; |
| } |
| |
| /* section [] */ |
| if (!AIT_ISEMPTY(&av->cfg_sec) && AIT_ADDR(&av->cfg_sec) && |
| strcmp(AIT_GET_STRZ(&av->cfg_sec), szSection)) { |
| strlcpy(szSection, AIT_GET_STR(&av->cfg_sec), sizeof szSection); |
| if (!cfg_Write(f, "\n[%s]\n", AIT_GET_STR(&av->cfg_sec))) { |
LOGERR; |
LOGERR; |
|
CFG_RC_UNLOCK(cfg); |
return -1; |
return -1; |
} |
} |
} | } else if (AIT_ISEMPTY(&av->cfg_sec) && *szSection) { |
if (!av->psSection && *szSection) { | memset(szSection, 0, sizeof szSection); |
bzero(szSection, MAX_STR + 1); | if (!cfg_Write(f, "\n[]\n")) { |
if (!cfgDbg(f, "\n[]\n")) { | |
LOGERR; |
LOGERR; |
|
CFG_RC_UNLOCK(cfg); |
return -1; |
return -1; |
} |
} |
} |
} |
|
|
if (!cfgDbg(f, "%s = %s\n", av->psAttribute, av->psValue)) { | /* build line */ |
| memset(line, 0, sizeof line); |
| if (!AIT_ISEMPTY(&av->cfg_attr) && AIT_TYPE(&av->cfg_attr) == string) { |
| strlcpy(line, AIT_GET_STRZ(&av->cfg_attr), sizeof line); |
| if (whitespace) |
| strlcat(line, " = ", sizeof line); |
| else |
| strlcat(line, "=", sizeof line); |
| } |
| if (!AIT_ISEMPTY(&av->cfg_val) && AIT_TYPE(&av->cfg_val) == string) |
| strlcat(line, AIT_GET_STRZ(&av->cfg_val), sizeof line); |
| skip_sec: |
| /* write */ |
| if (!cfg_Write(f, "%s\n", line)) { |
LOGERR; |
LOGERR; |
|
CFG_RC_UNLOCK(cfg); |
return -1; |
return -1; |
} |
} |
} |
} |
|
CFG_RC_UNLOCK(cfg); |
|
|
bzero(szTime, MAX_STR + 1); | return 0; |
time(&tim); | } |
strftime(szTime, MAX_STR, "(UTC) %Y-%m-%d %H:%M:%S", gmtime(&tim)); | |
if (!cfgDbg(f, "\n#\n## Done. :: %s\n", szTime)) { | /* |
LOGERR; | * cfgConcatConfig() - Concat two configs into one |
| * |
| * @cfg = Config root |
| * @add_cfg = Concated config will be destroy after merge |
| * return: -1 error or 0 ok |
| */ |
| int |
| cfgConcatConfig(cfg_root_t * __restrict cfg, cfg_root_t * __restrict add_cfg) |
| { |
| struct tagCfg *item; |
| |
| if (!cfg || !add_cfg) |
return -1; |
return -1; |
|
|
|
CFG_RC_LOCK(add_cfg); |
|
CFG_RC_LOCK(cfg); |
|
|
|
/* concat lists & red-black trees */ |
|
TAILQ_FOREACH(item, add_cfg, cfg_next) { |
|
TAILQ_INSERT_TAIL(cfg, item, cfg_next); |
|
RB_INSERT(tagRC, cfg, item); |
} |
} |
|
|
|
CFG_RC_UNLOCK(cfg); |
|
|
|
TAILQ_INIT(add_cfg); |
|
RB_INIT(add_cfg); |
|
CFG_RC_UNLOCK(add_cfg); |
|
pthread_mutex_destroy(&add_cfg->rc_mtx); |
return 0; |
return 0; |
|
} |
|
|
|
/* |
|
* cfgMergeConfig() - Marge two list in one cfg and destroy add_cfg |
|
* |
|
* @cfg = Config root of main list |
|
* @add_cfg = Merged config will be destroy after merge |
|
* return: -1 error or 0 ok |
|
*/ |
|
int |
|
cfgMergeConfig(cfg_root_t * __restrict cfg, cfg_root_t * __restrict add_cfg) |
|
{ |
|
struct tagCfg *item, *merge, *add_next, *next; |
|
int flg; |
|
|
|
if (!cfg || !add_cfg) |
|
return -1; |
|
|
|
CFG_RC_LOCK(add_cfg); |
|
CFG_RC_LOCK(cfg); |
|
|
|
/* merge lists */ |
|
TAILQ_FOREACH_SAFE(item, add_cfg, cfg_next, add_next) { |
|
flg = 0; |
|
TAILQ_FOREACH_SAFE(merge, cfg, cfg_next, next) { |
|
if (AIT_ISEMPTY(&merge->cfg_sec) && AIT_ISEMPTY(&item->cfg_sec)) { |
|
flg = 1; |
|
break; |
|
} |
|
if (!AIT_ISEMPTY(&merge->cfg_sec) && !AIT_ISEMPTY(&item->cfg_sec) && |
|
AIT_ADDR(&merge->cfg_sec) && AIT_ADDR(&item->cfg_sec) && |
|
!strcmp(AIT_GET_STR(&merge->cfg_sec), AIT_GET_STR(&item->cfg_sec))) { |
|
flg = 1; |
|
break; |
|
} |
|
} |
|
|
|
if (!flg) |
|
TAILQ_INSERT_TAIL(cfg, item, cfg_next); |
|
else |
|
TAILQ_INSERT_AFTER(cfg, merge, item, cfg_next); |
|
RB_INSERT(tagRC, cfg, item); |
|
} |
|
|
|
CFG_RC_UNLOCK(cfg); |
|
|
|
TAILQ_INIT(add_cfg); |
|
RB_INIT(add_cfg); |
|
CFG_RC_UNLOCK(add_cfg); |
|
pthread_mutex_destroy(&add_cfg->rc_mtx); |
|
return 0; |
|
} |
|
|
|
/* |
|
* cfgReadLines() - Read custom lines and add new item at config root |
|
* |
|
* @f = File resource |
|
* @delim = Custom delimiter, if =NULL default is '=' |
|
* @end = Custom user end of file, if =NULL default is EOF |
|
* @cfg = Config root |
|
* return: -1 error or 0 ok |
|
*/ |
|
int |
|
cfgReadLines(FILE *f, const char *delim, const char *end, cfg_root_t * __restrict cfg) |
|
{ |
|
char line[BUFSIZ]; |
|
struct tagCfg *d, *av = NULL; |
|
char *p, *psSec, *psAttr, *psVal; |
|
|
|
if (!cfg) |
|
return -1; |
|
if (!delim) |
|
delim = ATR_LINES_DELIM; |
|
|
|
while (!feof(f)) { |
|
psSec = psAttr = psVal = NULL; |
|
memset(line, 0, sizeof line); |
|
fgets(line, sizeof line - 1, f); |
|
/* check for user end-of-file */ |
|
if (strspn(line, end)) |
|
break; |
|
|
|
if (!(psAttr = strpbrk(line, "\r\n"))) { |
|
/* skip line, too long */ |
|
continue; |
|
} else { |
|
*psAttr = 0; |
|
str_Trim(line); |
|
if (!*line) |
|
continue; |
|
} |
|
|
|
if (!av_MakeExt(line, delim, &p, &psVal)) |
|
continue; |
|
else { |
|
str_RTrim(p); |
|
str_LTrim(psVal); |
|
} |
|
if (!av_MakeExt(p, SEC_LINES_DELIM, &psSec, &psAttr)) |
|
psAttr = p; |
|
|
|
/* *NEW PAIR* alloc new pair element */ |
|
av = e_malloc(sizeof(struct tagCfg)); |
|
if (!av) { |
|
LOGERR; |
|
return -1; |
|
} else |
|
memset(av, 0, sizeof(struct tagCfg)); |
|
|
|
if (psSec) { |
|
AIT_SET_STR(&av->cfg_sec, psSec); |
|
AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*), |
|
E_ALIGN(AIT_LEN(&av->cfg_sec) - 1, 2) / 2); |
|
} |
|
if (psVal) |
|
AIT_SET_STR(&av->cfg_val, psVal); |
|
AIT_SET_STR(&av->cfg_attr, psAttr); |
|
AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*), |
|
E_ALIGN(AIT_LEN(&av->cfg_attr) - 1, 2) / 2); |
|
|
|
CFG_RC_LOCK(cfg); |
|
/* find & delete duplicates */ |
|
if ((d = RB_FIND(tagRC, cfg, av))) { |
|
RB_REMOVE(tagRC, cfg, d); |
|
TAILQ_REMOVE(cfg, d, cfg_next); |
|
|
|
AIT_FREE_VAL(&d->cfg_val); |
|
AIT_FREE_VAL(&d->cfg_attr); |
|
AIT_FREE_VAL(&d->cfg_sec); |
|
e_free(d); |
|
} |
|
|
|
TAILQ_INSERT_TAIL(cfg, av, cfg_next); |
|
RB_INSERT(tagRC, cfg, av); |
|
CFG_RC_UNLOCK(cfg); |
|
} |
|
|
|
return 0; |
|
} |
|
|
|
/* |
|
* cfgWriteLines() - Write custom lines and export data to variable |
|
* |
|
* @f = File resource |
|
* @delim = Custom delimiter, if =NULL default is '=' |
|
* @eol = End of line string, if =NULL default is "\n" |
|
* @section = Export only section, if =NULL default is all |
|
* @cfg = Config root |
|
* return: =NULL error or !=NULL exported data, must be free after use with ait_freeVar() |
|
*/ |
|
ait_val_t * |
|
cfgWriteLines(FILE *f, const char *delim, const char *eol, const char *section, cfg_root_t * __restrict cfg) |
|
{ |
|
ait_val_t *v = NULL; |
|
struct tagCfg *av; |
|
|
|
if (!cfg) |
|
return NULL; |
|
if (!delim) |
|
delim = ATR_LINES_DELIM; |
|
if (!eol) |
|
eol = EOL_LINES_DELIM; |
|
if (!(v = ait_allocVar())) { |
|
cfg_SetErr(elwix_GetErrno(), "%s", elwix_GetError()); |
|
return NULL; |
|
} else |
|
AIT_INIT_VAL2(v, string); |
|
|
|
TAILQ_FOREACH(av, cfg, cfg_next) { |
|
if (section) { |
|
if (!AIT_ISEMPTY(&av->cfg_sec) && *section) |
|
continue; |
|
if (strcmp(section, AIT_GET_STRZ(&av->cfg_sec))) |
|
continue; |
|
} |
|
|
|
if (!AIT_ISEMPTY(&av->cfg_sec)) { |
|
AIT_SET_STRCAT(v, AIT_GET_STR(&av->cfg_sec)); |
|
AIT_SET_STRCAT(v, SEC_LINES_DELIM); |
|
} |
|
if (!AIT_ISEMPTY(&av->cfg_attr)) { |
|
AIT_SET_STRCAT(v, AIT_GET_STR(&av->cfg_attr)); |
|
AIT_SET_STRCAT(v, delim); |
|
} |
|
if (!AIT_ISEMPTY(&av->cfg_val)) |
|
AIT_SET_STRCAT(v, AIT_GET_STR(&av->cfg_val)); |
|
AIT_SET_STRCAT(v, eol); |
|
} |
|
|
|
if (f) |
|
fputs(AIT_GET_STR(v), f); |
|
return v; |
} |
} |