[BACK]Return to queue.c CVS log [TXT] [DIR] Up to [ELWIX - Embedded LightWeight unIX -] / libaitcfg / src

Diff for /libaitcfg/src/queue.c between versions 1.1 and 1.12

version 1.1, 2008/08/28 13:17:41 version 1.12, 2013/05/30 09:12:27
Line 1 Line 1
#include "global.h"/*************************************************************************
#include "aitcfg.h"* (C) 2008 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
 *  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>
   
/*Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012, 2013
 * SelectAttribute() Select item //{tagPair} from config list with attribute parameter(s)        by Michael Pounov <misho@elwix.org>.  All rights reserved.
 * @cfg = Head list element
 * @csSec = Config section //[{csSec}], if NULL search in *default* sectionRedistribution and use in source and binary forms, with or without
 * @csAttr = Config attribute //{csAttr} = ..., if NULL search in *any* attributemodification, are permitted provided that the following conditions
 * return: NULL not found attribute; //{tagPair} selected first seen attribute item from listare 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.
 
 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.
 */  */
static inline struct tagPair *SelectAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr)#include "global.h"
 
 
 static inline struct tagCfg *
 _selectAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {  {
        struct tagPair *av;        struct tagCfg fav, *c;
   
         if (!cfg)          if (!cfg)
                 return NULL;                  return NULL;
           else
                   memset(&fav, 0, sizeof fav);
   
        for (av = cfg->slh_first; av; av = av->sle_next) {        if (csSec && *csSec)
                if ((!csSec || !*csSec) && !av->psSection) {                AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
                        if (!csAttr)                                E_ALIGN(strlen(csSec), 2) / 2);
                                return av;        if (csAttr)
                        if (!strcmp((char*) av->psAttribute, (char*) csAttr))                AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr, 
                                return av;                                E_ALIGN(strlen(csAttr), 2) / 2);
                } 
                if (csSec && av->psSection && !strcmp((char*) av->psSection, (char*) csSec)) { 
                        if (!csAttr) 
                                return av; 
                        if (!strcmp((char*) av->psAttribute, (char*) csAttr)) 
                                return av; 
                } 
        } 
   
        return NULL;        if (!csAttr)
                 return RB_NFIND(tagRC, cfg, &fav);
         else {
                 c = RB_FIND(tagRC, cfg, &fav);
                 if (!c)
                         return NULL;    /* not found */
                 do {
                         if (!strcmp(AIT_GET_STR(&c->cfg_attr), csAttr))
                                 return c;       /* FOUND! */
                 } while (RB_NEXT(tagRC, cfg, c) && !cfg_tree_cmp(c, &fav));
                 return NULL;    /* not found */
         }
 }  }
   
/*/* --------------------------------------------------------------- */
 * DestroyAttribute() Free //{tagPair} item elements memory and destroy resource 
 * @pair = Free this element 
