Annotation of libaitio/src/vars.c, revision 1.5.2.4

1.2       misho       1: /*************************************************************************
                      2: * (C) 2011 AITNET ltd - Sofia/Bulgaria - <misho@aitnet.org>
                      3: *  by Michael Pounov <misho@elwix.org>
                      4: *
                      5: * $Author: misho $
1.5.2.4 ! misho       6: * $Id: vars.c,v 1.5.2.3 2012/03/29 13:16:24 misho Exp $
1.2       misho       7: *
                      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.5       misho      15: Copyright 2004, 2005, 2006, 2007, 2008, 2009, 2010, 2011, 2012
1.2       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: */
                     46: #include "global.h"
                     47: 
                     48: 
                     49: /*
1.5.2.4 ! misho      50:  * io_vars2buffer() - Marshaling data from array with variables to buffer
1.5       misho      51:  *
1.2       misho      52:  * @buf = Buffer
                     53:  * @buflen = Size of buffer
                     54:  * @vars = Variable array
                     55:  * return: -1 error, 0 nothing done or >0 size of marshaled data
                     56:  */
                     57: int
1.3       misho      58: io_vars2buffer(u_char *buf, int buflen, array_t *vars)
1.2       misho      59: {
                     60:        int Limit = 0;
                     61:        register int i;
                     62:        ait_val_t *v, *val;
1.5       misho      63:        u_char *dat;
1.2       misho      64: 
                     65:        assert(buf);
                     66:        assert(vars);
                     67:        if (!buf || !vars)
                     68:                return -1;
                     69:        if (!buflen || !io_arraySize(vars))
                     70:                return 0;
                     71: 
                     72:        Limit = sizeof(ait_val_t) * io_arraySize(vars);
                     73:        if (Limit > buflen) {
                     74:                io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d needed min %d ...\n", 
                     75:                                buflen, Limit);
                     76:                return -1;
                     77:        } else {
                     78:                memset(buf, 0, buflen);
                     79: 
                     80:                v = (ait_val_t*) buf;
1.5       misho      81:                dat = buf + Limit;
1.2       misho      82:        }
                     83: 
                     84:        /* marshaling */
                     85:        for (i = 0; i < io_arraySize(vars); i++) {
                     86:                val = io_array(vars, i, ait_val_t*);
                     87: 
                     88:                v[i].val_type = val->val_type;
1.5.2.1   misho      89:                AIT_KEY(&v[i]) = htobe16(AIT_KEY(val));
1.2       misho      90:                AIT_LEN(&v[i]) = htobe32(AIT_LEN(val));
                     91: 
                     92:                switch (AIT_TYPE(val)) {
                     93:                        case blob:
                     94:                        case f32:
                     95:                        case f64:
                     96:                        case i8:
                     97:                        case i16:
                     98:                        case i32:
                     99:                        case i64:
                    100:                        case u8:
                    101:                        case u16:
                    102:                        case u32:
                    103:                        case u64:
                    104:                                v[i].val.net = htobe64(val->val.net);
                    105:                                break;
1.5       misho     106:                        case data:
                    107:                                if (AIT_LEN(val) > buflen - Limit) {
                    108:                                        io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d "
                    109:                                                        "needed min %d ...\n", buflen, Limit + AIT_LEN(val));
                    110:                                        return -1;
                    111:                                } else
                    112:                                        Limit += AIT_LEN(val);
                    113: 
                    114:                                memcpy(dat, val->val_data, AIT_LEN(val));
                    115:                                /* Debug:: data offset in packet, not matter for anything! */
                    116:                                v[i].val.net = dat - buf;
                    117:                                dat += AIT_LEN(val);
                    118:                                break;
1.2       misho     119:                        case buffer:
                    120:                        case string:
                    121:                                if (AIT_LEN(val) > buflen - Limit) {
                    122:                                        io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d "
                    123:                                                        "needed min %d ...\n", buflen, Limit + AIT_LEN(val));
                    124:                                        return -1;
                    125:                                } else
                    126:                                        Limit += AIT_LEN(val);
                    127: 
1.5       misho     128:                                memcpy(dat, val->val.buffer, AIT_LEN(val));
1.2       misho     129:                                /* Debug:: data offset in packet, not matter for anything! */
1.5       misho     130:                                v[i].val.net = dat - buf;
                    131:                                dat += AIT_LEN(val);
