Annotation of libaitcfg/src/queue.c, revision 1.15

1.2       misho       1: /*************************************************************************
                      2: * (C) 2008 AITNET ltd - Sofia/Bulgaria - <misho@aitbg.com>
                      3: *  by Michael Pounov <misho@openbsd-bg.org>
                      4: *
                      5: * $Author: misho $
1.15    ! misho       6: * $Id: queue.c,v 1.14.4.4 2014/03/19 18:36:08 misho Exp $
1.2       misho       7: *
1.6       misho       8: **************************************************************************
                      9: The ELWIX and AITNET software is distributed under the following
                     10: terms:
                     11: 
                     12: All of the documentation and software included in the ELWIX and AITNET
                     13: Releases is copyrighted by ELWIX - Sofia/Bulgaria <info@elwix.org>
                     14: 
1.13      misho      15: Copyright 2004 - 2014
1.6       misho      16:        by Michael Pounov <misho@elwix.org>.  All rights reserved.
                     17: 
                     18: Redistribution and use in source and binary forms, with or without
                     19: modification, are permitted provided that the following conditions
                     20: are met:
                     21: 1. Redistributions of source code must retain the above copyright
                     22:    notice, this list of conditions and the following disclaimer.
                     23: 2. Redistributions in binary form must reproduce the above copyright
                     24:    notice, this list of conditions and the following disclaimer in the
                     25:    documentation and/or other materials provided with the distribution.
                     26: 3. All advertising materials mentioning features or use of this software
                     27:    must display the following acknowledgement:
                     28: This product includes software developed by Michael Pounov <misho@elwix.org>
                     29: ELWIX - Embedded LightWeight unIX and its contributors.
                     30: 4. Neither the name of AITNET nor the names of its contributors
                     31:    may be used to endorse or promote products derived from this software
                     32:    without specific prior written permission.
                     33: 
                     34: THIS SOFTWARE IS PROVIDED BY AITNET AND CONTRIBUTORS ``AS IS'' AND
                     35: ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     36: IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     37: ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     38: FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     39: DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     40: OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     41: HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     42: LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     43: OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     44: SUCH DAMAGE.
                     45: */
1.1       misho      46: #include "global.h"
                     47: 
                     48: 
1.7       misho      49: static inline struct tagCfg *
                     50: _selectAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
1.1       misho      51: {
1.10      misho      52:        struct tagCfg fav, *c;
1.1       misho      53: 
                     54:        if (!cfg)
                     55:                return NULL;
1.7       misho      56:        else
                     57:                memset(&fav, 0, sizeof fav);
1.1       misho      58: 
1.7       misho      59:        if (csSec && *csSec)
                     60:                AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
1.12      misho      61:                                E_ALIGN(strlen(csSec), 2) / 2);
1.7       misho      62:        if (csAttr)
                     63:                AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr, 
1.12      misho      64:                                E_ALIGN(strlen(csAttr), 2) / 2);
1.7       misho      65: 
                     66:        if (!csAttr)
                     67:                return RB_NFIND(tagRC, cfg, &fav);
1.10      misho      68:        else {
                     69:                c = RB_FIND(tagRC, cfg, &fav);
                     70:                if (!c)
                     71:                        return NULL;    /* not found */
                     72:                do {
                     73:                        if (!strcmp(AIT_GET_STR(&c->cfg_attr), csAttr))
                     74:                                return c;       /* FOUND! */
1.15    ! misho      75:                } while ((c = RB_NEXT(tagRC, cfg, c)) && c && !cfg_tree_cmp(c, &fav));
1.10      misho      76:                return NULL;    /* not found */
                     77:        }
1.1       misho      78: }
                     79: 
