/*
**  Copyright (c) 2001-2002 The OSSP Project <http://www.ossp.org/>
**  Copyright (c) 2001-2002 Cable & Wireless Deutschland <http://www.cw.com/de/>
**
**  This file is part of OSSP lmtp2nntp, an LMTP speaking local
**  mailer which forwards mails as Usenet news articles via NNTP.
**  It can be found at http://www.ossp.org/pkg/lmtp2nntp/.
**
**  This program is free software; you can redistribute it and/or
**  modify it under the terms of the GNU General Public  License
**  as published by the Free Software Foundation; either version
**  2.0 of the License, or (at your option) any later version.
**
**  This program is distributed in the hope that it will be useful,
**  but WITHOUT ANY WARRANTY; without even the implied warranty of
**  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
**  General Public License for more details.
**
**  You should have received a copy of the GNU General Public License
**  along with this file; if not, write to the Free Software
**  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
**  USA, or contact the OSSP project <ossp@ossp.org>.
**
**  FIXME lmtp2nntp_config.c: LMTP to NNTP configuration parsing
*/

#include <stdlib.h>
#include <stdio.h>
#include <sys/stat.h>
#if 0
#include <unistd.h>
#include <errno.h>
#include <string.h>
#include <fcntl.h>
#include <sys/utsname.h>
#include <sys/time.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <sys/stat.h>
#include <signal.h>
#include <pwd.h>
#endif

/* third party (included) */
#if 0
#include "lmtp2nntp_argz.h"
#include "lmtp2nntp_shpat.h"
#include "lmtp2nntp_daemon.h"
#endif
#include "lmtp2nntp_popt.h"
#include "val.h"

/* third party (linked in) */
#include "str.h"
#if 0
#include "l2.h"
#include "var.h"
#endif

/* library version check (compile-time) */
#define  L2_VERSION_HEX_REQ 0x001200
#define  L2_VERSION_STR_REQ "0.1.0"
#define STR_VERSION_HEX_REQ 0x009206
#define STR_VERSION_STR_REQ "0.9.6"
#ifdef L2_VERSION_HEX
#if L2_VERSION_HEX < L2_VERSION_HEX_REQ
#error "require a newer version of OSSP L2"
#endif
#endif
#ifdef STR_VERSION_HEX
#if STR_VERSION_HEX < STR_VERSION_HEX_REQ
#error "require a newer version of OSSP Str"
#endif
#endif

/* own headers */
#include "lmtp2nntp_global.h"
#ifdef HAVE_CONFIG_H
#include "config.h"
#endif
#if defined(HAVE_DMALLOC_H) && defined(DMALLOC)
#include "dmalloc.h"
#endif
#include "lmtp2nntp_config.h"
#include "lmtp2nntp_lmtp.h"
#include "lmtp2nntp_nntp.h"
#include "lmtp2nntp_msg.h"
#include "sa.h"
#define _LMTP2NNTP_VERSION_C_AS_HEADER_
#include "lmtp2nntp_version.c"
#undef  _LMTP2NNTP_VERSION_C_AS_HEADER_

#ifndef FALSE
#define FALSE (1 != 1)
#endif
#ifndef TRUE
#define TRUE (!FALSE)
#endif

#ifndef NUL
#define NUL '\0'
#endif

void die(char *); /* FIXME */
void die(char *msg)
{
        //printf("ERROR: %s\n", msg);
            exit(-1);
}

#if 0




    FIXME pass(optionconfig_t *o, int pass);
    /* pass=0 for preinitialization !? */