1.2       misho     132:                                break;
                    133:                        default:
                    134:                                io_SetErr(EINVAL, "Error:: unsupported variable type=%d at element #%d ...\n", 
                    135:                                                AIT_TYPE(val), i);
                    136:                                return -1;
                    137:                }
                    138:        }
                    139: 
                    140:        return Limit;
                    141: }
                    142: 
                    143: /*
1.5.2.4 ! misho     144:  * io_buffer2vars() - De-marshaling data from buffer to array with variables
1.5       misho     145:  *
1.2       misho     146:  * @buf = Buffer
                    147:  * @buflen = Size of buffer
                    148:  * @vnum = Number of variables into buffer
                    149:  * @zcpy = Zero-copy for variables, if !=0 don't use io_arrayFree() for free variables and 
                    150:                *DON'T MODIFY OR DESTROY BUFFER*. =0 call io_arrayFree() before io_arrayDestroy()
                    151:  * return: =NULL error, !=NULL allocated variable array, after use must free with io_arrayDestroy()
                    152:  */
                    153: array_t *
1.3       misho     154: io_buffer2vars(u_char *buf, int buflen, int vnum, int zcpy)
1.2       misho     155: {
                    156:        array_t *vars;
                    157:        int Limit = 0;
                    158:        register int i;
                    159:        ait_val_t *v, *val;
1.5       misho     160:        u_char *dat;
1.2       misho     161: 
                    162:        assert(buf);
                    163:        if (!buf || !buflen || !vnum)
                    164:                return NULL;
                    165: 
                    166:        Limit = sizeof(ait_val_t) * vnum;
                    167:        if (Limit > buflen) {
                    168:                io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d needed min %d ...\n", 
                    169:                                buflen, Limit);
                    170:                return NULL;
                    171:        } else {
                    172:                if (!(vars = io_arrayInit(vnum)))
                    173:                        return NULL;
                    174: 
                    175:                v = (ait_val_t*) buf;
1.5       misho     176:                dat = buf + Limit;
1.2       misho     177:        }
                    178: 
                    179:        /* de-marshaling */
                    180:        for (i = 0; i < io_arraySize(vars); i++) {
                    181:                if (!zcpy) {
                    182:                        val = malloc(sizeof(ait_val_t));
                    183:                        if (!val) {
                    184:                                LOGERR;
                    185:                                io_arrayFree(vars);
                    186:                                io_arrayDestroy(&vars);
                    187:                                return NULL;
                    188:                        }
                    189:                } else
                    190:                        val = v + i;
                    191:                io_arraySet(vars, i, val);
                    192: 
                    193:                val->val_type = v[i].val_type;
                    194: #if defined(__OpenBSD__)
                    195:                AIT_LEN(val) = betoh32(AIT_LEN(&v[i]));
1.5.2.1   misho     196:                AIT_KEY(val) = betoh16(AIT_KEY(&v[i]));
1.2       misho     197: #else
                    198:                AIT_LEN(val) = be32toh(AIT_LEN(&v[i]));
1.5.2.1   misho     199:                AIT_KEY(val) = be16toh(AIT_KEY(&v[i]));
1.2       misho     200: #endif
                    201: 
                    202:                switch (AIT_TYPE(val)) {
                    203:                        case blob:
                    204:                        case f32:
                    205:                        case f64:
                    206:                        case i8:
                    207:                        case i16:
                    208:                        case i32:
                    209:                        case i64:
                    210:                        case u8:
                    211:                        case u16:
                    212:                        case u32:
                    213:                        case u64:
                    214: #if defined(__OpenBSD__)
                    215:                                val->val.net = betoh64(v[i].val.net);
                    216: #else
                    217:                                val->val.net = be64toh(v[i].val.net);
                    218: #endif
                    219:                                break;
1.5       misho     220:                        case data:
                    221:                                /* WARNING:: remap data type to buffer */
                    222:                                val->val_type = buffer;
1.2       misho     223:                        case buffer:
                    224:                        case string:
                    225:                                if (AIT_LEN(val) > buflen - Limit) {
                    226:                                        io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d "
                    227:                                                        "needed min %d ...\n", buflen, Limit + AIT_LEN(val));
                    228:                                        if (!zcpy)
                    229:                                                io_arrayFree(vars);
                    230:                                        io_arrayDestroy(&vars);
                    231:                                        return NULL;
                    232:                                } else
                    233:                                        Limit += AIT_LEN(val);
                    234: 
                    235:                                if (!zcpy) {
                    236:                                        val->val.buffer = malloc(AIT_LEN(val));
                    237:                                        if (!val->val.buffer) {
                    238:                                                LOGERR;
                    239:                                                io_arrayFree(vars);
                    240:                                                io_arrayDestroy(&vars);
                    241:                                                return NULL;
                    242:                                        } else
1.5       misho     243:                                                memcpy(val->val.buffer, dat, AIT_LEN(val));
1.2       misho     244:                                } else
1.5       misho     245:                                        val->val.buffer = dat;
                    246:                                dat += AIT_LEN(val);
1.2       misho     247:                                break;
                    248:                        default:
                    249:                                io_SetErr(EINVAL, "Error:: unsupported variable type=%d at element #%d ...\n", 
                    250:                                                AIT_TYPE(val), i);
                    251:                                if (!zcpy)
                    252:                                        io_arrayFree(vars);
                    253:                                io_arrayDestroy(&vars);
                    254:                                return NULL;
                    255:                }
                    256:        }
                    257: 
                    258:        return vars;
                    259: }
                    260: 
                    261: /* buffer marshaling without swapping bytes to network order */
                    262: 
                    263: /*
1.5.2.4 ! misho     264:  * io_vars2map() - Marshaling data from array with variables to memory map
1.5       misho     265:  *
1.2       misho     266:  * @buf = Buffer
                    267:  * @buflen = Size of buffer
                    268:  * @vars = Variable array
                    269:  * return: -1 error, 0 nothing done or >0 size of marshaled data
                    270:  */
                    271: int
