nexmon – Rev 1

?pathlinks?

Blame – Last modification – View Log – Download

/*
 * Description.
 *
 * Copyright (C) 1999-2013, Broadcom Corporation
 *
 * Permission to use, copy, modify, and/or distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice and this permission notice appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
 * SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN ACTION
 * OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF OR IN
 * CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 * 
 * $Id: miniopt.c 310902 2012-01-26 19:45:33Z $
 */

/* ---- Include Files ---------------------------------------------------- */

#include <typedefs.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <miniopt.h>


/* ---- Public Variables ------------------------------------------------- */
/* ---- Private Constants and Types -------------------------------------- */



/* ---- Private Variables ------------------------------------------------ */
/* ---- Private Function Prototypes -------------------------------------- */
/* ---- Functions -------------------------------------------------------- */

/* ----------------------------------------------------------------------- */
void
miniopt_init(miniopt_t *t, const char* name, const char* flags, bool longflags)
{
        static const char *null_flags = "";

        memset(t, 0, sizeof(miniopt_t));
        t->name = name;
        if (flags == NULL)
                t->flags = null_flags;
        else
                t->flags = flags;
        t->longflags = longflags;
}


/* ----------------------------------------------------------------------- */
int
miniopt(miniopt_t *t, char **argv)
{
        int keylen;
        char *p, *eq, *valstr, *endptr = NULL;
        int err = 0;

        t->consumed = 0;
        t->positional = FALSE;
        memset(t->key, 0, MINIOPT_MAXKEY);
        t->opt = '\0';
        t->valstr = NULL;
        t->good_int = FALSE;
        valstr = NULL;

        if (*argv == NULL) {
                err = -1;
                goto exit;
        }

        p = *argv++;
        t->consumed++;

        if (!t->opt_end && !strcmp(p, "--")) {
                t->opt_end = TRUE;
                if (*argv == NULL) {
                        err = -1;
                        goto exit;
                }
                p = *argv++;
                t->consumed++;
        }

        if (t->opt_end) {
                t->positional = TRUE;
                valstr = p;
        }
        else if (!strncmp(p, "--", 2)) {
                eq = strchr(p, '=');
                if (eq == NULL && !t->longflags) {
                        fprintf(stderr,
                                "%s: missing \" = \" in long param \"%s\"\n", t->name, p);
                        err = 1;
                        goto exit;
                }
                keylen = eq ? (eq - (p + 2)) : (int)strlen(p) - 2;
                if (keylen > 63) keylen = 63;
                memcpy(t->key, p + 2, keylen);

                if (eq) {
                        valstr = eq + 1;
                        if (*valstr == '\0') {
                                fprintf(stderr,
                                        "%s: missing value after \" = \" in long param \"%s\"\n",
                                        t->name, p);
                                err = 1;
                                goto exit;
                        }
                }
        }
        else if (!strncmp(p, "-", 1)) {
                t->opt = p[1];
                if (strlen(p) > 2) {
                        fprintf(stderr,
                                "%s: only single char options, error on param \"%s\"\n",
                                t->name, p);
                        err = 1;
                        goto exit;
                }
                if (strchr(t->flags, t->opt)) {
                        /* this is a flag option, no value expected */
                        valstr = NULL;
                } else {
                        if (*argv == NULL) {
                                fprintf(stderr,
                                "%s: missing value parameter after \"%s\"\n", t->name, p);
                                err = 1;
                                goto exit;
                        }
                        valstr = *argv;
                        argv++;
                        t->consumed++;
                }
        } else {
                t->positional = TRUE;
                valstr = p;
        }

        /* parse valstr as int just in case */
        if (valstr) {
                t->uval = (uint)strtoul(valstr, &endptr, 0);
                t->val = (int)t->uval;
                t->good_int = (*endptr == '\0');
        }

        t->valstr = valstr;

exit:
        if (err == 1)
                t->opt = '?';

        return err;
}