void dotconftest(int argc, char **argv) /*FIXME*/
{
 
    ctx = malloc(sizeof(lmtp2nntp_config_t));
    ctx->option_childsmax = 10;


/* Braindump

    fuer configure

ich brauche eine Tabelle, die alle optionen in langer und kurzer Form
enthaelt, Angabe ob flag, single- oder multivalue, callbacks fuer die
syntaxpruefung des human-readable inputs, die conversion ins interne binaryformat sowie rueckwandlung in
human-readable format. Dazu informationen fuer help.
 */

    {
        const char *filename = "example.conf";
        struct stat sb;
        int fd;

        if (stat(filename, &sb) == -1)
            die("stat");
        if ((cpBuf = (char *)malloc((size_t)sb.st_size + 1)) == NULL)
            die("malloc");
        if ((fd = open(filename, O_RDONLY)) == -1)
            die("open");
        if (read(fd, (void *)cpBuf, (size_t)sb.st_size) != (ssize_t)sb.st_size)
            die("read");
        cpBuf[(int)sb.st_size] = '\0';
        if (close(fd) == -1)
            die("close");
    }
    //printf("DEBUG: *** 1 *** file as it was just read in ***\n%s***\n", cpBuf);

    {
        char *cpI;  /* pointer to next character to be read */
        char *cpO;  /* pointer to next character to be written. Used for eliminating
                       backslash+newline at a line continuation */
        char *cpL;  /* pointer to start of line */
        int pline;  /* current physical (disregarding line continuation) line number */
        int lline;  /* current logical lines first physical line number */
        int eline;  /* flag signaling empty or just whitespace-filled line */
        char c;     /* current character */
        char p;     /* previous character */
        int eof;    /* flag signaling end of file detected */

        cpI = cpBuf;
        cpO = cpBuf;
        eof = FALSE;
        pline = 1;
        p = NUL;

        cpL = cpO;
        lline = pline;
        eline = TRUE;
        while(!eof) {
            c = *cpI++;
            *cpO++ = c;
            if (c == NUL)
                eof = TRUE;
            else
                if (!isspace(c))
                    eline = FALSE;
            if (eof || (c == '\n')) {
                pline++;
                if (!eof && (p == '\\')) { /* line continuation situation */
                    cpO-=2; /* need to remove both backslash+newline */
                }
                else {
                    if (!eline) { /* process logical line unless it's empty */
                        *(cpO-1) = NUL;
                        if (lline == (pline-1))
                            //printf("DEBUG: line[%3d] = ***%s***\n", lline, cpL);
                        else
                            //printf("DEBUG: [%3d-%3d] = ***%s***\n", lline, pline-1, cpL);
                        {
                            char *cp = cpL;
                            char *command;
                            char *value;

                            if ((command = str_token(&cp, " \t", "\"'", "#", STR_STRIPQUOTES|STR_BACKSLASHESC)) == NULL)
                                //printf("DEBUG: no command - comment only\n");
                            else {
                                //printf("DEBUG:   command = ***%s***\n", command);
                                if ((value = str_token(&cp, " \t", "\"'", "#", STR_STRIPQUOTES|STR_BACKSLASHESC)) == NULL)
                                    //printf("DEBUG: no value - section\n");
                                else {
                                    while(isspace((int)*value)) value++;
                                    //printf("DEBUG:     value = ***%s***\n", value);
                                }
                            }
                        }
                    }
                    cpL = cpO;
                    lline = pline;
                    eline = TRUE;
                }
            }
            p = c;
        }
    }
}
#endif

struct optionconfig_s {
    optionconfig_t *next;               /* cleanup chain for destroy */
                    /**/
    char               *longname;       /* the long name (optional if shortname given) */
    char                shortname;      /* the short name (optional if longname given) */
    char               *descrip;        /* description for autohelp */
    char               *argdescrip;     /* argument description for autohelp */
    optiontype_t        type;           /* OPT_FLAG, OPT_SINGLE, OPT_MULTI */
    optionloop_cb_t    *cb;             /* callback for first iteration - syntax check and include */
    void               *cbctx;          /* context for pass1 */
    val_t              *val;            /* val we are registered under */
                    /**/
    int                 number;         /* number of this option for popt */
    union {                             /* option data as read from configuration */
        int f;                          /* OPT_FLAG */
        char *s;                        /* OPT_SINGLE */
        char **m;                       /* OPT_MULTI */
    } data;
    int ndata;
};