1.3       misho     272: io_vars2map(u_char *buf, int buflen, array_t *vars)
1.2       misho     273: {
                    274:        int Limit = 0;
                    275:        register int i;
                    276:        ait_val_t *v, *val;
1.5       misho     277:        u_char *dat;
1.2       misho     278: 
                    279:        assert(buf);
                    280:        assert(vars);
                    281:        if (!buf || !vars)
                    282:                return -1;
                    283:        if (!buflen || !io_arraySize(vars))
                    284:                return 0;
                    285: 
                    286:        Limit = sizeof(ait_val_t) * io_arraySize(vars);
                    287:        if (Limit > buflen) {
                    288:                io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d needed min %d ...\n", 
                    289:                                buflen, Limit);
                    290:                return -1;
                    291:        } else {
                    292:                memset(buf, 0, buflen);
                    293: 
                    294:                v = (ait_val_t*) buf;
1.5       misho     295:                dat = buf + Limit;
1.2       misho     296:        }
                    297: 
                    298:        /* marshaling */
                    299:        for (i = 0; i < io_arraySize(vars); i++) {
                    300:                val = io_array(vars, i, ait_val_t*);
                    301: 
                    302:                v[i].val_type = val->val_type;
1.5.2.1   misho     303:                AIT_KEY(&v[i]) = AIT_KEY(val);
1.2       misho     304:                AIT_LEN(&v[i]) = AIT_LEN(val);
                    305: 
                    306:                switch (AIT_TYPE(val)) {
                    307:                        case blob:
                    308:                        case f32:
                    309:                        case f64:
                    310:                        case i8:
                    311:                        case i16:
                    312:                        case i32:
                    313:                        case i64:
                    314:                        case u8:
                    315:                        case u16:
                    316:                        case u32:
                    317:                        case u64:
                    318:                                v[i].val.net = val->val.net;
                    319:                                break;
1.5       misho     320:                        case data:
                    321:                                if (AIT_LEN(val) > buflen - Limit) {
                    322:                                        io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d "
                    323:                                                        "needed min %d ...\n", buflen, Limit + AIT_LEN(val));
                    324:                                        return -1;
                    325:                                } else
                    326:                                        Limit += AIT_LEN(val);
                    327: 
                    328:                                memcpy(dat, val->val_data, AIT_LEN(val));
                    329:                                /* Debug:: data offset in packet, not matter for anything! */
                    330:                                v[i].val.net = dat - buf;
                    331:                                dat += AIT_LEN(val);
                    332:                                break;
1.2       misho     333:                        case buffer:
                    334:                        case string:
                    335:                                if (AIT_LEN(val) > buflen - Limit) {
                    336:                                        io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d "
                    337:                                                        "needed min %d ...\n", buflen, Limit + AIT_LEN(val));
                    338:                                        return -1;
                    339:                                } else
                    340:                                        Limit += AIT_LEN(val);
                    341: 