1.7       misho      80: /* --------------------------------------------------------------- */
1.1       misho      81: 
                     82: /*
1.15    ! misho      83:  * cfg_getSection() - Get entire section attributes into array
        !            84:  *
        !            85:  * @cfg = Config root
        !            86:  * @csSec = Config section //[{csSec}]
        !            87:  * return: NULL not found or !=NULL allocated array, must free with array_Destroy() after use!
        !            88:  */
        !            89: array_t *
        !            90: cfg_getSection(cfg_root_t * __restrict cfg, const char *csSec)
        !            91: {
        !            92:        array_t *arr = NULL;
        !            93:        struct tagCfg *av, fav;
        !            94: 
        !            95:        if (!cfg) {
        !            96:                cfg_SetErr(EINVAL, "Invalid argument(s)");
        !            97:                return NULL;
        !            98:        } else
        !            99:                memset(&fav, 0, sizeof fav);
        !           100:        if (csSec && !*csSec)
        !           101:                csSec = NULL;
        !           102: 
        !           103:        if (csSec && *csSec)
        !           104:                AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
        !           105:                                E_ALIGN(strlen(csSec), 2) / 2);
        !           106: 
        !           107:        av = RB_NFIND(tagRC, cfg, &fav);
        !           108:        if (!av)
        !           109:                return NULL;
        !           110:        if (csSec) {
        !           111:                if (AIT_ISEMPTY(&av->cfg_sec) || strcmp(AIT_GET_STR(&av->cfg_sec), csSec))
        !           112:                        return NULL;
        !           113:        } else {
        !           114:                if (!AIT_ISEMPTY(&av->cfg_sec))
        !           115:                        return NULL;
        !           116:        }
        !           117: 
        !           118:        arr = array_Init(1);
        !           119:        if (!arr) {
        !           120:                cfg_SetErr(elwix_GetErrno(), "%s", elwix_GetError());
        !           121:                return NULL;
        !           122:        } else
        !           123:                array_Push(arr, av, 0);
        !           124: 
        !           125:        while ((av = RB_NEXT(tagRC, cfg, av)) && av) {
        !           126:                if (csSec) {
        !           127:                        if (AIT_ISEMPTY(&av->cfg_sec) || strcmp(AIT_GET_STR(&av->cfg_sec), csSec))
        !           128:                                break;
        !           129:                } else {
        !           130:                        if (!AIT_ISEMPTY(&av->cfg_sec))
        !           131:                                break;
        !           132:                }
        !           133: 
        !           134:                array_Push(arr, av, 0);
        !           135:        }
        !           136: 
        !           137:        return arr;
        !           138: }
        !           139: 
        !           140: /*
1.7       misho     141:  * cfg_findAttribute() - Find attribute position in config file
                    142:  *
                    143:  * @cfg = Config root
1.1       misho     144:  * @csSec = Config section //[{csSec}]
1.15    ! misho     145:  * @csAttr = Config attribute //{csAttr} = ..., if NULL as *any* attribute
1.7       misho     146:  * return: 0 not found item, -1 error or >0 position in list
                    147:  */
1.12      misho     148: int
1.7       misho     149: cfg_findAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
1.1       misho     150: {
1.7       misho     151:        struct tagCfg *av, fav;
1.1       misho     152:        register int cx = 0;
                    153: 
1.15    ! misho     154:        if (!cfg) {
1.7       misho     155:                cfg_SetErr(EINVAL, "Invalid argument(s)");
1.1       misho     156:                return -1;
1.7       misho     157:        } else
                    158:                memset(&fav, 0, sizeof fav);
1.1       misho     159: 
1.7       misho     160:        if (csSec && *csSec)
                    161:                AIT_KEY(&fav.cfg_sec) = crcFletcher16((u_short*) csSec, 
1.12      misho     162:                                E_ALIGN(strlen(csSec), 2) / 2);
1.7       misho     163:        if (csAttr)
                    164:                AIT_KEY(&fav.cfg_attr) = crcFletcher16((u_short*) csAttr, 
1.12      misho     165:                                E_ALIGN(strlen(csAttr), 2) / 2);
1.7       misho     166: 
1.14      misho     167:        TAILQ_FOREACH(av, cfg, cfg_next) {
1.1       misho     168:                ++cx;
1.7       misho     169:                if (!cfg_tree_cmp(&fav, av))
                    170:                        return cx;
1.1       misho     171:        }
                    172: 
                    173:        return 0;
                    174: }
                    175: 
                    176: /*
1.7       misho     177:  * cfg_unsetAttribute() - Unset item from config and free resources
                    178:  *
                    179:  * @cfg = Config root
1.1       misho     180:  * @csSec = Config section //[{csSec}], if NULL unset in *default* section
1.15    ! misho     181:  * @csAttr = Config attribute //{csAttr} = ..., if NULL as *any* attribute
1.7       misho     182:  * return: 0 item not found, -1 error or 1 removed item
                    183:  */
                    184: int
                    185: cfg_unsetAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