*/ 
static inline void DestroyAttribute(struct tagPair *pair) 
{ 
        if (!pair) 
                return; 
   
         if (pair->psValue)  
                 free(pair->psValue);  
         if (pair->psAttribute)  
                 free(pair->psAttribute);  
         if (pair->psSection)  
                 free(pair->psSection);  
   
         free(pair);  
 }  
   
 // ----------------------------------------------  
   
 /*  /*
 * cfg_FindAttribute() Find attribute position in config list * cfg_findAttribute() - Find attribute position in config file
 * @cfg = Head list element *
  * @cfg = Config root
  * @csSec = Config section //[{csSec}]   * @csSec = Config section //[{csSec}]
  * @csAttr = Config attribute //{csAttr} = ...   * @csAttr = Config attribute //{csAttr} = ...
 * return: 0 not found item; -1 error: null parameters; >0 position in list * return: 0 not found item, -1 error or >0 position in list
*/ */
inline int cfg_FindAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr)int
 cfg_findAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {  {
        struct tagPair *av;        struct tagCfg *av, fav;
         register int cx = 0;          register int cx = 0;
   
        if (!cfg || !csAttr)        if (!cfg || !csAttr) {
                 cfg_SetErr(EINVAL, "Invalid argument(s)");
                 return -1;                  return -1;
           } else
                   memset(&fav, 0, sizeof fav);
   
        for (av = cfg->slh_first; av; av = av->sle_next) {        if (csSec && *csSec)
                 AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
                                 E_ALIGN(strlen(csSec), 2) / 2);
         if (csAttr)
                 AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr, 
                                 E_ALIGN(strlen(csAttr), 2) / 2);
 
         SLIST_FOREACH(av, cfg, cfg_next) {
                 ++cx;                  ++cx;
                if ((!csSec || !*csSec) && !av->psSection)                if (!cfg_tree_cmp(&fav, av))
                        if (!strcmp((char*) av->psAttribute, (char*) csAttr))                        return cx;
                                return cx; 
                if (csSec && av->psSection && !strcmp((char*) av->psSection, (char*) csSec)) 
                        if (!strcmp((char*) av->psAttribute, (char*) csAttr)) 
                                return cx; 
         }          }
   
         return 0;          return 0;
 }  }
   
 /*  /*
 * cfg_UnsetAttribute() Unset item from config list and free resources * cfg_unsetAttribute() - Unset item from config and free resources
 * @cfg = Head list element *
  * @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: 0 item not found, -1 error: null parameters; >0 position in list * return: 0 item not found, -1 error or 1 removed item
*/ */
int cfg_UnsetAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr)int
 cfg_unsetAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {  {
        struct tagPair *av, *curr;        struct tagCfg *av;
        register int cx = 0; 
   
         if (!cfg || !csAttr)          if (!cfg || !csAttr)
                 return -1;                  return -1;
   
        av = SelectAttribute(cfg, csSec, csAttr);        av = _selectAttribute(cfg, csSec, csAttr);
         if (!av)          if (!av)
                 return 0;                  return 0;
   
        // remove element        CFG_RC_LOCK(cfg);
        //      remove element when is first!        RB_REMOVE(tagRC, cfg, av);
        if (cfg->slh_first == av) {        SLIST_REMOVE(cfg, av, tagCfg, cfg_next);
                cfg->slh_first = cfg->slh_first->sle_next;        CFG_RC_UNLOCK(cfg);
   
                DestroyAttribute(av);        AIT_FREE_VAL(&av->cfg_val);
                return 1;        AIT_FREE_VAL(&av->cfg_attr);
        }        AIT_FREE_VAL(&av->cfg_sec);
        //      remove element in other cases...        e_free(av);
        curr = cfg->slh_first;        return 1;
        while (curr->sle_next != av) { 
                ++cx; 
                curr = curr->sle_next; 
        } 
        curr->sle_next = curr->sle_next->sle_next; 
 
        DestroyAttribute(av); 
        return cx; 
 }  }
   
 /*  /*
 * cfg_SetAttribute() Set item in config list or add new item if not exists * cfg_setAttribute() - Set item in config or adding new item if not exists
 * @cfg = Head list element *
  * @cfg = Config root
  * @csSec = Config section //[{csSec}], if NULL set in *default* section   * @csSec = Config section //[{csSec}], if NULL set in *default* section
 * @csAttr = Config attribute //{csAttr} = ..., if NULL set as *any* attribute * @csAttr = Config attribute //{csAttr} = ...
  * @csVal = Config value //... = {csVal} to setup   * @csVal = Config value //... = {csVal} to setup
 * return: 0 nothing changed, -1 error: not enough memory; 1 find and update item; 2 added new item * return: 0 nothing changed, -1 error, 1 found and updated item or 2 added new item
*/ */
int cfg_SetAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr, const u_char *csVal)int
 cfg_setAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr, const char *csVal)
 {  {
        struct tagPair *av, *section;        struct tagCfg *av, *section;
   
         if (!cfg || !csAttr)          if (!cfg || !csAttr)
                 return -1;                  return -1;
   
        av = SelectAttribute(cfg, csSec, csAttr);        av = _selectAttribute(cfg, csSec, csAttr);
         if (!av) {          if (!av) {
                section = SelectAttribute(cfg, csSec, NULL);                /* adding new element */
                 section = _selectAttribute(cfg, csSec, NULL);
   
                av = malloc(sizeof(struct tagPair));                av = e_malloc(sizeof(struct tagCfg));
                 if (!av) {                  if (!av) {
                         LOGERR;                          LOGERR;
                         return -1;                          return -1;
                 } else {                  } else {
                        memset(av, 0, sizeof(struct tagPair));                        memset(av, 0, sizeof(struct tagCfg));
   
                        if (!section) {                        CFG_RC_LOCK(cfg);
                                // add new element                        if (!section)
                                av->sle_next = cfg->slh_first;                                SLIST_INSERT_HEAD(cfg, av, cfg_next);
                                cfg->slh_first = av;                        else
                        } else {                                SLIST_INSERT_AFTER(section, av, cfg_next);
                                // add new element in existing section                        CFG_RC_UNLOCK(cfg);
                                av->sle_next = section->sle_next; 
                                section->sle_next = av; 
                        } 
                 }                  }
                 // added section name to element  
                 if (csSec && *csSec) {  
                         av->psSection = malloc(strlen((char*) csSec) + 1);  
                         if (!av->psSection) {  
                                 LOGERR;  
                                 free(av);  
                                 return -1;  
                         } else {  
                                 memset(av->psSection, 0, strlen((char*) csSec) + 1);  
                                 strcpy((char*) av->psSection, (char*) csSec);  
                         }  
                 } else  
                         av->psSection = NULL;  
   
                // added attribute to element                if (csSec && *csSec) {
                av->psAttribute = malloc(strlen((char*) csAttr) + 1);                        AIT_SET_STR(&av->cfg_sec, csSec);
                if (!av->psAttribute) {                        AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*), 
                        LOGERR;                                        E_ALIGN(AIT_LEN(&av->cfg_sec) - 1, 2) / 2);
                        free(av->psSection); 
                        free(av); 
                        return -1; 
                } else { 
                        memset(av->psAttribute, 0, strlen((char*) csAttr) + 1); 
                        strcpy((char*) av->psAttribute, (char*) csAttr); 
                 }                  }
                // added value to element                AIT_SET_STR(&av->cfg_val, csVal ? csVal : "");
                if (csVal && *csVal) {                AIT_SET_STR(&av->cfg_attr, csAttr);
                        av->psValue = malloc(strlen((char*) csVal) + 1);                AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*), 
                        if (!av->psValue) {                                E_ALIGN(AIT_LEN(&av->cfg_attr) - 1, 2) / 2);
                                LOGERR; 
                                free(av->psAttribute); 
                                free(av->psSection); 
                                free(av); 
                                return -1; 
                        } else { 
                                memset(av->psValue, 0, strlen((char*) csVal) + 1); 
                                strcpy((char*) av->psValue, (char*) csVal); 
                        } 
                } else { 
                        av->psValue = malloc(1); 
                        *av->psValue = 0; 
                } 
   
                // Added new element                CFG_RC_LOCK(cfg);
                 RB_INSERT(tagRC, cfg, av);
                 CFG_RC_UNLOCK(cfg);
                 return 2;                  return 2;
         }          }
   
        if (strcmp((char*) csVal, (char*) av->psValue)) {        if (csVal && AIT_ADDR(&av->cfg_val) && 
                av->psValue = realloc(av->psValue, strlen((char*) csVal) + 1);                        strcmp((char*) csVal, (char*) AIT_GET_STR(&av->cfg_val))) {
                memset(av->psValue, 0, strlen((char*) csVal) + 1);                /* Update element */
                strcpy((char*) av->psValue, (char*) csVal);                AIT_FREE_VAL(&av->cfg_val);
                AIT_SET_STR(&av->cfg_val, csVal);
                // Update element 
                 return 1;                  return 1;
         }          }
   
        // Nothing happens ... finded & values is equal!        /* Nothing happens ... found & values is equal! */
         return 0;          return 0;
 }  }
   
 /*  /*
 * cfg_GetAttribute() Get item from config list and return his value * cfg_getAttribute() - Get item from config and return value from it
 * @cfg = Head list element *
  * @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} = ..., if NULL unset as *any* attribute
 * 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 u_char *cfg_GetAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr)const char *
 cfg_getAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
 {  {
        struct tagPair *av;        struct tagCfg *av;
   
         if (!cfg || !csAttr)          if (!cfg || !csAttr)
                 return NULL;                  return NULL;
   
        av = SelectAttribute(cfg, csSec, csAttr);        av = _selectAttribute(cfg, csSec, csAttr);
         if (!av)          if (!av)
                 return NULL;                  return NULL;
   
        return av->psValue;        return AIT_GET_STR(&av->cfg_val);
 }  }
   
 // --------------------------------------------------------------  
   
 /*  /*
 * cfg_LoadAttribute() Extended get attribute, if not found item return *default value* * cfg_loadAttribute() - Get guarded attribute, if not found item return *default value*
 * @cfg = Head list element *
  * @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} = ...
 * @psVal = Return buffer for item Value //... = {psVal} * @val = Return buffer for item Value //... = {val}
 * @ValLen = Length of buffer //{psVal} for return * @csDefValue = *Default Value* for return in //{val}, if not found item in config
 * @csDefValue = *Default Value* for return in //{psVal}, if not found item in config list * return: 0 item not found, -1 error or >0 number of copied bytes in //{val}
 * return: 0 item not found, -1 error: null parameters; >0 number of copied bytes in //{psVal} */