1.5       misho     342:                                memcpy(dat, val->val.buffer, AIT_LEN(val));
1.2       misho     343:                                /* Debug:: data offset in packet, not matter for anything! */
1.5       misho     344:                                v[i].val.net = dat - buf;
                    345:                                dat += AIT_LEN(val);
1.2       misho     346:                                break;
                    347:                        default:
                    348:                                io_SetErr(EINVAL, "Error:: unsupported variable type=%d at element #%d ...\n", 
                    349:                                                AIT_TYPE(val), i);
                    350:                                return -1;
                    351:                }
                    352:        }
                    353: 
                    354:        return Limit;
                    355: }
                    356: 
                    357: /*
1.5.2.4 ! misho     358:  * io_map2vars() - De-marshaling data from memory map to array with variables
1.5       misho     359:  *
1.2       misho     360:  * @buf = Buffer
                    361:  * @buflen = Size of buffer
                    362:  * @vnum = Number of variables into buffer
                    363:  * @zcpy = Zero-copy for variables, if !=0 don't use io_arrayFree() for free variables and 
                    364:                *DON'T MODIFY OR DESTROY BUFFER*. =0 call io_arrayFree() before io_arrayDestroy()
                    365:  * return: =NULL error, !=NULL allocated variable array, after use must free with io_arrayDestroy()
                    366:  */
                    367: array_t *
1.3       misho     368: io_map2vars(u_char *buf, int buflen, int vnum, int zcpy)
1.2       misho     369: {
                    370:        array_t *vars;
                    371:        int Limit = 0;
                    372:        register int i;
                    373:        ait_val_t *v, *val;
1.5       misho     374:        u_char *dat;
1.2       misho     375: 
                    376:        assert(buf);
                    377:        if (!buf || !buflen || !vnum)
                    378:                return NULL;
                    379: 
                    380:        Limit = sizeof(ait_val_t) * vnum;
                    381:        if (Limit > buflen) {
                    382:                io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d needed min %d ...\n", 
                    383:                                buflen, Limit);
                    384:                return NULL;
                    385:        } else {
                    386:                if (!(vars = io_arrayInit(vnum)))
                    387:                        return NULL;
                    388: 
                    389:                v = (ait_val_t*) buf;
1.5       misho     390:                dat = buf + Limit;
1.2       misho     391:        }
                    392: 
                    393:        /* de-marshaling */
                    394:        for (i = 0; i < io_arraySize(vars); i++) {
                    395:                if (!zcpy) {
                    396:                        val = malloc(sizeof(ait_val_t));
                    397:                        if (!val) {
                    398:                                LOGERR;
                    399:                                io_arrayFree(vars);
                    400:                                io_arrayDestroy(&vars);
                    401:                                return NULL;
                    402:                        }
                    403:                } else
                    404:                        val = v + i;
                    405:                io_arraySet(vars, i, val);
                    406: 
                    407:                val->val_type = v[i].val_type;
1.5.2.1   misho     408:                AIT_KEY(val) = AIT_KEY(&v[i]);
1.2       misho     409:                AIT_LEN(val) = AIT_LEN(&v[i]);
                    410: 
                    411:                switch (AIT_TYPE(val)) {
                    412:                        case blob:
                    413:                        case f32:
                    414:                        case f64:
                    415:                        case i8:
                    416:                        case i16:
                    417:                        case i32:
                    418:                        case i64:
                    419:                        case u8:
                    420:                        case u16:
                    421:                        case u32:
                    422:                        case u64:
                    423:                                val->val.net = v[i].val.net;
                    424:                                break;
1.5       misho     425:                        case data:
                    426:                                /* WARNING:: remap data type to buffer */
                    427:                                val->val_type = buffer;
1.2       misho     428:                        case buffer:
                    429:                        case string:
                    430:                                if (AIT_LEN(val) > buflen - Limit) {
                    431:                                        io_SetErr(EMSGSIZE, "Error:: too short buffer buflen=%d "
                    432:                                                        "needed min %d ...\n", buflen, Limit + AIT_LEN(val));
                    433:                                        if (!zcpy)
                    434:                                                io_arrayFree(vars);
                    435:                                        io_arrayDestroy(&vars);
                    436:                                        return NULL;
                    437:                                } else
                    438:                                        Limit += AIT_LEN(val);
                    439: 
                    440:                                if (!zcpy) {
                    441:                                        val->val.buffer = malloc(AIT_LEN(val));
                    442:                                        if (!val->val.buffer) {
                    443:                                                LOGERR;
                    444:                                                io_arrayFree(vars);
                    445:                                                io_arrayDestroy(&vars);
                    446:                                                return NULL;
                    447:                                        } else
1.5       misho     448:                                                memcpy(val->val.buffer, dat, AIT_LEN(val));
1.2       misho     449:                                } else
1.5       misho     450:                                        val->val.buffer = dat;
                    451:                                dat += AIT_LEN(val);
1.2       misho     452:                                break;
                    453:                        default:
                    454:                                io_SetErr(EINVAL, "Error:: unsupported variable type=%d at element #%d ...\n", 
                    455:                                                AIT_TYPE(val), i);
                    456:                                if (!zcpy)
                    457:                                        io_arrayFree(vars);
                    458:                                io_arrayDestroy(&vars);
                    459:                                return NULL;
                    460:                }
                    461:        }
                    462: 
                    463:        return vars;
                    464: }