1.1       misho     186: {
1.7       misho     187:        struct tagCfg *av;
1.1       misho     188: 
1.15    ! misho     189:        if (!cfg)
1.1       misho     190:                return -1;
                    191: 
1.7       misho     192:        av = _selectAttribute(cfg, csSec, csAttr);
1.1       misho     193:        if (!av)
                    194:                return 0;
                    195: 
1.7       misho     196:        CFG_RC_LOCK(cfg);
                    197:        RB_REMOVE(tagRC, cfg, av);
1.14      misho     198:        TAILQ_REMOVE(cfg, av, cfg_next);
1.7       misho     199:        CFG_RC_UNLOCK(cfg);
                    200: 
                    201:        AIT_FREE_VAL(&av->cfg_val);
                    202:        AIT_FREE_VAL(&av->cfg_attr);
                    203:        AIT_FREE_VAL(&av->cfg_sec);
1.12      misho     204:        e_free(av);
1.7       misho     205:        return 1;
1.1       misho     206: }
                    207: 
                    208: /*
1.7       misho     209:  * cfg_setAttribute() - Set item in config or adding new item if not exists
                    210:  *
                    211:  * @cfg = Config root
1.1       misho     212:  * @csSec = Config section //[{csSec}], if NULL set in *default* section
1.7       misho     213:  * @csAttr = Config attribute //{csAttr} = ...
1.1       misho     214:  * @csVal = Config value //... = {csVal} to setup
1.7       misho     215:  * return: 0 nothing changed, -1 error, 1 found and updated item or 2 added new item
                    216:  */
                    217: int
                    218: cfg_setAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr, const char *csVal)
1.1       misho     219: {
1.7       misho     220:        struct tagCfg *av, *section;
1.1       misho     221: 
                    222:        if (!cfg || !csAttr)
                    223:                return -1;
                    224: 
1.7       misho     225:        av = _selectAttribute(cfg, csSec, csAttr);
1.1       misho     226:        if (!av) {
1.7       misho     227:                /* adding new element */
                    228:                section = _selectAttribute(cfg, csSec, NULL);
1.1       misho     229: 
1.12      misho     230:                av = e_malloc(sizeof(struct tagCfg));
1.1       misho     231:                if (!av) {
                    232:                        LOGERR;
                    233:                        return -1;
                    234:                } else {
1.7       misho     235:                        memset(av, 0, sizeof(struct tagCfg));
1.1       misho     236: 
1.7       misho     237:                        CFG_RC_LOCK(cfg);
                    238:                        if (!section)
1.14      misho     239:                                TAILQ_INSERT_TAIL(cfg, av, cfg_next);
1.7       misho     240:                        else
1.14      misho     241:                                TAILQ_INSERT_BEFORE(section, av, cfg_next);
1.7       misho     242:                        CFG_RC_UNLOCK(cfg);
1.1       misho     243:                }
1.7       misho     244: 
1.1       misho     245:                if (csSec && *csSec) {
1.7       misho     246:                        AIT_SET_STR(&av->cfg_sec, csSec);
                    247:                        AIT_KEY(&av->cfg_sec) = crcFletcher16(AIT_GET_LIKE(&av->cfg_sec, u_short*), 
1.12      misho     248:                                        E_ALIGN(AIT_LEN(&av->cfg_sec) - 1, 2) / 2);
1.1       misho     249:                }
1.7       misho     250:                AIT_SET_STR(&av->cfg_val, csVal ? csVal : "");
                    251:                AIT_SET_STR(&av->cfg_attr, csAttr);
                    252:                AIT_KEY(&av->cfg_attr) = crcFletcher16(AIT_GET_LIKE(&av->cfg_attr, u_short*), 
1.12      misho     253:                                E_ALIGN(AIT_LEN(&av->cfg_attr) - 1, 2) / 2);
1.7       misho     254: 
                    255:                CFG_RC_LOCK(cfg);
                    256:                RB_INSERT(tagRC, cfg, av);
                    257:                CFG_RC_UNLOCK(cfg);
1.1       misho     258:                return 2;
                    259:        }
                    260: 
1.10      misho     261:        if (csVal && AIT_ADDR(&av->cfg_val) && 
                    262:                        strcmp((char*) csVal, (char*) AIT_GET_STR(&av->cfg_val))) {
1.7       misho     263:                /* Update element */
                    264:                AIT_FREE_VAL(&av->cfg_val);
                    265:                AIT_SET_STR(&av->cfg_val, csVal);
1.1       misho     266:                return 1;
                    267:        }
                    268: 
1.7       misho     269:        /* Nothing happens ... found & values is equal! */
1.1       misho     270:        return 0;
                    271: }
                    272: 
                    273: /*
1.7       misho     274:  * cfg_getAttribute() - Get item from config and return value from it
                    275:  *
                    276:  * @cfg = Config root
1.1       misho     277:  * @csSec = Config section //[{csSec}], if NULL unset in *default* section
1.15    ! misho     278:  * @csAttr = Config attribute //{csAttr} = ..., if NULL as *any* attribute
1.7       misho     279:  * return: NULL item not found or null parameters, !=NULL value const string
                    280:  */
