--- libaitcfg/src/parse.c 2017/06/30 08:44:44 1.17 +++ libaitcfg/src/parse.c 2023/01/23 23:27:26 1.21 @@ -3,7 +3,7 @@ * by Michael Pounov * * $Author: misho $ -* $Id: parse.c,v 1.17 2017/06/30 08:44:44 misho Exp $ +* $Id: parse.c,v 1.21 2023/01/23 23:27:26 misho Exp $ * ************************************************************************** The ELWIX and AITNET software is distributed under the following @@ -12,7 +12,7 @@ terms: All of the documentation and software included in the ELWIX and AITNET Releases is copyrighted by ELWIX - Sofia/Bulgaria -Copyright 2004 - 2017 +Copyright 2004 - 2023 by Michael Pounov . All rights reserved. Redistribution and use in source and binary forms, with or without @@ -56,10 +56,11 @@ SUCH DAMAGE. int cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) { - char line[BUFSIZ], origin[BUFSIZ]; + char line[BUFSIZ], origin[BUFSIZ], chkattr[STRSIZ]; struct tagCfg *av = NULL; int flg = 0; char *psAttr, *psVal, szSection[STRSIZ] = { 0 }; + FILE *ff; if (!f || !cfg) { cfg_SetErr(EINVAL, "Invalid parameter(s)"); @@ -68,7 +69,8 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) while (!feof(f)) { memset(line, 0, sizeof line); - fgets(line, sizeof line - 1, f); + if (!fgets(line, sizeof(line) - 1, f)) + break; #ifdef SUPPORT_USER_EOF /* check for user end-of-file */ if (line[0] == '.' && line[1] == '\n') @@ -96,10 +98,33 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) /* 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)); + av->cfg_quoted += str_Unquot((char*) AIT_GET_STR(&av->cfg_val)); + + /* read include file */ + if (!flg && AIT_ADDR(&av->cfg_val) && + *AIT_GET_STR(&av->cfg_attr) == '%' && + !strcmp(AIT_GET_STR(&av->cfg_attr), "%include")) { + ff = fopen(AIT_GET_STR(&av->cfg_val), "r"); + if (ff) { + cfgReadConfig(ff, cfg); + fclose(ff); + } else + EDEBUG(ELWIX_DEBUG_LOG, "Error:: Can't open %s file", + AIT_GET_STR(&av->cfg_val)); + } continue; } + /* check for duplicated element */ + if (*line != '#' && *line != ';' && *line != '/' && *line != '%' && + (psAttr = strchr(line, '='))) { + strncpy(chkattr, line, psAttr - line); + chkattr[psAttr - line] = 0; + str_RTrim(chkattr); + if (cfg_findAttribute(cfg, szSection, chkattr)) + cfg_unsetAttribute(cfg, szSection, chkattr); + } + /* *NEW PAIR* alloc new pair element */ av = e_malloc(sizeof(struct tagCfg)); if (!av) { @@ -112,6 +137,12 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) CFG_RC_UNLOCK(cfg); } + /* check for comment or empty line */ + if (!*line || *line == '#' || *line == ';') { + AIT_SET_STR(&av->cfg_val, line); + continue; + } + /* check for continues line */ psAttr = line + (*line ? strlen(line) : 1) - 1; if (*psAttr == '\\') { @@ -119,11 +150,6 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) flg = 1; } - /* check for comment or empty line */ - if (!*line || *line == '#' || *line == ';') { - AIT_SET_STR(&av->cfg_val, line); - continue; - } /* section */ if (*line == '[') { psAttr = line + strlen(line) - 1; @@ -133,13 +159,13 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) strlcpy(szSection, line + 1, sizeof szSection); AIT_SET_STR(&av->cfg_sec, line); } else - EDEBUG(7, "Ignore section '%s' ... not found ']'", line); + EDEBUG(ELWIX_DEBUG_LOG, "Ignore section '%s' ... not found ']'", line); continue; } /* parse pair */ if (!(psAttr = strchr(line, '='))) { AIT_SET_STR(&av->cfg_val, origin); - EDEBUG(7, "Ignore a/v '%s' ... not found '='", line); + EDEBUG(ELWIX_DEBUG_LOG, "Ignore a/v '%s' ... not found '='", line); continue; } else { *psAttr = 0; @@ -157,7 +183,7 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) str_RTrim(psAttr); str_LTrim(psVal); if (!flg) - str_Unquot(psVal); + av->cfg_quoted += 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*), @@ -166,6 +192,18 @@ cfgReadConfig(FILE *f, cfg_root_t * __restrict cfg) CFG_RC_LOCK(cfg); RB_INSERT(tagRC, cfg, av); CFG_RC_UNLOCK(cfg); + + /* read include file */ + if (!flg && *AIT_GET_STR(&av->cfg_attr) == '%' && + !strcmp(AIT_GET_STR(&av->cfg_attr), "%include")) { + ff = fopen(AIT_GET_STR(&av->cfg_val), "r"); + if (ff) { + cfgReadConfig(ff, cfg); + fclose(ff); + } else + EDEBUG(ELWIX_DEBUG_LOG, "Error:: Can't open %s file", + AIT_GET_STR(&av->cfg_val)); + } } return 0; @@ -204,14 +242,14 @@ cfgWriteConfig(FILE *f, cfg_root_t * __restrict cfg, i 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))) { + if (!cfg_Write(f, "[%s]\n", AIT_GET_STR(&av->cfg_sec))) { LOGERR; CFG_RC_UNLOCK(cfg); return -1; } } else if (AIT_ISEMPTY(&av->cfg_sec) && *szSection) { memset(szSection, 0, sizeof szSection); - if (!cfg_Write(f, "\n[]\n")) { + if (!cfg_Write(f, "[]\n")) { LOGERR; CFG_RC_UNLOCK(cfg); return -1; @@ -227,8 +265,13 @@ cfgWriteConfig(FILE *f, cfg_root_t * __restrict cfg, i else strlcat(line, "=", sizeof line); } - if (!AIT_ISEMPTY(&av->cfg_val) && AIT_TYPE(&av->cfg_val) == string) + if (!AIT_ISEMPTY(&av->cfg_val) && AIT_TYPE(&av->cfg_val) == string) { + if (av->cfg_quoted) + strlcat(line, "\"", sizeof line); strlcat(line, AIT_GET_STRZ(&av->cfg_val), sizeof line); + if (av->cfg_quoted) + strlcat(line, "\"", sizeof line); + } skip_sec: /* write */ if (!cfg_Write(f, "%s\n", line)) { @@ -243,6 +286,81 @@ skip_sec: } /* + * cfgWriteConfigRaw() - Write config from memory by list + * + * @f = File handle + * @cfg = Config root + * @whitespace = Additional whitespace characters to file + * return: -1 error or 0 ok + */ +int +cfgWriteConfigRaw(FILE *f, cfg_root_t * __restrict cfg, int whitespace) +{ + struct tagCfg *av, *nxt; + char line[BUFSIZ] = { 0 }, szSection[STRSIZ] = { [0 ... STRSIZ - 1] = 0 }; + + if (!f || !cfg) { + cfg_SetErr(EINVAL, "Invalid parameter(s)"); + return -1; + } + + CFG_RC_LOCK(cfg); + TAILQ_FOREACH_SAFE(av, cfg, cfg_next, nxt) { + /* empty lines or comment */ + if (AIT_ISEMPTY(&av->cfg_attr)) { + 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, "[%s]\n", AIT_GET_STR(&av->cfg_sec))) { + LOGERR; + CFG_RC_UNLOCK(cfg); + return -1; + } + } else if (AIT_ISEMPTY(&av->cfg_sec) && *szSection) { + memset(szSection, 0, sizeof szSection); + if (!cfg_Write(f, "[]\n")) { + LOGERR; + CFG_RC_UNLOCK(cfg); + return -1; + } + } + + /* 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) { + if (av->cfg_quoted) + strlcat(line, "\"", sizeof line); + strlcat(line, AIT_GET_STRZ(&av->cfg_val), sizeof line); + if (av->cfg_quoted) + strlcat(line, "\"", sizeof line); + } +skip_sec: + /* write */ + if (!cfg_Write(f, "%s\n", line)) { + LOGERR; + CFG_RC_UNLOCK(cfg); + return -1; + } + } + CFG_RC_UNLOCK(cfg); + + return 0; +} +/* * cfgConcatConfig() - Concat two configs into one * * @cfg = Config root @@ -305,15 +423,21 @@ cfgMergeConfig(cfg_root_t * __restrict cfg, cfg_root_t 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; + flg = -1; break; } } - if (!flg) - TAILQ_INSERT_TAIL(cfg, item, cfg_next); - else - TAILQ_INSERT_AFTER(cfg, merge, item, cfg_next); + switch (flg) { + case -1: + continue; /* skip duplicated element */ + case 1: + TAILQ_INSERT_AFTER(cfg, merge, item, cfg_next); + break; + case 0: + TAILQ_INSERT_TAIL(cfg, item, cfg_next); + break; + } RB_INSERT(tagRC, cfg, item); } @@ -350,7 +474,8 @@ cfgReadLines(FILE *f, const char *delim, const char *e while (!feof(f)) { psSec = psAttr = psVal = NULL; memset(line, 0, sizeof line); - fgets(line, sizeof line - 1, f); + if (!fgets(line, sizeof(line) - 1, f)) + break; /* check for user end-of-file */ if (strspn(line, end)) break; @@ -374,6 +499,10 @@ cfgReadLines(FILE *f, const char *delim, const char *e if (!av_MakeExt(p, SEC_LINES_DELIM, &psSec, &psAttr)) psAttr = p; + /* check for duplicated element */ + if (psAttr && cfg_findAttribute(cfg, psSec, psAttr)) + cfg_unsetAttribute(cfg, psSec, psAttr); + /* *NEW PAIR* alloc new pair element */ av = e_malloc(sizeof(struct tagCfg)); if (!av) { @@ -387,8 +516,10 @@ cfgReadLines(FILE *f, const char *delim, const char *e 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) + if (psVal) { + av->cfg_quoted = 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); @@ -457,8 +588,13 @@ cfgWriteLines(FILE *f, const char *delim, const char * AIT_SET_STRCAT(v, AIT_GET_STR(&av->cfg_attr)); AIT_SET_STRCAT(v, delim); } - if (!AIT_ISEMPTY(&av->cfg_val)) + if (!AIT_ISEMPTY(&av->cfg_val)) { + if (av->cfg_quoted) + AIT_SET_STRCAT(v, "\""); AIT_SET_STRCAT(v, AIT_GET_STR(&av->cfg_val)); + if (av->cfg_quoted) + AIT_SET_STRCAT(v, "\""); + } AIT_SET_STRCAT(v, eol); }