*/int
int cfg_LoadAttribute(sl_config * __restrict cfg, const u_char *csSec, const u_char *csAttr, cfg_loadAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr, 
                u_char * __restrict psVal, int ValLen, const char *csDefValue)                ait_val_t * __restrict val, const char *csDefValue)
 {  {
        struct tagPair *av;        struct tagCfg *av;
         int ret = 0;          int ret = 0;
   
        if (!cfg || !csAttr || !ValLen || !psVal)        if (!cfg || !csAttr || !val) {
                 cfg_SetErr(EINVAL, "Invalid argument(s)");
                 return -1;                  return -1;
           }
   
        memset(psVal, 0, ValLen);        AIT_INIT_VAL(val);
        av = SelectAttribute(cfg, csSec, csAttr);        av = _selectAttribute(cfg, csSec, csAttr);
         if (!av) {          if (!av) {
                   /* not found item */
                 if (csDefValue) {                  if (csDefValue) {
                        strncpy((char*) psVal, csDefValue, ValLen - 1);                        AIT_SET_STR(val, csDefValue);
                        ret = strlen((char*) psVal);                        ret = AIT_LEN(val);
                }                } else
                        AIT_INIT_VAL(val);
                 return ret;                  return ret;
         }          }
   
        if (!av->psValue || !*av->psValue) {        if (AIT_ISEMPTY(&av->cfg_val) || !AIT_ADDR(&av->cfg_val) || 
                         !*AIT_GET_LIKE(&av->cfg_val, char*)) {
                 /* empty value */
                 if (csDefValue) {                  if (csDefValue) {
                        strncpy((char*) psVal, csDefValue, ValLen - 1);                        AIT_SET_STR(val, csDefValue);
                        ret = strlen((char*) psVal);                        ret = AIT_LEN(val);
                }                } else
                         AIT_INIT_VAL(val);
         } else {          } else {
                strncpy((char*) psVal, (char*) av->psValue, ValLen - 1);                /* copy value */
                ret = strlen((char*) psVal);                AIT_SET_STR(val, AIT_GET_STR(&av->cfg_val));
                 ret = AIT_LEN(val);
         }          }
   
         return ret;          return ret;
Removed from v.1.1  
changed lines
  Added in v.1.12

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