static val_rc_t dumper(void *ctx, const char *name, int type, const char *desc, void *data)
{
    optionconfig_t *oc;
    int i;

    if (type != VAL_TYPE_PTR)
        return VAL_OK;

    oc = (optionconfig_t *)data;

    switch (oc->type) {
        case OPT_FLAG:
            printf("DEBUG: <%5s>, name=<%20s>, OPT_FLAG,   desc=<%20s>, data@%.8lx->[%d]%d\n",     (char *)ctx, name, desc, (long)oc, oc->ndata, oc->data.f);
            break;
        case OPT_SINGLE:
            printf("DEBUG: <%5s>, name=<%20s>, OPT_SINGLE, desc=<%20s>, data@%.8lx->[%d]\"%s\"\n", (char *)ctx, name, desc, (long)oc, oc->ndata, oc->data.s == NULL ? "NULL" : oc->data.s);
            break;
        case OPT_MULTI:
            printf("DEBUG: <%5s>, name=<%20s>, OPT_MULTI,  desc=<%20s>, data@%.8lx->[%d]%.8lx\n",  (char *)ctx, name, desc, (long)oc, oc->ndata, (long)oc->data.m);
            for (i = 0; i < oc->ndata; i++) {
                printf("DEBUG:        [%3d]                        =<%20s>\n", i, oc->data.m[i]);
            }
            break;
        default:
            break;
    }
    return VAL_OK;
}
lmtp2nntp_option_rc_t option_find(lmtp2nntp_option_t *o, int number, optionconfig_t **ocp);
lmtp2nntp_option_rc_t option_find(lmtp2nntp_option_t *o, int number, optionconfig_t **ocp)
{
    lmtp2nntp_option_rc_t rc = VAL_OK;

    if (o == NULL || ocp == NULL)
        return OPTION_ERR_ARG;

    *ocp = o->first;
    while (*ocp != NULL && (*ocp)->number != number)
        *ocp = (*ocp)->next;

    return rc;
}


lmtp2nntp_option_rc_t option_register(lmtp2nntp_option_t *o, char *longname, char shortname, optiontype_t type, optionloop_cb_t *cb, char *cbctx, char *descrip, char *argdescrip)
{
    lmtp2nntp_option_rc_t rc = VAL_OK;
    optionconfig_t *oc;
    
    //printf("DEBUG: enter option_register(%.8lx, \"%s\", '%c', %d, %.8lx, %.8lx, \"%s\", \"%s\")\n", (long)o, longname, shortname, type, (long)cb, (long)cbctx, descrip, argdescrip);

    if (o == NULL || longname == NULL)
        return OPTION_ERR_ARG;

    /* create a optionconfig_t structure */
    if ((oc = (optionconfig_t *)malloc(sizeof(optionconfig_t))) == NULL)
        return OPTION_ERR_MEM;
    //printf("DEBUG: optionconfig_t structure malloc'ed\n");
    oc->next         = NULL;
    oc->longname     = strdup(longname);
    oc->shortname    = shortname;
    oc->descrip      = descrip == NULL ? NULL : strdup(descrip);
    oc->argdescrip   = argdescrip == NULL ? NULL : strdup(argdescrip);
    oc->type         = type;
    oc->cb           = cb;
    oc->cbctx        = cbctx;
    oc->val          = o->vo;
    oc->number       = o->pi; /*FIXME + 1; 0 is a reserved val in popt, so offset 1 */
    oc->data.f       = 0;
    oc->data.s       = NULL; /* just in case a pointer is larger than int */
    oc->data.m       = NULL;
    oc->ndata        = 0;
    if (   (                      oc->longname   == NULL)
        || (descrip    != NULL && oc->descrip    == NULL)
        || (argdescrip != NULL && oc->argdescrip == NULL)
          )
        CU(OPTION_ERR_MEM);

    //printf("DEBUG: optionconfig_t structure created\n");

    /* feed lib_val */
    (void)/*FIXME rc*/val_reg(oc->val, oc->longname, VAL_TYPE_PTR, oc->descrip, oc);

    //printf("DEBUG: val_reg'ed\n");

    /* feed lib_popt */
    //printf("DEBUG: o->pi=%d, o->pn=%d\n", o->pi, o->pn);
    if (o->pi >= (o->pn-2)) { /* correction by two here, in malloc and realloc is for AUTOHELP and TABLEEND */
        if (o->pt == NULL) {
            //printf("DEBUG: malloc\n");
            o->pt = (struct popt_option *)malloc(                (1 + 2) * sizeof(struct popt_option)); /*FIXME out of mem*/
            o->pn = 1;
        }
        else {
            //printf("DEBUG: realloc\n");
            o->pt = (struct popt_option *)realloc(o->pt, (o->pn * 2 + 2) * sizeof(struct popt_option)); /*FIXME out of mem*/
            o->pn = o->pn * 2;
        }
    }
    o->pt[o->pi].longName   = oc->longname;
    o->pt[o->pi].shortName  = oc->shortname;
    o->pt[o->pi].argInfo    = oc->type == OPT_FLAG ? POPT_ARG_NONE : POPT_ARG_STRING;
    o->pt[o->pi].arg        = NULL;
    o->pt[o->pi].val        = oc->number;
    o->pt[o->pi].descrip    = oc->descrip;
    o->pt[o->pi].argDescrip = oc->argdescrip;

    /* append POPT_AUTOHELP */
    o->pt[o->pi+1].longName   = NULL;
    o->pt[o->pi+1].shortName  = '\0';
    o->pt[o->pi+1].argInfo    = POPT_ARG_INCLUDE_TABLE;
    o->pt[o->pi+1].arg        = popt_helpoptions;
    o->pt[o->pi+1].val        = 0;
    o->pt[o->pi+1].descrip    = "Help options:";
    o->pt[o->pi+1].argDescrip = NULL;

    /* append POPT_TABLEEND */
    o->pt[o->pi+2].longName   = NULL;
    o->pt[o->pi+2].shortName  = '\0';
    o->pt[o->pi+2].argInfo    = 0;
    o->pt[o->pi+2].arg        = 0;
    o->pt[o->pi+2].val        = 0;
    o->pt[o->pi+2].descrip    = NULL;
    o->pt[o->pi+2].argDescrip = NULL;
    o->pi++;
    //printf("DEBUG: popt'ed\n");

    /* link in this new optionconfig_t structure */
    if (o->first == NULL) {
        o->first = oc;
        o->last  = oc;
    }
    else {
        o->last->next = oc; 
        o->last       = oc;
    }
    //printf("DEBUG: linked\n");

    return rc;

    CUS:
    if (oc != NULL) {
        if (oc->argdescrip != NULL) free(oc->argdescrip);
        if (oc->descrip    != NULL) free(oc->descrip);
        if (oc->longname   != NULL) free(oc->longname);
        free(oc);
    }
    return rc;
}

