Diff for /libaitcfg/src/queue.c between versions 1.8 and 1.19

version 1.8, 2012/07/22 21:54:47 version 1.19, 2021/11/26 01:15:03
Line 12  terms: Line 12  terms:
 All of the documentation and software included in the ELWIX and AITNET  All of the documentation and software included in the ELWIX and AITNET
 Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>  Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
   
Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012Copyright 2004 - 2021
         by Michael Pounov <misho@elwix.org>.  All rights reserved.          by Michael Pounov <misho@elwix.org>.  All rights reserved.
   
 Redistribution and use in source and binary forms, with or without  Redistribution and use in source and binary forms, with or without
Line 49  SUCH DAMAGE. Line 49  SUCH DAMAGE.
 static inline struct tagCfg *  static inline struct tagCfg *
 _selectAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)  _selectAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {  {
        struct tagCfg fav;        struct tagCfg fav, *c, *n;
   
         if (!cfg)          if (!cfg)
                 return NULL;                  return NULL;
Line 58  _selectAttribute(cfg_root_t * __restrict cfg, const ch Line 58  _selectAttribute(cfg_root_t * __restrict cfg, const ch
   
         if (csSec && *csSec)          if (csSec && *csSec)
                 AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec,                   AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
                                io_align(strlen(csSec), 1) / 2);                                E_ALIGN(strlen(csSec), 2) / 2);
         if (csAttr)          if (csAttr)
                 AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr,                   AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr, 
                                io_align(strlen(csAttr), 1) / 2);                                E_ALIGN(strlen(csAttr), 2) / 2);
   
        if (!csAttr)        if (!csAttr) {
                return RB_NFIND(tagRC, cfg, &fav);                c = RB_NFIND(tagRC, cfg, &fav);
        else                if (!c)
                return RB_FIND(tagRC, cfg, &fav);                        return NULL;   /* not found */
                 if (csSec && !AIT_ISEMPTY(&c->cfg_sec) && 
                                 strcmp(csSec, AIT_GET_STR(&c->cfg_sec)))
                         TAILQ_FOREACH_SAFE(c, cfg, cfg_next, n) {
                                 if (!AIT_ISEMPTY(&c->cfg_sec) && 
                                                 !strcmp(csSec, AIT_GET_STR(&c->cfg_sec)))
                                         break;
                         }
                 return c;
         } else {
                 c = RB_FIND(tagRC, cfg, &fav);
                 if (!c)
                         return NULL;    /* not found */
                 /* if cannot find right section */
                 if (csSec && !AIT_ISEMPTY(&c->cfg_sec) && 
                                 strcmp(csSec, AIT_GET_STR(&c->cfg_sec))) {
                         TAILQ_FOREACH_SAFE(c, cfg, cfg_next, n) {
                                 if (!AIT_ISEMPTY(&c->cfg_sec) && csAttr && 
                                                 !strcmp(csSec, AIT_GET_STR(&c->cfg_sec)) && 
                                                 !strcmp(csAttr, AIT_GET_STR(&c->cfg_attr)))
                                         return c;       /* FOUND! */
                         }
                         return NULL;    /* not found */
                 }
                 do {
                         if (!strcmp(AIT_GET_STR(&c->cfg_attr), csAttr))
                                 return c;       /* FOUND! */
                 } while ((c = RB_NEXT(tagRC, cfg, c)) && c && !cfg_tree_cmp(c, &fav));
                 /* if cannot find right attribute */
                 TAILQ_FOREACH_SAFE(c, cfg, cfg_next, n) {
                         if ((!csSec && AIT_ISEMPTY(&c->cfg_sec)) || 
                                         (csSec && !AIT_ISEMPTY(&c->cfg_sec) && 
                                          !strcmp(csSec, AIT_GET_STR(&c->cfg_sec))))
                                 if (!AIT_ISEMPTY(&c->cfg_attr) && csAttr && 
                                                 !strcmp(csAttr, AIT_GET_STR(&c->cfg_attr)))
                                         return c;       /* FOUND! */
                 }
                 return NULL;    /* not found */
         }
 }  }
   
 /* --------------------------------------------------------------- */  /* --------------------------------------------------------------- */
   
 /*  /*
 * cfg_findAttribute() - Find attribute position in config file * cfg_dumpCfg() - dump config data
  *   *
  * @cfg = Config root   * @cfg = Config root
    * return: none
    */
   void
   cfg_dumpCfg(cfg_root_t * __restrict cfg)
   {
           struct tagCfg *r, *c, *ctmp, *q, *qtmp;
           int syn;
   
           r = RB_ROOT(cfg);
           printf("ROOT:: KEY=%.8x [%s] %s=%s\n", ((AIT_KEY(&r->cfg_sec) << 15) | AIT_KEY(&r->cfg_attr)), 
                           AIT_ADDR(&r->cfg_sec), AIT_ADDR(&r->cfg_attr), AIT_ADDR(&r->cfg_val));
   
           RB_FOREACH_SAFE(c, tagRC, cfg, ctmp) {
                   syn ^= syn;
                   TAILQ_FOREACH_SAFE(q, cfg, cfg_next, qtmp) {
                           if (c == q) {
                                   syn = 42;
                                   break;
                           }
                   }
   
                   printf("%s KEY=%.8x [%s] %s=%s sync=%d\n", c == r ? "*" : "", 
                                   ((AIT_KEY(&c->cfg_sec) << 15) | AIT_KEY(&c->cfg_attr)), 
                                   AIT_ADDR(&c->cfg_sec), AIT_ADDR(&c->cfg_attr), AIT_ADDR(&c->cfg_val), syn);
           }
   }
   
   /*
    * cfg_getSection() - Get entire section attributes into array
    *
    * @cfg = Config root
  * @csSec = Config section //[{csSec}]   * @csSec = Config section //[{csSec}]
 * @csAttr = Config attribute //{csAttr} = ... * return: NULL not found or !=NULL allocated array, must free with array_Destroy() after use!
 * return: 0 not found item, -1 error or >0 position in list 
  */   */