1.3       misho     465: 
                    466: 
                    467: /*
1.5.2.4 ! misho     468:  * io_allocVars() - Allocate ait_val_t array
1.5       misho     469:  *
1.3       misho     470:  * @varnum = Number of variables
                    471:  * return: =NULL error or !=NULL allocated array
                    472:  */
                    473: inline array_t *
                    474: io_allocVars(int varnum)
                    475: {
                    476:        array_t *arr;
                    477:        register int i;
                    478:        ait_val_t *v;
                    479: 
                    480:        if (!varnum || !(arr = io_arrayInit(varnum)))
                    481:                return NULL;
                    482: 
                    483:        for (i = 0; i < io_arraySize(arr); i++) {
                    484:                v = malloc(sizeof(ait_val_t));
                    485:                if (!v) {
                    486:                        LOGERR;
                    487:                        io_freeVars(&arr);
                    488:                        return NULL;
                    489:                } else {
                    490:                        memset(v, 0, sizeof(ait_val_t));
                    491:                        io_arraySet(arr, i, v);
                    492:                }
                    493:        }
                    494: 
                    495:        return arr;
                    496: }
                    497: 
                    498: /*
1.5.2.4 ! misho     499:  * io_clrVars() - Clear ait_val_t elements from array
1.5       misho     500:  *
1.3       misho     501:  * @vars = Variable array
                    502:  * return: -1 error or size of array
                    503:  */
                    504: inline int
                    505: io_clrVars(array_t * __restrict vars)
                    506: {
                    507:        register int i;
1.5       misho     508:        ait_val_t *v;
1.3       misho     509: 
                    510:        if (!vars)
                    511:                return -1;
                    512: 
                    513:        for (i = 0; i < io_arraySize(vars); i++)
1.5       misho     514:                if ((v = io_array(vars, i, ait_val_t*)))
                    515:                        AIT_FREE_VAL(v);
1.3       misho     516: 
                    517:        return io_arraySize(vars);
                    518: }
                    519: 
                    520: /*
1.5.2.4 ! misho     521:  * io_freeVars() - Free ait_val_t array
1.5       misho     522:  *
1.3       misho     523:  * @vars = Variable array
                    524:  * return: none
                    525:  */
                    526: inline void
                    527: io_freeVars(array_t ** __restrict vars)
                    528: {
                    529:        if (!vars || !*vars)
                    530:                return;
                    531: 
                    532:        io_clrVars(*vars);
                    533:        io_arrayFree(*vars);
                    534:        io_arrayDestroy(vars);
                    535: }