static lmtp2nntp_option_rc_t stdsyntax(optionconfig_t *oc, char *arg, char *cbctx)
{
    printf("DEBUG: enter stdsyntax %.8lx, \"%s\", \"%s\"\n", (long)oc, arg, cbctx);

    //printf("DEBUG: oc->type=%d\n", oc->type);
    switch (oc->type) {
        case OPT_FLAG:
            printf("DEBUG: flag\n");
            if (arg != NULL || cbctx != NULL)
                return OPTION_ERR_ARG;
            if (oc->ndata >= 1)
                return OPTION_ERR_USE;
            oc->data.f = 1;
            oc->ndata = 1;
            break;
        case OPT_SINGLE:
            printf("DEBUG: single\n");
            if (arg == NULL)
                return OPTION_ERR_ARG;
            if (oc->ndata >= 1 || oc->data.s != NULL)
                    return OPTION_ERR_USE;
            if (cbctx != NULL)
                if (str_parse(arg, cbctx) <= 0) {
                    //printf("DEBUG: \"%s\" does NOT match \"%s\"\n", arg, cbctx);
                    return OPTION_ERR_USE;
                }
            printf("DEBUG: \"%s\" does match \"%s\"\n", arg, cbctx);
            if ((oc->data.s = strdup(arg)) == NULL)
                    return OPTION_ERR_MEM;
            oc->ndata = 1;
            break;
        case OPT_MULTI:
            //printf("DEBUG: multi\n");
            if (arg == NULL)
                return OPTION_ERR_ARG;
            if (oc->ndata >= 1 && oc->data.m == NULL)
                    return OPTION_ERR_USE;
            if (cbctx != NULL)
                if (str_parse(arg, cbctx) <= 0) {
                    //printf("DEBUG: \"%s\" does NOT match \"%s\"\n", arg, cbctx);
                    return OPTION_ERR_USE;
                }
            //printf("DEBUG: \"%s\" does match \"%s\"\n", arg, cbctx);
            if (oc->data.m == NULL) {
                if ((oc->data.m = (char **)malloc(             (        1 + 1) * sizeof(char **))) == NULL)
                    return OPTION_ERR_MEM;
            }
            else {
                if ((oc->data.m = (char **)realloc(oc->data.m, (oc->ndata + 1) * sizeof(char **))) == NULL)
                    return OPTION_ERR_MEM;
            }
            if ((oc->data.m[oc->ndata] = strdup(arg)) == NULL)
                    return OPTION_ERR_MEM;
            oc->ndata++;
            oc->data.m[oc->ndata] = NULL;
            break;
        default:
            return OPTION_ERR_ARG;
            break;
    }
    return OPTION_OK;
}