inline intarray_t *
cfg_findAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)cfg_getSection(cfg_root_t * __restrict cfg, const char *csSec)
 {  {
           array_t *arr = NULL;
         struct tagCfg *av, fav;          struct tagCfg *av, fav;
         register int cx = 0;  
   
        if (!cfg || !csAttr) {        if (!cfg) {
                 cfg_SetErr(EINVAL, "Invalid argument(s)");                  cfg_SetErr(EINVAL, "Invalid argument(s)");
                return -1;                return NULL;
         } else          } else
                 memset(&fav, 0, sizeof fav);                  memset(&fav, 0, sizeof fav);
           if (csSec && !*csSec)
                   csSec = NULL;
   
         if (csSec && *csSec)          if (csSec && *csSec)
                 AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec,                   AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
                                io_align(strlen(csSec), 1) / 2);                                E_ALIGN(strlen(csSec), 2) / 2);
        if (csAttr) 
                AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr,  
                                io_align(strlen(csAttr), 1) / 2); 
   
        SLIST_FOREACH(av, cfg, cfg_next) {        arr = array_Init(0);
         if (!arr) {
                 cfg_SetErr(elwix_GetErrno(), "%s", elwix_GetError());
                 return NULL;
         }
 
         TAILQ_FOREACH(av, cfg, cfg_next)
                 if (AIT_KEY(&av->cfg_sec) == AIT_KEY(&fav.cfg_sec)) {
                         if (!csSec) {
                                 if (AIT_ISEMPTY(&av->cfg_sec))
                                         array_Push(arr, av, 0);
                         } else {
                                 if (!AIT_ISEMPTY(&av->cfg_sec) && 
                                                 !strcmp(AIT_GET_STR(&av->cfg_sec), csSec))
                                         array_Push(arr, av, 0);
                         }
                 }
 
         if (!array_Size(arr))
                 array_Destroy(&arr);
 
         return arr;
 }
 
 /*
  * cfg_findAttribute() - Find attribute position in config file
  *
  * @cfg = Config root
  * @csSec = Config section //[{csSec}]
  * @csAttr = Config attribute //{csAttr} = ...
  * return: 0 not found item, -1 error or >0 position in list
  */
 int
 cfg_findAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {
         struct tagCfg *av, *n;
         register int cx = 0;
 
         if (!cfg) {
                 cfg_SetErr(EINVAL, "Invalid argument(s)");
                 return -1;
         }
 
         TAILQ_FOREACH_SAFE(av, cfg, cfg_next, n) {
                 ++cx;                  ++cx;
                if (!cfg_tree_cmp(&fav, av))
                        return cx;                if ((!csSec && AIT_ISEMPTY(&av->cfg_sec)) || 
                                 (csSec && !AIT_ISEMPTY(&av->cfg_sec) && 
                                  !strcmp(csSec, AIT_GET_STR(&av->cfg_sec))))
                         if (!AIT_ISEMPTY(&av->cfg_attr) && csAttr && 
                                         !strcmp(csAttr, AIT_GET_STR(&av->cfg_attr)))
                                 return cx;
         }          }
   
         return 0;          return 0;