1.12      misho     281: const char *
1.7       misho     282: cfg_getAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr)
1.1       misho     283: {
1.7       misho     284:        struct tagCfg *av;
1.1       misho     285: 
1.15    ! misho     286:        if (!cfg)
1.1       misho     287:                return NULL;
                    288: 
1.7       misho     289:        av = _selectAttribute(cfg, csSec, csAttr);
1.1       misho     290:        if (!av)
                    291:                return NULL;
                    292: 
1.7       misho     293:        return AIT_GET_STR(&av->cfg_val);
1.4       misho     294: }
                    295: 
1.1       misho     296: /*
1.7       misho     297:  * cfg_loadAttribute() - Get guarded attribute, if not found item return *default value*
                    298:  *
                    299:  * @cfg = Config root
1.1       misho     300:  * @csSec = Config section //[{csSec}], if NULL unset in *default* section
1.15    ! misho     301:  * @csAttr = Config attribute //{csAttr} = ..., if NULL as *any* attribute
1.7       misho     302:  * @val = Return buffer for item Value //... = {val}
                    303:  * @csDefValue = *Default Value* for return in //{val}, if not found item in config
                    304:  * return: 0 item not found, -1 error or >0 number of copied bytes in //{val}
                    305:  */
                    306: int
                    307: cfg_loadAttribute(cfg_root_t * __restrict cfg, const char *csSec, const char *csAttr, 
                    308:                ait_val_t * __restrict val, const char *csDefValue)
1.1       misho     309: {
1.7       misho     310:        struct tagCfg *av;
1.1       misho     311:        int ret = 0;
                    312: 
1.15    ! misho     313:        if (!cfg || !val) {
1.7       misho     314:                cfg_SetErr(EINVAL, "Invalid argument(s)");
1.1       misho     315:                return -1;
1.7       misho     316:        }
1.1       misho     317: 
1.9       misho     318:        AIT_INIT_VAL(val);
1.7       misho     319:        av = _selectAttribute(cfg, csSec, csAttr);
1.1       misho     320:        if (!av) {
1.7       misho     321:                /* not found item */
1.1       misho     322:                if (csDefValue) {
1.7       misho     323:                        AIT_SET_STR(val, csDefValue);
                    324:                        ret = AIT_LEN(val);
1.8       misho     325:                } else
                    326:                        AIT_INIT_VAL(val);
1.1       misho     327:                return ret;
                    328:        }
                    329: 
1.10      misho     330:        if (AIT_ISEMPTY(&av->cfg_val) || !AIT_ADDR(&av->cfg_val) || 
                    331:                        !*AIT_GET_LIKE(&av->cfg_val, char*)) {
1.7       misho     332:                /* empty value */
1.1       misho     333:                if (csDefValue) {
1.7       misho     334:                        AIT_SET_STR(val, csDefValue);
                    335:                        ret = AIT_LEN(val);
1.8       misho     336:                } else
                    337:                        AIT_INIT_VAL(val);
1.1       misho     338:        } else {
1.7       misho     339:                /* copy value */
                    340:                AIT_SET_STR(val, AIT_GET_STR(&av->cfg_val));
                    341:                ret = AIT_LEN(val);
1.1       misho     342:        }
                    343: 
                    344:        return ret;
                    345: }

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