static lmtp2nntp_option_rc_t includeit(optionconfig_t *oc, char *arg, char *cbctx)
{
    return OPTION_OK;
}

lmtp2nntp_option_rc_t option_create(lmtp2nntp_option_t **op)
{
    //printf("DEBUG: enter option_create(%.8lx)\n", (long)op);

    if (op == NULL)
        return OPTION_ERR_ARG;

    if ((*op = (lmtp2nntp_option_t *)malloc(sizeof(lmtp2nntp_option_t))) == NULL)
        return OPTION_ERR_MEM;
    (*op)->childsmax = 0;
    (*op)->daemonize = 0;
    (*op)->kill = 0;
    (*op)->pidfile = 0;
    (*op)->acl.as = 0;
    (*op)->acl.az = NULL;
    (*op)->bind = NULL;
    (*op)->client = NULL;
    (*op)->destination.as = 0;
    (*op)->destination.az = NULL;
    (*op)->groupmode = NULL;
    (*op)->headervalue.as = 0;
    (*op)->headervalue.az = NULL;
    (*op)->include.as = 0;
    (*op)->include.az = NULL;
    (*op)->size = 0;
    (*op)->timeoutlmtpaccept = 0;
    (*op)->timeoutlmtpread = 0;
    (*op)->timeoutlmtpwrite = 0;
    (*op)->timeoutnntpconnect = 0;
    (*op)->timeoutnntpread = 0;
    (*op)->timeoutnntpwrite = 0;
    (*op)->mailfrom = NULL;
    (*op)->nodename = NULL;
    (*op)->operationmode = NULL;
    (*op)->l2spec = NULL;
    (*op)->uid = NULL;
    (*op)->restrictheader.as = 0;
    (*op)->restrictheader.az = NULL;
    (*op)->newsgroup.as = 0;
    (*op)->newsgroup.az = NULL;
                    /**/
    (*op)->first = NULL;
    (*op)->last = NULL;
    (*op)->vo = NULL;
    (*op)->pn = 0;
    (*op)->pi = 0;
    (*op)->pt = NULL;

    if (val_create(&((*op)->vo)) != VAL_OK) {
        free(*op);
        return OPTION_ERR_VAL;
    }
    return OPTION_OK;
}