Line 120  cfg_unsetAttribute(cfg_root_t * __restrict cfg, const  Line 235  cfg_unsetAttribute(cfg_root_t * __restrict cfg, const 
 {  {
         struct tagCfg *av;          struct tagCfg *av;
   
        if (!cfg || !csAttr)        if (!cfg)
                 return -1;                  return -1;
   
         av = _selectAttribute(cfg, csSec, csAttr);          av = _selectAttribute(cfg, csSec, csAttr);
Line 129  cfg_unsetAttribute(cfg_root_t * __restrict cfg, const  Line 244  cfg_unsetAttribute(cfg_root_t * __restrict cfg, const 
   
         CFG_RC_LOCK(cfg);          CFG_RC_LOCK(cfg);
         RB_REMOVE(tagRC, cfg, av);          RB_REMOVE(tagRC, cfg, av);
        SLIST_REMOVE(cfg, av, tagCfg, cfg_next);        TAILQ_REMOVE(cfg, av, cfg_next);
         CFG_RC_UNLOCK(cfg);          CFG_RC_UNLOCK(cfg);
   
         AIT_FREE_VAL(&av->cfg_val);          AIT_FREE_VAL(&av->cfg_val);
         AIT_FREE_VAL(&av->cfg_attr);          AIT_FREE_VAL(&av->cfg_attr);
         AIT_FREE_VAL(&av->cfg_sec);          AIT_FREE_VAL(&av->cfg_sec);
        io_free(av);        e_free(av);
         return 1;          return 1;
 }  }
   
Line 161  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch Line 276  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch
                 /* adding new element */                  /* adding new element */
                 section = _selectAttribute(cfg, csSec, NULL);                  section = _selectAttribute(cfg, csSec, NULL);
   
                av = io_malloc(sizeof(struct tagCfg));                av = e_malloc(sizeof(struct tagCfg));
                 if (!av) {                  if (!av) {
                         LOGERR;                          LOGERR;
                         return -1;                          return -1;
Line 170  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch Line 285  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch
   
                         CFG_RC_LOCK(cfg);                          CFG_RC_LOCK(cfg);
                         if (!section)                          if (!section)
                                SLIST_INSERT_HEAD(cfg, av, cfg_next);                                TAILQ_INSERT_TAIL(cfg, av, cfg_next);
                         else                          else
                                SLIST_INSERT_AFTER(section, av, cfg_next);                                TAILQ_INSERT_BEFORE(section, av, cfg_next);
                         CFG_RC_UNLOCK(cfg);                          CFG_RC_UNLOCK(cfg);
                 }                  }
   
                 if (csSec && *csSec) {                  if (csSec && *csSec) {
                         AIT_SET_STR(&av->cfg_sec, csSec);                          AIT_SET_STR(&av->cfg_sec, csSec);
                         AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*),                           AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*), 
                                        io_align(AIT_LEN(&av->cfg_sec) - 1, 1) / 2);                                        E_ALIGN(AIT_LEN(&av->cfg_sec) - 1, 2) / 2);
                 }                  }
                 AIT_SET_STR(&av->cfg_val, csVal ? csVal : "");                  AIT_SET_STR(&av->cfg_val, csVal ? csVal : "");
                 AIT_SET_STR(&av->cfg_attr, csAttr);                  AIT_SET_STR(&av->cfg_attr, csAttr);
                 AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*),                   AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*), 
                                io_align(AIT_LEN(&av->cfg_attr) - 1, 1) / 2);                                E_ALIGN(AIT_LEN(&av->cfg_attr) - 1, 2) / 2);
   
                 CFG_RC_LOCK(cfg);                  CFG_RC_LOCK(cfg);
                 RB_INSERT(tagRC, cfg, av);                  RB_INSERT(tagRC, cfg, av);