1.4       misho     536: 
                    537: /*
1.5.2.4 ! misho     538:  * io_allocVar() - Allocate memory for variable
1.5       misho     539:  *
1.4       misho     540:  * return: NULL error or new variable, after use free variable with io_freeVar()
                    541:  */
                    542: inline ait_val_t *
                    543: io_allocVar(void)
                    544: {
                    545:        ait_val_t *v = NULL;
                    546: 
                    547:        v = malloc(sizeof(ait_val_t));
                    548:        if (!v) {
                    549:                LOGERR;
                    550:                return NULL;
                    551:        } else
                    552:                memset(v, 0, sizeof(ait_val_t));
                    553:        v->val_type = empty;
                    554: 
                    555:        return v;
                    556: }
                    557: 
                    558: /*
1.5.2.4 ! misho     559:  * io_freeVar() - Free allocated memory for variable
1.5       misho     560:  *
1.4       misho     561:  * @val = Variable
                    562:  * return: none
                    563:  */
                    564: inline void
                    565: io_freeVar(ait_val_t * __restrict val)
                    566: {
                    567:        if (val) {
                    568:                AIT_FREE_VAL(val);
                    569:                free(val);
                    570:                val = NULL;
                    571:        }
                    572: }
1.5.2.1   misho     573: 
                    574: static int
                    575: _cmp_arr_key_asc(const void *a, const void *b)
                    576: {
                    577:        return AIT_KEY(*(ait_val_t**) a) - AIT_KEY(*(ait_val_t**) b);
                    578: }
                    579: 
                    580: static int
                    581: _cmp_arr_key_desc(const void *a, const void *b)
                    582: {
                    583:        return AIT_KEY(*(ait_val_t**) b) - AIT_KEY(*(ait_val_t**) a);
                    584: }
                    585: 
                    586: /*
1.5.2.4 ! misho     587:  * io_sortVars() - Sorting array with variables
1.5.2.1   misho     588:  *
                    589:  * @vars = Variable array
                    590:  * @order = Sort order. If =0 ascend or !=0 descend
                    591:  * @cmp = Compare function for sorting. If =NULL compare by key
                    592:  * return: none
                    593:  */
                    594: inline void
                    595: io_sortVars(array_t * __restrict vars, int order,  int (*cmp)(const void*, const void*))
                    596: {
                    597:        if (!vars)
                    598:                return;
                    599: 
                    600:        if (cmp)
                    601:                qsort(vars->arr_data, vars->arr_num, sizeof(void*), cmp);
                    602:        else if (order)
                    603:                qsort(vars->arr_data, vars->arr_num, sizeof(void*), _cmp_arr_key_desc);
                    604:        else
                    605:                qsort(vars->arr_data, vars->arr_num, sizeof(void*), _cmp_arr_key_asc);
                    606: }
1.5.2.2   misho     607: 
                    608: /*
1.5.2.4 ! misho     609:  * io_findKeyVars() - Find variable by key from array
1.5.2.2   misho     610:  *
                    611:  * @vars = Variables
                    612:  * @key = Search key
                    613:  * return: NULL error or not found, !=NULL valid element
                    614:  */
                    615: ait_val_t *
                    616: io_findKeyVars(array_t * __restrict vars, u_short key)
                    617: {
                    618:        array_t *tmp;
1.5.2.3   misho     619:        ait_val_t **vv, *v = NULL;
1.5.2.2   misho     620:        register int i;
                    621:        const u_char *p;
                    622: 
                    623:        if (!vars)
                    624:                return NULL;
                    625: 
                    626:        if (io_arrayCopy(&tmp, vars) == -1)
                    627:                return NULL;
                    628:        else
                    629:                qsort(tmp->arr_data, tmp->arr_num, sizeof(void*), _cmp_arr_key_asc);
                    630: 
                    631:        /* binary search */
                    632:        for (p = (const u_char*) tmp->arr_data, i = io_arraySize(tmp); i; i >>= 1) {
1.5.2.3   misho     633:                vv = (ait_val_t**) (p + (i >> 1) * sizeof(void*));
                    634:                if (!(key - AIT_KEY(*vv))) {    /* found! */
                    635:                        v = *vv;
                    636:                        break;
1.5.2.2   misho     637:                }
1.5.2.3   misho     638:                if ((key - AIT_KEY(*vv)) > 0) { /* move right key > current */
                    639:                        p = (const u_char*) vv + sizeof(void*);
1.5.2.2   misho     640:                        i--;
                    641:                }                               /* else move left */
                    642:        }
                    643: 
                    644:        io_arrayDestroy(&tmp);
1.5.2.3   misho     645:        return v;
1.5.2.2   misho     646: }

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