lmtp2nntp_option_rc_t option_parse(lmtp2nntp_option_t *o, int argc, char **argv)
{
    //printf("DEBUG: enter option_parse(%.8lx, %d, %.8lx)\n", (long)o, argc, (long)argv);

    if (o == NULL)
        return OPTION_ERR_ARG;

    (void)option_register(o, "childsmax",           'C', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "childsmax" );
    (void)option_register(o, "daemonize",           'D', OPT_FLAG,   NULL,       NULL,                  "foo", NULL );
    (void)option_register(o, "kill",                'K', OPT_FLAG,   NULL,       NULL,                  "foo", NULL );
    (void)option_register(o, "pidfile",             'P', OPT_SINGLE, &stdsyntax, "m/.{,255}/",          "foo", "pidfile" );
    (void)option_register(o, "veryverbose",         'V', OPT_FLAG,   NULL,       NULL,                  "foo", NULL );
    (void)option_register(o, "acl",                 'a', OPT_MULTI,  &stdsyntax, "m/[0-9.](/[0-9]2)?/", "foo", "addr[/mask]" );
    (void)option_register(o, "bind",                'b', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "addr[:port]|-|path[:perms]" );
    (void)option_register(o, "client",              'c', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "addr[:port]" );
    (void)option_register(o, "destination",         'd', OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "addr[:port]" );
    (void)option_register(o, "groupmode",           'g', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "groupmode" );
    (void)option_register(o, "headervalue",         'h', OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "header: value" );
    (void)option_register(o, "include",             'i', OPT_MULTI,  &includeit, "m/.*/",               "foo", "configfile" );
    (void)option_register(o, "size",                's', OPT_SINGLE, &stdsyntax, "m/[0-9]+/",           "foo", "bytes" );
    (void)option_register(o, "timeoutlmtpaccept",   NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "sec" );
    (void)option_register(o, "timeoutlmtpread",     NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "sec" );
    (void)option_register(o, "timeoutlmtpwrite",    NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "sec" );
    (void)option_register(o, "timeoutnntpconnect",  NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "sec" );
    (void)option_register(o, "timeoutnntpread",     NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "sec" );
    (void)option_register(o, "timeoutnntpwrite",    NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "sec" );
    (void)option_register(o, "mailfrom",            'm', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "regex" );
    (void)option_register(o, "nodename",            'n', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "nodename" );
    (void)option_register(o, "operationmode",       'o', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "post|feed" );
    (void)option_register(o, "l2spec",              'l', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "spec" );
    (void)option_register(o, "uid",                 'u', OPT_SINGLE, &stdsyntax, "m/.*/",               "foo", "number|name" );
    (void)option_register(o, "restrictheader",      'r', OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "regex" );
    (void)option_register(o, "newsgroup",           NUL, OPT_MULTI,  &stdsyntax, "m/.*/",               "foo", "newsgroup");
    //val_apply(o->vo, "", 9, dumper, "all" );
    
    {
        int i;
        char *cp;
        optionconfig_t *ocp;
        popt_context poptCon;   /* context for parsing command-line options */

        poptCon = popt_getcontext(NULL, argc, (const char **)argv, o->pt, 0);
        popt_setotheroptionhelp(poptCon, "[OPTIONS]* [newsgroup ...]");
        //printf("DEBUG: argc=%d\n", argc);
        if (argc < 2) {
            popt_printusage(poptCon, stderr, 0);
            exit(1);
        }
        while ((i = popt_getnextopt(poptCon)) >= 0) {
            (void)option_find(o, i, &ocp);
            printf("DEBUG: ocp->type=%d\n", ocp->type);
            if (ocp->cb != NULL)
                ocp->cb(ocp, cp = (ocp->type == OPT_FLAG ? NULL : (char *)popt_getoptarg(poptCon)), ocp->cbctx);
            //printf("DEBUG: popt_getnextopt returned  %d \"%s\", \"%s\"\n", i, o->pt[i].longName, ocp->longname);
            //printf("DEBUG: popt_getoptarg  returned  \"%s\"\n", cp);
        }
        //printf("DEBUG: current popt error is \"%s\"(%d)\n", popt_strerror(i), i);
        //printf("DEBUG: ----\n");
        while ((cp = (char *)popt_getarg(poptCon)) != NULL) {
            //printf("DEBUG: popt_getarg returned \"%s\"\n", cp);
        }
        //printf("DEBUG: current popt error is \"%s\"(%d)\n", popt_strerror(i), i);
        popt_freecontext(poptCon);
    }
    val_apply(o->vo, "", 9, dumper, "all" );
    return OPTION_OK;
}

lmtp2nntp_option_rc_t option_destroy(lmtp2nntp_option_t *o)
{
    optionconfig_t *oc;
    int i;

    if (o == NULL)
        return OPTION_ERR_ARG;

    oc = o->first;
    while (oc != NULL) {
        if (oc->type == OPT_SINGLE && oc->data.s != NULL)
            free(oc->data.s);
        if (oc->type == OPT_MULTI  && oc->data.m != NULL) {
            for (i = 0; i < oc->ndata; i++)
                if (oc->data.m[i] == NULL)
                    break;
                else
                    free(oc->data.m[i]);
            free(oc->data.m);
        }
        oc = oc->next;
    }
    if (o->vo != NULL)
        val_destroy(o->vo);
    free(o);

    return OPTION_OK;
}