Line 192  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch Line 307  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch
                 return 2;                  return 2;
         }          }
   
        if (csVal && strcmp((char*) csVal, (char*) AIT_GET_STR(&av->cfg_val))) {        if (csVal && AIT_ADDR(&av->cfg_val) && 
                         strcmp((char*) csVal, (char*) AIT_GET_STR(&av->cfg_val))) {
                 /* Update element */                  /* Update element */
                 AIT_FREE_VAL(&av->cfg_val);                  AIT_FREE_VAL(&av->cfg_val);
                 AIT_SET_STR(&av->cfg_val, csVal);                  AIT_SET_STR(&av->cfg_val, csVal);
Line 208  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch Line 324  cfg_setAttribute(cfg_root_t * __restrict cfg, const ch
  *   *
  * @cfg = Config root   * @cfg = Config root
  * @csSec = Config section //[{csSec}], if NULL unset in *default* section   * @csSec = Config section //[{csSec}], if NULL unset in *default* section
 * @csAttr = Config attribute //{csAttr} = ..., if NULL unset as *any* attribute * @csAttr = Config attribute //{csAttr} = ...
  * return: NULL item not found or null parameters, !=NULL value const string   * return: NULL item not found or null parameters, !=NULL value const string
  */   */
inline const char *const char *
 cfg_getAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)  cfg_getAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {  {
         struct tagCfg *av;          struct tagCfg *av;
   
        if (!cfg || !csAttr)        if (!cfg)
                 return NULL;                  return NULL;
   
         av = _selectAttribute(cfg, csSec, csAttr);          av = _selectAttribute(cfg, csSec, csAttr);
Line 227  cfg_getAttribute(cfg_root_t * __restrict cfg, const ch Line 343  cfg_getAttribute(cfg_root_t * __restrict cfg, const ch
 }  }
   
 /*  /*
    * cfg_getAttributeLong() - Get item as long from config and return value from it
    *
    * @cfg = Config root
    * @csSec = Config section //[{csSec}], if NULL unset in *default* section
    * @csAttr = Config attribute //{csAttr} = ...
    * return: value
    */
   long
   cfg_getAttributeLong(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
   {
           const char *str = NULL;
   
           str = cfg_getAttribute(cfg, csSec, csAttr);
           return strtol(str ? str : "", NULL, 0);
   }
   
   /*
    * cfg_getAttributeLLong() - Get item as long long from config and return value from it
    *
    * @cfg = Config root
    * @csSec = Config section //[{csSec}], if NULL unset in *default* section
    * @csAttr = Config attribute //{csAttr} = ...
    * return: value
    */
   long long
   cfg_getAttributeLLong(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
   {
           const char *str = NULL;
   
           str = cfg_getAttribute(cfg, csSec, csAttr);
           return strtoll(str ? str : "", NULL, 0);
   }
   
   /*
    * cfg_getAttributeDouble() - Get item as double from config and return value from it
    *
    * @cfg = Config root
    * @csSec = Config section //[{csSec}], if NULL unset in *default* section
    * @csAttr = Config attribute //{csAttr} = ...
    * return: value
    */
   double
   cfg_getAttributeDouble(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
   {
           const char *str = NULL;
   
           str = cfg_getAttribute(cfg, csSec, csAttr);
           return strtod(str ? str : "", NULL);
   }
   
   /*
    * cfg_getAttributeLDouble() - Get item as long double from config and return value from it
    *
    * @cfg = Config root
    * @csSec = Config section //[{csSec}], if NULL unset in *default* section
    * @csAttr = Config attribute //{csAttr} = ...
    * return: value
    */
   long double
   cfg_getAttributeLDouble(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
   {
           const char *str = NULL;
   
           str = cfg_getAttribute(cfg, csSec, csAttr);
           return strtold(str ? str : "", NULL);
   }
   
   /*
  * cfg_loadAttribute() - Get guarded attribute, if not found item return *default value*   * cfg_loadAttribute() - Get guarded attribute, if not found item return *default value*
  *   *
  * @cfg = Config root   * @cfg = Config root
Line 243  cfg_loadAttribute(cfg_root_t * __restrict cfg, const c Line 427  cfg_loadAttribute(cfg_root_t * __restrict cfg, const c
         struct tagCfg *av;          struct tagCfg *av;
         int ret = 0;          int ret = 0;
   
        if (!cfg || !csAttr || !val) {        if (!cfg || !val) {
                 cfg_SetErr(EINVAL, "Invalid argument(s)");                  cfg_SetErr(EINVAL, "Invalid argument(s)");
                 return -1;                  return -1;
         }          }
   
           AIT_INIT_VAL(val);
         av = _selectAttribute(cfg, csSec, csAttr);          av = _selectAttribute(cfg, csSec, csAttr);
         if (!av) {          if (!av) {
                 /* not found item */                  /* not found item */
Line 259  cfg_loadAttribute(cfg_root_t * __restrict cfg, const c Line 444  cfg_loadAttribute(cfg_root_t * __restrict cfg, const c
                 return ret;                  return ret;
         }          }
   
        if (AIT_ISEMPTY(&av->cfg_val) || !*AIT_GET_LIKE(&av->cfg_val, char*)) {        if (AIT_ISEMPTY(&av->cfg_val) || !AIT_ADDR(&av->cfg_val) || 
                         !*AIT_GET_LIKE(&av->cfg_val, char*)) {
                 /* empty value */                  /* empty value */
                 if (csDefValue) {                  if (csDefValue) {
                         AIT_SET_STR(val, csDefValue);                          AIT_SET_STR(val, csDefValue);

Removed from v.1.8  
changed lines
  Added in v.1.19


FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>