Return to nestedStructTest.c CVS log

Up to [ELWIX - Embedded LightWeight unIX -] / embedaddon / libpdel / structs / xmlrpc-test

Annotation of embedaddon/libpdel/structs/xmlrpc-test/nestedStructTest.c, revision 1.1

1.1     ! misho       1: 
        !             2: /*
        !             3:  * Copyright (c) 2001-2002 Packet Design, LLC.
        !             4:  * All rights reserved.
        !             5:  * 
        !             6:  * Subject to the following obligations and disclaimer of warranty,
        !             7:  * use and redistribution of this software, in source or object code
        !             8:  * forms, with or without modifications are expressly permitted by
        !             9:  * Packet Design; provided, however, that:
        !            10:  * 
        !            11:  *    (i)  Any and all reproductions of the source or object code
        !            12:  *         must include the copyright notice above and the following
        !            13:  *         disclaimer of warranties; and
        !            14:  *    (ii) No rights are granted, in any manner or form, to use
        !            15:  *         Packet Design trademarks, including the mark "PACKET DESIGN"
        !            16:  *         on advertising, endorsements, or otherwise except as such
        !            17:  *         appears in the above copyright notice or in the software.
        !            18:  * 
        !            19:  * THIS SOFTWARE IS BEING PROVIDED BY PACKET DESIGN "AS IS", AND
        !            20:  * TO THE MAXIMUM EXTENT PERMITTED BY LAW, PACKET DESIGN MAKES NO
        !            21:  * REPRESENTATIONS OR WARRANTIES, EXPRESS OR IMPLIED, REGARDING
        !            22:  * THIS SOFTWARE, INCLUDING WITHOUT LIMITATION, ANY AND ALL IMPLIED
        !            23:  * WARRANTIES OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE,
        !            24:  * OR NON-INFRINGEMENT.  PACKET DESIGN DOES NOT WARRANT, GUARANTEE,
        !            25:  * OR MAKE ANY REPRESENTATIONS REGARDING THE USE OF, OR THE RESULTS
        !            26:  * OF THE USE OF THIS SOFTWARE IN TERMS OF ITS CORRECTNESS, ACCURACY,
        !            27:  * RELIABILITY OR OTHERWISE.  IN NO EVENT SHALL PACKET DESIGN BE
        !            28:  * LIABLE FOR ANY DAMAGES RESULTING FROM OR ARISING OUT OF ANY USE
        !            29:  * OF THIS SOFTWARE, INCLUDING WITHOUT LIMITATION, ANY DIRECT,
        !            30:  * INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, PUNITIVE, OR CONSEQUENTIAL
        !            31:  * DAMAGES, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES, LOSS OF
        !            32:  * USE, DATA OR PROFITS, HOWEVER CAUSED AND UNDER ANY THEORY OF
        !            33:  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
        !            34:  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF
        !            35:  * THE USE OF THIS SOFTWARE, EVEN IF PACKET DESIGN IS ADVISED OF
        !            36:  * THE POSSIBILITY OF SUCH DAMAGE.
        !            37:  *
        !            38:  * Author: Archie Cobbs <archie@freebsd.org>
        !            39:  */
        !            40: 
        !            41: #include "xmlrpc_test.h"
        !            42: 
        !            43: static http_servlet_xmlrpc_handler_t   nestedStructTest_handler;
        !            44: 
        !            45: const struct   http_servlet_xmlrpc_method nestedStructTest_method = {
        !            46:        "validator1.nestedStructTest",
        !            47:        nestedStructTest_handler,
        !            48:        NULL,                   /* this handler wants "exploded" parameters */
        !            49:        1, 1
        !            50: };
        !            51: 
        !            52: static void *
        !            53: nestedStructTest_handler(void *arg, const char *method,
        !            54:        struct http_request *req, u_int nparams, const void **params,
        !            55:        const char *mtype, const struct structs_type **rtypep, int *faulted)
        !            56: {
        !            57:        const char *struct_names[] = { "2000", "04", "01", NULL };
        !            58:        const struct xmlrpc_value_union *v;
        !            59:        const struct xmlrpc_struct *s;
        !            60:        int32_t *result;
        !            61:        int32_t sum;
        !            62:        int i;
        !            63:        int j;
        !            64: 
        !            65:        alog(LOG_INFO, "method \"%s\" invoked", method);
        !            66: 
        !            67:        /* Find the nested structure */
        !            68:        for (i = 0, v = params[0]; struct_names[i] != NULL; i++) {
        !            69:                for (j = 0; ; j++) {
        !            70:                        const struct xmlrpc_member *member;
        !            71:                        const void *data = v;
        !            72:                        char name[32];
        !            73: 
        !            74:                        snprintf(name, sizeof(name), "struct.%d", j);
        !            75:                        if (structs_find(&structs_type_xmlrpc_value,
        !            76:                            name, (void **)&data, 0) == NULL)
        !            77:                                return (NULL);
        !            78:                        member = data;
        !            79:                        if (strcmp(member->name, struct_names[i]) == 0) {
        !            80:                                v = &member->value;             /* found it */
        !            81:                                break;
        !            82:                        }
        !            83:                }
        !            84:        }
        !            85: 
        !            86:        /* Make sure we're now looking at a structure */
        !            87:        if (strcmp(v->field_name, "struct") != 0) {
        !            88:                errno = EINVAL;
        !            89:                return (NULL);
        !            90:        }
        !            91:        s = &v->un->struct_;
        !            92: 
        !            93:        /* Add together the three_stooges fields */
        !            94:        for (sum = i = 0; i < s->length; i++) {
        !            95:                if (strcmp(s->elems[i].name, "moe") != 0
        !            96:                    && strcmp(s->elems[i].name, "larry") != 0
        !            97:                    && strcmp(s->elems[i].name, "curly") != 0)
        !            98:                        continue;
        !            99:                if (strcmp(s->elems[i].value.field_name, "i4") != 0) {
        !           100:                        errno = EINVAL;
        !           101:                        return (NULL);
        !           102:                }
        !           103:                sum += s->elems[i].value.un->i4;
        !           104:        }
        !           105: 
        !           106:        /* Copy result into malloc'd buffer */
        !           107:        if ((result = MALLOC(mtype, sizeof(*result))) == NULL)
        !           108:                return (NULL);
        !           109:        *result = sum;
        !           110: 
        !           111:        /* Return result */
        !           112:        *rtypep = &structs_type_int;
        !           113:        return (result);
        !           114: }
        !           115: